Archív konference Delphi

Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.

Turbo Pascal kontra Delphi

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 12.10.1998 21:34:26

TBufStream by mel jit nahradit TFileStream, zde se ovsem neudava
velikost bufferu.
Vaclav Sazima

> Ing. J�n Kuch�r wrote:
>
> Cau
> Ked som pouzil ten tvoj prepis, tak mi zacalo vyskakovat, ze
> TBUFSTREAM je neznamy identifikator. Co s tym ???
>
> -----P�vodn� zpr�va-----
> Od: Pavel Cisar <pcisar(zv)aktis(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 23. september 1998 16:54
> P�edm�t: Re: Turbo Pascal kontra Delphi
>
> Haj hou!
>
> Pominu-li celkovou odlisnost zvirat, pak prepis je
> nasledujici:
>
> uses Classes ; // V Delphi je vetsina uzitecnosti v
> Classes, ale pro praci s objekty neni nutna (TObject je v
> implicitne zahrnovane unite System)
>
> type
>
> // PBlockStream=^TBlockStream; neni vubec zapotrebi,
> protoze v Delphi jsou vsechny objekty pointery
> TBlockStream=class(TBufStream)
> BAT:TBufStream;
> constructor
> Create(FileName:string;Mode,Size:word); // V Delphi je
> zvykem nazyvat konstruktur Create[XXX]
> destructor Destroy; override ; //
> TObject ma definovan destruktor Destroy, zadne Done a jine
> destruktory radeji nezavadet
> procedure
> ReadRec(loc:longint;Zac:pointer;Size:word);
> procedure
> WriteRec(loc:longint;Zac:pointer;Size:word);
> end;
> // PRecStream=^TRecStream;
> TRecStream=object(TBufStream)
> RAT:TBufStream;
> constructor
> Createt(FileName:string;Mode,Size:word);
> destructor Destroy; override;
> procedure
> ReadRec(loc:longint;Zac:pointer;Size:word);
> procedure
> WriteRec(loc:longint;Zac:pointer;Size:word);
> end;
> Pbyte=^byte;
> Plongint=^longint;
> Pxx=^xx;
> xx=array[1..sizeof(zaznam)] of byte;
> var Bufx:Pxx;
> BufxPtr:word;
> RecS:TRecStream; // Jak uz jsem rekl, zadne pointery
> Size:word;
>
> BTW, stejne ti nezbude nic jineho, nez to uplne prepsat,
> OP a TP jsou v implementaci objektu (mimo jine) naprosto
> odlisna zvirata.
>
> HTH
>
>
> -----P�vodn� zpr�va-----
> Caute
> Potrebuje radu. Pri definovani novych typov v
> pascale typu OBJECT sa pouzival uses OBJECTS,
> neviem ako to nahradit v DELPHI. Priamo ukazem
> definovanie v Pascale a rad by som keby ste mi
> niekto to iste mohol poslat spat prerobene pre
> DELPHI.
>
> Vdaka
>
> Tak tu to je :
> ----------------------------------------------------------------------------------------------------------------------
> uses objects;
>
> type PBlockStream=^TBlockStream;
> TBlockStream=object(TBufStream)
> BAT:TBufStream;
> constructor
> Init(FileName:string;Mode,Size:word);
> destructor Done; virtual;
> procedure
> ReadRec(loc:longint;Zac:pointer;Size:word);
> procedure
> WriteRec(loc:longint;Zac:pointer;Size:word);
> end;
> PRecStream=^TRecStream;
> TRecStream=object(TBufStream)
> RAT:TBufStream;
> constructor
> Init(FileName:string;Mode,Size:word);
> destructor Done; virtual;
> procedure
> ReadRec(loc:longint;Zac:pointer;Size:word);
> procedure
> WriteRec(loc:longint;Zac:pointer;Size:word);
> end;
> Pbyte=^byte;
> Plongint=^longint;
> Pxx=^xx;
> xx=array[1..sizeof(zaznam)] of byte;
> var Bufx:Pxx;
> BufxPtr:word;
> RecS:PRecStream;
> Size:word;
> -----------------------------------------------------------------------------------------------
>
>
> Ing. J�n Kuch�r
> Katedra inv�ci� a rein�inieringu
> SjF TU Ko&scaron;ice
> Letn� 9
> 040 01 Ko&scaron;ice
> E-mail : kuchar(zv)tuke.sk


Chybejici drivery databazi v InstallShieldu Expres

[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 13.10.1998 00:00:37

Pred casem jsem tady psal o svem problemu:

>Kdyz chci udelat v IS nejaky BDE alias,
>zadavaji se jeho parametry. Mimo jine typ tabulky.
>A me se v ComboBoxu nenabizi zadne volby (Paradox, DBase, ...)

Jako jeden z mala se ozval Petr Vones, dopisoval jsem si s nim
tam a zpatky, porovnavali jsem adresare IS, registry IS, ...

Nakonec to byl problem neuplneho zapisu v registrech pro BDE.
Zde je vysledek naseho patrani:

Po instalaci D4 pres existujici BDE 4.51 jsem pouze zkontroloval,
jestli se mi neponicila konfigurace v IDAPI32.CFG programem
BDEAdmin. Bylo to v poradku, a tak jsem BDEAdmin zase zavrel.
IS nefungoval, v registrech pro BDE chybeli zapisy o driverech.
BDE jako takove ale fungovalo bez problemu.

NAPRAVA PROBLEMU:
Udelal jsem libovolnou zmenu v konfiguraci BDE a pak jsem zase
vratil nazpet puvodni hodnotu. Kliknul jsem na vrchol stromu
Configuration a tady jsem udelal APPLY. Soucasne jsem take
v Options nastavil ukladani konfigurace jen pro 95/NT.
Nevim, ktery z techto dvou kroku to byl, ale v registrech se objevili
vsechny hodnoty driveru a IS chodi.

Doufam ze tohle zjisteni pomuze vsem s podobnym problemem.
S pozdravem Zdenek
---------------------------------------------------------------
: o__o Zdenek Sraier e-mail: sraierzd(zv)czn(tec)cz :
: ( o o) http://users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske http://www.byll(tec)cz/scuba/ :
---------------------------------------------------------------
This message was delivered using 100% recyclable electrons.

literatura

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 13.10.1998 05:58:12

Literatury o Delphi moc neni. Zkus Delphi v kostce (J.Sedlacek-J.Slaba vydal BEN) - to je tak pro seznameni nebo koncem rijna ma v Computer Pressu vyjit Mistrovstvi v Delphi 3

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Miki <XMIKULEC(zv)dinf.fsv.cvut(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. ��jna 1998 16:16
P�edm�t: literatura


Zdravim,
nevite nahodou nekdo o nejake opravdu dobre literature o programovani
v Delphi pro stredne pokrocileho zacatecnika??? Preferuji cesky jazyk.
diky
Miki
xmikulec(zv)kii.fsv.cvut(tec)cz


Patch maker

[*] Ing. Miroslav Ond��ek - 13.10.1998 06:09:37

Nevite nekdo, jestli existuje program, ktery by porovnal dva exe soubory a
vytvoril diferencni soubor (asi take exe), ktery by z prvniho porovnavaneho
souboru vytvoril ten druhy? Vlastne jde o tvorbu patche, aby nemuseli
zakaznici vzdy downloadovat celou novou verzi, ale jen patch.

Diky

S pozdravem
Ing. Miroslav Ond��ek
Bonnel Technologie, s.r.o.

E-mail:
bonnel-ondrisek(zv)telecom(tec)cz - v�voj software

internet: http://www.bonnel-tech.com
PGP podporov�no - ve�ejn� kl�� na na�� homepage

cas a datum slozky a souboru

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 13.10.1998 07:16:02

>Poradte nekdo jak zjistit datum a cas vzniku slo�ky-adresare a souboru v
nem se >nalezajicim v DELPHI4. DIKY KROKODYL- profia(zv)post(tec)cz

Nazdar,

mozno Ti bude stacit aj nieco taketo:

procedure TForm1.AddSR(SR:TSearchRec);
begin
with StringGrid1 do
begin
Cells[0,RowCount-1]:=SR.Name;
Cells[1,RowCount-1]:=IntToStr(SR.Size);
Cells[2,RowCount-1]:='$'+IntToHex(SR.Attr,2);
Cells[3,RowCount-1]:=DateTimeToStr(FileDateToDateTime(SR.Time));
RowCount:=RowCount+1;
end;
end;

procedure GetDirectory(Path:string);
var
SearchRec:TSearchRec;
begin
if FindFirst(Path, faDirectory, SearchRec)=0 then
begin
Form1.AddSR(SearchRec);
if FindFirst(Path+'\*.*', faAnyFile, SearchRec)=0 then
repeat
Form1.AddSR(SearchRec);
until FindNext(SearchRec)<>0;
end;
FindClose(SearchRec);
end;

Nefunguje to pre hodnotu Path 'c:', 'c:\' a pod.

Marek Repisky
mrepisky_zl(zv)zsnp.sk


literatura

[*] rys(zv)zas-me(tec)cz - 13.10.1998 7:18:46

Ahoj,

koupil jsem si knihu Mistrovstvi v Delphi 2 pro Windows 95/NT, autor Marco
Cantu. Na obalce pisi, ze se da objednat i na http://vltava.cpress(tec)cz. Stala
me 850 Kc, ma to asi 950 stran,. Ke knizce patri CD s ukazkami programu
(zdrojaky i zkompilovane verze). Sice neni o nejnovejsi verzi Delphi, ale
protoze jsem zacatecnik, dost pomohla (vlastne jeste pomaha).

Karel Rys

>Zdravim,
>nevite nahodou nekdo o nejake opravdu dobre literature o programovani
>v Delphi pro stredne pokrocileho zacatecnika??? Preferuji cesky jazyk.

IB a sdileni

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 13.10.1998 07:45:36

Neviem ocom sa bavite, predsa IB vie pouzivat tranzakciu, ktora prave pripade konfliktu (niekto medzitim zmenil vetu ) vykona RollBack a posle spravu. To je uplne korektne od IB.
Zamikanie zaznamov je zastaraly sposob.

TUNGLI Jan
tungli(zv)pvt.sk

----------
> Od: Jaro <jaro(zv)sinea(tec)cz>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: Re: IB a sdileni
> D�tum: 12. okt�ber 1998 12:32
>

IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 08:15:32

Hi,

clovece, ty asi poslouchas (ctes) kolenem.....

Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack je mi na
nic.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: TUNGLI Jan [SMTP:tungli(zv)pvt.sk]
> Odesl�no: 13. ��jna 1998 7:46
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: IB a sdileni
>
> Neviem ocom sa bavite, predsa IB vie pouzivat tranzakciu, ktora prave
> pripade konfliktu (niekto medzitim zmenil vetu ) vykona RollBack a
> posle spravu. To je uplne korektne od IB.
> Zamikanie zaznamov je zastaraly sposob.
>
> TUNGLI Jan
> tungli(zv)pvt.sk
>
> ----------
> > Od: Jaro <jaro(zv)sinea(tec)cz>
> > Pre: delphi-l(zv)fwd(tec)cz
> > Predmet: Re: IB a sdileni
> > D�tum: 12. okt�ber 1998 12:32
> >

cas a datum slozky a souboru

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 09:48:57

Hi,

pouzij funkci API WIN32 GetFileInformationByHandle.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: PROFIA s.r.o. [SMTP:profia(zv)post(tec)cz]
> Odesl�no: 12. ��jna 1998 19:44
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: cas a datum slozky a souboru
>
> Poradte nekdo jak zjistit datum a cas vzniku slo�ky-adresare a souboru
> v nem se nalezajicim v DELPHI4. DIKY KROKODYL- profia(zv)post(tec)cz
> <mailto:profia(zv)post(tec)cz>

ACM kodeky

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 13.10.1998 10:10:00

Hi,
nemate nekdo zkusenosti jak vyuzit ACM kodeky standartne instalovane ve windows pro kompresi zvuku ?
Mam na mysli real-time kompresi/dekompresi z/do bufferu pres standartni API funkce WaveInOpen, tak abych v bufferu ktery mi vrati callback funkce mel jiz (pri zaznamu) zkomprimovana data?.

IB a sdileni

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 13.10.1998 10:31:10

Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele v
nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve ze uz
to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak tam
ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta po
urcitem casovem intervalu, zda je nazivu, ale nevim jak na to). Jinak
pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem narazi
zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory, jak o
nich psal Martin Fronek.

Mac

Martin Fron�k wrote:

> clovece, ty asi poslouchas (ctes) kolenem.....
>
> Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack je mi na
> nic.

IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 10:34:26

Hi


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Jaro [SMTP:jaro(zv)sinea(tec)cz]
> Odesl�no: 12. ��jna 1998 12:46
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> > [Martin Fron�k] Prave - zde se uplatni vyvojarem definovane
> >chovani zamku, kdy je mozne uzivatele upozornit (pri necinnosti), aby
> >bud neco delal, nebo ukoncil editaci. Pokud bude i nadale neaktivni
> >(dlabe zrovna rizek, sel se vycurat...) tak se mu ta jeho prace da
> >schovat, zamek uvolnit, a pokud mezi tim nedoslo ke zmene, po navratu
> >zamek znovu vystavit a v praci pokracovat, nebo sdelit uzivateli, ze
> ma
> >bohuzel smulu a musi to udelat znovu (ocekavam minimum takovych
> pripadu)
> ---------
> Super. Neslo by z toho udelat DLL?
> --------
>
[Martin Fron�k] Tak to mam vyzkousene, jako funkce to chodi,
ale nedari se mi z toho udelat DLL (nikdy jsem DLL netvoril). Sice vim,
jak se ma takova DLL tvorit, ale me to nejak nefunguje. Mohl bych nekoho
pozadat o prikladek (maly) zdrojaku DLL, kde se pouzivaji komponenty
(nevizualni, nema to formular, jen datamodul)? Diky.....

IB a sdileni

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 13.10.1998 10:38:15

Jo, jeste neco. Na Delphi Developers Day (urcite vsichni byli ;-) byla
prezentovana TClientDataset z MIDASu. Ta delala v podstate to, ze pri
update hodila hlasku o tom, ze zaznam nekdo zmenil a co s tim udelat
(prepsat, ponechat atd.). Sice to neni uplne ono, ale taky by bylo fajn,
mit to primo hotove. Neexistuje neco podobneho za rozumny peniz ne-li
free? Kdo ma prachy na MIDAS ze?

Mac


CHM soubory

[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 13.10.1998 11:09:33

> From: "=?windows-1250?B?UGF0cmlrIFNs4WRl6GVr?=" <pasla(zv)iname.com>
> To: <delphi-l(zv)fwd(tec)cz>
> Subject: CHM soubory
> Date sent: Mon, 12 Oct 1998 18:13:12 +0200
> Send reply to: delphi-l(zv)fwd(tec)cz

> Doky panu Jirssskovi jsem ten nssstroj pro tvorbu nsspov dy pro Win98
> naUEel: je to na CHIP CD 7/98, soubor G:\sharewar\htmlhelp\htmlhelp.exe.
> JeUEt jednou, doky moc.
> Patrik Slssde ek
>
>
Ja uz jsem si ho dal take sem na pocitac, takze ho muzu poslat, pokud
ma nekdo zajem. Ale ma to 3.5 MB, takze jen pripadnym zajemcum na
soukromou adresu.
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz


Thready kontra Messages

[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 13.10.1998 11:23:49

Ahoj vsem,
v D3 delam jednu komponentu pro sitovou komunikaci, je proto odvozena
od TThread. Z jeji metody Execute se vyvola API fce, ktera pri urcite
udalosti posle zpravu moji funkci (obdoba WndProc) v threadu. Tzn. v
tomto okamziku nesmi thread byt ukonceny. Z toho my vychazi na konci
Execute udelat smycku, ktera bude jen testovat Terminated a jinak
nebude mit zadnou funkci. To mi ale pripada zbytecne, aplikace jen
ceka na zpravu ale ten thread musi byt stale zbytecne aktivni a ubyra
cas CPU. Druha moznost by byla Suspendnout Thread a spustit jej az
pri prichodu zpravy, ale muze se spoustet fce ze Suspendnuteho
threadu?
Nebo uvazuju spatne? Nejak si to porad nedovedu ujasnit, jak
skloubit Message a Thready dohromady.
Vsem predem dik.
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz


IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 11:44:01

Hi,

existuje.

Ma to F. Piette. Nemuzu si vzpomenout na URL, ale jmenuje se to
MidWare.....Az si vzpomenu, poslu URL.

na DDD jsem nebyl....nejsem uzivatel Delphi. Sel bych leda na Builder
Developers Day :-)


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 13. ��jna 1998 10:38
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> Jo, jeste neco. Na Delphi Developers Day (urcite vsichni byli ;-) byla
> prezentovana TClientDataset z MIDASu. Ta delala v podstate to, ze pri
> update hodila hlasku o tom, ze zaznam nekdo zmenil a co s tim udelat
> (prepsat, ponechat atd.). Sice to neni uplne ono, ale taky by bylo
> fajn,
> mit to primo hotove. Neexistuje neco podobneho za rozumny peniz ne-li
> free? Kdo ma prachy na MIDAS ze?
>
> Mac


IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 11:45:52

Hi,

uz je to celkem hotove a funkcni, takze vydrz, nedari se mi z toho
udelat DLL, protoze to zatim neumim....prikladek na DLL by se hodil.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 13. ��jna 1998 10:31
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele v
> nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve ze
> uz
> to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak
> tam
> ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta po
> urcitem casovem intervalu, zda je nazivu, ale nevim jak na to). Jinak
> pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem
> narazi
> zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
> uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory, jak
> o
> nich psal Martin Fronek.
>
> Mac
>
> Martin Fron�k wrote:
>
> > clovece, ty asi poslouchas (ctes) kolenem.....
> >
> > Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack je
> mi na
> > nic.

Free komponenty pro internet

[*] Pavel_Fuciman.UNION(zv)union(tec)cz - 13.10.1998 12:06:21

Ahoj,
mam otazecku, jestli nekdo nevi o nejakych free komponentach pro internet.

Diky

IB a sdileni

[*] ing.Da�a Ale� - 13.10.1998 12:08:00

Hi
je to unita s type TReconcileErrorForm. Vola se na event chyba a zobrazi
polozky dotazu,
je mozne je editovat a udelat s nema zvolenou akci.

Ales Dana



-----P�vodn� zpr�va-----
Od: Martin Kubecka <martin.kubecka(zv)amenit(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. ��jna 1998 12:40
P�edm�t: Re: IB a sdileni


>Jo, jeste neco. Na Delphi Developers Day (urcite vsichni byli ;-) byla
>prezentovana TClientDataset z MIDASu. Ta delala v podstate to, ze pri
>update hodila hlasku o tom, ze zaznam nekdo zmenil a co s tim udelat
>(prepsat, ponechat atd.). Sice to neni uplne ono, ale taky by bylo fajn,
>mit to primo hotove. Neexistuje neco podobneho za rozumny peniz ne-li
>free? Kdo ma prachy na MIDAS ze?
>
>Mac
>

Thready kontra Messages

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 13.10.1998 12:26:56

>cas CPU. Druha moznost by byla Suspendnout Thread a spustit jej az
>pri prichodu zpravy, ale muze se spoustet fce ze Suspendnuteho


Rekl bych, ze by ti mohla pomoci fce MsgWaitForMultipleObjects.
Ta zbrzdi thread do doby, nez se objevi zprava podle zadaneho filtru.

Martin

DBF viewer

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 13.10.1998 12:34:11

Zdravim,

nemate tip, jak pomoci Delphi bez BDE prohlizet DBF soubory?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

OnChange v komponente

[*] honzajl(zv)email(tec)cz - 13.10.1998 12:49:22


Zdar vsici,

Mam ukrutnej problem. Pisu komponentu "TEditNumeric", coz je TEdit do
kteryho nejdou zapisovat pismena a tak.
Problem je v tom, kdyz :

EditNumeric1.Text := '';
StrToInt(EditNumeric1.Text);

Potrebuju dat do komponenty na "OnChange" kontrolu, ktera tam misto
'' vrazi 0

protected
procedure OnChange(var Cosi: Char); override; --funguje, vse OK
procedure KeyDown; override; --nefunguje, "override" se zda byt
osklive, CO TED???


Predem diky za pomoc, pokud mozno rychlou ale nechci si vymejslet :-)

...............Honza Linhart


--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email


literatura

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 13.10.1998 12:49:41


Ano, rad bych se pripojil k tomuto nazoru,
bez teto knizky bych byl ztacen. Cetl jsem
i jednicku (ma dva dily) a myslim, ze je
dobra. Je to spis pro zacatecniky, ale i
otrely programamtator zde jiste najde
nejake "novinky"

D.

----------
Od: rys(zv)zas-me(tec)cz[SMTP:rys(zv)zas-me(tec)cz]
Odesl�no: 13. ��jna 1998 7:18
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: literatura

Ahoj,

koupil jsem si knihu Mistrovstvi v Delphi 2 pro Windows 95/NT, autor Marco
Cantu. Na obalce pisi, ze se da objednat i na http://vltava.cpress(tec)cz. Stala
me 850 Kc, ma to asi 950 stran,. Ke knizce patri CD s ukazkami programu
(zdrojaky i zkompilovane verze). Sice neni o nejnovejsi verzi Delphi, ale
protoze jsem zacatecnik, dost pomohla (vlastne jeste pomaha).

Karel Rys

>Zdravim,
>nevite nahodou nekdo o nejake opravdu dobre literature o programovani
>v Delphi pro stredne pokrocileho zacatecnika??? Preferuji cesky jazyk.

OnChange v komponente

[*] honzajl(zv)email(tec)cz - 13.10.1998 12:55:16


Zdar vsici,

Mam ukrutnej problem. Pisu komponentu "TEditNumeric", coz je TEdit do
kteryho nejdou zapisovat pismena a tak.
Problem je v tom, kdyz :

EditNumeric1.Text := '';
StrToInt(EditNumeric1.Text);

Potrebuju dat do komponenty na "OnChange" kontrolu, ktera tam misto
'' vrazi 0

protected
procedure OnChange(var Cosi: Char); override; --funguje, vse OK
procedure KeyDown; override; --nefunguje, "override" se zda byt
osklive, CO TED???


Predem diky za pomoc, pokud mozno rychlou ale nechci si vymejslet :-)

...............Honza Linhart


--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email


IB a sdileni

[*] Baluch <tpplus(zv)zasova(tec)cz> - 13.10.1998 12:58:46

Stranky ICS (F. Piette - MidWare Overbyte) jsou zde:
http://www.rtfm.be/fpiette/indexuk.htm
Nekontroloval jsem jestli tam opravdu je to, po cem touzish

Bye, Baluch
-----P�vodn� zpr�va-----
Od: Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 13. ��jna 1998 12:23
P�edm�t: RE: IB a sdileni


Hi,

existuje.

Ma to F. Piette. Nemuzu si vzpomenout na URL, ale jmenuje se to
MidWare.....Az si vzpomenu, poslu URL.

Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 13. ��jna 1998 10:38
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> Jo, jeste neco. Na Delphi Developers Day (urcite vsichni byli ;-) byla
> prezentovana TClientDataset z MIDASu. Ta delala v podstate to, ze pri
> update hodila hlasku o tom, ze zaznam nekdo zmenil a co s tim udelat
> (prepsat, ponechat atd.). Sice to neni uplne ono, ale taky by bylo
> fajn,
> mit to primo hotove. Neexistuje neco podobneho za rozumny peniz ne-li
> free? Kdo ma prachy na MIDAS ze?
>
> Mac


IB a sdileni

[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 13.10.1998 13:00:54

TUNGLI Jan wrote:

> Neviem ocom sa bavite, predsa IB vie pouzivat tranzakciu, ktora prave pripade konfliktu (niekto medzitim zmenil vetu ) vykona RollBack a posle spravu. To je uplne korektne od IB.
> Zamikanie zaznamov je zastaraly sposob.

Prosim, nemohl bys blize rozvest tuto myslenku ? Mas na mysli komponentu?
Neco jsem s tim zkousel ale asi jsem si to spatne nakonfiguroval
a nic kloudneho mi z toho nevylezlo. Mou potrebou je ohlidat si takto
CashedUpdated Query. Budu Ti vdecen, pokud mne postrcis dal.
Dekuji Zdenek.

====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech Republic
http://www.ipl(tec)cz
====================================================

DBF viewer

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 13.10.1998 13:02:12

Taky by me zajimalo

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
Komu: '*** Delphi' <delphi-l(zv)fwd(tec)cz>
Datum: 13. ��jna 1998 12:37
P�edm�t: DBF viewer


Zdravim,

nemate tip, jak pomoci Delphi bez BDE prohlizet DBF soubory?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

CHM soubory

[*] Karel Chmel <kchmel(zv)csob(tec)cz> - 13.10.1998 13:08:44

Prisla mi aktualizace DSP a tam uz taky neco nabizeji:

LINK: http://www.vwm.com/hyperact/products/eah30.zip
eAuthor is a template based RAD authoring tool for HTML Help
(Win 98 Help) and printed documentation. Includes support for
WYSIWYG editing, Raw HTML editing, object inspector and
property editors. Includes VCL HTML Help deployment components.
( ver. 3.0 ) ( SHAREWARE ) by HyperAct, Inc.

Karel
----------
> Odes�latel: Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: CHM soubory
> Datum: 13. ��jna 1998 11:09
>
> > From: "=?windows-1250?B?UGF0cmlrIFNs4WRl6GVr?=" <pasla(zv)iname.com>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Subject: CHM soubory
> > Date sent: Mon, 12 Oct 1998 18:13:12 +0200
> > Send reply to: delphi-l(zv)fwd(tec)cz
>
> > Doky panu Jirssskovi jsem ten nssstroj pro tvorbu nsspov dy pro Win98
> > naUEel: je to na CHIP CD 7/98, soubor G:\sharewar\htmlhelp\htmlhelp.exe.
> > JeUEt jednou, doky moc.
> > Patrik Slssde ek
> >
> >
> Ja uz jsem si ho dal take sem na pocitac, takze ho muzu poslat, pokud
> ma nekdo zajem. Ale ma to 3.5 MB, takze jen pripadnym zajemcum na
> soukromou adresu.
> Filip Jirsak
> e-mail: Jirsak(zv)gymnacel(tec)cz


IB a sdileni

[*] Juraj Nagy <Juraj.Nagy(zv)nh-trans(tec)cz> - 13.10.1998 13:11:49

Ja bych k problemu IB a sdileni chtel pripomenout vsem, kto potrebuji
ty zamky, ze na osetreni kritickych situaci se ma myslet pri vyvoji.
Kdyz chci klient/server aplikaci, tak bych mel vymyslet reseni ktere
neodporuje teto technologii. Tj. poradna analyza, promysleny system
pristupovych prav k datum (o tom tady uz byla rec), ale i promysleny
system prace uzivatelu s datama (to je na tom vsem asi nejslozitejsi
- to se totiz vlastne moc netyka samotneho programu), atd. Neni to
nic jednoducheho a jsou k tomu nutne slusne znalosti. Taky neznam
klient/serverovskou aplikaci k necemu, ktera by byla hotova za
vikend, nebo za tyden. Pouziti zamku neni zastarale, je to jenom
uplne jiny pristup k datu m. Pokud nekdo chce pouzit zamky (staci pri
nekolika desitkach uzivatelu), daleko se nedostane ani s nejlepsim
databazovym servrem.
Takzy kdyz to nekdo potrebuje, myslim si, ze v prvni rade by se mel
zamyslet sam nad sebou a nad svym programem a az potom nadaval na
nejaky db-server. Ten dela jenom to, k cemu ho vytvorili. A dela to
dobre.

S pozdravem

J. Nagy
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
> -----P�vodn� zpr�va-----
> Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 13. ��jna 1998 10:31
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele
> v
> nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve
> ze uz
> to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak
> tam
> ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta
> po
> urcitem casovem intervalu, zda je nazivu, ale nevim jak na to).
> Jinak
> pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem
> narazi
> zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
> uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory,
> jak o
> nich psal Martin Fronek.
>
> Mac
>
> Martin Fron�k wrote:
>
> > clovece, ty asi poslouchas (ctes) kolenem.....
> >
> > Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack
je
> > mi na
> > nic.

DBF viewer

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 13.10.1998 13:14:26


Muzi Ti poslat komponenty pro praci s DBF, ale
ta jedna vykazuje chyby pri zmene sirky DBGrid-u
Napis, jestli to chces, neni to jen prohlizeni,
maji i metody Add, ...

Dobra.


----------
Od: Krayzel Libor[SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
Odesl�no: 13. ��jna 1998 12:34
Komu: '*** Delphi'
P�edm�t: DBF viewer

Zdravim,

nemate tip, jak pomoci Delphi bez BDE prohlizet DBF soubory?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Thready kontra Messages

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 13.10.1998 13:27:20

Dne Tue, 13 Oct 1998 11:23:49 +0100 Filip Jirsak napsal:

> Ahoj vsem,
> v D3 delam jednu komponentu pro sitovou komunikaci, je proto odvozena
> od TThread. Z jeji metody Execute se vyvola API fce, ktera pri urcite
> udalosti posle zpravu moji funkci (obdoba WndProc) v threadu. Tzn. v
> tomto okamziku nesmi thread byt ukonceny. Z toho my vychazi na konci
> Execute udelat smycku, ktera bude jen testovat Terminated a jinak
> nebude mit zadnou funkci. To mi ale pripada zbytecne, aplikace j
Mozna by pomohlo do te smycky pridat
Sleep(100)
napr., to bude cekat 1/10 vteriny a nebude zrat CPU time

Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772


Free komponenty pro internet

[*] Baluch <tpplus(zv)zasova(tec)cz> - 13.10.1998 13:28:11

Pred xvilickou jsem posilal URL na stranky F.Piette (was: IB a sdileni) - to
je home ICS (Internet Component Suite) coz je sada komponent temer na vse co
souvisi Inetem. Nekdy to ale casove nevyjde :-)
Takze jeste jednou, tentokrat na tema inetove komponenty:
http://www.rtfm.be/fpiette/indexuk.htm
Bye Baluch

-----P�vodn� zpr�va-----
Od: Pavel_Fuciman.UNION(zv)union(tec)cz <Pavel_Fuciman.UNION(zv)union(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. ��jna 1998 12:55
P�edm�t: Free komponenty pro internet


>Ahoj,
>mam otazecku, jestli nekdo nevi o nejakych free komponentach pro internet.
>
>Diky
>
>

DBF viewer

[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 13.10.1998 13:50:38

Podivejte se na http://www.kylecordes.com/> Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
> Mius a.s. (http://www.mius(tec)cz)
> Dlouha 2940
> 415 01 TEPLICE
> Czech Republic
>
>
>
> -----P�vodn� zpr�va-----
> Od: Jan Fiala [SMTP:jan.fiala(zv)iname.com]
> Odesl�no: 13. ��jna 1998 13:02
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: DBF viewer
>
> Taky by me zajimalo
>
> -----------------------------------------------------------------
> ing. Jan Fiala��������� jan.fiala(zv)iname.com <mailto:jan.fiala(zv)iname.com>
> Prog-Soft s.r.o.
> INFOS - informa�n� system pro n�poj��e
> ---------------------------------------------------------------
>
> -----P�vodn� zpr�va-----
> Od: Krayzel Libor < Libor.Krayzel(zv)czech-tv(tec)cz
> <mailto:Libor.Krayzel(zv)czech-tv(tec)cz>>
> Komu: '*** Delphi' < delphi-l(zv)fwd(tec)cz <mailto:delphi-l(zv)fwd(tec)cz>>
> Datum: 13. ��jna 1998 12:37
> P�edm�t: DBF viewer
>
>
> Zdravim,
>
> nemate tip, jak pomoci Delphi bez BDE prohlizet DBF soubory?
>
> .........................................................
> . Libor Krayzel���������������������������������������� .
> . Czech Television, Studio Ostrava��������������������� .
> . Dvorakova 18, 702 00 Ostrava������������������������� .
> . Telephone: 069-6201375������������������������������� .
> . URL: <http://webhost(tec)cz/elka>�������������������������� .
> . E-mail: <mailto:Libor.Krayzel(zv)czech-tv(tec)cz>������������� .
> . Fidonet: <mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz>� .
> . E-mail2: <mailto:sovtop(zv)email(tec)cz>���������������������� .
> .........................................................
>
>

DBLookupListBox

[*] M-PRO s.r.o. <software(zv)mpro(tec)cz> - 13.10.1998 13:59:37

Zdar,
potrebuji u komponenty DBLookupListBox volat metodu pri zmene vyberu
(OnChange nebo neco na ten zpusob.)

Diky Kata


DBF viewer

[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 13.10.1998 14:34:32

Panove co trochu vlastni snahy ? Na DSP jsem nasel behem 5 minut nekolik
komponent presne na tohle napr.:
dbf.zip, tbdbase.zip, xbase.zip. Neco uz jsem vyzkousel a v pohode funguje.

-----------------------------------------------------
David Vodnansky - database analyst
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------


> -----P�vodn� zpr�va-----
> Od: Jan Fiala [SMTP:jan.fiala(zv)iname.com]
> Odesl�no: 13. ��jna 1998 13:02
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: DBF viewer
>
> Taky by me zajimalo
>
> -----P�vodn� zpr�va-----
> Od: Krayzel Libor < Libor.Krayzel(zv)czech-tv(tec)cz
> <mailto:Libor.Krayzel(zv)czech-tv(tec)cz>>
> Komu: '*** Delphi' < delphi-l(zv)fwd(tec)cz <mailto:delphi-l(zv)fwd(tec)cz>>
> Datum: 13. ��jna 1998 12:37
> P�edm�t: DBF viewer
>
>
> Zdravim,
>
> nemate tip, jak pomoci Delphi bez BDE prohlizet DBF soubory?
>
>

DBF viewer

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 13.10.1998 14:40:15

Subject: Re: DBF viewer


Taky by me zajimalo

Mrknete se ke me - http://webhost(tec)cz/elka do sekce PROGRAMOVANI.
.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Free komponenty pro internet

[*] Administrator <Administrator(zv)rosoft.sk> - 13.10.1998 14:42:02



> -----P�vodn� zpr�va-----
> Od: Pavel_Fuciman.UNION(zv)union(tec)cz [SMTP:Pavel_Fuciman.UNION(zv)union(tec)cz]
> Odesl�no: 13. okt�ber 1998 13:06
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Free komponenty pro internet
>
> Ahoj,
> mam otazecku, jestli nekdo nevi o nejakych free komponentach pro
> internet.
>
> Diky
>
[Administrator]

www.pbear.com ak chces offline browser, ale neni to free. Ale
oplati sa do toho investovat. Patrik Tesar


Patch maker

[*] Zbyn�k Grygar <zgrygar(zv)zeal(tec)cz> - 13.10.1998 14:56:08

[P��loha v souboru: vcard.vcf]
Existuje WinPatch zatim vim o verzi 1.1 a existuje to i jako shareware
jinak je od firmy Artistry, dokonce existuje ActiveX componenta

Zbynek Grygar


> Nevite nekdo, jestli existuje program, ktery by porovnal dva exe soubory a
> vytvoril diferencni soubor (asi take exe), ktery by z prvniho porovnavaneho
> souboru vytvoril ten druhy? Vlastne jde o tvorbu patche, aby nemuseli
> zakaznici vzdy downloadovat celou novou verzi, ale jen patch.
>
> Diky
>
> S pozdravem
> Ing. Miroslav Ond��ek
> Bonnel Technologie, s.r.o.

Design Editor

[*] Michal Motalik <motalik(zv)zl.inext(tec)cz> - 13.10.1998 15:36:54


Ahoj vespolek!

Delam neco jako Run-time Design Editor a nevim si rady s jednou malou ale
dulezitou veci.

Modelova situace:
- mam objekt (je jedno jaky, ale treba TImage) polozeny na panelu
- stisknu na nem tlacitko mysi

Dotaz:
Jakym zpusobem dosahnu toho, aby udalost OnMouseDown odchitil az ten panel a
ne ten objekt co je na nem? (neco takoveho je v Delphi pri navrhu
formularu).

Kdo muze, at pomuze ...

Pavel CABAK
cabak(zv)zl.inext(tec)cz


IB a sdileni

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 13.10.1998 16:06:13

Juraj Nagy wrote:
>
> Ja bych k problemu IB a sdileni chtel pripomenout vsem, kto potrebuji
> ty zamky, ze na osetreni kritickych situaci se ma myslet pri vyvoji.

No asi na to nebudu myslet, kdyz uz to mam hotove, ze? :-) To je trosku
pozde...

> Kdyz chci klient/server aplikaci, tak bych mel vymyslet reseni ktere
> neodporuje teto technologii.

Nevim co odporuje technologii na moznosti umoznit editaci zaznamu pouze
jednomu uzivateli najednou. Porad je to C/S aplikace se vsemi jeho
vyhodami a nevyhodami.

> Tj. poradna analyza, promysleny system
> pristupovych prav k datum (o tom tady uz byla rec), ale i promysleny
> system prace uzivatelu s datama (to je na tom vsem asi nejslozitejsi
> - to se totiz vlastne moc netyka samotneho programu), atd.

Jiste to nekdy pomuze, ale dam ti jednoduchy priklad z praxe:

Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
operatori). Operatori vidi na monitoru vsechny zasilky a podle
komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
nebudu delat na lokalni databazi (na ktere to mimochodem predtim jelo a
uz to nestihalo).

> Neni to
> nic jednoducheho a jsou k tomu nutne slusne znalosti. Taky neznam
> klient/serverovskou aplikaci k necemu, ktera by byla hotova za
> vikend, nebo za tyden.

Zalezi na rozsahu. C/S adresar firem udelas i za hodinu ;-)))

