Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Prebudovani sysutils v D3
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.4.2000 22:50:34
From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
> mam takovy pro mnohe jiste trivialni dotaz: mam prelozene nektere hlasky v
> sysutils a jine konstanty (v Delphi 3), ale nevim jak to prebudovat do
> balicku, muzete mi, prosim, nekdo poradit?
Ahoj,
v tomto pripade jiz musis pouzit korektni zpusob lokalizace. Podivej se na
http://www.localizator.com
Petr Vones, amatersky programator
Re[2]: Duplicita klicu, Key - Violation
[*] Delph! <Delph(zv)miesto.sk> - 12.4.2000 22:54:28
Wednesday, April 12, 2000, 6:06:43 PM, Zbysek Hlinka wrote:
ZH> U SQL databaze byva obvykle nejlepsi reseni poslat data pres
ZH> ulozenou proceduru a zkontrolovat navratovou hodnotu, jak to
ZH> dopadlo.
... mozes uviest nejaky konkretny priklad ako to vlastne riesit cez tu
ulozenu proceduru ? (Interbase)
vdaka
Konference MS SQL 2000
[*] bigzero(zv)post(tec)cz - 12.4.2000 22:54:59
Zdravim !
MS toho dneska nasliboval ...
Konkretne MSDE 2000 bude, omezeni maji zustat zachovana
(5 threadu). Druha beta SQL2K ma byt dostupna behem jeste dubna. Nejvetsi zmeny jsou v nastojich (QA, DTS ...) a v rozsireji serveru pro enterprise, OLAP a WEB reseni (mimochodem Enterprise verze SQL bude nejspis drazsi nez ta stavajici).
Honza
> Vazeni,
> pokud jste tam nekdo byl, mel bych jeden dotaz.
> Sliboval MS ze SQL 2000 bude take ve jako MSDE?
>
> Dekuji
> ing. Michal Kus
> TANGO software s.r.o.
> pokladni systemy pro restaurace a obchody
> kus(zv)tangosw(tec)cz
> www.tangosw(tec)cz
>
Prohledavac, ktery Vam rozumi.
*** http://NAJDI.TO
Drag & Drop
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 12.4.2000 23:01:51
ahoj,
na http://www.gexperts.com/GXExplorer/ najdes
Explorer pro Delphi se zdrojakama, kterej umoznuje takhle interaktivne
pracovat s pruzkumnikem, tak to muzes okoukat.
M.Jirman
From: �ampulka Ji�� <campulka(zv)czas(tec)cz>
Problem:
Mam listbox, kterej je naplnenej nazvama souboru, a ja
potrebuju aby z toho listboxu slo soubor pret�hnout mysi
treba do exploreru (zkop�rovat, presunout)... Jak na to?
d�k Jirka.FAXovanie
[*] L. ZITA <konference(zv)sales(tec)cz> - 13.4.2000 02:02:48
Behalf Of Pavol Kaka�ka
> > :Da se na to jit i z druhe strany. Vyzaduje to ovsem aby MS
> Exchange nebo
> > Outlook (nakonfigurovan� jako "Podnikov� nebo pracovn� skupina") byl tez
> > nastaven jako "SIMPLE KLIENT MAPI". Tento pozadavek je pomerne casto
> splnen.
> > Pak muzes pomoci fce MapiSendMail poslat fax jako e-mail a to tak, ze
> misto
> > mailove adresy das FAX:faxove_cislo.
> > Ma to vyhodu, ze se da pouzit k odeslani i e-mail.
>
> Vyzera to zaujimavo a ako to ide nastavit?
Mrkni se v defaultnim projectu Delphi "Win 95 logo application"
(File->New->Project...) na
funkci v menu File->Send
>
> A co ak ma niekto Netscape, ... ?
Nevadi. Muze ho pouzivat ale ty vyse popsanym zpusobem neodesles mail a ani
pres nej nepujdou odesilat maily
z "defaultnich" windowsackych aplikaci (napr WordPad) pomoci
Soubor->Odeslat, nebo pomoci ShellExecute - mailto.
Proste a jednoduse : MS Fax je "neci" sluzba (MS Exchange ze zakladni
instalace W95, na W98 je take ale musi se doinstalovat z CD, nebo Outluuk
95,97,2000). To "neco" musi byt nainstalovano a nastaveno jako "SIMPLE
MAPI", se
vsemi dusledky, ktere z toho plynou. Ty pak pomoci teto zpravove sluzby
muzes odesilat faxy a pokud je u toho "neceho" i nainstalovana sluzba na
odeslilani e-mailu tak i e-maily.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
NVarchar a MSSQL - 2
[*] Ren� Otisk - 13.4.2000 07:08:54
Hi,
Takze nezbude, nez investovat do D5 (+ Zbyskovy OLE DB komponenty) nebo do
Adonisu, ze?
Nicmene dekuji za otevreni oci...
Sroub
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 12, 2000 11:05 AM
Subject: Re: NVarchar a MSSQL - 2
> > Ale houby chyba MS SQL serveru, takhle lehce se z toho Delphi
> > nevykrouti ;-). Problem je v Delphi, resp. v komponentach Delphi
> > (popr. v komponentach MODBC co pouziva Sroub - aspon se domnivam ze
> > jsou to nejake ODBC komponenty). Patrne nepodporuji NTEXT. A chyba
> > bude patrne opravdu v tech komponentach, protoze ODBC tyto hodnoty
> > vraci - testoval jsem to pres OLEDB provider pro ODBC a to slape.
> > Pouzite komponenty netradicne Adonis ;-) To ze to v Adonisu funguje i
> > pres OLEDB pro MS SQL providera je snad jasne ;-)
>
> > > to jadro problemu, ktere by i me zajimalo, neni, jak nejakou oklikou
> > > ziskat ownera apod. (to je reply na Zbyskovu odpoved, kterou jsem
> > > omylem smazal), ale proc MSSQL vubec nevrati sloupce typu nvarchar.
> > > Resp. je mozna vrati, ale aplikace je nevidi. Zajimave je, pouha
> > > zmena typu na char problem resi - tj. zda se mi, ze jde o nejakou
> > > chybu SQL serveru.
> > >
> > > David
> > >
> >
>
> Dobra, dobra, byl to jen nazor. Ale jsem fakt rad, ze se to konecne
> uspokojive vysvetlilo.
>
> David
SQL select
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 13.4.2000 07:08:57
>
> jo ale to mi vrati jen maximalni hodnoty pro jmena, ale ja chci celej
> zaznam. vcetne jmena.Kdyz dam SELECT max(cislo),jmeno ... tak
> to nefunguje
>
Co treba:
SELECT Jmeno, Cislo
FROM t_table t1
WHERE t1.Cislo IN (
SELECT max(Cislo)
FROM t_table t2
WHERE t2.Jmeno = t1.Jmeno
)
Nevim, na cem to mas, LocalSQL to mozna nezvladne.
Rozdil oproti groupovani je v tom, ze pro stejne jmeno to
vrati vsechny radky s max(cislo), pokud je tam vickrat
Jura
TRichEdit a Tabulatory
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 13.4.2000 07:23:18
>> Jakym zpusobem donutit RichEdit, aby mi to zobrazil, tak jak je to
ulozeno.
>A nebude to n�hodou problem proporcionalni/neproporcionalni pismo?
>Zkus v RichEditu nastavit Courier....
Omlouvam se a dekuji. To byl cely problem :-(
Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001
Ulozeni hesla do PWL
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 13.4.2000 07:24:39
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj,
rad bych na prihlasovacim formulari umoznil
uzivateli zaskrtnout "Ulozit heslo" a toto
heslo bych rad ulozil do jeho PWL souboru,
vite nekdo jak na to ?
Dobra.DirectoryListBox
[*] Filip Hlad�k <fihla(zv)telecom(tec)cz> - 13.4.2000 07:39:56
Zdravim,
nevite nekdo o free komponentach TDirectoryListBox a TFileListBox s vizazi
Pruzkumnika pro D3?
Dekuji
Filip Hladik
fihla(zv)telecom(tec)cz
Prebudovani sysutils v D3
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 07:45:57
On 12 Apr 00, at 15:20, Bene� Jaroslav wrote:
> mam takovy pro mnohe jiste trivialni dotaz: mam prelozene nektere
> hlasky v sysutils a jine konstanty (v Delphi 3), ale nevim jak to
> prebudovat do balicku, muzete mi, prosim, nekdo poradit? Dopredu
> velmi dekuji Jaro B.
Stahni si Lokalizator (http://www.localizator.com, na Delphree /
Nexus jsou zdrojaky k verzi 3). Pokud chces pouzivat standardni
balicky, jinou cestu nemas. Jinak si budes muset vytvorit sve
vlastni balicky.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
DBGrid - zvyrazneni nasledujiciho radku
[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 13.4.2000 08:13:08
Petre, klobouk dolu.
Je to presne ono. Akorat jsem zde, krome zmeny podminek, doplnil radek na zvyrazneni fokusovane polozky a pridal barvu podkladu.=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================
>>> "Petr Vones" <pvones(zv)mbox.vol(tec)cz> 10.4.2000 23:12:56 >>>
From: Richard Valny <Richard.Valny(zv)oku-st(tec)cz>
> Chci zvyraznit radek v DBGrid, ale podle stavu predchozi polozky.
> Rad bych zvyraznil i radek podle vztahu dvou nasledujicich radku napr.
type
TDBGridHack = class(TDBGrid);
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
LastActiveRecord: Integer;
LastCountry: string;
begin
with TDBGridHack(Sender) do
begin
LastActiveRecord := DataLink.ActiveRecord;
try
LastCountry := Table1Country.Value;
if LastActiveRecord > 0 then
begin
DataLink.ActiveRecord := LastActiveRecord - 1;
if Table1Country.Value = LastCountry then
begin
Canvas.Font.Color := clBlue;
Canvas.Brush.Color := clRed;
if (Focused) and (GdSelected in state) then
begin
Canvas.Font.Color := clWhite;
Canvas.Brush.Color := clBlue;
end;
end;
end;
finally
DataLink.ActiveRecord := LastActiveRecord;
end;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;
Petr Vones, amatersky programator
Seznam MS-SQL serveru
[*] Michal K�s <kus(zv)tangosw(tec)cz> - 13.4.2000 08:27:14
Kde najdu knihovnu SQLDMO?
ing. Michal Kus
TANGO software s.r.o.
pokladni systemy pro restaurace a obchody
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz
> -----Original Message-----
> Erik Salaj
>
> > Nev�te jak ziskat seznam MS-SQL serveru v siti?
>
> Napr. pomocou SQL-DMO objektov:
>
> uses SQLDMO_TLB; // importovana kniznica SQLDMO
>
>
> Erik
>
RichEdit
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 13.4.2000 08:52:40
with RichEdit1 do
begin
RichEdit1.DefAttributes.Color := clBlue;
RichEdit1.DefAttributes.Style := [fsBold, fsItalic];
Lines.Add('a tady vkladej text po jednotlivych radcich');
end;
Pavel
----- Original Message -----
From: Zapl�k <zaplik(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 12, 2000 11:05 AM
Subject: Re: RichEdit
> >> Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
> >> Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a
> tento
> >> soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu
> >> pridat
> >> na konec souboru.
> >>
> >A co tak urobit to "rucne", teda otvorit si dany subor a
> >zapisat tam text z RichEditu?
>
> >/LH
>
> Jenze Soubor RTF ma urcitou strukturu a pokud tam vlozim jen holy text,
tak
> tu strukturu
> poskodim. Ne?
>
> Martin Zapletal
> zaplik(zv)volny(tec)cz
>
>SQL select
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 13.4.2000 09:05:37
zjistuji, ze stale nedosla uspokojiva odpoved na problem s maximalnimi
hodnotami.
1) podle popisu problemu by musel stacit select
----------------------------------------------------------
select jmeno,max(cislo) as cislo
from tabulka
group by jmeno
2) z dalsich odpovedi a pripominek vyslo najevo, ze tabulka obsahuje jeste
dalsi sloupce
pak je reseni dvoji podle charakteru dat:
----------------------------------------------------------------------------
-------------
A) - seznam dalsich sloupcu (,...) musi byt uveden v sekci group by, obecne
receno vsechny sloupce bez agregacnich funkci
select jmeno,max(cislo),... as cislo
from tabulka
group by jmeno,...
B) - tady by stalo za uvahu dat indexy na sloupce jmeno a cislo
- tahle varianta bude vyhovovat i pro pripad, ze pro jedno jmeno je vic
polozek s maximalni hodnotou, ale ruznymi jinymi hodnotami v dalsich
sloupcich
select A.*
from
tabulka as A,
(select jmeno,max(cislo) as cislo
from tabulka
group by jmeno) as B
where
A.jmeno=B.jmeno
and
A.cislo=B.cislo
Ing. Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Milos Sula
Odesl�no: 12. dubna 2000 15:36
Komu: delphi konference
P�edm�t: OT:SQL select
Ahojte
mam napr. takovouto tabulku
jmeno cislo
A 1
A 2
A 6
B 8
C 2
C 3
a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
jednotlivych jmen. tj
A 6
B 8
C 3
nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
RTF na pozadi nekde v pameti
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 13.4.2000 09:08:19
Zdravim,
potrebuji nekde na pozadi predelat vlastnosti textu v RTF.
O co jde:
Abych mel obarveny text (RTF) dle situace vypoctu v programu, pouzivam RTF. Text se neustale pridava za jiz existujici text. V textu, ktery se pridava ( Lines.Add('pridany text') ) jsou nejake atributy pro nastaveni barvy/boldu/italiku.
Jiz existujici RTF potrebuji nekam nakopirovat do pameti, pridat tam novy text, predelat barvy a nasledne vratit zpet na formular.
Nejak se mi nedari, asi spatne vytvarim RTF v pameti.
Poradi mi nekdo
Diky Pavel ZIDEK
Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
http://www.kopr(tec)cz/w-delphi.htm http://www.kopr(tec)cz
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~RichEdit a formatovani MessageDlg
[*] sup(zv)svitap(tec)cz - 13.4.2000 9:16:00
> Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
> Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a tento
> soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu
> pridat
> na konec souboru.
>
Coz takhle pouzit skryty pomocny RichEditPom, tam nacist soubor 'report.rtf'
a pak v cyklu pridat obsah RichEdit1 a ulozit:
RichEditPom.Lines.LoadFromFile('report.rtf');
for i:=0 to RichEdit1.Lines.count-1 do
RichEditPom.Lines.Add(RichEdit1.Lines[i]);
RichEditPom.Lines.SaveToFile('report.rtf');
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Zatuhnuti Delphi pri startu aplikace
[*] Ren� Otisk - 13.4.2000 09:17:31
Hi,
Mno, mam D3 C/S, W95, IE5 a jezdim co to da. Nebude treba ve volani nejake
funkce ze shelapi?
Sroub
Jak se zda tak problem se zatuhnutim Delphi pri spusteni aplikace jsi jiz
vyresil instalaci W2K, presto bych ale rad prispel svou zkusenosti. Narazil
jsem na tentyz problem u jedne sve aplikace. Protoze jsem, pokud mozno,
potreboval zachovat stavajici konfiguraci PC (D3 C/S,W95 IE5), zkousel jsem
r�zn� varianty a zjistil nasledujici:
Nefungujici konfig. :
D3 C/S, Win95 IE5;
D3 C/S, Win98;
D4 C/S, Win95 IE5;
Funguje :
D3 C/S, Win95 IE4 a nizsi;
Pravdepodobne dochazi k nejake nestastne kombinaci komponent pouzivajicich
COMCTL32.DLL.
Radek
ODBCe - UNICODE
[*] Ren� Otisk - 13.4.2000 09:21:22
Hi,
Asi by se ti nechtelo vracet i k D3, ze?
Sroub
> "Vypustil" som novu verziu ODBCe. Uz plne podporuje UNICODE. Zatial stale
> iba D4... zial, D5 nemam.
> http://www.sct.sk/~fule/ODBCe/ODBCe.zip
>
> L.
> Interbase a omezeni poctu radek vysledku
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 13.4.2000 09:31:53
Haj hou!
From: <delphi(zv)htkpro(tec)cz>
> Nevite nekdo existuje nejaky ekvivalent funkce rownum v Interbase, nebo
> nejaka jina moznost jak lze omezit pocet radek sql dotazu (jeste pred
> aplikaci order by).
Bohuzel, omezit pocet radek vstupujicich do order by v IB nelze (zatim).
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
NVarchar a MSSQL - 2
[*] Lubo Fule <fule(zv)sct.sk> - 13.4.2000 09:34:47
Ak Ti staci pristup cez ODBC (ktore je v pripade MSSQL o nieco rychlejsie
ako ADO), tak mozes pouzit komponenty ODBCe, ktore su pre D4 a unicode
podporuju.
http://www.sct.sk/~fule/ODBCe/ODBCe.zip
> Takze nezbude, nez investovat do D5 (+ Zbyskovy OLE DB komponenty) nebo do
> Adonisu, ze?
>
OleContainer a Word
[*] Ren� Otisk - 13.4.2000 09:48:07
Hi,
Ad1. Mrkni na Group Index u TMenuItem
Ad2. Resil jsem presne ten samy problem a nakonec jsem to vzdal... Kdybys na neco prisel, vzpomen si na mne.
Sroub
Pomozte mi prosim nekdo.
Potrebuji pouzivat Word jako editor ve sve aplikaci.
Pouzil jsem OleContainer, ale neustale narazim na dva problemy:
1. pri aktivaci Wordu v OleContaineru zmizi menu Soubor a vsechny prikazy, ktere obsahuje jsou nedostupne.
2. pri aktivaci Wordu samostatne (samostatne okno) nedokazu zjistit, kdy uzivatel dokument ulozi, abych jej mohl ulozit do databaze
dekuji za radu pripadne nejaky zdroj informaci o teto problematice
Pavel Bares
Atoll s.r.o.FAXovanie
[*] Filip <delphi007(zv)angelfire(tec)com> - 13.4.2000 01:09:49 -0700
Zdar!
Ja se taky pripojim. Ja resim faxovani a mailovani pres takovou vybornou utilitku - FAX2000. Je to vlastne FAX/print driver, takze kdyz chce uzivatel faxovat, tak si jednoduse vybere misto tiskarny fax2000 a je to.
---
Filip, student
On Thu, 13 Apr 2000 02:02:48 L. ZITA wrote:
>Behalf Of Pavol Kakahka
>
>> > :Da se na to jit i z druhe strany. Vyzaduje to ovsem aby MS
>> Exchange nebo
>> > Outlook (nakonfigurovan} jako "Podnikova nebo pracovnm skupina") byl tez
>> > nastaven jako "SIMPLE KLIENT MAPI". Tento pozadavek je pomerne casto
>> splnen.
>> > Pak muzes pomoci fce MapiSendMail poslat fax jako e-mail a to tak, ze
>> misto
>> > mailove adresy das FAX:faxove_cislo.
>> > Ma to vyhodu, ze se da pouzit k odeslani i e-mail.
>>
>> Vyzera to zaujimavo a ako to ide nastavit?
>
>Mrkni se v defaultnim projectu Delphi "Win 95 logo application"
>(File->New->Project...) na
>funkci v menu File->Send
>
>
>>
>> A co ak ma niekto Netscape, ... ?
>
>Nevadi. Muze ho pouzivat ale ty vyse popsanym zpusobem neodesles mail a ani
>pres nej nepujdou odesilat maily
>z "defaultnich" windowsackych aplikaci (napr WordPad) pomoci
>Soubor->Odeslat, nebo pomoci ShellExecute - mailto.
>
>Proste a jednoduse : MS Fax je "neci" sluzba (MS Exchange ze zakladni
>instalace W95, na W98 je take ale musi se doinstalovat z CD, nebo Outluuk
>95,97,2000). To "neco" musi byt nainstalovano a nastaveno jako "SIMPLE
>MAPI", se
>vsemi dusledky, ktere z toho plynou. Ty pak pomoci teto zpravove sluzby
>muzes odesilat faxy a pokud je u toho "neceho" i nainstalovana sluzba na
>odeslilani e-mailu tak i e-maily.
>
>Ludek
>---
>Odchozm zprava neobsahuje viry.
>Zkontrolovano antivirov}m systimem AVG (http://www.grisoft(tec)cz).
>Verze: 6.0.129 / Virova baze: 61 - datum vydanm: 3.3.2000
>
>
Angelfire for your free web-based e-mail. http://www.angelfire.com
RichEdit
[*] Pavel Hampl <phampl(zv)chmi(tec)cz> - 13.4.2000 08:11:02
Nazdar,
nestaci ten soubor predem proste smazat prikazy "assignfile" a "erase"?
Pavel Hampl
Zapl�k wrote:
>
> >> Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
> >> Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a
> tento
> >> soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu
> >> pridat
> >> na konec souboru.
> >>
> >A co tak urobit to "rucne", teda otvorit si dany subor a
> >zapisat tam text z RichEditu?
>
> >/LH
>
> Jenze Soubor RTF ma urcitou strukturu a pokud tam vlozim jen holy text, tak
> tu strukturu
> poskodim. Ne?
>
> Martin Zapletal
> zaplik(zv)volny(tec)cz
rychlost Paradoxu po siti
[*] Filip <delphi007(zv)angelfire(tec)com> - 13.4.2000 01:20:36 -0700
Zdar!
Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to de. Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
---
Filip, student
Angelfire for your free web-based e-mail. http://www.angelfire.com
Kopirovani adresare do adresare
[*] Ivo HERR <ih(zv)safar(tec)cz> - 13.4.2000 10:23:33
Zdravim!
Potrebuji udelat prekopirovani obsahu jednoho adresare do druheho. Nebyl
by problem to udelat "ruuuco soubor po souboru", ale rikam si, ze je to
problem celkem asi bezny, takze by nekde mohla existovat nejaka sikovna
komponenta, ci tak neco. Nevite nekdo?
Diky
Ivo
TTreeView.OnCustomDrawItem
[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 13.4.2000 10:28:33
Ahoj,
potreboval bych predefinovat vykreslovani polozky stromu.
Bohuzel v udalosti OnCustomDrawItem neni informace o mistu,
ktere polozka zabira (jako Rect u TListBox.OnDrawItem).
Konecnym cilem je vzhled a chovani jako ma napr. Delphi4.Project Manager.
Diky za pomoc.
S pozdravem
Miloslav Skacel
skacel(zv)stereo(tec)cz
www.stereo(tec)cz
Debuging stredni vrstvy pouzivajici MTS
[*] Vodicka, David (CAP, GCF) <David.Vodicka(zv)gecapital(tec)com> - 13.4.2000 10:31:34
Zdravim,
nemate nekdo fintu, jak elegantne debugovat aplikacni server (stredni vrstvu
MIDASu) ktera je zalozena na TMtsDataModule?
V helpu se pise o remote debugging (to se mi moc nedari), ale zaroven se tam
doporucuji nejdrive si vse odladit mimo prostredi samotneho MTS. To si
predstavuju asi tak, ze misto vytvareni dll urcene k zabudovani do MTS
prilepim jadro serveru k vlastni aplikaci a ladim. Poradte, je to ten
spravny smer, nebo existuje neco lepsiho.
David Vodicka
AssignFile nebo OpenFile?
[*] RadekD <rd(zv)zbrojovka(tec)com> - 13.4.2000 10:32:13
Ahoj,
mam nasledujici problem. Potrebuju napsat programek, ktery si otevre dva soubory
a zjisti si velikosti obou a pak ten kratsi soubor doplni znaky # o tolik, aby
velikosti souboru byly shodne. Jedna se prakticky o textove soubory...
Plati ze:
SOUBOR1 je vzdy mensi (tudiz to je ten doplnovany) nez SOUBOR2
Jenomze problem je v tom, ze NEKDY ten SOUBOR1 konci CR+LF a nekdy ne. A ja
potrebuji ty znaky zacit doplnovat vzdy na novy radek. Takze napred by muselo
predchazet zjisteni, zda SOUBOR1 ma na konci ono CR+LF A dale - nekdy je rozdil
velikosti mezi obema soubory treba i 1200byte a nechci, aby ty # byly na jednom
radku. Tudiz by se to muselo vzdy po, rekneme 64, znacich # zalomit (cili CR+LF)
na novy radek.
Poradi mi nekdo aspon heslovite krok-po-kroku? Ani nevim, zda je vhodnejsi
pouzit metodu AssignFile ci OpenFile. Lze vubec doplnovat soubor? Nebudu muset
otevrit jeste treti soubor, do ktereho zkopiruju obsah SOUBOR1 + pridam urcity
pocet znaku # ?
Byl bych kazdemu velice vdecen za nejake priklady nebo odkazy, protoze jsem
zacatecnik (puvodne jsem neco bastlil ve Visual Basicu)...
Diky
--------------------
Radek Danek
rd(zv)zbrojovka.com
neziaduce odstrankovanie...
[*] Delphi konf. <delkonf(zv)frdsa.fri.utc.sk> - 13.4.2000 10:45:47
Zdravim,
nevie mi niekto poradit, ako zabranim automatickemu odstrankovaniu pri
tlaceni na ihlickovu tlaciaren, ak este nie je uplne zaplnena stranka ?
Aj ked vytlacim len 1 znak, aj tak to odstankuje a A4 je vonku....
Tlacim na LX-400, D4/D5, WIN95:
AssignPrn(f);
Rewrite(f);
writeln(f,'abcdef.....');
....
CloseFile(f);
Mam nastaveny font 'Draft 10cpi'.
Este jedna vec: Da sa nejako dosiahnut, aby tlaciaren tlacila 'Condensed' ?
Taky font sice nie je v Printer.Fonts, ale tlaciren ho podporuje (cez ESC
sekvenciu). Ak ju poslem na tlaciaren (ci uz priamo na LPT, alebo cez
AssignPrn), kasle na mna a tlaci neCondensed.
diky moc
Marian Koncelik
FAXovanie
[*] Pavol Kakacka <paka(zv)aktis(tec)cz> - 13.4.2000 10:53:10
| Zdar!
| Ja se taky pripojim. Ja resim faxovani a mailovani pres takovou vybornou
utilitku - FAX2000. Je to vlastne FAX/print driver, takze kdyz chce uzivatel
faxovat, tak si jednoduse vybere misto tiskarny fax2000 a je to.
:) A kde sa to da zohnat, skus o tom napisat viac.
btw: Diky vsem zinteresovanym za pomoc!
Pavol Kakacka
paka(zv)aktis(tec)cz
Interbase a omezeni poctu radek vysledku
[*] Tom =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 13.4.2000 11:33:51
Pavel Cisar wrote:
>
> From: <delphi(zv)htkpro(tec)cz>
> > Nevite nekdo existuje nejaky ekvivalent funkce rownum v Interbase, nebo
> > nejaka jina moznost jak lze omezit pocet radek sql dotazu (jeste pred
> > aplikaci order by).
>
> Bohuzel, omezit pocet radek vstupujicich do order by v IB nelze (zatim).
pomoci specialniho pouziti generatoru lze ...
pri zahajeni session vytvorit generator s unikatnim jmenem (unikatnim v
ramci vsech existujicich pripojeni k databazi, pripojim-li se pod jednim
uzivatelskym jmenem k databazi 3x, musi se i tak vytvorit 3 ruzne
generatory - generatory totiz nejsou nijak ovlivnene urovni izolace
transakci a pri stejnem nazvu generatoru by vysledky neodpovidaly
ocekavani :-) )
create generator TEMPGEN;
/* takhle se vybere 20 zaznamu */
set generator TEMPGEN to 0;
select *
from dodav
where (gen_id(TEMPGEN, 1) <= 20);
/* takhle se vyberou zaznamy 51-100 */
set generator TEMPGEN to 0;
select *
from dodav
where (gen_id(TEMPGEN, 1) >= 51) and (gen_id(TEMPGEN, 0) < 100);
pri ukonceni session pak provest
delete from RDB$GENERATORS where RDB$GENERATOR_NAME = 'TEMPGEN';
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
FAXovanie
[*] Filip <delphi007(zv)angelfire(tec)com> - 13.4.2000 03:16:07 -0700
Zkus se mrknout na www.fax2000.com Tam je trial verze, tak si to stahni a mrkni se, esli ti to vyhovuje. Maj tam ted i nejakou novou verzi 3, ja pouzivam 2.5 a sem spokojenej
---
Filip, student
On Thu, 13 Apr 2000 10:53:10 Pavol Kakacka wrote:
>| Zdar!
>| Ja se taky pripojim. Ja resim faxovani a mailovani pres takovou vybornou
>utilitku - FAX2000. Je to vlastne FAX/print driver, takze kdyz chce uzivatel
>faxovat, tak si jednoduse vybere misto tiskarny fax2000 a je to.
>
>:) A kde sa to da zohnat, skus o tom napisat viac.
>
>btw: Diky vsem zinteresovanym za pomoc!
>
>Pavol Kakacka
>paka(zv)aktis(tec)cz
>
>
>
Angelfire for your free web-based e-mail. http://www.angelfire.com
rychlost Paradoxu po siti
[*] Ren� Otisk - 13.4.2000 12:24:59
Hi,
Pred nekolika mesici jsem po 3 letech prace s Paradoxem (25 stanic) utekl k
MS SQL serveru a castecne k Intebase a krom toho, ze mi odpadlo BDE, coz s
jeho omezenimi me casto dohnalo zcela k beznadeji, se zvysila rychlost,
stabilita (odpadly ruzne pdoxuser.net a ruzne .lck soubory) i zabezpeceni...
Lec uznavam, ze Paradox je zadarmo. A na 4 stanicich by se to snad dalo...
Hlavne si v TSession nastav pracovni adresar, netdir u kazde aplikace
zvlast. Mel jsem asi 6 programku, ktere jsem nechal, aby si vyzuzlaly net
dir z BDE, pak jsem je predelal (TSession.NetDir jsem nastavil do tech
prislusnych adresaru) a bylo to o necem jinem. Jinak spousta o tomto tematu
je tady v konferenci
Sroub
----- Original Message -----
From: Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 13, 2000 12:40 PM
Subject: Re: rychlost Paradoxu po siti
> > Zdar!
> > Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je
umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen > ---
> > Filip, student
> >
> >
> >
> Mame 10 Mb NetWare sit a na ni aplikaci pod PDX tabulkama (je jich
> radove desitky), zaznamu v tabulkach je do tisicu, uzivatelu narazove
> okolo 20 a vse funguje celkem rychle. Tisky provadime jednak primo
> nad tabulkamni (i master detail) nebo nad SQL (vse pres BDE) a
> pochopitelne pak to zavisi na slozitosti dotazu resp. dalsim
> zpracovani pred tiskem. Otazkou je take ovsem, co je rycle a co
> pomale. Normalni prima editace neprojevuje ale zadne prodlevy.
>
> Milan Dvorak
> dvorak(zv)gymzn(tec)cz
rychlost Paradoxu po siti
[*] Ji�� Fait���}���6���3 - 13.4.2000 12:34:39
Pro tu prisernou pomalost pri praci v siti jsem byl nucen Paradox opustit.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Filip
Sent: Thursday, April 13, 2000 10:21 AM
To: delphi-l(zv)fwd(tec)cz
Subject: rychlost Paradoxu po siti
Zdar!
Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou malou
sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch
asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to de.
Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je
potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
---
Filip, student
Angelfire for your free web-based e-mail. http://www.angelfire.com
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
FAXovanie
[*] Ji�� Fait���}���6���3 - 13.4.2000 12:35:19
Taky se pripojuji k dotazu Kde se to da sehnat?
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Pavol
Kakacka
Sent: Thursday, April 13, 2000 10:53 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: FAXovanie
| Zdar!
| Ja se taky pripojim. Ja resim faxovani a mailovani pres takovou vybornou
utilitku - FAX2000. Je to vlastne FAX/print driver, takze kdyz chce uzivatel
faxovat, tak si jednoduse vybere misto tiskarny fax2000 a je to.
:) A kde sa to da zohnat, skus o tom napisat viac.
btw: Diky vsem zinteresovanym za pomoc!
Pavol Kakacka
paka(zv)aktis(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
rychlost Paradoxu po siti
[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 13.4.2000 11:40:51
> Zdar!
> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen > ---
> Filip, student
>
>
>
Mame 10 Mb NetWare sit a na ni aplikaci pod PDX tabulkama (je jich
radove desitky), zaznamu v tabulkach je do tisicu, uzivatelu narazove
okolo 20 a vse funguje celkem rychle. Tisky provadime jednak primo
nad tabulkamni (i master detail) nebo nad SQL (vse pres BDE) a
pochopitelne pak to zavisi na slozitosti dotazu resp. dalsim
zpracovani pred tiskem. Otazkou je take ovsem, co je rycle a co
pomale. Normalni prima editace neprojevuje ale zadne prodlevy.
Milan Dvorak
dvorak(zv)gymzn(tec)cz
RichText
[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 13.4.2000 12:40:40
--=======38141FFB=======
Content-Type: text/plain; charset=us-ascii; format=flowed; x-avg-checked=avg-ok-48F6320E
Ahojte,
nemate nekdo napad, jak prekonvertovat RichText do prosteho text nebo
jeste lepe do html?
Dik
Honza Fiala
--=======38141FFB=======
Content-Type: text/plain; charset=us-ascii; x-avg-checked=avg-ok-48F6320E
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.127 / Virov� b�ze: 60 - datum vyd�n�: 21.2.2000
--=======38141FFB=======--
Kopirovani adresare do adresare
[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 13.4.2000 11:50:07
> Zdravim!
>
> Potrebuji udelat prekopirovani obsahu jednoho adresare do druheho. Nebyl
> by problem to udelat "ruuuco soubor po souboru", ale rikam si, ze je to
> problem celkem asi bezny, takze by nekde mohla existovat nejaka sikovna
> komponenta, ci tak neco. Nevite nekdo?
>
> Diky
> Ivo
>
>
Takovou sikovnou komponentku si muzes urcite najit na webu, kdyz
nechaz vyhledavat FileOper, nebo ti ji mohu poslat.
Milan Dvorak
dvorak(zv)gymzn(tec)cz
INNO SETUP
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 13.4.2000 12:56:06
Zdravim,
neupravoval jste si nekdo INNO SETUP tak, aby slo na zacatku instalace
vybrat jazykovou verzi instalace?==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
==============================================
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
rychlost Paradoxu po siti
[*] Jiri Toman <toman(zv)plbohnice(tec)cz> - 13.4.2000 13:01:35
Filip p�e:
> Zdar!
> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to de. Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
Podivej se jestli nemas nastaveny PrivDir na server disk.
Jirka
>
> ---
> Filip, student
>
> Angelfire for your free web-based e-mail. http://www.angelfire.com
NVarchar a MSSQL - 2
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 13:19:15
On 13 Apr 00, at 7:08, Ren� Otisk wrote:
> Takze nezbude, nez investovat do D5 (+ Zbyskovy OLE DB komponenty)
> nebo do Adonisu, ze?
Moje OLE DB komponenty by (po drobounke uprave DPK a
nekterych DFM) mely fungovat i v D4, a Adonis pokud vim, take.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Jak udelat: Nacteni dotazu a editace vysledku jen
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 13:19:15
On 12 Apr 00, at 18:34, Erik Salaj wrote:
> > > V ADO by sa zisla nejaka priama podpora pre batch operacie,
> > > mozno sa snad objavi v buducich verziach.
> >
> > :-) Pokud chces vsechny moznosti, ktere nabizi OLE DB, tak
> > pouzij primo OLE DB. ADO nech VBasikarum.:-)
>
> Poskytuje OLE DB batch operacie?
Mas na mysli tohle:
SQLOLEDB recognizes the semicolon character as a batch delimiter for
SQL statements, as in the following example:
WCHAR* wSQLString = L"SELECT * FROM Categories; "
L"SELECT * FROM Products";
Sending multiple SQL statements in one batch is more efficient than
executing each SQL statement separately. Sending one batch reduces the
number of network round-trips from the client to the server.
nebo treba tohle?
IRowsetFastLoad Rowsets
SQLOLEDB bulk-copy rowsets are write-only but expose interfaces that
allow the consumer to determine the structure of a Microsoft� SQL
Server� table. The following interfaces are exposed on a bulk-
copy�enabled SQLOLEDB rowset:
.....
SSPROP_FASTLOADOPTIONS
Column: No
R/W: Read/write
Type: VT_BSTR
Default: none
Description: This property is same as the -h �hint[,...n]� option of the bcp
utility. The following string(s) can be used as option(s) to be used in the bulk
copying of data into a table.
ORDER(column[ASC | DESC][,...n])
Sort order of data in the data file. Bulk-copy performance is improved if the
data file being loaded is sorted according to the clustered index on the table.
ROWS_PER_BATCH = bb
Number of rows of data per batch (as bb). The server optimizes the bulk
load according to the value bb. By default, ROWS_PER_BATCH is
unknown.
KILOBYTES_PER_BATCH = cc
Number of kilobytes (KB) of data per batch (as cc). By default,
KILOBYTES_PER_BATCH is unknown.
TABLOCK
A table-level lock is acquired for the duration of the bulk-copy operation.
This option significantly improves performance because holding a lock only
for the duration of the bulk-copy operation reduces lock contention on the
table. A table can be loaded by multiple clients concurrently if the table has
no indexes and TABLOCK is specified. By default, the locking behavior is
determined by the table option table lock on bulk load.
CHECK_CONSTRAINTS
Any constraints on table_name are checked during the bulk-copy
operation. By default, constraints are ignored.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Re[2]: Duplicita klicu, Key - Violation
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 13:19:15
On 12 Apr 00, at 22:54, Delph! wrote:
> ZH> U SQL databaze byva obvykle nejlepsi reseni poslat data pres
> ZH> ulozenou proceduru a zkontrolovat navratovou hodnotu, jak to ZH>
> dopadlo. ... mozes uviest nejaky konkretny priklad ako to vlastne
> riesit cez tu ulozenu proceduru ? (Interbase)
MS SQL :-) (v Interbase se kvuli tomuto prikladku stourat nebudu,
to ti snad poradi nekdo jiny)
CREATE PROCEDURE rc_upd
(zv)id uniqueidentifier,
(zv)name nvarchar(30),
(zv)cdat datetime
AS
IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
rc_id=(zv)id)
RETURN 2
ELSE
IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
rc_id=(zv)id and rc_cdat=(zv)cdat)
RETURN 1
ELSE
UPDATE reader_circuit SET
rc_name=(zv)name,
rc_cdat=GETDATE()
WHERE rc_id=(zv)id
Kde RETURN vrati hodnotu, kterou si prevezmu. MS SQL si pro
toto vyhrazuje prvni parametr, v Interbase to bude IMHO fungovat
obdobne, mozna si vsak budes muset ten parametr nadefinovat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
RichEdit-nacteni souboru
[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 13.4.2000 13:24:05
P.Vones wrote
>napriklad WordPad to otvira o trochu rychleji. Podobne chovani by v Delphi
>mohlo jit udelat takto:
>uses
> RichEdit;
>procedure TForm1.Button1Click(Sender: TObject);
>var
> EventMask: DWORD;
>begin
> EventMask := SendMessage(RichEdit1.Handle, EM_GETEVENTMASK, 0, 0);
> SendMessage(RichEdit1.Handle, EM_SETEVENTMASK, 0, EventMask and not
(ENM_REQUESTRESIZE) );
> RichEdit1.Lines.LoadFromFile('excel2000.pas');
>end;
Ahoj
Uvedeny priklad funguje perfektne, ale v pripade jednoho souboru
se mi nezobrazi horizontalni scrollbar (jestlize mam nastaveno WordWrap =
False)
a nejde ani scrolovat horizontalne kurzorem - zastavi se na konci radku
- u WordPadu je v pripade toho souboru stejna chyba, dalo by se to snad
resit
prepnutim WordWrap na True a zase zpatky, u WordPadu tato operace probehne
prakticky okamzite, ale pokud pouziju volani RichEdit.WordWrap:= True, trva
to
nekolik sekund.
Lze toto prepnuti provest rychleji, nebo jinak nastavit korektni zobrazeni
horizontalniho
scrollbaru ?
Diky za kazdou odpoved.
Z.Fryz
__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.
RxLib 2.75 a Delphi 4
[*] radvansky(zv)stereo(tec)cz <kastner(zv)infos(tec)cz> - 13.4.2000 13:28:03
Zdravim,
tusi nekdo proc, kdyz instaluji posledni verzi RX lib 2.75 do Delphi 4
standart SP 2 tak se mi
nenainstaluji databazove komponenty?
Instaluji podle postupu v instalaci, delphi oznami, ze probehlo vsechno OK
nicmene neobjevi se paleta s DB komponentami. Ostatni komponenty jsou OK
Dekuji za odpoved.
Martin Radvansky
radvansky(zv)stereo(tec)cz
Duplicita klicu, Key - Violation
[*] Michal Kus <kus(zv)tangosw(tec)cz> - 13.4.2000 13:31:42
> -----Original Message-----
> Behalf Of Zbysek Hlinka
>
> Povazuji za vhodne zasadne se vyhybat prime editaci na "zivymi"
> daty, to jest, nepouzivat zadne DB komponenty pro _editaci_
> (DBGrid, DBEdit, ...) v pripade, ze jsou pripojene primo k databazi.
>
> Za vhodnejsi povazuji postup, kdy si data editujes nekde mimo a o
> komunikaci s databazi se zacnes starat az v okamziku, kdy ji
> chces poslat data. Dalsi postup je pak silne zavisly na tom, zda
Proc je lepsi neprimy pristup?
V cem je primy vstup spatny?
ing. Michal Kus
TANGO software s.r.o.
pokladni systemy pro restaurace a obchody
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz
rychlost Paradoxu po siti
[*] Ji�� Kr�l jr. - 13.4.2000 13:36:18
3 roky nam funguje podnikovy IS na Novelli siti 4.11, 20 stalych klientu, dB
ma asi 45 MB, 60 tabulek.
Ted to prepisuju pro MS SQL, cim vice se blizi termin prechodu, tim
spolehlivejsi a rychlejsi je Pdox.
SQL 7 moc nevynikne. ;-))
Ztrata dat nas potrefila 1x kdyz chcipla UPS u serveru, par tabulek to
nerozchodilo. A data za 15 hodin. Zadna pohroma.
Cili muj verdikt zni: levne a docela pouzitelne reseni. Ale: zalohovat
zalohovat zalohovat aspon co 6 hodin, automaticky
JK
RichText
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 13.4.2000 14:09:22
> nemate nekdo napad, jak prekonvertovat RichText do
> prosteho text nebo jeste lepe do html?
No jednoduse. Otevru v TRicheditu, prepnu PlainText na true a ulozim.
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
D4 vs D5
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 13.4.2000 14:13:41
Ahoj,
mam moznost vzit D4 Ent. nebo D5 Prof. za stejnou cenu. Pravda je, ze Ent.
verzi az tak moc nepotrebuju. Na to, co delam mi staci Prof. Kdo znate obe
verze, ma smysl vzit, v porovnani uzitne hodnoty obou, misto D5P D4E?
Za odpoved dekuji.
Honza.
rychlost Paradoxu po siti
[*] Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz> - 13.4.2000 14:24:06
Slab�, Petr (Pilsen), 13.04.2000 14:14:24
Ahoj,
dobra rada je vsude kde to jde pouzit SetRange. Nevim, jestli ti to pomuze v tve aplikaci, ale nas to v jedne aplikaci zachranilo. Uz si nevzpominam na presne udaje, ale query "SELECT * WHERE JMENO LIKE 'R%'" trvala v databazi s 10.000 udaji v nasi siti asi 2 minuty 30, zatimco odpovidajici SetRange('R', 'R`') trvala 2 sekundy. Ta divna znacka ve druhem parametru SetRange je zpetny apostrof, ktery jsme vyhodnotily jako nejvhodnejsi znak, vetsi nez vsechna pouzivana pismena abecedy.
Best regards,
PS.
========================================================================Softwarova firma se zahranicni ucasti a sidlem v Plzni hleda programatory Delphi, C++ a Java. Znalost nemciny nebo anglictiny podminkou. Vice o nas na www.kadel(tec)cz, pripadne se ozvete na kadelds(zv)kadel(tec)cz.
znovu RichEdit
[*] Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz> - 13.4.2000 15:19:45
Ahoj,
ja bych podobny problem resil pres TMemoryStream:
var
Stream: TMemoryStream;
Data: String;
begin
Stream := TMemoryStream.Create;
RichEdit1.Lines.SaveToStream(Stream);
Data := String(Stream.Memory);
{ Nyni otevrit soubor pro append
a pridat tam Data}
...
end;
Nacitani do RichEditu by se provadelo obdobne pres stream.
Jaroslav Sipek
e-mail: jaroslav.sipek(zv)idea(tec)cz
> -----P�vodn� zpr�va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
> Zapl�k
> Odesl�no: 12. dubna 2000 16:42
> Komu: Delphi Konference
> P�edm�t: znovu RichEdit
>
>
> Pratele.
>
> Takze jeste jednou. Soubor RTF bych rad pouzival pro moznou
> rozmanitost a
> barevnost a prehlednost textu,proto vsechno cpu prez
> RichEdit. Jenze, pokud
> obsah RichEditu chci ulozit ve formatu RTF, pomoci SaveToFile
> tak existujici
> soubor do ktereho chci lajny pridat se prepise. Mohl bych jit
> tak jak nekdo
> radil ze si lajny z RE kopnu do treba Mema a tam to uz je
> jednoduche, ale
> tim ztratim veskere formatovani. Jak tedy pridavat do
> existujiciho RTF aniz
> bych musel
> tento soubor obstastnovat za znalosti jeho struktury. Je na
> to snad nejaka
> fce nebo co?
>
> Dik kazde chytre hlavicce
>
> Zaplik
> zaplik(zv)volny(tec)cz
>
RichText
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 13.4.2000 15:43:21
Ad Prosty text : nastav si vlastnost PlainText na true
Ad prevod do HTML : Dal jsem do altavisty nasledujici
vyhledavaci kriterium "rtf2html AND delphi" a naslo se
65 stranek, z toho nekolikrat Torry, chce to jen nebyt
liny...
D.
> ----------
> Od: Honza Fiala[SMTP:kvasar(zv)kvasar(tec)cz]
>
> nemate nekdo napad, jak prekonvertovat RichText do prosteho
> text nebo jeste lepe do html?
>
> OT: Rozliseni
[*] kolarpe(zv)atlas(tec)cz - 13.4.2000 15:44:27
Ahoj,
jsem zatecnik v Delphi, tak se vam bude zdat ma otazka primitivni. Predem se omlouvam
Chtel bych vedet jak pro aplikaci v Delphi zmenit rozliseni na obrazovce ve fullscreenu
(napriklad pro prohlizec obrazku)
Dik Petr
neziaduce odstrankovanie...
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 13.4.2000 15:49:00
Zkus tohle:
Procedure DirectPrint(s : String);
var
PTBlock : TPassThroughData;
Begin
PTBlock.nLen := Length(s);
StrPCopy((zv)PTBlock.Data,s);
Escape(Printer.Handle, PASSTHROUGH,0,(zv)PTBlock,nil);
end;
tahle procedura ti umozni posilat escape sekvence primo na tiskarnu...
----- P�vodn� zpr�va -----
Od: Delphi konf. <delkonf(zv)frdsa.fri.utc.sk>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 13. dubna 2000 10:45
P�edm�t: neziaduce odstrankovanie...> Zdravim,
> nevie mi niekto poradit, ako zabranim automatickemu odstrankovaniu pri
> tlaceni na ihlickovu tlaciaren, ak este nie je uplne zaplnena stranka ?
> Aj ked vytlacim len 1 znak, aj tak to odstankuje a A4 je vonku....
>
> Tlacim na LX-400, D4/D5, WIN95:
>
> AssignPrn(f);
> Rewrite(f);
> writeln(f,'abcdef.....');
> ....
> CloseFile(f);
>
> Mam nastaveny font 'Draft 10cpi'.
>
> Este jedna vec: Da sa nejako dosiahnut, aby tlaciaren tlacila 'Condensed' ?
> Taky font sice nie je v Printer.Fonts, ale tlaciren ho podporuje (cez ESC
> sekvenciu). Ak ju poslem na tlaciaren (ci uz priamo na LPT, alebo cez
> AssignPrn), kasle na mna a tlaci neCondensed.
>
> diky moc
>
> Marian Koncelik
>UpdateSQL
[*] olej.jozef(zv)slsp.sk - 13.4.2000 16:49:33
Dakujem, pomohlo.
Vlozit a zmazat zaznam funguje. Problem mam ale z update, vzdy mi vyhlasi
"Update Failed"
Neviete niekto v com je problem?
Jozef
> -----Original Message-----
> From: Radek KALA [SMTP:Kala(zv)atlas(tec)cz]
> Sent: 12. apr�l 2000 14:12
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: UpdateSQL
>
> Parametry nepredavas, musis u TQuery nadefinovat UpdateObject
> jako TUpdateSQL a pak se chovas k TQuery stejne jako TTable
> tzn. pouzivas .Edit, .Post, .Append atd.
> v TUpdateSQL napises vsechny SQL prikazy pro insert, delete i
> update napr. takto insert ->
> insert into tablename
> (klic, hodnota1, hodnota2)
> VALUES
> (:klic, :hodnota1, :hodnota2)
>
> delete ->
> delete from tablename
> where klic = :old_klic
>
> update ->
> update tablename set
> klic = :klic,
> hodnota1 = :hodnota1,
> hodnota2 = :hodnota2
> where
> klic = :old_klic
>
> Staci ????????????????????????????????
>
> >
> > Ahoj,
> >
> > V D3 mam TQuery->TDataSource->TDBEdit a chcem volzit novy zazam a
> opravit
> > existujuci.
> > Skusil som zadefinovat SQL v UpdateSQL ale neviem ako vyvolat prislusny
> SQL
> > a predat parametre.
> >
> > Dakujem.
> >
> > Jozo
>
>
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Cerneho 58/60, 635 00
> tlf. : + 420 5 4622 3491
> fax : + 420 5 4622 3470
> GSM : + 420 603 85 75 15
SQL dotaz na dve MS Access database
[*] David Patocka <dpatocka(zv)scholler(tec)cz> - 13.4.2000 17:01:21
Zdravim vsechny.
Chtel bych udelat dotaz na dve tabulky, ale tyto tabulky jsou ve dvou MS Access
DB. Kdyz pouziji pred jmeno tabulky i nazev DB, napr. "SELECT * FROM DB1.Jmena"
, pak Query hleda dannou DB v lokalnim adresari. Nevite jak zadat do Query,
resp. do SQL dotazu, cestu k DB?
Dekiji David
dpatocka(zv)scholler(tec)cz
rychlost Paradoxu po siti
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 17:21:13
On 13 Apr 00, at 1:20, Filip wrote:
> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
> malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je
> umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou
> tabulkou - to de. Tabulky sou ale master/detail a dyz se ma tisknout
> sestava, ke kery je potreba pracovat se vsem tabulkama, tak to trva
> nechutne dlouho.. --- Filip, student
Mam - a natolik spatne, ze si silne oddechnu, az vsichni
paradoxovi zakaznici upgraduji na novou verzi programu. Pro
takovehle male nasazeni by ti melo vyborne vyhovovat MSDE nebo
IB 6.
No a pak uz bude jen zalezet na tom, jak udelas navrh datovych
toku - tim lze take hodne ovlivnit.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OLE DB 0.600
[*] Jiri Hostinsky <hostinsky(zv)teska(tec)cz> - 13.4.2000 17:52:54
----- Original Message -----
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> DPK pro D4 jsem vyhodil, protoze se mi nechce ho udrzovat. Lze
> pouzit dpk pro D5, ovsem je treba upravit sekce requires (nahradit
> 50 za 40) a contains, v D4 je tam lehce jina syntaxe.
>
> Nevidim duvod, proc by registrace nesly nainstalovat, kdyz tak by
> to chtelo vypsat chybove hlasky, ktere Delphi vraci. Ale myslim, ze
> to bude souviset se spravnym zapisem dpk.
>
> Jeste neco - pri nejakych pokusech se mi tam vloudilo vcldb50, to
> tam nepatri.
>
Take jsem zkusil nainstalovat OLE DB na D4, take marne.
Vymenil jsem v DPK verze, ale skoncil jsem na chybe prekladu v ODBFLD -
nezna TEditAction. Podstrcil jsem mu zdrojak, ale ohlasil mi, ze deklarace
se lisi. Mam nadeji, ze na muzealnim rok a pul starem Delfinovi neco udelam,
aniz bych Te nutil vracet se do hrobu ?
Jiri Hostinsky
hostinsky(zv)teska(tec)cz
Seznam MS-SQL serveru
[*] Erik Salaj <winsoft(zv)napri.sk> - 13.4.2000 17:53:56
> Kde najdu knihovnu SQLDMO?
SQLDMO je sucastou MS SQL 7 (asi aj MSDE ale nie som si isty).
Zvol v Delphi menu Project/Import Type Library a vyber Microsoft
SQLDMO Object Library (najlepsie v D3 alebo D4; D5 je tak "vylepsene",
ze je rozumnejsie ho nepouzit).
Erik
Duplicita klicu, Key - Violation
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.4.2000 18:16:03
On 13 Apr 00, at 13:31, Michal Kus wrote:
> > Povazuji za vhodne zasadne se vyhybat prime editaci na "zivymi"
> > daty, to jest, nepouzivat zadne DB komponenty pro _editaci_ (DBGrid,
> > DBEdit, ...) v pripade, ze jsou pripojene primo k databazi.
> >
> > Za vhodnejsi povazuji postup, kdy si data editujes nekde mimo a o
> > komunikaci s databazi se zacnes starat az v okamziku, kdy ji chces
> > poslat data. Dalsi postup je pak silne zavisly na tom, zda
>
> Proc je lepsi neprimy pristup?
> V cem je primy vstup spatny?
Nedavno se to tady mohutne rozebiralo...
Tedy ve zkratce. Pokud si smudlas neco na lokale nad souborovou
databazi, pak je to jedno. Pokud vsak pracujes na siti, je treba
dodrzovat urcita pravidla, aby dochazelo k minimu kolizi. A ta se
nejlepe dodrzuji tehdy, kdyz posilas zmeny az v okamziku, kdy je
poslat potrebujes. U SQL databazi je proto vhodnejsi pouzivat pro
zmeny dat ulozenych procedur (lepe se tak osetruje integrita dat),
a to samo o sobe vylucuje tzv. primou editaci (typu Table.Edit, ...
Table.Post). V pripade potreby lze pracovat nad temporary
tabulkou (zde v zasade lze primo editovat), a vysledek pak opet
pomoci ulozenych procedur nastrkat do databaze.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Nativni komponenty pro Access
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 13.4.2000 18:49:24
Jakou verzi MS Jet Engine mas nainstalovanou?
Mac
----- Original Message -----
From: "Kejval" <petr.kejval(zv)worldonline(tec)cz>> Na databazi jsem se napojil, ale pri pokusu o zmenu zaznamu nebo pridani
> zaznamu mi vyskakuje nasledujici chyba:
> Hlavni chyba SQL
> [Microsoft][ODBC Access Jednotkar]Jet error-1003 returned
>
> Kdyz se obdobnym zpusobem na tutez databazi pripojim z D4, ale pres ODBC32
> je vse vporadku.NVarchar a MSSQL - 2
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 13.4.2000 18:51:56
No a nebo pristupovat pres ADO primo z Delphi (Import Type Library), ale je
to pakarna ;-)
Mac
P.S. Adonis je nepletu-li se pro D3+
----- Original Message -----
From: "Ren� Otisk" <otisk(zv)misel(tec)cz>
> Takze nezbude, nez investovat do D5 (+ Zbyskovy OLE DB komponenty) nebo do
> Adonisu, ze?
Posouvani neceho mysi
[*] Tom� Mi�kovsk�����)"��ޮ�� - 13.4.2000 19:24:19
Zdravim, a mam asi velice trivialni problem, nicmene jsem zacatecnick...
Potreboval bych kousek kodu, kterym bych mohl volne posouvat mysi Image po
Formu... Mam ten pocit, ze stejnym zpusobem by se asi posouvalo cokoli,
nejen Image.
Najde se nekdo kdo by poradil, nejak jsem v helpu nic podobneho nenasel.
Predem diky za kazdy posun sparvnym smerem.
Miki
Timer - nepresnost
[*] Gadourek <gadourek(zv)centrum(tec)cz> - 13.4.2000 20:38:08
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj,
Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem timer.interval na (1/25)*1000 = 40msek a pri udalosti OnTimer obsluhuji seriovy port, vyrazne se, ale rozesel cas.
Zkousel jsem si udelat jednoduchy program s timer.interval=100 (a 200), ktery zobrazuje cas v OnTimer, ale i tady se cas rozesel i kdyz podstatne mene.
Je casova nepresnost TTimeru dana jeho minimalnim casem, nebo neco delam spatne ja?
Diky Petr
Duplicita klicu, Key - Violation
[*] Robert Kindl <rob(zv)exec(tec)cz> - 13.4.2000 22:14:58
> > ZH> U SQL databaze byva obvykle nejlepsi reseni poslat data pres
> > ZH> ulozenou proceduru a zkontrolovat navratovou hodnotu, jak to ZH>
> > dopadlo. ... mozes uviest nejaky konkretny priklad ako to vlastne
> > riesit cez tu ulozenu proceduru ? (Interbase)
>
> MS SQL :-) (v Interbase se kvuli tomuto prikladku stourat nebudu,
> to ti snad poradi nekdo jiny)
>
> CREATE PROCEDURE rc_upd
> (zv)id uniqueidentifier,
> (zv)name nvarchar(30),
> (zv)cdat datetime
> AS
> IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
> rc_id=(zv)id)
> RETURN 2
> ELSE
> IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
> rc_id=(zv)id and rc_cdat=(zv)cdat)
> RETURN 1
> ELSE
> UPDATE reader_circuit SET
> rc_name=(zv)name,
> rc_cdat=GETDATE()
> WHERE rc_id=(zv)id
>
> Kde RETURN vrati hodnotu, kterou si prevezmu. MS SQL si pro
> toto vyhrazuje prvni parametr, v Interbase to bude IMHO fungovat
> obdobne, mozna si vsak budes muset ten parametr nadefinovat.
> Zbysek Hlinka
No nezlob se, ale tohle radis jako spravne chovani?
Co myslis, ze to dela?!
1) nebylo by vhodnejsi pouzivat misto datetime polozku typu timestamp?
datetime ma na MSSQL7.0 presnost 3.33ms (jedna 30tina sekundy).
Ne ze bych chtel precenovat rychlost SQL serveru,
ale podle mne je nekdy schopen provadet transakce rychleji nez
30 za sekundu...
Naproti tomu timestamp je by design primo urceny na zaznam zmeny recordu.
2) Co kdyz v konkurencnim procesu "B" nekdo provede totez?
A jako napotvoru to SQL server provede v poradi
"B" SELECT
"A" SELECT
"B" nebo "A" chce provest UPDATE, ale to nejde
nebot druhy proces ma na radce SHARE LOCK z prikazu SELECT!!!!
Takze deadlock jak vysity
3) Puvodni otazka znela jak osetrit pokus o vlozeni duplicitniho klice
Pokud bych tedy v tve ukazce misto UPDATE mel INSERT:
IF EXIST SELECT
RETURN 1
ELSE
INSERT
nehlidalo by to spravne, nebot pokud konkurencni proces vlozi
stejny (duplicitni) klic prave mezi mym selectem a mym insertem tak
stejne dojde k exception...
Takze by jsi si Zbysku mel laskave nastudovat ty nejzakladnejsi
zaklady databazove problematiky nez tady budes radit nesmysly
a jeste rikat jak ty dodrzuje "urcita pravidla" (viz. tvuj
soubezny mail ve stejnem threadu).
Treba zkus nejake skoleni, ale dej si pozor aby jsi nebyl zaroven
lektorem :-)
Rob
PS.
Reseni otazky jiz tu nekdo posilal.
Prikaz INSERT dam do try except bloku a pokud dojde
ke vyjimce "insert duplicate key" (sorry cislo z hlavy nevim)
tak vygeneruji jiny klic a zkusim to znovu.
Celkem dobra strategie pokud zajistim aby
konkurencni proces vygeneroval s velkou pravdepodobnosti
jiny klic nez ja (napr. nahodny).
PPS.
Delal jsem test na MSSQL7 vkladani inkrementalniho klice a nahodnych klicu
a pomer rychlosti byl 1:4 ve prospech inkrementalniho klice.
Nahodne klice tedy snizuji vykon, ale nikoliv kvuli zcela vyjimecne nutnosti
opakovani insertu (generovane klice jsem mel zarucene unikatni).
Duvodem je zrejme clusterovany index na primarnim klici.
Takze je lepsi pouzit napr. identitu nebo metodu Hi-Lo...
Posouvani neceho mysi
[*] Lauko �tefan <lauko(zv)salamon.sk> - 13.4.2000 22:28:50
Dobry,
je tu componenta uz neviem odkial ju mam, sprava sa ako Delphi pri editacii formov. Je mozne menit velkost a umiestnenie cohokolvek na forme.
Staci tento kod:
procedure TForm1.Image1Click(Sender: TObject);
begin
StretchHandle1.Attach(Image1);
end;
Ak by mal niekto zaujem nech sa ozve na moj sukromny mail. lauko(zv)salamon.sk .
(velkost 7Kb).
S pozdravom. Lauko. ----- Original Message -----
From: Tom� Mi�kovsk�
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, April 13, 2000 7:24 PM
Subject: Posouvani neceho mysi
Zdravim, a mam asi velice trivialni problem, nicmene jsem zacatecnick...
Potreboval bych kousek kodu, kterym bych mohl volne posouvat mysi Image po Formu... Mam ten pocit, ze stejnym zpusobem by se asi posouvalo cokoli, nejen Image.
Najde se nekdo kdo by poradil, nejak jsem v helpu nic podobneho nenasel.
Predem diky za kazdy posun sparvnym smerem.
Miki
Jak udelat: Nacteni dotazu a editace vysledku jen
[*] Erik Salaj <winsoft(zv)napri.sk> - 13.4.2000 22:37:20
> Mas na mysli tohle:
> SQLOLEDB recognizes the semicolon character as a batch delimiter for
> SQL statements, as in the following example:
> WCHAR* wSQLString = L"SELECT * FROM Categories; "
> L"SELECT * FROM Products";
> Sending multiple SQL statements in one batch is more efficient than
> executing each SQL statement separately. Sending one batch reduces the
> number of network round-trips from the client to the server.
Toto by malo byt riesitelne pomocou storovanej procedury, takze
v tom problem nevidim. Je este otazne, ci je to aplikovatelne
obecne (na rozne OLE DB providery), pretoze sa spomina
iba SQLOLEDB.
> nebo treba tohle?
> IRowsetFastLoad Rowsets
> SQLOLEDB bulk-copy rowsets are write-only but expose interfaces that
> allow the consumer to determine the structure of a Microsoft� SQL
> Server� table. The following interfaces are exposed on a bulk-
> copy�enabled SQLOLEDB rowset:
To by nebolo zle, az na to, ze IRowsetFastLoad funguje iba s SQLOLEDB
providerom (cize s MS SQL serverom). Problem vidim skor v tom,
ked je potrebna povedzme konverzia dat (na MS SQL to ide urobit
pomocou DTS), alebo pristup k viacerym datovym zdrojom kde
nemozem napisat povedzme storovanu proceduru na batch spracovanie.
Vtedy by bolo vyhodne mat moznost povedzme jednym prikazom
co najrychlejsie skopirovat recordset z jedneho datoveho zdroja do druheho.
Erik Salaj
Timer - nepresnost
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.4.2000 23:08:19
From: Gadourek <gadourek(zv)centrum(tec)cz>
> Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
> Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem timer.interval na
> (1/25)*1000 = 40msek a pri udalosti OnTimer obsluhuji seriovy port, vyrazne
> se, ale rozesel cas.
Ahoj,
Windows jsou viceulohovy operacni system a tedy nelze dost dobre na urovni
aplikace (ale vicemene i jadra) provozovat aplikace s nejakou velkou casovou
presnosti. Timer zarucuje pouze to, ze zprava neprijde *drive* nez bylo
zadano. Muze ale klidne prijit treba az za 10ti nasobek nastaveneho casu.
Zprava WM_TIMER je jednoduse vlozena do fronty zprav a ceka na vyrizeni.
Mirne (ale jen nepatrne) vetsi presnosti muzes dosahnout pouzitim threadu
a funkce Sleep. Samozrejme pokud budes z threadu volat nejaky kod VCL pres
metodu Synchronize (coz je nutne) tak si opet prilis nepomuzes, protoze
synchronizace je realizovana pres frontu zprav.
Pokud ti jde o pouziti pocitace k nejakemu mereni, tak je lepsi toto udelat
za pomoci externiho HW a pocitacem uz jen zpracovavat vysledky.
Petr Vones, amatersky programator
TTreeView.OnCustomDrawItem
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.4.2000 23:14:33
From: Miloslav Sk�cel <kastner(zv)infos(tec)cz>
> potreboval bych predefinovat vykreslovani polozky stromu.
> Bohuzel v udalosti OnCustomDrawItem neni informace o mistu,
> ktere polozka zabira (jako Rect u TListBox.OnDrawItem).
> Konecnym cilem je vzhled a chovani jako ma napr. Delphi4.Project Manager.
> Diky za pomoc.
Ahoj,
Pokud chces jen zmenit font u te polozky, tak to neni treba provadet
pomoci vlastniho vykreslovani, ale lze to takhle:
procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Node.Level = 0 then
Sender.Canvas.Font.Style := [fsBold];
end;
Jestli ale trvas na zjisteni rozmeru dane polozky, tak pouzij metodu
TTreeNode.DisplayRect
Petr Vones, amatersky programator
Prenos udajov.
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 13.4.2000 23:50:09
Zdravim.
Poradte mi prosim, ako by som najjednoduhsie vyriesil prenos udajov z IB do
IB, ale riesenie posielania cez zalohu IB nie je podla mna najefektivnejsie
z toho dovodu, ze budem prenasat iba tie tabulky (nie je presne dane ze
ktore, ale podla momentalnej potreby), ktore potrebujem a nie vsetky data.
Rozmyslal som nad prenosom pomocou Paradox tabulkiek, ale uz celu aplikaciu
som prerobil na pouzitie bez BDE a nechcem to zase pouzit, ALE CO?
Alebo, ze by bolo predsa len riesenie cez IB, ale vytvorit len databazu s
potrebnymi tabulkami, bez triggerov, indexov, checkerov,generatorov,...
proste len data a poslat len zalohu. Ale tu je dalsia otazka: Ako ziskam
definiciu tabulky, tak ako to robi DBExplorer, alebo IBConsole ?
Za vsetky napady a rady dakujem.
Roland.Duplicita klicu, Key - Violation
[*] Erik Salaj <winsoft(zv)napri.sk> - 13.4.2000 23:56:04
> Prikaz INSERT dam do try except bloku a pokud dojde
> ke vyjimce "insert duplicate key" (sorry cislo z hlavy nevim)
> tak vygeneruji jiny klic a zkusim to znovu.
> Celkem dobra strategie pokud zajistim aby
> konkurencni proces vygeneroval s velkou pravdepodobnosti
> jiny klic nez ja (napr. nahodny).
Nebolo by vyhodnejsie pouzitie autoinkrementacnej polozky
a generovanie jej hodnot ponechat na SQL server?
Erik
rychlost Paradoxu po siti
[*] Jaro <jaro(zv)sinea(tec)cz> - 13.4.2000 21:01:24 -0700
Ja jsem je opustil ani ne tak pro rychlost jako pro nespolehlivost.
Jaro
> Pro tu prisernou pomalost pri praci v siti jsem byl nucen Paradox opustit.
>
> Zdar!
> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
malou
> sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch
> asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to de.
> Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je
> potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
> ---
> Filip, student
>
NVarchar a MSSQL - 2
[*] Ren� Otisk - 14.4.2000 06:06:09
Hi,
Ale droubounka asi nebude uprava pro D3.
Sroub
On 13 Apr 00, at 7:08, Ren� Otisk wrote:
> Takze nezbude, nez investovat do D5 (+ Zbyskovy OLE DB komponenty)
> nebo do Adonisu, ze?
Moje OLE DB komponenty by (po drobounke uprave DPK a
nekterych DFM) mely fungovat i v D4, a Adonis pokud vim, take.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
SQL dotaz na dve MS Access database
[*] Ji�� Fait���}���6���3 - 14.4.2000 06:26:27
Napriklad takto:
select * from tabulka in "h:\mdbs\databaze.mdb"
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Patocka
Sent: Thursday, April 13, 2000 5:01 PM
To: delphi-l(zv)fwd(tec)cz
Subject: SQL dotaz na dve MS Access database
Zdravim vsechny.
Chtel bych udelat dotaz na dve tabulky, ale tyto tabulky jsou ve dvou MS
Access
DB. Kdyz pouziji pred jmeno tabulky i nazev DB, napr. "SELECT * FROM
DB1.Jmena"
, pak Query hleda dannou DB v lokalnim adresari. Nevite jak zadat do Query,
resp. do SQL dotazu, cestu k DB?
Dekiji David
dpatocka(zv)scholler(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
D4 vs D5
[*] Ji�� Fait���}���6���3 - 14.4.2000 06:30:38
JEDNOZNACNE D5!!!!!
D4 bylo dost naho...
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Jan Naiser
Sent: Thursday, April 13, 2000 2:14 PM
To: Delphi konference
Subject: D4 vs D5
Ahoj,
mam moznost vzit D4 Ent. nebo D5 Prof. za stejnou cenu. Pravda je, ze Ent.
verzi az tak moc nepotrebuju. Na to, co delam mi staci Prof. Kdo znate obe
verze, ma smysl vzit, v porovnani uzitne hodnoty obou, misto D5P D4E?
Za odpoved dekuji.
Honza.
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
D4 vs D5
[*] petr.palicka(zv)atlas(tec)cz - 14.4.2000 06:44:14
ahoj,
ja osobne si myslim, ze D5 je skutecne lepsi nez D4
a je tam dost novych veci...
ve verzi ENT oproti PROF jsou zase zdrojaky VCL
a lsi podpora SQL (no, nevim)...
ale je tam navic midas jestli se nepletu
takze jestli nepotrebujes enterprise, tak si porid D5prof
a pokud je to legalni, muzes vzdycky upgradovat...
dekuji peca
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[ smtp: petr.palicka(zv)atlas(tec)cz ]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> mam moznost vzit D4 Ent. nebo D5 Prof. za stejnou cenu.
> Pravda je, ze Ent.
> verzi az tak moc nepotrebuju. Na to, co delam mi staci Prof.
> Kdo znate obe verze, ma smysl vzit, v porovnani
> uzitne hodnoty obou, misto D5P D4E?znovu RichEdit
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 14.4.2000 07:02:51
> Takze jeste jednou. Soubor RTF bych rad pouzival pro moznou rozmanitost a
> barevnost a prehlednost textu,proto vsechno cpu prez RichEdit. Jenze,
> pokud
> obsah RichEditu chci ulozit ve formatu RTF, pomoci SaveToFile tak
> existujici
> soubor do ktereho chci lajny pridat se prepise. Mohl bych jit tak jak
> nekdo
> radil ze si lajny z RE kopnu do treba Mema a tam to uz je jednoduche, ale
> tim ztratim veskere formatovani. Jak tedy pridavat do existujiciho RTF
> aniz
> bych musel
> tento soubor obstastnovat za znalosti jeho struktury. Je na to snad nejaka
> fce nebo co?
>
Ahoj !
Vsak ti uz niekto napisal, ze najjednoduchsie by bolo umiestnit na
formular
druhy hidden RichEdit, Text zo suboru don nacitat, potom
prikopirovat
text z prveho RichEditu a cele to ulozit.
/LH
OLE DB 0.600
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.4.2000 07:42:59
On 13 Apr 00, at 17:52, Jiri Hostinsky wrote:
> > DPK pro D4 jsem vyhodil, protoze se mi nechce ho udrzovat. Lze
> > pouzit dpk pro D5, ovsem je treba upravit sekce requires (nahradit
> > 50 za 40) a contains, v D4 je tam lehce jina syntaxe.
> >
> > Nevidim duvod, proc by registrace nesly nainstalovat, kdyz tak by to
> > chtelo vypsat chybove hlasky, ktere Delphi vraci. Ale myslim, ze to
> > bude souviset se spravnym zapisem dpk.
> >
> > Jeste neco - pri nejakych pokusech se mi tam vloudilo vcldb50, to
> > tam nepatri.
> >
> Take jsem zkusil nainstalovat OLE DB na D4, take marne.
> Vymenil jsem v DPK verze, ale skoncil jsem na chybe prekladu v ODBFLD
> - nezna TEditAction. Podstrcil jsem mu zdrojak, ale ohlasil mi, ze
> deklarace se lisi. Mam nadeji, ze na muzealnim rok a pul starem
> Delfinovi neco udelam, aniz bych Te nutil vracet se do hrobu ?
D4 se mi urcite instalovat nechce. TEditAction by mel znat,
protoze predek dane tridy (TDesignWindow) tento typ zna i v D4
(podival jsem se aspon na zdrojaky na CD). Pokud si s tim trochu
pohrajes, myslim ze nadeje tu je, protoze od D4 k D5 jsem vrtal
predevsim uvnitr svych trid a pridal jsem Grid.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
SQL dotaz na dve MS Access database
[*] David Patocka <dpatocka(zv)scholler(tec)cz> - 14.4.2000 08:21:17
Takhle to take jde, ale jen za predpokladu, ze mas vsechny pouzite tabulky v
jedne DB. Ja mam ale problem, ze pouzivam dve tabulky z ruznych DB.
PRIKLAD:
select T1.*, T2.* from DB1.T1, DB2.T2
No a to je ten problem. Zjistil jsem, ze cestu pred DB mohu napsat, ale
neporadim si v Query s jmenem disku. Jestlize pouziji napr. D:\DB1.T1, pak se
vse za dvouteckou do mezery povazuje za parameter. Takze muj dotaz je:
Jak pristupovat k ruznym tabulkam v ruznych DB v jednom Query?
David
dpatocka(zv)scholler(tec)cz
Ji�� Fait <fait(zv)jakl(tec)cz> na 14.04.2000 06:26:27
Odpov
�zte pros�m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie:
P�edm�t: RE: SQL dotaz na dve MS Access database
Napriklad takto:
select * from tabulka in "h:\mdbs\databaze.mdb"
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Patocka
Sent: Thursday, April 13, 2000 5:01 PM
To: delphi-l(zv)fwd(tec)cz
Subject: SQL dotaz na dve MS Access database
Zdravim vsechny.
Chtel bych udelat dotaz na dve tabulky, ale tyto tabulky jsou ve dvou MS
Access
DB. Kdyz pouziji pred jmeno tabulky i nazev DB, napr. "SELECT * FROM
DB1.Jmena"
, pak Query hleda dannou DB v lokalnim adresari. Nevite jak zadat do Query,
resp. do SQL dotazu, cestu k DB?
Dekiji David
dpatocka(zv)scholler(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
TPicture a Ole picture
[*] Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz> - 14.4.2000 08:22:29
Ahoj,
nemate nekdo zkusenosti s procedurami SetOlePicture a GetOlePicture.
Pokud mam na formulari TImage a prevedu ho na OlePicture a zpet,
tak se mi obrazek zmensi.
uses
....., AxCtrls, ActiveX;
var
OlePicture: IPictureDisp;
begin
Image1.Picture.LoadFromFile(FileName);
GetOlePicture(Image1.Picture, OlePicture);
SetOlePicture(Image1.Picture, OlePicture);
end;
Win2000, D5 prof.
Jaroslav Sipek
e-mail: jaroslav.sipek(zv)idea(tec)cz
CAPI
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 14.4.2000 08:27:01
Cauec,
nema nekdo zkusenosti s programovanim CAPI (ISDN) ?
Bye Ludan
D4 vs D5
[*] Karel Kral <kral(zv)purus(tec)cz> - 14.4.2000 08:46:36
Pokud nepotrebujes Enterprise tak jednoznacne D5. D4 nechutne pada, moc
se s nim neda pracovat.
Jan Naiser wrote:
>
> Ahoj,
>
> mam moznost vzit D4 Ent. nebo D5 Prof. za stejnou cenu. Pravda je, ze Ent.
> verzi az tak moc nepotrebuju. Na to, co delam mi staci Prof. Kdo znate obe
> verze, ma smysl vzit, v porovnani uzitne hodnoty obou, misto D5P D4E?
>
> Za odpoved dekuji.
>
> Honza.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
SQL dotaz na dve MS Access database
[*] Tomas Burger <slune(zv)yahoo(tec)com> - 13.4.2000 23:49:58 -0700 (pdt)
> -----Original Message-----
> Subject: SQL dotaz na dve MS Access database
> Chtel bych udelat dotaz na dve tabulky, ale tyto tabulky jsou ve dvou MS
> Access DB. Kdyz pouziji pred jmeno tabulky i nazev DB
Uplne jine reseni: co takhle vytvorit si v tom jednom Accessu link na tabulku v
tom druhem... Pak se to bude lokalne tvarit jako jedna databaze, i kdyz to
budou dve....
Tomas
=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/
__________________________________________________
Do You Yahoo!?
Send online invitations with Yahoo! Invites.
http://invites.yahoo.com
znovu RichEdit
[*] Zapl�k���ͪe�?�Y��̿ - 14.4.2000 09:19:49
To jsem zkousel, ale ztratil se typ pisma a vsechen text je potom stejnym
stylem.
e-mail : zaplik(zv)volny(tec)cz
Interbase a omezeni poctu radek vysledku
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 14.4.2000 09:28:12
From: "Tom Michal�k" <michalik(zv)proca(tec)cz>
> pomoci specialniho pouziti generatoru lze ...
:o))) Genialni trik
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
znovu RichEdit
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 14.4.2000 09:36:12
A co ti br�n� v tom si ten puvodni RTF soubor nacist do RichEditu a pak
pridavat pomoci Add... ?
----- P�vodn� zpr�va -----
Od: Zapl�k <zaplik(zv)volny(tec)cz>
Komu: Delphi Konference <delphi-l(zv)fwd(tec)cz>
Odesl�no: 12. dubna 2000 16:41
P�edm�t: znovu RichEdit
> Pratele.
>
> Takze jeste jednou. Soubor RTF bych rad pouzival pro moznou rozmanitost a
> barevnost a prehlednost textu,proto vsechno cpu prez RichEdit. Jenze, pokud
> obsah RichEditu chci ulozit ve formatu RTF, pomoci SaveToFile tak existujici
> soubor do ktereho chci lajny pridat se prepise. Mohl bych jit tak jak nekdo
> radil ze si lajny z RE kopnu do treba Mema a tam to uz je jednoduche, ale
> tim ztratim veskere formatovani. Jak tedy pridavat do existujiciho RTF aniz
> bych musel
> tento soubor obstastnovat za znalosti jeho struktury. Je na to snad nejaka
> fce nebo co?
>
> Dik kazde chytre hlavicce
>
> Zaplik
> zaplik(zv)volny(tec)cz
>
>
>Interbase a omezeni poctu radek vysledku
[*] Tom =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 14.4.2000 10:03:39
Ahoj,
Pavel Cisar wrote:
>
> From: "Tom Michal�k" <michalik(zv)proca(tec)cz>
> > pomoci specialniho pouziti generatoru lze ...
>
> :o))) Genialni trik
souhlasim, bohuzel neni z me hlavy :-(
cetl jsem to pred casem nekde v newsech
S pozdravem,
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Nativni komponenty pro Access
[*] Kejval <petr.kejval(zv)worldonline(tec)cz> - 14.4.2000 10:06:42
Verze pouzivanych DLL knihoven:
ODBCJT16.DLL 23.11.94 verze 01.00.15.21
ODBCINST.DLL 07.12.94 verze 2.10.2401
ODBCTL16.DLL 23.11.94 verze 01.00.15.30
MSAJT200.DLL 20.11.94 verze 2.50.1606
MSJETERR.DLL 20.11.94 verze 2.50.1108
MSJETINT.DLL 23.11.94 verze 2.50.1108
Petr Kejval
----- P�vodn� zpr�va -----
Od: Martin Kubecka <martin.kubecka(zv)amenit(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 13. dubna 2000 18:49
P�edm�t: Re: Nativni komponenty pro Access
> Jakou verzi MS Jet Engine mas nainstalovanou?
>
> Mac
>
> ----- Original Message -----
> From: "Kejval" <petr.kejval(zv)worldonline(tec)cz>
>
> > Na databazi jsem se napojil, ale pri pokusu o zmenu zaznamu nebo pridani
> > zaznamu mi vyskakuje nasledujici chyba:
> > Hlavni chyba SQL
> > [Microsoft][ODBC Access Jednotkar]Jet error-1003 returned
> >
> > Kdyz se obdobnym zpusobem na tutez databazi pripojim z D4, ale pres
ODBC32
> > je vse vporadku.
>
>
SQL dotaz na dve MS Access database
[*] David Patocka <dpatocka(zv)scholler(tec)cz> - 14.4.2000 10:10:30
Taky reseni, ALE. Bohuzel tyto DB vytvari software druhe strany a kazdy den je
maze a vytvari znovu. Takze jakykoliv link bych musel kazdy den vytvaret znovu.
A to je takove nic moc! Leda si vytvaret danny link pri spusteni Delphi
programu, ale to uz vubec nevim jak!
David
dpatocka(zv)scholler(tec)cz
Tomas Burger <slune(zv)yahoo.com> na 14.04.2000 08:49:58
Odpov�zte pros�m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie:
P�edm�t: RE: SQL dotaz na dve MS Access database
> -----Original Message-----
> Subject: SQL dotaz na dve MS Access database
> Chtel bych udelat dotaz na dve tabulky, ale tyto tabulky jsou ve dvou MS
> Access DB. Kdyz pouziji pred jmeno tabulky i nazev DB
Uplne jine reseni: co takhle vytvorit si v tom jednom Accessu link na tabulku v
tom druhem... Pak se to bude lokalne tvarit jako jedna databaze, i kdyz to
budou dve....
Tomas
=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/
__________________________________________________
Do You Yahoo!?
Send online invitations with Yahoo! Invites.
http://invites.yahoo.com
Timer - nepresnost
[*] bures <bures(zv)ssakhk(tec)cz> - 14.4.2000 10:53:06
Ahoj nevim jestli ti to pomuze, ale mohl bys sledovat cas (funguje ve win9x) od startu windows ktery si windows
kazdou milisekundu zvysi. Udajne by wokna podle tohoto casu meli radit vsechny operace. Zjistis ho pomoci winapi
var
cas: dword;
begin
GetTickCount(cas)
end;
Vlada
----- Original Message -----
From: Gadourek
To: Konference Delphi
Sent: Thursday, April 13, 2000 8:38 PM
Subject: Timer - nepresnost
Ahoj,
Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem timer.interval na (1/25)*1000 = 40msek a pri udalosti OnTimer obsluhuji seriovy port, vyrazne se, ale rozesel cas.
Zkousel jsem si udelat jednoduchy program s timer.interval=100 (a 200), ktery zobrazuje cas v OnTimer, ale i tady se cas rozesel i kdyz podstatne mene.
Je casova nepresnost TTimeru dana jeho minimalnim casem, nebo neco delam spatne ja?
Diky Petr
rychlost Paradoxu po siti
[*] Filip <delphi007(zv)angelfire(tec)com> - 14.4.2000 02:19:08 -0700
Ja jsem zatim na nespolehlivost nenarazil(chodi to uz pres 2 mesice), ale ta rychlost je opravdu strasna!
Co byste mi tedy doporucili?? Je to jen takova mini sit bez vyhrazenyho serveru.(4 stanice a na jedny z nich sou DB) Potrebuju ale zachovat pouzitelnost toho radoby serveru na obycejnou praci treba v Officech...
---
Filip, student
On Thu, 13 Apr 2000 21:01:24 Jaro wrote:
>Ja jsem je opustil ani ne tak pro rychlost jako pro nespolehlivost.
>Jaro
>
>
>> Pro tu prisernou pomalost pri praci v siti jsem byl nucen Paradox opustit.
>>
>>
>> Zdar!
>> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
>malou
>> sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je umistenejch
>> asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to de.
>> Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je
>> potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
>> ---
>> Filip, student
>>
>
>
Angelfire for your free web-based e-mail. http://www.angelfire.com
OT:MSSQL7
[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 14.4.2000 11:20:10
ahoj nevite nekdo proc me aplikace hlasi obcas (mame MSSQL7): DBProcess is
not enabled or dead ? Podle vseho to je nejspis chyba nekde v MSSQL a ne v
aplikaci protoze nam to hlasi ruzne programy. Nevite nekdo jak to odstranit
?
diky
Timer - nepresnost
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 14.4.2000 11:27:20
Ahoj,
tohle neni uplne presne, udelal jsem maly pokus (WinNT, PII/350) a zda se,
ze inkrement GetTickCount je priblizne 10 ms, na W9x jsem to nezkousel.
Zkousel jsem to takhle:
procedure TMainF.Button2Click(Sender: TObject);
var
MS, MS1 : integer;
begin
MS := GetTickCount;
MS1 := GetTickCount;
while MS = MS1 do
begin
MS1 := GetTickCount;
end;
L1.Caption := IntToStr(MS1-MS);
end;
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz <mailto:jiri.f(zv)avizo(tec)cz>
-----P�vodn� zpr�va-----
Od: bures [mailto:bures(zv)ssakhk(tec)cz]
Odesl�no: 14. dubna 2000 10:53
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Timer - nepresnost
Ahoj nevim jestli ti to pomuze, ale mohl bys sledovat cas (funguje ve win9x)
od startu windows ktery si windows
kazdou milisekundu zvysi. Udajne by wokna podle tohoto casu meli radit
vsechny operace. Zjistis ho pomoci winapi
var
cas: dword;
begin
GetTickCount(cas)
end;
Vlada
----- Original Message -----
From: Gadourek <mailto:gadourek(zv)centrum(tec)cz>
To: Konference Delphi <mailto:delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 13, 2000 8:38 PM
Subject: Timer - nepresnost
Ahoj,
Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem timer.interval na
(1/25)*1000 = 40msek a pri udalosti OnTimer obsluhuji seriovy port, vyrazne
se, ale rozesel cas.
Zkousel jsem si udelat jednoduchy program s timer.interval=100 (a 200),
ktery zobrazuje cas v OnTimer, ale i tady se cas rozesel i kdyz podstatne
mene.
Je casova nepresnost TTimeru dana jeho minimalnim casem, nebo neco delam
spatne ja?
Diky Petr
Duplicita klicu, Key - Violation
[*] Robert Kindl <rob(zv)exec(tec)cz> - 14.4.2000 11:43:42
> > Prikaz INSERT dam do try except bloku a pokud dojde
> > ke vyjimce "insert duplicate key" (sorry cislo z hlavy nevim)
> > tak vygeneruji jiny klic a zkusim to znovu.
> > Celkem dobra strategie pokud zajistim aby
> > konkurencni proces vygeneroval s velkou pravdepodobnosti
> > jiny klic nez ja (napr. nahodny).
>
> Nebolo by vyhodnejsie pouzitie autoinkrementacnej polozky
> a generovanie jej hodnot ponechat na SQL server?
> Erik
Bylo
Vsak jsem to take v tom samem mailu napsal,
ale pak tezko dojde k insert duplicate key, ze
(pokud pominu, ze napr. MSSQL zacne znovu od 1
nebo, ze BDE obcas misto UPDATE zavola INSERT).
Rob
rychlost Paradoxu po siti
[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 14.4.2000 12:01:49
Zkus vic popsat (priklad) toho co te trapi. Rychlost by u Paradoxu na
takoveto siti skutecne nemala byt problemem.
Je potreba aby jsi rekl nastaveni a verze BDE na jednotlivych strojich,
strukturu tabulek a zpusob jakym delas ten tisk nebo co je tak pomale.
Pavel
----- Original Message -----
> Ja jsem zatim na nespolehlivost nenarazil(chodi to uz pres 2 mesice), ale
ta rychlost je opravdu strasna!
> Co byste mi tedy doporucili?? Je to jen takova mini sit bez vyhrazenyho
serveru.(4 stanice a na jedny z nich sou DB) Potrebuju ale zachovat
pouzitelnost toho radoby serveru na obycejnou praci treba v Officech...
Componenta pre posun "cohokolvek"
[*] Lauko �tefan <lauko(zv)salamon.sk> - 14.4.2000 12:03:35
[P��loha v souboru: Cmp-d4.zip]
Dobry den,
prepacte mi tu prilohu ale myslim, ze to nezvladnem doteraz sa ozvalo cca 50 ludi.
Funguje pod D4 a D5 (pravdepodobne aj pod D2 a D3).
Pisatelia na moj e-mail nech mi prepacia.
S pozdravom Lauko.ArcSin
[*] Lubos Dusanic <lubos(zv)iname(tec)com> - 14.4.2000 12:04:07
ahoj,
nemate niekto zdanie, preco funkcia %subj% vracia tu istu hodnotu, ako jej
parameter a nie spravnu hodnotu (t.j. arcsin(0.788)=0.788) ???
lubos dusanic
Nativni pristup k MS SQL z Delphi 5
[*] Pavel �ern� - 14.4.2000 12:17:05
Zdravim delphisty databazisty,
pokousim se pristupovat k SQL databazi WinBase pres komponenty WDE od pana Turcana. Primo, bez BDE a bez ODBC.
Existuje nejaka takova cesta i pro MS SQL server ?
A pokud ano, jakou cestou ? Staci Delphi 5 Profesional ?
Nejake externi komponenty ?
Diky za kazdou odpoved.
Pavel �ern�
email: pavel(zv)cerny-ps(tec)cz
tel: 0616/25268
Timer - nepresnost
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 14.4.2000 12:17:37
Ahoj,
doporucoval bych zkusit pouzit jinou komponentu nez Timer ze zalozky system.
Napriklad HiResTimer, jehoz kmitocet je okolo 1ms. V�bezne aplikaci pri
nastaveni Interval=1 a Resolution=1 dokaze zhruba 980 tiku za sekundu. Pokud
by jsi ho chtel vyzkouset, napis a ja ti poslu zdrojak.
S�pozdravem Pavel Koukal.
-----P�vodn� zpr�va-----
Od: Gadourek [SMTP:gadourek(zv)centrum(tec)cz]
Ahoj,
�
Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
�
Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem
timer.interval na (1/25)*1000 = 40msek a�pri udalosti OnTimer obsluhuji
seriovy port, vyrazne se,�ale�rozesel cas.
Zkousel jsem si udelat jednoduchy program s� timer.interval=100 (a
200), ktery zobrazuje cas v OnTimer, ale i tady�se�cas rozesel i kdyz
podstatne mene.
�
Je casova nepresnost�TTimeru dana jeho minimalnim casem, nebo neco
delam spatne ja?
�
Diky Petr
Timer - nepresnost
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 14.4.2000 12:32:27
Timer je dobry ale presnost tak 0.5-1.5 sekundy, pokud potrebujes
neco presneji tak si musis napsat driver.
Existuje nejaka komponenta presnejsiho timeru ale i tam
nepresnost neni lepsi nez cca 50 ms.
V oknech je to proste tragedie.
>
> Ahoj nevim jestli ti to pomuze, ale mohl bys sledovat cas (funguje ve =
> win9x) od startu windows ktery si windows=20
> kazdou milisekundu zvysi. Udajne by wokna podle tohoto casu meli radit =
> vsechny operace. Zjistis ho pomoci winapi=20
> var=20
> cas: dword;
> begin
> GetTickCount(cas) =20
> end;
>
> Vlada
>
>
> ----- Original Message -----=20
> From: Gadourek=20
> To: Konference Delphi=20
> Sent: Thursday, April 13, 2000 8:38 PM
> Subject: Timer - nepresnost
>
>
> Ahoj,
>
> Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
>
> Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem =
> timer.interval na (1/25)*1000 =3D 40msek a pri udalosti OnTimer =
> obsluhuji seriovy port, vyrazne se, ale rozesel cas.
> Zkousel jsem si udelat jednoduchy program s timer.interval=3D100 (a =
> 200), ktery zobrazuje cas v OnTimer, ale i tady se cas rozesel i kdyz =
> podstatne mene.
>
> Je casova nepresnost TTimeru dana jeho minimalnim casem, nebo neco =
> delam spatne ja?
>
> Diky Petr
>
> ------=_NextPart_000_0022_01BFA5FF.9D599300
> Content-Type: text/html;
> charset="iso-8859-2"
> Content-Transfer-Encoding: quoted-printable
>
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
> <HTML><HEAD>
> <META content=3D"text/html; charset=3Diso-8859-2" =
> http-equiv=3DContent-Type>
> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR>
> <STYLE></STYLE>
> </HEAD>
> <BODY bgColor=3D#ffffff>
> <DIV><FONT face=3D"Arial CE" size=3D2>Ahoj nevim jestli ti to pomuze, =
> ale mohl bys=20
> sledovat cas (funguje ve win9x) od startu windows ktery si windows =
> </FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>kazdou milisekundu zvysi. Udajne =
> by wokna=20
> podle tohoto casu meli radit vsechny operace. Zjistis ho pomoci winapi=20
> </FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>var </FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2> cas: dword;</FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>begin</FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2> GetTickCount(cas) =
> </FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>end;</FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2></FONT> </DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Vlada</DIV></FONT>
> <DIV> </DIV>
> <DIV> </DIV>
> <DIV>----- Original Message ----- </DIV>
> <BLOCKQUOTE=20
> style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: =
> 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px">
> <DIV=20
> style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial CE; font-color: =
> black"><B>From:</B>=20
> <A href=3D"mailto:gadourek(zv)centrum(tec)cz" =
> title=3Dgadourek(zv)centrum(tec)cz>Gadourek</A>=20
> </DIV>
> <DIV style=3D"FONT: 10pt arial CE"><B>To:</B> <A =
> href=3D"mailto:delphi-l(zv)fwd(tec)cz"=20
> title=3Ddelphi-l(zv)fwd(tec)cz>Konference Delphi</A> </DIV>
> <DIV style=3D"FONT: 10pt arial CE"><B>Sent:</B> Thursday, April 13, =
> 2000 8:38=20
> PM</DIV>
> <DIV style=3D"FONT: 10pt arial CE"><B>Subject:</B> Timer - =
> nepresnost</DIV>
> <DIV><BR></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Ahoj,</FONT></DIV>
> <DIV> </DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Mohl byste nekdo napsat jak je =
> odvozovan=20
> interapt pro Timer?</FONT></DIV>
> <DIV> </DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Potrebuji 25x / sekundu cist =
> seriovy port.=20
> Nastavil jsem timer.interval na (1/25)*1000 =3D 40msek a pri =
> udalosti=20
> OnTimer obsluhuji seriovy port, vyrazne se, ale rozesel=20
> cas.</FONT></DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Zkousel jsem si udelat =
> jednoduchy program=20
> s timer.interval=3D100 (a 200), ktery zobrazuje cas v OnTimer, =
> ale i=20
> tady se cas rozesel i kdyz podstatne mene.</FONT></DIV>
> <DIV> </DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Je casova =
> nepresnost TTimeru dana jeho=20
> minimalnim casem, nebo neco delam spatne ja?</FONT></DIV>
> <DIV> </DIV>
> <DIV><FONT face=3D"Arial CE" size=3D2>Diky=20
> Petr</FONT></DIV></BLOCKQUOTE></BODY></HTML>
>
> ------=_NextPart_000_0022_01BFA5FF.9D599300--
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
Jak zjistit seznam okolnich pocitacu, atd ?
[*] Ing. Marek H�nig <m.honig(zv)email(tec)cz> - 14.4.2000 12:41:02
Jak mam zjistit seznam okolnich pocitacu, pripadne seznam skupin a serveru.
A jak zjistit, ktery pocitac je pripadne pristupny a jake ma sdilene slozky
a tiskarny?MSSQL7
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 14.4.2000 12:45:40
Muze jit o:
A) tzv. Deadlocky = neodtranene zamky na nejakych objektech v databazi.
muze k tomu dojit pri:
1. nekorektne uzaviranych transakcich
2. nedostatecne pouzivani commitu
3. timeoutem pri dlouhych operacich, se muze odpojit transakce
4. neni nastaven autocommit nebo autorolback pri ukonceni transakce
B) prekroceni poctu povolenych transakci.
Ing. Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Milos Sula
Odesl�no: 14. dubna 2000 11:20
Komu: delphi konference
P�edm�t: OT:MSSQL7
ahoj nevite nekdo proc me aplikace hlasi obcas (mame MSSQL7): DBProcess is
not enabled or dead ? Podle vseho to je nejspis chyba nekde v MSSQL a ne v
aplikaci protoze nam to hlasi ruzne programy. Nevite nekdo jak to odstranit
?
diky
Nativni komponenty pro Access
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.4.2000 12:48:53
Hmm, tak to nevim v cem by mohl byt problem, zkus na MSDN pohledat chybu
cislo 1003 (ja ji hledal v chybovych hlasenich Accessu, ale ty zacinaji az
od cisla cca 2200).
Mac
----- Original Message -----
From: "Kejval" <petr.kejval(zv)worldonline(tec)cz>> Verze pouzivanych DLL knihoven:
> ODBCJT16.DLL 23.11.94 verze 01.00.15.21
> ODBCINST.DLL 07.12.94 verze 2.10.2401
> ODBCTL16.DLL 23.11.94 verze 01.00.15.30
> MSAJT200.DLL 20.11.94 verze 2.50.1606
> MSJETERR.DLL 20.11.94 verze 2.50.1108
> MSJETINT.DLL 23.11.94 verze 2.50.1108
>
> Petr Kejval
>
>
> > > Hlavni chyba SQL
> > > [Microsoft][ODBC Access Jednotkar]Jet error-1003 returned
rychlost Paradoxu po siti
[*] Ji�� Fait���}���6���3 - 14.4.2000 13:08:27
Vecny problem s nedostatkem penez.
Ja pouzivam Access databaze ke kterym pristupuji pres DAO komponenty od
Erika Salaye ( doufam ze za tu reklamu budu mit priste nejakou slevu ).
Ma to sve pro i proti (vetsi nachylnost k poskozeni dat) ale rychlost je
dostacujici. Muzes si dovolit pristupovat k tabulkam pomoci SQL a tim mas
pripravenou pudu pro pozdejsi prechod k SQL (teda aspon trochu pripravenou).
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Filip
Sent: Friday, April 14, 2000 11:19 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: rychlost Paradoxu po siti
Ja jsem zatim na nespolehlivost nenarazil(chodi to uz pres 2 mesice), ale ta
rychlost je opravdu strasna!
Co byste mi tedy doporucili?? Je to jen takova mini sit bez vyhrazenyho
serveru.(4 stanice a na jedny z nich sou DB) Potrebuju ale zachovat
pouzitelnost toho radoby serveru na obycejnou praci treba v Officech...
---
Filip, student
On Thu, 13 Apr 2000 21:01:24 Jaro wrote:
>Ja jsem je opustil ani ne tak pro rychlost jako pro nespolehlivost.
>Jaro
>
>
>> Pro tu prisernou pomalost pri praci v siti jsem byl nucen Paradox
opustit.
>>
>>
>> Zdar!
>> Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
>malou
>> sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je
umistenejch
>> asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou tabulkou - to
de.
>> Tabulky sou ale master/detail a dyz se ma tisknout sestava, ke kery je
>> potreba pracovat se vsem tabulkama, tak to trva nechutne dlouho..
>> ---
>> Filip, student
>>
>
>
Angelfire for your free web-based e-mail. http://www.angelfire.com
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
Jak udelat: Nacteni dotazu a editace vysledku jen
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.4.2000 13:14:58
On 13 Apr 00, at 22:37, Erik Salaj wrote:
> > nebo treba tohle?
> > IRowsetFastLoad Rowsets
>
> To by nebolo zle, az na to, ze IRowsetFastLoad funguje iba s SQLOLEDB
> providerom (cize s MS SQL serverom). Problem vidim skor v tom, ked je
> potrebna povedzme konverzia dat (na MS SQL to ide urobit pomocou DTS),
> alebo pristup k viacerym datovym zdrojom kde nemozem napisat povedzme
> storovanu proceduru na batch spracovanie. Vtedy by bolo vyhodne mat
> moznost povedzme jednym prikazom co najrychlejsie skopirovat recordset
> z jedneho datoveho zdroja do druheho.
Aha, tak zde me odkazy navadely na IRowsetUpdate.Update.
Stahni si BOL k OLE DB a podivej se, co o tom pisi.
Az to budes cist, uvedom si, ze pred pouzitim teto metody je treba
zavolat a nastavit radu jinych objektu. Samo o sobe tento Up[date
nebude chodit, pokud nebude znat zdroj a cil dat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
NVarchar a MSSQL - 2
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.4.2000 13:14:58
On 14 Apr 00, at 6:06, Ren� Otisk wrote:
> Ale droubounka asi nebude uprava pro D3.
Jo, pro D3 bys to musel upravit dost. Int64 lze jeste pretypovat, ale
s pretizenymi procedurami to bude horsi. :-)
Ostatne, prechod z D3 do D5 velice vrele doporucuji.
> Moje OLE DB komponenty by (po drobounke uprave DPK a
> nekterych DFM) mely fungovat i v D4, a Adonis pokud vim, take.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Duplicita klicu, Key - Violation
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.4.2000 13:14:58
On 13 Apr 00, at 22:14, Robert Kindl wrote:
> > > ZH> U SQL databaze byva obvykle nejlepsi reseni poslat data pres
> > > ZH> ulozenou proceduru a zkontrolovat navratovou hodnotu, jak to
> > > ZH> dopadlo. ... mozes uviest nejaky konkretny priklad ako to
> > > vlastne riesit cez tu ulozenu proceduru ? (Interbase)
> >
> > MS SQL :-) (v Interbase se kvuli tomuto prikladku stourat nebudu, to
> > ti snad poradi nekdo jiny)
> >
> > CREATE PROCEDURE rc_upd
> > (zv)id uniqueidentifier,
> > (zv)name nvarchar(30),
> > (zv)cdat datetime
> > AS
> > IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
> > rc_id=(zv)id)
> > RETURN 2
> > ELSE
> > IF NOT EXISTS(SELECT rc_id FROM reader_circuit WHERE
> > rc_id=(zv)id and rc_cdat=(zv)cdat)
> > RETURN 1
> > ELSE
> > UPDATE reader_circuit SET
> > rc_name=(zv)name,
> > rc_cdat=GETDATE()
> > WHERE rc_id=(zv)id
> >
> > Kde RETURN vrati hodnotu, kterou si prevezmu. MS SQL si pro
> > toto vyhrazuje prvni parametr, v Interbase to bude IMHO fungovat
> > obdobne, mozna si vsak budes muset ten parametr nadefinovat. Zbysek
> > Hlinka
>
> No nezlob se, ale tohle radis jako spravne chovani?
:-) Dotaz na ktery odpovidam, byl, jak jsem to pochopil, na
navratove hodnoty. Vyhrabl jsem tedy prvni takovy jednoduchy
priklad, kde navratovou hodnotu pouzivam.
> Co myslis, ze to dela?!
> 1) nebylo by vhodnejsi pouzivat misto datetime polozku typu timestamp?
> datetime ma na MSSQL7.0 presnost 3.33ms (jedna 30tina sekundy). Ne ze
> bych chtel precenovat rychlost SQL serveru, ale podle mne je nekdy
> schopen provadet transakce rychleji nez 30 za sekundu... Naproti tomu
> timestamp je by design primo urceny na zaznam zmeny recordu.
Samozrejme zalezi na situaci, kterou chces osetrovat. V mem
pripade me zajima vic samotny cas zmeny a z technologickych
duvodu vim, ze riziko zmeny v jednom okamziku (3.33 ms)
prakticky nemuze nastat (a pokud by zcela cirou nahodou nastalo,
az tak moc se nestane :).
Jinak je samozrejme pripominka spravna, pokud by nekdo
potreboval resit riziko vstupu v jeden okamzik opravdu spolehlive.
> 3) Puvodni otazka znela jak osetrit pokus o vlozeni duplicitniho klice
> Pokud bych tedy v tve ukazce misto UPDATE mel INSERT:
>
> IF EXIST SELECT
> RETURN 1
> ELSE
> INSERT
>
> nehlidalo by to spravne, nebot pokud konkurencni proces vlozi
> stejny (duplicitni) klic prave mezi mym selectem a mym insertem tak
> stejne dojde k exception...
Mno, v pripade insertu prave nechavam klidne dojit k vyjimce, a
odchytavam stav volani procedury pri INSERT, a az teprve ten
osetruji. Takze muzes zustat v klidu... :-)
> Takze by jsi si Zbysku mel laskave nastudovat ty nejzakladnejsi
> zaklady databazove problematiky nez tady budes radit nesmysly
> a jeste rikat jak ty dodrzuje "urcita pravidla" (viz. tvuj
> soubezny mail ve stejnem threadu).
Netvrdim, ze programuji zcela bez chyb. Nastesti dostatecne casto
vim, co ve svych programech delam a proc to tak delam. Pokud
mohu vytahnout nejakou ukazku z hotove veci, pouziju ji radeji nez
abych vymyslel vzorovy priklad. Cteny ctenar si samozrejme musi
ukazku prebrat a vhodne ji upravit pro svuj pripad, a ne ji slepe
opsat.
> PPS.
> Delal jsem test na MSSQL7 vkladani inkrementalniho klice a nahodnych
> klicu a pomer rychlosti byl 1:4 ve prospech inkrementalniho klice.
> Nahodne klice tedy snizuji vykon, ale nikoliv kvuli zcela vyjimecne
> nutnosti opakovani insertu (generovane klice jsem mel zarucene
> unikatni). Duvodem je zrejme clusterovany index na primarnim klici.
> Takze je lepsi pouzit napr. identitu nebo metodu Hi-Lo...
K tomuhle - opet zalezi na tom, co chces delat dal. Vim, ze
autoinkrement je podstatne rychlejsi ne GUID (ktere vsak generuji
na lokale, ne v databazi). Protoze vsak musim byt pripraveny na
replikace, autoinkrement nemohu dost dobre pouzit. Tam, kde
potrebuji rychlost, pouziju autoinkrement, pokud ho ovsem pri
replikaci mohu zahodit.
Metoda Hi-Lo mi neprijde az tak spolehliva v pripade, ze data
vznikaji nezavisle na vice pocitacich. Takze az budes priste
nekomu vytykat uroven bezpecnosti nejakych konstrukci, zjisti si
nejprve, o jakou situaci jde. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
SQL dotaz na dve MS Access database
[*] Ji�� Fait���}���6���3 - 14.4.2000 13:15:00
S tou cestou to delas blbe
select T1.*, T2.* from T1 in "Cesta k databazi1", T2 in "cesta k
databazi2"
s tim IN to funguje ja to pouzivam
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Patocka
Sent: Friday, April 14, 2000 8:21 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: SQL dotaz na dve MS Access database
Takhle to take jde, ale jen za predpokladu, ze mas vsechny pouzite tabulky
v
jedne DB. Ja mam ale problem, ze pouzivam dve tabulky z ruznych DB.
PRIKLAD:
select T1.*, T2.* from DB1.T1, DB2.T2
No a to je ten problem. Zjistil jsem, ze cestu pred DB mohu napsat, ale
neporadim si v Query s jmenem disku. Jestlize pouziji napr. D:\DB1.T1, pak
se
vse za dvouteckou do mezery povazuje za parameter. Takze muj dotaz je:
Jak pristupovat k ruznym tabulkam v ruznych DB v jednom Query?
David
dpatocka(zv)scholler(tec)cz
Ji�� Fait <fait(zv)jakl(tec)cz> na 14.04.2000 06:26:27
Odpov
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
Cyklus na MSSQL7
[*] Robert Zak <nrsys(zv)psn.sk> - 14.4.2000 13:21:49
Mam MSDE, D5prof, ADONIS a chcem sa spytat, ako mozem odovzdat zo servera
parameter aplikacii (TADOQuery) pocas behu skriptu, prip. ulozenej
procedury. priklad (zjednodusene):
DECLARE (zv)CISLO INT
SET (zv)CISLO = 1
WHILE ((zv)CISLO <= 500)
BEGIN
INSERT INTO TAB1 (CISLO) VALUES ((zv)CISLO)
SET (zv)CISLO = (zv)CISLO + 1
SET :VYSTUP = (zv)CISLO
END
Parameter VYSTUP je "Output" a "ftInteger"
Pokial nebezim v asynchronnom rezime, vrati sa mi parameter VYSTUP, ale az
nakonci - co nepotrebujem.
Ak mam nastaveny mam Options=AssyncFetch, nedostanem ziadnu hodnotu, ani na
konci skriptu.
Pocas vykonavania sa mi nevykona ziadny event - ani OnFetchProgress, ani
OnFetchComplette, trva to hrozne dlho, ako mam teda zistit kolko percent mam
uz hotove alebo ci to uz stuhlo?
Da sa nejak docielit aby mi skript vyvolal udalost OnFetchProgress ci nejaku
(akukolvek) inu, pre tento pripad pouzitelnu?
Mozno sa to takto neriesi, ale ak inak, tak ako?
Dakujem za kazdu radu
Robo
SQL dotaz na dve MS Access database
[*] Ji�� Fait���}���6���3 - 14.4.2000 13:29:45
S tou cestou to delas blbe
select T1.*, T2.* from T1, T2 in "cesta k databazi2"
s tim IN to funguje ja to pouzivam. Jde to ale pouzit pouze pro jednu
externi databazi.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
David Patocka
Sent: Friday, April 14, 2000 10:11 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: SQL dotaz na dve MS Access database
Taky reseni, ALE. Bohuzel tyto DB vytvari software druhe strany a kazdy den
je
maze a vytvari znovu. Takze jakykoliv link bych musel kazdy den vytvaret
znovu.
A to je takove nic moc! Leda si vytvaret danny link pri spusteni Delphi
programu, ale to uz vubec nevim jak!
David
dpatocka(zv)scholler(tec)cz
Tomas Burger <slune(zv)yahoo.com> na 14.04.2000 08:49:58
Odpov�zte pros�m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie:
P�edm�t: RE: SQL dotaz na dve MS Access database
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
Nativni pristup k MS SQL z Delphi 5
[*] Lubo Fule <fule(zv)sct.sk> - 14.4.2000 13:41:00
Pre MSSQL je nativne OLEDB alebo ODBC, takze ked si zozenies nejake
komponentny pre OLEDB (Zbysek Hlinka...) alebo ODBC (ODBCe - tie su
specialne optimalizovane pre MSSQL,
http://www.sct.sk/~fule/ODBCe/ODBCe.zip). Najrychlejsie je asi ODBC, ale je
pravda, ze OLEDB je pokrokovejsie. Este, aby si bol trochu v obraze, aj
spravcovske utility pre MSSQL (Enterprise Manager, Query Analyzer a pod)
chodia cez ODBC.
L.
SQL dotaz na dve MS Access database
[*] Erik Salaj <winsoft(zv)napri.sk> - 14.4.2000 14:04:01
Jak pristupovat k ruznym tabulkam v ruznych DB v jednom Query?
Do externej tabulky sa dostanes dotazom
SELECT Country.Name FROM Country IN "" ";DATABASE=C:\simple.mdb"
Erik
Duplicita klicu, Key - Violation
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 14.4.2000 14:28:37
Za prve, mas dokonalou kontrolu nad tim, co uzivatel
muze/nemuze udelat/ulozit.
Za druhe, nemusis byt po celou dobu editace pripojen
xerveru
Za treti, mnohem lepe predejdes kolizim/porusenim
integerity a podobne...
Ja jsem tento postup zvolil hned od zacatku (asi nejak
intuitivne :) a rekl bych, ze Ti to sice da trosku prace
pri programovani, ale zase Ti spousta prace odpadne
behem provozu programu.
Podotykam, ze mam celou dobu na mysli sitovy provoz.
Dobra.
> ----------
> Od: Michal Kus[SMTP:kus(zv)tangosw(tec)cz]
>
> > -----Original Message-----
> >
> > Za vhodnejsi povazuji postup, kdy si data editujes nekde mimo a o
> > komunikaci s databazi se zacnes starat az v okamziku, kdy ji
> > chces poslat data. Dalsi postup je pak silne zavisly na tom, zda
>
> Proc je lepsi neprimy pristup?
> V cem je primy vstup spatny?
> Tisk na obe strany papiru
[*] Boris Pe�ka <duhasystem(zv)volny(tec)cz> - 14.4.2000 14:31:41
Zdravim !
Nektere tiskarny umoznuji tisknout na obe strany papiru zaroven.
Kdyz chci tisknout na jednu stranu napisu :
Printer.BeginDoc;
.
TextOut ...
.
Printer.EndDoc;
ale jak mam nastavit, ze chci tisknout na druhou stranu ?
Diky za info
Boris
rychlost Paradoxu po siti
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 14.4.2000 14:40:42
Ja jsem s PDOX-em v siti nikdy moc nedelal, *) takze tady
radit moc nemuzu, ale zkousel jsem pracovat s MDB
na siti pomoci ruznych balicku komponent Adonis, DAO,
... a vypadalo to celkem dobre, rekl bych, ze na ty
4 stanice jak pises by to mohlo byt celkem uspokojive.
Je ovsem pravda, ze kdyz budes zbytecne a neefektivne
tahat velke objemy dat tam a zpatky, tak Ti nepomuze
ani svecena vodka :)
Dobra.
*) jen nekolik "lokalnich" pokusu (libily se mi moznosti
ruznych typu poli, reference, ruzna omezeni ale kdyz
jsem zjistil (mmj i z konference) co to da praci to
vsechno udrzovat pohromade, BDE, *.lck, *.val, *.px, ...
:)
> ----------
> Od: Zbysek Hlinka[SMTP:zhlinka(zv)login(tec)cz]
>
> > Nemate nekdo zkusenosti s pdox tabulkama po siti?? Ja mam jen takovou
> > malou sit - 4 stanice. Jedna z nich je "nevyhrazenej" server, kde je
> > umistenejch asi 10 tabulek. Uzivatele vetsinou pracujou jen s jednou
> > tabulkou - to de. Tabulky sou ale master/detail a dyz se ma tisknout
> > sestava, ke kery je potreba pracovat se vsem tabulkama, tak to trva
> > nechutne dlouho.. --- Filip, student
>
> Mam - a natolik spatne, ze si silne oddechnu, az vsichni
> paradoxovi zakaznici upgraduji na novou verzi programu. Pro
> takovehle male nasazeni by ti melo vyborne vyhovovat MSDE nebo
> IB 6.
>
> Nativni pristup k MS SQL z Delphi 5
[*] Lubo Fule <fule(zv)sct.sk> - 14.4.2000 14:42:41
Este maly detail, ODBCe zatial nie je pre D5, ale coskoro sa to zmeni, mozno
uz buduci tyzden.
> Pre MSSQL je nativne OLEDB alebo ODBC, takze ked si zozenies nejake
> komponentny pre OLEDB (Zbysek Hlinka...) alebo ODBC (ODBCe - tie su
> specialne optimalizovane pre MSSQL,
> http://www.sct.sk/~fule/ODBCe/ODBCe.zip). Najrychlejsie je asi
> ODBC, ale je
> pravda, ze OLEDB je pokrokovejsie. Este, aby si bol trochu v obraze, aj
> spravcovske utility pre MSSQL (Enterprise Manager, Query Analyzer a pod)
> chodia cez ODBC.
>
> L.
>
>
rychlost Paradoxu po siti
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.4.2000 14:53:18
??? Vetsin nachylnost k poskozeni dat ???? U Accessu ? Jako ze je Access v
sitovem rezimu nachylnejsi na poskozeni dat nez Paradox? To mi pripada jako
ZNACNE odvazne tvrzeni :-))) Navic Access je v siti o neco pomalejsi nez
Paradox (obvykle).
Mac
----- Original Message -----
From: "Ji�� Fait" <fait(zv)jakl(tec)cz>
Ja pouzivam Access databaze ke kterym pristupuji pres DAO komponenty od
Erika Salaye ( doufam ze za tu reklamu budu mit priste nejakou slevu ).
Ma to sve pro i proti (vetsi nachylnost k poskozeni dat) ale rychlost je
dostacujici.
Vetsi pocet pozadavku
[*] Ondrej Slama <slama(zv)internet(tec)cz> - 14.4.2000 15:11:29
ahoj,
mam problem. Pisu si aplikaci pro WinNT typu server. Mam problem
s vetsim poctem pristupu(pozadavku). Momentalne mi cela apl. funguje tak,
ze zpracuje jeden pozadavek(ServerSocket a ClientSocket) a po vyrizeni
teprve druhy.
Potreboval bych, aby se pozadavky zpracovavaly paraelne.Napada me sice jak
na to,
ale rad si necham poradit od nekoho, kdo takovyto problem jiz resil.
Aplikace by mela byt odladena na 400-500 pozadavku za sekundu.
Neni to sice malo ale doufam ze to nejak pujde.
Prosim o radu jak na to podle Vas.
Ondra Slama
Sdileni Bitmap
[*] Martin Skrivanek <marify(zv)post(tec)cz> - 14.4.2000 15:17:13
Ahoj,
Potrebuji toto:
na formu pouzivam komponenty Bitmap1:TBitmap a Image1:TImage
do Bitmap1 nactu obrazek
a pak bych to chtel priradit do Image1.Picture.Bitmap
!!! Ale ne aby se to tam nakopirovalo
(jako to dela pouziti metody Assign,
nebo prirazeni Image1.Picture.Bitmap:=Bitmap1 )
ale aby se porad jednalo o stejnou Bitmapu
doufam, ze jsem to moc nezamotal :-)
Zatim to delat takhle:
Image1.Picture:=TPicture.Create;
Image1.Picture.Bitmap:=TBitmap.Create;
Image1.Picture.Bitmap.Handle:=Bitmap1.Handle;
Image1.Picture.Bitmap.Width:=Bitmap1.Width;
Image1.Picture.Bitmap.Height:=Bitmap1.Height;
Image1.Picture.Bitmap.PixelFormat:=Bitmap1.PixelFormat;
Image1.Width:=Bitmap1.Width;
Image1.Height:=Bitmap1.Height;
Ale nevim jestli to je korektni a 100% funkcni.
Mam tam hodne nedostatku ? Da se to udelat nejak elegantneji ? .. adt
Dik za kazdou odpoved
Marify
http://www.fi.muni(tec)cz/~xskriva1 Pozice kursoru v editacni poli
[*] Pavel �ern� - 14.4.2000 15:18:56
Zdravim vsechny v tom krasnem jarnim dni.
Potreboval bych pri obsluze OnChange udalosti komponenty
TEdit (nebo TDbEdit) zjistit, na ktere pozici je prave kursor.
Abych mohl rozpoznat, co je v tuto chvili PRED kurzorem
a co ZA kurzorem.
Ve PROPERTIES teto komponenty jsem nic takoveho
nenasel.
Diky.
Pavel �ern�
email: pavel(zv)cerny-ps(tec)cz
MDAC 2.5
[*] Pavel �ern� - 14.4.2000 15:19:59
>>> "Zbysek Hlinka" <zhlinka(zv)login(tec)cz> 11.4.2000 18:10:32 >>>
On 11 Apr 00, at 9:44, Radoslav Krehl�k wrote:
> > > To samozrejme mam. Vis presne, co je treba upravit? Zjistil jsi to
> > > metodou pokus-omyl, nebo je to rada od MS?
>
> presne tak jak pise Petr, udelal jsem to uz pred casem stejne jako on
> (s MDAC 2.5 , zjevne tam zpomeli vyjmout ten setup-part-program a
> zustal v registrech) a vse mi chodi, pro Tvoji informaci jsem na
> Novell siti 5.0SP1 pres kterou routuju TCP/IP, MSDE mam SP2, vse chodi
> OK.
To je sice hezke, ale uz vidim, jak budu skolit prodejce, ze po
instalaci u jejich zakaznika maji restartovat pocitac, a v 95 otevrit
registr a smazat tu a tu polozku. :-)))
Mno, asi radeji pockam na opravene MDAC...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Componenta pre posun "cohokolvek"
[*] Lauko �tefan <lauko(zv)salamon.sk> - 14.4.2000 16:13:52
Dobry,
este raz sa ospravedlnujem.
Komponentu ktoru som poslal pouzivam takto:
Priradim event onClick komponentam s ktorymi chcem pracovat.
procedure TForm1.FormCreate(Sender: TObject);
var
n:Integer;
begin
For n:=0 to ControlCount-1 do
begin
If Controls[n] is TLabel then TLabel(Controls[n]).OnClick:=Label1Click;
If Controls[n] is TImage then TImage(Controls[n]).OnClick:=Label1Click;
{atd.}
end;
end;
{Oznaci komponentu a dalej mozem menit jej velkost a umiestnenie za behu programu}
procedure TForm1.Label1Click(Sender: TObject);
begin
StretchHandle1.Detach; {zrusi predosly vyber}
StretchHandle1.attach(TControl(Sender)); {oznaci komponentu}
end; ----- Original Message -----
From: Lauko �tefan
To: Delphi CZ konferencia
Sent: Friday, April 14, 2000 12:03 PM
Subject: Componenta pre posun "cohokolvek" Dobry den,
prepacte mi tu prilohu ale myslim, ze to nezvladnem doteraz sa ozvalo cca 50 ludi.
Funguje pod D4 a D5 (pravdepodobne aj pod D2 a D3).
Pisatelia na moj e-mail nech mi prepacia.
S pozdravom Lauko.Posouvani neceho mysi
[*] Martin Skrivanek <marify(zv)post(tec)cz> - 14.4.2000 16:17:16
Cau, tady mas takovy jednoduchy prikladek s minimem omezeni
var x1,y1:integer;
moving:boolean;
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
moving:=true;x1:=x;y1:=y;
end;
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if moving then
begin
Image1.left:=Image1.left+x-x1;
Image1.top:=Image1.top+y-y1;
end;
end;
procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
moving:=false;
end;
Zatuhnuti aplikace v D5 - reseni (?)
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 14.4.2000 17:00:43
From: Martin Pe�ek <pesek.martin(zv)mymail(tec)cz>>
> ----- Original Message -----
> >Pouziti databazi bude podle me pri dalsi tvorbe nevyhnutelne
> >a nejrychlejsi reseni. Se sirenim souborove databaze by to melo
> >bejt v pohode.
> No, ja prave ze mam s sirenim problemy!
Kdyz pouzijes Accessovskou bazi s *.UDL souborem, nebo s
InstallSHIELDEM, kterej ti vyrobi ODBC DNS Link, tak nevim
v cem je problem.
> >Co treba TMouse.CursorPos (vraci TPoint) a projed si (na tohle by se
hodila
> >databaze) co se na tom poli nachazi.Hlavne bys mel rozlisit levy a pravy
> >tlacitko jako u vsech strategii.
> No, tak tohle jsem moc nepochopil...
>
Tak polopaticteji.
Uzivatel klikne na jednotku. V TImage.OnClick (nebo TPaintBox.OnClick)
zjistis souradnicex(integer):=Mouse.CursorPos.X
a souradnicey(integer):=Mouse.CursorPos.Y
pak musis projet treba tu Accessovskou bazi, kde budes zajiste mit ulozeny
pozici x,y rohu a vysku,sirku objektu a kdyz v tomhle obdelniku zjistis, ze
se
nachazis, tak objekt nejak oznacis.
> Nedelam to pomoci timeru, ale pomoci udalsoti onMouseMove
Do budoucna to bude potreba urcite zlepsit.
M.Jirman
Duplicita klicu, Key - Violation
[*] Robert Kindl <rob(zv)exec(tec)cz> - 14.4.2000 17:01:19
> :-) Dotaz na ktery odpovidam, byl, jak jsem to pochopil, na
> navratove hodnoty. Vyhrabl jsem tedy prvni takovy jednoduchy
> priklad, kde navratovou hodnotu pouzivam.
[Presunuty dve casti tehoz mailu k sobe]
> Metoda Hi-Lo mi neprijde az tak spolehliva v pripade, ze data
> vznikaji nezavisle na vice pocitacich. Takze az budes priste
> nekomu vytykat uroven bezpecnosti nejakych konstrukci, zjisti si
> nejprve, o jakou situaci jde. :-)
Az budes priste nekomu budes radit zjisti si o jakou otazku jde.
Dobre je treba divat se do kolonky subjekt (Predmet, Topic).
A kdyz pak ve zprave najdes treba tohle tak se jedna o off topic :-)
A co je nespolehliveho na Hi-Lo?
> > Co myslis, ze to dela?!
> > 1) nebylo by vhodnejsi pouzivat misto datetime polozku typu timestamp?
> > datetime ma na MSSQL7.0 presnost 3.33ms (jedna 30tina sekundy). Ne ze
> > bych chtel precenovat rychlost SQL serveru, ale podle mne je nekdy
> > schopen provadet transakce rychleji nez 30 za sekundu... Naproti tomu
> > timestamp je by design primo urceny na zaznam zmeny recordu.
>
> Samozrejme zalezi na situaci, kterou chces osetrovat. V mem
> pripade me zajima vic samotny cas zmeny a z technologickych
> duvodu vim, ze riziko zmeny v jednom okamziku (3.33 ms)
> prakticky nemuze nastat (a pokud by zcela cirou nahodou nastalo,
> az tak moc se nestane :).
Stane se to, ze ochrana, zajistujici konzistenci dat aplikace
a serveru, na kterou se v aplikaci spolehas nebude
fungovat a PRIJDES O DATA!!! Hlavne se to neda nijak detekovat
a blbe se to ladi!
A hlavne bych si nedovolil nikomu to radit!
> Jinak je samozrejme pripominka spravna, pokud by nekdo
> potreboval resit riziko vstupu v jeden okamzik opravdu spolehlive.
No ja nevim, na jedne strane se ohanis, ze musis pouzivat GUID
aby jsi byl pripraven na replikaci (kterou asi nepouzivas, nevim)
a na druhe strane nepouzivas TIMESTAMP na vec, ke ktere
je primo urcen, a kterou pouzivas jiz ted...
Pravda ja neumim pocitat, nebot 3.33ms neni 30tina ale 300tina sekundy,
ale to nic nemeni na tom, ze i pomaly server bezne dosahne 300tps...
A to riziko stoupa jen a pouze s vykonem serveru a poctem uzivatelu,
kteri takovou frekvenci transakci vytvareji (nebo staci kdyz budou delat
nejake
batch updates).
> > 3) Puvodni otazka znela jak osetrit pokus o vlozeni duplicitniho klice
> > Pokud bych tedy v tve ukazce misto UPDATE mel INSERT:
> >
> > IF EXIST SELECT
> > RETURN 1
> > ELSE
> > INSERT
> >
> > nehlidalo by to spravne, nebot pokud konkurencni proces vlozi
> > stejny (duplicitni) klic prave mezi mym selectem a mym insertem tak
> > stejne dojde k exception...
>
> Mno, v pripade insertu prave nechavam klidne dojit k vyjimce, a
> odchytavam stav volani procedury pri INSERT, a az teprve ten
> osetruji. Takze muzes zustat v klidu... :-)
Ja jsem v klidu. V pripade UPDATE ti dojde k deadlocku
nebo poskozeni dat a v pripade INSERT k exception.
Jen ten DELETE je OK.
Myslim, ze jako konkurence jsi predem vyrizen :-)
A to, ze to radis ostatnim znamena,
ze budou vyrizeni i oni...
> > Takze by jsi si Zbysku mel laskave nastudovat ty nejzakladnejsi
> > zaklady databazove problematiky nez tady budes radit nesmysly
> > a jeste rikat jak ty dodrzuje "urcita pravidla" (viz. tvuj
> > soubezny mail ve stejnem threadu).
>
> Netvrdim, ze programuji zcela bez chyb. Nastesti dostatecne casto
> vim, co ve svych programech delam a proc to tak delam. Pokud
> mohu vytahnout nejakou ukazku z hotove veci, pouziju ji radeji nez
> abych vymyslel vzorovy priklad. Cteny ctenar si samozrejme musi
> ukazku prebrat a vhodne ji upravit pro svuj pripad, a ne ji slepe
> opsat.
To, ze nekdo prispiva do konference je jiste chvalyhodne,
ale mel by si umet uvedomit jestli to co posila neni vice zamlzujici
nez prinosne. To se bohuzel velice casto nedeje. Lide nepremysleji
nad otazkou ani odpovedi a nesleduji thready ani den nazpatek.
Ja vim, ze se s tim neda nic delat, ale co je nejdulezitejsi:
MELI by umet prijmout kritiku a priznat chybu a ne ji zlehcovat
nebo ji zurive obhajovat za kazdou cenu.
Prece to, ze nekdo nepochopil otazku pausalne neznamena,
ze je spatne formulovana...
Rob
Zistenie, ci je nainstalovany BDE
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 14.4.2000 17:15:03
Ahoj,
pri nenainstalovanem BDE chybi v registru slozka klicu
\HKEY_LM\Software\Borland\Database Engine
M.Jirman
----- Original Message -----
From: Nadezda Chrap�iakov� <chrapciakova(zv)vuje.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, April 10, 2000 11:23 AM
Subject: Zistenie, ci je nainstalovany BDE
> Potrebujem programovo zistit, ci je na pocitaci nainstalovany BDE.
>
> Dakujem dopredu za kazdu radu, ako to urobit.
>
> Nada
znovu RichEdit
[*] L. ZITA <konference(zv)sales(tec)cz> - 14.4.2000 17:22:20
Behalf Of Zapl�k
>
> To jsem zkousel, ale ztratil se typ pisma a vsechen text je potom stejnym
> stylem.
Zkus si tohle : (u mne to funguje a formatovani neztratim)
Ludek
Unit1.pas
====================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls, ComCtrls;
type
TForm1 = class(TForm)
RichEdit1: TRichEdit;
OpenDialog1: TOpenDialog;
Panel1: TPanel;
ButtonOpen: TButton;
ButtonAddText: TButton;
ButtonSave: TButton;
Edit1: TEdit;
SaveDialog1: TSaveDialog;
procedure ButtonOpenClick(Sender: TObject);
procedure ButtonAddTextClick(Sender: TObject);
procedure ButtonSaveClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.ButtonOpenClick(Sender: TObject);
begin
RichEdit1.Lines.Clear;
if openDialog1.Execute then
RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName);
end;
procedure TForm1.ButtonAddTextClick(Sender: TObject);
begin
RichEdit1.Lines.Add(edit1.text);
end;
procedure TForm1.ButtonSaveClick(Sender: TObject);
begin
if SaveDialog1.Execute then
RichEdit1.Lines.SaveToFile(SaveDialog1.FileName);
RichEdit1.Lines.Clear;
end;
end.
=================================
Unit1.dfm
=================================
object Form1: TForm1
Left = 309
Top = 111
Width = 696
Height = 480
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object RichEdit1: TRichEdit
Left = 0
Top = 41
Width = 688
Height = 412
Align = alClient
Lines.Strings = (
'RichEdit1')
ScrollBars = ssBoth
TabOrder = 0
WantTabs = True
WordWrap = False
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 688
Height = 41
Align = alTop
TabOrder = 1
object ButtonOpen: TButton
Left = 232
Top = 8
Width = 75
Height = 25
Caption = 'ButtonOpen'
TabOrder = 0
OnClick = ButtonOpenClick
end
object ButtonAddText: TButton
Left = 392
Top = 8
Width = 75
Height = 25
Caption = 'ButtonAddText'
TabOrder = 1
OnClick = ButtonAddTextClick
end
object ButtonSave: TButton
Left = 528
Top = 8
Width = 75
Height = 25
Caption = 'ButtonSave'
TabOrder = 2
OnClick = ButtonSaveClick
end
object Edit1: TEdit
Left = 24
Top = 16
Width = 209
Height = 21
TabOrder = 3
Text = 'Edit1'
end
end
object OpenDialog1: TOpenDialog
Left = 64
Top = 56
end
object SaveDialog1: TSaveDialog
Left = 128
Top = 64
end
end
=========================================
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
CAPI
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 14.4.2000 17:46:41
ahoj,
Blize viz www.capi.org
M.Jirman
----- Original Message -----
From: Ing. Lud�k Florian
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, April 14, 2000 8:27 AM
Subject: CAPI
Cauec,
nema nekdo zkusenosti s programovanim CAPI (ISDN) ?
Bye Ludan
Filtr na zavisle Query
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 14.4.2000 18:08:01
ahoj,
To ti nefunguje SELECT * FROM dbtable WHERE prijmeni LIKE %No%
M.Jirman
----- Original Message -----
From: Marian Winkler <ag.art(zv)iol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, April 08, 2000 12:04 AM
Subject: Filtr na zavisle Query > Ahoj,
> Mam dve Query (Oddeleni => Pracovnici)
> Potreboval bych filtrovat zaznamy na zavisle Query (pracovnici) pomoci
> stisku klaves (napr. jako W. Explorer).
> Priklad: natypuju "No" a jsem v DBGridu treba na Novakovi.
> Vsechny pokusy mi zatim konci na "Capability not supported."
>
> Dik za Vas cas.
>
> Marian
> DirectoryListBox
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 14.4.2000 18:10:57
ahoj,
vybornej je http://www.gexperts.com/GXExplorer/
je se zdrojakama, ale bohuzel pro D4 a D5 tak nevim
jestli to pujde pouzit.
M.Jirman
----- Original Message -----
From: Filip Hlad�k <fihla(zv)telecom(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 13, 2000 7:39 AM
Subject: DirectoryListBox
> Zdravim,
>
> nevite nekdo o free komponentach TDirectoryListBox a TFileListBox s vizazi
> Pruzkumnika pro D3?
>
> Dekuji
>
> Filip Hladik
> fihla(zv)telecom(tec)cz
>
>Duplicita klicu, Key - Violation
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.4.2000 18:43:15
On 14 Apr 00, at 11:43, Robert Kindl wrote:
> > > Prikaz INSERT dam do try except bloku a pokud dojde
> > > ke vyjimce "insert duplicate key" (sorry cislo z hlavy nevim) tak
> > > vygeneruji jiny klic a zkusim to znovu. Celkem dobra strategie
> > > pokud zajistim aby konkurencni proces vygeneroval s velkou
> > > pravdepodobnosti jiny klic nez ja (napr. nahodny).
> >
> > Nebolo by vyhodnejsie pouzitie autoinkrementacnej polozky
> > a generovanie jej hodnot ponechat na SQL server?
> > Erik
>
> Bylo
> Vsak jsem to take v tom samem mailu napsal,
> ale pak tezko dojde k insert duplicate key, ze
> (pokud pominu, ze napr. MSSQL zacne znovu od 1
> nebo, ze BDE obcas misto UPDATE zavola INSERT).
Pokud ovsem mam dalsi unikatni klic (dejme tomu, ze nejake
jmeno neceho musi byt jednoznacne), stejne musim osetrit
duplicitu.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
rychlost Paradoxu po siti
[*] Mirek Melichar <xmelich(zv)informatics.muni(tec)cz> - 14.4.2000 18:56:40
On Fri, 14 Apr 2000, Pavel Medek wrote:
> Zkus vic popsat (priklad) toho co te trapi. Rychlost by u Paradoxu na
> takoveto siti skutecne nemala byt problemem.
> Je potreba aby jsi rekl nastaveni a verze BDE na jednotlivych strojich,
> strukturu tabulek a zpusob jakym delas ten tisk nebo co je tak pomale.
Protoze mam taky aplikaci s Paradox tabulkami (i kdyz lokalnimi) a
problemy s rychlosti taky resim, tak bych byl rad kdyby mi taky nekdo
poradil. Uvadim konktretni, i kdyz schvalne trochu prekombinovany
priklad (jde o evidenci pro autoskoly).
Mam tabulky:
STUDENTI(KOD,JMENO)
UCITELE(KOD,JMENO)
AUTOMOBILY(KOD,NAZEV)
PLAN_JIZD(DATUM,KOD_UCITELE,KOD_AUTOMOBILU,KOD_STUDENTA)
No a chci zobrazit vsechny jizdy, ale misto kodu chci jmena(nazvy).
Toto reseni je casove naprosto neprijatelne, ale na lepsi jsem zatim
neprisel:
SELECT P.DATUM, U.KOD,A.KOD,S.KOD
FROM PLAN_JIZD P, UCITELE U, AUTOMIBILY A, STUDENTI S
WHERE P.KOD_UCITELE=U.KOD AND P.KOD_AUTOMOBILU=A.KOD AND
P.KOD_STUDENTA=S.KOD
Predpokladam, ze na to jdu uplne blbe, ale jak je to tedy spravne ?
A kdyz mam jeste moznost prejit na jinou databazi, na kterou konkretne ?
Dik
Mirek Melichar
> ----- Original Message -----
>
> > Ja jsem zatim na nespolehlivost nenarazil(chodi to uz pres 2 mesice), ale
> ta rychlost je opravdu strasna!
> > Co byste mi tedy doporucili?? Je to jen takova mini sit bez vyhrazenyho
> serveru.(4 stanice a na jedny z nich sou DB) Potrebuju ale zachovat
> pouzitelnost toho radoby serveru na obycejnou praci treba v Officech...
>
>
>
Duplicita klicu, Key - Violation
[*] Erik Salaj <winsoft(zv)napri.sk> - 14.4.2000 19:38:38
> > Nebolo by vyhodnejsie pouzitie autoinkrementacnej polozky
> > a generovanie jej hodnot ponechat na SQL server?
> > Erik
>
> Bylo
> Vsak jsem to take v tom samem mailu napsal,
> ale pak tezko dojde k insert duplicate key, ze
> (pokud pominu, ze napr. MSSQL zacne znovu od 1
> nebo, ze BDE obcas misto UPDATE zavola INSERT).
Ved v tom je predsa ta vyhoda, ze k duplicitam nemoze
dojst a ja nemusim nic zlozite na SQL serveri kodovat
ani osetrovat na klientovi. Predsa nebudem vymyslat
kluce, na hodnote, ktorych nezalezi, ked mi to moze
zabezpecit SQL server.
Erik
Duplicita klicu, Key - Violation
[*] Erik Salaj <winsoft(zv)napri.sk> - 14.4.2000 20:01:28
> K tomuhle - opet zalezi na tom, co chces delat dal. Vim, ze
> autoinkrement je podstatne rychlejsi ne GUID (ktere vsak generuji
> na lokale, ne v databazi). Protoze vsak musim byt pripraveny na
> replikace, autoinkrement nemohu dost dobre pouzit. Tam, kde
> potrebuji rychlost, pouziju autoinkrement, pokud ho ovsem pri
> replikaci mohu zahodit.
Podla mna mozes autoinkrement pouzit aj v pripade replikacii
ak tam pridas este jednu polozku (do primarneho kluca)
- jednoznacnu identifikaciu repliky. Takato informacia sa moze
zist, vies napr. na ktorom pocitaci bol zaznam vytvoreny.
Erik
Next Char Selected
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 14.4.2000 21:23:32
Zdravim.
Ako by som zabezpecil aby bol nasledujuci znak za kurzorom selectnuty a aby
sa nemohlo stat, ze by klavesou sipka stratil selected zase nasledujuci
znak.
Dakujem
Roland.AssignFile nebo OpenFile?
[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 14.4.2000 22:18:06
Ahoj, doufam, ze se mi podari ti pomoci... Budu to ale psat z voleje,
takze nevim, jestli to bude na 100% fachat... Jestli ne, tak se ozvi
(treba i na muj mejl).
Var
S1,S2 : File Of Char;
c1,c2 : Char;
l,n : LongInt;
Begin
AssignFile(S1,'SOUBOR1'); AssignFile(S2,'SOUBOR2');
Reset(S1); Reset(S2);
n:=FileSize(S2)-FileSize(S1);
Seek(S1,FileSize(S1)-2);
Read(S1,c1,c2);
If (c1<>#13) And (c2<>#10) Then Begin
Write(S1,#13,#10);
Dec(n,2);
End;
For l:=1 To n Do Begin
Write(S1,'#');
If ((l Mod 64) = 0) And (l+2<n) Then Begin
Write(S1,#13,#10);
Inc(l,2);
End;
End;
CloseFile(S1); CloseFile(S2);
End;
RadekD wrote:
>
> Ahoj,
> mam nasledujici problem. Potrebuju napsat programek, ktery si otevre dva soubory
> a zjisti si velikosti obou a pak ten kratsi soubor doplni znaky # o tolik, aby
> velikosti souboru byly shodne. Jedna se prakticky o textove soubory...
>
> Plati ze:
> SOUBOR1 je vzdy mensi (tudiz to je ten doplnovany) nez SOUBOR2
> Jenomze problem je v tom, ze NEKDY ten SOUBOR1 konci CR+LF a nekdy ne. A ja
> potrebuji ty znaky zacit doplnovat vzdy na novy radek. Takze napred by muselo
> predchazet zjisteni, zda SOUBOR1 ma na konci ono CR+LF A dale - nekdy je rozdil
> velikosti mezi obema soubory treba i 1200byte a nechci, aby ty # byly na jednom
> radku. Tudiz by se to muselo vzdy po, rekneme 64, znacich # zalomit (cili CR+LF)
> na novy radek.
>
> Poradi mi nekdo aspon heslovite krok-po-kroku? Ani nevim, zda je vhodnejsi
> pouzit metodu AssignFile ci OpenFile. Lze vubec doplnovat soubor? Nebudu muset
> otevrit jeste treti soubor, do ktereho zkopiruju obsah SOUBOR1 + pridam urcity
> pocet znaku # ?
>
> Byl bych kazdemu velice vdecen za nejake priklady nebo odkazy, protoze jsem
> zacatecnik (puvodne jsem neco bastlil ve Visual Basicu)...
>
> Diky
>
> --------------------
> Radek Danek
> rd(zv)zbrojovka.com
--
Martin Pe�ava
/--------------------------------------------------------------\
| Known as JimX on http://www.webchat(tec)cz & http://www.xchat(tec)cz |
| Webmaster of http://miss.misto(tec)cz |
| Email: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/Timer - nepresnost
[*] Gadourek <gadourek(zv)centrum(tec)cz> - 14.4.2000 22:18:32
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Diky vsem, budu to resit radeji mimo windows.
Petr Gadourek
Ahoj,
Mohl byste nekdo napsat jak je odvozovan interapt pro Timer?
Potrebuji 25x / sekundu cist seriovy port. Nastavil jsem timer.interval na (1/25)*1000 = 40msek a pri udalosti OnTimer obsluhuji seriovy port, vyrazne se, ale rozesel cas.
Zkousel jsem si udelat jednoduchy program s timer.interval=100 (a 200), ktery zobrazuje cas v OnTimer, ale i tady se cas rozesel i kdyz podstatne mene.
Je casova nepresnost TTimeru dana jeho minimalnim casem, nebo neco delam spatne ja?
Diky Petr
rychlost Paradoxu po siti
[*] Ji�� Fait���}���6���3 - 15.4.2000 05:55:05
1. Rychlost
Zkus si teda na siti typu Peer-to-peer na tabulkama vyfiltrovat zaznamy
pomoci nekolika podminek. Nelze pouzit set range.
2.Nachylnost k poskozeni
Nerekl jsem ze je nachylnejsi k pozkozeni dat nez PDX, ale pokud bude na tom
PC kde jsou ulozeny data zaroven pracovat v Office, atp
tak vsichni vime ze Windows neni zrovne z tech nejstabilnejsich OS a pokud
zamrzne masina tak je na nejake poskozeni zadelano.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin Kubecka
Sent: Friday, April 14, 2000 2:53 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: rychlost Paradoxu po siti
??? Vetsin nachylnost k poskozeni dat ???? U Accessu ? Jako ze je Access v
sitovem rezimu nachylnejsi na poskozeni dat nez Paradox? To mi pripada jako
ZNACNE odvazne tvrzeni :-))) Navic Access je v siti o neco pomalejsi nez
Paradox (obvykle).
Mac
----- Original Message -----
From: "Ji�� Fait" <fait(zv)jakl(tec)cz>
Ja pouzivam Access databaze ke kterym pristupuji pres DAO komponenty od
Erika Salaye ( doufam ze za tu reklamu budu mit priste nejakou slevu ).
Ma to sve pro i proti (vetsi nachylnost k poskozeni dat) ale rychlost je
dostacujici.
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000
Duplicita klicu, Key - Violation
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.4.2000 08:33:52
On 14 Apr 00, at 17:01, Robert Kindl wrote:
> > :-) Dotaz na ktery odpovidam, byl, jak jsem to pochopil, na
> > navratove hodnoty. Vyhrabl jsem tedy prvni takovy jednoduchy
> > priklad, kde navratovou hodnotu pouzivam.
> [Presunuty dve casti tehoz mailu k sobe]
> > Metoda Hi-Lo mi neprijde az tak spolehliva v pripade, ze data
> > vznikaji nezavisle na vice pocitacich. Takze az budes priste
> > nekomu vytykat uroven bezpecnosti nejakych konstrukci, zjisti si
> > nejprve, o jakou situaci jde. :-)
>
> Az budes priste nekomu budes radit zjisti si o jakou otazku jde.
> Dobre je treba divat se do kolonky subjekt (Predmet, Topic).
> A kdyz pak ve zprave najdes treba tohle tak se jedna o off topic :-)
Jak uz to tak byva, debata se casem posouva, subj. zustava...
BTW - a to chtel jeste ukazku v IB, kdezto ja to napsal v MSSQL.
Jaka hanba! :-)
> A co je nespolehliveho na Hi-Lo?
Podle toho, co tu o teto metode pred casem probehlo, muze dojit k
duplicite v pripade, ze se klic generuje ve vice nezavislych
okruzich. Pro priklad mejme dve stejne databaze, ktere jsou od
sebe fyzicky oddelene a synchronizuji se pouze cas od casu.
Protoze tato otazka je pro muj pripad znacne podstatna, zvolil
jsem radeji vyrazne bezpecnejsi guid, byt je o neco pomalejsi.
Kdyz se Hi-Lo dobre napise, pravdepodobnost je sice miziva, ale
je. V pripade guid si nemusim lamat hlavu ani s duplicitou, ani s
"dobrym napsanim" - tedy nemusim byt zdaleka tak pozorny jako
u Hi-Lo.
> > Samozrejme zalezi na situaci, kterou chces osetrovat. V mem
> > pripade me zajima vic samotny cas zmeny a z technologickych
> > duvodu vim, ze riziko zmeny v jednom okamziku (3.33 ms)
> > prakticky nemuze nastat (a pokud by zcela cirou nahodou nastalo, az
> > tak moc se nestane :).
>
> Stane se to, ze ochrana, zajistujici konzistenci dat aplikace
> a serveru, na kterou se v aplikaci spolehas nebude
> fungovat a PRIJDES O DATA!!! Hlavne se to neda nijak detekovat
> a blbe se to ladi!
> A hlavne bych si nedovolil nikomu to radit!
Tak jeste jednou: mnou uvedena ukazka se tykala predavani
parametru, nikoliv pouziti casoveho razitka (to jsem mohl klidne
umazat, nicmene jsem to v prikladu nechal). To je vhodne si
uvedomit.
Avsak tema to je zajimave, takze v nem, navzdory subj. :-), klidne
muzeme pokracovat. Souhlasim s tebou, ze typ timestamp je
vhodnejsi, pokud potrebujes pouze to razitko a z provoznich duvodu
muze dojit k prekryti zapisu. Jenze, pokud nechas nechas na
uzivateli, aby po upozorneni mohl zmenit zmenena data (coz muze
byt nekdy vhodne), stejne "prijdes" o data. O zmene se dozvi sice
ten, kdo zmenu provadel naposledy, ale diky "spolehlivosti"
mezilidske komunikace zpravidla uz ne ten, jehoz uprava byla
prepsana.
Proto se zavadi u citlivych dat system zurnalovani, takze pokud
navrhnes zurnal dobre, mas seznam veskerych zmen. Takze
detekovat se to da, o data prijit nemusis.
> > Jinak je samozrejme pripominka spravna, pokud by nekdo
> > potreboval resit riziko vstupu v jeden okamzik opravdu spolehlive.
>
> No ja nevim, na jedne strane se ohanis, ze musis pouzivat GUID
> aby jsi byl pripraven na replikaci (kterou asi nepouzivas, nevim) a na
> druhe strane nepouzivas TIMESTAMP na vec, ke ktere je primo urcen, a
> kterou pouzivas jiz ted...
V podstate nepouzivam. Povaha tech dat je takova, ze za danou
oblast by mel odpovidat jeden clovek. Datum tam pouzivam spise
pro ten pripad, ze by snad dotycny propujcil moznost uprav jeste
nekomu dalsimu (v podstate jsem to "pro jistotu" predimenzoval).
Proste povaha programu je takova, ze soubeh nehrozi. A kdyby
rizenim nahody preci jen nastal, mam u dulezitych dat zurnal, u
ostatnich dat je to stejne fuk.
Kdezto replikace nyni sice nepouzivam, ale analyzou situaci u
stavajicich zakazniku je jasne, ze nekteri replikaci pouzivat budou.
> > Mno, v pripade insertu prave nechavam klidne dojit k vyjimce, a
> > odchytavam stav volani procedury pri INSERT, a az teprve ten
> > osetruji. Takze muzes zustat v klidu... :-)
>
> Ja jsem v klidu. V pripade UPDATE ti dojde k deadlocku
> nebo poskozeni dat a v pripade INSERT k exception.
> Jen ten DELETE je OK.
> Myslim, ze jako konkurence jsi predem vyrizen :-)
Nemam nejmensi obavu. Ty musis byt jasnovidec, kdyz z techto
nekolika malo informaci dokazes poznat, jak mam napsanou celou
aplikaci. :-) BTW - jake aplikace ze to delas?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
rychlost Paradoxu po siti
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.4.2000 08:33:52
On 14 Apr 00, at 14:40, Mal� Dobromil wrote:
> Ja jsem s PDOX-em v siti nikdy moc nedelal, *) takze tady
> radit moc nemuzu, ale zkousel jsem pracovat s MDB
> na siti pomoci ruznych balicku komponent Adonis, DAO,
> ... a vypadalo to celkem dobre, rekl bych, ze na ty
> 4 stanice jak pises by to mohlo byt celkem uspokojive.
Ja osobne se domnivam, ze pokud databazove aplikaci "hrozi"
sebemensi "riziko", ze ji nekdo pouzije na siti, je lepsi sahnout
rovnou po SQL databazi i v pripade, ze jde o male objemy dat.
Doba je na to zrala, MSDE je zadarmo (tedy temer, ten kdo to siri,
musi mit zakoupenou licenci), IB6 bude brzy take.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
rychlost Paradoxu po siti
[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 15.4.2000 08:43:46
>
> Mam tabulky:
> STUDENTI(KOD,JMENO)
> UCITELE(KOD,JMENO)
> AUTOMOBILY(KOD,NAZEV)
> PLAN_JIZD(DATUM,KOD_UCITELE,KOD_AUTOMOBILU,KOD_STUDENTA)
> No a chci zobrazit vsechny jizdy, ale misto kodu chci jmena(nazvy).
>
> Toto reseni je casove naprosto neprijatelne, ale na lepsi jsem zatim
> neprisel:
> SELECT P.DATUM, U.KOD,A.KOD,S.KOD
> FROM PLAN_JIZD P, UCITELE U, AUTOMIBILY A, STUDENTI S
> WHERE P.KOD_UCITELE=U.KOD AND P.KOD_AUTOMOBILU=A.KOD AND
> P.KOD_STUDENTA=S.KOD
>
> Predpokladam, ze na to jdu uplne blbe, ale jak je to tedy spravne ?
> A kdyz mam jeste moznost prejit na jinou databazi, na kterou konkretne ?
>
> Dik
> Mirek Melichar
>
Zkus pouzivat lookup pole, pak pokud budes chtit zobrazit celou
databazi, nebudes vubec potrebovat dotaz (tak na me tvuj priklad
pusobi). Jinak pri potrebe zobrazeni podmnoziny (napr. jen jizdy
jednoho studenta) pouzij filtr.
Milan Dvorak
dvorak(zv)gymzn(tec)cz
SQL dotaz na dve MS Access database
[*] Erik Salaj <winsoft(zv)napri.sk> - 15.4.2000 12:19:13
>Taky reseni, ALE. Bohuzel tyto DB vytvari software druhe strany a kazdy den
je
>maze a vytvari znovu. Takze jakykoliv link bych musel kazdy den vytvaret
znovu.
>A to je takove nic moc! Leda si vytvaret danny link pri spusteni Delphi
>programu, ale to uz vubec nevim jak!
Da sa to urobit pomocou DAO aj ADO (ADOX):
http://www.cybermagic.co.nz/winsoft/daofaq.htm (Q27)
http://www.cybermagic.co.nz/winsoft/adofaq.htm (Q61)
Erik
Zatuhnuti aplikace v D5 - reseni (?)
[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 15.4.2000 15:14:52
Zdravim!
----- Original Message -----
>Kdyz pouzijes Accessovskou bazi s *.UDL souborem, nebo s
>InstallSHIELDEM, kterej ti vyrobi ODBC DNS Link, tak nevim
>v cem je problem.
Fajn, jak vytvorim Accessovskou bazi s *.UDL souborem? A je lehci to delat
pres Access nebo pres ten InstallShield?
>Tak polopaticteji.
>Uzivatel klikne na jednotku. V TImage.OnClick (nebo TPaintBox.OnClick)
>zjistis souradnicex(integer):=Mouse.CursorPos.X
>a souradnicey(integer):=Mouse.CursorPos.Y
>pak musis projet treba tu Accessovskou bazi, kde budes zajiste mit ulozeny
>pozici x,y rohu a vysku,sirku objektu a kdyz v tomhle obdelniku zjistis, ze
>se
>nachazis, tak objekt nejak oznacis.
No, ale to bych teda potom musel vedet jak sirit tu databazi, ze ;)
>> Nedelam to pomoci timeru, ale pomoci udalsoti onMouseMove
>Do budoucna to bude potreba urcite zlepsit.
Ten onMouseMove se me zda dobrej, ale jak jde videt tak pomalej. Nevis jak?
>M.Jirman
S pozdravem Martin Pesek, amatersky programator.
===============================
[ Martin Pe�ek
[ pesek.martin(zv)mymail(tec)cz
[ gm1.miesto.sk
[ www.samuel(tec)cz/~markm
[ http://board.jinak(tec)cz
[ Info
[ Delphi 5 Ent., W98
===============================
Rychlost IB
[*] Jaro <jaro(zv)sinea(tec)cz> - 15.4.2000 07:07:13 -0700
> (Co sa tice Join tak to nevadi lebo to sa vykona na servri.)
Ze se Join vykona na serveru, o tom neni pochyb, ale uz neni pravda, ze to
nevadi.
Ruzne operace serveru jsou v ruznych situacich ruzne ofektivni.
Join, pripadne slozene a komplikovane prikazy Select zpravidla patri
k tem mene efektivnim resenim, zejmena pro velke tabulky.
Duvod je jednoduchy. Nemuzes (temer) nijak ovlivnit zpusob, jakym je slozeny
prikaz provaden. Pokud napises proceduru v nekolika krocich,
kdy se nejprve zameris na ucinnou segregaci dat, pak muzes
ziskat vyrazne lepsich vysledku. Tim myslim nekdy i radove lepsi casy.
Jaro
> Co sa tice Locate - tam je zrada lebo locate hlada u klienta zaznam tak ze
> prechadza vsetky zaznami. Trena mat na pameti, ze ak parcujes na SQL je
> nutne zabudnut na funkcie ktore robia nieco u klienta a to su: Locate,
> Filter, MoveBy (mozno aj Last). Ak Locate robis cez SQL dotaz tak ti to
> preide bleskovo. (locate u 10 000 zaznamov trva 3 sec)
>
> Jan TUNGLI , Datapac. s.r.o.
> Email: tungli(zv)datapac.sk
> tel: 07 / 5565096 -8 kl.102, 07/55410372
> fax: 07 / 55410384
>
>
> ----- Original Message -----
> From: Roland Turcan (RoTurSoft) <rotursoft(zv)nextra.sk>
> To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
> Sent: Saturday, April 08, 2000 1:33 AM
> Subject: Rychlost IB
>
>
> Zdravim.
>
> Mam tabluku v IB 6, ktora je naplnena cca 10 000 zaznamami o dlazke cca
100
> B, co si myslim ze nie je nejak vela, ale zmena zotriedenia je cca 2s a po
> pridani alebo oprave a naslednom refresh cca tri sekundy.
> --------------------------
> Select je nasledovany:
>
> select kurzlist.*,stat from kurzlist left join cudzmena on
> kurzlist.mena=cudzmena.mena order by KurzList.Datum
> --------------------------
> samotny refresh je takto:
>
> function qIBRefresh(IBQuery:TIBQuery):boolean;
> var ujed:integer;
> begin
> Result:=False;
> ujed:=0;
> Screen.Cursor:=crHourGlass;
> try
> try
> if IBQuery.Active then
> begin
> ujed:=IBQuery.FieldByName('jedin').asinteger;
> IBQuery.Close;
> end;
> if IBQuery.Transaction.Active then IBQuery.Transaction.Active:=False;
> IBQuery.Open;
> if IBQuery.Active and IBQuery.Locate('jedin',ujed,[])
> then Result:=true
> else Result:=False;
> // ak nasiel vrati true a ak nie tak false
> except on E:EIBError do
> begin
> MessageDlg('Nastala chyba poeas refresh databazy.', mtError, [mbOK],
0);
> end; end;
> finally Screen.Cursor:=crDefault; end;
> end;
> ---------------------------------------------------
> Len co bude ak tabulka bude mat radovo sto tisice zaznamov a podstatne
viac
> stlpcov,kolko to potom bude.
>
> Co by mu pomohlo k zvyseniu rychlosti.
>
> S pozdravom roland(zv)dakujem.sk
>datum a cas
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 15.4.2000 16:07:59
Zdravim
s delphi zacinam, takze odpoved na muj dotaz pro vas bude urcite velmi
jednoducha
jak dostanu do caption lablu aktualni DATUM a CAS
predem diky za odpoved
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
Rychlost IB
[*] Jaro <jaro(zv)sinea(tec)cz> - 15.4.2000 07:17:19 -0700
Uz jsem o tom psal. Pouzij Bookmark.
1. Zapamatuj si Id zaznamu. Po Close + Open
2. skoc na puvodni misto a zkontroluj shodu id.
3. Pokud se id neshoduje pouzij locate na pole ID.
Operace se znacne zrychli, protoze ve vetsine pripadu nedojde
ke zmene poctu zaznamu pred zaznamem nebo se stanou mimo tvuj
interval neba za zaznamem na nemz jsi stal. V horsim pripade
se hleda locate pomoci ID, coz je relativne rychle.
Problem v rychlosti hledani zaznamu ovsem casto byva daleko vice
zpusoben bufferovanim datasetu nez rychlosti vlastniho prikazu Locate.
Pri Open Dataset otevre jen pocet zaznamu do velikosti Bufferu.
Pri skoku na jiny zaznam teprve dotahuje ze serveru dalsi data,
coz muze chvili trvat. Proto je daleko ucinnejsim resenim smysluplna
segregace dat a snaha pracovat soucasne s co nejmensim objemem dat.
Jaro
>
> Ahoj,
>
> mam DBGrid opreny o nejake Query. Udelam, resp. dostanu
> zpravu, ze nekdo udelal nejakou zmenu v datech a touzim po
> refreshi. Udelam tedy Close a Open no a otazka zni, jak bez
> Locate nastavit aktualni radek v Gridu tam, co byl (pokud nebyl
> smazan)? Ale nemusi jit ani o DBGrid, staci, kdyz se budu chtit v
> te mnozine dat, kterou Query vrati, nastavit na urcitou pozici. To
> prece pres SQL nejde - ten vratil mnozinu dat a to, jak ji klient
> zpracuje, je jiz zalezitost klienta. (nechci ani serverovsky kurzor
> apod.)
>
> David
rychlost Paradoxu po siti
[*] Jaro <jaro(zv)sinea(tec)cz> - 15.4.2000 07:29:29 -0700
> 3 roky nam funguje podnikovy IS na Novelli siti 4.11, 20 stalych klientu,
dB
> ma asi 45 MB, 60 tabulek.
> Ted to prepisuju pro MS SQL, cim vice se blizi termin prechodu, tim
> spolehlivejsi a rychlejsi je Pdox.
> SQL 7 moc nevynikne. ;-))
> Ztrata dat nas potrefila 1x kdyz chcipla UPS u serveru, par tabulek to
> nerozchodilo. A data za 15 hodin. Zadna pohroma.
>
> Cili muj verdikt zni: levne a docela pouzitelne reseni. Ale: zalohovat
> zalohovat zalohovat aspon co 6 hodin, automaticky
To neni dobry navrh pro sitove reseni - tedy kazdych 6 hodin prerusit praci
na
vsech stanicich. Ve vasem pripade se zrejme jedna vice o stesti, nebot
havaie
dat (v pripade Pdox) hrozi i pri padu klienta a ne pouze serveru.
Nedovedu si predstavit, jak je mozne zajistit, resp. obnovit datovou
integritu,
kdyz zmizi nekolik z 60 tabulek. To bude mozna tim, ze si s datovou
integritou
ve vasem projektu asi hlavu moc nelamete. To je ovsem presne to o cem jsou
servery. Srovnavat MS SQL s paradoxem a tvrdit, ze Pdox je spolehlivejsi -
to je docela usmevne a svedci o nepochopeni smyslu serveru.
Proc to vlastne na ten server prevadite?
Jaro
>
> JK
>
>datum a cas
[*] Podrazsk� Daniel <Podrazsky(zv)hzs.mepnet(tec)cz> - 15.4.2000 16:50:18
Zdar
Treba takhle
Label.Caption:=DateToStr(Date)+' '+TimeToStr(Time);
Nebop muzes pouzit fci FormatDateTime, ktera umoznuje i formatovat vystup a
je dobre popsana v helpu
> -----P�vodn� zpr�va-----
> Od: Jan Bachor [SMTP:bachor(zv)iol(tec)cz]
> Odesl�no: 15. dubna 2000 15:08
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: datum a cas
>
> Zdravim
>
> s delphi zacinam, takze odpoved na muj dotaz pro vas bude urcite velmi
> jednoducha
>
> jak dostanu do caption lablu aktualni DATUM a CAS
>
> predem diky za odpoved
>
> s pozdravem Johnboy
> --------------------------------------------------------------
> [ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
> [ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
> --------------------------------------------------------------
>
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.138 / Virov� b�ze: 64 - datum vyd�n�: 10.4.2000
textovy retezec
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 15.4.2000 19:29:25
Zdravim
mam takovej problem........
mam formular, 3 edity, memo a tlacitko
kdyz kliknu na tlacitko do souboru se zapise obsah tech tri editu, a pak v
memu se zase vypise obsah toho souboru
ale potrebuju aby v tom memu to bylo zarovnano pod sebou
jako napr
1111 aaaaaaaaa xxxxxxxx
22 ssssss 111111
poradte jak na to?
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------