Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
TEMP
[*] Jozef Strn�dik <strnadik(zv)mrp.sk> - 25.3.1998 14:55:09
>Jak zjistim programove adresar pro temp soubory?
vid WinAPI fcia GetTempPath
Problem s parametrem SELF
[*] SIPEK Stanislav, Ing. <SIPEK(zv)fbm.vutbr(tec)cz> - 25.3.1998 16:08:11
Ahojte
Mam problem, ktery nevznikl v DELPHI, ale tyka se PASCALU.
V BP7 mam udelanou objektovou aplikaci a v jednom miste potrebuje
uchovata parametry objektu v globalni promenne.
Cele je to nadeklarovano asi takhle:
{ nadefinovani objektu }
PNejakyObjekt = ^TNejakyObjekt;
TNejakyObjekt = object
(definice promennych)
(definice metod)
Procedure Uloz;
end;
var
Popis : TNejakyObjekt; { do teto promenne si potrebuji ulozit
promenne daneho objektu }
.
.
.
procedure TNejakyObjekt.Uloz;
begin
Popis := Self;
end;
Kompilator to vezme, ale do promenne Popis se nic nepreda. Muzete mi
poradit proc to nefunguje?
Diky Standa
---------------------------------------------------
Ing. Stanislav Sipek
VUT fakulta podnikatelska
Technicka 2, BRNO 616 69
tel. 05/41142768
E-mail: sipek(zv)fbm.vutbr(tec)cz
---------------------------------------------------
DB-Library pro MS SQL
[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 25.3.1998 17:59:36
Zdravim vsechny,
Shanim kompletni prepis t�to MS knihovny do delphi (D3). Je to vlastne rychly "native" pristup do databaze MS SQL serveru (a mozna i do Sybase). Na nejakem webu (odkaz byl u borlandu(tec)cz) jsem nasel soubor mssql.zip. Je to temer vsechno, ale nejsou tam dve funkce, kter� posilaji zpet chybova hlaseni nebo jenom zpr�vy typu "(359 row(s) affected)". Jestlize se v jedne procedure pripojim do databaze, spustim dotaz a zase se odpojim, probehne vse v poradku. Problem je, kdy� chci mit trvale pripojeni do databaze nebo vytvorit dal�� (nove) propojeni.
Nevi tedy n�kdo kde bych mohl najit tuto knihovnu nebo muze mi n�kdo pomoci s prenosem funkci do D3?
Jedna se o tyto funkce z Sqldb.h:
extern void * SQLAPI dberrhandle(INT (SQLAPI * DbErrHandler)(DBPROCESS *,INT,INT,INT,CHAR *,CHAR *));
extern void * SQLAPI dbmsghandle(INT (SQLAPI * DbMsgHandler)(DBPROCESS *, DBINT,INT,INT,CHAR *));
Dekuji
PS: Vsechny *.h soubory mohu poskytnout.TMemo
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 25.3.1998 18:47:17
Nazdarek,
mam takovy pocit, ze se tento problem tady uz jednou
resil - nevzpominam si presne, nasledujici vety neberte jako dogma:
Tusim, ze kdyz se do TMemo da MaxLength:=0, je to asi 32 kB.
Pokud tam napises vetsi cislo, plati to vetsi.
Zdenek
---------------------------------------------------------
: o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Martin Nedopil <nedopil(zv)eskon(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 25. b�ezna 1998 7:59
P�edm�t: Re: TMemo
>|Zdravim vsechny,
>|
>|potrebuji do TMemo nacist obsah vetsiho souboru, coz se Delphi
nelibi a
>|vybafne na me s hlaskou "Text Exceed memo kapacity".
>|Znate nekdo lepsi reseni nez TMemo?
>
>Muzes pouzit napr TOvcTextEdit z baliku Orpheus. Ten se ale tusim
musi
>koupit. :-).
>Pokud ti jde jenom o nacteni a prohlizeni zkus to oklikou. Nacti to
do
>TStringGrid.
>Ten (svete div se) umi nacist i vice nez 32kB. Nastavis pocet radek
na
>100000.
>Nactes soubor a pritom pocitas radky. Pak zmensis pocet radek gridu
na
>napocitanou hodnotu. S prehledem tak nacitam 2MB soubory.
>
>Martin Nedopil
>nedopil(zv)eskon(tec)cz
>nedopil(zv)geocities.com
>jsem doma na: http://www.geocities.com/Athens/Olympus/5260
>Heslo dne:"Abychom mohli pochopit rekurzi, mus�me nap�ed pochopit
rekurzi"
>
>Zpomaleni ukladani dat
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 25.3.1998 18:56:28
Pripoju se s nazorem na Locate.
Vsude pouzivam TTable.FindKey([hodn1,hodn2,...]) a chodi jak z praku.
V prispevku uvedene
> Table.Insert
> TableField.As??? := ???;
> Table.Post;
durazne nedoporucuji.
Zjistili jsme, ze nedobre obsluhuje indexy (Paradox,DBase).
Stejnou sluzbu udela fce TTable.Append, ta funguje OK.
Nejlepsi je pouzit TTable.AppendRecord([hosn1,hodn2,hodn3,...]);
Zdenek
---------------------------------------------------------
: o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 25. b�ezna 1998 16:36
P�edm�t: RE: Zpomaleni ukladani dat
>Me se prikaz Locate neosvedcil, takze ja se snazim pouzivat TTable,
>IndexFieldNames a FindKey. Toto vse funguje na MSACCESS a MSSQL.
TQuery
>pouzivam, kdyz potrebuju delat nejake slozitejsi SQL dotazy. TTable
je i
>na SQL databazich rychlejsi (podle mych testu, mozna ze se mylim).
>
>Sekvence
> Table.Insert
> TableField.As??? := ???;
> Table.Post;
>Mi pripada pro vkladani rozhodne nejrychlejsi.
>
>J.Jahoda
>
>
>> ----------
>> From: WORKGROUP/VACLAV/Vit on behalf of Vit
>> Malecek[SMTP:malecek(zv)melzer(tec)cz]
>> Reply To: DELPHI Distribution List
>> Sent: 25. b�ezna 1998 9:50
>> To: 'DELPHI Distribution List'
>> Subject: RE: Zpomaleni ukladani dat
>>
>> Zjistil jsem, kde je brzda. Pricinu zatim neznam. Strasnym zpusobem
se
>> zpomaluje Locate,
>> ktery se provadi nad cilovou tabulkou. Podle vysledku Locate se
bude
>> vkladat nova veta
>> nebo prepisovat nalezena. Po kazdem Locate se dalsi Locate provedl
za
>> cas o 0,5sec
>> (nebo vice) delsi. Pokud vsak program ukoncim (s n�vratem do OS) a
>> spustim znovu,
>> prvni Locate je opet rychly (stejne rychly jako prvni Locate v
>> predchozim behu programu),
>> dalsi pomalejsi, dalsi jeste pomalejsi atd.
>>
>> Adresa/Address: Vit Malecek, Obrancu miru 9, 796 01 Prostejov,
Czech
>> Republic
>> e-mail: malecek(zv)melzer(tec)cz
>> tlf./phone number : +420-(0)508-330301, +420-(0)508-330302, privat
:
>> +420-(0)508-27141
>> fax number : +420-(0)508-330302
>>
>> -----P�vodn� zpr�va-----
>> Od: Vit Malecek
>> Odesl�no: 25. b�ezna 1998 6:13
>> Komu: 'DELPHI Distribution List'
>> P�edm�t: RE: Zpomaleni ukladani dat
>>
>> Diky, ale asi to nepomuze. Timera sice zkusit mohu. Ale
>> mam pocit, ze bod dva (
>> 2)
>> > Program neukoncim a spustim opet import, tentokrat
>> jedine vety. Veta
>> > se ulozi za 30sec.
>> > Po teto akci ma cil. databaze 91 vet.
>> ) odpovida prave tomu casovaci. Rozdil je v tom, ze
>> preruseni neni 5sec., ale
>> tolik, kolik je cas do noveho spusteni (zalezi to na
>> mne). Bodem dva se rozumi, ze ukoncim dialog, ze ktereho se import
>> spousti a vratim se do hlavniho formu. Po te
>> opet otevru dialog pro spusteni importu a ten spustim.
>> Stale se vklada pomalu ....
>>
>>
>>
>> Adresa/Address: Vit Malecek, Obrancu miru 9, 796 01 Prostejov,
>> Czech Republic
>> e-mail: malecek(zv)melzer(tec)cz
>> tlf./phone number : +420-(0)508-330301, +420-(0)508-330302,
>> privat : +420-(0)508-27141
>> fax number : +420-(0)508-330302
>>
>> -----P�vodn� zpr�va-----
>> Od: Ing. Zdenek Sraier [SMTP:sraierzd(zv)czn(tec)cz]
>> Odesl�no: 24. b�ezna 1998 18:51
>> Komu: DELPHI Distribution List
>> P�edm�t: Re: Zpomaleni ukladani dat
>>
>> Ahojky,
>> pokud se behem vkladani delaji jine akce, soudim, ze
>> zpomaleni
>> neni zpusobeno IB, ale prave temi akcemi. Pokud provadis
>> nejake
>> dotazy, vyhledavani, .. data se soukaji do pameti a
>> zrejme
>> pak neni cas k uvolneni pameti. Zkus
>> application.processMessages
>> do smycky nebo jeste lepsi prasarnu: timer na 5 vterin a
>> na
>> udalost onTimer vloz jeden zaznam. Schvalne co to udela.
>>
>> Zdenek
>>
>> ---------------------------------------------------------
>> : o__o Zdenek Sraier sraierzd(zv)czn(tec)cz
>> :
>> : ( o o) users(tec)czn(tec)cz/~sraierzd/
>> :
>> : (. .) Stranky Potapecske www.byll(tec)cz/scuba/
>> :
>>
>> ---------------------------------------------------------
>> -----P�vodn� zpr�va-----
>>
>> Vse to jede na lokalu a BatchMove nepripada v uvahu.
>> Behem vkladani se
>> delaji akce,
>> ktere nelze pomoci BatchMove zajistit (dohledavani
>> hodnot z jinych
>> tabulek, soucasna
>> aktualizace dalsi tabulky apod.) Nekde musi byt pricina
>> toho, ze se to
>> postupne
>> zahlcuje, ale po ukonceni behu se to "odhlti".
>>
>> -----P�vodn� zpr�va-----
>>
>> Vkladal jsem nedavno do Interbase z DBF souboru pres
>> 400.000 vet
>> (prazsky telefonni seznam :-) a cela akce trvala cca 20
>> minut. Pravda
>> je, ze jsem pouzival BatchMove - pro davkove prenosy o
>> kterych pisete
>> je to jedine rozumne reseni.
>>
>> Na jake platforme to cele bezi, jak je dimenzovany
>> databazovy server
>> (pokud je), nebo je to cele v lokalu ?
>>
>> -----------------------------------------------------
>> > Zdar !!!
>> >
>> > Setkal se prosim nekdo s nasledujicim problemem?
>> > 1)
>> > Provadim davkovy presun dat z DBF do databaze
>> provozovanou pod
>> > InterBasi. Zacne
>> > se vkladat (cil. databate ma v dobe startu 40 vet) a
>> to tak, ze 1.
>> > veta se vlozi za 3 sec.,
>> > 7. veta za 6.5sec atd, a? 50.vita za 30sec. Po teto
>> akci ma cil.
>> > databaze 90 vet.
>> >
>> > 2)
>> > Program neukoncim a spustim opet import, tentokrat
>> jedine vety. Veta
>> > se ulozi za 30sec.
>> > Po teto akci ma cil. databaze 91 vet.
>> >
>> > 3)
>> > Program zcela ukoncim a opet spustim. Opet budu
>> importovat 50 novych
>> > vet (cil. databate ma v dobe startu 91 vet) a import
>> probiha tak,
>> > ze 1. veta se vlozi za 3 sec.,
>> > 7. veta za 6.5sec atd, a? 50.vita za 30sec. Po teto
>> akci ma cil.
>> > databaze 141 vet.
>> >
>> > Pzn: Vkladani se deje pomoci neziveho query, po kazdem
>> TQuery.post
>> > se provede TDatabase.ApplyUpdates.
>> >
>> > Znate nekdo pricinu?
>>
>>
>Problem s parametrem SELF
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 25.3.1998 19:19:46
Self je pointer, takze Popis by mel byt typu PNejakyObject a pristup
na ty promenne pak pres Popis^.
V. Sazima
Problem s parametrem SELF
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 25.3.1998 19:50:05
SIPEK Stanislav, Ing. wrote:
> Mam problem, ktery nevznikl v DELPHI, ale tyka se PASCALU.
>
> PNejakyObjekt = ^TNejakyObjekt;
> TNejakyObjekt = object
> var
> Popis : TNejakyObjekt; { do teto promenne si potrebuji ulozit
> promenne daneho objektu } . . .
>
> procedure TNejakyObjekt.Uloz;
> begin
> Popis := Self;
> end;
>
> Kompilator to vezme, ale do promenne Popis se nic nepreda. Muzete mi
> poradit proc to nefunguje?
Zkus deklarovat Popis:PNejakyObjekt
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Volba podavace
[*] David Maly <dmal3233(zv)ss1000.ms.mff.cuni(tec)cz> - 25.3.1998 23:29:55
Nevite nekdo, jak se nastavi ze ktereho podavece se bude brat papir pri tisku na tiskarnu. A taky jak se tadle hodnota zjisti.
Diky
David
Zpomaleni ukladani dat
[*] Vit Malecek <malecek(zv)melzer(tec)cz> - 26.3.1998 06:22:57
Opet zdar!
Jen pro doplneni uvedu, proc pouzivam Locate. Mam totiz jiz naprogramovan mechanismus
(s pouzitim query) pro vkladani vet uzivatelem, ktery dosud vyhovoval. Potom prisel pozadavek na
vkladani vet davkove z DBF souboru. Proto jsem chtel vyuzit mechanizmus, ktery mam jiz hotov a
je poradne slozity. Pri vkladani vety do jedne tabulky se musi soucasne aktualizovat nekolik dalsich
tabulek a to hodnotami, ktere se musi pracne zjistovat v cilove databazi. TQuery.Locate je potom
pouzit na zjisteni, zda vkladat nebo prepisovat. Pokud mam prepisovat, tak se v tom query na tu
prepisovanou vetu musim postavit a to take zajistil onen zminovanz Locate. Jina moznost asi neni
(pokud chci vyuzit jiz hotovy mechanizmus). Zatim to vypada tak, ze asi bubu muset udelat nove
rozhrani a to s vyuzitim tabulek. Toz to mam radost .....
Adresa/Address: Vit Malecek, Obrancu miru 9, 796 01 Prostejov, Czech Republic
e-mail: malecek(zv)melzer(tec)cz
tlf./phone number : +420-(0)508-330301, +420-(0)508-330302, privat : +420-(0)508-27141
fax number : +420-(0)508-330302
-----P�vodn� zpr�va-----
Od: Ing. Zdenek Sraier [SMTP:sraierzd(zv)czn(tec)cz]
Odesl�no: 25. b�ezna 1998 18:56
Komu: DELPHI Distribution List
P�edm�t: Re: Zpomaleni ukladani dat
Pripoju se s nazorem na Locate.
Vsude pouzivam TTable.FindKey([hodn1,hodn2,...]) a chodi jak z praku.
V prispevku uvedene
> Table.Insert
> TableField.As??? := ???;
> Table.Post;
durazne nedoporucuji.
Zjistili jsme, ze nedobre obsluhuje indexy (Paradox,DBase).
Stejnou sluzbu udela fce TTable.Append, ta funguje OK.
Nejlepsi je pouzit TTable.AppendRecord([hosn1,hodn2,hodn3,...]);
Zdenek
---------------------------------------------------------
: o o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 25. b�ezna 1998 16:36
P�edm�t: RE: Zpomaleni ukladani dat
>Me se prikaz Locate neosvedcil, takze ja se snazim pouzivat TTable,
>IndexFieldNames a FindKey. Toto vse funguje na MSACCESS a MSSQL.
TQuery
>pouzivam, kdyz potrebuju delat nejake slozitejsi SQL dotazy. TTable
je i
>na SQL databazich rychlejsi (podle mych testu, mozna ze se mylim).
>
>Sekvence
> Table.Insert
> TableField.As??? := ???;
> Table.Post;
>Mi pripada pro vkladani rozhodne nejrychlejsi.
>
>J.Jahoda
>
>
>> ----------
>> From: WORKGROUP/VACLAV/Vit on behalf of Vit
>> Malecek[SMTP:malecek(zv)melzer(tec)cz]
>> Reply To: DELPHI Distribution List
>> Sent: 25. b�ezna 1998 9:50
>> To: 'DELPHI Distribution List'
>> Subject: RE: Zpomaleni ukladani dat
>>
>> Zjistil jsem, kde je brzda. Pricinu zatim neznam. Strasnym zpusobem
se
>> zpomaluje Locate,
>> ktery se provadi nad cilovou tabulkou. Podle vysledku Locate se
bude
>> vkladat nova veta
>> nebo prepisovat nalezena. Po kazdem Locate se dalsi Locate provedl
za
>> cas o 0,5sec
>> (nebo vice) delsi. Pokud vsak program ukoncim (s n�vratem do OS) a
>> spustim znovu,
>> prvni Locate je opet rychly (stejne rychly jako prvni Locate v
>> predchozim behu programu),
>> dalsi pomalejsi, dalsi jeste pomalejsi atd.
>>
>> Adresa/Address: Vit Malecek, Obrancu miru 9, 796 01 Prostejov,
Czech
>> Republic
>> e-mail: malecek(zv)melzer(tec)cz
>> tlf./phone number : +420-(0)508-330301, +420-(0)508-330302, privat
:
>> +420-(0)508-27141
>> fax number : +420-(0)508-330302
>>
>> -----P�vodn� zpr�va-----
>> Od: Vit Malecek
>> Odesl�no: 25. b�ezna 1998 6:13
>> Komu: 'DELPHI Distribution List'
>> P�edm�t: RE: Zpomaleni ukladani dat
>>
>> Diky, ale asi to nepomuze. Timera sice zkusit mohu. Ale
>> mam pocit, ze bod dva (
>> 2)
>> > Program neukoncim a spustim opet import, tentokrat
>> jedine vety. Veta
>> > se ulozi za 30sec.
>> > Po teto akci ma cil. databaze 91 vet.
>> ) odpovida prave tomu casovaci. Rozdil je v tom, ze
>> preruseni neni 5sec., ale
>> tolik, kolik je cas do noveho spusteni (zalezi to na
>> mne). Bodem dva se rozumi, ze ukoncim dialog, ze ktereho se import
>> spousti a vratim se do hlavniho formu. Po te
>> opet otevru dialog pro spusteni importu a ten spustim.
>> Stale se vklada pomalu ....
>>
>>
>>
>> Adresa/Address: Vit Malecek, Obrancu miru 9, 796 01 Prostejov,
>> Czech Republic
>> e-mail: malecek(zv)melzer(tec)cz
>> tlf./phone number : +420-(0)508-330301, +420-(0)508-330302,
>> privat : +420-(0)508-27141
>> fax number : +420-(0)508-330302
>>
>> -----P�vodn� zpr�va-----
>> Od: Ing. Zdenek Sraier [SMTP:sraierzd(zv)czn(tec)cz]
>> Odesl�no: 24. b�ezna 1998 18:51
>> Komu: DELPHI Distribution List
>> P�edm�t: Re: Zpomaleni ukladani dat
>>
>> Ahojky,
>> pokud se behem vkladani delaji jine akce, soudim, ze
>> zpomaleni
>> neni zpusobeno IB, ale prave temi akcemi. Pokud provadis
>> nejake
>> dotazy, vyhledavani, .. data se soukaji do pameti a
>> zrejme
>> pak neni cas k uvolneni pameti. Zkus
>> application.processMessages
>> do smycky nebo jeste lepsi prasarnu: timer na 5 vterin a
>> na
>> udalost onTimer vloz jeden zaznam. Schvalne co to udela.
>>
>> Zdenek
>>
>> ---------------------------------------------------------
>> : o o Zdenek Sraier sraierzd(zv)czn(tec)cz
>> :
>> : ( o o) users(tec)czn(tec)cz/~sraierzd/
>> :
>> : (. .) Stranky Potapecske www.byll(tec)cz/scuba/
>> :
>>
>> ---------------------------------------------------------
>> -----P�vodn� zpr�va-----
>>
>> Vse to jede na lokalu a BatchMove nepripada v uvahu.
>> Behem vkladani se
>> delaji akce,
>> ktere nelze pomoci BatchMove zajistit (dohledavani
>> hodnot z jinych
>> tabulek, soucasna
>> aktualizace dalsi tabulky apod.) Nekde musi byt pricina
>> toho, ze se to
>> postupne
>> zahlcuje, ale po ukonceni behu se to "odhlti".
>>
>> -----P�vodn� zpr�va-----
>>
>> Vkladal jsem nedavno do Interbase z DBF souboru pres
>> 400.000 vet
>> (prazsky telefonni seznam :-) a cela akce trvala cca 20
>> minut. Pravda
>> je, ze jsem pouzival BatchMove - pro davkove prenosy o
>> kterych pisete
>> je to jedine rozumne reseni.
>>
>> Na jake platforme to cele bezi, jak je dimenzovany
>> databazovy server
>> (pokud je), nebo je to cele v lokalu ?
>>
>> -----------------------------------------------------
>> > Zdar !!!
>> >
>> > Setkal se prosim nekdo s nasledujicim problemem?
>> > 1)
>> > Provadim davkovy presun dat z DBF do databaze
>> provozovanou pod
>> > InterBasi. Zacne
>> > se vkladat (cil. databate ma v dobe startu 40 vet) a
>> to tak, ze 1.
>> > veta se vlozi za 3 sec.,
>> > 7. veta za 6.5sec atd, a? 50.vita za 30sec. Po teto
>> akci ma cil.
>> > databaze 90 vet.
>> >
>> > 2)
>> > Program neukoncim a spustim opet import, tentokrat
>> jedine vety. Veta
>> > se ulozi za 30sec.
>> > Po teto akci ma cil. databaze 91 vet.
>> >
>> > 3)
>> > Program zcela ukoncim a opet spustim. Opet budu
>> importovat 50 novych
>> > vet (cil. databate ma v dobe startu 91 vet) a import
>> probiha tak,
>> > ze 1. veta se vlozi za 3 sec.,
>> > 7. veta za 6.5sec atd, a? 50.vita za 30sec. Po teto
>> akci ma cil.
>> > databaze 141 vet.
>> >
>> > Pzn: Vkladani se deje pomoci neziveho query, po kazdem
>> TQuery.post
>> > se provede TDatabase.ApplyUpdates.
>> >
>> > Znate nekdo pricinu?
>>
>>
>Autonumber
[*] �uhel Petr <Cuhel(zv)diamo(tec)cz> - 26.3.1998 06:30:27
Hi,
N�co podobn� jsem musel �e�it v datab�zi ciz�ho programu.
D�lal jsem to takto.
1.zdrojovou tabulku set��d�m dle autonumber pole
2.vlozim vetu do c�lov� tabulky a pokud cislo u pole autonumber cilov�
tabulky
odli�n� pak v�tu zru��m a zkus�m to znovu
3. a dals� v�ta.
Pokud budou ��sla velk� tak to bohu�el chv�li trv�, ale pokud je to v
ciz�ch datech pak nemohu m�nit struktury.
Bye Petr
> ----------
> Od: Ing. Jahoda Jaroslav[SMTP:Jaroslav.Jahoda(zv)lesprojekt(tec)cz]
> Odesl�no: 25. b�ezna 1998 14:10
> Komu: delphi(zv)io.pinknet(tec)cz
> P�edm�t: Autonumber
>
> Ahojte,
>
> Mam takovy problem, pouzil jsem pro svou aplikaci v tabulkach jako
> primary key typ Autonumber, cela aplikace funguje bez problemu, ale
> nyni
> potrebuji provest kopii databaze z jedne do druhe pri zachovani vazeb
> (cilova ma temer shodnou strukturu). Problem je v tom, ze po Insert se
> vygeneruje nove cislo pro Autonumber a ten se nepodari zmenit na
> puvodni
> hodnotu a v sekundarni tabulce diky tomu dojde k chybe, ze neni
> primary
> key.
>
> Poradte mi prosim jak to vyresit, asi budu nucen AutoNumber zrusit a
> pouzivat jiny zpusob generovani Primary Key.
>
> Dekuji
> Jaroslav Jahoda
>
> Dialog. panel
[*] Jan.Kubeczka(zv)gate.trz(tec)cz - 26.3.1998 06:40:46
Nazdar, odborn?ci!
1. Potrebuji vytvorit dialog. panel, ktery nebude mit tlacitka pro
minimalizaci a max. okna a lze ho zrusit pomoci Esc.
(samozrejme bude mit tlacitka Ok, Cancel a Help)
2. V dialogovem panelu potrebuji obrazkove tlacitka. Tyto obrazky vytvorim
v nejakem kreslicim programu (napr. CorelDraw apod.)
a. Jakou komponentu pouzit na tato tlacitka?
b. V jakem formatu musim vyexportovat obrazek, abych ho dostal do
tohoto tlacitka?
c. Jak ho tam dostat?
d. Po stlaceni tlacitka by mel dialogovy panel zmizet. Jak to udelat?
Diky
Jan Kubeczka
Trinec
E-mail: Jan.Kubeczka(zv)trz(tec)cz
TEMP
[*] Reni tevanka <wizard(zv)army.sk> - 26.3.1998 07:27:46
K odpovediam na zistenie Temp adresara by som mal jednu otazku.
Pouzil som funkciu GetTempPath na NT Workst. 4.0 CZ. A na dvoch roznych
pocitacoch som dostal rozne
vysledky. Pocitace sa lisili tym ze na tom, kde funkcia vratila spravnu hodnotu,
v mojom pripade
"C:\TEMP" som mal nainstalovany service pack 3. A na pocitacoch, kde nebol
ziaden sp nainstalovany
mi to vratilo "C:\WINNT". Mohlo by to byt tym SP3?
A este jedna poznamka. Skusal som ziskat Temp adresar aj precitanim premennej
prostredia "TEMP"
funkciou GetEnvironmentVariable a opat som dostal rozne vysledky. Na pocitaci so
SP3 funkcia vratila
"C:\TEMP" (spravnu hodnotu) a na pocitaci bez SP vratila prazdny retazec. Mohol
by to mat
na svedomi SP?
Rene Stevanka
Radek Docekal wrote:
> GetTempPath (win32.hlp)
>
> S pozdravem
> Radek Docekal
> <proj(zv)zvt.csas(tec)cz> ICQ: 9008367
>
> >Jak zjistim programove adresar pro temp soubory? Nekde jsem to mel a ted to
> >nemuzu najit.
> >David.
> >
> >
Dialog. panel
[*] Pavel Zichovsky <jesnem(zv)ova.pvtnet(tec)cz> - 26.3.1998 07:35:03
Takovy zakladni veci.....
> 1. Potrebuji vytvorit dialog. panel, ktery nebude mit tlacitka pro
> minimalizaci a max. okna a lze ho zrusit pomoci Esc.
> (samozrejme bude mit tlacitka Ok, Cancel a Help)
Object Inspector, vlastnosti objektu Tform (formular) BorderIcons a
BorderStyle
>
> 2. V dialogovem panelu potrebuji obrazkove tlacitka. Tyto obrazky vytvorim
> v nejakem kreslicim programu (napr. CorelDraw apod.)
> a. Jakou komponentu pouzit na tato tlacitka?
TBitBtn (na zalozce Additional)
> b. V jakem formatu musim vyexportovat obrazek, abych ho dostal do
> tohoto tlacitka?
Nejlepe BMP 16 barev v pozadovane velikosti.
> c. Jak ho tam dostat?
vlastnost TBitBtn Glyph (v object inspectoru tam muzes nacist ten
obrazek)
> d. Po stlaceni tlacitka by mel dialogovy panel zmizet. Jak to udelat?
a) v procedure po stisknuti tlacitka (BitBtn1Click) zavolas "close;"
b) jednotlivym tlacitkum nastavis vlastnost ModalResult na
pozadovanou hodnotu (mrOK, mrCancel apod.), dialog zavolas pomoci
"showmodal" a pak po stisku tlacitka se sam zavre.
>
> Diky
neni zac.
S pozdravem
Pavel "Zizi" Zichovsky <jesnem(zv)ova.pvtnet(tec)cz>
----------------------------
PGP podporovano a vitano
Undocumented Delphi
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 26.3.1998 07:35:43
Ano, zapomel jsem upozornit, ze mluvim o Delphi 1. Je pravda, ze
s novymi verzemi se objevovaly i chybejici casti helpu. V D1 Dormant
je, ale je obtizne se o ni dozvedet.
Predstavte si programatora bez pristupu na Inet :-). Nikdy se nedovi
o novych verzich BDE u Borlandu. Znal jsem jednoho takoveho, kteremu
na siti padaly databaze jak hrusky a on nevedel proc! Taky se mu stalo,
ze mu databaze (lokalni) narustaly do obrovskych rozmeru ale v Gridu
nemel jedinou vetu! Ano, nevedel jak pakovat databaze (coz je elementarni
vec, dle meho nazoru). Byla to jeho chyba, ze tato fce nebyla implementovana
do komponenty, a ze nemel help, kde by si to precetl? Dneska je to chorobne
znamy priklad, ale pred rokem a pul? Chtel tu aplikaci prodat aby se mu
vratily alespon naklady na Delphi. Byl to studentik. Aplikace pekna, moc
pekna,
ale tabulky nepouzitelne.
Taky ohledne filtru pouzitych s SQL nechci spekulovat o rychlosti. Lepe je
vypracovat precizni dotaz, nez se pak trapit s filtry. Mel jsem na mysli
pouziti
filtru jako nahradu za SQL na LOKALNI tabulku.
Mate-li nekdo zajem o podobne stranky Delphi, pak doporucuji pomerne
zajimavou knihu "The revolutionary guide to Delphi 2", vydal ji Wrox Press.
Mezi ruznymi autory najdeme i Dr.Boba. Kazdy prispel svou troskou do mlyna.
Nevim vsak, kde ji lze sehnat. V Opave urcite ne, v Praze nevim. Ja jsem si
ji privezl z Londyna za 70 liber. Ani se mne neptejte, co jsem tam pak jedl.
Jestli budete chtit, pripravim na zitrek strucny obsah jednotlivych kapitol.
Martin Nedopil
nedopil(zv)eskon(tec)cz
nedopil(zv)geocities.com
jsem doma na: http://www.geocities.com/Athens/Olympus/5260
Heslo dne:"Abychom mohli pochopit rekurzi, mus�me nap�ed pochopit rekurzi"Formatovany export do niecoho
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 26.3.1998 08:05:44
Zkusil bych se podivat na specifikaci RTF napr.
ftp://ftp.microsoft.com/softlib/mslfiles/gc0165.exe a vygenerovat primo RTF
soubor.
Dalsi moznost by snad byla pres DDE vkladat primo do Wordu, coz bude sice
dost pomale, ale porad rychlejsi nez baby :-). V tom pripade bych
doporucoval rozdelit vystup do vice souboru, protoze IMHO muze mit Word dost
problemy s 5000 strankovym dokumentem.
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz> ICQ: 9008367
-----Original Message-----
From: No Comment Group, s.r.o. - Sales dept. <sales(zv)nocomment.sk>
To: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Date: 25. b�ezna 1998 22:36
Subject: Formatovany export do niecoho
>Ehm, potrebujem vyexportovat velmi velku databazu do niecoho
>formatovaneho.
>...
>No, skusim inak.
>
>Mam databazu informacii, ktora sluzi ako podklad pre DTP.
>Problem je v tom, ze ked to vyexportujem do niecoho ako
>"Plain text", zalomenie bude trvat niekolko dni, co by ani
>nebol taky problem ale platit baby tyzden a jeden den je
>rozdiel.
>
>Preto by som to chcel vyexportovat uz formatovane. Tj
>potreboval by som aby niektore slovo bolo boldovane alebo
>ine aby bolo kurzivou a inou velkostou fontu. Vysledok
>exportu by sa mal dat otvorit aspon vo worde alebo quarku.
>
>Upozornujem, ze ta databaza je naozaj obrovska, tak 5000
>stran plain textu.
>
>Pani, mate napady?
>
>
>richard willmann
>
>TEMP & SP & Chyba Update v MS SQL
[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 26.3.1998 08:16:21
Urcite to je tim Service Packem. SP by mel opravovat chyby "superprogramatoru" MS, ale nekdy to nadela je�t� dal�� chyby. Nap��klad po instalaci SP2 pro MS SQL Server 6.5 se neprovede SQL prikaz UPDATE ve sloupci typu TEXT, jestlize do nej byla vlozena hodnota NULL (SP4 to je�t� neopravuje!). Tak ty SP berte s rezervou (co na v�ak zbyva).
V kazdem SP je TXT soubor ve kterem se pise co opravuje. Jinak obecne MS doporucuje aby se SP instaloval a nekdy to i vyzaduje.
-----P�vodn� zpr�va-----
Od: Reni tevanka [SMTP:wizard(zv)army.sk]
Odesl�no: 26. b�ezna 1998 7:28
Komu: DELPHI Distribution List
P�edm�t: Re: TEMP
K odpovediam na zistenie Temp adresara by som mal jednu otazku.
Pouzil som funkciu GetTempPath na NT Workst. 4.0 CZ. A na dvoch roznych
pocitacoch som dostal rozne
vysledky. Pocitace sa lisili tym ze na tom, kde funkcia vratila spravnu hodnotu,
v mojom pripade
"C:\TEMP" som mal nainstalovany service pack 3. A na pocitacoch, kde nebol
ziaden sp nainstalovany
mi to vratilo "C:\WINNT". Mohlo by to byt tym SP3?
A este jedna poznamka. Skusal som ziskat Temp adresar aj precitanim premennej
prostredia "TEMP"
funkciou GetEnvironmentVariable a opat som dostal rozne vysledky. Na pocitaci so
SP3 funkcia vratila
"C:\TEMP" (spravnu hodnotu) a na pocitaci bez SP vratila prazdny retazec. Mohol
by to mat
na svedomi SP?
Rene Stevanka
Radek Docekal wrote:
> GetTempPath (win32.hlp)
>
> S pozdravem
> Radek Docekal
> <proj(zv)zvt.csas(tec)cz> ICQ: 9008367
>
> >Jak zjistim programove adresar pro temp soubory? Nekde jsem to mel a ted to
> >nemuzu najit.
> >David.
> >
> >Dialog. panel
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 26.3.1998 08:20:33
No nazdar,
tak se do toho dame:
predpokladam ze dialog vytvorit umite (v Builderu nebo Delphi)
potom je treba nastavit property BorderIcons takto:
biSystemMenu true
biMinimize false
biMaximize false
biHelp ? <dle libosti>
Jako tlacitka je treba pouzit BitBtn, z toho jiz vyplyva, ze je treba pouzit obrazky ve formatu BMP (CDR je mozno exportovat
ale jaky bude vysledek ...)
Do tlacitka se obrazek dostane tim, ze jako vlastnost (property) Glyph se nastavi soubor s obrazkem [napr. obrazek.bmp]
Dialogovy panel sam nikam nezmizi, toto je treba udelat programove, volanim funkce:
pro Builder: this->Close();
pro Delphi: Close;
Jestlize je potreba rusit dialog pomoci Esc, pak nejlepsi cestou je nastavit u formulare KeyPreview na true a v obsluze udalosti
OnKeyDown (pripadne Up) testovat obsah promenne Key a podle toho patricne reagovat - tim se otevira cesta k mnoha dalsim
moznostem....
Doufam, ze Vam toto pomuze
-----Original Message-----
From: Jan.Kubeczka(zv)gate.trz(tec)cz [SMTP:Jan.Kubeczka(zv)gate.trz(tec)cz]
Sent: Thursday, March 26, 1998 6:41 AM
To: delphi(zv)pinknet(tec)cz
Subject: Dialog. panel
Nazdar, odborn?ci!
1. Potrebuji vytvorit dialog. panel, ktery nebude mit tlacitka pro
minimalizaci a max. okna a lze ho zrusit pomoci Esc.
(samozrejme bude mit tlacitka Ok, Cancel a Help)
2. V dialogovem panelu potrebuji obrazkove tlacitka. Tyto obrazky vytvorim
v nejakem kreslicim programu (napr. CorelDraw apod.)
a. Jakou komponentu pouzit na tato tlacitka?
b. V jakem formatu musim vyexportovat obrazek, abych ho dostal do
tohoto tlacitka?
c. Jak ho tam dostat?
d. Po stlaceni tlacitka by mel dialogovy panel zmizet. Jak to udelat?
Diky
Jan Kubeczka
Trinec
E-mail: Jan.Kubeczka(zv)trz(tec)cz
Problem s parametrem SELF
[*] Arthur <Arthur(zv)hlpsoft(tec)cz> - 26.3.1998 08:50:25
A nema tam byt
var Popis: PNejakyObjekt;
Popis:= (zv)self; {mozna staci self, uz jsem v tom nejakou dobu nedelal}
Tak jak jsi to mel jsi chtel priradit do statickeho objektu a to evidentne nebude to prave. BP7 totiz umoznilo i staticky objekt a pak v tom obcas byl docela chaos.
Arthur
=====================================
David Arthur Muzatko
HelpSoft, spol. s r. o.
Uruguayska 1, Praha 2
tel./fax.: 24255816, 90004272-5
e-mail: Arthur(zv)HlpSoft(tec)cz
=====================================
-----Original Message-----
From: SIPEK Stanislav, Ing. [SMTP:SIPEK(zv)fbm.vutbr(tec)cz]
Sent: Wednesday, March 25, 1998 4:08 PM
To: 'Konference DELPHI'
Subject: Problem s parametrem SELF
{ nadefinovani objektu }
PNejakyObjekt = ^TNejakyObjekt;
TNejakyObjekt = object
(definice promennych)
(definice metod)
Procedure Uloz;
end;
var
Popis : TNejakyObjekt; { do teto promenne si potrebuji ulozit
promenne daneho objektu }
.
procedure TNejakyObjekt.Uloz;
begin
Popis := Self;
end;
Problem s parametrem SELF
[*] SIPEK Stanislav, Ing. <SIPEK(zv)fbm.vutbr(tec)cz> - 26.3.1998 09:08:19
> SIPEK Stanislav, Ing. wrote:
>
> > Mam problem, ktery nevznikl v DELPHI, ale tyka se PASCALU.
> >
> > PNejakyObjekt = ^TNejakyObjekt;
> > TNejakyObjekt = object
>
> > var
> > Popis : TNejakyObjekt; { do teto promenne si potrebuji ulozit
> > promenne daneho objektu } . . .
> >
> > procedure TNejakyObjekt.Uloz;
> > begin
> > Popis := Self;
> > end;
> >
> > Kompilator to vezme, ale do promenne Popis se nic nepreda. Muzete mi
> > poradit proc to nefunguje?
>
> Zkus deklarovat Popis:PNejakyObjekt
[SIPEK Stanislav, Ing.]
To prekladac nevezme. A udelat Popis^ := Self; je to same.
Ja jsem si s tim vcera zase hral a zjistil jsem, ze to
teoreticky mam dobre, protoze kdyz to udelam takto
procedure TNejakyObjekt.Uloz;
var
Pom : TNejakyObjekt;
begin
Pom := self; { zde se parametry predaji }
Popis := Self; { zde se nepreda nic - PROC??? }
Popis := Pom; { zde se taky nic nepreda - PROC??? }
end;Dialog. panel
[*] RADIK(zv)p15.monet(tec)cz - 26.3.1998 09:16:00
Pokud jde o schazovani dialogu po Escl, pak skutecne nejjednodusi je
zmenit v tlacitku, ktere se jmenuje Cancel nebo Storno, vlastnost Cancel
na True. Pak to funguje tak, ze po Esc se vlasne jako stiskne
tlacitko.....
Je to skutecne jednodusi nez KeyPreview......
Ales
----------
Od: Martin Fronik
Komu: 'DELPHI Distribution List'
P�edm�t: RE: Dialog. panel
Datum: 26. b�ezen 1998 8:20
No nazdar,
tak se do toho dame:
predpokladam ze dialog vytvorit umite (v Builderu nebo Delphi)
potom je treba nastavit property BorderIcons takto:
biSystemMenu true
biMinimize false
biMaximize false
biHelp ? <dle libosti>
Jako tlacitka je treba pouzit BitBtn, z toho jiz vyplyva, ze je treba
pouzit obrazky ve formatu BMP (CDR je mozno exportovat
ale jaky bude vysledek ...)
Do tlacitka se obrazek dostane tim, ze jako vlastnost (property) Glyph
se nastavi soubor s obrazkem [napr. obrazek.bmp]
Dialogovy panel sam nikam nezmizi, toto je treba udelat programove,
volanim funkce:
pro Builder: this->Close();
pro Delphi: Close;
Jestlize je potreba rusit dialog pomoci Esc, pak nejlepsi cestou je
nastavit u formulare KeyPreview na true a v obsluze udalosti
OnKeyDown (pripadne Up) testovat obsah promenne Key a podle toho
patricne reagovat - tim se otevira cesta k mnoha dalsim
moznostem....
Doufam, ze Vam toto pomuze
-----Original Message-----
From: Jan.Kubeczka(zv)gate.trz(tec)cz [SMTP:Jan.Kubeczka(zv)gate.trz(tec)cz]
Sent: Thursday, March 26, 1998 6:41 AM
To: delphi(zv)pinknet(tec)cz
Subject: Dialog. panel
Nazdar, odborn?ci!
1. Potrebuji vytvorit dialog. panel, ktery nebude mit tlacitka pro
minimalizaci a max. okna a lze ho zrusit pomoci Esc.
(samozrejme bude mit tlacitka Ok, Cancel a Help)
2. V dialogovem panelu potrebuji obrazkove tlacitka. Tyto obrazky
vytvorim
v nejakem kreslicim programu (napr. CorelDraw apod.)
a. Jakou komponentu pouzit na tato tlacitka?
b. V jakem formatu musim vyexportovat obrazek, abych ho dostal do
tohoto tlacitka?
c. Jak ho tam dostat?
d. Po stlaceni tlacitka by mel dialogovy panel zmizet. Jak to
udelat?
Diky
Jan Kubeczka
Trinec
E-mail: Jan.Kubeczka(zv)trz(tec)cz
Problem s parametrem SELF
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 26.3.1998 09:46:00
> -----P�vodn� zpr�va-----
> Od: Vaclav Sazima [SMTP:sazima(zv)comp(tec)cz]
> Self je pointer, takze Popis by mel byt typu PNejakyObject a
> pristup
> na ty promenne pak pres Popis^.
[T.B.]
Self neni pointer...! Ale kopirovani objektu prirazenim neni v Pascalu
vubec pripustne!
Nadeklaruj si metodu CopyFrom(FromObject: PNejakyObject) ve ktere si to
presunes polozku po polozce... Hlavne treba alokovany stringy neprenaset
prirazenim, ale novou alokaci, ne?
Anebo, kdyz ses moc odvaznej a nemas nejake dynamicke hodnoty v tom
objektu, muzes pouzit funkci Move... Ale to chce moooooc discipliny a
soustredeni...
Tomas
-----------------------------------------------------
Tomas.Burger(zv)mius(tec)cz
Tomas.Burger(zv)sms.paegas(tec)cz
http://www.mius(tec)cz/; http://www.teplice(tec)cz/
http://delphi.mius(tec)cz/; http://www.sever(tec)cz/
icq: 3908757
-----------------------------------------------------
Volba podavace
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 26.3.1998 09:49:16
Pote, co selhaly funkce jako DocumentProperties nebo DeviceCapabilities,
se i ja pripojuji k dotazu... Konkretne: Minolta PagePro 12 a jeji dva
zasobniky... Jak zjistit, ktery je aktivni a jak se na nektery z nich
prepnout...
Umi to pres Esc, ale jakykoliv tisk v grafice to zase prebije...
Nakonec jsem pridal SetupPrinterDialog a tam si to nebohy user musi
nastavit, ale moc se mi to nelibi...
Dosel jste nekdo dal...?
Tomas
> -----P�vodn� zpr�va-----
> Od: David Maly [SMTP:dmal3233(zv)ss1000.ms.mff.cuni(tec)cz]
> Odesl�no: 25. b�ezna 1998 23:30
> Komu: delphi(zv)pinknet(tec)cz
> P�edm�t: Volba podavace
>
> Nevite nekdo, jak se nastavi ze ktereho podavece se bude brat papir
> pri tisku na tiskarnu. A taky jak se tadle hodnota zjisti.
> Diky
> David
Dialog. panel
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 26.3.1998 10:06:44
Hi,
ocekaval jsem, ze mi tohle nekdo napise, samozrejme je to jednodussi, ale ne univerzalni.
KeyPreview ma mnohem sirsi moznosti. S tim mrCancel jsem mel v nekterych pripadech potize, takze ho pouzivam
jen na trivialni dialogy...
-----Original Message-----
From: RADIK(zv)p15.monet(tec)cz [SMTP:RADIK(zv)p15.monet(tec)cz]
Sent: Thursday, March 26, 1998 9:16 AM
To: delphi(zv)pinknet(tec)cz; fronek(zv)fic(tec)cz
Subject: RE: Dialog. panel
Pokud jde o schazovani dialogu po Escl, pak skutecne nejjednodusi je
zmenit v tlacitku, ktere se jmenuje Cancel nebo Storno, vlastnost Cancel
na True. Pak to funguje tak, ze po Esc se vlasne jako stiskne
tlacitko.....
Je to skutecne jednodusi nez KeyPreview......
Ales
----------
Od: Martin Fronik
Komu: 'DELPHI Distribution List'
P�edm�t: RE: Dialog. panel
Datum: 26. b�ezen 1998 8:20
No nazdar,
tak se do toho dame:
predpokladam ze dialog vytvorit umite (v Builderu nebo Delphi)
potom je treba nastavit property BorderIcons takto:
biSystemMenu true
biMinimize false
biMaximize false
biHelp ? <dle libosti>
Jako tlacitka je treba pouzit BitBtn, z toho jiz vyplyva, ze je treba
pouzit obrazky ve formatu BMP (CDR je mozno exportovat
ale jaky bude vysledek ...)
Do tlacitka se obrazek dostane tim, ze jako vlastnost (property) Glyph
se nastavi soubor s obrazkem [napr. obrazek.bmp]
Dialogovy panel sam nikam nezmizi, toto je treba udelat programove,
volanim funkce:
pro Builder: this->Close();
pro Delphi: Close;
Jestlize je potreba rusit dialog pomoci Esc, pak nejlepsi cestou je
nastavit u formulare KeyPreview na true a v obsluze udalosti
OnKeyDown (pripadne Up) testovat obsah promenne Key a podle toho
patricne reagovat - tim se otevira cesta k mnoha dalsim
moznostem....
Doufam, ze Vam toto pomuze
-----Original Message-----
From: Jan.Kubeczka(zv)gate.trz(tec)cz [SMTP:Jan.Kubeczka(zv)gate.trz(tec)cz]
Sent: Thursday, March 26, 1998 6:41 AM
To: delphi(zv)pinknet(tec)cz
Subject: Dialog. panel
Nazdar, odborn?ci!
1. Potrebuji vytvorit dialog. panel, ktery nebude mit tlacitka pro
minimalizaci a max. okna a lze ho zrusit pomoci Esc.
(samozrejme bude mit tlacitka Ok, Cancel a Help)
2. V dialogovem panelu potrebuji obrazkove tlacitka. Tyto obrazky
vytvorim
v nejakem kreslicim programu (napr. CorelDraw apod.)
a. Jakou komponentu pouzit na tato tlacitka?
b. V jakem formatu musim vyexportovat obrazek, abych ho dostal do
tohoto tlacitka?
c. Jak ho tam dostat?
d. Po stlaceni tlacitka by mel dialogovy panel zmizet. Jak to
udelat?
Diky
Jan Kubeczka
Trinec
E-mail: Jan.Kubeczka(zv)trz(tec)cz
Problem s parametrem SELF
[*] Arthur <Arthur(zv)hlpsoft(tec)cz> - 26.3.1998 10:14:10
-----Original Message-----
From: SIPEK Stanislav, Ing. [SMTP:SIPEK(zv)fbm.vutbr(tec)cz]
Sent: Thursday, March 26, 1998 9:08 AM
To: 'DELPHI Distribution List'
Subject: RE: Problem s parametrem SELF
> SIPEK Stanislav, Ing. wrote:
>
> > Mam problem, ktery nevznikl v DELPHI, ale tyka se PASCALU.
> >
> > PNejakyObjekt = ^TNejakyObjekt;
> > TNejakyObjekt = object
>
> > var
> > Popis : TNejakyObjekt; { do teto promenne si potrebuji ulozit
> > promenne daneho objektu } . . .
> >
> > procedure TNejakyObjekt.Uloz;
> > begin
> > Popis := Self;
> > end;
> >
> > Kompilator to vezme, ale do promenne Popis se nic nepreda. Muzete mi
> > poradit proc to nefunguje?
>
> Zkus deklarovat Popis:PNejakyObjekt
[SIPEK Stanislav, Ing.]
To prekladac nevezme. A udelat Popis^ := Self; je to same.
Ja jsem si s tim vcera zase hral a zjistil jsem, ze to
teoreticky mam dobre, protoze kdyz to udelam takto
procedure TNejakyObjekt.Uloz;
var
Pom : TNejakyObjekt;
begin
Pom := self; { zde se parametry predaji }
Popis := Self; { zde se nepreda nic - PROC??? }
Popis := Pom; { zde se taky nic nepreda - PROC??? }
end;
[Arthur] Nepochopil jsem, jestli chces predat hodnoty nebo rozmnozit ukazatel na objekt. Podle Tveho prikladu je Pom lokalni promena, ktera jiz obsahuje STATICKY (tudis novou instanci) objekt. Muze byt problem, ze prekladac nevygeneruje kod pro inicializaci statickeho objektu v globalnim segmentu. Uz si to moc nepamatuju, ale zkusil bych
implementation
var Pom: PNejakyObjekt;
procedure TNejakyObjekt.Uloz;
begin
Pom^.Data:= Data;
end;
begin
Pom:= New(PNejakyObjekt, Init); {timto tam opravdu nejaky objekt bude}
end.Autonumber
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.3.1998 10:53:20
> Mam takovy problem, pouzil jsem pro svou aplikaci v tabulkach jako
> primary key typ Autonumber, cela aplikace funguje bez problemu, ale nyni
> potrebuji provest kopii databaze z jedne do druhe pri zachovani vazeb
> (cilova ma temer shodnou strukturu). Problem je v tom, ze po Insert se
> vygeneruje nove cislo pro Autonumber a ten se nepodari zmenit na puvodni
> hodnotu a v sekundarni tabulce diky tomu dojde k chybe, ze neni primary
> key.
>
> Poradte mi prosim jak to vyresit, asi budu nucen AutoNumber zrusit a
> pouzivat jiny zpusob generovani Primary Key.
No tak to budes muset udelat trochu chytrejsi a to tak, ze to vlozi
master zaznam a podle toho to pak vlozi detail zaznam. Proste nemuzes
zkopirovat kazdou tabulku zvlast, ale musis to zkopirovat vcetne vazby.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================Problem s parametrem SELF
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 26.3.1998 12:06:43
> ---P�vodn� zpr�va-----
> Od: Arthur(zv)HlpSoft(tec)cz [SMTP:Arthur(zv)HlpSoft(tec)cz]
> Podle Tveho prikladu je Pom lokalni promena, ktera jiz obsahuje
> STATICKY (tudis novou instanci) objekt.
[T.B.]
Jen technicka pripominka...:
Jestlize mame lokalni promennou typu staticky objekt, tato
promenna objekt jeste neobsahuje... Musi se totiz NUTNE vyvolat
konstruktor, ktery vytvori VMT... Bez toho se objekt nelisi od
rekordu...
Tomas
Volba podavace
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 26.3.1998 12:31:46
> -----P�vodn� zpr�va-----
> Od: Ing. Marek �LACHTA [SMTP:softda(zv)mbox.vol(tec)cz]
> CreateDC k vytvoreni DC tiskarny. Takze staci jen nastavit danou
> polozku struktury na pozadovanou hodnotu a strukturu pouzit ve funkci
> CreateDC.
[T.B.]
Ale jak se dostanu ke CreateDC, kdyz pouzivam std. objekt Printer...?
Tomas
DB float
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 26.3.1998 13:09:59
Hi,
Mam takovy maly problem:
potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista (Kc) a prave na 2. Jenze
datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by nevadilo, ale pri nekterych
vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi jako x^-11 atp...
takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ? Pouzivam data aware,
takze nemohu ukladat cislo jako cele a pred pouzitim posunout desetinnou carku. Existuje
jednoduche reseni ?
Dekuji za vyslechnuti, radu, nezabiti......
fronek(zv)fic(tec)cz
Problem s parametrem SELF
[*] SIPEK Stanislav, Ing. <SIPEK(zv)fbm.vutbr(tec)cz> - 26.3.1998 13:10:52
Ja se omlouvam, ze jsem se spatne vyjadril. Tu promennou nepotrebuji
pouzivat jako objekt, ale jde mi o to do ni predat hodnoty promennych
nadefinovanzch v ramci daneho objektu - budu ji vlastne pouzivat jen
jako record. Co jsem zjistil, tak BP7 toto predani jak jsem to chtel
udelat opravdu nepodporuje, takze mi opravdu nezbyde nic jineho nez
prenest jednu polozku po druhe stylem
NejakaPromenna.X := self.X;
Chtel jsem si totiz ulehcit psani, protoze tech promennych v objektu je
dost, ale jinak to asi nepujde.
Dekuji vsem za pripominky.
> -----P�vodn� zpr�va-----
> Od: Burger Tom� [SMTP:Tomas.Burger(zv)mius(tec)cz]
> Odesl�no: 26. b�ezna 1998 12:07
> Komu: sipek(zv)fbm.vutbr(tec)cz
> P�edm�t: RE: Problem s parametrem SELF
>
> > ---P�vodn� zpr�va-----
> > Od: Arthur(zv)HlpSoft(tec)cz [SMTP:Arthur(zv)HlpSoft(tec)cz]
> > Podle Tveho prikladu je Pom lokalni promena, ktera jiz obsahuje
> > STATICKY (tudis novou instanci) objekt.
> [T.B.]
> Jen technicka pripominka...:
> Jestlize mame lokalni promennou typu staticky objekt, tato
> promenna objekt jeste neobsahuje... Musi se totiz NUTNE vyvolat
> konstruktor, ktery vytvori VMT... Bez toho se objekt nelisi od
> rekordu...
>
> Tomas
Autonumber
[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 26.3.1998 13:43:25
> > Mam takovy problem, pouzil jsem pro svou aplikaci v tabulkach jako
> > primary key typ Autonumber, cela aplikace funguje bez problemu, ale
> nyni
> > potrebuji provest kopii databaze z jedne do druhe pri zachovani
> vazeb
> > (cilova ma temer shodnou strukturu). Problem je v tom, ze po Insert
> se
> > vygeneruje nove cislo pro Autonumber a ten se nepodari zmenit na
> puvodni
> > hodnotu a v sekundarni tabulce diky tomu dojde k chybe, ze neni
> primary
> > key.
> >
> > Poradte mi prosim jak to vyresit, asi budu nucen AutoNumber zrusit a
> > pouzivat jiny zpusob generovani Primary Key.
>
> No tak to budes muset udelat trochu chytrejsi a to tak, ze to vlozi
> master zaznam a podle toho to pak vlozi detail zaznam. Proste nemuzes
> zkopirovat kazdou tabulku zvlast, ale musis to zkopirovat vcetne
> vazby.
>
Jo to by slo, kdyby ta databaze nemela cca 40 tabulek.
J.Jahoda
Formatovany export do niecoho
[*] Jiri Semecky <jsem6533(zv)barbora.mff.cuni(tec)cz> - 26.3.1998 13:49:42
Ehm,
ze nechces platit baby, plne chapu. Jako ruzumny reseni se mi zda
OleAutomation. To pak muzes exportovat treba do Wordu a nezajima te
konkretni format souboru.
Jedna se o komunikaci s Wordem, ktery je zapnuty na pozadi (nema
okno) a ty mu jenom posilas ridici prikazy (ve formatu Visual Basic
for Application).
Je to popsany v helpu pod helsem: "OleAuto unit" -> "A simple OLE Automation client"
S pozdravem Jirka Semecky
> Ehm, potrebujem vyexportovat velmi velku databazu do niecoho
> formatovaneho.
> ...
> No, skusim inak.
>
> Mam databazu informacii, ktora sluzi ako podklad pre DTP.
> Problem je v tom, ze ked to vyexportujem do niecoho ako
> "Plain text", zalomenie bude trvat niekolko dni, co by ani
> nebol taky problem ale platit baby tyzden a jeden den je
> rozdiel.
>
> Preto by som to chcel vyexportovat uz formatovane. Tj
> potreboval by som aby niektore slovo bolo boldovane alebo
> ine aby bolo kurzivou a inou velkostou fontu. Vysledok
> exportu by sa mal dat otvorit aspon vo worde alebo quarku.
>
> Upozornujem, ze ta databaza je naozaj obrovska, tak 5000
> stran plain textu.
>
> Pani, mate napady?
>
>
> richard willmann
>
> Problem s parametrem SELF
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 26.3.1998 14:37:10
> -----P�vodn� zpr�va-----
> Od: SIPEK Stanislav, Ing. [SMTP:SIPEK(zv)fbm.vutbr(tec)cz]
> nadefinovanzch v ramci daneho objektu - budu ji vlastne pouzivat jen
> jako record. Co jsem zjistil, tak BP7 toto predani jak jsem to chtel
> udelat opravdu nepodporuje, takze mi opravdu nezbyde nic jineho nez
[T.B.]
Tak presne na to muzes pouzit proceduru move...:
move(staryobjekt, novyobjekt, sizeof(staryobjekt));
Dokonce se tak prenasi i VMT (prvnich tusim 8 bytu...)
Tomas
Divne chovani programu z Delphi
[*] Valicek Arnost <valiceka(zv)mgv.inext(tec)cz> - 26.3.1998 14:40:50
V programech vytvorenych v Delphi jsem objevil nejake divne
veci
1)Programy ktere vytvorim (ale i cizi) maji v
menu, ktere se zobrazi po kliknuti na ikonu spusteneho programu jenom
polozky Obnovit, Min(Max)imalizovat,Zavrit. Ostatni Win programy tam
maji dalsi polozky (Velikost,Presunot).
2)Pokud Min/Maximalizuju Delphi program, okno jednoduse zmizi/objevi
se zatimco ostatni programy tuto akci animuji (neozve se ani zvuk,
ktery je s touto akci spojeny)
pozn.: pouzivam Delphi 2.
Myslim, ze v obou pripadech je to zpusobeno stejnou veci. Cim? Jak to
muzu (pokud mozno jednoduse) opravit.
Diky
Arnost Valicek
------------------------------------------------
Arnost Valicek (ValicekA(zv)mgv.inext(tec)cz)
------------------------------------------------
DB float
[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 26.3.1998 14:59:10
zkus se podivat do Helpu na TBCDField
Milos
----------
Od: Martin Fron�k
Odesl�no: 26. b�ezna 1998 13:09
Komu: 'DELPHI Distribution List'
P�edm�t: DB float
Hi,
Mam takovy maly problem:
potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista (Kc) a prave na 2. Jenze
datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by nevadilo, ale pri nekterych
vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi jako x^-11 atp...
takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ? Pouzivam data aware,
takze nemohu ukladat cislo jako cele a pred pouzitim posunout desetinnou carku. Existuje
jednoduche reseni ?
Dekuji za vyslechnuti, radu, nezabiti......
fronek(zv)fic(tec)cz
*** Problem z D1 a D2 a nastavenim CharSet ***
[*] Ivan Tur�an <iturcan(zv)borland(tec)cz> - 26.3.1998 15:41:10
Zdravim vsetkych priaznivcov Delphi
Na zaklade castich otazok ohladom Cestiny a Slovenciny v Delphi 1 a Delphi 2
s pouzitim win95 a NT by som vsetkym dat na vedomie ze uplne riesenie na tento problem sa bude
od buduceho tyzdna nachadzat v rubrike " nejcastejsi technicke otazky a odpovedi"
na nasej domovskej stranke www.borland(tec)cz .
S pozdravom
Ivan Turcan
Borland s.r.o.
E-Mail: iturcan(zv)borland(tec)cz
ridici znaky tiskarny
[*] ROMAN MINAR <MINARR(zv)infnw.inf.upol(tec)cz> - 26.3.1998 16:40:40 met
Zdravim,
jeden muj znamy ma nasledujici problem: ve svem programu potrebuje
zjistit, ktera z pripojenych tiskaren (ve Windows, samozrejme) je
momentalne aktivni (to by snad nebyl az takovy problem), ale hlavne
pak potrebuje programove ziskat nektere ridici znaky teto tiskarny.
Poradte nekdo.
Zdravi Roman
Open Tools API
[*] Arthur <Arthur(zv)hlpsoft(tec)cz> - 26.3.1998 16:59:02
Budte zdravi
Mam nasledujici problem, ktery se tyka Open Tools API:
Mam komponentu, ktera potrebuje do dfm ulozit jenom polovinu informaci,
ta druha polovina je dulezita jenom pro design (a je dost velka a v programu nema co delat).
Moje myslenka byla, ze si vytvori soubor, ktery bude dualni k *.dfm (treba *.aaa) a do nej si to
bude ukladat (kdyz ten soubor zmizne, tak se nic moc nedeje, proste o
ty pomocne informace prisel). Bohuzel jsem jaksi neprisel na to, jak
z komponenty zjistim v design-time soubor s formularem, na kterem je
jeji instance (GetCurrentFile vraci obecne neco jineho a ja mam k
dispozici pouze jmeno formulare (Owner.Name), pak seznam souboru s formulari a
nejak postradam (mozna to tam na me celou dobu koukalo, ale uz
jsem z toho dost hotovej)-: mechanismus, ktery by mi rekl, ze
tento formular je v tomto souboru.
Informace jsem chtel nahravat na Loaded a ukladat na WriteState.
Budu vdecny za radu. Diky Arthur.
=====================================
David Arthur Muzatko
HelpSoft, spol. s r. o.
Uruguayska 1, Praha 2
tel./fax.: 24255816, 90004272-5
e-mail: Arthur(zv)HlpSoft(tec)cz
=====================================
Pravdepodobnost
[*] <petrak(zv)gfk(tec)cz> - 26.3.1998 17:31:26
Tez Vas srdecne zdravim,
ten problem je pomerne jednoduchy a lze k nemu pristoupit mnoha zpusoby.
Napriklad: Doplnkovy jev (jeho pravdepodobnost je 1 - pravdepodobnost
naseho jevu) je zde ten pripad, kdy vytahneme dvakrat za sebou koule
jine barvy nez cerne (pochopitelne s tim, ze tam poprve vytazenou kouli
vratime). Vlastne ve dvou po sobe jdoucich identickych pokusech chceme
vytahnout pokazde kouli jine barvy nez cerne. Pravdepodobnost, ze v
jednom pokusu vytahneme kouli jine barvy nez cerne je 2/3,
pravdepodobnost, ze se to stane dvakrat za sebou je (2/3)x(2/3) neboli
(4/9). Takze pravdepodobnost naseho jevu je 1-(4/9) = 5/9.
Nebo pravdepodobnost, ze vytahneme cernou kouli v prvem pokusu je 1/3 a
pravdepodobnost, ze v prvem pokusu vytahneme jinou nez cernou a zaroven
ve druhem cernou je (1/3)x(2/3)=2/9. Hledana pravdepodobnost je souctem
techto dvou: 1/3 + 2/9 = 5/9. S pozdravem
Martin Petrak
>----------
>Od: Slavek Rydval -- rk[SMTP:rk(zv)atrey.karlin.mff.cuni(tec)cz]
>Odesl�no: 26. b�ezna 1998 14:55
>Komu: PETR�K Martin
>P�edm�t: Pravdepodobnost
>
>
>
>Preji pekneho dne,
>
>posila me Martin Seget za Vami s nasledujicim problemem:
>
> Mam 100 kouli bilych, 100 cernych a 100 modrych kouli. Vytahnu
>nejakou kouli a pokud to neni cerna, pak ji vratim a taham znovu, Tedy
>celkem provedu dva vybery, Jaka je pravdepodobnost, ze vytahnu cernou?
>
>
>Dekuji.
>
> S pozdravem Slavek Rydval
>
>----------------------------------------------------------------------------
>http://atrey.karlin.mff.cuni(tec)cz/~rk
>----------------------------------------------------------------------------
>
>Volba podavace
[*] Ing. Marek �LACHTA <softda(zv)mbox.vol(tec)cz> - 26.3.1998 18:18:53
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Struktura DEVMODE obsahuje polozku DmDefaultSource, ktera urcuje typ zasobniku, z ktereho je podavan papir. Funkce DeviceCapabilities pouziva tuto strukturu, takze tim muzes zjistit implicitni typ zasobniku dane tiskarny. Stejna struktura se take pouziva ve funkci CreateDC k vytvoreni DC tiskarny. Takze staci jen nastavit danou polozku struktury na pozadovanou hodnotu a strukturu pouzit ve funkci CreateDC.
Vita
Chybove hlasky
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 26.3.1998 18:19:17
> Pokouseli jste se nekdo "prerazit" standartni chybove hlasky ?
>
> Napr. "xxx is not a valid date" textem "xxx neni platne datum" apod.
> Ja jsem se o to pokousel a vzdy mi to vyhodilo nejakej General
> protection.
Zalezi na tom, jak jsi na to sel. Existuje nekolik moznosti. Popisu dve
zakladni:
A) Predefinovanim metody Application.OnException
Tato metoda dela puvodne to, ze zobrazi chybovou hlasku. Program se do ni
dostane pri kazde chybe. Jako vstupni parametr ale do funkce leze objekt
Exception a u nej nezjistis cislo chyby, ale jen text. A asi je zverstvo, mit
tam x podminek typu
If E.Message='xxx is not a valid date'
Then MessageDlg('xxx neni platne datum',mtError,[mbOk],0);
atd. atd. atd.
B) Druhy zpusob je osetrit vsechno na miste, kde chyba vznika pomoci
try except end a do sekce except dat exception.create('xxx neni platne datum').
Ja osetrovani chyb resim prakticky kombinaci techto dvou postupu. Mam vytvorenu
komponentu, ktera je potomkem Exception a jako parametr pri Create nema text,
ale nejake ID. Dale mam seznam chybovych hlasek obsahujici vzdy ID a
text hlasky. V Create me komponenty mam pak v Inherited Create volanou uz s
prislusnym textem. Tim resim tu neprijemnost, ze si nemusim pamatovat, ze chybu
pri deleni nulou mam vzdy psat "Deleni nulou", ale staci mi si pamatovat
nejakou konstantu, napr. errDivisionByZero.
A pak mam jeste druhou komponentu, ktera zajisti predefinovani puvodni metody
Application.OnException svou metodou. Navic ma tyto property: nazev souboru,
kam se maji ukladat chybove hlasky, jestli se ma zobrazovat dialogove okno,
jestli se ma pri chybe beepnout, jestli se ma chyba zapisovat do souboru a v
jakem formatu (napr. vcetne data a casu). Tuto komponentu staci vlozit do
hlavniho formulare a o vic se nemusim starat.
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
Divne chovani programu z Delphi
[*] Tomas Skopik <skopik(zv)opv(tec)czn(tec)cz> - 26.3.1998 19:34:13
Zdravim,
Pouzivam Delhi 2 a volby Move a Size u hotovych aplikaci v systemovem menu
mam. Mozna ti to delaji aplikace u kterych neni mozne zmenit velikost okna,
alespon pokud se jedna o Size. U Move nevim.
Animace pri minimalizaci a obnoveni okna neni zrejme proto, ze Delphi 2 je i
pro WinNT 3,51 a ty maji jine prostredi. Takze si mysli, ze s tohoto duvodu.
Jestli se pletu, tak me prosim nebite.
-----
Tomas Skopik
e-mail : skopik(zv)opv(tec)czn(tec)cz
fido netmail : 2:421/71.12
-----Original Message-----
From: Valicek Arnost <valiceka(zv)mgv.inext(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Date: 26. b�ezna 1998 16:15
Subject: Divne chovani programu z Delphi
V programech vytvorenych v Delphi jsem objevil nejake divne
veci
1)Programy ktere vytvorim (ale i cizi) maji v
menu, ktere se zobrazi po kliknuti na ikonu spusteneho programu jenom
polozky Obnovit, Min(Max)imalizovat,Zavrit. Ostatni Win programy tam
maji dalsi polozky (Velikost,Presunot).
2)Pokud Min/Maximalizuju Delphi program, okno jednoduse zmizi/objevi
se zatimco ostatni programy tuto akci animuji (neozve se ani zvuk,
ktery je s touto akci spojeny)
pozn.: pouzivam Delphi 2.
Myslim, ze v obou pripadech je to zpusobeno stejnou veci. Cim? Jak to
muzu (pokud mozno jednoduse) opravit.
Diky
Arnost Valicek
------------------------------------------------
Arnost Valicek (ValicekA(zv)mgv.inext(tec)cz)
------------------------------------------------
Autonumber
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.3.1998 19:53:19
> > No tak to budes muset udelat trochu chytrejsi a to tak, ze to vlozi
> > master zaznam a podle toho to pak vlozi detail zaznam. Proste nemuzes
> > zkopirovat kazdou tabulku zvlast, ale musis to zkopirovat vcetne
> > vazby.
> >
> Jo to by slo, kdyby ta databaze nemela cca 40 tabulek.
A to je snad nejaky problem?
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================Problem s parametrem SELF
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.3.1998 20:01:38
SIPEK Stanislav, Ing. wrote:
> > Zkus deklarovat Popis:PNejakyObjekt
> [SIPEK Stanislav, Ing.]
> To prekladac nevezme. A udelat Popis^ := Self; je to same.
A Popis:=(zv)Self?
Jinak to vzdavam, protoze s Pascalem uz par let nedelam. Prejdi na
Delphi, tim se zbavis takovychto problemu (a ziskas jine :).
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
DB float
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.3.1998 20:01:38
Martin Fron�k wrote:
> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
> (Kc) a prave na 2. Jenze datovy typ floatfield (ci tak nejak) ma
TCurrencyField, nebo zkrat presnost desetinnych mist.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Obrazky v databazi
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 26.3.1998 23:41:33
Vsechny zdravim.
Pri praci s obrazky ukladanymi do Blob polozky v tabulce
typu pdox jsem narazil na zajimaji ukaz:
Do prazdne tabulky vlozim pres LoadFromFile BMP obrazek
veliky 5334 B - soubor *.MB se zvetsi z 4096 na 12288 B.
Pridam GIF obrazek 1229 B - soubor *.MB naroste na 20480 B.
To uz samo o sobe mi vadi (v jakem formatu to je vlastne
ulozeno, je Blob, tak by mel data zachovat bez nejakych konverzi, ne).
Jeste zajimavejsi :)) je, ze kdyz totez udelam pres
clipboard (..assign(ClipBrd)), po prvnim obrazku ma *.MB
velikost 20480 a po druhem 36864 B. Proc ???
Da se zabrane misto nejak minimalizovat ? Potrebuji
pracovat s velkym mnozstvim obrazku a velikost *.MB se
uz blizi 1 GB.
Diky, Zdenek.
---------------------------------------------------------
: o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
TToolbar
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 27.3.1998 07:06:45
Zdravim,
v aplikaci napsane v Delphi 3 pouzivam objekt TToolbar. Jedna z voleb
nastaveni je vypnout toolbar. Pokud aplikace jede, je vse v poradku.
Problem nastane pri ukonceni, kdy zapisuji aktualni stav do registry
(zapnuty/vypnuty). Pri novem startu aplikace a nacteni hodnoty ToolBaru
z registry, kde byla zapsana hodnota VYPNUTY nastavuji Vlastnost VISIBLE
na False. Jenze Toolbar se normalne zobrazi. Kde je chyba?
S pozdravem
Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava
Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
> Open Tools API
[*] Rybar, Boris <borisr(zv)softip.sk> - 27.3.1998 07:25:33
Neviem ci som to spravne pochopil.
Mas vlastnu komponentu a potrebujes do dfm suboru ukladat iba
niektore properties?
Ak ano potom pri deklaracie property v triede komponenty ide
specifikovat
klauzulou default boolvalue ci property ma default hodnotu a teda sa
nemusi do dfm ukladat.
Priklad:
propery Day: integer read FDay write SetDay default true;
znamena ze property Day ma default hodnotu a neuklada sa do dfm.
Je mozne dokonca definovat funkciu s navratovou hodnotou Boolean
a tu vojat za klauzulou default. To zabezpeci programove urcenie ci
propery zapisat do dfm alebo nie.
Ak som to nepochopil a pisem z cesty, vopred sa ospravedlnujem.
Boris
Ing. Boris Rybar
borisr(zv)softip.sk
Banska Bystrica
> -----P�vodn� zpr�va-----
> Od: Arthur [SMTP:Arthur(zv)hlpsoft(tec)cz]
> Odesl�no: 26. marec 1998 16:59
> Komu: Konference (el. adresa)
> P�edm�t: Open Tools API
>
> Budte zdravi
> Mam nasledujici problem, ktery se tyka Open Tools API:
> Mam komponentu, ktera potrebuje do dfm ulozit jenom polovinu
> informaci,
> ta druha polovina je dulezita jenom pro design (a je dost velka a v
> programu nema co delat).
> Moje myslenka byla, ze si vytvori soubor, ktery bude dualni k *.dfm
> (treba *.aaa) a do nej si to
> bude ukladat (kdyz ten soubor zmizne, tak se nic moc nedeje, proste o
> ty pomocne informace prisel). Bohuzel jsem jaksi neprisel na to, jak
> z komponenty zjistim v design-time soubor s formularem, na kterem je
> jeji instance (GetCurrentFile vraci obecne neco jineho a ja mam k
> dispozici pouze jmeno formulare (Owner.Name), pak seznam souboru s
> formulari a
> nejak postradam (mozna to tam na me celou dobu koukalo, ale uz
> jsem z toho dost hotovej)-: mechanismus, ktery by mi rekl, ze
> tento formular je v tomto souboru.
> Informace jsem chtel nahravat na Loaded a ukladat na WriteState.
>
> Budu vdecny za radu. Diky Arthur.
>
> =====================================
> David Arthur Muzatko
> HelpSoft, spol. s r. o.
> Uruguayska 1, Praha 2
> tel./fax.: 24255816, 90004272-5
> e-mail: Arthur(zv)HlpSoft(tec)cz
> =====================================
> Obrazky v databazi
[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 27.3.1998 07:46:48
Paradox zadnou konverzi neprovadi, pouze u textu (Formated Memo), kdyz
je nastaven atribut Transliterate, Coz se Vas asi netyka.
Co je podstatne, je ze PARADOX ma radky ulozeny v tzv. blocich jejich
delka je nasobkem 4096 (2^12). Z toho ty narusty velikosti
5334->8192+4096=12288
Stejne jako pri ukladani do souboru ma system urcitou rezii (FAT16 vetsi
nez FAT32 ci NTFS), tak i vsechny databaze museji mit nejakou rezii.
Nekde by vsak melo jit nastavit velikost bloku na mensi velikost, ale
nevim kde a co to prinese. Jake vubec ma paradox omezeni na pocet bloku
v jednom MB, to nevim.
J.Jahoda
> ----------
> From: Ing. Zdenek Sraier[SMTP:sraierzd(zv)czn(tec)cz]
> Reply To: DELPHI Distribution List
> Sent: 26. b�ezna 1998 23:41
> To: Konference Delphi
> Subject: Obrazky v databazi
>
> Vsechny zdravim.
> Pri praci s obrazky ukladanymi do Blob polozky v tabulce
> typu pdox jsem narazil na zajimaji ukaz:
> Do prazdne tabulky vlozim pres LoadFromFile BMP obrazek
> veliky 5334 B - soubor *.MB se zvetsi z 4096 na 12288 B.
> Pridam GIF obrazek 1229 B - soubor *.MB naroste na 20480 B.
>
> To uz samo o sobe mi vadi (v jakem formatu to je vlastne
> ulozeno, je Blob, tak by mel data zachovat bez nejakych konverzi, ne).
>
> Jeste zajimavejsi :)) je, ze kdyz totez udelam pres
> clipboard (..assign(ClipBrd)), po prvnim obrazku ma *.MB
> velikost 20480 a po druhem 36864 B. Proc ???
>
> Da se zabrane misto nejak minimalizovat ? Potrebuji
> pracovat s velkym mnozstvim obrazku a velikost *.MB se
> uz blizi 1 GB.
>
> Diky, Zdenek.
> ---------------------------------------------------------
> : o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
> : ( o o) users(tec)czn(tec)cz/~sraierzd/ :
> : (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
> ---------------------------------------------------------
> Chybove hlasky
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 07:55:24
Nasledovne som nasiel v Help topic "Localizing resources":
For string resources, you must compile your application using the -gd
command line switch or request Detailed Map File on the linker page when you
compile your application from the IDE. If you compile your application in
either of these ways, it generates a .DRC file that contains tables of all
string constants you declared using the resourcestring keyword. After you
translate the strings in the .DRC file, use the command line BRCC32 utility
that ships with Delphi to compile the .DRC file into a resource (.RES) file.
Link this localized .RES file with your executable, DLL, or package to
complete the process of localizing your application.
Prajem vela zdaru,
Ondrej
-----Original Message-----
From: Libor Pel�nek <real-jp(zv)login(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Date: 25. marec 1998 18:20
Subject: Chybove hlasky
Pokouseli jste se nekdo "prerazit" standartni chybove hlasky ?
Napr. "xxx is not a valid date" textem "xxx neni platne datum" apod.
Ja jsem se o to pokousel a vzdy mi to vyhodilo nejakej General
protection.
Libor
Open Tools API
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 07:59:55
Dovolim si zacitovat Delphi Help:
You can control whether Delphi stores each of your components' properties.
By default, all properties in the published part of the class declaration
are stored. You can choose not to store a given property at all, or you can
designate a function that determines at runtime whether to store the
property.
To control whether Delphi stores a property, add the stored directive to the
property declaration, followed by True, False, or the name of a Boolean
method.
Zdar
Ondrej
-----Original Message-----
From: Arthur <Arthur(zv)hlpsoft(tec)cz>
To: Konference (el. adresa) <delphi(zv)pinknet(tec)cz>
Date: 26. marec 1998 17:31
Subject: Open Tools API
>Budte zdravi
>Mam nasledujici problem, ktery se tyka Open Tools API:
>Mam komponentu, ktera potrebuje do dfm ulozit jenom polovinu informaci,
>ta druha polovina je dulezita jenom pro design (a je dost velka a v
programu nema co delat).
>Moje myslenka byla, ze si vytvori soubor, ktery bude dualni k *.dfm (treba
*.aaa) a do nej si to
>bude ukladat (kdyz ten soubor zmizne, tak se nic moc nedeje, proste o
>ty pomocne informace prisel). Bohuzel jsem jaksi neprisel na to, jak
>z komponenty zjistim v design-time soubor s formularem, na kterem je
>jeji instance (GetCurrentFile vraci obecne neco jineho a ja mam k
>dispozici pouze jmeno formulare (Owner.Name), pak seznam souboru s
formulari a
>nejak postradam (mozna to tam na me celou dobu koukalo, ale uz
>jsem z toho dost hotovej)-: mechanismus, ktery by mi rekl, ze
>tento formular je v tomto souboru.
>Informace jsem chtel nahravat na Loaded a ukladat na WriteState.
>
>Budu vdecny za radu. Diky Arthur.
>
>=====================================
>David Arthur Muzatko
>HelpSoft, spol. s r. o.
>Uruguayska 1, Praha 2
>tel./fax.: 24255816, 90004272-5
>e-mail: Arthur(zv)HlpSoft(tec)cz
>=====================================
>
>*** Problem z D1 a D2 a nastavenim CharSet ***
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 08:05:51
A Delphi 3 tam nebude? Nie je to nic strasne, len v Code Editore mam namiesto slovenciny nejake hieroglyfy... Je to Delphi 3 Professional na NT 4 SP3. Inak vysledne programy su o.k. (co sa tyka slovenciny) :).
Ak ste tuto temu uz na tomto fore prebrali, potom prosim o kopanec s pripadnym riesenim na it(zv)nnsk.sk.
Vopred vdaka
Ondrej
-----Original Message-----
From: Ivan Tur�an <iturcan(zv)borland(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Cc: rkubat(zv)borland(tec)cz <rkubat(zv)borland(tec)cz>; sdurcok(zv)borland(tec)cz <sdurcok(zv)borland(tec)cz>
Date: 26. marec 1998 16:48
Subject: *** Problem z D1 a D2 a nastavenim CharSet ***
Zdravim vsetkych priaznivcov Delphi
Na zaklade castich otazok ohladom Cestiny a Slovenciny v Delphi 1 a Delphi 2
s pouzitim win95 a NT by som vsetkym dat na vedomie ze uplne riesenie na tento problem sa bude
od buduceho tyzdna nachadzat v rubrike " nejcastejsi technicke otazky a odpovedi"
na nasej domovskej stranke www.borland(tec)cz .
S pozdravom
Ivan Turcan
Borland s.r.o.
E-Mail: iturcan(zv)borland(tec)cz
Volba podavace
[*] V�t�zslav Gazda������u��n�?��? - 27.3.1998 08:16:24
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
>Ale jak se dostanu ke CreateDC, kdyz pouzivam std. objekt Printer...?
V tom pripade muzes pouzit API funkci DocumentProperties. Pred chvili tu nekdo uvadel ze mu ta funkce nepomohla, ale neuvedl nic vic. Nezkousel jsem ji, ale myslim ze je to ono.
Vita
DB float
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 08:36:11
Hi,
samozrejme ze pouzivam TCurrencyField, asi jsem se nepresne vyjadril, omlouvam se.
Nicmene, problem zustava....
..BCD nemohu pouzit, Interbase ho neumi...
diky za radu.
-----Original Message-----
From: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
Sent: Thursday, March 26, 1998 9:02 PM
To: delphi(zv)pinknet(tec)cz
Subject: Re: DB float
>>Martin Fron�k wrote:
>> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
>> (Kc) a prave na 2. Jenze datovy typ floatfield (ci tak nejak) ma
>TCurrencyField, nebo zkrat presnost desetinnych mist.
>S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
DB float
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 08:36:19
Diky,
nikdy v zivote, ani za nic, by me nenapadlo podivat se do helpu ;-)
no a ted vazne:
BCD je sice dobra myslenka, ale tento typ je podporovan pouze tabulkou paradoxu, a ja potrebuju i Interbase.
Takze tudy cesta nevede....
Nejaky jiny napad ?
-----Original Message-----
From: Skacel Miloslav [SMTP:skacel(zv)kjsoft(tec)cz]
Sent: Thursday, March 26, 1998 2:59 PM
To: 'DELPHI Distribution List'
Subject: RE: DB float
>zkus se podivat do Helpu na TBCDField
>Milos
> ----------
>> Od: Martin Fron�k
> Odesl�no: 26. b�ezna 1998 13:09
> Komu: 'DELPHI Distribution List'
> P�edm�t: DB float
>
> Hi,
>
> Mam takovy maly problem:
>
> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
> (Kc) a prave na 2. Jenze
> datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by
> nevadilo, ale pri nekterych
> vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi
> jako x^-11 atp...
> takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ?
> Pouzivam data aware,
> takze nemohu ukladat cislo jako cele a pred pouzitim posunout
> desetinnou carku. Existuje
> jednoduche reseni ?
>
> Dekuji za vyslechnuti, radu, nezabiti......
>
> fronek(zv)fic(tec)cz
>
*** Problem z D3 a fonty ***
[*] Ivan Tur�an <iturcan(zv)borland(tec)cz> - 27.3.1998 08:55:21
Hi All
Co sa tyka D3 a cestiny neni to zdaleka taky problem ako z D1,D2
staci vojst do tools\Enviroment option \display a nastavit font na courier
Ivan Turcan
Borland s.r.o.
----- P�vodn� zpr�va -----
Odes�latel: Ondrej Kelle <it(zv)nnsk.sk>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 27. b�ezna 1998 8:15
P�edm�t: Re: *** Problem z D1 a D2 a nastavenim CharSet ***
A Delphi 3 tam nebude? Nie je to nic strasne, len v Code Editore mam namiesto slovenciny nejake hieroglyfy... Je to Delphi 3 Professional na NT 4 SP3. Inak vysledne programy su o.k. (co sa tyka slovenciny) :).
Ak ste tuto temu uz na tomto fore prebrali, potom prosim o kopanec s pripadnym riesenim na it(zv)nnsk.sk.
Vopred vdaka
Ondrej
-----Original Message-----
From: Ivan Tur�an <iturcan(zv)borland(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Cc: rkubat(zv)borland(tec)cz <rkubat(zv)borland(tec)cz>; sdurcok(zv)borland(tec)cz <sdurcok(zv)borland(tec)cz>
Date: 26. marec 1998 16:48
Subject: *** Problem z D1 a D2 a nastavenim CharSet ***
Zdravim vsetkych priaznivcov Delphi
Na zaklade castich otazok ohladom Cestiny a Slovenciny v Delphi 1 a Delphi 2
s pouzitim win95 a NT by som vsetkym dat na vedomie ze uplne riesenie na tento problem sa bude
od buduceho tyzdna nachadzat v rubrike " nejcastejsi technicke otazky a odpovedi"
na nasej domovskej stranke www.borland(tec)cz .
S pozdravom
Ivan Turcan
Borland s.r.o.
E-Mail: iturcan(zv)borland(tec)cz
Informix
[*] Martin OCENAS <mocenas(zv)isternet.sk> - 27.3.1998 09:00:32
Tento prispevok sem sice velmi nepatri, ale predsa.
Robim program Delphi + Informix a potrebujem do databazy ulozit
proceduru, ktoru chcem napisat v Delphi. V Informixe so nic take ako
EXTERNAL PROCEDURE nenasiel. Nevie mi niekto poradit ?
Dik
S Pozdravom
Hasta la vista
Traktorista
Martin
Divne chovani programu z Delphi
[*] Martin Dupal <mdupal(zv)visionsw(tec)cz> - 27.3.1998 09:18:50
> 1)Programy ktere vytvorim (ale i cizi) maji v
> menu, ktere se zobrazi po kliknuti na ikonu spusteneho programu jenom
> polozky Obnovit, Min(Max)imalizovat,Zavrit. Ostatni Win programy tam
> maji dalsi polozky (Velikost,Presunot).
Povoleni ci zakazani polozek systemoveho menu urcuje nastaveni vlastnosti
BorderIcons a BorderStyle u TForm. Defaultni hodnoty zajisti pritomnost
vsech standardnich polozek.
> 2)Pokud Min/Maximalizuju Delphi program, okno jednoduse zmizi/objevi
> se zatimco ostatni programy tuto akci animuji (neozve se ani zvuk,
> ktery je s touto akci spojeny)
Tak predevsim: Problem vznika pouze pri minimalizaci a obnoveni z minima.
Pricina tohoto jevu vyplyva z principu, jaky pouzivaji Delphi pri
tvoreni formularu. Jde o to, ze okno aplikace (tj. to, ktere by se
melo animovat) je trvale skryto a jeho existenci dokazuje pouze
button na taskbaru. Prave tohle skryte okno dostane od systemu zpravu
o pozadavku na minimalizaci, resp. obnoveni a jeho reakce je mimo jine
ta, ze skryje, resp. ukaze vsechna zavisla okna, tj. viditelne formulare
projektu. Pri techto operacich samozrejme zadna animace neprobiha.
Castecnym resenim pri minimalizaci je odchytit zpravu WM_SYSCOMMAND
s parametrem SC_MINIMIZE, ktera prijde od systemu do aplikace a nejprve
zajistit minimalizaci hlavniho formu a teprve pak zavolat Application.Minimize.
Naopak pri obnoveni staci reagovat na udalost Application.OnRestore, ktera
se spusti po obnoveni okna aplikace a v ni poslat hlavnimu formu zpravu
WM_SYSCOMMAND s parametrem SC_RESTORE.
Toto reseni neni plnohodnotne v tom, ze animace smeruje vzdy do(z) jednoho mista
na taskbaru, protoze animujeme child okno a nikoliv aplikacni okno.
+----------------------------------+
| Ing. Martin Dupal |
| address: Geislerova 6 |
| Olomouc 2, 772 00 |
| Czech republic |
| tel.: +420/68/5313130 |
| fax.: +420/68/5313132 |
| http://www.visionsw(tec)cz |
| mailto:mdupal(zv)visionsw(tec)cz |
+----------------------------------+*** Problem z D3 a fonty ***
[*] RADIK(zv)p15.monet(tec)cz - 27.3.1998 09:34:00
Pripojim se do debaty. Mel jsem (uz nemam) nainstalovany Delphi 3 na NT4
a po nainstalovani SP3 mi prestala fungovat cestina v editoru zdrojaku.
A FONT BYL NASTAVEN SPRAVNE. Proste po SP3 se to rozjelo........
Ales
----------
Od: Ivan Tur�an
Komu: DELPHI Distribution List
P�edm�t: *** Problem z D3 a fonty ***
Datum: 27. b�ezen 1998 8:55
Hi All
Co sa tyka D3 a cestiny neni to zdaleka taky problem ako z D1,D2
staci vojst do tools\Enviroment option \display a nastavit font na
courier Ivan Turcan
Borland s.r.o. ----- P�vodn� zpr�va -----
Odes�latel: Ondrej Kelle < it(zv)nnsk.sk <mailto:it(zv)nnsk.sk> >
Komu: DELPHI Distribution List < delphi(zv)pinknet(tec)cz
<mailto:delphi(zv)pinknet(tec)cz> >
Datum: 27. b�ezna 1998 8:15
P�edm�t: Re: *** Problem z D1 a D2 a nastavenim CharSet ***
A Delphi 3 tam nebude? Nie je to nic strasne, len v Code Editore mam
namiesto slovenciny nejake hieroglyfy... Je to Delphi 3 Professional na
NT 4 SP3. Inak vysledne programy su o.k. (co sa tyka slovenciny) :).
Ak ste tuto temu uz na tomto fore prebrali, potom prosim o kopanec s
pripadnym riesenim na it(zv)nnsk.sk <mailto:it(zv)nnsk.sk> .
Vopred vdaka
Ondrej
-----Original Message-----
From: Ivan Tur�an < iturcan(zv)borland(tec)cz <mailto:iturcan(zv)borland(tec)cz> >
To: delphi(zv)pinknet(tec)cz <mailto:delphi(zv)pinknet(tec)cz> < delphi(zv)pinknet(tec)cz
<mailto:delphi(zv)pinknet(tec)cz> >
Cc: rkubat(zv)borland(tec)cz <mailto:rkubat(zv)borland(tec)cz> < rkubat(zv)borland(tec)cz
<mailto:rkubat(zv)borland(tec)cz> >; sdurcok(zv)borland(tec)cz
<mailto:sdurcok(zv)borland(tec)cz> < sdurcok(zv)borland(tec)cz
<mailto:sdurcok(zv)borland(tec)cz> >
Date: 26. marec 1998 16:48
Subject: *** Problem z D1 a D2 a nastavenim CharSet ***
Zdravim vsetkych priaznivcov Delphi
Na zaklade castich otazok ohladom Cestiny a Slovenciny v Delphi 1 a
Delphi 2
s pouzitim win95 a NT by som vsetkym dat na vedomie ze uplne riesenie na
tento problem sa bude
od buduceho tyzdna nachadzat v rubrike " nejcastejsi technicke otazky a
odpovedi"
na nasej domovskej stranke www.borland(tec)cz <http://www.borland(tec)cz> .
S pozdravom
Ivan Turcan
Borland s.r.o. E-Mail: iturcan(zv)borland(tec)cz <mailto:iturcan(zv)borland(tec)cz>
DB float
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 09:45:02
Ahoj,
co tak nastavit TCurrencyField.Precision na 2?
inak mozes pouzit TField.OnValidate alebo TDataSet.BeforePost skratka
predtym ako sa hodnota pola zapise do databazy mozes ju zaokruhlit tak ako
to potrebujes
Ondrej
-----Original Message-----
From: Martin Fron�k <fronek(zv)fic(tec)cz>
To: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Date: 27. marec 1998 8:58
Subject: RE: DB float
Diky,
nikdy v zivote, ani za nic, by me nenapadlo podivat se do helpu ;-)
no a ted vazne:
BCD je sice dobra myslenka, ale tento typ je podporovan pouze tabulkou
paradoxu, a ja potrebuju i Interbase.
Takze tudy cesta nevede....
Nejaky jiny napad ?
-----Original Message-----
From: Skacel Miloslav [SMTP:skacel(zv)kjsoft(tec)cz]
Sent: Thursday, March 26, 1998 2:59 PM
To: 'DELPHI Distribution List'
Subject: RE: DB float
>zkus se podivat do Helpu na TBCDField
>Milos
> ----------
>> Od: Martin Fron�k
> Odesl�no: 26. b�ezna 1998 13:09
> Komu: 'DELPHI Distribution List'
> P�edm�t: DB float
>
> Hi,
>
> Mam takovy maly problem:
>
> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
> (Kc) a prave na 2. Jenze
> datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by
> nevadilo, ale pri nekterych
> vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi
> jako x^-11 atp...
> takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ?
> Pouzivam data aware,
> takze nemohu ukladat cislo jako cele a pred pouzitim posunout
> desetinnou carku. Existuje
> jednoduche reseni ?
>
> Dekuji za vyslechnuti, radu, nezabiti......
>
> fronek(zv)fic(tec)cz
>Long strings
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 27.3.1998 09:49:24
DDV,
zkoumal nekdo jak se chova automaticka dealokace stringu v extremnich
pripadech?
Priklad:
thread pouzije nekolik promennych typu String a pak se vola ExitThread.
To asi zustane alokovany prostor pro text stringu viset na Heapu !?.
Zdravi
D. Toman
DBFLOAT
[*] tomas.mazurek(zv)vitkovice(tec)cz - 27.3.1998 10:07:18
Hello,
sveho casu jsem mel obdobne problemy pri souctovych operacich nad
paradoxovskymi tabulkami v Delphi 1.02... Konkretne:
Table1.FieldByName('AAA').AsFloat :=
Table1.FieldByName('AAA').AsFloat +
Table2.FieldByName('BBB').AsFloat;
AAA, BBB typu Currency
Zkouseli jsme nekolik variant ukladani dat, ale porad to nebylo
ono...
Problemy prestaly pote, co data ukladam takto:
Table1.FieldByName('AAA').AsString :=
FloatToStr(Table1.FieldByName('AAA').AsFloat +
Table2.FieldByName('BBB').AsFloat);
Pote se prestaly vyskytovat obcasne cisla v poslednich radech...
Ja vim, ze je to hrozne divne, ma-li nekdo jine reseni sem s nim...
Tomas
*** Problem z D3 a fonty ***
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 10:09:12
Mozno som prilis narocny, ale Courier pozna iba velkosti 10, 12 a 15. Uz 10 je na mna prilis velka... Ked tam skusam dat velkost 8 alebo 6 tak to jednoducho ignoruje a zostava tam 10.
Preto pouzivam Courier New (ten je TT), ten ale nezobrazuje slovencinu spravne. Zvlastne je, ze istu dobu mi to chodilo o.k. ale potom som cosi instaloval (mozno MS Office) a uz to nechodi.
Nie je to ziadny velky problem, uz som si zvykol...
-----Original Message-----
From: Ivan Tur�an <iturcan(zv)borland(tec)cz>
To: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Date: 27. marec 1998 9:11
Subject: *** Problem z D3 a fonty ***
Hi All
Co sa tyka D3 a cestiny neni to zdaleka taky problem ako z D1,D2
staci vojst do tools\Enviroment option \display a nastavit font na courier
Ivan Turcan
Borland s.r.o.
----- P�vodn� zpr�va -----
Odes�latel: Ondrej Kelle <it(zv)nnsk.sk>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 27. b�ezna 1998 8:15
P�edm�t: Re: *** Problem z D1 a D2 a nastavenim CharSet ***
A Delphi 3 tam nebude? Nie je to nic strasne, len v Code Editore mam namiesto slovenciny nejake hieroglyfy... Je to Delphi 3 Professional na NT 4 SP3. Inak vysledne programy su o.k. (co sa tyka slovenciny) :).
Ak ste tuto temu uz na tomto fore prebrali, potom prosim o kopanec s pripadnym riesenim na it(zv)nnsk.sk.
Vopred vdaka
Ondrej
DB float
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 10:23:14
Hi,
no to jo, ale podle helpu se toto tyka poze zobrazeni, nikoliv vypoctu...
-----Original Message-----
From: Ondrej Kelle [SMTP:it(zv)nnsk.sk]
Sent: Friday, March 27, 1998 9:45 AM
To: DELPHI Distribution List
Subject: Re: DB float
Ahoj,
co tak nastavit TCurrencyField.Precision na 2?
inak mozes pouzit TField.OnValidate alebo TDataSet.BeforePost skratka
predtym ako sa hodnota pola zapise do databazy mozes ju zaokruhlit tak ako
to potrebujes
Ondrej
-----Original Message-----
From: Martin Fron�k <fronek(zv)fic(tec)cz>
To: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Date: 27. marec 1998 8:58
Subject: RE: DB float
Diky,
nikdy v zivote, ani za nic, by me nenapadlo podivat se do helpu ;-)
no a ted vazne:
BCD je sice dobra myslenka, ale tento typ je podporovan pouze tabulkou
paradoxu, a ja potrebuju i Interbase.
Takze tudy cesta nevede....
Nejaky jiny napad ?
-----Original Message-----
From: Skacel Miloslav [SMTP:skacel(zv)kjsoft(tec)cz]
Sent: Thursday, March 26, 1998 2:59 PM
To: 'DELPHI Distribution List'
Subject: RE: DB float
>zkus se podivat do Helpu na TBCDField
>Milos
> ----------
>> Od: Martin Fron�k
> Odesl�no: 26. b�ezna 1998 13:09
> Komu: 'DELPHI Distribution List'
> P�edm�t: DB float
>
> Hi,
>
> Mam takovy maly problem:
>
> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
> (Kc) a prave na 2. Jenze
> datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by
> nevadilo, ale pri nekterych
> vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi
> jako x^-11 atp...
> takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ?
> Pouzivam data aware,
> takze nemohu ukladat cislo jako cele a pred pouzitim posunout
> desetinnou carku. Existuje
> jednoduche reseni ?
>
> Dekuji za vyslechnuti, radu, nezabiti......
>
> fronek(zv)fic(tec)cz
MS SQL 6.5
[*] TYSLIC(zv)BHAN-CE.MAIL602.CZ - 27.3.1998 10:58:16
Hi,
Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5. SQL
server jsem ziskal jako 120 trial verzi. Vsechno funguje OK. Jakmile jsem se
pokusil aplikaci prenest k zakaznikovi, tak SQL server u zakaznika nechce
zapisovat do pole typu IMAGE (hlasi general SQL error) ??? Zakaznik ma
nainstalovany BackOffice, ze by v BackOffice byla jina verze MSSQL? nebo
chyby nejaky patch?
Nevite jestli existuje nejaky PATCH na MSSQL 6.5 a pripadne kde je ke
stahnuti, pokusel jsem WWW microsoft, ale bez uspechu, odkazy jsou vetsinou
neplatne...
Za kazdy odkaz 1.000-cere diky
Bye 1.000
Zakaz mazani tabulek v No-well
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 27.3.1998 11:13:10
Mame v praci maly problem a potrebujem poradit.
Chceme uzivateli znemoznit primy zasah (mazani) v
adresari, kde jsou ulozene *.DB tabulky. Jenze nemuzem
dat adresari atribut jen na cteni, protoze BDE si vytvari
*.LCK soubory.
Pokud nekdo mel v Novellu podobny problem a vyresil ho, at
nam to laskave prozradi.
Dik
Softwarovy tym fy Eskon.
nedopil(zv)eskon(tec)cz
Menu
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 27.3.1998 11:19:55
Zdravim,
prosim o pomoc. Mam nasledujici problem. Ve sve aplikaci uchovavam v
menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
ktera se ma provest.
S pozdravem
Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava
Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
> Virtual Key codes
[*] kkwest <kkwest(zv)mbox.vol(tec)cz> - 27.3.1998 11:49:05
Ahoj vsichni delf�ni !
Mam takovito problem.Potrebuji predefinovat Virtual Key code na lavesu stisknutou spolecne se SHIFTem a nejak se mi to nedari.Jak mam rict , ze byli stisknuty dve klavesy najednou ? Potrebuji to predefinovat u jedne komponenty postavene na TEditu a klavesy odchytavam na udalost CNKeyDown(var Message:TWMKeyDown).
Marek
kkwest(zv)mbox.vol(tec)cz
Problem se zakladni tvorbou DBF bez indexoveho sou
[*] Pavel Muller <PAVEL.MULLER(zv)vslib(tec)cz> - 27.3.1998 11:55:29 met-1eet
Ahoj,
Mam problem s vytnorenim nove dabaze ve formatu (*.dbf), ktera se
tvori jako zcela novy soubor. Predevsim s definici indexu teto
databaze a naslednym ulozenim.
Pokud mi nekdo odpovi tak predem mnohokrat dekuji.
------------------------------------------------------------------
Pavel MULLER,
e-mailova adresa : pavel.muller(zv)vslib(tec)cz, pavel.muller(zv)post(tec)cz
tel. 048-5104964 (zamestnani)
tel. 048-5355609 (kolej)
WWW >> people.vslib(tec)cz/pavel.muller <<
------------------------------------------------------------------
MS SQL 6.5
[*] Radek Pospisil <suspi(zv)sh.cvut(tec)cz> - 27.3.1998 12:24:00
Na MS SQL Server 6.5 existuje service pack 4 ,ale nevim jestli resi uvedeny
problem.
Stahnou jej lze treba tady:
ftp://ftp.emwac(tec)cz/ftp.microsoft.com/bussys/sql/public/fixes/usa/SQL65/Sp4/S
P4Intel/65SP4X86.EXE
Bye
R.Pospisil
-----Original Message-----
From: TYSLIC(zv)BHAN-CE.MAIL602.CZ [mailto:TYSLIC(zv)BHAN-CE.MAIL602.CZ]
Sent: Friday, March 27, 1998 10:58 AM
To: delphi(zv)pinknet(tec)cz
Subject: MS SQL 6.5
Hi,
Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5. SQL
server jsem ziskal jako 120 trial verzi. Vsechno funguje OK. Jakmile jsem se
pokusil aplikaci prenest k zakaznikovi, tak SQL server u zakaznika nechce
zapisovat do pole typu IMAGE (hlasi general SQL error) ??? Zakaznik ma
nainstalovany BackOffice, ze by v BackOffice byla jina verze MSSQL? nebo
chyby nejaky patch?
Nevite jestli existuje nejaky PATCH na MSSQL 6.5 a pripadne kde je ke
stahnuti, pokusel jsem WWW microsoft, ale bez uspechu, odkazy jsou vetsinou
neplatne...
Za kazdy odkaz 1.000-cere diky
Bye 1.000
MS SQL 6.5
[*] <snajdr(zv)pvt(tec)net> - 27.3.1998 12:26:57
> Hi,
>
> Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5. SQL
> server jsem ziskal jako 120 trial verzi. Vsechno funguje OK. Jakmile jsem se
> pokusil aplikaci prenest k zakaznikovi, tak SQL server u zakaznika nechce
> zapisovat do pole typu IMAGE (hlasi general SQL error) ??? Zakaznik ma
> nainstalovany BackOffice, ze by v BackOffice byla jina verze MSSQL? nebo
> chyby nejaky patch?
> Nevite jestli existuje nejaky PATCH na MSSQL 6.5 a pripadne kde je ke
> stahnuti, pokusel jsem WWW microsoft, ale bez uspechu, odkazy jsou vetsinou
> neplatne...
>
> Za kazdy odkaz 1.000-cere diky
Existuji service packy pro MS SQL, ktere nejspise
najdete na ftp://ftp.microsoft.com/
adresar bussys a tak dal. Presne URL si nepamatuji.
S pozdravem
Petr Snajdr
MS SQL 6.5
[*] Alame <alame(zv)bigfoot(tec)com> - 27.3.1998 12:31:45
na SQL je uz Service Pack c.4 (pokud se nepletu), minimalne V3 je dobre
nainstalovat..
-----P�vodn� zpr�va-----
>Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5. SQL
>server jsem ziskal jako 120 trial verzi. Vsechno funguje OK. Jakmile jsem
se
>pokusil aplikaci prenest k zakaznikovi, tak SQL server u zakaznika nechce
>zapisovat do pole typu IMAGE (hlasi general SQL error) ??? Zakaznik ma
>nainstalovany BackOffice, ze by v BackOffice byla jina verze MSSQL? nebo
>chyby nejaky patch?
>Nevite jestli existuje nejaky PATCH na MSSQL 6.5 a pripadne kde je ke
>stahnuti, pokusel jsem WWW microsoft, ale bez uspechu, odkazy jsou vetsinou
>neplatne...
>
>Za kazdy odkaz 1.000-cere diky
>
>Bye 1.000
>promenna prihlaseneho uzivatele
[*] Alame <alame(zv)bigfoot(tec)com> - 27.3.1998 12:33:50
Hi all,
jak zjistit promennou prihlaseneho uzivatele, napr. ve formatu:
STANICE5/Administrator
nebo tak nejak..
Chci to zapisovat do DB, programem v Delphi pochopitelne, aby bylo jasne,
kdo provedl zmeny u daneho zaznamu v DB...
Funguje to jen na NT nebo to de i u W95 ???
Diky za tip.
M.Menu
[*] roman.palarcik(zv)spt(tec)cz - 27.3.98 12:36:53
TMenuItem.OnClick:=ProceduraCinnost;
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
--------------------------------------------------------
Zdravim,
prosim o pomoc. Mam nasledujici problem. Ve sve aplikaci uchovavam v
menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
ktera se ma provest.
S pozdravem
Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava
Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
> Menu
[*] V�t�zslav Gazda������u��n�?��? - 27.3.1998 12:39:47
Napriklad si muzes napsat takovou proceduru.
procedure TForm.EventClick(Sender:TObject);
begin
if (Sender is TMenuItem) then
OpenFile((Sender as TMenuItem).Hint);
end;
Proceduru OpenFile jsem si vymyslel a muze napriklad otevrit soubor.
a potom vsem dynamickym polozkam v menu budes pri vytvoreni nastavovat
udalost na tuto proceduru do vlastnosti Hint zapises celou cestu souboru:
oNewItem.OnClick := EventClick;
oNewItem.Hint := 'C:\Detlog.txt';
Vita
Long strings
[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 27.3.1998 12:48:26
Tento problem se tyka vsech automaticky vykonavanych operaci.
1. Dealokace Long Stringu
2. Veskere sekce finally .... end, ktere by se provedly, kdyby doslo k
exit ci raise
3. V pripade OLE objektu se to tyka automatickeho volani metody Release
pri likvidaci lokalnich referenci na OLE objekty. Ti mohou dokonce v
pameti zustat viset cele DLL knihovny (OLE servery)
Doufam, ze jsem vyjmenoval vsechny pripady.
System si s vetsinou dokaze poradit, ale tako BDE s tim ma nekdy docela
problemy.
J.Jahoda
> ----------
> From: Dalibor Toman[SMTP:dtoman(zv)lit(tec)czn(tec)cz]
> Reply To: DELPHI Distribution List
> Sent: 27. b�ezna 1998 9:49
> To: DELPHI Distribution List
> Subject: Long strings
>
> DDV,
>
> zkoumal nekdo jak se chova automaticka dealokace stringu v extremnich
> pripadech?
>
> Priklad:
> thread pouzije nekolik promennych typu String a pak se vola
> ExitThread.
> To asi zustane alokovany prostor pro text stringu viset na Heapu !?.
>
> Zdravi
> D. Toman
>
> Dlouhe nazvy
[*] TucekR(zv)p15.monet(tec)cz - 27.3.1998 13:05:00
Jak prevest dlouhe nazvy z Win95 na kratke a naopak
resp. fce mi vrati dlouhy nazev a ja chci kratky...
Je na to nejaka API fce ?
TRT
Menu
[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 27.3.1998 13:19:36
V unite menus mate funkce NewMenu, NewPopupMenu, NewSubMenu, NewItem a
NewLine.
funkce NewItem ma jako jeden parametr AOnClick: TNotifyEvent a sem staci
dat metodu a vse bude OK, ja to pouzivam docela bezne.
J.Jahoda
> ----------
> From: Krayzel Libor[SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Reply To: DELPHI Distribution List
> Sent: 27. b�ezna 1998 11:19
> To: '*** Delphi'
> Subject: Menu
>
> Zdravim,
>
> prosim o pomoc. Mam nasledujici problem. Ve sve aplikaci uchovavam v
> menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
> souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
> ktera se ma provest.
>
> S pozdravem
>
> Libor Krayzel
> Czech Television, Television Studio Ostrava
> Dvorakova 18
> 729 20 Ostrava
>
> Phone: (069) 6201 375
> E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> > Homepage: http://members.tripod.com/~sovtop
> > Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> > E-mail2: mailto:sovtop(zv)email(tec)cz
> >
> >
> Menu
[*] Pavel Kral <kral(zv)afx(tec)cz> - 27.3.1998 13:36:42
Dobry den,
deklarovat proceduru asi takto
TForm1 = class(TForm)
...
public
MenuItem1 : TMenuItem;
procedure ObsluznaProcedura( Sender: TObject);
...
end;
procedure TForm1.ObsluznaProcedura(Sender : TObject);
begin
... nejaka cinnost
end;
a po vytvoreni MenuItem1 priradit jeji udalosti OnClick obsluznou proceduru
takto.
MenuItem1.OnClick := ObsluznaProcedura;
Snad jsem Vam pomohl.
S pozdravem Pavel Kral, Jesenik
-----Original Message-----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
To: '*** Delphi' <delphi(zv)pinknet(tec)cz>
Date: 27. b�ezna 1998 12:15
Subject: Menu
>Zdravim,
>
>prosim o pomoc. Mam nasledujici problem. Ve sve aplikaci uchovavam v
>menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
>souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
>ktera se ma provest.
>
> S pozdravem
>
> Libor Krayzel
>Czech Television, Television Studio Ostrava
>Dvorakova 18
>729 20 Ostrava
>
>Phone: (069) 6201 375
>E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
>> Homepage: http://members.tripod.com/~sovtop
>> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
>> E-mail2: mailto:sovtop(zv)email(tec)cz
>>
>>
>
Menu
[*] Jozef Strn�dik <strnadik(zv)mrp.sk> - 27.3.1998 13:40:54
>menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
>souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
>ktera se ma provest.
Ja to robim priblizne takto:
var MenuItem: TMenuItem;
FileName: string;
begin
.
.
MenuItem := TMenuItem.Create(Self);
MenuItem.Caption := FileName;
MenuItem.OnClick := MenuItemClick;
// pridat vytvorene MenuItem na prislusne miesto volanim
Add(MenuItem);
end;
kde MenuItemClick je
procedure TForm1.MenuItemClick(Sender: TObject);
begin
if (Sender is TMenuItem) then
NejakaAkciaSoSuborom(TMenuItem(Sender).Caption);
end;Menu
[*] Martin Dupal <mdupal(zv)visionsw(tec)cz> - 27.3.1998 13:53:37
> prosim o pomoc. Mam nasledujici problem. Ve sve aplikaci uchovavam v
> menu naposledy otevrene soubory. Pridavam je tam dynamicky po otevreni
> souboru. Nevim ale, jak k temto pridanym polozkam nadefinovat cinnost,
> ktera se ma provest.
Nic nebrani priradit vlastnosti TMenuItem.OnClick metodu stejne jako v
dobe navrhu. Jen si tu metodu musis deklarovat rucne a musi mit shodne
parametry. Napr.:
private
procedure MenuOnClick_1(Sender: TObject);
implementation
...
MenuItem := TMenuItem.Create(ParentMenu);
MenuItem.Caption := 'polozka 1';
MenuItem.OnClick := MenuOnClick_1;
...
+----------------------------------+
| Ing. Martin Dupal |
| address: Geislerova 6 |
| Olomouc 2, 772 00 |
| Czech republic |
| tel.: +420/68/5313130 |
| fax.: +420/68/5313132 |
| http://www.visionsw(tec)cz |
| mailto:mdupal(zv)visionsw(tec)cz |
+----------------------------------+Virtual Key codes
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 14:02:24
Nie som si isty, ale mam dojem, ze by si mal skor pouzit
function DoKeyDown(var Message: TWMKey): Boolean; override;
Zdar
Ondrej
-----Original Message-----
From: kkwest <kkwest(zv)mbox.vol(tec)cz>
To: Konference DELPHI <delphi(zv)pinknet(tec)cz>
Date: 27. marec 1998 12:47
Subject: Virtual Key codes
>Ahoj vsichni delf�ni !
> Mam takovito problem.Potrebuji predefinovat Virtual Key code na lavesu
stisknutou spolecne se SHIFTem a nejak se mi to nedari.Jak mam rict , ze
byli stisknuty dve klavesy najednou ? Potrebuji to predefinovat u jedne
komponenty postavene na TEditu a klavesy odchytavam na udalost CNKeyDown(var
Message:TWMKeyDown).
>
> Marek
> kkwest(zv)mbox.vol(tec)cz
>Problem se zakladni tvorbou DBF bez indexoveho sou
[*] V�t�zslav Gazda������u��n�?��? - 27.3.1998 14:24:35
Nova DBF tabulka se vytvori procedurou CreateTable objektu TTable. Pred tim
se musi nastavit vlastnost TableType, TableName, struktura tabulky tj.
vlastnost FieldDefs a popripade i IndexDefs. Ale toto vsechno najdes i v
helpu.
Vita
DCOM
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 14:42:08
Hi All,
pouzivate nekdo DCOM k pristupu na SQL Server ??
jsou nejake vyhody oproti SQL Linkum ???
a co nevyhody ?
Diky.MS SQL 6.5
[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 27.3.1998 14:43:02
I pro SQL Server existuji Service Packy. Posledni lze najit na ftp.microsoft.com v adresari "/bussys/sql/public/fixes/usa/sql65/sp4/sp4intel". Pozor, ma asi 5MB. Dal�� informace o SQL jsou na www.microsoft.com/sql. Je to exe-soubor a staci ho snad jen pustit a pote restartovat server (radeji cely PC).
-----P�vodn� zpr�va-----
Od: TYSLIC(zv)BHAN-CE.MAIL602.CZ [SMTP:TYSLIC(zv)BHAN-CE.MAIL602.CZ]
Odesl�no: 27. b�ezna 1998 10:58
Komu: delphi(zv)pinknet(tec)cz
P�edm�t: MS SQL 6.5
Hi,
Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5. SQL
server jsem ziskal jako 120 trial verzi. Vsechno funguje OK. Jakmile jsem se
pokusil aplikaci prenest k zakaznikovi, tak SQL server u zakaznika nechce
zapisovat do pole typu IMAGE (hlasi general SQL error) ??? Zakaznik ma
nainstalovany BackOffice, ze by v BackOffice byla jina verze MSSQL? nebo
chyby nejaky patch20
Nevite jestli existuje nejaky PATCH na MSSQL 6.5 a pripadne kde je ke
stahnuti, pokusel jsem WWW microsoft, ale bez uspechu, odkazy jsou vetsinou
neplatne...
Za kazdy odkaz 1.000-cere diky
Bye 1.000
Virtual Key codes
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 15:09:23
Hi,
to ani neni treba, do funkce OnKeyDown dostavas krome VK taky sShiftState, takze si to tam precti, jestli je stiskuty shift, Ctrl, Alt....
A nejsou tady jenom "Delfini"
Builder je skvela vec, nijak te neomezuje........
Bye.
-----Original Message-----
From: kkwest [SMTP:kkwest(zv)mbox.vol(tec)cz]
Sent: Friday, March 27, 1998 11:49 AM
To: Konference DELPHI
Subject: Virtual Key codes
> Ahoj vsichni delf�ni !
> Mam takovito problem.Potrebuji predefinovat Virtual Key code na lavesu stisknutou spolecne se SHIFTem a nejak se mi to
>nedari.Jak mam rict , ze byli stisknuty dve klavesy najednou ? Potrebuji to predefinovat u jedne komponenty postavene na TEditu a
>klavesy odchytavam na udalost CNKeyDown(var Message:TWMKeyDown).
> Marek
> kkwest(zv)mbox.vol(tec)cz
promenna prihlaseneho uzivatele
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 15:11:05
Jde to vsude, je treba cist registry
ted to nemohu najit, kdyztak poslu zitra, Bye.
-----Original Message-----
From: Alame [SMTP:alame(zv)bigfoot.com]
Sent: Friday, March 27, 1998 12:34 PM
To: DELPHI Distribution List
Subject: promenna prihlaseneho uzivatele
Hi all,
jak zjistit promennou prihlaseneho uzivatele, napr. ve formatu:
STANICE5/Administrator
nebo tak nejak..
Chci to zapisovat do DB, programem v Delphi pochopitelne, aby bylo jasne,
kdo provedl zmeny u daneho zaznamu v DB...
Funguje to jen na NT nebo to de i u W95 ???
Diky za tip.
M.
promenna prihlaseneho uzivatele
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 27.3.1998 15:20:15
Uz jsem to nasel, ale je to v C++,
doufam ze prepis do Pascalu nebude problem (0x znamena HEX)
strcpy kopiruje druhy parametr do prvniho - neco jako prirazeni retezcu....
----------------------------cut------------------------------
TRegistry *reg;
.
.
.
reg = new TRegistry;
reg->RootKey = (HKEY) 0x80000002;
reg->OpenKey("System\\CurrentControlSet\\Control",false);
strcpy(vysl,reg->ReadString("Current User").c_str());
reg->CloseKey();
delete reg;
----------------------------cut------------------------------
fronek(zv)fic(tec)cz
-----Original Message-----
From: Alame [SMTP:alame(zv)bigfoot.com]
Sent: Friday, March 27, 1998 12:34 PM
To: DELPHI Distribution List
Subject: promenna prihlaseneho uzivatele
Hi all,
jak zjistit promennou prihlaseneho uzivatele, napr. ve formatu:
STANICE5/Administrator
nebo tak nejak..
Chci to zapisovat do DB, programem v Delphi pochopitelne, aby bylo jasne,
kdo provedl zmeny u daneho zaznamu v DB...
Funguje to jen na NT nebo to de i u W95 ???
Diky za tip.
M.
CreateProcess
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.3.1998 15:32:13
Ahoj all,
> narazil jsem na takovy problem. Odchytavam zpravy z command-line
> programu spousteneho z meho. Potrebuji pri tom cekat na vysledek. Ve
> W95 to funguje dobre, ale v NT to spolehlive zatuhava. Nevi nekdo
Sam se tazu, sam si odpovim. Koho by to zajimalo, necht si prostuduje
nasledujici funkci.
function Shell(AFile,AParam,ADir:string):integer;
var
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
s:string;
saAttr:TSecurityAttributes;
begin
Result:=-1;
FillChar(StartupInfo, SizeOf(TStartupInfo), 0);
with StartupInfo do
begin
cb := SizeOf(TStartupInfo);
dwFlags := STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK
or STARTF_USESTDHANDLES;
wShowWindow := SW_HIDE;
saAttr.nLength:=Sizeof(TSECURITYATTRIBUTES);
saAttr.bInheritHandle:=TRUE;
saAttr.lpSecurityDescriptor:=nil;
CreatePipe(hStdInput,hStdOutput,(zv)saAttr,102400);
end;
if CreateProcess(nil,PChar(AFile+' '+AParam),nil,nil,true,
NORMAL_PRIORITY_CLASS,nil,PChar(ADir),StartupInfo,ProcessInfo)
then
begin
WaitforSingleObjectEx(ProcessInfo.hProcess,INFINITE,false);
if not GetExitCodeProcess(ProcessInfo.hProcess,Result)
then Result:=GetLastError;
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
end;
with StartupInfo do
begin
SetLength(s,102400);
ReadFile(hStdInput,s[1],102400,l,nil);
...
SetLength(s,0);
CloseHandle(hStdInput);
CloseHandle(hStdOutput);
end;
end;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Menu
[*] Pavel Muller <PAVEL.MULLER(zv)vslib(tec)cz> - 27.3.1998 15:51:34 met-1eet
------------------------------------------------------------------
Pavel MULLER,
e-mailova adresa : pavel.muller(zv)vslib(tec)cz, pavel.muller(zv)post(tec)cz
tel. 048-5104964 (zamestnani)
tel. 048-5355609 (kolej)
WWW >> people.vslib(tec)cz/pavel.muller <<
------------------------------------------------------------------
Znovu Open Tools API
[*] Arthur <Arthur(zv)hlpsoft(tec)cz> - 27.3.1998 16:08:16
Diky za snahu, ale nejspis jsem se spatne vyjadril. Ja samozrejme vim, jak zabranit
ukladani vlastnosti, ale rad bych si nektere hodnoty ulozil mimo dfm, aby sly v
designu vyuzivat, ale aby se nelinkovaly v ramci dfm do exe.
Otazka znela, jak (a ja uz si vubec nejsem jisty ze to jde) v Delphi, v Design Time,
nejspise pomoci Close Tools API zjistim, ve kterem souboru je formular daneho jmena.
Momentalne to delam tak, ze si zjistim adresar projektu a do nej ulozim soubor
JmenoFormulare.MojePripona, protoze jmeno formulare musi byt v ramci projektu
jedinecne, ale bylo by rozhodne elegantnejsi tam mit Unit1.aaa nez Form1.aaa.
Arthur
=====================================
David Arthur Muzatko
HelpSoft, spol. s r. o.
Uruguayska 1, Praha 2
tel./fax.: 24255816, 90004272-5
e-mail: Arthur(zv)HlpSoft(tec)cz
=====================================
-----Original Message-----
From: Ondrej Kelle [SMTP:it(zv)nnsk.sk]
Sent: Friday, March 27, 1998 8:00 AM
To: DELPHI Distribution List
Subject: Re: Open Tools API
Dovolim si zacitovat Delphi Help:
You can control whether Delphi stores each of your components' properties.
By default, all properties in the published part of the class declaration
are stored. You can choose not to store a given property at all, or you can
designate a function that determines at runtime whether to store the
property.
>Budte zdravi
>Mam nasledujici problem, ktery se tyka Open Tools API:
>Mam komponentu, ktera potrebuje do dfm ulozit jenom polovinu informaci,
>ta druha polovina je dulezita jenom pro design (a je dost velka a v
programu nema co delat).
>Moje myslenka byla, ze si vytvori soubor, ktery bude dualni k *.dfm (treba
*.aaa) a do nej si to
>bude ukladat (kdyz ten soubor zmizne, tak se nic moc nedeje, proste o
>ty pomocne informace prisel). Bohuzel jsem jaksi neprisel na to, jak
>z komponenty zjistim v design-time soubor s formularem, na kterem je
>jeji instance (GetCurrentFile vraci obecne neco jineho a ja mam k
>dispozici pouze jmeno formulare (Owner.Name), pak seznam souboru s
formulari a
>nejak postradam (mozna to tam na me celou dobu koukalo, ale uz
>jsem z toho dost hotovej)-: mechanismus, ktery by mi rekl, ze
>tento formular je v tomto souboru.
>Informace jsem chtel nahravat na Loaded a ukladat na WriteState.
>
>Budu vdecny za radu. Diky Arthur.
>
>=====================================
>David Arthur Muzatko
>HelpSoft, spol. s r. o.
>Uruguayska 1, Praha 2
>tel./fax.: 24255816, 90004272-5
>e-mail: Arthur(zv)HlpSoft(tec)cz
>=====================================
>
>Zakaz mazani tabulek v No-well
[*] Ondrej Kelle <it(zv)nnsk.sk> - 27.3.1998 16:41:28
Niekde som cital ako obist vytvaranie *.lck suborov. dufam, ze si to pamatm
spravne:
1) Nechaj ten adresar read/write
2) Otvor tabulku napr. cez Database Desktop
3) Skopiruj si *.lck subory
4) Po zatvoreni tabulky BDE *.lck subory zmaze
5) Premenuj skopirovane *.lck subory na povodne mena
6) Zmen prava na adresar na read-only
Potom mozes otvarat tabulky v akomkolvek read-only adresari, napr. na CD
atd.
Dufam, ze je to spravne (neskusal som to)
Zdar
Ondrej
-----Original Message-----
From: Martin Nedopil <nedopil(zv)eskon(tec)cz>
To: Konference Delpi FORUM <delphi(zv)pinknet(tec)cz>
Date: 27. marec 1998 12:36
Subject: Zakaz mazani tabulek v No-well
>Mame v praci maly problem a potrebujem poradit.
>
>Chceme uzivateli znemoznit primy zasah (mazani) v
>adresari, kde jsou ulozene *.DB tabulky. Jenze nemuzem
>dat adresari atribut jen na cteni, protoze BDE si vytvari
>*.LCK soubory.
>
>Pokud nekdo mel v Novellu podobny problem a vyresil ho, at
>nam to laskave prozradi.
>
>Dik
>
>Softwarovy tym fy Eskon.
>
>nedopil(zv)eskon(tec)cz
>
>
>DCOM
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 27.3.1998 17:13:52
Haj hou!
>pouzivate nekdo DCOM k pristupu na SQL Server ??
Pouzivame DCOM k pristupu na Interbase :-)
>jsou nejake vyhody oproti SQL Linkum ???
Z tohohle jsem vyrozumel, ze ti nejde o DCOM, ale o MIDAS. Toz ten
nepouzivame, mame vlastni 3-tier O-R mapping via DCOM. Vyhod to ma mnoho
(alespon pro nas :-)
>a co nevyhody ?
U MIDASu jsou to predevsim:
1.) Cena
2.) Cena
3.) Klasicky fujtajblovy tabulkovy C/S pristup.
begin 666 Pavel Cisar.vcf
M0D5'24XZ5D-!4D0-"E9%4E-)3TXZ,BXQ#0I..D-I<V%R.U!A=F5L#0I&3CI0
M879E;"!#:7-A<(zv)T*3U)'.D%+5$E3(&$N<RX[4')O:F5C="!.15A54PT*5$E4
M3$4Z4U<(zv)9&5V96QO<&5R#0I!1%([5T]22SH[.TYA(%9A;&5N=&EN8V4(zv),3M0
M<F%G=64(zv)-3L[,34P(# P.T-Z96-H(%)E<'5B;&EC#0I,04)%3#M73U)+.T5.
M0T]$24Y'/5%53U1%1"U04DE.5$%"3$4Z3F$(zv)5F%L96YT:6YC92 Q/3!$/3!!
M4')A9W5E(#4(zv),34P(# P/3!$/3!!0WIE8V(zv)(zv)4F5P=6)L:6,-"D%$4CM(3TU%
M.CL[.U!R86=U93L[.T-Z96-H(%)E<'5B;&EC#0I,04)%3#M(3TU%.T5.0T]$
M24Y'/5%53U1%1"U04DE.5$%"3$4Z4')A9W5E/3!$/3!!0WIE8V(zv)(zv)4F5P=6)L
M:6,-"E523#H-"E523#IH='1P.B\O=W=W+F%K=&ES+F-Z#0I%34%)3#M04D5&
M.TE.5$523D54.G!C:7-A<D!A:W1I<RYC>(zv)T*4D56.C$Y.3(zv)P,S(W5#$V,3,U
/,EH-"D5.1#I60T%21 T*
`
end
Komponenta typu TMEMO
[*] Ales Berka <aberka(zv)usa(tec)net> - 27.3.1998 20:14:53
Lidicky, potrebuju pomoct.
Hledam komponentu podobnou TMEMU, (pripadne radu jak to s TMEMEM/TRICHEDITem udelat) kde
bych mohl mit na 1 radce pismena ruznych barev a fontu (staci stylu) a kde budu moct zjistovat
na kterym miste momentalne jsem (kurzor), kde je to naskrolovany atd. Dik moc
bye Aleq DB float
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 28.3.1998 05:51:55
Martin Fron�k wrote:
> samozrejme ze pouzivam TCurrencyField, asi jsem se nepresne
> vyjadril, omlouvam se. Nicmene, problem zustava....
>
> ..BCD nemohu pouzit, Interbase ho neumi...
Na takovehle pouzivam komponenty knihovny Orpheus, kde si primo
nastavim, kolik chci desetinnych mist a dal me to nepusti. To plati
ovsem pro vkladani a editaci.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
MS SQL 6.5
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 28.3.1998 05:51:52
TYSLIC(zv)bhan-ce.mail602(tec)cz wrote:
> Mam nasledujici problem. Mam rozepsanou aplikaci v D3 a MS SQL 6.5.
> ...
> server u zakaznika nechce zapisovat do pole typu IMAGE (hlasi
> general SQL error) ??? Zakaznik ma nainstalovany BackOffice, ze by v
Problem bude nepochybne v tom, ze zakaznik ma SP3.
BLOB I/O error, SP3 'Memo Too Large', General SQL Error: 7134
MS SQL Service Pack 3 ( SP3 ) breaks MSSQL SQL Links
BLOB I/O operations.
Using BLOB I/O an error, 'Memo Too Large' is returned.
The error is:
General SQL Error: 7134,
unmapped [text: text table and table reference by the
text pointer disagree.]
This is not a problem if the table does not contain a
unique index. In this case all BLOB information
is retrieved through the execution of the query.
Fix to MSSQL server is available from Microsoft:
ftp://ftp.microsoft.com/bussys/sql/transfer/sql265i.exe - Intel
ftp://ftp.microsoft.com/bussys/sql/transfer/sql265a.exe - Alpha
The password to use when extracting the files is "6.50.265" (without
the quotation marks).
To extract the syntax would be sql1265i.exe -s6.50.265
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
formaty souboru
[*] Pavel Kral <kral(zv)afx(tec)cz> - 28.3.1998 09:12:35
Zdravim,
byly tady dotazy na ukladani do RTF formatu. Nasel jsem na Delphi Deli
stranku, ktera obsahuje vsechny mozne formaty.
http://www.wotsit.demon.co.uk/
Dokumentace k RTF je ve Wordu a priklady jsou v C.
Pavel
Komponenta typu TMEMO
[*] Ales Berka <aberka(zv)usa(tec)net> - 28.3.1998 11:19:13
Omlouvam se, ale musim to jeste trochu zpresnit.
>Lidicky, potrebuju pomoct.
>Hledam komponentu podobnou TMEMU, (pripadne radu jak to s TMEMEM/TRICHEDITem udelat) kde
>bych mohl mit na 1 radce pismena ruznych barev a fontu (staci stylu) a kde budu moct zjistovat
>na kterym miste momentalne jsem (kurzor), kde je to naskrolovany atd. Dik moc
Ale musi to mit zdrojak. A jeste potrebuju do toho vecpat vic nez tech 32k. Uzasny je
syntaxmemo, jenze je to shareware bez zdrojaku.
kazdopadne dik
bye Aleq Vyhledavac veci okolo Delphi
[*] Ales Berka <aberka(zv)usa(tec)net> - 28.3.1998 11:24:13
Abych porad neco nechtel, tak zkuste
http://developers.href.com/HOME
je tam docela dobrej vyhledavac v newsech (delphiovych).
bye Aleq DBase a indexy
[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 28.3.1998 13:43:34
Ahoj Delphici,
mam databazi DBase IV a k ni vytvoreny indexovy soubor. Ja bych rad
pridal do databaze zaznam + index. Dela to napr. Delphi samo, nebo se to
dela nejakym carodejnickym kouskem ??
Diky za radu,
Peter Rus jr.
peterrus(zv)intesys(tec)cz
Skusenosti
[*] J�n Kuch�r <kuchar(zv)tuke.sk> - 28.3.1998 15:00:52
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Caute !
Mam asi tento problem. Potrebujem napisat program v D3 C/S, ktory by permanentne kontroloval okolie siete a hlavne uzivatelov, ktory sa snazia prihlasit na moj PC ( obdoba programu NETWACH vo Win ), ale v tejto oblasti som absolutny zaciatocnik a tak beriem vsetky rady ako na to. Potrebujem aby mi vzdy nahlasil, kdo sa snazi pripojit a dal mi sancu dotycnemu poslat spravu a odpojit ho.
Dik za vsetky rady
DCOM
[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 28.3.1998 16:58:17
Hi,
no, asi jsem se spatne vyjadril.
zajime me, jestli ma smysl pouzit konkretne MIDAS (potazmo DCOM) pro
pristup na Interbase. Jinou moznost nez tohle nebo SQL Link nemam. Diky.
fronek(zv)fic(tec)cz
Pavel Cisar wrote:
>
> Haj hou!
>
> >pouzivate nekdo DCOM k pristupu na SQL Server ??
>
> Pouzivame DCOM k pristupu na Interbase :-)
>
> >jsou nejake vyhody oproti SQL Linkum ???
>
> Z tohohle jsem vyrozumel, ze ti nejde o DCOM, ale o MIDAS. Toz ten
> nepouzivame, mame vlastni 3-tier O-R mapping via DCOM. Vyhod to ma mnoho
> (alespon pro nas :-)
>
> >a co nevyhody ?
>
> U MIDASu jsou to predevsim:
>
> 1.) Cena
> 2.) Cena
> 3.) Klasicky fujtajblovy tabulkovy C/S pristup.
>
> Name: Pavel Cisar.vcf
> Part 1.2 Type: unspecified type (application/octet-stream)
> Encoding: x-uuencode
obrazky v databazi
[*] Ing. Zdenek Sraier <sraierzd(zv)scretchy(tec)czech(tec)net> - 28.3.1998 21:16:11
Kdyby to bylo tak, jak pises, jak potom vysvetlis
pridani druheho obrazku - 1229 B => zvetseni o 8192 B.
A jak potom vysvetlis, ze kdyz to vkladam z clipboardu,
zabrane misto je jeste vetsi (viz puvodni zprava).
Podotykam, ze v TDBImage se obrazek zobrazuje porad stejne.
Zdenek
---------------------------------------------------------
: o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
>Paradox zadnou konverzi neprovadi, pouze u textu (Formated Memo),
>kdyz je nastaven atribut Transliterate, Coz se Vas asi netyka. Co je
>podstatne, je ze PARADOX ma radky ulozeny v tzv. blocich jejich
>delka je nasobkem 4096 (2^12). Z toho ty narusty velikosti
>5334->8192+4096=12288 Stejne jako pri ukladani do souboru ma system
>urcitou rezii (FAT16 vetsi nez FAT32 ci NTFS), tak i vsechny
>databaze museji mit nejakou rezii. Nekde by vsak melo jit nastavit
>velikost bloku na mensi velikost, ale nevim kde a co to prinese.
>Jake vubec ma paradox omezeni na pocet bloku v jednom MB, to nevim.
>
>J.Jahoda
>> Vsechny zdravim.
>> Pri praci s obrazky ukladanymi do Blob polozky v tabulce
>> typu pdox jsem narazil na zajimaji ukaz:
>> Do prazdne tabulky vlozim pres LoadFromFile BMP obrazek
>> veliky 5334 B - soubor *.MB se zvetsi z 4096 na 12288 B.
>> Pridam GIF obrazek 1229 B - soubor *.MB naroste na 20480 B.
>>
>> To uz samo o sobe mi vadi (v jakem formatu to je vlastne
>> ulozeno, je Blob, tak by mel data zachovat bez nejakych konverzi,
>> ne).
>>
>> Jeste zajimavejsi :)) je, ze kdyz totez udelam pres
>> clipboard (..assign(ClipBrd)), po prvnim obrazku ma *.MB
>> velikost 20480 a po druhem 36864 B. Proc ???
>>
>> Da se zabrane misto nejak minimalizovat ? Potrebuji
>> pracovat s velkym mnozstvim obrazku a velikost *.MB se
>> uz blizi 1 GB.Zakaz mazani tabulek v No-well
[*] Ing. Zdenek Sraier <sraierzd(zv)scretchy(tec)czech(tec)net> - 28.3.1998 23:46:04
Nechci byt valecny stvac, ale neni jednodussi poradne nastavit
prava na Novellu:
Adresar prava Read, File scan
Soubor Paradox.lck a Pdoxusrs.lck Read, Write, Create, Erase, ....
Zdenek
> Niekde som cital ako obist vytvaranie *.lck suborov. dufam, ze si to pamatm
> spravne:
> 1) Nechaj ten adresar read/write
> 2) Otvor tabulku napr. cez Database Desktop
> 3) Skopiruj si *.lck subory
> 4) Po zatvoreni tabulky BDE *.lck subory zmaze
> 5) Premenuj skopirovane *.lck subory na povodne mena
> 6) Zmen prava na adresar na read-only
>
> Potom mozes otvarat tabulky v akomkolvek read-only adresari, napr. na CD
> atd.
> Dufam, ze je to spravne (neskusal som to)
> Zdar
> Ondrej
>
> >Mame v praci maly problem a potrebujem poradit.
> >
> >Chceme uzivateli znemoznit primy zasah (mazani) v
> >adresari, kde jsou ulozene *.DB tabulky. Jenze nemuzem
> >dat adresari atribut jen na cteni, protoze BDE si vytvari
> >*.LCK soubory.
> >
> >Pokud nekdo mel v Novellu podobny problem a vyresil ho, at
> >nam to laskave prozradi.
> >
> >Dik
> >
> >Softwarovy tym fy Eskon.
> >
> >nedopil(zv)eskon(tec)cz
> >
> >
> >
>
>
---------------------------------------------------------
: o__o Zdenek Sraier sraierzd(zv)czn(tec)cz :
: ( o o) users(tec)czn(tec)cz/~sraierzd/ :
: (. .) Stranky Potapecske www.byll(tec)cz/scuba/ :
---------------------------------------------------------
ActiveXForm
[*] Milan �e�rdle <cecrdle(zv)km1.fjfi.cvut(tec)cz> - 29.3.1998 10:46:37
Pou��v�m Delphi 3.0.
Pokud vytvorim ActiveXForm do nehoz vlozim treba tlacitko a pomoci nastavem Web Deployment Option nastavim kam se ma presunou testovac� html a prelozena komponenta (nastaven� na Web Server). Pote pomoci volby Web Deploy vse presunu se na muj web server.
Pak spustim browser s testovac� html, ktera by mela spustit komponentu, dole na informacni radce se napise zprava instaluji komponentu, v browseru se objevi vyhrazene misto pro formular,ale v nem se objevi mala ikona s krizkem,kterz asi zmamena, ze se komponenta spatne nainstalova ci ji neco chybi.
Zkousel jak Internet Explorer 3.02,4.0 ,tak Netscape u ktereho nevim jestli podporuje ActiveX.
Pokud jste n�kdo vytvoril v Delphi 3 nejakou komponentu ActiveX, ktera bezela v browser tak mi napiste svoje zkusenosti.
Diky moc
Milan
RX Library
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.3.1998 13:16:56
Ahoj,
mam problem s instalaci RX Library na notebooku pod Delphi 2. Pod Delphi 1
mi to nechodi ani na jednom pocitaci, protoze se mi tam perou resource ID,
ale nemam cas hledat, ktery je duplicitni, ani to nepotrebuji. Ale chtel
bych to mit pod Delphi 2. Mam dva pocitace:
1. Stolni Intel Pentium 166 MHz, 64 MB RAM, normalni Windows 95 CZ
- tady to chodi bez problemu
2. Notebook Intel Pentium MMX 133 MHz, 64 MB RAM, Windows 95 CZ OSR-2
- tady to nechodi
Na velkem pocitaci to nainstaluji v pohode a kdyz prenesu DCL soubor
do notebooku, tak se Delphi spusti, ale misto aby namaloval listu
s komponentami, tak zatuhne cely Windows a musim udelat reset. Zkousel
jsem vsechno mozne, i jen cast nainstalovat, ale vzdy po instalaci,
kdyz to ma nakreslit listu, chcipne to. Nevim, jestli to neni temi
OSR-2. Nema nekdo podobnou zkusenost, pripadne napad, jak to resit?
Zkousel jsem verzi 2.32 i 2.40, obe to delaji a to v kazdem z tech
tri registracnich souboru. Takze snad bude chyba nekde v jednom
z pomocnych souboru (vclutils, dbutils apod.)?
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================Je nebo neni cesky generator tiskovych sestav drah
[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 29.3.1998 15:20:17
>>MF:
---------------------
>>co pro me znamena tak drahe ?
>>vzhledem k tomu, ze nepouzivam builder k obzive, ale k obcasnemu tvoreni
>>pro zname (rovnez bez velkych prijmu), tak drahe znamena nad 1000,- Kc.
>>Myslim, ze kdy jste udrzovali tuto cenovou hladinu, bylo by vice
>>kupujicich a mene zlodeju. Ostatne to plati o vetsine SW na nasem trhu.
---------------------
>��� Vase predstavy pane Martine jsou ponekud naivni. T�m V�s nechci
> rozhodn� ani trochu
>urazit nebo zesmesnit. Kdyz jsme pred tremi roky zac�nali, meli jsme
>uplne stejne
>naivn� a� hloup� predstavy o obchodu. Byl jsem to pr�ve j�, kdo hl�sal,
>ze komponenty
>mus� st�t maximalne do tis�ce Kc, aby si je mohl koupit kazdy. A prave
Mozna ze jsou moje predstavy naivni, ale nemam duvod se urazet. Jsou to jen predstavy.
Byla by to ale krasna realita.....
>tato moje predstava
>paradoxne zpusobila, ze se zpocatku generator siril velmi pomalu. Pritom
>to bylo v dobe, kdy
>generator byl nejvice potreba, protoze neexistovalo jeste nic jineho.
>Nebudete tomu mazna
>verit, ale prave nizka cena znemoznila siroky prodej generatoru.
>Distributori se s nami odmitali bavit. I pri 50% ucasti se jim
>nevyplatilo ani posilat zajemcum diskety,
>natoz delat nejakou reklamni akci. Vsichni se nam vysmali. Jediny
Velci distributori jsou a vzdycky budou obchodnici - to znamena rejzovaci penez.
>inzerat v odbornem
>casopise stal od 50 000,- do 100 000,- Kc. Inzeraty byly pri techto
>cenach naprosto
>neefektni a prodelecne.
Inzeraty jsou drahe, s tim nic udelat nelze... Ale jsou i jine zpusoby,
jak o sobe dat vedet. Napriklad bylo mozne uvolnit omezene funkcni verzi
do vsech dostupnych distribucnich kanalu s tim, ze plne funkcni verze je
dostupna tam a tam za tolik a tolik.....
>Byli jsme zklamani ze sveta byznysu -
Ja take...
>a pomalu jsme se museli
>priz�sobit. Nakonec jsme sehnali jedineho solidniho partnera Apro -
>Praha, ale museli jsme
>po dlouh�ch jednanich zvysit cenu, aby byl prodej rentabiln�. Stratili
>jsme rok casu a nemeli penize
>na dalsi praci.
>I dnes se ukazuje, �e o gener�toru sestav mnoho program�toru st�le nev�.
-----------------------------
To je svata pravda, ja sam jsem se o nem dozvedel az na WWW.borand(tec)cz - ale
nepodival jsem se na odkaz hned. Az kdyz jste rozeslal do konference svoji reklamu.>Knihovna je jiz velice
>rozs�hl� a jej� v�voj stoj� pen�ze. Mnoz� by si p��li rychlejs� inovaci,
>ale z �eho platit v�ce
>program�toru?
Z ceho je asi placen vyvoj napr. RXLib ??? A ostatnich komponent (DSP, Torry, ...)
Myslim ze RX je skvela knihovna, i kdyz je cilem autoru (zrejme) prezentovat se a ziskat
velmi dobre placena zamestnani u producentu SW...
>Mnoho si slibujeme od Internetu. Ovsem provozovat server
>na pevn� lince jako
>je www.sinea(tec)cz stoj� nemal� pen�ze. Informace jsou proste velmi drahe a
>cenne.
Od Internetu si slibujete mnoho PRAVEM. Napriklad by bylo mozne umistit na server
komponenty v kodovanem souboru ZIP a kazdy by si je mohl stahnout = nulove naklady
na distribuci (nepocitame-li provoz serveru,...) ale urcite je to nizsi castka, nez
jakou platite "velkym" distributorum. A pak si zajemce zaplati u Vas ziskani hesla.
�
>��� To, ze generator stale zije a ze nejmene jednou za rok prichazime s
>novou verzi, je mozne predevs�m
>diky obetave praci pana Krmeli a nekolika dalsich nadsencu, kteri bez
>vidiny dobr�ch honor���
>ne�navn� pracuj� na tomto d�le - po noc�ch i o sobot�ch a nedelich.
Mate moji uctu - bez privlastku. Mnohdy po nocich pracuji na SW i ja.
>Mozn� si ani neuvedomujete jak
>obrovsk� mnozstv� pr�ce za gener�torem sestav uz stoj�.
Uvedomuji, viz vyse.
>M�me nesrovnatelne mens� trh a nepomerne
>hors� podm�nky ne� kolegov� pracuj�c� na QuickReportu a p�itom se
>gener�tor sestav ve srovn�n� s
>QuickReport-em nemus� vubec stydet. Mnozi nasi zakoznici cesky generator
>tiskovych sestav
>povazuji za lepsi.
Stahnul jsem si free verzi, nainstaluji, vyzkousim, posoudim.
Ale potrebuji JEN vystup ve znakove forme pro jehlicky.
---------
>>Nejsme na tom tak aby SW stal 1/10 mesicniho prijmu, spis stoji 1/2
>>rocniho.... Bye.
---------
>��� Tady opravdu nevim, za jak velkou cast programatoru mluvite.
Myslim ze za velkou, oni ti "mali" (jako ja) nejsou moc videt. Ale neni
malych a velkych. Jsou jenom dobri a spatni.
>Jsou tez velke firmy s mnoha programatory
>a pritom kupuji stejny generator za stejnou cenu. Mezi nase zakazniky
>patri banky, ministersva, CEZ,
Ti si to mohou dovolit - a s prehledem. Kupuji ale presne tolik licenci,
kolik potrebuji ?
>obchodni domy, firmy s mnohamilionovymi obraty. Predstava, ze uhlidame
>pocty zakoupenych licenci byla
>stejne naivni.
Hlidat toto, je jako hlidat pytel blech.
>Kdo chce krast, nezaplati ani 1 000,- Kc, ani 1,- Kc.
>Moralka nasich lidi a firem je stale takova.
>S tim asi� moc nezmuzeme - ani ja ani vy.
Mohu prohlasit, ze ja SW KUPUJU. Kazdy musi zacit sam u sebe.
Jsem proto naivni kdyz kupuju to co mohu ukrast - a nebyl by to velky problem ?
�
>Programatorum jako jste Vy jsme vysli maximalne vstric, kdyz jsme
>uvolnili verzi pro Delphi 1 a Delphi 2
>ke zcela bezplatnemu pouzivani. Pritom obe verze stale vyvijime a na
>serveru se nachazeji v nejnovejsi
>podobe. Srovnejte tento nas pritup s pristupem Borlandu a s jejich
>upgrade politikou. Jestlize ma nekdo
>penize na zakoupeni nove verze Delphi 3 za 60 000,- nebo za 85 000,- Kc
>(SQL), pak ho castka
>az 30 x mensi urcite neporazi.
Ja osobne si mohu dovolit koupit jen verzi Standart (Builder) a to na
ni musim setrit.
Cenova politika firmy Borland je opravdu nechutna. I co do obsahu jednotlivych
verzi (Std, Pro, C/S). Asi presne vedi, co delaji a co kdo potrebuje.
Praji jako spravce site - bohuzel v podniku, ktery
poskytuje sluzby zemedelcum. Muj prijem neni velky, ale kdybych chtel vetsi,
musel bych dojizdet do Prahy. Pak ale nebudu mit zadny volny cas.
>Pokud mate nejaky pouzitelny napad jak situaci resit, budu velice rad.
>Muzeme se o tom bavit
Jestli je muj navrh pouzitelny (PRO VAS), to nevim ale vyse zminovane
umisteni SW na WWW v ZIPu je dobra myslenka (ne moje, pouzivaji to i jini).
�
>Zatim s pozdravem
>Jaro.
I ja Vas zdravim, a preji Vam aby se o Vas vic vedelo.�
� _____ �
>�SINEA software������������������������������� telefon:�� 0446/612468
>�Ing. Jaroslav Skerik������������������������� e-mail: sinea(zv)sinea(tec)cz�
>�Tylova 957���������������������������������������� privat:���
>jaro(zv)sinea(tec)cz
>�564 01� ZAMBERK������������������������� http://www.sinea(tec)cz/
� _____ �
Martin Fronek
Je nebo neni cesky generator tiskovych sestav drah
[*] �ke��k Jaroslav�������6�����̿ - 29.3.1998 19:14:43
Zdravim a dekuji za Vasi odpoved
>>Pokud mate nejaky pouzitelny napad jak situaci resit, budu velice rad.
>>Muzeme se o tom bavit
>
>Jestli je muj navrh pouzitelny (PRO VAS), to nevim ale vyse zminovane
>umisteni SW na WWW v ZIPu je dobra myslenka (ne moje, pouzivaji to i jini).
----
Na nasem serveru www.sinea(tec)cz je od konce roku 97 umisteno plno software ve
forme zip souboru
ke stazeni. Vetsina komponent a knihoven je ke stazeni zcela zadarmo a to i
pro Delphi 3.
Borland nam uz nejakou dobu slibuje zarazeni odkazu ze sveho www.borland(tec)cz
na nas server,
ale bohuzel zatim se tak nestalo. Mimochodem nasi Borlandi chteji za ty
sluzby 1 000,- Kc mesicne.
-----
>
>>Zatim s pozdravem
>>Jaro.
>
>
>I ja Vas zdravim, a preji Vam aby se o Vas vic vedelo.
----
Dekuji
Jaro
Active X
[*] Josef Dodek student <xdodek(zv)feld.cvut(tec)cz> - 29.3.1998 20:57:38 met-1mest
Zdravim vsechny,
Muze mi prosim nekdo strucne vysvetlit co je ActiveX, jak se
komponenty ActiveX lisi od ostatnich a tak ....
predem diky
Pepa Dodek
Je nebo neni cesky generator tiskovych sestav drah
[*] �ke��k Jaroslav�������6�����̿ - 29.3.1998 22:07:44
>*****
>Stahnul jsem si free verzi, nainstaluji, vyzkousim, posoudim.
>Ale potrebuji JEN vystup ve znakove forme pro jehlicky.
>*****
Zdravim
Omlouvam se, zapomnel jsem odpovedet na dulezitou zadost.
Myslim, ze tahle informace muze byt zajimava pro vice Delphi-silencu.
----------------------------------------------------------------------------
-----------------
Komponentu pro znakovy tisk mohu poskytnout komukoliv bezplatne
vcetne zdroju, popisu a prikladu pouziti!
----------------------------------------------------------------------------
----------------
Jedna se o zjednodusenou komponentu s omezenou sadou funkci.
Na bezne sestavy vsak staci. Od pristi verze, kterou potichu planujeme
na podzim, bude znakovy tisk soucasti generatoru sestav, tedy zakladni
komponenty Sestavy! Tim ziska znakovy tisk vsechny prednosti grafickeho
generatoru - ovsem krome grafiky.
Znakovy tisk resi velmi rychly vystup v tzv. draft rezimu smerovanim tisku
primo
na port tiskarny podobne jako to delaji programy DOS. Jehlickove tiskarny se
neprepinaji
do grafickeho rezimu a tudiz nepisti a tisknou rychle. Rychlejsi tisk je
ovsem i na
bublinkach. Chybi tomu jenom grafika. Kdyz vsak tisknete sestavu mzdov�ch
listu
pro 800 zamestnancu, tak vam ta grafika muze byt ukradena, ze?
Pro ty, kdo nemohou cekat az do podzimu jsme tedy vydali docasnou
samostatnou komponentu. Jeji vyvoj vsak nebude dale pokracovat,
protoze jak jsem uvedl dojde k jej� integraci do grafickeho generatoru!
Bude-li dostatecny zajem, umistim komponentu na nas server www.sinea(tec)cz
Nebo piste na moji dresu jaro(zv)sinea(tec)cz
Komponenta obsahuje zdroj pro vsechny 3 verze Delphi!
Jsem ochoten pustit tuto komponentu do sveta vcetne zdroju, ale prosim
nechtejte po nas jeji dalsi upravy. Soustredime se nyni jiz na dalsi verzi
generatoru sestav, ktera bude mit znakovy rychly tisk zabudovan v sobe.
Jaro
---------------------------------------------------------
SINEA software telefon: 0446/612468
Ing. Jaroslav Skerik e-mail: sinea(zv)sinea(tec)cz
Tylova 957 privat: jaro(zv)sinea(tec)cz
564 01 ZAMBERK http://www.sinea(tec)cz/
Seznam pocitacu
[*] Ales Zeleny <zelenya(zv)mlp(tec)cz> - 30.3.1998 01:32:59
DDV, potrebuji si umet vyrobit seznam okolnich pocitacu, tusim
nejakou osklivost jako fci NetServerEnum, ale opravdu se tim nechci
moc louskat, nema to prosim nekdo napsane, ebo nejaky exapmlik?
Diki.+------------------------+ +---------------------------+
|Ales Zeleny OK1UUE| |Ales Zeleny OK1UUE|
|Mestska knihovna v Praze| |Municipal Library of Prague|
|Marianske nam. 1 | |Marianske nam. 1 |
|115 72 | |115 72 |
| | | |
|Tel.: (420)(2)22113 452 | |Tel.: (420)(2) 22113 452 |
|E-mail:zelenya(zv)mlp(tec)cz | |E-mail:zelenya(zv)mlp(tec)cz |
|MIME: ISO-8859-2 OK! | |MIME: ISO-8859-2 OK! |
+------------------------+ +---------------------------+
Multitasking, to je kdyz se aplikace mohou hroutit paralelne.
Multitasking means that applications can crash simultaneously.Link
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 30.3.1998 07:56:02
Zdravim,
chtel bych v dialogu About vytvorit kliknutelny link na svou e-mailvovu
adresu. Lze to prostredky Delphi, nebo je treba nejakak komponenta?
Dekuji.
S pozdravem
Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava
Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
> Zakaz mazani tabulek v No-well
[*] Pavel Zichovsky <jesnem(zv)ova.pvtnet(tec)cz> - 30.3.1998 08:15:00
> Nechci byt valecny stvac, ale neni jednodussi poradne nastavit
> prava na Novellu:
> Adresar prava Read, File scan
> Soubor Paradox.lck a Pdoxusrs.lck Read, Write, Create, Erase, ....
Ano, ale ty soubory *.lck tam jsou jen kdyz je databaze otevrena,
jinak se automaticky mazou. Jak chcete nastavit prava k neexistujicim
souborum??? v NW3.11 to urcite nejde (a divil bych se, kdyby to slo
ve vyssich verzich)
S pozdravem
Pavel "Zizi" Zichovsky <jesnem(zv)ova.pvtnet(tec)cz>
----------------------------
PGP podporovano a vitano
Link
[*] Pavel Kral <kral(zv)afx(tec)cz> - 30.3.1998 08:56:12
Zdravim,
Na DSP je komponenta, jmenuje se GOTOWEB
Pavel
-----Original Message-----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
To: '*** Delphi' <delphi(zv)pinknet(tec)cz>
Date: 30. b�ezna 1998 7:57
Subject: Link
>Zdravim,
>
>chtel bych v dialogu About vytvorit kliknutelny link na svou e-mailvovu
>adresu. Lze to prostredky Delphi, nebo je treba nejakak komponenta?
>Dekuji.
>
> S pozdravem
>
> Libor Krayzel
>Czech Television, Television Studio Ostrava
>Dvorakova 18
>729 20 Ostrava
>
>Phone: (069) 6201 375
>E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
>> Homepage: http://members.tripod.com/~sovtop
>> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
>> E-mail2: mailto:sovtop(zv)email(tec)cz
>>
>>
>
promenna prihlaseneho uzivatele
[*] Ondrej Kelle <it(zv)nnsk.sk> - 30.3.1998 08:58:56
Zdar,
dival som sa do Registry cez Regedit32 a v
HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control som nasiel premennu
CurrentUser s hodnotou "USERNAME"... Mam NT 4 SP3...
Inak si myslim, ze je celkom vhodne pouzit API GetUserName.
-----Original Message-----
From: Martin Fron�k <fronek(zv)fic(tec)cz>
To: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Date: 28. marec 1998 5:35
Subject: RE: promenna prihlaseneho uzivatele
>Uz jsem to nasel, ale je to v C++,
>
>doufam ze prepis do Pascalu nebude problem (0x znamena HEX)
>strcpy kopiruje druhy parametr do prvniho - neco jako prirazeni retezcu....
>
>
>----------------------------cut------------------------------
>TRegistry *reg;
>.
>.
>.
>reg = new TRegistry;
>reg->RootKey = (HKEY) 0x80000002;
>reg->OpenKey("System\\CurrentControlSet\\Control",false);
>strcpy(vysl,reg->ReadString("Current User").c_str());
>reg->CloseKey();
>delete reg;
>----------------------------cut------------------------------
>
>fronek(zv)fic(tec)cz
>
>-----Original Message-----
>From: Alame [SMTP:alame(zv)bigfoot.com]
>Sent: Friday, March 27, 1998 12:34 PM
>To: DELPHI Distribution List
>Subject: promenna prihlaseneho uzivatele
>
>Hi all,
>
>jak zjistit promennou prihlaseneho uzivatele, napr. ve formatu:
>
>STANICE5/Administrator
>
>nebo tak nejak..
>
>Chci to zapisovat do DB, programem v Delphi pochopitelne, aby bylo jasne,
>kdo provedl zmeny u daneho zaznamu v DB...
>
>Funguje to jen na NT nebo to de i u W95 ???
>
>
>Diky za tip.
>
>M.Seznam pocitacu
[*] Michal ��ek���J֫Ŭ?��e���n� - 30.3.1998 09:01:24
> DDV, potrebuji si umet vyrobit seznam okolnich pocitacu, tusim
> nejakou osklivost jako fci NetServerEnum, ale opravdu se tim nechci
> moc louskat, nema to prosim nekdo napsane, ebo nejaky exapmlik?
Pred casem jsem resil neco podobneho a Michal Leinweber
<M.Leinweber(zv)sh.cvut(tec)cz>
mi poslal tenhle priklad, zkus se na to mrknout. Je tam sice par chybicek,
ktere musis
opravit, ale kdyz jsem to zvladl ja tak to dokazes taky. Ja jsem to uz dost
zmenil, na
ukor prehlednosti, takze by ti to uz asi nic nereklo. Jestli ti to ale
nepujde klidne se ozvi.
V helpu se podivej na API funkci WNetEnumResource a pomoci ni se rekurzivne
prochazi celym stromem Provider/Skupiny/Pocitace/Sdileni
Tady to je priklad rekurzivni procedury ktera projde celym stromem. Ty ji
asi nebudes potrebovat jako rekurzivni takze si ji patricne upravis
(doufam):
procedure RecurServer(Parent: PNETRESOURCE);
var
ResSize : integer;
NetRes : packed array[0..4] of TNETRESOURCE;
Res: integer;
begin
Res := WNetOpenEnum(RESOURCE_GLOBALNET, RESOURCETYPE_ANY,
{RESOURCEUSAGE_CONNECTABLE+}RESOURCEUSAGE_CONTAINER,
Parent, H);
if Res = 0 then begin
repeat
ResSize := SizeOf(NetRes);
Res := WNetEnumResourceA(H, Num, (zv)NetRes, ResSize);
if Res <> ERROR_NO_MORE_ITEMS then begin
for I:=0 to Num-1 do begin
if NetRes[I].dwDisplayType = RESOURCEDISPLAYTYPE_SERVER then
begin
IM.Name := NetRes[I].lpRemoteName;
end;
if NetRes[I].dwUsage and RESOURCEUSAGE_CONTAINER <> 0 then
RecurServer((zv)NetRes[I]);
end;
end;
until Res <> NO_ERROR;
Res := WNetCloseEnum(H);
end;
end;
A funkci zavolas "RecurServer(nil);" a ona rekurzivne projde vsechny
pocitace
school : rtn. Michal Cizek
Chodska 17A
Brno 12
612 00
tel. : 05 4118 3711
e-mail: Starxax(zv)molly.vabo(tec)cz
homepage: www.mujweb(tec)cz/www/starxax
home : Labska Kotlina 1008
Hradec Kralove
500 00
tel.: 049 398 342
Link
[*] Jozef Strn�dik <strnadik(zv)mrp.sk> - 30.3.1998 09:06:17
>chtel bych v dialogu About vytvorit kliknutelny link na svou e-mailvovu
>adresu. Lze to prostredky Delphi, nebo je treba nejakak komponenta?
Ja pouzivam TGoToWeb ver. 2.1 od CRESTO Sylvain. Stiahol som ho z DSP. Je
freeware a je aj so zdrojakom. Ma property EMail a funkciu SendEMail.
V metode OnClick labelu s tvojou emailovou adresou staci nastavit property a
zavolat funkciu.
RX Library
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.3.1998 09:49:34
Petr Zahradnik wrote:
> > mam problem s instalaci RX Library na notebooku pod Delphi 2. Pod Delphi 1
> > bych to mit pod Delphi 2. Mam dva pocitace:
>
> druhou, zase to chodilo. Treti... No a kdyz jsem pridal ctvrtou, tak
> to nechodilo. Tak jsem misto te posledni dal jinou, ale take to
> nechodilo. Takze jsem zjistil, ze to je tou ctvrtou komponentou.
> ...
> mohl bych tak 10 komponent vyhazet, ale to je stale malo na RX
> Library... kurnik.
To je jasne - jedna se o pomstu Borlandu tem nepoctivym
programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
dva pocitace. :-))
Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
Wokna na noteboocich...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Je nebo neni cesky generator tiskovych sestav drah
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.3.1998 09:49:34
Martin Fron�k wrote:
> >>MF:
> ---------------------
> >>pro zname (rovnez bez velkych prijmu), tak drahe znamena nad 1000,- Kc.
> ---------------------
>
> >��� Vase predstavy pane Martine jsou ponekud naivni. T�m V�s nechci
> > rozhodn� ani trochu
> >urazit nebo zesmesnit. Kdyz jsme pred tremi roky zac�nali, meli jsme
> >uplne stejne
> >naivn� a� hloup� predstavy o obchodu. Byl jsem to pr�ve j�, kdo hl�sal,
> >ze komponenty
> >mus� st�t maximalne do tis�ce Kc, aby si je mohl koupit kazdy. A prave
>
> Mozna ze jsou moje predstavy naivni, ale nemam duvod se urazet. Jsou
> to jen predstavy.
>
> Byla by to ale krasna realita.....
Bohuzel musim dat za pravdu lidem z firmy Sinea. Mne by se take vice
libily nizke ceny, ale kdyz chci sam prodat a nezemrit pritom hlady,
nemam s cenou pod 1000,- v podstate sanci. To by nas trh musel byt
tak 20x vetsi a bez konkurence.
> Myslim ze za velkou, oni ti "mali" (jako ja) nejsou moc videt. Ale
> neni malych a velkych. Jsou jenom dobri a spatni.
:-)))) Jsou programatori schopni si na to vydelat, a jsou
programatori neschopni si na to vydelat. Myslim, ze toto je daleko
presnejsi meritko pro dobre a spatne programatory. Ono to neni jen v
tom, co programator umi vytvorit, ale i (predevsim) jak to umi
prodat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Link
[*] V�t�zslav Gazda������u��n�?��? - 30.3.1998 09:54:41
Kdysi jsem se tady ptal na otazku, ktera s timto dost souvisi. Dostal jsem
odpoved, takze po mensi uprave ji posilam dal:
Ur�it� na to existuje spoustu komponent, ale jde to udelat velice jednoduse
i pomoci normalniho Labelu. Staci do udalosti OnClick Labelu vlozit toto:
ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil, SW_SHOWNORMAL);
Vita
Dlouhe nazvy
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 30.3.1998 09:58:12
-----Original Message-----
From: TucekR(zv)p15.monet(tec)cz <TucekR(zv)p15.monet(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Date: 28. b�ezna 1998 04:55
Subject: Dlouhe nazvy
>Jak prevest dlouhe nazvy z Win95 na kratke a naopak
>resp. fce mi vrati dlouhy nazev a ja chci kratky...
>
>Je na to nejaka API fce ?
podivej se k helpu pro FindFirst
RX Library
[*] VOLTRR1(zv)epr1.ccmail.x400.cez(tec)cz - ar 1998 10:07:00 -0700
Mam za to ze licence na Delphi zni - jako kniha - tzn. libovolny pocet pocitacu
pokud pouzivam pouze jeden z nich
Radek
-----Puvodni zprava-----
Od: Internet:delphi-request(zv)io.pinknet(tec)cz/
Odeslano: 30. boezna 1998 9:54
Komu: Internet:delphi(zv)pinknet(tec)cz/
Poedmit: Re: RX Library
Petr Zahradnik wrote:
> > mam problem s instalaci RX Library na notebooku pod Delphi 2. Pod Delphi 1
> > bych to mit pod Delphi 2. Mam dva pocitace:
>
> druhou, zase to chodilo. Treti... No a kdyz jsem pridal ctvrtou, tak
> to nechodilo. Tak jsem misto te posledni dal jinou, ale take to
> nechodilo. Takze jsem zjistil, ze to je tou ctvrtou komponentou.
> ...
> mohl bych tak 10 komponent vyhazet, ale to je stale malo na RX
> Library... kurnik.
To je jasne - jedna se o pomstu Borlandu tem nepoctivym
programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
dva pocitace. :-))
Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
Wokna na noteboocich...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
<<Soubor: TXT1.TXT>> promenna prihlaseneho uzivatele
[*] V�t�zslav Gazda������u��n�?��? - 30.3.1998 10:42:02
Pouzij API funkci GetUserName
Vita
Dlouhe nazvy
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 30.3.1998 10:59:09
TucekR(zv)p15.monet(tec)cz wrote:
> Jak prevest dlouhe nazvy z Win95 na kratke a naopak
> resp. fce mi vrati dlouhy nazev a ja chci kratky...
>
> Je na to nejaka API fce ?
>
> TRT
Podle toho jakou funkci pouzivas. Napr. findfirst vraci hodnoutu typu
TSearchRec, kde jedna polozka je TWin32FindData a zde je
cAlternateFileName.
Vaclav Sazima
Specialni ListView
[*] Tomas Skopik <skopik(zv)opv(tec)czn(tec)cz> - 30.3.1998 11:17:53
Ahoj All!
Nevite jestli existuje komponenta ListView, ktera umi pri zobrazen VSREPORT zabrat kurzorem cely radek a ne jenom prvni sloupec? Tedy neco jako je v Outlooku Ex seznam zprav. Nebo, da se nejak ListView upravit, aby tohle delal?
Diky,
-----
Tomas Skopik
e-mail : skopik(zv)opv(tec)czn(tec)cz
batch move
[*] Marcel Dvorak <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 30.3.1998 11:39:54 -0500 (est)
Zdarec panove!!!
mam problem:
- pouzivam komponentu TBatchMo0ve
- v pripade ze BatchMove1.Mode := batCopy; NEMUSI Destination Table na
disku existovat
- ALE v destination u batchmovu musi byt zadana nejaka TTable ale ta aby
mohla byt
Active := True tak musi mit nastavenyTableName a ta tabulka pochopitelne
NEEXISTUJE a tudiz TableName nejde nastavit!!!!
Doprdele co s tim???
Diky za podnety Marcello
batch move
[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 30.3.1998 13:20:32
Cilova tabulka nemusi byt aktivni....
-----------------------------------------------------
David Vodnansky - database analyst
Allianz pojistovna a.s.
tel. +420-2-24405215 fax.24405555
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------
> -----P�vodn� zpr�va-----
> Od: Marcel Dvorak [SMTP:dvo20um(zv)axpsu.fpf.slu(tec)cz]
> Odesl�no: 30. b�ezna 1998 18:40
> Komu: DELPHI Distribution List
> P�edm�t: batch move
>
>
> Zdarec panove!!!
> mam problem:
> - pouzivam komponentu TBatchMo0ve
> - v pripade ze BatchMove1.Mode := batCopy; NEMUSI Destination Table
> na
> disku existovat
> - ALE v destination u batchmovu musi byt zadana nejaka TTable ale ta
> aby
> mohla byt
> Active := True tak musi mit nastavenyTableName a ta tabulka
> pochopitelne
> NEEXISTUJE a tudiz TableName nejde nastavit!!!!
>
> Doprdele co s tim???
>
> Diky za podnety Marcello
promenna prihlaseneho uzivatele
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 30.3.1998 13:35:29
> Pouzij API funkci GetUserName
>
> Vita
Nedavno jsem se snazil taky zjistovat prihlaseneho usera a v helpu jsem nasel
tuto funkci. Kdyz jsem ji ale pouzil, vracela mi chybu, jejiz cislo vubec neni
v seznamu chyb, ktery jsem nasel v Delphi v helpu v rejstriku pod "Error
codes".
Protoze jsem to nepotreboval tak nutne a nemel jsem cas to nejak blize zkoumat,
hodil jsem to za hlavu (a to vcetne zdrojaku), takze ted uz nevim presne jak
jsem to mel napsane, ale rekl bych, ze chyba nebyla ve mne ale nekde v te
funkci. Nebo ta funkce opravdu funguje?
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
Registers
[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 30.3.1998 13:35:33
Ahoj delphici,
mam takovy maly navrh - zanechme kamenovani pana Kothanka. Myslim, ze uz
jsme se na jeho ucet pobavili docela dobre, bylo par vtipu. Fajn,
zvladli jsme to. Konference vydrzela, takze bychom meli pomalu delat
zase neco uzitecnejsiho.
Treba byste mi mohli poradit :-)). Mam takovy maly problemek. Snazim se
pouzit jednu paskalovskou unit, kterou jsem si kdysi davno napsal a
narazil jsem na problem. Vite, ze Delphi nezna pojem "Registers" ??
Nevite nahodou, jak by se dal tenhle problem resit ?
Diky za pomoc,
Peter Rus
peterrus(zv)intesys(tec)cz
ps. Uz toho vazne nechte - tak jsme stahli 8 mb, nastvali se - ale
slunicko sviti a trava je zelena. A je jaro.
P.batch move
[*] VOLTRR1(zv)epr1.ccmail.x400.cez(tec)cz - ar 1998 13:47:08 -0700
Nemusi byt nastavena na Active a tudiz to muzes normalne pouzit.
Radek
-----Puvodni zprava-----
Od: Internet:delphi-request(zv)io.pinknet(tec)cz/
Odeslano: 30. boezna 1998 13:38
Komu: Internet:delphi(zv)pinknet(tec)cz/
Poedmit: batch move
Zdarec panove!!!
mam problem:
- pouzivam komponentu TBatchMo0ve
- v pripade ze BatchMove1.Mode := batCopy; NEMUSI Destination Table na
disku existovat
- ALE v destination u batchmovu musi byt zadana nejaka TTable ale ta aby
mohla byt
Active := True tak musi mit nastavenyTableName a ta tabulka pochopitelne
NEEXISTUJE a tudiz TableName nejde nastavit!!!!
Doprdele co s tim???
Diky za podnety Marcello
<<Soubor: TXT1.TXT>> RX Library
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 30.3.1998 13:49:07
> To je jasne - jedna se o pomstu Borlandu tem nepoctivym
> programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
> dva pocitace. :-))
No jo, pacholci jedni, napisou do licencniho ujednani, ze je to takto
v poradku, ale pritom delaji pomsty :-)))
> Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
> nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
> Wokna na noteboocich...
No jo, kdyby to psalo nejake chybove hlaseni, tak bych neco mozna
zjistil, ale ono to zatuhne a nezbyva nez reset. Zaznamy v registru
jsou totozne jako na velkem pocitaci, vse je proste uplne stejne,
na velkem je to OK a na malem ne. Pritom pamet take stejna, snad
ze by Delphi delalo problemy s MMX ??? Kdyz jsem vykopal 50 jinych
komponent, tak to jde. Pritom je zcela jedno, ktere se vykopou,
protoze, jak jsem zjistil, jde ciste o pocet komponent. Vice jich
to nevezme a nevezme a nevezme :-((( Ted koupim Delphi 3 a jestli
to ani tam nepujde, tak to budu reklamovat v Redmondu... udelam si
vylet do Ameriky :-)
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================www.builder.cz (fwd)
[*] Liane BBS <bbs(zv)edulib(tec)cz> - 30.3.1998 13:52:31
*** Forwarded file follows ***
Posted By: Cbob (Cbob) on 'CZaddresses'
Title: www.builder(tec)cz
Date: Mon Mar 30 13:45:03 1998
Zdar,
www.builder(tec)cz opet jede.
Jde o informacni server pro programatory, takze tam najdete informacni zdroje
(seznam podobny Yahoo) a fora venovane problemum programovani ap.
s pozdravem
Podhajsky Jan
Cbob(zv)builder(tec)cz
promenna prihlaseneho uzivatele
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 30.3.1998 15:04:15
Petr Slovak wrote:
> :>> Pouzij API funkci GetUserName
> > ......Nebo ta funkce opravdu funguje?
>
> ----------------------------------------------------
> Petr Slovak
> Trilog, s.r.o.
> Http: http://www.trilog(tec)cz/
> E-mail: petr(zv)trilog(tec)cz
> Telefon: (+420) 2 / 205 131 06, linka 220, 271
> Mobil: (+420) 603 / 501 642
> Adresa: Vanickova 5/1, Praha 6, 160 00
> ----------------------------------------------------
Me teda jo. Vaclav Sazima
Help - Potrebuju vzacnu krvnu skupinu A1B (fwd)
[*] Stepan Kubik <kubik(zv)sun1.biomed.cas(tec)cz> - 30.3.1998 15:25:09
No, nedalo mi to.
Stepan Kubik kubik(zv)biomed.cas(tec)cz Department of Neurophysiology of Memory
Institute of Physiology Czech Academy of Sciences
---------- Forwarded message ----------
Date: Thu, 19 Mar 1998 16:37:43 +0100 (MET)
From: Ales Stuchlik <stuchlik(zv)biomed.cas(tec)cz>
To: Dasa Plundrova <plun(zv)hema.uhkt.anet(tec)cz>
Cc: Zuzka Pesanova <pesanova(zv)biomed.cas(tec)cz>,
Vitezslav Kriz <vitezslav.kriz(zv)lfmotol.cuni(tec)cz>,
Vit Kopecky <vkopecky(zv)biomed.cas(tec)cz>,
Stepan Kubik <kubik(zv)biomed.cas(tec)cz>, Pavel Krsek <pkrsek(zv)biomed.cas(tec)cz>,
Pavel Gregor <pavel.gregor(zv)vscht(tec)cz>,
Olga Malkova <malkova(zv)biomed.cas(tec)cz>,
Martin Salac <xsalacm(zv)hwlab.felk.cvut(tec)cz>,
Marek Mincbergr <MINCBERG(zv)student.fsid.cvut(tec)cz>,
Marek Jelinek <jelinem3(zv)feld.cvut(tec)cz>, Marcela Kocova <marko(zv)email(tec)cz>,
Lucie Suchomelova <lucie(zv)biomed.cas(tec)cz>,
Ladislav Dobias <xdobiasl(zv)cslab.felk.cvut(tec)cz>,
Klara Bernaskova <klara(zv)biomed.cas(tec)cz>,
Karolina Cizkova <beruska(zv)mdi(tec)cz>,
Karla Kretschmannova <karla(zv)biomed.cas(tec)cz>,
Kamil Hercik <technik(zv)biomed.cas(tec)cz>, Jiri Langr <vakhk(zv)vak.anet(tec)cz>,
Jan Bastecky <jbast(zv)lf1.cuni(tec)cz>,
Irena Vacinova <vacinova(zv)prfdec.natur.cuni(tec)cz>
Subject: Re: (Fwd) Help - Potrebuju vzacnu krvnu skupinu A1B (fwd)
Tohle asi neni sranda. Prectete si to, prosimvas..
Ales Stuchlik
---------- Forwarded message ----------
Date: Thu, 19 Mar 1998 16:33:49 +0100
From: VITEZSLAV KRIZ <Vitezslav.Kriz(zv)lfmotol.cuni(tec)cz>
To: bisa(zv)prfdec.natur.cuni(tec)cz
Cc: stuchlik(zv)sun1.biomed.cas(tec)cz, mincberger(zv)student.fsid.cvut(tec)cz,
jcimicky%expandia(zv)mergen.lf2.cuni(tec)cz, tomas.skoumal(zv)bakernet.com
Subject: Re: (Fwd) Help - Potrebuju vzacnu krvnu skupinu A1B (fwd)
> Date: Thu, 19 Mar 1998 14:45:54 +0100 (MET)
> From: Renata Pohlova <pohlova(zv)prfdec.natur.cuni(tec)cz>
> To: David Komanek <komanek(zv)prfdec.natur.cuni(tec)cz>,
> Zdenek Palice <palice(zv)prfdec.natur.cuni(tec)cz>,
> Vitek Kriz <VITEZSLAV.KRIZ(zv)lfmotol.cuni(tec)cz>,
> -) mysak :-)" <gyhrab34(zv)ova.comp(tec)cz>
> Subject: (Fwd) Help - Potrebuju vzacnu krvnu skupinu A1B (fwd)
>
>
> ---------- Forwarded message ----------
> Date: Mon, 16 Mar 1998 10:52:32 MET-1MEST
> From: Jan Havlik student <XHAVLIKJ(zv)feld.cvut(tec)cz>
> To: xhadac(zv)feld.cvut(tec)cz, xgencev(zv)feld.cvut(tec)cz, popm(zv)feld.cvut(tec)cz,
> andrtm(zv)feld.cvut(tec)cz, XVALOUSE(zv)feld.cvut(tec)cz, KOHOUTP(zv)feld.cvut(tec)cz,
> XBESTAK(zv)feld.cvut(tec)cz, VELAT(zv)feld.cvut(tec)cz, voltrjos(zv)troja.fjfi.cvut(tec)cz,
> svoboda(zv)br.fjfi.cvut(tec)cz, vitvar(zv)mbox.fsv.cuni(tec)cz, hornof(zv)ff.cuni(tec)cz,
> pohlova(zv)mail.natur.cuni(tec)cz, RTmail(zv)geocities.com, cirman(zv)bbs.infima(tec)cz,
> hst(zv)comp(tec)cz, sevcik(zv)karlin.mff.cuni(tec)cz, xmazl(zv)feld.cvut(tec)cz,
> xhorak(zv)feld.cvut(tec)cz, mocekv(zv)feld.cvut(tec)cz, hron(zv)ipp.cas(tec)cz,
> maierova(zv)fanet.fa.cvut(tec)cz, izera(zv)pce(tec)czn(tec)cz, Z-BERANKOVA(zv)leo.zf.jcu(tec)cz,
> j.prokopova(zv)zlin.vutbr(tec)cz, 5kuncaro(zv)pol.upce(tec)cz, PVOTRUBA(zv)pythia.zcu(tec)cz,
> Zuzana.Losova(zv)risc.upol(tec)cz, ozp1894(zv)magnet(tec)cz,
> SILD KAREL - UMF <KSIL2301(zv)menza.mff.cuni(tec)cz>,
> kbez7032(zv)menza.mff.cuni(tec)cz, ozp1799(zv)magnet(tec)cz
> Subject: (Fwd) Help - Potrebuju vzacnu krvnu skupinu A1B
>
> From: "JOSEF VOLTR" <voltrjos(zv)troja.fjfi.cvut(tec)cz>
> From: "Ziznavsky, Lubos (Prague)" <ZiznavskyL(zv)logica.com>
> > > > Od: Jan Piroscak [SMTP:JanoP(zv)exe.sk]
> > > > Dulezitost: Velka
> > > > >
> > > > > -----Original Message-----
> > > > > From: Zuzana Lachova [SMTP:lachova(zv)gtinet.sk]
> > > > > Sent: 11 marec 1998 09:10
> > > > > To: Roman Giovanni Lach
> > > > > Subject: Fw: Help
> > > > >
> > > > > > Toto mi poslal jeden kamarat, prosim poslite dalej, dakujem, Olga.
> > > > > >
> > > > > > Ich dcera ma ist na operaciu srdca a potrebuju
> > > > > > vzacnu krvnu skupinu A1B Rh-. Ak vies o niekom ochotnom , co ma
> > > > > tuto
> > > > > > skupinu daj vediet Sivcovcom na tel 07/525 63 52.
> > > > > ----------
> >
> > Lidi, to neni sranda, jestli to nejste vy, tak to poslete dal.
> >
>
>
>
batch move
[*] Marcel Dvorak <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 30.3.1998 17:19:09 -0500 (est)
On 30 Mar 1998 VOLTRR1(zv)epr1.ccmail.x400.cez(tec)cz wrote:
> Nemusi byt nastavena na Active a tudiz to muzes normalne pouzit.
>
Hmmm to uz jsem skousel "predhodit" batchmuvu destination Ttable bez nazvu
a neaktivni ale pak to pri Execute vyleti s chybou Invalid parametr,
urcite ale existuje zpusob jak pouzit ten batCopy mod. No nic budu to
zkouset dal. CGI
[*] KarelHudan <KarelH(zv)cashreform(tec)cz> - 30.3.1998 17:31:35
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Zdravim vsechny delphisty v konferenci.
Takovy dotaz,
jak se programuje CGI script, ktery dostava data pres standartni vstupni zarizeni (odesilani pres tlacitko).
Vzdi kdyz ctu z Input, tak se mi to zasekne. Kontrola pres EOF nejak nepomaha.
Zkousel jsem jeste cist promenou QUERY STRING, kde by teoreticky mel byt najaky retezec,
ale neni tam nic.
Takze, kdo mi, prosim, poradi, jak na to ????
Diky Karel Hudan
Undocumented Delphi
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 30.3.1998 19:42:17
> Predstavte si programatora bez pristupu na Inet :-). Nikdy se nedovi
> .........
> Mate-li nekdo zajem o podobne stranky Delphi, pak doporucuji pomerne
> zajimavou knihu "The revolutionary guide to Delphi 2", vydal ji Wrox Press.
> Mezi ruznymi autory najdeme i Dr.Boba. Kazdy prispel svou troskou do mlyna.
> Nevim vsak, kde ji lze sehnat. V Opave urcite ne, v Praze nevim. Ja jsem si
Kdyz sis tak pochvaloval Internet, tak treba u amazon.com:
------------------------------------------------------------------
The Revolutionary Guide to Delphi 2
by Paul Hinks (Editor), Brian LongList: $49.95
Our Price: $39.96
You Save: $9.99 (20%)
Availability: This title usually ships within 2-3 days.
Bk&Cd Rom Edition
Paperback, 711 pages
Published by Wrox Press Inc
Publication date: April 1996
Dimensions (in inches): 1.62 x 9.20 x 7.23
ISBN: 1874416672
----------------------------------------------------------
:-)
Tom
Specialni ListView
[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 30.3.1998 21:48:37
> Nevite jestli existuje komponenta ListView, ktera umi pri zobrazen
> VSREPORT zabrat kurzorem cely radek a ne jenom prvni sloupec? Tedy
> neco jako je v Outlooku Ex seznam zprav. Nebo, da se nejak ListView
> upravit, aby tohle delal?
>
>
>
> Ahoj - It's easy ;-) .. TListView.RowSelect := True;
>
> Hodne stesti,
>
> Peter Rus ml.
> peterrus(zv)intesys(tec)cz
RX Library
[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 30.3.1998 22:37:29
Hi All,
mel jsem takovy podobny problem, a vyresilo to proste zvetseni
FILES v CONFIG.SYS (CONFIG.NT pripadne)
To uz jste na config zapomeli ???
fronek(zv)fic(tec)cz
Petr Zahradnik wrote:
>
> > To je jasne - jedna se o pomstu Borlandu tem nepoctivym
> > programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
> > dva pocitace. :-))
>
> No jo, pacholci jedni, napisou do licencniho ujednani, ze je to takto
> v poradku, ale pritom delaji pomsty :-)))
>
> > Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
> > nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
> > Wokna na noteboocich...
>
> No jo, kdyby to psalo nejake chybove hlaseni, tak bych neco mozna
> zjistil, ale ono to zatuhne a nezbyva nez reset. Zaznamy v registru
> jsou totozne jako na velkem pocitaci, vse je proste uplne stejne,
> na velkem je to OK a na malem ne. Pritom pamet take stejna, snad
> ze by Delphi delalo problemy s MMX ??? Kdyz jsem vykopal 50 jinych
> komponent, tak to jde. Pritom je zcela jedno, ktere se vykopou,
> protoze, jak jsem zjistil, jde ciste o pocet komponent. Vice jich
> to nevezme a nevezme a nevezme :-((( Ted koupim Delphi 3 a jestli
> to ani tam nepujde, tak to budu reklamovat v Redmondu... udelam si
> vylet do Ameriky :-)
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> ==============================================================
> === Petr Zahradnik - Computer Laboratory ===
> === Jezkova 12, 400 11 Usti nad Labem ===
> === Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
> === http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
> ==============================================================Komponenty SINEA software
[*] Adam AHA Hauner <aha(zv)pinknet(tec)cz> - 31.3.1998 03:04:48
Dobry den,
po dohode s panem Skerikem jsou ode dneska volne siritelne komponenty
spolecnosti SINEA Software umisteny na FTP serveru PinkNetu a to na
adresach:
http://web.pinknet(tec)cz/ftp/delphi/sinea/
ftp://ftp.pinknet(tec)cz/pub/delphi/sinea/
Konektivitu zajistuje CESNET.
Adam Hauner
----------------------------------------------------------------------------
Adam Hauner (AHA)
aha(zv)pinknet(tec)cz Projekt PinkNet
+420 603 471460 projekt(zv)pinknet(tec)cz
http://i.love.pinknet(tec)cz/aha/
------------------------------------------=[ pinknet on every screen ]=-----
Registers
[*] roman.palarcik(zv)spt(tec)cz - 31.3.98 07:06:42
A co takhle TRegistry.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
>Ahoj delphici,
>
>Mam takovy maly problemek. Snazim se
>pouzit jednu paskalovskou unit, kterou jsem si kdysi davno napsal a
>narazil jsem na problem. Vite, ze Delphi nezna pojem "Registers" ??
>Nevite nahodou, jak by se dal tenhle problem resit ?
>
>Diky za pomoc,
>
>Peter Rus
>peterrus(zv)intesys(tec)cz
Je nebo neni cesky generator tiskovych sestav drah
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.3.1998 07:12:21
Adam AHA Hauner wrote:
> > tom, co programator umi vytvorit, ale i (predevsim) jak to umi
> > prodat.
>
> *** Pripominam, ze Leonardo da Vinci i Jara Cimrman jsou jiz mrtvi. Takze
> radeji at prodavaji obchodnici, programatori at tvori.
:-)) Jasne. Ale ne vzdy se podari obchodniky primet k tomu, aby
prodavali. Zejmena, kdyz se jedna o laciny produkt, ze ktereho
maji maly rabat... :-((( To plati nejen pro programatory na volne
noze (jako jsem ja), ale i pro zamestnance - kdyz nedokaze presvedcit
sveho sefa o nezbytnosti nove investice, neumi sam sebe patricne
prodat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
RX Library
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.3.1998 07:12:20
Petr Zahradnik wrote:
> > To je jasne - jedna se o pomstu Borlandu tem nepoctivym
> > programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
> > dva pocitace. :-))
>
> No jo, pacholci jedni, napisou do licencniho ujednani, ze je to
> takto v poradku, ale pritom delaji pomsty :-)))
To vis, jedna z nedokumentovanych funkci... :-)))
> > Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
> > nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
> > Wokna na noteboocich...
>
> No jo, kdyby to psalo nejake chybove hlaseni, tak bych neco mozna
> zjistil, ale ono to zatuhne a nezbyva nez reset. Zaznamy v registru
> jsou totozne jako na velkem pocitaci, vse je proste uplne stejne, na
> velkem je to OK a na malem ne. Pritom pamet take stejna, snad ze by
Ted nevim, jestli to bylo jen v D1 nebo i D2, ale kdyz byl retezec v
Library Path delsi nez nejaky pocet znaku, Delphi se mi zaclo
vzpouzet a delat skopiciny. Tak jsem sehral nektere knihovny do
jednoho adresare a zkratil jsem cesty, a byl klid. Zkus tedy patrat
po necem obdobnem.
> Delphi delalo problemy s MMX ??? Kdyz jsem vykopal 50 jinych
> komponent, tak to jde. Pritom je zcela jedno, ktere se vykopou,
> protoze, jak jsem zjistil, jde ciste o pocet komponent. Vice jich to
> nevezme a nevezme a nevezme :-((( Ted koupim Delphi 3 a jestli to
> ani tam nepujde, tak to budu reklamovat v Redmondu... udelam si
> vylet do Ameriky :-)
V Redmondu? Chces si spolecne zanadavat s Billem na nekalou
konkurenci k jejich VB a VC? :-)))
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
CGI
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 31.3.1998 08:18:40
Maly dotaz: pises to v Delphi...? To neni dobry postup... :))
Zkus se podivat na
http://www.cgiexpert.com/
Neco na styl WebModulu z D3 a docela roztomily...
Tomas
> -----P�vodn� zpr�va-----
> Od: KarelHudan [SMTP:KarelH(zv)cashreform(tec)cz]
> Odesl�no: 30. b�ezna 1998 17:32
> Komu: Delphi
> P�edm�t: CGI
>
> Zdravim vsechny delphisty v konferenci.
> �
> �
> Takovy dotaz,
> jak se programuje CGI script, ktery dostava data pres standartni
> vstupni zarizeni (odesilani pres tlacitko).
> Vzdi kdyz ctu z Input, tak se mi to zasekne. Kontrola pres EOF nejak
> nepomaha.
> Zkousel jsem jeste cist promenou QUERY_STRING, kde by teoreticky mel
> byt najaky retezec,
> ale neni tam nic.
> �
> Takze, kdo mi, prosim, poradi, jak na to ????
> �
> �
> Diky���������� Karel Hudan
batch move
[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 31.3.1998 08:21:44
Ale ne, TTable ma byt neaktivni, ale nazev mit musi - kam by se Ti to
pak asi kopirovalo ?
> -----P�vodn� zpr�va-----
> Od: Marcel Dvorak [SMTP:dvo20um(zv)axpsu.fpf.slu(tec)cz]
> Odesl�no: 31. b�ezna 1998 0:19
> Komu: DELPHI Distribution List
> P�edm�t: RE: batch move
>
>
>
> On 30 Mar 1998 VOLTRR1(zv)epr1.ccmail.x400.cez(tec)cz wrote:
>
> > Nemusi byt nastavena na Active a tudiz to muzes normalne pouzit.
> >
>
> Hmmm to uz jsem skousel "predhodit" batchmuvu destination Ttable bez
> nazvu
> a neaktivni ale pak to pri Execute vyleti s chybou Invalid parametr,
>
> urcite ale existuje zpusob jak pouzit ten batCopy mod. No nic budu
> to
> zkouset dal.
>
>
> Vyhledavac veci okolo Delphi
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 31.3.1998 08:22:43
Zaregistruj to, prosim, na
http://delphi.mius(tec)cz/
Dik. Tomas.
> -----P�vodn� zpr�va-----
> Od: Ales Berka [SMTP:aberka(zv)usa.net]
> Odesl�no: 28. b�ezna 1998 11:24
> Komu: delphi(zv)pinknet(tec)cz
> P�edm�t: Vyhledavac veci okolo Delphi
>
> Abych porad neco nechtel, tak zkuste
> http://developers.href.com/HOME
> je tam docela dobrej vyhledavac v newsech (delphiovych).
> bye Aleq CGI
[*] roman.palarcik(zv)spt(tec)cz - 31.3.98 08:30:53
Asi pred pul rokem jsem to taky zkousel a dost dlouho mi trvalo nez
jsem to odladil. Uz si to presne nepamatuju, ale problem byl myslim v
tom, ze se to musel cist jako Read(S) a ne Readln(S) ve smycce s
testovanim na EOF. Ten retezec je totiz na standardnim vstupu bez CR na konci.
Kdyby to presto neslo, napis, zkusim to nekde najit.
Faktem, ale je ze psat to v Delphi opravdu neni to prave. Vyhazel jsem
vsechno co se dalo, nechal jsem tam akorat komponentu pro praci s
TCP/IP a melo to asi 160 kB, coz je na nejjednodussi skript strasne.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
> Takovy dotaz,
> jak se programuje CGI script, ktery dostava data pres standartni
> vstupni zarizeni (odesilani pres tlacitko).
> Vzdi kdyz ctu z Input, tak se mi to zasekne. Kontrola pres EOF nejak
> nepomaha.
> Zkousel jsem jeste cist promenou QUERY_STRING, kde by teoreticky mel
> byt najaky retezec,
> ale neni tam nic.
>
> Takze, kdo mi, prosim, poradi, jak na to ????
>
>
> Diky Karel Hudan
Platby do ciziny. Undocumented Delphi
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 31.3.1998 08:32:10
Zkusil uz si nekdo neco objednat z ciziny? Asi jo. A povedlo se?
A jak jste za to zaplatili?
Moje pritelkyne mi chtela udelat radost a objednala mi casopis
Dr.Dobb`s Journal. Nestacil jsem ji v tom zabranit a tak mi cely
rocnik prisel pod stromecek. To bylo radosti.
Nemame devizove konto (ani zadne jine :-) Nemohl jsem prilozit
cislo sve VISA karty, ani AmEx. Ani sek. A presto jsem chtel
zaplatit. Poslal jsem tedy $70 na adresu uvedenou snad na kazde
strance.
Bohuzel ta nase ******* (to bylo sproste slovo) posta tento ukol nezvladla.
Skoda, ze jsem nebyl pritom (mel to byt darek, a tak jsem o tom nevedel,
jen se mi zdalo, ze uz nikdo z rodiny nechce chodit na postu a nechapal
jsem proc). Z vypraveni tedy vim, jak to dopadlo. Nakonec jsme vysvetlili
kam a kolik chteji poslat. Poslali penize a mezitim mi snad i uklizecky z
Dr.Dobb`s psaly, abych jim zaplatil. Tak jsem jim napsal, jak se veci maji.
Nakonec se mi penize vratily zpet. Prijemce si je nevyzvedl. Dr.Dobb`s chodi
dal.
www.ddj.com. Nedavno tam byl i priklad na OpenTools API. Usporadani
promennych zaznacenych v bloku.
Takze gratuluji vsem, kterym se povedlo cestne zaplatit za to co si
objednali a
dokazali to lidem na poste vysvetlit.
Martin Nedopil
nedopil(zv)eskon(tec)cz
nedopil(zv)geocities.com
jsem doma na: http://www.geocities.com/Athens/Olympus/5260
Heslo dne:"Abychom mohli pochopit rekurzi, mus�me napred pochopit rekurzi"RX Library
[*] Petr Studeny <studeny(zv)olympo(tec)cz> - 31.3.1998 08:41:33
Zdravim
Nevim jak jsi na tom s ostatnimi komponentami, ktere mas
registrovane v delphi, ale podobny problem jsem mel s RX asi pred
mesicem a po dlouhem badani jsem zjistil, ze nenainstaluji RX dokud
nevyhodim prave jednu urcitou komponentu, kterou jsem stvoril asi v
listopade 97. Dal jsem s tim neztracel cas, ale problem se vyparil.
Zda se ze se jedna mozna o problem nekde v registracnich nazvech
techto komponent, jejich typech, promennych vyvazenych smerem ven,
neco podobneho, nic jineho me vzhledem k teto kolizi nenapadlo.
Hodne stesti pri badani
Dotaz: Nevi nekdo jak je omezen pocet komponent na jedne liste.
> From: "Petr Zahradnik" <clexpert(zv)clexpert(tec)cz>
> Organization: COMPUTER LABORATORY
> To: delphi(zv)pinknet(tec)cz
> Date: Mon, 30 Mar 1998 13:49:07 +0100
> Subject: Re: RX Library
> Priority: normal
> Reply-to: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
> > To je jasne - jedna se o pomstu Borlandu tem nepoctivym
> > programatorum, kteri si jednu zakoupenou licenci Delphi instaluji na
> > dva pocitace. :-))
>
> No jo, pacholci jedni, napisou do licencniho ujednani, ze je to takto
> v poradku, ale pritom delaji pomsty :-)))
>
> > Mozna zkus hledat v registrech, zda neco nepreteka tam, nebo zda
> > nehapruje delka cest v Options a podobne. Kdo vi, jak se chovaji
> > Wokna na noteboocich...
>
> No jo, kdyby to psalo nejake chybove hlaseni, tak bych neco mozna
> zjistil, ale ono to zatuhne a nezbyva nez reset. Zaznamy v registru
> jsou totozne jako na velkem pocitaci, vse je proste uplne stejne,
> na velkem je to OK a na malem ne. Pritom pamet take stejna, snad
> ze by Delphi delalo problemy s MMX ??? Kdyz jsem vykopal 50 jinych
> komponent, tak to jde. Pritom je zcela jedno, ktere se vykopou,
> protoze, jak jsem zjistil, jde ciste o pocet komponent. Vice jich
> to nevezme a nevezme a nevezme :-((( Ted koupim Delphi 3 a jestli
> to ani tam nepujde, tak to budu reklamovat v Redmondu... udelam si
> vylet do Ameriky :-)
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> ==============================================================
> === Petr Zahradnik - Computer Laboratory ===
> === Jezkova 12, 400 11 Usti nad Labem ===
> === Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
> === http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
> ==============================================================
>
>
----------------------------------------------------------------
Petr Studeny
OLYMPO controls Ltd. e-mail: studeny(zv)olympo(tec)cz
Havrankova 33, 619 00 Brno phone: +421-05-43216101-11
----------------------------------------------------------------
RX Library
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.3.1998 08:57:58
> mel jsem takovy podobny problem, a vyresilo to proste zvetseni
> FILES v CONFIG.SYS (CONFIG.NT pripadne)
> To uz jste na config zapomeli ???
To me take napadlo, zmenil jsem files na 120, ale nepomohlo to.
Na velkem pocitaci mam 120, na notebooku ted take, ale stale
nechodi, stale nechodi...
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================DB Float
[*] TYSLIC(zv)BHAN-CE.MAIL602.CZ - 31.3.1998 8:58:08
Hi,
Podobny problem jsem resil take a dospel jsme k tomu, ze nejlepsi je
pracovat v halerich (staci Integer, LongInt....). Prace s cisli je rychla a
bezproblemova, jedine uskali je v prezentaci dat na obrazovku a tiskarnu coz
ale v Delphi zadny problem neni.
Bye 1000
> Mam takovy maly problem:
>
> potrebuju pracovat v DB s cisly s presnosti na dve desitinna mista
> (Kc) a prave na 2. Jenze
> datovy typ floatfield (ci tak nejak) ma presnost 15 mist. To by
> nevadilo, ale pri nekterych
> vypoctech dochazi ke ztrate informace a pok z toho lezou zrudy cosi
> jako x^-11 atp...
> takze treba tam, kde ma byt 0 je 0.00000000001.... no a co s tim ?
> Pouzivam data aware,
> takze nemohu ukladat cislo jako cele a pred pouzitim posunout
> desetinnou carku. Existuje
> jednoduche reseni ?
>
> Dekuji za vyslechnuti, radu, nezabiti......
>
> fronek(zv)fic(tec)cz
>