> Pouziti zamku neni zastarale, je to jenom
> uplne jiny pristup k datu m. Pokud nekdo chce pouzit zamky (staci pri
> nekolika desitkach uzivatelu), daleko se nedostane ani s nejlepsim
> databazovym servrem.

Je to ciste vec aplikace ...

> Takzy kdyz to nekdo potrebuje, myslim si, ze v prvni rade by se mel
> zamyslet sam nad sebou a nad svym programem a az potom nadaval na
> nejaky db-server. Ten dela jenom to, k cemu ho vytvorili. A dela to
> dobre.

Takze se jdu nad sebou zamyslet :-). Ne vazne, problem znate (on to teda
zase takovy problem neni, protoze uz vice nez rok nam to jede bez
jakehokoliv zakolisani) takze muzete vymyslet nejake jine, lepsi, ciste
C/S reseni - ja ho neznam.


Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Thready kontra Messages

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.10.1998 18:28:29

Filip Jirsak wrote:
>
> Ahoj vsem,
> v D3 delam jednu komponentu pro sitovou komunikaci, je proto odvozena
> od TThread. Z jeji metody Execute se vyvola API fce, ktera pri urcite
> udalosti posle zpravu moji funkci (obdoba WndProc) v threadu. Tzn. v
> tomto okamziku nesmi thread byt ukonceny. Z toho my vychazi na konci
> Execute udelat smycku, ktera bude jen testovat Terminated a jinak
> nebude mit zadnou funkci. To mi ale pripada zbytecne, aplikace jen
> ceka na zpravu ale ten thread musi byt stale zbytecne aktivni a ubyra
> cas CPU. Druha moznost by byla Suspendnout Thread a spustit jej az
> pri prichodu zpravy, ale muze se spoustet fce ze Suspendnuteho
> threadu?
> Nebo uvazuju spatne? Nejak si to porad nedovedu ujasnit, jak
> skloubit Message a Thready dohromady.

Ahoj,

zkus to popsat trochu bliz, reseni muze byt vic ....

--
Petr Vones, amatersky programator

IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 13.10.1998 18:34:36

Hi,

v zasade mas pravdu, jenze si uvedom, ze v programu modelujes obraz
realneho sveta a REALNYCH UZIVATELU.

Nebyl by az takovy problem (z technickeho hlediska) provest rollback,
ale uzivatele jsou lidi a tvorenim dat stravi nejaky cas. A kdyz jim
budes takhle zneprijemnovat zivot, tak te nebudou mit radi......
Zamykani tvrdym zamkem se proto musi pouzivat jen tam, kde to je
nezbytne nutne a prilis to nebrzdi praci celku........


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Juraj Nagy [SMTP:Juraj.Nagy(zv)nh-trans(tec)cz]
> Odesl�no: 13. ��jna 1998 13:12
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: IB a sdileni
>
> Ja bych k problemu IB a sdileni chtel pripomenout vsem, kto potrebuji
> ty zamky, ze na osetreni kritickych situaci se ma myslet pri vyvoji.
> Kdyz chci klient/server aplikaci, tak bych mel vymyslet reseni ktere
> neodporuje teto technologii. Tj. poradna analyza, promysleny system
> pristupovych prav k datum (o tom tady uz byla rec), ale i promysleny
> system prace uzivatelu s datama (to je na tom vsem asi nejslozitejsi
> - to se totiz vlastne moc netyka samotneho programu), atd. Neni to
> nic jednoducheho a jsou k tomu nutne slusne znalosti. Taky neznam
> klient/serverovskou aplikaci k necemu, ktera by byla hotova za
> vikend, nebo za tyden. Pouziti zamku neni zastarale, je to jenom
> uplne jiny pristup k datu m. Pokud nekdo chce pouzit zamky (staci pri
> nekolika desitkach uzivatelu), daleko se nedostane ani s nejlepsim
> databazovym servrem.
> Takzy kdyz to nekdo potrebuje, myslim si, ze v prvni rade by se mel
> zamyslet sam nad sebou a nad svym programem a az potom nadaval na
> nejaky db-server. Ten dela jenom to, k cemu ho vytvorili. A dela to
> dobre.
>
> S pozdravem
>
> J. Nagy
> e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
>
>
>
> > -----P�vodn� zpr�va-----
> > Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> > Odesl�no: 13. ��jna 1998 10:31
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: IB a sdileni
> >
> > Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele
> > v
> > nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve
> > ze uz
> > to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak
> > tam
> > ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta
> > po
> > urcitem casovem intervalu, zda je nazivu, ale nevim jak na to).
> > Jinak
> > pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem
> > narazi
> > zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
> > uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory,
> > jak o
> > nich psal Martin Fronek.
> >
> > Mac
> >
> > Martin Fron�k wrote:
> >
> > > clovece, ty asi poslouchas (ctes) kolenem.....
> > >
> > > Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack
> je
> > > mi na
> > > nic.
>

TNestedTable

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.10.1998 19:08:22

Ahoj,

zkousel jste nekdo uz pracovat v D4 s TNestedTable, bez MIDAS
komponent? Je tato komponenta i D4 Profi (vedle TTable a
TQuery)?


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


OnChange v komponente

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.10.1998 19:56:17

honzajl(zv)email(tec)cz wrote:
> Zdar vsici,
>
> Mam ukrutnej problem. Pisu komponentu "TEditNumeric", coz je TEdit do
> kteryho nejdou zapisovat pismena a tak.
> Problem je v tom, kdyz :
>
> EditNumeric1.Text := '';
> StrToInt(EditNumeric1.Text);
>
> Potrebuju dat do komponenty na "OnChange" kontrolu, ktera tam misto
> '' vrazi 0
>
> protected
> procedure OnChange(var Cosi: Char); override; --funguje, vse OK
> procedure KeyDown; override; --nefunguje, "override" se zda byt
> osklive, CO TED???

Ahoj,

chybi ti tam parametry u KeyDown, musis je tam uvest tak jak jsou v metode
predka, napr.:

TMyEdit = class(TEdit)
protected
procedure KeyDown(var Key: Word; Shift: TShiftState); override;
end;

Jinak pro ciselny vstup muzes pouzit i TMaskEdit.

--
Petr Vones, amatersky programator

TNestedTable

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.10.1998 20:03:31

Zbysek Hlinka wrote:
>
> Ahoj,
>
> zkousel jste nekdo uz pracovat v D4 s TNestedTable, bez MIDAS
> komponent? Je tato komponenta i D4 Profi (vedle TTable a
> TQuery)?

Ne, nevidim ji tam, ale treba se nekam schovala ...... :-)

Nicmene jsem se jeste podezrivave podival i do zdrojaku a v dbtables jsem ji
nasel (vida, tam se ta potvora schovava). Ze by slo o dalsi fintu na vyvojare
jako jsi tu uz popisoval se psanim services ? Nebo ji bez Midasu nelze opravdu
k nicemu pouzit ?

--
Petr Vones, amatersky programator


IB a sdileni

[*] Jaro <jaro(zv)sinea(tec)cz> - 13.10.1998 21:46:56

Ja plne souhlasim s nazorem J. Nagyho
Zrovna vcera jsem si tyto veci znovu uvedomil, kdyz jsem videl v chodu
iformacni system na databazi Informix, kde bylo najednou aktivne prihlaseno
160 klientu. Na tom systemu pracuje soucasne 160 REALNYCH UZIVATELU a system
je REALNY a co vice, je funkcni. Funguje, protoze nema tvrde zamky. V tomto
konkretnim pripade se jedna o komlexni zdravotnicky informacni system vcetne
ekonomiky, pojistovny, laboratori, hospitalizace, poraden a mnoha dalsich
modulu.
Problemy zakazek
(jak zde bylo jako priklad v jednom prispevku uvadeno) jsou samozrejme
reseny nikoliv pomoci zamku. Tento system zdaleka neni jediny. Znam tez
obdobne zalozeny system pro podnikovou vyrobu
na databazovem stroji Oracle a dalsi informacni systemy.To nerikam proto,
abych nekoho ohromil, ale abych pripomel, ze nepouzivani zamku neni odklon
od REALITY a ignorovani potreb zakazniku. Opravdu se to musi delat jinak.
Pokud bude nekolik desitek uzivatelu pouzivat zamky,
pak proste server konci a system je nepouzitelny. Databazove stroje jsou
urceny predevsim pro mnoho uzivatelu. Ja sam patrim mezi propagatory serveru
i do malych systemu s malym poctem uzivatlu z duvodu velke spolehlivosti
techto stroju. To vsak neznamena, ze by se to muselo delat jinak. Co funguje
pro destitky a stovky uzivatelu, muze se stejnou logikou fungovat i v
systemu pro dva uzivatele.

ALE, jak jsem napsal jiz drive, nekdy se zamek muze hodit (i mne).
Ja to neodsuzuju. Pouze jsem tvrdil, ze IB neni spatny, kdyz tyto zamky
nema,
protoze v jeho zajmu stoji systemy, ktere je principialne nemohou pouzivat.

Jaro
-------------------------

>Hi,
>v zasade mas pravdu, jenze si uvedom, ze v programu modelujes obraz
>realneho sveta a REALNYCH UZIVATELU.
>
>Nebyl by az takovy problem (z technickeho hlediska) provest rollback,
>ale uzivatele jsou lidi a tvorenim dat stravi nejaky cas. A kdyz jim
>budes takhle zneprijemnovat zivot, tak te nebudou mit radi......
>Zamykani tvrdym zamkem se proto musi pouzivat jen tam, kde to je
>nezbytne nutne a prilis to nebrzdi praci celku........
>
>
>Martin Fron�k
>ZZN Slan� a.s.
>Pra�sk� 1579, 274 49, Slan�
>tel. +420-314-522986
>e-mail: fronek(zv)zznslany(tec)cz
>
>> -----P�vodn� zpr�va-----
>> Od: Juraj Nagy [SMTP:Juraj.Nagy(zv)nh-trans(tec)cz]
>> Odesl�no: 13. ��jna 1998 13:12
>> Komu: 'delphi-l(zv)fwd(tec)cz'
>> P�edm�t: RE: IB a sdileni
>>
>> Ja bych k problemu IB a sdileni chtel pripomenout vsem, kto potrebuji
>> ty zamky, ze na osetreni kritickych situaci se ma myslet pri vyvoji.
>> Kdyz chci klient/server aplikaci, tak bych mel vymyslet reseni ktere
>> neodporuje teto technologii. Tj. poradna analyza, promysleny system
>> pristupovych prav k datum (o tom tady uz byla rec), ale i promysleny
>> system prace uzivatelu s datama (to je na tom vsem asi nejslozitejsi
>> - to se totiz vlastne moc netyka samotneho programu), atd. Neni to
>> nic jednoducheho a jsou k tomu nutne slusne znalosti. Taky neznam
>> klient/serverovskou aplikaci k necemu, ktera by byla hotova za
>> vikend, nebo za tyden. Pouziti zamku neni zastarale, je to jenom
>> uplne jiny pristup k datu m. Pokud nekdo chce pouzit zamky (staci pri
>> nekolika desitkach uzivatelu), daleko se nedostane ani s nejlepsim
>> databazovym servrem.
>> Takzy kdyz to nekdo potrebuje, myslim si, ze v prvni rade by se mel
>> zamyslet sam nad sebou a nad svym programem a az potom nadaval na
>> nejaky db-server. Ten dela jenom to, k cemu ho vytvorili. A dela to
>> dobre.
>>
>> S pozdravem
>>
>> J. Nagy
>> e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
>>
>>
>>
>> > -----P�vodn� zpr�va-----
>> > Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
>> > Odesl�no: 13. ��jna 1998 10:31
>> > Komu: delphi-l(zv)fwd(tec)cz
>> > P�edm�t: Re: IB a sdileni
>> >
>> > Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele
>> > v
>> > nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve
>> > ze uz
>> > to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak
>> > tam
>> > ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta
>> > po
>> > urcitem casovem intervalu, zda je nazivu, ale nevim jak na to).
>> > Jinak
>> > pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem
>> > narazi
>> > zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
>> > uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory,
>> > jak o
>> > nich psal Martin Fronek.
>> >
>> > Mac
>> >
>> > Martin Fron�k wrote:
>> >
>> > > clovece, ty asi poslouchas (ctes) kolenem.....
>> > >
>> > > Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack
>> je
>> > > mi na
>> > > nic.
>>

IB a sdileni

[*] Jaro <jaro(zv)sinea(tec)cz> - 13.10.1998 21:46:40

>No asi na to nebudu myslet, kdyz uz to mam hotove, ze? :-) To je trosku
>pozde...
-----
To tedy ano. Je dobre, kdyz analyza predchazi vyvoji.
-----
>Jiste to nekdy pomuze, ale dam ti jednoduchy priklad z praxe:
>Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
>telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
>operatori). Operatori vidi na monitoru vsechny zasilky a podle
>komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
>jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
>pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
>nebudu delat na lokalni databazi (na ktere to mimochodem predtim jelo a
>uz to nestihalo).
-----
Nic o tom programu nevim, ale mam pocit, ze by zrovna takovy pripad byl
resitelny bez zamku.
V okamziku kdy nekdo 'urve' zasilku (podle pristupovych prav, priorit a na
stejne urovni treba dle zakona kdo driv prijde ten driv mele), tak tu
zasilku
automaticky oznacim kdy, kdo a komu ji pridelil. Ostatnim uz pak nepovolim
stejne operace. Editovat ji muze jen ten kdo ji oznacil a ostatni at se
porvou
o dalsi zasilky.
... treba .... nebo take jinak
Jaro


DBLookupListBox

[*] Martin Kuska <martin.kuska(zv)amenit(tec)cz> - 13.10.1998 22:40:56

"M-PRO s.r.o." wrote:

> Zdar,
> potrebuji u komponenty DBLookupListBox volat metodu pri zmene vyberu
> (OnChange nebo neco na ten zpusob.)
>
> Diky Kata

Cau.
To bude nejspis udalost OnClick. Kupodivu se provadi i kdyz nepouzijes
mys. Mne docela trvalo, nez jsem si zvykl, ze nejen Click spousti OnClick
:-).

--
==============================================================
= Ing. Martin Ku�ka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================

Datum souboru

[*] Miki Vom��ka����h������� - 13.10.1998 22:57:52

Posim jak lze zjistit datum, kdy byl naposled soubor zm�n�n?
Diky

Miki Vomacka

Datum souboru

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 14.10.1998 06:04:06

Co treba neco takoveho :

Function Vrat Datum Souboru(Soubor : String) : TDateTime ;
var
SearchRec: TSearchRec;
begin
If FindFirst(Soubor, faAnyFile, SearchRec) = 0
Then Result := DateToStr(FileDateToDateTime(SearchRec.Time))
Else Result := '';
FindClose(SearchRec);
end;

Za pripadne chyby se omlouvam, zrovna se probouzim
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Miki Vom��ka <vmiki(zv)atlas(tec)cz>
Komu: DelphiForum <delphi-l(zv)fwd(tec)cz>
Datum: 13. ��jna 1998 23:03
P�edm�t: Datum souboru


Posim jak lze zjistit datum, kdy byl naposled soubor zm�n�n?
Diky

Miki Vomacka

Odkazy na zdroje

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 14.10.1998 06:06:39

Nestalo by za to dat dohromady seznam zdroju komponent a podobnych veci pro
Delphi se strucnym popisem, co tam jde najit ?

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------


Odkazy na zdroje

[*] Pavel ZIDEK <kopr(zv)applet(tec)cz> - 14.10.1998 07:03:01

Ja uz je sb�ram

----------------------------------------------------
KOPR software Pavel ZIDEK
voice 069 / 66 02 156
mailto:kopr(zv)applet(tec)cz

http://www.applet(tec)cz/~kopr/www
----------------------------------------------------

----------
> Odes�latel: Jan Fiala <jan.fiala(zv)iname.com>
> Komu: Delphi forum <delphi-l(zv)fwd(tec)cz>
> P�edm�t: Odkazy na zdroje
> Datum: 14. ��jna 1998 6:06
>
> Nestalo by za to dat dohromady seznam zdroju komponent a podobnych veci pro
> Delphi se strucnym popisem, co tam jde najit ?
>
> -----------------------------------------------------------------
> ing. Jan Fiala jan.fiala(zv)iname.com
> Prog-Soft s.r.o.
> INFOS - informa�n� system pro n�poj��e
> ---------------------------------------------------------------


IB a sdileni

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.1998 07:49:17

Martin Kubecka wrote:

> Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
> telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
> operatori). Operatori vidi na monitoru vsechny zasilky a podle
> komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
> jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
> pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
> nebudu delat na lokalni databazi (na ktere to mimochodem predtim jelo a uz
> to nestihalo).

A coz treba takto:

Do tabulky vlozim sloupec s priznakem. Na tabulku povesim trigger
before update, ktery mi hlida, zda je priznak obsazeny nebo
prazdny. Kdyz se budu snazit zablokovat priznak (tedy vzit si
zasilku pro sebe), triger mi zkontroluje stav priznaku a kdyz bude
volny, obsadi ho, kdyz bude obsazeny, vrati mi zpravu o chybe
(treba). Zaroven s tim poslu (treba, podle moznosti) ostatnim
refresh, aby se jim obnovila tabulka. No ukolem programu bude jiz
jen spravne reagovat na prijatou zpravu.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Design Editor

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.1998 07:49:17

Michal Motalik wrote:

> Dotaz:
> Jakym zpusobem dosahnu toho, aby udalost OnMouseDown odchitil az ten panel
> a ne ten objekt co je na nem? (neco takoveho je v Delphi pri navrhu
> formularu).

Odchyt zpravu komponentou a predej ji vlastniku.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.10.1998 08:36:30

Ja to nestesti nemam hotove, takze zkusim jeste zapremyslet......nicmene
DLL jsem rozchodil (nouze naucila Dalibora housti :-), takze to ted
lecim z detskych nemoci a v nejblizsi dobe to nabidnu mistni komunite k
vyzkouseni a pouzivani (chcete-li). Takze kdo ma zajem, necht napise ME,
ne do konference.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Jaro [SMTP:jaro(zv)sinea(tec)cz]
> Odesl�no: 13. ��jna 1998 21:47
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> >No asi na to nebudu myslet, kdyz uz to mam hotove, ze? :-) To je
> trosku
> >pozde...
> -----
> To tedy ano. Je dobre, kdyz analyza predchazi vyvoji.
> -----
> >Jiste to nekdy pomuze, ale dam ti jednoduchy priklad z praxe:
> >Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
> >telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
> >operatori). Operatori vidi na monitoru vsechny zasilky a podle
> >komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
> >jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
> >pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
> >nebudu delat na lokalni databazi (na ktere to mimochodem predtim jelo
> a
> >uz to nestihalo).
> -----
> Nic o tom programu nevim, ale mam pocit, ze by zrovna takovy pripad
> byl
> resitelny bez zamku.
> V okamziku kdy nekdo 'urve' zasilku (podle pristupovych prav, priorit
> a na
> stejne urovni treba dle zakona kdo driv prijde ten driv mele), tak tu
> zasilku
> automaticky oznacim kdy, kdo a komu ji pridelil. Ostatnim uz pak
> nepovolim
> stejne operace. Editovat ji muze jen ten kdo ji oznacil a ostatni at
> se
> porvou
> o dalsi zasilky.
> ... treba .... nebo take jinak
> Jaro


IB a sdileni

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.10.1998 08:40:33

Hi,

technicky dokonale, ale premyslej. Operator si takto oznaci zasilku a
jde treba domu. Zasilka je "jeho" a protoze neni nic dalsiho urceno,
zasilka neni dorucovana......neznam konkretni podminky, a tak se mohu
plest....


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> Odesl�no: 14. ��jna 1998 8:49
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: IB a sdileni
>
> Martin Kubecka wrote:
>
> > Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
> > telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
> > operatori). Operatori vidi na monitoru vsechny zasilky a podle
> > komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
> > jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
> > pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
> > nebudu delat na lokalni databazi (na ktere to mimochodem predtim
> jelo a uz
> > to nestihalo).
>
> A coz treba takto:
>
> Do tabulky vlozim sloupec s priznakem. Na tabulku povesim trigger
> before update, ktery mi hlida, zda je priznak obsazeny nebo
> prazdny. Kdyz se budu snazit zablokovat priznak (tedy vzit si
> zasilku pro sebe), triger mi zkontroluje stav priznaku a kdyz bude
> volny, obsadi ho, kdyz bude obsazeny, vrati mi zpravu o chybe
> (treba). Zaroven s tim poslu (treba, podle moznosti) ostatnim
> refresh, aby se jim obnovila tabulka. No ukolem programu bude jiz
> jen spravne reagovat na prijatou zpravu.
>
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz
> Tel.: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ


Thready kontra Messages

[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 14.10.1998 08:43:05

> Date sent: Tue, 13 Oct 1998 18:28:29 +0200
> From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Thready kontra Messages
> Send reply to: delphi-l(zv)fwd(tec)cz

> Filip Jirsak wrote:
> >
> > Ahoj vsem,
> > v D3 delam jednu komponentu pro sitovou komunikaci, je proto odvozena
> > od TThread. Z jeji metody Execute se vyvola API fce, ktera pri urcite
> > udalosti posle zpravu moji funkci (obdoba WndProc) v threadu. Tzn. v
> > tomto okamziku nesmi thread byt ukonceny. Z toho my vychazi na konci
> > Execute udelat smycku, ktera bude jen testovat Terminated a jinak
> > nebude mit zadnou funkci. To mi ale pripada zbytecne, aplikace jen
> > ceka na zpravu ale ten thread musi byt stale zbytecne aktivni a ubyra
> > cas CPU. Druha moznost by byla Suspendnout Thread a spustit jej az
> > pri prichodu zpravy, ale muze se spoustet fce ze Suspendnuteho
> > threadu?
> > Nebo uvazuju spatne? Nejak si to porad nedovedu ujasnit, jak
> > skloubit Message a Thready dohromady.
>
> Ahoj,
>
> zkus to popsat trochu bliz, reseni muze byt vic ....
>
> --
> Petr Vones, amatersky programator
>
Ma to byt HTTP server. Ten server je odvozeny od TThread, aby slo
behem obsluhovani klientu stale pracovat s formularem. Server nejprve
vytvori socket a prevede ho do rezimu naslouchani. Handlu socketu se
priradi funkce pro odchytavani zprav (ve stylu WndProc) a ta
zachytava zpravy READ, CLOSE a ACCEPT. Pri ACCEPT se vyvola novy
thread, ktery pak obsluhuje konkretni spojeni. Nejsem si jist, zda
takovyto zpusob zapouzdreni serveru, ktery prijim zpravy, do Threadu
je spravny, pripada mi zbytecne, aby ten thread bezel "naprazdno".
Predem diky za jakoukoli radu.
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz


Patche pre D4

[*] SunSoft - Mr�z �ubom�r <sunsoft(zv)sunsoft.sk> - 14.10.1998 09:16:47

Ahojte Delphaci.

Na Invexe v Brne som sa informoval o doplneni D4 o opravn� subory Patch files bolo mi povedane ze su na www.Inprise.com .
Ja som sa pokusal to najst ale marne asi som .... .
Nevie mi niekto poradit presnejsie adresu, lebo tie chybove spravy typu "...addres FFFFF ......" uz nenavidim.
Myslim ze nie som sam.
Neviem ci to nieje vela co chcem ak ano tak nic som nepisal beriem sp�t. !

Dakujem LUBO TSC.

Design Editor

[*] Michal Motalik <motalik(zv)zl.inext(tec)cz> - 14.10.1998 09:32:57


Diky, to funguje spravne.

Jeste jsem potreboval, aby pri pohybu mysi se stisklym tlacitkem se kreslila
vybrana oblast i kdyz se hybu pres ten Child objekt. Tak jsem tam dodelal
Mouse.Capture a uz to funguje podle mych predstav.

Diky moc.

>> Dotaz:
>> Jakym zpusobem dosahnu toho, aby udalost OnMouseDown >odchitil az ten
panel
>> a ne ten objekt co je na nem? (neco takoveho je v Delphi pri >navrhu
>> formularu).
>
>Odchyt zpravu komponentou a predej ji vlastniku.
>
>
>S pozdravem
>
>Zbysek Hlinka
>E-mail: zhlinka(zv)login(tec)cz
>Tel.: 02/795 29 56; GSM: 0603 551 282
>Krystofova 1016, 149 00 Praha 4
>CZ


POP3

[*] Pavel_Fuciman.UNION(zv)union(tec)cz - 14.10.1998 09:44:33

Ahoj,
chtel bych se zeptat jak pracuje komponenta POP3, konkretne:
kdyz spustim aplikaci, kde je komponenta POP3 a provede se nakonektovani na
server (treba tesne pred zobrazenim formulare - v FormCreate), jestli muzu
zustat napojeny na server nebo radsi se odkonektovat a zase napr. po peti
mimutach se opet nakonektovat a po provedeni cinosti zase odkonektovat atd.

Za kazdou radu diky.

Design Editor

[*] Michal Motalik <motalik(zv)zl.inext(tec)cz> - 14.10.1998 09:55:19


!!! Pozor !!!

Postup popsany v predchozim mailu funguje jen v pripade, ze Child objekt ma
Handle.
Jak si s touto situaci poradit, kdyz ten Child objekt bude potomkem treba
TGraphicControl, ktery nema Handle?

>> Dotaz:
>> Jakym zpusobem dosahnu toho, aby udalost OnMouseDown >odchitil az ten
panel
>> a ne ten objekt co je na nem? (neco takoveho je v Delphi pri >navrhu
>> formularu).
>
>Odchyt zpravu komponentou a predej ji vlastniku.
>
>
>S pozdravem
>
>Zbysek Hlinka
>E-mail: zhlinka(zv)login(tec)cz
>Tel.: 02/795 29 56; GSM: 0603 551 282
>Krystofova 1016, 149 00 Praha 4
>CZ

Prace s SQL

[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 14.10.1998 10:26:02



Ahoj,

ctel bych se zeptat na nekolik veci k pouzivani SQL prikazu v Delphi.
Z Informixu jsem zvykly pouzivat temporare tabulky. Bud je vycrejtuji pred
jejich plnenim a potom provedu jejich naplneni ( INSERT INTO table SELECT
... ) nebo primo udelam SELECT ... INTO TEMP TABLE ...
Jak to funguje v Delphi ?

Diky

Vasek

V�clav Lukes
E-mail: Vaclav.Lukes(zv)pvt(tec)cz, 511247(zv)sms.paegas(tec)cz
Tel.: 0603-511247


Design Editor

[*] delphi.abion(zv)post(tec)cz - 14.10.1998 10:53:26

Zdalo se mi divny co pises, tak jsem si na prazdny form dal TPanel, na nej TImage a pri kliknuti se vybral TImage... a tak to (podle dotazu) take pozadujes. Ale obecne. Ten MouseDown ti odchyti prvni objekt (podle zouradnice Z), ktery dokaze reagovat na udalosti mysi. Jestli budes chtit, aby to chytal jeho vlastnik tak ti asi nezbyde nez tu udalost z nejvrchnejsiho objktu predat dal.

david.vodicka(zv)email(tec)cz

>
> Ahoj vespolek!
>
> Delam neco jako Run-time Design Editor a nevim si rady s jednou malou ale
> dulezitou veci.
>
> Modelova situace:
> - mam objekt (je jedno jaky, ale treba TImage) polozeny na panelu
> - stisknu na nem tlacitko mysi
>
> Dotaz:
> Jakym zpusobem dosahnu toho, aby udalost OnMouseDown odchitil az ten panel a
> ne ten objekt co je na nem? (neco takoveho je v Delphi pri navrhu
> formularu).
>
> Kdo muze, at pomuze ...
>
> Pavel CABAK
> cabak(zv)zl.inext(tec)cz
>
>
>
>
>

OnChange

[*] honzajl(zv)email(tec)cz - 14.10.1998 11:10:37


Zdar vsici,

D�ky za pomoc / nakopnuti :-)

Tak nejak sem si to popletl.
Na mysli jsem totiz mel:
procedure OnChange; override; --nefunguje, override nelze
procedure KeyDown(var Key: Word; Shift: TShiftState); override; --OK

Po odeslani prispevku jsem se dal snazil vymejslet co se dalo, z
predchudce a tak, avsak marne.

Ke komponente EdNum me chybela unita uEd, ve ktery bylo zrejme TEd?
No nevim presne, .. jestli sem se zase nepopletnul.
Kladnym vysledkem je, ze jsem si v ni prohlidnul reseni OnChange a
kupodivu - Murphyho efekt funguje - stacilo tam u me zmenit 1 slovo.

Takze diky za pomoc, uz to chodi :-)

PS: Je volitelnej pocet desetinnejch mist, krom toho taky Edituje
i cas

> osklive, CO TED???

>
>TUNGLI Jan wrote:
>
>Posielam ti moju EdNum komponentu.
>Vie aj cele cisla aj Float, aj fixnu desatinovou bodkou.
>
> TUNGLI Jan
> tungli(zv)pvt.sk
>
> ----------
> Od: honzajl(zv)email(tec)cz
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: OnChange v komponente
> D�tum: 13. okt�ber 1998 12:55
>
> Zdar vsici,
>
> Mam ukrutnej problem. Pisu komponentu "TEditNumeric", coz je TEdit
>do
> kteryho nejdou zapisovat pismena a tak.
> Problem je v tom, kdyz :
>
> EditNumeric1.Text := '';
> StrToInt(EditNumeric1.Text);
>
> Potrebuju dat do komponenty na "OnChange" kontrolu, ktera tam
>misto
> '' vrazi 0
>
> protected
> procedure OnChange(var Cosi: Char); override; --funguje, vse
>OK
> procedure KeyDown; override; --nefunguje, "override" se zda
>byt
> osklive, CO TED???
>
> Predem diky za pomoc, pokud mozno rychlou ale nechci si vymejslet
>:-)
>
> ...............Honza Linhart


--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email


TNestedTable

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.1998 12:15:24

Petr Vones wrote:

> > zkousel jste nekdo uz pracovat v D4 s TNestedTable, bez MIDAS
> > komponent? Je tato komponenta i D4 Profi (vedle TTable a
> > TQuery)?
>
> Ne, nevidim ji tam, ale treba se nekam schovala ...... :-)
>
> Nicmene jsem se jeste podezrivave podival i do zdrojaku a v dbtables jsem
> ji nasel (vida, tam se ta potvora schovava). Ze by slo o dalsi fintu na
> vyvojare jako jsi tu uz popisoval se psanim services ? Nebo ji bez Midasu
> nelze opravdu k nicemu pouzit ?
>
Ja ji mam v zalozce Data Acces, a kdyz jsem se dival do stromu
trid, tak je uvedena i pro Profi verzi. Ale nejak se mi nedari ji
rozchodit bez komponent ze zalozky Midas, proto se ptam. S tim
souvisi i to, zda mas (aspon teoreticky) moznost zalozit v nejake
tabulce ArrayField, ADTField a DataSetField (pres New Field).

Dokumentace je k tomu prachmizerna, a vzhledem k temto
"fintam" a chybam se nejak nemohu zbavit pocitu, ze v Inprise
vladnou spise zlatokopove.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Kniznice formularov a dialogov, zostav a ine ...

[*] Branislav Danko <danko(zv)basl.sk> - 14.10.1998 12:45:09

Caute,
chcel by som sa spytat, ci nevie nahodou niekto o nejakej /najlepsie
free kniznici (dll, pas), nie komponente/, ktora by obsahovala
preddefinovane standardne typy dialogov, okien, tlacovych zostav. Po
zaradeni kniznice do sekcie uses by som si vytvoril formular (modalny,
nemodalny) dynamicky s tym, ze v konstruktore, resp. prostrednictvom
nejakych metod by som mal moznost nadefinovat napr. tlacidla, ktore tam
maju by a niektore najpouzivanejsie ovladacie prvky (nieco na sposob
MessageDlg ale vo vacsom a viac flexibilnejsom vydani). Napr. vystupne
zostavy, ak sa robia vo vacsom mnozstve mozu predstavovat v projekte
vacsinu okien a napriklad by som chcel zostavu vytvarat presne
definovanim riadku a stlpca, kde ma byt umiestneny QR komponent.
(Experti tu nic neriesia).
Samozrejme, ze by sa to dalo urobit, ale momentalne nemam cas sa
venovat tomu povedzme mesiac.

P.S.: V DOS-e bolo podobnych knizniciek mnozstvo.


Brano


OnChange

[*] M-PRO s.r.o. <software(zv)mpro(tec)cz> - 14.10.1998 12:49:20

Ahojte vespolek :-)

Mam situaci.Teda ja ji nemam, ale dostal sem situaci. Mam PopUpMenu. V
tomhle menu mam submenu. A ja bych potreboval, to SUBMENU vytvorit AZ v
okamziku vyberu (tj. kdyz na nej najedu). TPopupMenu ma jenom metodu OnInit.
a ne OnKazdySubmenuInit. Velice jednoduse de zmenit systemova knihovna (ve
funkci TPopupList.WndProc...). Neni nic jednodussiho nez dodefinovat
OnPopupInit.....

Slo by DODELAT nejak jednoduse nasledovnika abych nemusel rekompilovat
vsechny systemovy knihovny ??? (menus.pas pouziva kazda druha....).

Nejak moc nevim jak se komponenty delaj -> potrebuju PRIDAT event a zmenit
jednu funci.....

Diky moc

L. Lostak


Prace s SQL

[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 14.10.1998 12:51:12

to od delphi nezavisi
zalezi to na tom, ku akemu serveru sa pripajas - ak sa pripajas na
informix, tak to mozes robit ako si zvyknuty :-)

interbase myslim taku konstrukciu nema :-(

Lukes V�clav wrote:

> Ahoj,
>
> ctel bych se zeptat na nekolik veci k pouzivani SQL prikazu v Delphi.
> Z Informixu jsem zvykly pouzivat temporare tabulky. Bud je vycrejtuji pred
> jejich plnenim a potom provedu jejich naplneni ( INSERT INTO table SELECT
> ... ) nebo primo udelam SELECT ... INTO TEMP TABLE ...
> Jak to funguje v Delphi ?
>
> Diky
>
> Vasek
>
> V�clav Lukes
> E-mail: Vaclav.Lukes(zv)pvt(tec)cz, 511247(zv)sms.paegas(tec)cz
> Tel.: 0603-511247

--
Maj sa,
R.

POP3

[*] David Cermak <Cermak(zv)98.gyarab(tec)cz> - 14.10.1998 12:54:04

Pokud jde o to, jestli se mas odkonektovat, tak to nedelej, protoze:
1. Internet je (u vetsiny lidi) pomalej a kazdy paket je drahy.. :-)
2. POP3 server te malokdy po nekolika minutach necinnosti 'vyhodi',
pokud by se tak stavalo, staci se obcas serveru zeptat, zda nema
naove zpravy.

Doufam, ze jsi myslel neco na toto tema

David Cermak
[http://www.prog(tec)cz]

> Ahoj,
> chtel bych se zeptat jak pracuje komponenta POP3, konkretne:
> kdyz spustim aplikaci, kde je komponenta POP3 a provede se nakonektovani na
> server (treba tesne pred zobrazenim formulare - v FormCreate), jestli muzu
> zustat napojeny na server nebo radsi se odkonektovat a zase napr. po peti
> mimutach se opet nakonektovat a po provedeni cinosti zase odkonektovat atd.
>
> Za kazdou radu diky.

Databaze - hroznej zacatecnik

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 14.10.1998 13:24:22

Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
mam databazi (polozky napr. JMENO, DLUH, DATUM)
Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
musim jet query radek po radku a scitat?
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772


Databaze - hroznej zacatecnik

[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 14.10.1998 13:43:17

select sum(DLUH) from xxx where JMENO="PETR"

> Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
> Mius a.s. (http://www.mius(tec)cz)
> Dlouha 2940
> 415 01 TEPLICE
> Czech Republic
>
>
> -----P�vodn� zpr�va-----
> Od: LuborK(zv)tnet(tec)cz [SMTP:LuborK(zv)tnet(tec)cz]
> Odesl�no: 14. ��jna 1998 13:24
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Databaze - hroznej zacatecnik
>
> Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
> mam databazi (polozky napr. JMENO, DLUH, DATUM)
> Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
> soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
> musim jet query radek po radku a scitat?
> Lubor bIRDIE Kolar
> ====================
> GSM Phone: +420-603-410019
> ICQ: 18587772


jakvycistittabulku

[*] Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 14.10.1998 13:47:14


Panove,
mam takovy problem, pomazal jsem v tabulce faktury, ale ty
smazane zaznamy tam mrsky porad jsou, ale nejsou videt :-), a treba takovy
Findkey je v pohode najde a pri vypocitavani statistik to dela takovy
hokej, ze to az neni mozne. Potreboval bych help jak ty zaznamy vyprat s
tabulek "doopravdy".

Predem diky za pomoc.
Marcello


jakvycistittabulku

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 14.10.1998 13:54:45

Jakou tabulku pouzivas (dBase, Paradox ....)

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ��jna 1998 13:46
P�edm�t: jakvycistittabulku



Panove,
mam takovy problem, pomazal jsem v tabulce faktury, ale ty
smazane zaznamy tam mrsky porad jsou, ale nejsou videt :-), a treba takovy
Findkey je v pohode najde a pri vypocitavani statistik to dela takovy
hokej, ze to az neni mozne. Potreboval bych help jak ty zaznamy vyprat s
tabulek "doopravdy".

Predem diky za pomoc.
Marcello


Databaze - hroznej zacatecnik

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 14.10.1998 13:54:24


Napis si SQL
select sum(dluh) where jmeno=petr;

pookud by jsi chtel sestavu sectenych
vsech dluzniku napis si SQL
select jmeno, sum(dluh)
group by jmeno

D.
----------
Od: Kolar Lubor[SMTP:LuborK(zv)tnet(tec)cz]
Odesl�no: 14. ��jna 1998 13:24
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Databaze - hroznej zacatecnik

Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
mam databazi (polozky napr. JMENO, DLUH, DATUM)
Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
musim jet query radek po radku a scitat?
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772

Patche pre D4

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 14.10.1998 14:10:30

Patche pro D4 na www.Inpise.com opravdu JSOU.
Staci jen poradne hledat ( me to trvalo asi 50 minut).
Ovsem kde jsou presne, to ti uz nepovim, protoze to nevim.
Ale mam patch pro D4-professional o delce 7,5MB, tak pokud mas
zajem a jestli to na Imprise nenajdes, obrat se na me : serb(zv)mikulov.sol(tec)cz
a domluvime se, jak to k tobe dostaneme.

Serb

-----Original Message-----
From: SunSoft - Mr�z �ubom�r <sunsoft(zv)sunsoft.sk>
To: <delphi-l(zv)fwd(tec)cz>
Date: 14. ��jna 1998 11:17
Subject: Patche pre D4


>Ahojte Delphaci.
>
>Na Invexe v Brne som sa informoval o doplneni D4 o opravn� subory Patch
files bolo mi povedane ze su na www.Inprise.com .
>Ja som sa pokusal to najst ale marne asi som .... .
>Nevie mi niekto poradit presnejsie adresu, lebo tie chybove spravy typu
"...addres FFFFF ......" uz nenavidim.
>Myslim ze nie som sam.
>Neviem ci to nieje vela co chcem ak ano tak nic som nepisal beriem sp�t. !
>
>Dakujem LUBO TSC.

Spatne kresleni car

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 14.10.1998 14:16:36

Ahoj lidi,

V Delphi mam jeden drobny, ale do oci bijici problem.
Pokud nakreslim prerusovanou caru na canvas s tloustkou (width):=1, je
vsechno OK.
Pokud udelam to stejny s width>1, cara se zmeni z prerusovane v plnou.
Nevite nahodou, jak to opravit, nebo nemate jinou proceduru, ktera by
fungovala tak jak ma?????

Dik Serb

"OnMove"

[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 14.10.1998 14:33:57

caves,

mam taky maly problem. potrebujem urobit formu "nepohyblivou". bohuzial,
ziadna event typu OnMove neexistuje, takze som to riesil pridanim
procedury reagujucej na windows message WM_MOVE a v nej nastavujem
hodnoty TForm.Left, TForm.Top na pevne hodnoty.
cele to ma ale jednu chybu. ak sa fomou pokusim pohnut, hrozne to
preblikuje (ale hned ako prestanem hybat mysou, forma sa poslusne vrati
tam, kam patri).

vdaka

--
lubos dusanic

mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613

OnChange

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 14.10.1998 14:34:47

Mam jeden skromny dotaz.
1) S Delphi CS 3.0 je distribuovan SQL Interbase.
Chci se zeptat, zda se da sirit (1 uzivatelska)
s aplikaci.
2) Jake mate zkusenosti s MS Access + Delphi a
zda je nutne neco platit za sireni *.MDB souboru
s aplikaci
3) Kdyby jste meli volit databazu z 1) a 2) pro
jednoduchou jednouzivatelskou aplikaci, co by ste
si vybrali.
Diky za odezvy
Petr


Databaze - hroznej zacatecnik

[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 14.10.1998 14:43:22

Ahoj,

dovolil bych si jeste malou extenzi ... ono je nekdy jednodussi (a hlavne
rychlejsi) projizdet databazi jenom jednou, proto bych (v ramci zrychleni)
jeste mozna doporucil tohle:

select jmeno, sum(dluh) from xxx group by jmeno

Budes tam mit pak vypsana vsechna jmena a k nim nalezejici dluhy....

Mejte se,

Peter


> select sum(DLUH) from xxx where JMENO="PETR"
>
> > Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
> ---->
> > Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
> > mam databazi (polozky napr. JMENO, DLUH, DATUM)
> > Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
> > soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
> > musim jet query radek po radku a scitat?

Click (a nasledujici SetFocus) na moji komponente

[*] Adam Horacek <delphi(zv)ciglersw(tec)cz> - 14.10.1998 15:04:55

Prosim o radu.
Napsal jsem komponentu v D1 dedenou od TCustomControl a mam nasledujici
problem. Pri kliku mysi komponenta nedostane focus. Zkousel jsem vselikaje
mozne varianty, jak tam ten focus dostat a jedine reseni je zatim volani fce
SetFocus v metode MouseDown. Jenze tohle mi zpusobuje nektere dalsi
komplikace a proto se tomu musim vyhnout.
Dival jsem WinSightem (pouzil jsem i MS Spy++) na zpravy, ktere dostavam a
dostanu jenom WM_MOUSEACTIVATE. Na tuto zpravu se mi nepodarilo reagovat
(taky nevim proc). WM_SETFOCUS mi neprijde.
Nevite nekdo, cim by to mohlo byt zpusobeno???

PS: Na TAB mi to reaguje regulerne, tzn. dostanu focus a vse je OK.

Diky.

Adam Horacek.

Primy link na Access

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 14.10.1998 15:09:23

Ahoj,

nedavno tu byl dotaz na pricinu a odstraneni chyby
External exception EEFFACE pri primem pristupu na
MS Access. Zajima mne, zda nasel nekdo reseni.

Mne se tato chyba objevi pri zadani neplatneho
jmena uzivatele ci hesla. Lze to vyzkouset primo
v BDE Administratorovi.

Dik Martin

--
+----------------------------------+
| Ing. Martin Dupal |
| address: Geislerova 6 |
| 77200 Olomouc |
| Czech Republic |
| tel.: +420/68/5313130 |
| fax.: +420/68/5313132 |
| http://www.vision(tec)cz |
| mailto:mdupal(zv)vision(tec)cz |
+----------------------------------+

Databaze - hroznej zacatecnik

[*] Branislav Danko <danko(zv)basl.sk> - 14.10.1998 15:12:37

Nazdar,

v SQL sa daju pouzit tzv. agregacne funkcie:
AVG - priemer,
SUM - suma, toto prave potrebujes,
COUNT - pocet poloziek,
MIN, MAX ...

takze ak nepotrebujes mat rozpisane vsetky dlhy pre PETRA, ale ti staci
len ich sucet urob query z nasledovneho selektu, v opacnom pripade vytvor
novy query:

SELECT SUM(DLUH) AS DLH_CELKOM FROM xTABLE WHERE JMENO = 'PETR'

K hodnote potom pristupis takto:

DLH := xDataModul.xQuery.FieldByName('DLH_CELKOM').AsFloat;

Dalej je mozne vytvorit grupy a mozes vypocitat sucty dlhov pre vsetky
rozne mena v tabulke:

SELECT SUM(DLH) AS DLH_CELKOM FROM xTABLE GROUP BY JMENO

Za pomoci SQL sa da urobit mnozstvo veci elegantne a rychlo. V helpe si
pozri "Using local SQL", ak nevytvaras serverovske aplikacie, kde je SQL
zavisle od konkretneho databazoveho servra.

Brano


Kolar Lubor wrote:

> Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
> mam databazi (polozky napr. JMENO, DLUH, DATUM)
> Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
> soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
> musim jet query radek po radku a scitat?
> Lubor bIRDIE Kolar
> ====================
> GSM Phone: +420-603-410019
> ICQ: 18587772


TNestedTable

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.10.1998 15:23:48


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> Odesl�no: 14. ��jna 1998 13:15
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: TNestedTable
>
> Petr Vones wrote:
>
> > > zkousel jste nekdo uz pracovat v D4 s TNestedTable, bez MIDAS
> > > komponent? Je tato komponenta i D4 Profi (vedle TTable a
> > > TQuery)?
> >
> > Ne, nevidim ji tam, ale treba se nekam schovala ...... :-)
> >
> > Nicmene jsem se jeste podezrivave podival i do zdrojaku a v dbtables
> jsem
> > ji nasel (vida, tam se ta potvora schovava). Ze by slo o dalsi fintu
> na
> > vyvojare jako jsi tu uz popisoval se psanim services ? Nebo ji bez
> Midasu
> > nelze opravdu k nicemu pouzit ?
> >
> Ja ji mam v zalozce Data Acces, a kdyz jsem se dival do stromu
> trid, tak je uvedena i pro Profi verzi. Ale nejak se mi nedari ji
> rozchodit bez komponent ze zalozky Midas, proto se ptam. S tim
> souvisi i to, zda mas (aspon teoreticky) moznost zalozit v nejake
> tabulce ArrayField, ADTField a DataSetField (pres New Field).
>
> Dokumentace je k tomu prachmizerna, a vzhledem k temto
> "fintam" a chybam se nejak nemohu zbavit pocitu, ze v Inprise
> vladnou spise zlatokopove.
>
[Martin Fron�k] Takovy pocit uz mam dlooooooouho........

> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz
> Tel.: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ


Databaze - hroznej zacatecnik

[*] SunSoft - Mr�z �ubom�r <sunsoft(zv)sunsoft.sk> - 14.10.1998 15:37:30

Daj si na formular komponentu TQuery.
v programe napis toot
Query1.Active:=False;
Query1.Sql.Clear;
Query1.Sql.Add(' SELECT Meno, aky_dlh as SUM( Dlh ) FROM "Databaza.db" ');
Query1.Sql.Add(' Databaza WHERE Meno = 'peto' GROUP BY Meno ');
Query1.Active:=True;
Query1.First;

a na prvom zazname mas v stlpci aky_dlh mas sumu. Je to jedno z rieseni. Dufam ze som pomohol.
Vela nervov pri praci.
-----P�vodn� zpr�va-----
Od: Kustra
Odesl�no: 14. okt�ber 1998 15:20
Komu: Mraz
P�edm�t: FW: Databaze - hroznej zacatecnik



-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz
Sent: 14. ��jna 1998 13:13
To: delphi-l(zv)fwd(tec)cz
Cc:
Subject: Databaze - hroznej zacatecnik


Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
mam databazi (polozky napr. JMENO, DLUH, DATUM)
Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
musim jet query radek po radku a scitat?
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772

Databaze - hroznej zacatecnik

[*] ficek <ficek(zv)hstech(tec)cz> - 14.10.1998 16:00:36

Pokud jsem dobre rozumnel tak potrebujes secist dluhy za nektereho
klienta. V tom pripade to ale vubec neni vec Delphi, ale SQL. Zkus:

select sum(Dluh) from Klient where JMENO="PETR"

Kolar Lubor wrote:

> Delfini, poradte naprostej zacatek (s databazema jsem nikdy nedelal):
> mam databazi (polozky napr. JMENO, DLUH, DATUM)
> Udelam si na ni query, napr. JMENO='PETR'. Tedka potrebuju vyhodit
> soucet dluhu prave pro tu query. Jde to udelat nejak elegantne, nebo
> musim jet query radek po radku a scitat?
> Lubor bIRDIE Kolar
> ====================
> GSM Phone: +420-603-410019
> ICQ: 18587772
>

Spatne kresleni car

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.10.1998 16:13:44

Hi,

podivej se do API WIN32 a dozvis se to. Je tam omezeni, ze pri pouziti
techto efektu (prerusoovana, cerchovana....) musi byt sirka cary 1.
Pomoct si muzes tak, ze proste nakreslis tu caru nekolikrat vedle sebe
:-) A JE TO


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Pavel Serbajlo [SMTP:serb(zv)mikulov.sol(tec)cz]
> Odesl�no: 14. ��jna 1998 14:17
> Komu: Czech Delphi Konference
> P�edm�t: Spatne kresleni car
>
> Ahoj lidi,
> �
> V Delphi mam jeden drobny, ale do oci bijici problem.
> Pokud nakreslim prerusovanou caru na canvas s tloustkou (width):=1, je
> vsechno OK.
> Pokud udelam to stejny s width>1, cara se zmeni z prerusovane v plnou.
> Nevite nahodou, jak to opravit, nebo nemate jinou proceduru, ktera by
> fungovala tak jak ma?????
> �
> ������� Dik Serb
> �

Patche pre D4

[*] RADIK(zv)p15.monet(tec)cz - 14.10.1998 16:14:00

Nekdy mam pocit, ze nekteri jedinci jsou slepi.
cesta je jasna a podle me zcela logicka: www.inprise.com -> Developer
support (vlevo v sedem pruhu, jste vyvojar, potrebujete podporu, ze
jo....) -> Delphi (je to vpravo napsano v seznamu produktu, chcete
delphi, ze jo....) -> Delphi Downloads (prvni odstavec v textu, asi si
budete chtit neco stahnout, ze jo.....), no a tam uz to je, v mem
prohlizeci nekde na druhe strance.......

Pokud by to ani takhle neslo, pak je tu odkaz:
http://www.inprise.com/devsupport/delphi/downloads/dpro401readme.html
a uplne na konci je spousteni downloadu.....
Ales

----------
Od: Pavel Serbajlo
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Patche pre D4
Datum: 14. ��jen 1998 14:10

Patche pro D4 na www.Inpise.com opravdu JSOU.
Staci jen poradne hledat ( me to trvalo asi 50 minut).
Ovsem kde jsou presne, to ti uz nepovim, protoze to nevim.
Ale mam patch pro D4-professional o delce 7,5MB, tak pokud mas
zajem a jestli to na Imprise nenajdes, obrat se na me :
serb(zv)mikulov.sol(tec)cz
a domluvime se, jak to k tobe dostaneme.

Serb

-----Original Message-----
From: SunSoft - Mr�z 1/4ubom�r <sunsoft(zv)sunsoft.sk>
To: <delphi-l(zv)fwd(tec)cz>
Date: 14. o�jna 1998 11:17
Subject: Patche pre D4


>Ahojte Delphaci.
>
>Na Invexe v Brne som sa informoval o doplneni D4 o opravn� subory Patch
files bolo mi povedane ze su na www.Inprise.com .
>Ja som sa pokusal to najst ale marne asi som .... .
>Nevie mi niekto poradit presnejsie adresu, lebo tie chybove spravy typu
"...addres FFFFF ......" uz nenavidim.
>Myslim ze nie som sam.
>Neviem ci to nieje vela co chcem ak ano tak nic som nepisal beriem
sp�t. !
>
>Dakujem LUBO TSC.

OnChange

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.10.1998 16:14:47

Vybral bych PARADOX


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Jezek Petr, Ing. (DELVINA) [SMTP:PETR(zv)sevis.sk]
> Odesl�no: 14. ��jna 1998 14:35
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: OnChange
>
> Mam jeden skromny dotaz.
> 1) S Delphi CS 3.0 je distribuovan SQL Interbase.
> Chci se zeptat, zda se da sirit (1 uzivatelska)
> s aplikaci.
> 2) Jake mate zkusenosti s MS Access + Delphi a
> zda je nutne neco platit za sireni *.MDB souboru
> s aplikaci
> 3) Kdyby jste meli volit databazu z 1) a 2) pro
> jednoduchou jednouzivatelskou aplikaci, co by ste
> si vybrali.
> Diky za odezvy
> Petr


jakvycistittabulku

[*] Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 14.10.1998 16:29:33


Paradox ...

On Wed, 14 Oct 1998, Jan Fiala wrote:

> Jakou tabulku pouzivas (dBase, Paradox ....)
>

IB a sdileni

[*] Erik Salaj <erik(zv)dodo.sk> - 14.10.1998 16:31:04

Nevidim ziaden problem preco by 160 uzivatelov nemohlo pracovat
s tvrdymi zamkami (dufam, ze sa tym mysli zamykanie zaznamov -
t.j record locking, ak nie tak sorry). Record locking naopak podporuje
paralelizmus v transakciach (v porovnani s page alebo table locking),
pretoze je toho zamknuteho menej, ale je s tym spojena vyssia rezia
(pretoze zas tych zamkov moze byt podstatne viac).
Ak sa zamykanie (ziadne) nepouziva mozu vznikat vazne problemy,
napr. stratene updaty (lost updates), ked niekolko uzivatelov moze
prepisat rovnaky zaznam, pricom vyhrava ten, kto ho prepisal posledny.
Neviem si dost dobre predstavit, ze by to takto mohlo fungovat
napr. v banke pre sumy na uctoch :-) alebo aj kdekolvek inde.
Jednoducho prva a najdolezitejsia vlastnost tykajuca sa kvality
softwaru je korektnost - a plati to pre akukolvek architekturu
(viz. Bertrand Mayer: Object Oriented Software Costruction).

Ak Interbase nema podporu pre record locking, tak to nie je ziadna vyhoda,
ale nedostatok, ktory v pripade potreby je nutne vselijako obchadzat
a doprogramovavat (napr. roznymi priznakmi v tabulke apod). Interbase
nema vela dolezitych veci, ktore by SQL databaza mala mat, napr. podporu
pre replikacie (zeby to tiez neodpovedalo client-server architekture?).
Takisto neviem ako je to s podporou datoveho typu money u Interbase
- skusal som to tusim u IB 4 a nefungovala mi presna aritmetika (velke
cisla boli kodovane v pohyblivej radovej ciarke), cize absolutne nevhodne
pre uctovnictvo. Ak niekto pozna detailnejsie Interbase, tak nech ma
pripadne opravi, ak to nie je tak (s Interbase nepracujem, iba som to
skusal).

Erik Salaj
erik(zv)dodo.sk

-----Original Message-----
From: Jaro <jaro(zv)sinea(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: Tuesday, October 13, 1998 10:19 PM
Subject: Re: IB a sdileni


>Ja plne souhlasim s nazorem J. Nagyho
>Zrovna vcera jsem si tyto veci znovu uvedomil, kdyz jsem videl v chodu
>iformacni system na databazi Informix, kde bylo najednou aktivne prihlaseno
>160 klientu. Na tom systemu pracuje soucasne 160 REALNYCH UZIVATELU a
system
>je REALNY a co vice, je funkcni. Funguje, protoze nema tvrde zamky. V tomto
>konkretnim pripade se jedna o komlexni zdravotnicky informacni system
vcetne
>ekonomiky, pojistovny, laboratori, hospitalizace, poraden a mnoha dalsich
>modulu.
>Problemy zakazek
>(jak zde bylo jako priklad v jednom prispevku uvadeno) jsou samozrejme
>reseny nikoliv pomoci zamku. Tento system zdaleka neni jediny. Znam tez
>obdobne zalozeny system pro podnikovou vyrobu
>na databazovem stroji Oracle a dalsi informacni systemy.To nerikam proto,
>abych nekoho ohromil, ale abych pripomel, ze nepouzivani zamku neni odklon
>od REALITY a ignorovani potreb zakazniku. Opravdu se to musi delat jinak.
>Pokud bude nekolik desitek uzivatelu pouzivat zamky,
>pak proste server konci a system je nepouzitelny. Databazove stroje jsou
>urceny predevsim pro mnoho uzivatelu. Ja sam patrim mezi propagatory
serveru
>i do malych systemu s malym poctem uzivatlu z duvodu velke spolehlivosti
>techto stroju. To vsak neznamena, ze by se to muselo delat jinak. Co
funguje
>pro destitky a stovky uzivatelu, muze se stejnou logikou fungovat i v
>systemu pro dva uzivatele.
>
>ALE, jak jsem napsal jiz drive, nekdy se zamek muze hodit (i mne).
>Ja to neodsuzuju. Pouze jsem tvrdil, ze IB neni spatny, kdyz tyto zamky
>nema,
>protoze v jeho zajmu stoji systemy, ktere je principialne nemohou pouzivat.
>
>Jaro
>-------------------------
>
>>Hi,
>>v zasade mas pravdu, jenze si uvedom, ze v programu modelujes obraz
>>realneho sveta a REALNYCH UZIVATELU.
>>
>>Nebyl by az takovy problem (z technickeho hlediska) provest rollback,
>>ale uzivatele jsou lidi a tvorenim dat stravi nejaky cas. A kdyz jim
>>budes takhle zneprijemnovat zivot, tak te nebudou mit radi......
>>Zamykani tvrdym zamkem se proto musi pouzivat jen tam, kde to je
>>nezbytne nutne a prilis to nebrzdi praci celku........
>>
>>
>>Martin Fron�k
>>ZZN Slan� a.s.
>>Pra�sk� 1579, 274 49, Slan�
>>tel. +420-314-522986
>>e-mail: fronek(zv)zznslany(tec)cz
>>
>>> -----P�vodn� zpr�va-----
>>> Od: Juraj Nagy [SMTP:Juraj.Nagy(zv)nh-trans(tec)cz]
>>> Odesl�no: 13. ��jna 1998 13:12
>>> Komu: 'delphi-l(zv)fwd(tec)cz'
>>> P�edm�t: RE: IB a sdileni
>>>
>>> Ja bych k problemu IB a sdileni chtel pripomenout vsem, kto potrebuji
>>> ty zamky, ze na osetreni kritickych situaci se ma myslet pri vyvoji.
>>> Kdyz chci klient/server aplikaci, tak bych mel vymyslet reseni ktere
>>> neodporuje teto technologii. Tj. poradna analyza, promysleny system
>>> pristupovych prav k datum (o tom tady uz byla rec), ale i promysleny
>>> system prace uzivatelu s datama (to je na tom vsem asi nejslozitejsi
>>> - to se totiz vlastne moc netyka samotneho programu), atd. Neni to
>>> nic jednoducheho a jsou k tomu nutne slusne znalosti. Taky neznam
>>> klient/serverovskou aplikaci k necemu, ktera by byla hotova za
>>> vikend, nebo za tyden. Pouziti zamku neni zastarale, je to jenom
>>> uplne jiny pristup k datu m. Pokud nekdo chce pouzit zamky (staci pri
>>> nekolika desitkach uzivatelu), daleko se nedostane ani s nejlepsim
>>> databazovym servrem.
>>> Takzy kdyz to nekdo potrebuje, myslim si, ze v prvni rade by se mel
>>> zamyslet sam nad sebou a nad svym programem a az potom nadaval na
>>> nejaky db-server. Ten dela jenom to, k cemu ho vytvorili. A dela to
>>> dobre.
>>>
>>> S pozdravem
>>>
>>> J. Nagy
>>> e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
>>>
>>>
>>>
>>> > -----P�vodn� zpr�va-----
>>> > Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
>>> > Odesl�no: 13. ��jna 1998 10:31
>>> > Komu: delphi-l(zv)fwd(tec)cz
>>> > P�edm�t: Re: IB a sdileni
>>> >
>>> > Ja to potrebuju taky :-). Zatim to taky resime nejakym id_uzivatele
>>> > v
>>> > nekterych (kritickych) tabulkach, takze pri pokusu o edit to zarve
>>> > ze uz
>>> > to nekdo upravuje a kdo to upravuje. Bohuzel pokud klient lehne tak
>>> > tam
>>> > ten zamek zustane viset (nejlepsi by byl nejaky 'ping' na klienta
>>> > po
>>> > urcitem casovem intervalu, zda je nazivu, ale nevim jak na to).
>>> > Jinak
>>> > pri kazdem pripojeni uzivatele, ze jeho zamky vymazou (coz ovsem
>>> > narazi
>>> > zase na problem maximalne jednoho soucasneho pripojeni pro jednoho
>>> > uzivatele, coz muze nekdy vadit). Zatim nejlepe zni ony semafory,
>>> > jak o
>>> > nich psal Martin Fronek.
>>> >
>>> > Mac
>>> >
>>> > Martin Fron�k wrote:
>>> >
>>> > > clovece, ty asi poslouchas (ctes) kolenem.....
>>> > >
>>> > > Zastaraly, nezastaraly, ja to proste potrebuju. Presne RollBack
>>> je
>>> > > mi na
>>> > > nic.
>>>
>
>
>

jakvycistittabulku

[*] Libor Junek <libor(zv)thsoft(tec)cz> - 14.10.1998 16:44:58

Delete from Faktury


*****************************************************
TH SOFT Kosteln� 128 , 564 01 Zamberk
---- tel./fax. 0446 3897
---- E-mail: libor(zv)thsoft(tec)cz
---- WWW: http://www.thsoft(tec)cz/
---- WWW: http://www.zbk(tec)czn(tec)cz/
****************************************************
-----P�vodn� zpr�va-----
Od: Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ��jna 1998 14:43
P�edm�t: jakvycistittabulku


>
>Panove,
> mam takovy problem, pomazal jsem v tabulce faktury, ale ty
>smazane zaznamy tam mrsky porad jsou, ale nejsou videt :-), a treba takovy
>Findkey je v pohode najde a pri vypocitavani statistik to dela takovy
>hokej, ze to az neni mozne. Potreboval bych help jak ty zaznamy vyprat s
>tabulek "doopravdy".
>
> Predem diky za pomoc.
> Marcello


Delphi paleta a S3

[*] Jaroslav KULHEIM <kulheim(zv)fp-brno(tec)cz> - 14.10.1998 16:52:54

Ohledne %SUBJ zde byla nedavno diskuse, snad vas
bude zajimat nasledujici odpoved z jine konference:

Jaroslav KULHEIM
kulheim(zv)fp-brno(tec)cz

>
>Lucas,
>
>I have expirienced with problem like this.
>I coldn't install RX Library 2.4, Advanced Bussiness Components 3.03,
>sometimes I just coldn't launch D3 or D4 at all...
>
>Computer did hang up just when Component Palette updated.
>
>The problem was nested in videocard driver (S3 Virge/DX).
>
>I had to put line
>
>BusThrottle=on
>
>in [DISPLAY] section of SYSTEM.INI.
>
>It was conflict on PCI bus!!!
>
>May be you need to do the same (especially you are using S3 Virge/DX).
>
>Good Luck!
>
>==
>
>Sincerely Yours,
> Boris Kuritsin
>
><kuritsin(zv)yahoo.com> *** Cherkasy, Ukraine
>
>_________________________________________________________
>DO YOU YAHOO!?
>Get your free (zv)yahoo.com address at http://mail.yahoo.com
>

"OnMove"

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 14.10.1998 17:03:00


Ted me nic nenapada, ale zkus na tu zpravu misto
Form.Left:=neco dat API funkci Release - uvolneni
mysi (kaby user uvolnil tlacitko)

D.

----------
Od: Dusanic Lubos[SMTP:lubos(zv)iname.com]
Odesl�no: 14. ��jna 1998 14:33
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: "OnMove"

caves,

mam taky maly problem. potrebujem urobit formu "nepohyblivou". bohuzial,
ziadna event typu OnMove neexistuje, takze som to riesil pridanim
procedury reagujucej na windows message WM MOVE a v nej nastavujem
hodnoty TForm.Left, TForm.Top na pevne hodnoty.
cele to ma ale jednu chybu. ak sa fomou pokusim pohnut, hrozne to
preblikuje (ale hned ako prestanem hybat mysou, forma sa poslusne vrati
tam, kam patri).

vdaka

--
lubos dusanic

mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613

IB a sdileni

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.1998 17:25:00

Martin Fron k wrote:

> technicky dokonale, ale premyslej. Operator si takto oznaci zasilku a jde
> treba domu. Zasilka je "jeho" a protoze neni nic dalsiho urceno, zasilka
> neni dorucovana......neznam konkretni podminky, a tak se mohu plest....

:-))) Proti lidske blbosti nezmuzes nic ani sebedokonalejsim
programem. Ale muzes na to navazat dalsi operace, takze kdyz
messenger treba do urcite doby nepotvrdi prevzeti, zase ji
programove uvolnis.
>
> > -----P vodn� zpr�va-----
> > Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> >
> > Martin Kubecka wrote:
> >
> > > Nejmenovana :-) kuryrni firma prijima telefonicky zasilky (cca 15
> > > telefonistek). Tyto zasilky se prideluji kuryrum (to delaji 2-3
> > > operatori). Operatori vidi na monitoru vsechny zasilky a podle
> > > komunikace vysilackou je rozdeluji kuryrum (perou se o ne :-). No a
> > > jaksi neni mozne pridelit jednu zasilku dvema kuryrum. Navic se
> > > pouzivaji kvuli zrychleni Cached Updates. Na a kvuli tomu to prece
> > > nebudu delat na lokalni databazi (na ktere to mimochodem predtim
> > jelo a uz
> > > to nestihalo).
> >
> > A coz treba takto:
> >
> > Do tabulky vlozim sloupec s priznakem. Na tabulku povesim trigger
> > before update, ktery mi hlida, zda je priznak obsazeny nebo
> > prazdny. Kdyz se budu snazit zablokovat priznak (tedy vzit si
> > zasilku pro sebe), triger mi zkontroluje stav priznaku a kdyz bude
> > volny, obsadi ho, kdyz bude obsazeny, vrati mi zpravu o chybe (treba).
> > Zaroven s tim poslu (treba, podle moznosti) ostatnim refresh, aby se jim
> > obnovila tabulka. No ukolem programu bude jiz jen spravne reagovat na
> > prijatou zpravu.
> >
> >
> > S pozdravem
> >
> > Zbysek Hlinka
> > E-mail: zhlinka(zv)login(tec)cz
> > Tel.: 02/795 29 56; GSM: 0603 551 282
> > Krystofova 1016, 149 00 Praha 4
> > CZ
>
S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Design Editor

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.1998 17:25:00

Michal Motalik wrote:

> !!! Pozor !!!
>
> Postup popsany v predchozim mailu funguje jen v pripade, ze Child objekt
> ma Handle. Jak si s touto situaci poradit, kdyz ten Child objekt bude
> potomkem treba TGraphicControl, ktery nema Handle?

No, je mozne udelat sdilenou udalost (OnMouseDown) pro panel a
vsechny komponenty na nem, kde pripadne prepoctu X a Y vuci
panelu, je-li to treba. Toto reseni vyhovi asi ve vetsine pripadu.

Nebo zplodim potomky komponent, ktere na panel umistuji, a
prepisu u nich WMMouseDown, ve ktere poslu zpravu vlastniku.
Zde predpokladam, ze vlastnik je panel, ktery handle ma, nebo
hledam pres retezec vlastniku tak dlouho, az narazim na nejaky
TWinControl.
>
> >> Dotaz:
> >> Jakym zpusobem dosahnu toho, aby udalost OnMouseDown >odchitil az ten
> panel
> >> a ne ten objekt co je na nem? (neco takoveho je v Delphi pri >navrhu
> >> formularu).
> >
> >Odchyt zpravu komponentou a predej ji vlastniku.
> >


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


"OnMove"

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.10.1998 18:03:23

Dusanic Lubos wrote:
>
> caves,
>
> mam taky maly problem. potrebujem urobit formu "nepohyblivou". bohuzial,
> ziadna event typu OnMove neexistuje, takze som to riesil pridanim
> procedury reagujucej na windows message WM_MOVE a v nej nastavujem
> hodnoty TForm.Left, TForm.Top na pevne hodnoty.
> cele to ma ale jednu chybu. ak sa fomou pokusim pohnut, hrozne to
> preblikuje (ale hned ako prestanem hybat mysou, forma sa poslusne vrati
> tam, kam patri).

Ahoj,

muzes to udelat takhle:

procedure TForm1.FormCreate(Sender: TObject);
begin
DeleteMenu(GetSystemMenu(Handle, False), SC_MOVE, MF_BYCOMMAND);
end;

--
Petr Vones, amatersky programator

Odkazy na zdroje

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.10.1998 19:16:50

Jan Fiala wrote:
>
> Nestalo by za to dat dohromady seznam zdroju komponent a podobnych veci pro
> Delphi se strucnym popisem, co tam jde najit ?

Ahoj,

vzdyt neco takoveho uz prece existuje na strankach Delphi CZ -> Odkazy

http://www.delphi(tec)cz/odkazy.asp

--
Petr Vones, amatersky programator

Patche pre D4

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.10.1998 20:14:02

SunSoft - Mr�z �ubom�r wrote:
>
> Ahojte Delphaci.
>
> Na Invexe v Brne som sa informoval o doplneni D4 o opravn� subory Patch files bolo mi povedane ze su na www.Inprise.com .
> Ja som sa pokusal to najst ale marne asi som .... .
> Nevie mi niekto poradit presnejsie adresu, lebo tie chybove spravy typu "...addres FFFFF ......" uz nenavidim.
> Myslim ze nie som sam.

Ahoj,

to rozhodne nejsi, ale muzu te ujistit ze po pouziti toho patche to bude
naprosto stejny. Bohuzel, po nekolika mesicich pouzivani tak musim rict ze
Delphi 4 je opravdu mimoradne zabugovany produkt, tyka se to hlavne IDE.
Je to skoda protoze nektere novinky tam jsou tam opravdu prinosem. A s
BDE 5.0 uz mam take spatne zkusenosti.....

--
Petr Vones, amatersky programator


OnMove - obracene

[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 15.10.1998 03:07:32 pdt

Zdravim vsechny delfare

ja jsem narazil presne na ten problem, ktaery je popsan nize.

Potrebuji "chytnout" formular na kteremkoliv miste a posunout
oknem.
Formular je cely zakryty komponentou TPanel.

Vsechno funguje "skvele", az na to odporne blikani pri
posouvani okna.

Oknem pohybuji v ramci udalosti OnMouseMove, pomoci nastaveni
left a top formulare.

Muzete mi nekdo pomoci ?

Karel Vlcek
vlcekk(zv)hotmail.com


>From: "Martin Tichacek" <martin_t(zv)mrp(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Subject: Re: "OnMove"
>Date: Fri, 16 Oct 1998 10:14:18 +0200
>Reply-To: delphi-l(zv)fwd(tec)cz
>
>A co treba takhle : prikald - okno s jednim tlacitkem - button1.onclick
->close
>{ jo a pozzakazoval bych ikonky na okne - jako minimalizace a spol ;-)
}
>Zkouseno v D1 !
>
>{puvodne to bylo presne naopak - gdysi jsem potreboval okno, kterym jde
>posunovat na kteremkoliv miste - jako bych drzel mysi zahlavi}
>
>deklarace formu :
>
>type
> TForm1 = class(TForm)
> Button1: TButton;
> procedure Button1Click(Sender: TObject);
> private
> procedure WMNCHitTest(var M: Tmessage); message wm_NCHitTest;
> public
> end;
>
>a pak nekde v impl.
>
>procedure TForm1.WMNCHitTest(var M: TMessage);
>var z,x,y:integer;
>begin
> inherited; {hehe}
> if (M.Result = htcaption) then {kliknul na caption}
> begin
> M.Result := htClient; {ikdyc kliknul - budeme
tvrdit, ze ne
>:-) }
> end
>end;
>
>procedure TForm1.Button1Click(Sender: TObject);
>begin
> close;
>end;


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


IB a sdileni

[*] Jaro <jaro(zv)sinea(tec)cz> - 15.10.1998 03:14:51

>Takisto neviem ako je to s podporou datoveho typu money u Interbase
>- skusal som to tusim u IB 4 a nefungovala mi presna aritmetika (velke
>cisla boli kodovane v pohyblivej radovej ciarke), cize absolutne nevhodne
>pre uctovnictvo. Ak niekto pozna detailnejsie Interbase, tak nech ma
>pripadne opravi, ak to nie je tak (s Interbase nepracujem, iba som to
>skusal).
------------------------------
Neni to tak (zcela).
1.
Numeric(10.2) nahradi Money. Vyhoda spociva v tom, ze tento typ lze uplatnit
i na jiny pocet des. mist nez jen na dve. Proto je samotny typ Money
nadbytecny.
2.
O replikaci nebyla rec. Hovorilo se o zamcich.
3.
Zminovany system pracoval na Informixu.
4.
Netvrdil jsem take vubec, ze Interbase je nejlepsi na svete.
Je to vedle AnyWhere asi jedna z nejlevnesich databazi a neni tak dobre
vybavena jako treba Oracle. Ani ja ani nikdo jiny tu netvrdil, ze pouze a
jedine,
co Intebase umi, je to prave C/S reseni a nic jineho neexistuje.
Spatne jsi asi pochopil ten prispevek.

Jeste k te replikaci.
Zatimco napr. AnyWhere primo podporuje replikace, Interbase opravdu nikoliv.
Problem ovsem neni slozite vyresit. Na interbase.com je ke stazeni modul,
ktery replikaci resi.
Jaro

jakvycistittabulku v Paradoxu

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 15.10.1998 05:52:45

{ Pakovani Paradoxove nebo dBASE tabulky
Pred volanim teto funkce musi byt tabulka otevrena exclusivne }
procedure TData.PackTable(Table: TTable);
var
Props: CURProps;
hDb: hDBIDb;
TableDesc: CRTblDesc;

begin
// Make sure the table is open exclusively so we can get the db handle...
if Table.Active = False then
raise EDatabaseError.Create('Tabulka musi byt otevrena');
if Table.Exclusive = False then
raise EDatabaseError.Create('Tabulka musi byt otevrena excluzivne');

// Get the table properties to determine table type...
Check(DbiGetCursorProps(Table.Handle, Props));

// If the table is a Paradox table, you must call DbiDoRestructure...
if Props.szTableType = szPARADOX then
begin
// Blank out the structure...
FillChar(TableDesc, sizeof(TableDesc), 0);
// Get the database handle from the table's cursor handle...
Check(DbiGetObjFromObj(hDBIObj(Table.Handle), objDATABASE, hDBIObj(hDb)));
// Put the table name in the table descriptor...
StrPCopy(TableDesc.szTblName, Table.TableName);
// Put the table type in the table descriptor...
StrPCopy(TableDesc.szTblType, Props.szTableType);
// Set the Pack option in the table descriptor to TRUE...
TableDesc.bPack := True;
Table.Close;
// Call DbiDoRestructure...
Check(DbiDoRestructure(hDb, 1, (zv)TableDesc, nil, nil, nil, FALSE));
end
else
// If the table is a dBASE table, simply call DbiPackTable...
if Props.szTableType = szDBASE then
Check(DbiPackTable(Table.DBHandle, Table.Handle, nil, szDBASE, TRUE))
else
// Pack only works on PAradox or dBASE; nothing else...
raise EDatabaseError.Create('Tabulka mus� b�t typu Paradox nebo dBASE');

Table.Exclusive := False;
Table.Open;
end;


-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ��jna 1998 16:29
P�edm�t: Re: jakvycistittabulku



Paradox ...

On Wed, 14 Oct 1998, Jan Fiala wrote:

> Jakou tabulku pouzivas (dBase, Paradox ....)
>

"OnMove"

[*] rys(zv)zas-me(tec)cz - 15.10.1998 7:21:54

Jednou jsem to delal. Tenkrat jsem to myslim vyresil tak, ze jsem napsal
obsluhu udalosti WindowsPosChanging; nepamatuju si to presne, ale da se to
najit v napovede. Cele to spocivalo v tom, ze tato zprava je oknu zaslana
pred tim, nez se prekresli. Predava se ukazatel na nejakou strukturu, ktera
obsahuje FLAG (jednotlive bity jsou popsany v tom helpu). Stacilo tam jeden
nebo dva bity nastavit ci vymazat a poloha okna se pak vubec nezmenila,
takze nedochazelo k tomu blikani.

Ten zdrojak tady nemam. Kdyz to nenajdes v napovede, napis a ja se doma
podivam po tom zdrojaku.

Karel Rys
rys(zv)zas-me(tec)cz


>mam taky maly problem. potrebujem urobit formu "nepohyblivou". bohuzial,
>ziadna event typu OnMove neexistuje, takze som to riesil pridanim
>procedury reagujucej na windows message WM_MOVE a v nej nastavujem
>hodnoty TForm.Left, TForm.Top na pevne hodnoty.
>cele to ma ale jednu chybu. ak sa fomou pokusim pohnut, hrozne to
>preblikuje (ale hned ako prestanem hybat mysou, forma sa poslusne vrati
>tam, kam patri).
>
>vdaka


Spatne kresleni car

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.10.1998 07:55:27

Pavel Serbajlo wrote:

> V Delphi mam jeden drobny, ale do oci bijici problem.
> Pokud nakreslim prerusovanou caru na canvas s tloustkou (width):=1, je
> vsechno OK. Pokud udelam to stejny s width>1, cara se zmeni z prerusovane
> v plnou. Nevite nahodou, jak to opravit, nebo nemate jinou proceduru,
> ktera by fungovala tak jak ma?????

Precti si poradne help, tam pisou, ze pro prerusovanou to nejde.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


"OnMove"

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.10.1998 07:55:27

Dusanic Lubos wrote:

> mam taky maly problem. potrebujem urobit formu "nepohyblivou". bohuzial,
> ziadna event typu OnMove neexistuje, takze som to riesil pridanim
> procedury reagujucej na windows message WM_MOVE a v nej nastavujem hodnoty
> TForm.Left, TForm.Top na pevne hodnoty. cele to ma ale jednu chybu. ak sa
> fomou pokusim pohnut, hrozne to preblikuje (ale hned ako prestanem hybat
> mysou, forma sa poslusne vrati tam, kam patri).

Zkus WM_MOUSEUP.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


"OnMove"

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 15.10.1998 08:36:53

A co WM_MOVING, na to jsi zapomel ??????

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz


> -----P�vodn� zpr�va-----
> Od: Dusanic Lubos [SMTP:lubos(zv)iname.com]
> Odesl�no: 14. ��jna 1998 13:34
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: "OnMove"
>
> caves,
>
> mam taky maly problem. potrebujem urobit formu "nepohyblivou".
> bohuzial,
> ziadna event typu OnMove neexistuje, takze som to riesil pridanim
> procedury reagujucej na windows message WM_MOVE a v nej nastavujem
> hodnoty TForm.Left, TForm.Top na pevne hodnoty.
> cele to ma ale jednu chybu. ak sa fomou pokusim pohnut, hrozne to
> preblikuje (ale hned ako prestanem hybat mysou, forma sa poslusne
> vrati
> tam, kam patri).
>
> vdaka
>
> --
> lubos dusanic
>
> mailto:lubos(zv)iname.com
> http://www.geocities.com/SiliconValley/Haven/7613
>

ztraceny mail

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 15.10.1998 08:40:13

tak si ten mail najdi na http://www.delphi(tec)cz

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz


> -----P�vodn� zpr�va-----
> Od: Hobbys [SMTP:m.konicek(zv)sh.cvut(tec)cz]
> Odesl�no: 11. ��jna 1998 18:24
> Komu: Delphi
> P�edm�t:
>
> Nekdo mi zde radil, jak osetrit udalost, pri ktere opusti mys nejakou
> komponentu. Moh by se mi dotycny clovek ozvat ? (ztratil sem dany
> mail,
> ktery toto resil)
>
> Hobbys
>
> PS> nejedna se o proste WM_MOUSELEAVE (jedna se o kombinaci s capture)

jakvycistittabulku v Paradoxu

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 15.10.1998 08:40:11

Hi,

me se teda jeste nestalo, aby se mi v jakemkoliv pripade ozval zaznam ze
zahrobi....... Mekke mazani maji tabulky Xbase, ale paradox???


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Jan Fiala [SMTP:jan.fiala(zv)iname.com]
> Odesl�no: 15. ��jna 1998 5:53
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: jakvycistittabulku v Paradoxu
>
> { Pakovani Paradoxove nebo dBASE tabulky
> � Pred volanim teto funkce musi byt tabulka otevrena exclusivne }
> procedure TData.PackTable(Table: TTable);
> var
> � Props: CURProps;
> � hDb: hDBIDb;
> � TableDesc: CRTblDesc;
> �
> begin
> � // Make sure the table is open exclusively so we can get the db
> handle...
> � if Table.Active = False then
> ��� raise EDatabaseError.Create('Tabulka musi byt otevrena');
> � if Table.Exclusive = False then
> ��� raise EDatabaseError.Create('Tabulka musi byt otevrena
> excluzivne');
> �
> � // Get the table properties to determine table type...
> � Check(DbiGetCursorProps(Table.Handle, Props));
> �
> � // If the table is a Paradox table, you must call
> DbiDoRestructure...
> � if Props.szTableType = szPARADOX then
> � begin
> ��� // Blank out the structure...
> ��� FillChar(TableDesc, sizeof(TableDesc), 0);
> ��� //� Get the database handle from the table's cursor handle...
> ��� Check(DbiGetObjFromObj(hDBIObj(Table.Handle), objDATABASE,
> hDBIObj(hDb)));
> ��� // Put the table name in the table descriptor...
> ��� StrPCopy(TableDesc.szTblName, Table.TableName);
> ��� // Put the table type in the table descriptor...
> ��� StrPCopy(TableDesc.szTblType, Props.szTableType);
> ��� // Set the Pack option in the table descriptor to TRUE...
> ��� TableDesc.bPack := True;
> ��� Table.Close;
> ��� // Call DbiDoRestructure...
> ��� Check(DbiDoRestructure(hDb, 1, (zv)TableDesc, nil, nil, nil, FALSE));
> � end
> � else
> ��� // If the table is a dBASE table, simply call DbiPackTable...
> ��� if Props.szTableType = szDBASE then
> ����� Check(DbiPackTable(Table.DBHandle, Table.Handle, nil, szDBASE,
> TRUE))
> ��� else
> ����� // Pack only works on PAradox or dBASE; nothing else...
> ����� raise EDatabaseError.Create('Tabulka mus� b�t typu Paradox nebo
> dBASE');
> �
> � Table.Exclusive := False;
> � Table.Open;
> end;
>
>
> -----------------------------------------------------------------
> ing. Jan Fiala��������� jan.fiala(zv)iname.com
> <mailto:jan.fiala(zv)iname.com>
> Prog-Soft s.r.o.
> INFOS - informacn� system pro n�poj�re
> ---------------------------------------------------------------
>
> -----Puvodn� zpr�va-----
> Od: Marcello < dvo20um(zv)axpsu.fpf.slu(tec)cz
> <mailto:dvo20um(zv)axpsu.fpf.slu(tec)cz>>
> Komu: delphi-l(zv)fwd(tec)cz <mailto:delphi-l(zv)fwd(tec)cz> < delphi-l(zv)fwd(tec)cz
> <mailto:delphi-l(zv)fwd(tec)cz>>
> Datum: 14. o�jna 1998 16:29
> Poedmit: Re: jakvycistittabulku
>
>
>
> Paradox ...
>
> On Wed, 14 Oct 1998, Jan Fiala wrote:
>
> > Jakou tabulku pouzivas� (dBase, Paradox ....)
> >
>

"OnMove"

[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 15.10.1998 08:48:22

> A co WM_MOVING, na to jsi zapomel ??????
>

aby som to cele upresnil. mne to non-move funguje naprosto spolahlivo,
ale vobec to nevyzera dobre vizualne. chytim formu mysou ta Caption a
ked nou hybem, ona mi poskakuje po obrazovke a zaroven sa snazi dostat
spat ...

mal som na mysli nieco ine. je nejeky dialog vo windows (urcite v nt,
neviem o 95), ktory sa neda presunut ani mysou, ani keyb. to je to prave
orechove ...

cize este raz - chcel by somm zakazat pohnutie formou a nie reagovat az
po jej pohnuti tak ako doteraz ...

--
lubos dusanic

mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613

Kniznice formularov a dialogov, zostav a ine ...

[*] Jiri Szopa <jiri.szopa(zv)telecom(tec)cz> - 15.10.1998 09:01:26


>Caute,
> chcel by som sa spytat, ci nevie nahodou niekto o nejakej /najlepsie
>free kniznici (dll, pas), nie komponente/, ktora by obsahovala
>preddefinovane standardne typy dialogov, okien, tlacovych zostav. Po
>zaradeni kniznice do sekcie uses by som si vytvoril formular (modalny,
>nemodalny) dynamicky s tym, ze v konstruktore, resp. prostrednictvom
>nejakych metod by som mal moznost nadefinovat napr. tlacidla, ktore tam
>maju by a niektore najpouzivanejsie ovladacie prvky (nieco na sposob
>MessageDlg ale vo vacsom a viac flexibilnejsom vydani). Napr. vystupne
>zostavy, ak sa robia vo vacsom mnozstve mozu predstavovat v projekte
>vacsinu okien a napriklad by som chcel zostavu vytvarat presne
>definovanim riadku a stlpca, kde ma byt umiestneny QR komponent.
>(Experti tu nic neriesia).
> Samozrejme, ze by sa to dalo urobit, ale momentalne nemam cas sa
>venovat tomu povedzme mesiac.
>
Pro tento pripad mam udelane sve "vzorove" formulare napr. TBrowseForm -
s DBGridem, TRecordForm - pro zapis a editaci zaznamu, TReportForm -
pro reporty. Na nich umistim zakladni komponenty a funkce a pak to ulozim
do Object Repository - udelam si zalozku Forms. No a zni muzez: pouzit nebo
odvodit nebo udelat kopii pro novy formular. K nemu si pridas specificke
komponenty pro dany form.Vyhoda je, ze pokud dedis, udelas zmenu ve vzoru
a mas to vsude a podstatne redukujes kod.
-------------------------------------------
Ing. Jiri Szopa
tel.: +420 659 713393
fax.: +420 659 713392
email: jiri.szopa(zv)telecom(tec)cz

jakvycistittabulku

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 15.10.1998 09:18:18



>smazane zaznamy tam mrsky porad jsou, ale nejsou videt :-), a treba takovy
>Findkey je v pohode najde a pri vypocitavani statistik to dela takovy

Tak to mi nejde na rozum, obzvlast, kdyz pises, ze pouzivas Paradox. To mi
nejak
nesedi s logikou mazani v Pdx.

>Potreboval bych help jak ty zaznamy vyprat s

>tabulek "doopravdy".


Pro Paradox DbiDoRestructure, pro dBase DbiPackTable. Zkus to sam, je to
krasne
objevovani a urcite ti to k necemu bude (obzvlast DoRestructure je
inspirujici).

Otazka pro D4-uzivatele. Je v komponente TTable metoda Pack nebo ji tam zase
zapomeli pridat?

Martin


Prehravani zvuku dane frekvence

[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 15.10.1998 09:23:50

Nevite nekdo poradit funkci Win32 API, ktera dokaze prehrat zvuk
zadane frekvence a delky. Jeste lepe, kdyby to v pripade existence
zvukove karty prehrala na ni, v pripade ze zvukovka neni, tak na
reproduktoru.

Diky.

J. Nagy
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz

Prehravani zvuku dane frekvence

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 15.10.1998 09:46:42

Zkus se podivat na www.torry.ru do sekce komponent (systemove, zvuky,
ruzne...), kde neco podobneho bylo a bylo to uz hotove.
Jaro B.

> -----P�vodn� zpr�va-----
> Od: Jirka [SMTP:Juraj.Nagy(zv)nh-trans(tec)cz]
> Odesl�no: 15. ��jna 1998 8:24
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Prehravani zvuku dane frekvence
>
> Nevite nekdo poradit funkci Win32 API, ktera dokaze prehrat zvuk
> zadane frekvence a delky. Jeste lepe, kdyby to v pripade existence
> zvukove karty prehrala na ni, v pripade ze zvukovka neni, tak na
> reproduktoru.
>
> Diky.
>
> J. Nagy
> e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
>
>

jakvycistittabulku v Paradoxu

[*] Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 15.10.1998 10:00:08


Hele ja na to hledel jak puk, ale mam tabulku Fakthlav s hlavickama faktur
a delal jsem na nima statistiky, a porad mi vychazely bludy, tak jsem si
nechal vypsat cisla nalezenych faktur, a pro ucel testovani jsem tam mnel
jen faktury s cisly 1-7, a tu najednou byly nalezeny faktury s cisly
: 980000196 (zaznamy ktere jsem smazal!!!!) a podobne, kdyz si tu tabulku
otevru v desktopu tak jsou tam jen ty zaznamy 1-7 :-),
Ti tu tabulku klIdne poslu ...
Marcello

On Thu, 15 Oct 1998, [iso-8859-2] Martin Fron�k wrote:

> Hi,
>
> me se teda jeste nestalo, aby se mi v jakemkoliv pripade ozval zaznam ze
> zahrobi....... Mekke mazani maji tabulky Xbase, ale paradox???
>
>
> Martin Fron�k


Pentium a 486

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.10.1998 10:37:36

Zdravim,

kompiluju program v Delphi Standard 3.0 na svem Pentiu II. Pokud
prelozeny program spoustim na jakemkoli jinem stroji s jakymkoli
Pentiem, je vse OK. okud se jej ale pokusim spustit na 486, dostanu
nasledujici hlasku:

"Exception EExternalException in module AUTO.EXE at 000412A0. External
Exception C000001D."

Netusite co s tim?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Pentium a 486

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 15.10.1998 10:50:36

Nemas zapnutou optimalizaci pro pentium pro kompilaci ?

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
Komu: '*** Delphi' <delphi-l(zv)fwd(tec)cz>
Datum: 15. ��jna 1998 10:43
P�edm�t: Pentium a 486


Zdravim,

kompiluju program v Delphi Standard 3.0 na svem Pentiu II. Pokud
prelozeny program spoustim na jakemkoli jinem stroji s jakymkoli
Pentiem, je vse OK. okud se jej ale pokusim spustit na 486, dostanu
nasledujici hlasku:

"Exception EExternalException in module AUTO.EXE at 000412A0. External
Exception C000001D."

Netusite co s tim?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

"OnMove"

[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 15.10.1998 11:00:59

po urcitom usili (a s prispenim nejakeho toho nametu) sa mi tento problem podarilo
vyriesit nasledovne

v private deklaracii formy som si zadeklaroval
procedure WMWindowPosChanging(var Message: TWMWindowPosChanging); message
WM_WINDOWPOSCHANGING;

a v procedure potom
procedure TfrmMain.WMWindowPosChanging(var Message: TWMWindowPosChanging);
begin
with Message.WindowPos^ do
Flags:= Flags OR SWP_NOMOVE;
end;

lubos dusanic


Kniznice formularov a dialogov, zostav a ine ...

[*] Branislav Danko <danko(zv)basl.sk> - 15.10.1998 11:17:31

Viem, ze to tak ide, ale stale je tam to okno, ktore by som musel navrhnut
aspon prvykrat a potom uz len dedit od neho. Nejaky free "dialogovy/formularovy
engine" nie je niekde na Internete na stiahnutie.

Jiri Szopa wrote:

> >Caute,
> > chcel by som sa spytat, ci nevie nahodou niekto o nejakej /najlepsie
> >free kniznici (dll, pas), nie komponente/, ktora by obsahovala
> >preddefinovane standardne typy dialogov, okien, tlacovych zostav. Po
> >zaradeni kniznice do sekcie uses by som si vytvoril formular (modalny,
> >nemodalny) dynamicky s tym, ze v konstruktore, resp. prostrednictvom
> >nejakych metod by som mal moznost nadefinovat napr. tlacidla, ktore tam
> >maju by a niektore najpouzivanejsie ovladacie prvky (nieco na sposob
> >MessageDlg ale vo vacsom a viac flexibilnejsom vydani). Napr. vystupne
> >zostavy, ak sa robia vo vacsom mnozstve mozu predstavovat v projekte
> >vacsinu okien a napriklad by som chcel zostavu vytvarat presne
> >definovanim riadku a stlpca, kde ma byt umiestneny QR komponent.
> >(Experti tu nic neriesia).
> > Samozrejme, ze by sa to dalo urobit, ale momentalne nemam cas sa
> >venovat tomu povedzme mesiac.
> >
> Pro tento pripad mam udelane sve "vzorove" formulare napr. TBrowseForm -
> s DBGridem, TRecordForm - pro zapis a editaci zaznamu, TReportForm -
> pro reporty. Na nich umistim zakladni komponenty a funkce a pak to ulozim
> do Object Repository - udelam si zalozku Forms. No a zni muzez: pouzit nebo
> odvodit nebo udelat kopii pro novy formular. K nemu si pridas specificke
> komponenty pro dany form.Vyhoda je, ze pokud dedis, udelas zmenu ve vzoru
> a mas to vsude a podstatne redukujes kod.
> -------------------------------------------
> Ing. Jiri Szopa
> tel.: +420 659 713393
> fax.: +420 659 713392
> email: jiri.szopa(zv)telecom(tec)cz


"OnMove"

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 15.10.1998 11:53:12

No prave myslim si ze to preskakovani nebude kdyz to osetris v
WM_Moving. Jinak nejjednoduseji jak to muzes udelat je osetrit akce na
Caption pruhu okna tim ze treba zakazes kliknuti buttone na mysi - jsou
to zpravy zacinajici WM_NC...

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz


> -----P�vodn� zpr�va-----
> Od: Dusanic Lubos [SMTP:lubos(zv)iname.com]
> Odesl�no: 15. ��jna 1998 7:48
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: "OnMove"
>
> > A co WM_MOVING, na to jsi zapomel ??????
> >
>
> aby som to cele upresnil. mne to non-move funguje naprosto spolahlivo,
> ale vobec to nevyzera dobre vizualne. chytim formu mysou ta Caption a
> ked nou hybem, ona mi poskakuje po obrazovke a zaroven sa snazi dostat
> spat ...
>
> mal som na mysli nieco ine. je nejeky dialog vo windows (urcite v nt,
> neviem o 95), ktory sa neda presunut ani mysou, ani keyb. to je to
> prave
> orechove ...
>
> cize este raz - chcel by somm zakazat pohnutie formou a nie reagovat
> az
> po jej pohnuti tak ako doteraz ...
>
> --
> lubos dusanic
>
> mailto:lubos(zv)iname.com
> http://www.geocities.com/SiliconValley/Haven/7613
>

Pentium a 486

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.10.1998 12:02:16

> Nemas zapnutou optimalizaci pro pentium pro kompilaci ?

Projekt-option-Compiler-Optimization?

Mam. S tim to nebude chodit?

Prace s SQL

[*] Martin Kuska <martin.kuska(zv)amenit(tec)cz> - 15.10.1998 13:30:49

Lukes V�clav wrote:

> ctel bych se zeptat na nekolik veci k pouzivani SQL prikazu v Delphi.
> Z Informixu jsem zvykly pouzivat temporare tabulky. Bud je vycrejtuji pred
> jejich plnenim a potom provedu jejich naplneni ( INSERT INTO table SELECT
> ... ) nebo primo udelam SELECT ... INTO TEMP TABLE ...
> Jak to funguje v Delphi ?
>
> Diky

Pri praci s MSSQL je to mozne jen pri pouziti BDE nativnich ovladacu. Pres
ODBC to nejde.

--
==============================================================
= Ing. Martin Ku�ka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================

ukladani zaznamu

[*] Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 15.10.1998 14:00:14


Panove,
mam nasledujici problem, pokud mi klekne program co pracuje s
paradoxovskyma tabulkama, tak se strati vsechny zaznamy, ktere byly
porizeny v prubehu chodu programu, i kdyz byl proveden post tabulky,
nevite nekdo jak nastavit to cachovani zaznamu tak, aby se tato neprijemna
skutecnost minimalizovala.

Marcello


Lokalizace

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 15.10.1998 14:06:30

Mam takovy problem s lokalizaci aplikace. Udelal jsem v Delphi3 aplikaci
s ceskymi zdroji uvnitr Aplikace.exe a k tomu anglickou verzi zdroju
Aplikace.enu. Delal jsem to pomoci jazykoveho lokalizatoru Hlinka - Soft
3 freeware, ale to neni dulezite, mohl jsem anglicke zdroje vytvorit v
cemkoliv jinem. V registru .../Delphi/Localize je cesta k aplikaci a
podle toho jestli hodnota je "enu" tak to windows berou anglicke zdroje
a jestli je hodnota "" (tedy prazdna) bere to implicitni zdroje tedy
cesky. Jestlize je ve windows v mistnim nastaveni nastavena americka
anglictina tak to vzdy bere anglickou verzi, bez ohledu na obsah
registru ...Delphi/Localize - to chapu - v te chvili jsou windows
nastaveny implicitne na "enu" verzi.
Ale ted ten problem - u jednoho zakaznika na ceskych windowsech pri
mistnim nastaveni "cesky" to vzdy bere anglicke zdroje bez ohledu na
obsah registru ...Delphi/Localize. NEVITE NEKDO KDO MA ZKUSENOSTI S
LOKALIZACI CIM TO JE ???

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz

Reference o C++Builderu pro programatora v neobjek

[*] Va�k�� Martin <MVackar(zv)cpoj(tec)cz> - 15.10.1998 14:08:33

Ahoj vsichni,
programuji v klasickem C a rad bych zakoupil progr.jazyk, kterym bych
jednoduse vstoupil do objektoveho programovani C++, a mohl pracovat s
objekty jako napr.Visual Basic a Delphi. Existuje neco takoveho ?
Dekuji.

M.Vackar
mvackar(zv)cpoj(tec)cz


Jak udelat TImage sedy (dimmed)

[*] Jiri Szopa <jiri.szopa(zv)telecom(tec)cz> - 15.10.1998 14:28:16

Potrebuji aby obrazek byl sedy nebo barevny.
Neco jako Enabled:=False na Speedbuttonu.
-------------------------------------------
Ing. Jiri Szopa
tel.: +420 659 713393
fax.: +420 659 713392
email: jiri.szopa(zv)telecom(tec)cz

acmFormatChoose

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 15.10.1998 14:43:09

hi
potreboval bych poradit jak zobrazim dialog na vyber zvukoveho formatu
pomoci funkce acmFormatChoose.
Bohuzel nevi jak vyplnit spravne strukturu ACMFORMATCHOOSE tak aby mi tato
funkce fungovala.
Predem diky

"OnMove"

[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.10.1998 14:50:04

Neexistuje nejaky levnejsi zpusob jak propojit Delphi s Informixem, nez
koupit si k Professional za 90 tisic Client/server?

F.

propojeni s Informixem

[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.10.1998 14:51:05

Neexistuje nejaky levnejsi zpusob jak propojit Delphi s Informixem, nez
koupit si k Professional za 90 tisic Client/server?

F.

P.S.: Omlouvam se za predchozi mail se spatnym subjectem...

Kaskadny delete v Paradoxe

[*] Branislav Danko <danko(zv)basl.sk> - 15.10.1998 14:57:55

Caute delphisti,

Ak si Database Desktope nastavim referencnu integritu medzi dvoma
tabulkami. Hoci je mozne nastavit mody zmeny udajov "Prohibit" a
"Cascade", tak ak robim delete v master tabulke a ak existuju zaznamy v
childe, tak aj napriek tomu ze mam nastavenu mod zmeny na "Cascade" tak
mi engine oznami, ze child table obsahuje zaznamy, teda sprava sa ako
keby bol mod "Prohibit". Nechcel by som to explicitne programovat, ked
to moze urobit BDE automaticky.
Nesuvisi to nejak s tym, ze Paradox tabulky nespravuje databazovy
server.

Brano.

ukladani zaznamu

[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 15.10.1998 15:04:56

Vypni na tech tabulkach Cached updates a zkontroluj. Dale, pokud
pouzivas Peer to peer sit, nebo k tem tabulkam (staci obcas!!!)
pristupujes jak ze 16 tak i z 32 bitoveho BDE, nebo z nejakeho non
BDE programu, tak zapni NA VSECH STANICICH Lokal Share v konfiguraci
BDE na true. Jinak se budes divit (napriklad pri mazani faktur)...
Jsou s tim spojene velice prijemne a potesujici chvile (minuty,
hodiny, dny, noci, tydny...) prace.

S pozdravem

J. Nagy
NH-TRANS, spol. s r.o.
Podebradova 28
702 00 Ostrava
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
> -----P�vodn� zpr�va-----
> Od: Marcello [SMTP:dvo20um(zv)axpsu.fpf.slu(tec)cz]
> Odesl�no: 15. ��jna 1998 14:00
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: ukladani zaznamu
>
>
> Panove,
> mam nasledujici problem, pokud mi klekne program co pracuje s
> paradoxovskyma tabulkama, tak se strati vsechny zaznamy, ktere byly
> porizeny v prubehu chodu programu, i kdyz byl proveden post
tabulky,
>
> nevite nekdo jak nastavit to cachovani zaznamu tak, aby se tato
> neprijemna
> skutecnost minimalizovala.
>
> Marcello

"OnMove"

[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 15.10.1998 15:16:39

Treba ODBC.

> -----P�vodn� zpr�va-----
> Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
> Odesl�no: 15. ��jna 1998 14:50
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: "OnMove"
>
> Neexistuje nejaky levnejsi zpusob jak propojit Delphi s Informixem, nez
> koupit si k Professional za 90 tisic Client/server?
>
> F.

Prace s SQL

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 15.10.1998 15:16:37

[P��loha v souboru: Petr Je�ek (E-mail).vcf]
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.

Pres ODBC to urcite jde. Sice jsem to nezkousel pres Delphi, ale
z Visual Basicu i Visual FoxPro jsem SELECT INTO TEMP pouzival
uplne bez problemu (a zrovna to bylo na INFORMIX).

-----Original Message-----
From: Martin Kuska [mailto:martin.kuska(zv)amenit(tec)cz]
Sent: Thursday, October 15, 1998 12:31 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Prace s SQL


Lukes V�clav wrote:

> ctel bych se zeptat na nekolik veci k pouzivani SQL prikazu v Delphi.
> Z Informixu jsem zvykly pouzivat temporare tabulky. Bud je vycrejtuji
pred
> jejich plnenim a potom provedu jejich naplneni ( INSERT INTO table
SELECT
> ... ) nebo primo udelam SELECT ... INTO TEMP TABLE ...
> Jak to funguje v Delphi ?
>
> Diky

Pri praci s MSSQL je to mozne jen pri pouziti BDE nativnich ovladacu.
Pres
ODBC to nejde.

--
==============================================================
= Ing. Martin Ku�ka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================

Komponenty od Fr. Piete

[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 15.10.1998 15:41:34


Hi,

pracujete nekdo s komponentami od F. Pieteho ?

Vasek


V�clav Lukes
E-mail: Vaclav.Lukes(zv)pvt(tec)cz, 511247(zv)sms.paegas(tec)cz
Tel.: 0603-511247


Reference o C++Builderu pro programatora v neobjek

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 15.10.1998 15:48:38

Hi,

samozrejme, prece C++Builder

ale nerozumim presne o co ti jde.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Va�k�� Martin [SMTP:MVackar(zv)cpoj(tec)cz]
> Odesl�no: 15. ��jna 1998 14:09
> Komu: Delphi konference (el. adresa)
> P�edm�t: Reference o C++Builderu pro programatora v neobjektovem
> C
>
> Ahoj vsichni,
> programuji v klasickem C a rad bych zakoupil progr.jazyk, kterym bych
> jednoduse vstoupil do objektoveho programovani C++, a mohl pracovat s
> objekty jako napr.Visual Basic a Delphi. Existuje neco takoveho ?
> Dekuji.
>
> M.Vackar
> mvackar(zv)cpoj(tec)cz


"OnMove"

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 15.10.1998 15:51:23

Leda porusit zakon. Ale to je FUJ.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
> Odesl�no: 15. ��jna 1998 14:50
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: "OnMove"
>
> Neexistuje nejaky levnejsi zpusob jak propojit Delphi s Informixem,
> nez
> koupit si k Professional za 90 tisic Client/server?
>
> F.

OnMove - obracene

[*] ficek <ficek(zv)hstech(tec)cz> - 15.10.1998 16:12:42

Pro ovladani meho IS (sklada se z nekolika EXE) mam vytvoreny programek
ktery ovlada jednotlive moduly (EXE) a ten jsem se snazil navrhnou podobne
jako listu pro MSOffice. Zkus neco podobnyho. Prikladam vypis z ktereho by
to melo byt zrejme (takhle jak to je to taky funguje). Bez blikani a neresim
ani zadne zpravy.


type
TForm1 = class(TForm)
PaintBox1: TPaintBox;
Button1: TButton;
procedure PaintBox1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure PaintBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure PaintBox1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure PaintBox1Paint(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
AMouseIsDown : Boolean;
ALeftDiff, ATopDiff : integer;
ANapis : string;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.PaintBox1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
AMouseIsDown := True;
ALeftDiff := X; ATopDiff := Y;
end;

procedure TForm1.PaintBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if AMouseIsDown then
begin
Left := Left + X - ALeftDiff; Top := Top + Y - ATopDiff;
if Top < 0 then begin Top := 0; AMouseIsDown := False; end;
if Left < 0 then begin Left := 0; AMouseIsDown := False; end;
if (Top+Height) > Screen.Height then begin Top :=
Screen.Height-Height; AMouseIsDown := False; end;
if (Left+Width) > Screen.Width then begin Left := Screen.Width-Width;
AMouseIsDown := False; end;
end;
end;

procedure TForm1.PaintBox1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
AMouseIsDown := False;
end;

procedure TForm1.PaintBox1Paint(Sender: TObject);
var ALogFont : TLogFont;
TmpRect : TRect;
begin
FillChar(ALogFont, sizeof(TLogFont), 0);
with ALogFont do begin
lfHeight := 0;
lfWidth := 0;
lfEscapement := 2700;
lfOrientation := 2700;
lfWeight := FW_BOLD;
lfItalic := ord(False);
lfUnderline := ord(False);
lfStrikeOut := ord(False);
lfCharSet := DEFAULT_CHARSET;
lfOutPrecision := OUT_DEFAULT_PRECIS;
lfClipPrecision := CLIP_DEFAULT_PRECIS;
lfQuality := DEFAULT_QUALITY;
lfPitchAndFamily := DEFAULT_PITCH or FF_DONTCARE;
StrPCopy(lfFaceName, 'Arial');
end;
TmpRect := Rect(0, 0, Width, Height);
PaintBox1.Canvas.Font.Handle := CreateFontIndirect(ALogFont);
if Application.Active then
begin
PaintBox1.Canvas.Brush.Color := clActiveCaption;
PaintBox1.Canvas.Font.Color := clCaptionText;
end
else
begin
PaintBox1.Canvas.Brush.Color := clInactiveCaption;
PaintBox1.Canvas.Font.Color := clInactiveCaptionText;
end;
PaintBox1.Canvas.FillRect(TmpRect);
PaintBox1.Canvas.TextOut(Width-PaintBox1.Canvas.TextWidth('W'),
10, ANapis);
PaintBox1.Canvas.Refresh;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ANapis := 'MOJE FIRMA';
PaintBox1.Align := alClient;
Button1.Caption := 'KONEC';
Button1.Top := 0; Button1.Left := 0;
Width := Button1.Width;
BorderStyle := bsNone;
AMouseIsDown := False;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
end;
Karel Vlcek wrote:

> Zdravim vsechny delfare
>
> ja jsem narazil presne na ten problem, ktaery je popsan nize.
>
> Potrebuji "chytnout" formular na kteremkoliv miste a posunout
> oknem.
> Formular je cely zakryty komponentou TPanel.
>
> Vsechno funguje "skvele", az na to odporne blikani pri
> posouvani okna.
>
> Oknem pohybuji v ramci udalosti OnMouseMove, pomoci nastaveni
> left a top formulare.
>
> Muzete mi nekdo pomoci ?
>
> Karel Vlcek
> vlcekk(zv)hotmail.com


propojeni s Informixem

[*] ALG <agisoft(zv)softhome(tec)net> - 15.10.1998 17:03:49


Ovsem ze existuje, nekde jsem to videl, ale uz nevim kde.

...takze si porad sam...

G.

-----P�vodn� zpr�va-----
Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
Odesl�no: 15. ��jna 1998 13:51
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: propojeni s Informixem

Neexistuje nejaky levnejsi zpusob jak propojit Delphi s Informixem, nez
koupit si k Professional za 90 tisic Client/server?

F.

P.S.: Omlouvam se za predchozi mail se spatnym subjectem.

Kaskadny delete v Paradoxe

[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 15.10.1998 17:07:10

Zdravim,

Branislav Danko wrote:

> Caute delphisti,
>
> .. Nesuvisi to nejak s tym, ze Paradox tabulky nespravuje databazovy
> server.
>

hej, presne s tym to suvisi :-)
nieco podobne som kedysi skusal a nakoniec som to nechal tak a zacal
pouzivat
Local Interbase :-)

nemyslim si, ze by BDE dokazalo rozpoznat, ze sa jedna o ten typ
Paradoxovskej tabulky,
ktora cascadny delete umoznuje ...


--
Majte sa,
R.

Set Focus

[*] Marek Soukup <marek(zv)comberg(tec)com> - 15.10.1998 17:18:05

Ahojte,
potreboval bych vedet jestli de nejak nesilene:
mam na formulari tri sloupce dbeditu, kazdy sloupec ma 15 radku
(Db Gridem to nahradit nechci)
kdyz zmacknu sipky potrebuju aby se kurzor posunul o edit vejs atd.
jediny co jsem vymyslel je udelat to natvrdo casem (napr. Sender is
Edit1 then Edit2.SetFocus) ale to mi neprijde zrovna genialni. Jde to
elegantneji ?

Marek Soukup

ukladani zaznamu

[*] Jaroslav N�dhera <csh(zv)czn(tec)cz> - 15.10.1998 17:26:39

V konfiguraci BDE je nutno nastavit LOCAL SHARE na TRUE.

J. Nadhera

-----P�vodn� zpr�va-----
Od: Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. ��jna 1998 13:37
P�edm�t: ukladani zaznamu


>
>Panove,
> mam nasledujici problem, pokud mi klekne program co pracuje s
>paradoxovskyma tabulkama, tak se strati vsechny zaznamy, ktere byly
>porizeny v prubehu chodu programu, i kdyz byl proveden post tabulky,
>nevite nekdo jak nastavit to cachovani zaznamu tak, aby se tato neprijemna
>skutecnost minimalizovala.
>
> Marcello
>

IB a sdileni

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.10.1998 18:01:46



Jaro wrote:
>
> >No asi na to nebudu myslet, kdyz uz to mam hotove, ze? :-) To je trosku
> >pozde...
> -----
> To tedy ano. Je dobre, kdyz analyza predchazi vyvoji.

Presne tak jsem to myslel a taky tomu tak i bylo :-)

> -----
> Nic o tom programu nevim, ale mam pocit, ze by zrovna takovy pripad byl
> resitelny bez zamku.
> V okamziku kdy nekdo 'urve' zasilku (podle pristupovych prav, priorit a na
> stejne urovni treba dle zakona kdo driv prijde ten driv mele), tak tu
> zasilku
> automaticky oznacim kdy, kdo a komu ji pridelil. Ostatnim uz pak nepovolim
> stejne operace. Editovat ji muze jen ten kdo ji oznacil a ostatni at se
> porvou
> o dalsi zasilky.
> ... treba .... nebo take jinak

V podstate to tak slape, akorat je to trosku slozitejsi, nez jsem
dokazal nastitnit v 'priklade ze zivota'. Pracuje to zhruba tak, ze na
dvou masinach jsou videt na obrazovce nacachovane zaznamy (napr. 30) -
stejne podotykam. V okamziku, kdy jeden operator rekne: Tuhle zasilku
poveze Pepa, tak nemuze druhy operator uz tu zasilku NIKOMU dat. Takze v
podstate na Edit spoustim ulozenou proceduru, ktera nastavi nejaky
priznak u onoho zaznamu (nekdo s nim pracuje) a zaroven predtim
kontroluje, zda zaznam uz neni zamcen. Chodi to fajn, ale je otrava to
programovat ;-).

Asi by to slo resit i principem, jaky nastinil Zbysek Hlinka (urcite
zajimavy podnet hodny zamysleni). Jedna se v podstate o dosti real-time
aplikaci.

Idealni by napr. bylo, kdyby se editovany zaznam zobrazil ostatnim napr
cervene apod. (to uz je asi resitelne pouze zasilanim zprav mezi
klientama apod. -> co na to rychlost, zatizeni site, masin apod.???).
Priznavam, ze s timto nemam zadne zkusenosti.

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

IB a sdileni

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.10.1998 18:16:20

Erik Salaj wrote:
>
> Nevidim ziaden problem preco by 160 uzivatelov nemohlo pracovat
> s tvrdymi zamkami (dufam, ze sa tym mysli zamykanie zaznamov -
> t.j record locking, ak nie tak sorry). Record locking naopak podporuje
> paralelizmus v transakciach (v porovnani s page alebo table locking),
> pretoze je toho zamknuteho menej, ale je s tym spojena vyssia rezia
> (pretoze zas tych zamkov moze byt podstatne viac).

Kdyz uz jsme u toho record (alias row) locking, tak MSSQL 7.0 uz by to
mel podporovat (6.5 umela row locking jen na INSERT). Sice tu mam 7.0
Bata 3, ale neni (bohuzel) zatim cas to prozkoumat a zjistit co to
prinese za vyhody.

Jasne, zamky (row, page, table) a SQL pristup jakz/takz ;-) chapu.
Proste by se mi nekdy libila moznost nektery zaznam zamknout a ostatnim
klientum to dat nejak velmi rychle najevo, aby nedochazelo ke zbytecnym
LOST UPDATES a casovym ztratam uzivatelu tim spojenych. Samozrejme je
mozne (a myslim si velmi dobre) pouzivat urcita pristupova prava k
jednotlivym polim radku na bazi klienta. Ale bohuzel prilis casto se
proste ty prava prekryvaji.

Co mi vadi, jsou prave ty LOST UPDATES. Mam takovou predstavu:

Chci ulozit mnou provedene zmeny v zaznamu, ktery mezitim zmenil jeste
nekdo jiny a ulozil to prede mnou. System mi rekne, ze ten a ten
uzivatel zmenil ten a ten zaznam - ukaze mi puvodni zaznam, zaznam
aktualni (cili co tam upravil nekdo jiny) a moje zmeny s moznosti volby
jedne z techto 'verzi' zaznamu pripadne s moznosti libovolne kombinovat
jednotlive hodnoty (pole). Neco podobneho nabizi TClientDataset, ale za
neunosnou cenu MIDASu.

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Prace s SQL

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.10.1998 18:40:27

No samozrejme to jde :-). Jde o trosku jiny problem a to ten, ze pres
ODBC neni mozne spustit vice SQL prikazu (dotazu) najednou. Jednim
vytvorim temp tabulku (samozrejme lokalni ne globalni) a kdyz si chci
druhym dotazem nacist data z temp tabulky, tak uz zase neexistuje (nove
pripojeni). Native SQL link pro MSSQL umoznuje vice SQL v jednom TQuery,
takze to chodi. Pres ODBC nikoliv (pro globalni temp tabulky to
samozrejme funguje ;)

Nekde na DSP (asi) jsem zahlidnul nejaky TQuery umoznujici vice dotazu i
pro ODBC (nezkousel jsem - pokud nekdo ano, dejte echo).

Mac

"Jezek Petr, Ing. (DELVINA)" wrote:
>
>> Pres ODBC to urcite jde. Sice jsem to nezkousel pres Delphi, ale
>> z Visual Basicu i Visual FoxPro jsem SELECT INTO TEMP pouzival
>> uplne bez problemu (a zrovna to bylo na INFORMIX).
>
> Pri praci s MSSQL je to mozne jen pri pouziti BDE nativnich ovladacu.
> Pres
> ODBC to nejde.
>
> --
> ==============================================================
> = Ing. Martin Ku�ka - Amenit s.r.o. =
> = Na Valech - budova Dytron, 741 01 Novy Jicin =
> = http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
> ==============================================================

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Set Focus

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.10.1998 18:50:09

Marek Soukup wrote:
>
> Ahojte,
> potreboval bych vedet jestli de nejak nesilene:
> mam na formulari tri sloupce dbeditu, kazdy sloupec ma 15 radku
> (Db Gridem to nahradit nechci)
> kdyz zmacknu sipky potrebuju aby se kurzor posunul o edit vejs atd.
> jediny co jsem vymyslel je udelat to natvrdo casem (napr. Sender is
> Edit1 then Edit2.SetFocus) ale to mi neprijde zrovna genialni. Jde to
> elegantneji ?

Ahoj,

muzes to udelat treba takhle, prirad tuto udalost vsem DBEditum na tom
formulari.

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_UP:
SelectNext(TWinControl(Sender), False, True);
VK_DOWN:
SelectNext(TWinControl(Sender), True, True);
end;
end;

--
Petr Vones, amatersky programator

Jak udelat TImage sedy (dimmed)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.10.1998 19:15:11

Jiri Szopa wrote:
>
> Potrebuji aby obrazek byl sedy nebo barevny.
> Neco jako Enabled:=False na Speedbuttonu.
> -------------------------------------------
> Ing. Jiri Szopa
> tel.: +420 659 713393
> fax.: +420 659 713392
> email: jiri.szopa(zv)telecom(tec)cz

Ahoj,

zkus vyuzit uz to co je hotove, podivej se do zdrojaku buttons.pas na metodu
TButtonGlyph.CreateButtonGlyph.

--
Petr Vones, amatersky programator

ukladani zaznamu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.10.1998 19:16:47

Marcello wrote:
>
> Panove,
> mam nasledujici problem, pokud mi klekne program co pracuje s
> paradoxovskyma tabulkama, tak se strati vsechny zaznamy, ktere byly
> porizeny v prubehu chodu programu, i kdyz byl proveden post tabulky,
> nevite nekdo jak nastavit to cachovani zaznamu tak, aby se tato neprijemna
> skutecnost minimalizovala.
>
> Marcello

Ahoj,

tomuhle problemu se nevyhnes nikdy, ale muzes po nekterych operacich (treba
Post) zavolat dbiSaveChanges, tim se ti ulozi obsah bufferu na disk:

Check(DbiSaveChanges(Table1.Handle));

Jinak doporucuju (a to alespon jednou denne) data zalohovat .....

--
Petr Vones, amatersky programator

Ovladac tlaciarne

[*] IKO(zv)kamarad(tec)cz - 15.10.1998 19:34:27

Neviete mi poradit, ako spravit ovladac tlaciarne do W95 v Delphi?

IKO
ikino(zv)pobox.sk
ICQ: 18168072
http://freeweb.coco(tec)cz/IKO

IKO
ikino(zv)pobox.sk


MS SQL 6.5 a autoinc polozka

[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 15.10.1998 19:41:07

Jen pro doplneni - je to dobre pro vyvoj nebo testovani.

Pokud se na zacatek dotazu napise "SET IDENTITY_INSERT tablename ON
", pak lze do tohoto sloupce zapisovat (napr. jiz srovnana data).
Na konci pak zase napise "SET IDENTITY_INSERT tablename OFF".
Jestlize pak budu vkladat nejaka data, tak server bude pokracovat
dale (od nejvyssiho cisla ve sloupci).

Martin UHER
ZVT Monitoring CS a.s.


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] On Behalf Of
Marian Jonas
Sent: Monday, October 12, 1998 7:39 PM
To: Delphi konference
Subject: Re: MS SQL 6.5 a autoinc polozka


>Ahoj
>
>Pokousim se prejit z Paradox tabulek na MS SQL. 6.5
>Poradte mi prosim jak nejlepe vytvorit autoincrementalni polozku pri
>INSERTu.
>Asi je to pre TRIGGER, ale nevim jak by mel vypadat.
>
>Dekuji Milan
>

Na autoinkrementacni pole neni treba trigger,
staci jen

CREATE TABLE dbo.tabulka ( ID int IDENTITY (1, 1) NOT NULL )

pro autoinkrementacni polozky plati
- typ polozky muze byt int, smallint, tinyint
- polozka musi byt NOT NULL
- do polozky se nesmi nikdy zapisovat
- IDENTITY (1000, 2) znamena, ze se bude cislovat od cisla 1000 s
prirustkem 2 (1000, 1002, 1004, 1006 ...)

jonas(zv)jia(tec)czn(tec)cz

OnChange

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.10.1998 20:18:51

"Jezek Petr, Ing. (DELVINA)" wrote:
>
> Mam jeden skromny dotaz.
> 1) S Delphi CS 3.0 je distribuovan SQL Interbase.
> Chci se zeptat, zda se da sirit (1 uzivatelska)
> s aplikaci.
> 2) Jake mate zkusenosti s MS Access + Delphi a
> zda je nutne neco platit za sireni *.MDB souboru
> s aplikaci

Za sireni *,MDB souboru asi ne, ale on *.MDB soubor nestaci :-). Musi
byt nainstalovany MS Jet Engine a to bud jako soucast Accessu nebo nepr.
jako soucast DAO a tam uz to sireni zdarma neni :-(

> 3) Kdyby jste meli volit databazu z 1) a 2) pro
> jednoduchou jednouzivatelskou aplikaci, co by ste
> si vybrali.

Paradox :-) jak uz psal Martin Fronek popr. Access + DAO s pristupem
pres DAO komponenty (http://www.cybermagic.co.nz/winsoft).

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

"OnMove"

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.10.1998 20:26:26

Ja toho kluka miluju ;-)

Mac

> procedure TForm1.FormCreate(Sender: TObject);
> begin
> DeleteMenu(GetSystemMenu(Handle, False), SC_MOVE, MF_BYCOMMAND);
> end;
>
> --
> Petr Vones, amatersky programator

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

ukladani zaznamu

[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 15.10.1998 21:07:55

Durazne doporucuji nastavit v BDEAdmin

Configutation - System - Init - Local share = TRUE

Take je lepsi pouzivat implicitne tabulky verze 7
Configuration - Drives - Native - Paradox - Level = 7
Pokud jiz jsou databaze vytvoreny v levelu 4 (D3, D2,D1 implicitne),
nastav BDE, vytvor nove tabulky pomoci Borrow a
data do nich nasyp pomoci Append z puvodnich struktur.
Takto vytvorene databaze uz ale neotevres v DOSovskem Paradoxu.

Jeste mam jednu zkusenost. Provozujeme sdilenou aplikaci
s asi 30 stanicemi. Z technologickych duvodu nelze pouzit SQL.
Pouzivame tedy Paradox DB. Stabilita databazi vyrazne vzrostla,
kdyz jsme premistili soubot PARADOX.NET ze serveru NT na Novella.
Tabulky jsou na NT.


S pozdravem Zdenek
---------------------------------------------------------------
: o__o Zdenek Sraier e-mail: sraierzd(zv)czn(tec)cz :
: ( o o) http://users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske http://www.byll(tec)cz/scuba/ :
---------------------------------------------------------------
This message was delivered using 100% recyclable electrons.


----------
> Odes�latel: Marcello <dvo20um(zv)axpsu.fpf.slu(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: ukladani zaznamu
> Datum: 15. ��jna 1998 14:00
>
>
> Panove,
> mam nasledujici problem, pokud mi klekne program co pracuje s
> paradoxovskyma tabulkama, tak se strati vsechny zaznamy, ktere byly
> porizeny v prubehu chodu programu, i kdyz byl proveden post tabulky,
> nevite nekdo jak nastavit to cachovani zaznamu tak, aby se tato neprijemna
> skutecnost minimalizovala.
>
> Marcello



© Delphi.cz, program netcode.cz, 2008-9.