Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Quickreport 3.51 Delphi6 a vyhledavani na delphi.c
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.12.2001 22:40:37
From: "CRISP Software" <crisp(zv)rbv(tec)cz>
> nevite jak to dopadlo s nefunkcnim updatem quickreportu 3.5 pro delphi 6?
> Stahl jsem si 3.51 a nejde mi zkompilovat zadny projekt obsahujici
> quickreport.
Ahoj,
proto jsem pred tim updatem varoval, stranky QuSoftu jsou evidentne nejak mimo
provoz, protoze to tam pise "The system cannot find the file specified."
> A ted mirny OT:
> Zkousel jsem vyhledavat na delphi(tec)cz fulltextem a pouzil jsem AND ve spojeni
> a namisto vyhledanych stranek se mi objevila chyba
>
> CreateRecordset error '80041605'
> The query contained only ignored words.
> /hledani.asp, line 75
A co jsi tam presne zadal ? Preposilam to autorovi ...
Petr Vones
DBGrid - vertical ScollBar
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.12.2001 22:42:43
From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> Prosim, kdo mi poradi, jak vyhodit z DBGridu i vertikalni rolovaci listu.
Ahoj,
Removing the vertical scrollbar from a TDBGrid
http://community.borland.com/article/0,1410,15874,00.html
Petr Vones
RTF
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.12.2001 22:45:42
From: "Lud�k ZITA" <konference(zv)sales(tec)cz>
> Potrebuji v nevizualni aplikaci (bez formu) vytvorit nejaky jednoduchy RTF
> text a ulozit na disk.
> Existuje nejaka knihovna, unita, nebo komponenta, ktera to umi ? Nebo je
> potreba zasednout ke specifikaci RTF a natukat to ?
Ahoj,
pokud si stahnes starsi verzi JCL 1.02 tak v ni najdes unit JclRTF, bohuzel
toho ale moc neumi (proto byl docasne odstranen z novejsich verzi), pouze
nastavit font, velikost a barvu pisma. Tato verze je ke stazeni tady:
ftp://delphi-jedi.org/Code_Library/Release_1_02/JCL.zip
Petr Vones
Informace z BIOSu
[*] <delphist(zv)atlas(tec)cz> - 19.12.2001 23:36:28
nejspise mate pravdu, zvlaste neradi maji moji desku.proto jsem o necem takovem premyslel.
-----Original Message-----
From: "delphi-l-owner(zv)clexpert(tec)cz" <delphi-l-owner(zv)clexpert(tec)cz> on behalf of "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
Sent: Wednesday, December 19, 2001 6:10 AM
To: "delphi-l(zv)clexpert(tec)cz" <delphi-l(zv)clexpert(tec)cz>
Subject: Re: Informace z BIOSu
Ty to delaji tak, ze si detekuji o jakou desku se jedna a pak zjistuji
potrebne informace. Jak sis mohl vsimnout, nechodi se vsemi deskami...
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
19.12.2001 delphist(zv)atlas(tec)cz:
>>> jak zobrazit informace z BIOSu? Napr. teplotu CPU, otacky vetraku...
>>
>>Ahoj,
>>
>>pokud je mi znamo tak tyto informace jsou specificke pro kazdeho vyrobce desky
>>a neexistuje na to zadne standartni API.
>>
>>Petr Vones
> Ale jak to potom delaji, ta ruzn� aplikace napr. motherboard monitor, wincooler ...
> je mi to zahadou, nikde neni ani zminka.
Zapis do DBGrid
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 20.12.2001 00:05:01
> Odes�latel: Slavom�r #eke� <cekel(zv)noves.sk>
> mam nasledujuci problem, v databaze mam polozku STAV nadobuda ciselnu
> hodnotu, v programe ale danej ciselnej hodnote odpoveda nejaky retazec
>
> v DBGride chcem vypisat okrem inych poloziek aj polozku STAV, lenze
> chcem aby namiesto toho CISLA co je v databaze sa mi vypisal
> prisluchajuci TEXTOVY RETAZEC
A co zkusit OnGetText na prislusnem fieldu?
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================Dr. Watson
[*] Dvo��k Miroslav <MDvorak(zv)CSAS(tec)cz> - 20.12.2001 07:37:56
Zdravim,
nepotkal jste jiz nekdo nahodou chybu, kterou %SUBJ% oznacuje jako Exception
number: c0000025. Podarilo se mi pouze zjistit, ze by se mozna mohlo jednat
o toto: EXCEPTION_NONCONTINUABLE_EXCEPTION (0 C0000025) The thread tried to
continue executing after a non-continuable exception was raised. V logu
%SUBJ% se jeste da vycist, ze k padu dojde pri volani funkce RtlRandom z
ntdll. Chyba se projevuje pouze na dele bezicich NT4 vsech SP.
Nejake napady ?
Mirek Dvorak
Nahrada TNotebook
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 20.12.2001 08:05:01
Ahoj vsem
Existuje nejaka nahrada TNotebook z palety Win3.1, ktera by umoznovala to same
- prepinani rovin bez vyditelnych ousek?
Nebo mohu klidne dal pouzivat TNotebook a nemusim se bat,
ze v novejsich verzich Win jiz nebude existovat?
Predem diky
Jirka
Nezapsani hodnoty do Fieldu
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 20.12.2001 08:08:42
Ahoj vsem
Nevi nekdo proc pri pokusu o zapsani hodnoty do Fieldu ktera je typu Variant se
mi toto zapsani neprovede?
Field.State je dsEdit.
var
A: Variant;
begin
A := 'Ahoj';
...
Field.Value := A;
...
end;
Predem diky
Jirka
D6, IBX, Win2000
Nezapsani hodnoty do Fieldu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 20.12.2001 08:19:09
> Nevi nekdo proc pri pokusu o zapsani hodnoty do Fieldu ktera je typu
> Variant se mi toto zapsani neprovede?
>
> var
> A: Variant;
>
> begin
> A := 'Ahoj';
> ...
> Field.Value := A;
> ...
> end;
Sice nepises, proc se to nepovede, ale predpokladam, ze jde o
hlasku Invalid variant conversion. S tim jsem se setkal, ziskal jsem
dojem, ze Delphi ma problem s implicitnim prevodem variantu na
string.
Nepatral jsem po pricinach, ani si jiz nevzpominam na reseni.
Jen me napada moznost pouzit fci VarToStr, ale jde o vystrel do
tmy.
David Lebeda
komponenta Delphi6 na Delphi5
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 20.12.2001 08:50:55
From: "Marek Vilda Jelen" <marek.jelen(zv)mybox(tec)cz>
> Nev�te n�kdo, jak p�ev�st komponentu z Delphi6 na Delphi5?
O aku komponentu ide?
Mas k nej zdrojaky?
Neni prilis zavisla na balickoch z D6?
...
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
Nahrada TNotebook
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 20.12.2001 08:56:11
From: "Jiri Wendl, KSH-Data" <wendl(zv)ksh-data(tec)cz>
> Existuje nejaka nahrada TNotebook z palety Win3.1, ktera by umoznovala to
same
> - prepinani rovin bez vyditelnych ousek?
> Nebo mohu klidne dal pouzivat TNotebook a nemusim se bat,
> ze v novejsich verzich Win jiz nebude existovat?
Nahradou je TPageControl, na kazdej zalozke mozes dat TabVisibkle na False.
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
Control has no parent window
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 20.12.2001 09:02:23
From: "Filip Hochman" <filip.hochman(zv)atlas(tec)cz>
> mam formular, kterej je zdedenej a doplnenej o dalsi TControls. Obcas se
> stane, ze pri zobrazeni tohoto formulare ve spustene aplikaci dojde k
chybe
> "Control 'Bevel1' has no parent window". Reseni je problematickou
komponentu
> odstranit Ctrl-X a znovu ji "polozit" CTRL-V v navrhu.
> Ted ale nastala tato potiz s komponentou, ktera pochazi z rodicovskeho
okna
> a tudiz odstarnit ji v dedici nelze. Na jinych zdedenych fromularich
problem
> nedela.
> Zkoumal jsem i textovy tvar formu, ale na nic objevnyho jsem neprisel.
Nebolo by ucinnejsie, skor nez experimentovat s provizoriom, tu chybu v
komponente opravit? ;-)
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
Quickreport 3.51 Delphi6 a vyhledavani na delphi.c
[*] CRISP Software <crisp(zv)rbv(tec)cz> - 20.12.2001 09:24:57
>> A ted mirny OT:
>> Zkousel jsem vyhledavat na delphi(tec)cz fulltextem a pouzil jsem AND ve
>> spojeni
>> a namisto vyhledanych stranek se mi objevila chyba
>>
>> CreateRecordset error '80041605'
>> The query contained only ignored words.
>> /hledani.asp, line 75
>A co jsi tam presne zadal ? Preposilam to autorovi ...
>Petr Vones
Hledal jsem Tvou zpravu, tedy QuickReport AND 3.5 :-)
Karel
Nezapsani hodnoty do Fieldu
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 20.12.2001 09:34:46
> > Nevi nekdo proc pri pokusu o zapsani hodnoty do Fieldu ktera je typu
> > Variant se mi toto zapsani neprovede?
> >
> > var
> > A: Variant;
> >
> > begin
> > A := 'Ahoj';
> > ...
> > Field.Value := A;
> > ...
> > end;
>
> Sice nepises, proc se to nepovede, ale predpokladam, ze jde o
> hlasku Invalid variant conversion. S tim jsem se setkal, ziskal jsem
> dojem, ze Delphi ma problem s implicitnim prevodem variantu na
> string.
At dam do toho A jakykoliv typ promene (String, Integer, ..) tak
hodnota v tom Fieldu se nikdy nezmeni.
Kdyz ale pouziju takovou silenost jako:
case Field.DataType of
ftString, ftWideString:
Field.AsString := A;
ftSmallint, ftInteger, ftWord, ftLargeint:
Field.AsInteger := A;
ftFloat, ftCurrency, ftBCD:
Field.AsFloat := A;
ftDate, ftTime, ftDateTime:
Field.AsDateTime := A;
else
Field.Value := A;
end;
tak se hodnota zapise.
Predem diky za radu.
Jirka
Problem Variant x OLEVariant v D6
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 20.12.2001 09:38:46
> Samotny problem je pochopitelne v unite Variants.pas
Mas nainstalovany Update Pack 1?
Variants je jednou z unit, ktore v nom boli fixnute.
TOndrej
USB v Delphi
[*] Ing. Vladim�r R��i�ka���#��rF#v("#�� - 20.12.2001 09:55:49
Zdarec fsem,
potreboval bych si v D4 vyc�st seznam pripojen�ch USB zar�zen� a komunikovat
s nima. V helpu nic neni ... Nedelal nekdo neco ? Mam tady DIGI fotak
Olympus C-2100 Ultra Zoom a chci si s nim trochu pohrat .
Dik
Vladimir W98, D4Pro
Farebne odlisenie vetiev v TreeView
[*] Fabik Milan <kinekus(zv)nextra.sk> - 20.12.2001 09:57:39
Ahojte,
Da sa farebne odlisit vetva v TreeView podla nejakej podmienky ? Nemyslim
vsetky jednou farbou. To mi ide. Jedna sa o vyselektovane vetvy. Najlepsie
by bolo v dobe naplnania vetiev. Vsetko programovo.
Dik
MF
Komprimace jako PKZIP 2.04g
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 20.12.2001 10:01:24
----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>> >Pratele,
> >nemate prosim nekdo algoritmus na komprimaci metodou deflate, ktera
> je obsazena v PKZIPu uvedene verze.
>
> podivej se na internetu po ZLIB. Tusim, ze obsahuje prave deflate (v
> kazdem pripade komprimuje dost dobre), je free a
> se zdrojakama. Exituji tusim i nejaky prepisy do Delphi a komponent.
> Clovek co to psal se snad primo podilel na vyvoji deflate v PKZIPu ...
Pouzivam ZLIB, obsahuje deflate, ale je to jen nastroj na komprimaci
a dekomprimaci dat touto metodou a bude asi dost narocne (pokud to
uz nekdo neudelal) implementovat pomoci nej totez co dela PKZIP
- t.j. hlavicky, hesla apod. Navic neumi ostatni metody, ktere jsou
v PKZIPu implementovane.
Kazdopadne pokud budes pouzivat ZLIB jen tak pro komprimaci
obecneho streamu a hlavicky si nejak vyresis, bude ti urcite fungovat
k plne spokojenosti.
Martin Schayna
Komprimace jako PKZIP 2.04g
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 20.12.2001 10:04:31
Zkus se podivat na komponenty ZipMaster. Jsou s PKZipem plne
kompatibilni.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
20.12.2001 Martin Schayna:
>> >nemate prosim nekdo algoritmus na komprimaci metodou deflate, ktera
>> je obsazena v PKZIPu uvedene verze.
>>
>> podivej se na internetu po ZLIB. Tusim, ze obsahuje prave deflate (v
>> kazdem pripade komprimuje dost dobre), je free a
>> se zdrojakama. Exituji tusim i nejaky prepisy do Delphi a komponent.
>> Clovek co to psal se snad primo podilel na vyvoji deflate v PKZIPu ...OT: Borland s.r.o.
[*] Radim Ludv�k <radiml(zv)bnsoft(tec)cz> - 20.12.2001 10:23:45
Zdravicko,
sorry za OT, ale uz si opravdu nevim rady. Potrebuji se telefonicky spojit s
nekym z Borland s.r.o. (nejlepe z prodeje). Ale bud maji vsichni dovolenou,
nebo se rozhodli nezvedat telefony :-( Nemate nekdo nejaky kontakt na nekoho
z Borlandu primo??
Diky
S pozdravem
Radim LUDV#K,
BN Soft Znojmo
Radim_Ludvik(zv)bnsoft(tec)cz
Control has no parent window
[*] Filip Hochman <filip.hochman(zv)atlas(tec)cz> - 20.12.2001 10:25:16
No to je prima napad, ale vzhledem k tomu, ze se jedna o komponenty Delphi,
je to trochu potiz .. :) Navic problem je asi jinde.
Zjistil jsem, ze problem resi "Revert to inherited", ovsem pokud se to
provede na jednu komp., problem se presune na dalsi a tak dal, az se zjisti,
ze se to musi udelat na vsechny (lze i hromadne najednou). Bohuzel tak
samozrejme prijde o specificke nastaveni properties komp. na tomto zdedenem
formulari.
Pak ale staci pouzit napr. "Bring to front" na nejakou k., apod. a je to
zase v kopru.
Asi to teda souvisi se zmenou create order vuci otcovskemu formu, ale proc
to teda vubec jde udelat, kdyz to pak aplikace nerozchodi..
Dik F.
----- Original Message -----
From: "Kaka�ka Pavol" <kakacka(zv)proca(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, December 20, 2001 9:02 AM
Subject: Re: Control has no parent window
> From: "Filip Hochman" <filip.hochman(zv)atlas(tec)cz>
> > mam formular, kterej je zdedenej a doplnenej o dalsi TControls. Obcas se
> > stane, ze pri zobrazeni tohoto formulare ve spustene aplikaci dojde k
> chybe
> > "Control 'Bevel1' has no parent window". Reseni je problematickou
> komponentu
> > odstranit Ctrl-X a znovu ji "polozit" CTRL-V v navrhu.
> > Ted ale nastala tato potiz s komponentou, ktera pochazi z rodicovskeho
> okna
> > a tudiz odstarnit ji v dedici nelze. Na jinych zdedenych fromularich
> problem
> > nedela.
> > Zkoumal jsem i textovy tvar formu, ale na nic objevnyho jsem neprisel.
>
> Nebolo by ucinnejsie, skor nez experimentovat s provizoriom, tu chybu v
> komponente opravit? ;-)
>
> Kaka�ka Pavol
> KasiX(zv)atlas(tec)cz
>
>Format excelu
[*] <aldik(zv)quick(tec)cz> - 20.12.2001 10:38:51
Ahoj kluci,nedal by se sehnat struktura excelovskeho dokumentu,tedy jestli je
to teda legalni.
Jestli ne tak se jen ptam jestli tedy mohu zapisovat rovnou do xls pres streamy
(coz uz delam),aniz bych neporusoval zakony,pokud to je legalni,muzete mi nekdo
jeste poslat neco o fontech atd.
Diky
(pokud je to nelegalni tak nic neposilejte,nerad bych se dostal do konfliktu se
zakony konfiktu s pravidly konference)
Aldik D5 Ent W2000
komponenta Delphi6 na Delphi5
[*] Marek Vilda Jelen <marek.jelen(zv)mybox(tec)cz> - 20.12.2001 10:50:50
Ted na novym lednovim chipu byla komponenta, ktera delat okno jak winXP, ale
pro Delphi6, zkousel jsem ji instalovat z Delphi5, ale neco mu chyby.Farebne odlisenie vetiev v TreeView
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 20.12.2001 11:06:29
V udalosti OnCustomDrawItem.
Treba :
if podminka then Sender.Canvas.Font.Color := clBlue else
Sender.Canvas.Font.Color := clBlack;
DeafultDraw := true;
Petr Jurik, Spravce site, programator
COMET System s.r.o.
1.Maje 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
http://www.cometsystem(tec)cz
ICQ# : 119119215
> Ahojte,
>
> Da sa farebne odlisit vetva v TreeView podla nejakej podmienky ? Nemyslim
> vsetky jednou farbou. To mi ide. Jedna sa o vyselektovane vetvy. Najlepsie
> by bolo v dobe naplnania vetiev. Vsetko programovo.
Farebne odlisenie vetiev v TreeView
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 20.12.2001 11:09:27
Jeste je dobre dodat podminku, zda je polozka oznacena, aby se vykreslilo
pismo bilou barvou :
if (Node.Selected ) and (cdsFocused in State) then
Sender.Canvas.Font.Color := clWhite;
Petr Jurik, Spravce site, programator
COMET System s.r.o.
1.Maje 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
http://www.cometsystem(tec)cz
ICQ# : 119119215
> Ahojte,
>
> Da sa farebne odlisit vetva v TreeView podla nejakej podmienky ? Nemyslim
> vsetky jednou farbou. To mi ide. Jedna sa o vyselektovane vetvy. Najlepsie
> by bolo v dobe naplnania vetiev. Vsetko programovo.
OT: index pres calculated pole
[*] starka <starka(zv)ticketpro(tec)cz> - 20.12.2001 11:10:12
Dobry den cely den,
chtel jsem se jenom zaptat, jestli nekdo nevite, jak
v clientskem datasetu nastavit index pres
calculated pole.
Kdyz jsem to zkousel pomoci IndexFieldNames,
tak mi Delphi tvrdily, ze calculated pole v datasetu neexistuje.
Diky Starka
Komprimace jako PKZIP 2.04g
[*] Do�ekal Radek <RDocekal(zv)CSAS(tec)cz> - 20.12.2001 11:16:44
>
> Zkus se podivat na komponenty ZipMaster. Jsou s PKZipem plne
> kompatibilni.
>
> ------
> ing. Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz
>
Jenze pozivaji DLL, coz puvodni tazatel nechtel. AFAIK jedine komponenty pro
kompresi ZIP, kompatibilni s PKZIP, ktere zahrnuji kod pro
kompresi/dekompresi v sobe (neni potreba DLL), jsou na http://www.ziptv.com.
Umi i mraky jinych formatu kompresi a dekompresi. Nejsou vsak zadarmo.
BTW PKZIP 2.04g je DOS program, pro Win32 je k dispozici PKZIP console
version, soucast baliku na http://www.pkware.com/products/pkzipwin.html.
S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
Farebne odlisenie vetiev v TreeView
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 20.12.2001 11:25:31
From: "Fabik Milan" <kinekus(zv)nextra.sk>
> Da sa farebne odlisit vetva v TreeView podla nejakej podmienky ? Nemyslim
> vsetky jednou farbou. To mi ide. Jedna sa o vyselektovane vetvy. Najlepsie
> by bolo v dobe naplnania vetiev. Vsetko programovo.
Iba prepisanim CustomDraw eventov.
Napriklad:
procedure TMainF.tvDBTreeCustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var
N: TKDsNode;
begin
N := TKDsNode(Node.Data);
if (N.NodeType = 1) then begin
tvDBTree.Canvas.Font.Style := [fsBold];
tvDBTree.Canvas.Font.Color := clBlue;
end;
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
komponenta Delphi6 na Delphi5
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 20.12.2001 11:42:48
From: "Marek Vilda Jelen" <marek.jelen(zv)mybox(tec)cz>
> Ted na novym lednovim chipu byla komponenta, ktera delat okno jak winXP,
ale
> pro Delphi6, zkousel jsem ji instalovat z Delphi5, ale neco mu chyby.
Ak chces aby Ti niekto dal uspokojivu odpoved, alebo Ta spon nasmeroval tak
musis napisat trochu viac informacii.
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
Problem Variant x OLEVariant v D6
[*] Robert Kindl <rob(zv)exec(tec)cz> - 20.12.2001 12:09:25
> > Samotny problem je pochopitelne v unite Variants.pas
>
> Mas nainstalovany Update Pack 1?
> Variants je jednou z unit, ktore v nom boli fixnute.
> TOndrej
Samozrejme, ze mam.
Rob
USB v Delphi
[*] Lasevic, Martin <MLasevic(zv)ratiopharm(tec)cz> - 20.12.2001 12:57:43
Mozna bych na tenhle fotak sel ne pres USB primo, ale pres TWAIN rozhrani.
Martin
> -----Original Message-----
> From: Ing. Vladim�r R��i�ka [mailto:ruzicka(zv)digitus(tec)cz]
>
>
> Zdarec fsem,
>
> potreboval bych si v D4 vyc�st seznam pripojen�ch USB
> zar�zen� a komunikovat
> s nima. V helpu nic neni ... Nedelal nekdo neco ? Mam tady DIGI fotak
> Olympus C-2100 Ultra Zoom a chci si s nim trochu pohrat .
>
> Dik
>
> Vladimir W98, D4Pro
> NT domena
[*] EFG developer <developer(zv)efg(tec)cz> - 20.12.2001 13:29:47
bohuzel funkce LogonUser mi vzdycky vrati false i pri spravnych vstupnich
hodnotach a navic mi nasledne CloseHandle hodi external exception C0000008.
Nemate nekdo nejake opravdu funkcni reseni? docela to specha a me nic
nenapada :(
Petr Sikola
D5Ent, W2k
PS, kdyby to overovani fungovalo i pod W9x pripojenych do domeny tak by to
bylo uplne supr.
-----
ja wrote
> > potreboval bych overit HESLO uzivatele pro NT domenu.
> > vstup: jmeno x, heslo z, domena z; vystup: ucet je platny
> > (tj. uzivatel x s heslem y ma platny ucet v domene z)
TOndrej wtote
> potom by malo stacit pouzit LogonUser napriklad takto:
> function IsDomainUserValid(const DomainName, UserName, Password: string):
> Boolean;
> var
> Token: THandle;
> begin
> Result := LogonUser(PChar(UserName), PChar(DomainName), PChar(Password),
> LOGON32_LOGON_NETWORK,
> LOGON32_PROVIDER_DEFAULT, Token);
> CloseHandle(Token);
> end;
OT : TCP/IP Protokol pod WIN2000 Serverom.
[*] vladimir.michl(zv)hlubocky.del(tec)cz - 20.12.2001 13:40:18
On Tue, 11 Dec 2001, Miroslav Hro##o wrote:
> Dobry,
>
> Mam problem nastartovanim TCP/IP protokolu.
>
> Mam dva programy, ktore komunikuju pomocou TCP/IP protokolu. Vsetko funguje
> ak som pripojeny do siete.
> Ale ak sa od siete odpojim, tak sa mi "pripojenie s miestnej sieti" odpoji a
> s nim aj TCP/IP protokol.
> Ako sa da vo WIN2000 Server nastvit, aby TCP/IP protokol bol stale aktivny,
> aj ked nie som pripojeni do ziadnej siete, a ani na modeme.
To je nejake divne, nebere si nahodou stroj adresu pomoci DHCP.
> TCP/IP Protokol pouzivam ako komunikacny prostriedok medzi aplika�nym
> serverom a kientom.
Jakym zpusobem navazujete spojeni mezi nimi, tedy na jakou IP nebo nazev.
Nejlepe je pouzit nazev localhost (127.0.0.1), coz vzdy znamena ze se
pripojujete na stroj na kterem aplikace bezi a neni to zavisle na IP
adrese toho stroje.
Vlada Michl
DBGrid a aktualne psany text
[*] Josef Semera <semera(zv)atlas(tec)cz> - 20.12.2001 14:13:25
Jak zjistim v OnKeyPress text ktery prave pisu, nez ho odklepnu a on se
zapise do Field. SelectedField mi ukazuje puvodni hodnotu TField.
Zkousel jsem GetEditText(ACol,ARow) ale to mi nejak nefunguje. Konkretne
mam TDateField a RxDBGrid. Diky moc.DBGrid a aktualne psany text
[*] ing. Pavel #ilinec����)b���zf�#�3 - 20.12.2001 14:31:17
Zkus vlastnosti CurValue, NewValue, OldValue
------
ing. Pavel �ilinec
mailto:zilinec(zv)email(tec)cz
20.12.2001 Josef Semera:
> Jak zjistim v OnKeyPress text ktery prave pisu, nez ho odklepnu a on se
> zapise do Field. SelectedField mi ukazuje puvodni hodnotu TField.
> Zkousel jsem GetEditText(ACol,ARow) ale to mi nejak nefunguje. Konkretne
> mam TDateField a RxDBGrid. Diky moc.
P��stup k tabulk�m FoxPro s CDX soubory a cp852 -
[*] Roman Netu�il <netusil.roman(zv)vspardubice(tec)cz> - 20.12.2001 14:35:08
[P��loha v souboru: Cis__oso.cdx]
[P��loha v souboru: Cis__oso.dbf]
V߿en� p�nov�,
ji� n�kolik dn� se ne�sp�#n� sna��m otev��t tabulky FoxPro 2.5 s CDX soubory obsahuj�c�mi n�jakou FoxPro funkci a k�dovan� v cp852.
Nejprve jsem zkou#el komponentu TADOTable a ovlada� ODBC Microsoft Visual FoxPro Driver. Tabulku jsem sice otev�el, ale nejsem schopen nastavit spr�vn� zobrazov�n� �e#tiny.
Pak jsem to zkou#el p�es BDE a ODBC ovlada� s komponentou TTable. Op�t bez �sp�chu. St�le mi to hl�s� "Invalid configuration parameter."
V obou p��padech jsem za uveden� DataSet p�ipojil TDataSource a TDBGrid pro zobrazen� dat.
Byl byste tak n�kdo laskav a pomohl mi s t�m. Vzorovou tabulku uv�d�m v p��loze.
P�eju V�m v#em poklidn� v�noce a ##astn� Nov� rok 2002.
S pozdravem Roman Netu#il
D6Prof, W98
komponenta Delphi6 na Delphi5
[*] Marek Vilda Jelen <marek.jelen(zv)mybox(tec)cz> - 20.12.2001 14:42:56
Uz jsem to vyresil, vymazal jsem par vlasnosti, stejne nebyli dulezite!
Ale stejne diky Marek Jelen
TRadioButtony a TToolBar
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 20.12.2001 14:50:20
Ahoj,
narazil jsem na zajimave chovani, ktere nechapu. Zkuste si to.
Jednoducha aplikace s dvema formy. Na hlavnim formu je pouze
jeden button. V OnCreate hlavniho formu se vytvori druhy form. Po
stisku buttonu se druhy form modalne zobrazi.
Druhy form obsahuje 3 radiobuttony a TToolBar s alespon
jednim Toolbuttonem. Na tomto OnClick Toolbuttonu je povesen
tento kod:
RadioButton1.Checked := True;
ModalResult := mrCancel;
A ted o co jde. Mam hlavni form a z nej po stisku tlacitka vyvolam
modalni dialog obsahujici RadioButtony. Oznacim nektery z nich
mysi jako Checked. Po stisku tlacitka chci, aby se pro dalsi
pouziti okno zavrelo a az ho priste nekdo otevre, aby byl zatrzeny
RadioButton1. A to vyse popsanym zpusobem nejde. Zustane
normalne oznaceny ten RadioButton, ktery byl oznacen pred
stiskem ToolButtonu. A Pozor!! Pokud misto Toolbaru s
ToolButtonem pouziji TButton, chova se to spravne.
V cem je problem?????
Nejde o tom, jak jinak vyresit tuto situaci, ale proc toto s
TButtonem jde a s TToolButtonem ne.
Dik.
David Lebeda
NT domena
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 20.12.2001 14:53:03
> bohuzel funkce LogonUser mi vzdycky vrati false i pri
> spravnych vstupnich hodnotach a navic mi nasledne
> CloseHandle hodi external exception C0000008.
Zaujimave je, ze u mna to funguje bez problemov: NT 4.0 SP 6 Server, to iste
domain primary controller.
Jednoducho to chodi.
Na Tvojom mieste by som skusil zistit presny chybovy kod, a popatrat na MSDN
po vychytavkach, ktore mozu byt potrebne pre Tvoju konkretnu konfiguraciu.
TOndrej
OT: W@P a cestina
[*] vladimir.michl(zv)hlubocky.del(tec)cz - 20.12.2001 14:54:30
On Fri, 14 Dec 2001, ing. Jan Fiala wrote:
> Musis diakriticke znaky prevadet do tvaru á je to hexa unicode.
> Jinak tohle za tebe dokaze udelat PSPad http://pspad.zde(tec)cz.
> Nastroje/konverze textu/Konverze znaku pro WML
Tak to je asi ta nejhorsi moznost.
WAP je jak asi vsichni vime XML dokument, tudiz lze kodovani zadat primo
jako atribut zakladniho XML tagu a pak v dokumentu pouzivame prislusne
kodovani a neni treba delat opicarny s prevadenim na entity, coz je pro
autora daleko mene citelnejsi. Pro presnejsi popis www.w3.org.
Par prikladu z hlavy:
<xml version="1.0" encoding="windows-1250">
....
</xml>
nebo
<xml version="1.0" encoding="iso-8859-2">
....
</xml>
nebo
<xml version="1.0" encoding="utf8">
....
</xml>
Doufam ze jsem se trefil. utf8 a utf16 kodovani se nemusi zadavat, protoze
to je implicitni kodovani XML a mezi temito dvema kodovanimi umi parser
rozlisit.
Dalsi moznost jak si to overit, zkusit se podivat telnetem na port 80
wapoveho serveru, protoze jak asi vsichni vime, pro prenos WAPu se pouziva
protokol HTTP. tj. ten samy jako u HTML. Tedy:
$ telnet wap_server 80
a zadame: GET / HTTP/1.1<ENTER>
Host: wap_server<ENTER>
<ENTER>
vysledkem je pak root WAP dokument z prislusneho WAP serveru. Zde pak lze
cerpat inspiraci.
Vladimir Michl
P��stup k tabulk�m FoxPro s CDX soubory a cp852
[*] campulka <campulka(zv)czas(tec)cz> - 20.12.2001 15:18:36
V tom CDX je totiz index, ktery pouziva FoxPro funkci SYS(15) na prevod
retezce a jeden jeji parametr se odkazuje na nezname pole (CH). Pokud
tabulku otviras s timto indexem tak tam vznikne
urcite chyba.
Nevim jak s ADO, ale u BDE bys asi mel nastavit spravnou znakovou sadu
(LANGDRIVER), aby ti to ty cesky znaky zobrazovalo a tridilo. Popr. primo v
DBF je priznak v jake znakove sade je.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Roman Netu#il
Sent: Thursday, December 20, 2001 2:35 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: P��stup k tabulk�m FoxPro s CDX soubory a cp852 - pros�m o pomoc! V߿en� p�nov�,
ji� n�kolik dn� se ne�sp�#n� sna��m otev��t tabulky FoxPro 2.5 s CDX
soubory obsahuj�c�mi n�jakou FoxPro funkci a k�dovan� v cp852.
Nejprve jsem zkou#el komponentu TADOTable a ovlada� ODBC Microsoft Visual
FoxPro Driver. Tabulku jsem sice otev�el, ale nejsem schopen nastavit
spr�vn� zobrazov�n� �e#tiny.
Pak jsem to zkou#el p�es BDE a ODBC ovlada� s komponentou TTable. Op�t bez
�sp�chu. St�le mi to hl�s� "Invalid configuration parameter."
V obou p��padech jsem za uveden� DataSet p�ipojil TDataSource a TDBGrid
pro zobrazen� dat.
Byl byste tak n�kdo laskav a pomohl mi s t�m. Vzorovou tabulku uv�d�m v
p��loze.
P�eju V�m v#em poklidn� v�noce a ##astn� Nov� rok 2002.
S pozdravem Roman Netu#il
D6Prof, W98
DBGrid a aktualne psany text
[*] Josef Semera <semera(zv)atlas(tec)cz> - 20.12.2001 15:41:14
Bohuzel ani jedna neukazuje hodnotu kterou pisu, hodnota se do nich
zapise pri OnSetText
>Zkus vlastnosti CurValue, NewValue, OldValue
------
20.12.2001 Josef Semera:
> Jak zjistim v OnKeyPress text ktery prave pisu, nez ho odklepnu a on
> se zapise do Field. SelectedField mi ukazuje puvodni hodnotu TField.
> Zkousel jsem GetEditText(ACol,ARow) ale to mi nejak nefunguje.
> Konkretne mam TDateField a RxDBGrid. Diky moc.
chyba pri obnoveni databaze FB 1
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 20.12.2001 15:44:56
Ahoj
Pri odstraneni ulozene procedury a naslednem BackUp a Restore to pri
Restore vyhodi tuto hlasku v IB Expertu
Invalid insert or update value(s): object columns are\nconstrained - no 2
table rows can have duplicate column values.
attempt to store duplicate value (visible to active transactions) in unique
index "RDB$INDEX_11".
IBConsol to vypise hlasku podobnou.
Pokud provedu to same bez vymazani SP projde to OK.
Chyba se projevi i pri uplnem vytvoreni nove databaze ze skriptu a
naslednem
opakovani predeslych operaci i
bez jakychkoliv dat. S pozdravem Heinisch Jiri
Kylix a verzie Linux, UNIX
[*] vladimir.michl(zv)hlubocky.del(tec)cz - 20.12.2001 16:00:08
On Wed, 19 Dec 2001, Jan Grman wrote:
> > Este doplnim ze na UNIXe bude trochu problem. Rozne zkompilovane aplikacie
> > na Linuxu nechodia na UNIXu kvoli inej binarnej stavbe. (Su programy ktore
> > su zkomipolave pre vic platforiem, ale tych je menej). U tychto systemov
> je
> > ale zvykom dodavat SW so zdrojakami a potom to zkomilujes pod roznymi OS a
> > chodi to.
>
> Cize inymi slovami sa chce povedat ze v prostredi Linux/Unix nie je nejaky
> spolocny betonovy zaklad o co sa moze
> clovek (programator) opriet ???
Jako zaklad o ktery se muzete oprit je POSIX.
> Nieco podobne ako je Win32 pre prostredia Windows (prosim nekomentovat
> Win32, viem ze kazdy z Vas ma urcite zaujimavy nazor, ale sem moje otazky
> nesmeruju) ??
Problem je are daleko sirsi. Nasleduje vysvetleni, doufam ze se moc
neseknu, a pokud jo at me nekdo opravi. UNIX je oznaceni pro operacni
system, na ktere ma autor operacniho systemu pravo tuto registrovanou
znacku pouzivat. Mnoho systemu se svym chovanim systemum oznacovanym UNIX
podoba, tem se potom rika UNIX-like systemy.
UNIX je tedy oznaceni nejakeho operacniho systemu s jistym chovanim.
Na techto systemech je vicemene standardem pouzivani ANSI C a POSIX
rozhrani (API). To se ale tyka zdrojovych kodu.
Zacina tu ale byt jeden problem s binarnim kodem. UNIX(-like) OS funguji
na vice ruznych HW platformach (Alpha, Motorola, PPC, i386, ...), ktere
nejsou binarne kompatibilni, tj. kod z jedne platformy nelze spoustet na
jine.
Linux je pak jeden z UNIX-like OS, ktery navic take bezi na vice HW
platformach (aplha, PPC, Motorola, ARM, i386, ...).
No a Kylix je kompilator Object Pascalu zatim pouze pro Linux a pouze pro
i386 a to je treba si uvedomit.
Dale se jeste problem rozrusta o to, ze existuje mnoho distribuci Linuxu
(Debian, RedHat, Mandrake, ...). Obvykle ale vzdy existuje rovnitko mezi
jistymi verzemi distribuci, kdy lze binarni aplikace prenaset, ale nemusi
to platit. U jakychkoliv GNU programu a knihoven vcetne jadra Linuxu je
hlavne kladen duraz na zdrojovou kompatibilitu.
Jsou sice videt snahy, ze Linuxove (GNU) API knihoven a pod. se stavaji
jakymsi standardem v UNIX-like systemech a i komercni UNIXy zacinaji mit
snahu se tomuto prispusobit, ale je to porad na zdrojove urovni. Jsou i
snahy na binarni kompatibilitu, ale ta podle me zase bude podminena
stejnym HW (binarne kompatibilnim).
> Len pre poriadok. Dodavat zdrojove kody s nasim systemom aj pri portovani na
> Linux/UNIX akosi neprichadza do uvahy !
> Vidim to dobre ak si myslim ze riesenie by mohlo byt take ze je potrebne
> zohnat si prosttredia/dodavky/distribucie Linuxu/Unixu pre ktory planujem
> dodavat system, vsade zinstalovat Kylix a skompilovat ?!
Jak rikam, Kylix zatim existuje pouze pro Linux a i386 a navic je vazan na
konkretni verzi urcitych knihoven. Na novejsi verzi distribuce jiz program
fungovat nemusi. Borland certifikuje Kylix myslim na nejaky RedHat a
Mandrake, obvykle ale neni problem prejit na jinou distribuci v takove
verzi, kde je podobna verze glibc (zakladni C knihovna obalujici jadro
OS) a par dalsich knihoven na kterych Kylix zavisi. Ovsem porad zustavame
na i386.
Jinak na Slovesku stejne jako v Cesku existuje Sdruzeni uzivatelu OS Linux
a stranky jsou www.linux.sk a www.linux.sk a obe sdruzeni maji konferenci,
kde se clovek muze zeptat na problemy. Doporucuji ale mit cileny dotaz s
mnozstvim souvisejicich informaci (ale to plati pro kazdou konferenci).
Vladimir Michl
Informace z BIOSu
[*] vladimir.michl(zv)hlubocky.del(tec)cz - 20.12.2001 16:02:46
On Wed, 19 Dec 2001, Petr Vones wrote:
> From: <delphist(zv)atlas(tec)cz>
> > jak zobrazit informace z BIOSu? Napr. teplotu CPU, otacky vetraku...
>
> Ahoj,
>
> pokud je mi znamo tak tyto informace jsou specificke pro kazdeho vyrobce desky
> a neexistuje na to zadne standartni API.
Proto existuje balicek lmsensors, ktery se o takoveto API snazi. Bohuzel
pro Windows zatim nebyl portovan.
Vladimir Michl
ADO =?iso-8859-2?B?cPhpIA==?=instalaci?
[*] <aldik(zv)quick(tec)cz> - 20.12.2001 18:30:33
Jak je t s Adem musim ho instalovat p�i dod�v�n� sv� aplikace na jin� PC?Li#�
se n�jak verze?
D�ky
Aldik Pavel
D5 Ent W2000
USB v Delphi
[*] Miroslav Evjak <evjak(zv)atlas(tec)cz> - 20.12.2001 19:19:42
>Mozna bych na tenhle fotak sel ne pres USB primo, ale pres TWAIN rozhrani.
Ahoj,
delal sem taky nejake pokusy, na "torry.ru" jsou k dipozici primo komponetny
pro praci s TWAIN rozhranim, nektere vypadaly velmi solidne.
Mire�ek
mailto:miroslav.evjak(zv)seznam(tec)cz
Primy pristup k Paradox tabulkam
[*] <morzol(zv)atlas(tec)cz> - 20.12.2001 20:19:15
Nevite nekdo o komponente pro primy pristup k Paradox tabulkam bez BDE a ostatnich dalsich knihoven.
Pouze native Pascal.
Diky.
A vsem prijemne proziti Vanocnich svatku a vse nejlepsi do noveho roku.DBGrid a aktualne psany text
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 21.12.2001 04:36:29
----- Original Message -----
From: "Josef Semera" <semera(zv)atlas(tec)cz>> Jak zjistim v OnKeyPress text ktery prave pisu, nez ho odklepnu a on se
> zapise do Field. SelectedField mi ukazuje puvodni hodnotu TField.
> Zkousel jsem GetEditText(ACol,ARow) ale to mi nejak nefunguje. Konkretne
> mam TDateField a RxDBGrid. Diky moc.
>
Ahoj.
Kdysi se mi to myslim nejak podarilo pres InplaceEditor, ale uz nejak nevim
jak a ted to asi rychle nenajdu.
Ludek
ODBC drivery a BDE - prosim o pomoc
[*] Roman Netu�il <netusil.roman(zv)vspardubice(tec)cz> - 21.12.2001 08:36:05
Panove,
obracim se na Vas s timto problemem:
Mam komponentu TDatabase, kterou se snazim konektnout pres Microsoft Visual FoxPro Driver (Property DriverName) na DBF tabulky FoxPro c CDX indexy kodovane v cp852. Pri pokusu o Connected=True se mi neustale zobrazuje Database Engine Error "Invalid configuration parameter".
Kdyz DriverName zmenim na STANDARD, vse funguje spravne.
Na komponente TDatabase mam nastaveny nasleduj�c� parametry:
PATH=C:\
USER NAME=USER
LANGDRIVER=dBASE CSY cp852
PASSWORD=123
Neni teba jeste neco nastavit nebo nevite jak jinak se na ty tabulky dostat?
Dekuji.
D6Prof, W98
netusil.roman(zv)vspardubice(tec)cz
ODBC drivery a BDE - prosim o pomoc
[*] Lasevic, Martin <MLasevic(zv)ratiopharm(tec)cz> - 21.12.2001 09:12:26
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Problem je zrejme v parametru LANGDRIVER. Podivej se do configuracniho
souboru BDE, jaka je jeho zkratka a tu dej do parametru LANGDRIVER.
-----Original Message-----
Subject: ODBC drivery a BDE - prosim o pomoc
obracim se na Vas s timto problemem:
Mam komponentu TDatabase, kterou se snazim konektnout pres Microsoft Visual
FoxPro Driver (Property DriverName) na DBF tabulky FoxPro c CDX indexy
kodovane v cp852. Pri pokusu o Connected=True se mi neustale zobrazuje
Database Engine Error "Invalid configuration parameter".
Kdyz DriverName zmenim na STANDARD, vse funguje spravne.
Na komponente TDatabase mam nastaveny nasleduj�c� parametry:
PATH=C:\
USER NAME=USER
LANGDRIVER=dBASE CSY cp852
PASSWORD=123
OT- Fiskalny danovy rok v CR
[*] Roland Turcan <rolo(zv)sedas.sk> - 21.12.2001 11:12:03
Ahojte.
Ked sa v CR rozhodnem zmenim danovy rok na napr. 5/2003-4/2004.
Co sa udeje:
Nakazu mi aby som isiel este 1/2002-12/2002, potom mi stanovia ze
1. dalsi rok bude len 4 mesiace z 2003, a potom ako som chcel
2. dalsi rok mi predlzia od 1/2003-4/2004 t.j. 16 mesiacov
Dakujem.
S pozdravom
Roland Turcan
USB v Delphi (OT)
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 21.12.2001 12:26:59
Kdyz uz jsme u toho USB a TWAIN -> mam taky neco jako fotacek, ale
vyrobce dodava SW jen pro Win98 a ja mam Win2K. Rozhrani TWAIN se
nainstaluje, ale na USB to hlasi pri instalaci ovladacu ze jsou "Nespravne
parametery". Takze TWAIN aplikace nahlasi po chvilce cekani ze je odpojen
kabel a je konec.
Potreboval bych vedet jak ten ovladacovy .SYS soubor zkouset nejak
rucne abych zjistit co dela za chyby a co se mu nelibi... ...nebo jak se
pokusit se zarizenim komunikovat.> >Mozna bych na tenhle fotak sel ne pres USB primo, ale pres TWAIN rozhrani.
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------
Ulozene procedury a adonis
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 21.12.2001 12:29:00
Ahoj,
mam problem se spoustenim ulozenych procedur pres Adonis.
Priklad:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj'', 1';
DataSet.ExecSQL;
Tohle projde v pohode. Jakmile napisu treba:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj"'', 1';
tak to projde taky, ale v pripade ze napisu:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj:"'', 1'; // pridam
dojtecku nakonec retezce, tak to spadne na 'Arguments are wrong type,
are out of acceptable range, or are in conflict with one another.'.
Proc tam nemuze byt ta dvojtecka? Ja ji tam chci. Tusim ze to bude
problem s parametrem ulozene procedury, ale snad pokud mam retezec
uzavreny do apostrofu NESMI mi s tim ADO cokoliv delat! Jak to mam
vyresit? Pokud vyhodim pryc tu uvozovku tak to zase jede...
Ales Ulozene procedury a adonis
[*] ing. Pavel �ilinec����)b���zf�#�3 - 21.12.2001 12:42:18
Dej si predtim jeste DataSet.ParamCheck := False.
Je totiz mozny i takovyto zapis:
DataSet.SQL.Text := 'MSP_InsertItem :A, :B, :C, :Text';
DataSet.ParamByName('A').AsInteger := 1;
DataSet.ParamByName('B').AsInteger := 1;
DataSet.ParamByName('C').AsInteger := 10;
DataSet.ParamByName('Text').AsString := 'Ahoj';
DataSet.ExecSQL;
a tam prave ta ':' znamena nazev parametru - a to ty musis zakazat.
------
ing. Pavel �ilinec
mailto:zilinec(zv)email(tec)cz
21.12.2001 Ales Vasicek:
> mam problem se spoustenim ulozenych procedur pres Adonis.
> DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj'', 1';
> DataSet.ExecSQL;
> Tohle projde v pohode. Jakmile napisu treba:
> DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj"'', 1';
> tak to projde taky, ale v pripade ze napisu:
> DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj:"'', 1'; // pridam
> dojtecku nakonec retezce, tak to spadne na 'Arguments are wrong type,
> are out of acceptable range, or are in conflict with one another.'.
> Proc tam nemuze byt ta dvojtecka? Ja ji tam chci. Tusim ze to bude
> problem s parametrem ulozene procedury, ale snad pokud mam retezec
> uzavreny do apostrofu NESMI mi s tim ADO cokoliv delat! Jak to mam
> vyresit? Pokud vyhodim pryc tu uvozovku tak to zase jede...ADO p�i instalaci?
[*] JIM Design <jim.design(zv)iol(tec)cz> - 21.12.2001 14:05:38
Ahoj,
ADO je soucasti MSIExplorera 4 a vyse, taky je soucasti MDAC, takze vetsina
kompu to ma.
Me se osvedcilo detekovat MDAC verzi na prislusnem kompu a kdyz je nizsi,
nebo zadna tak tam automaticky nainstalovat MDAC2.5
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of aldik(zv)quick(tec)cz
Sent: Thursday, December 20, 2001 6:31 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: ADO p�i instalaci?
Jak je t s Adem musim ho instalovat p�i dod�v�n� sv� aplikace na jin�
PC?Li#�
se n�jak verze?
D�ky
Aldik Pavel
D5 Ent W2000
Ulozene procedury a adonis
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 21.12.2001 14:16:16
----- Original Message -----
From: "ing. Pavel �ilinec" <zilinec(zv)email(tec)cz>
> Dej si predtim jeste DataSet.ParamCheck := False.
> Je totiz mozny i takovyto zapis:
>
> DataSet.SQL.Text := 'MSP_InsertItem :A, :B, :C, :Text';
> DataSet.ParamByName('A').AsInteger := 1;
> ...
> DataSet.ExecSQL;
>
> a tam prave ta ':' znamena nazev parametru - a to ty musis zakazat.
Ja jsem se setkal s chybou v preparu SQL prikazu
SELECT * FROM <tabulka>
WHERE
(<sloupec> = :A) OR (:A IS NULL)
Padlo to na chybu ze parametr :A je neznameho typu, zrejme
parser ktery rozebira SQL nemohl zjistit podle porovnani
:A IS NULL jakeho je typu. Jednalo se o Interbase 6.0 a
IBX komponenty.
Sice jsme to nejak vyresili ale zajimalo by me jak to funguje
na jinych serverech.
Martin Schayna
Menu designer v runtime
[*] Str�n�k Franti�ek - 21.12.2001 14:28:29
Pratele,
nevite nekdo o komponente, ktera by umoznovala za behu programu uzivateli si samostatne dovytvaret (dodizajnovat) polozky menu ?
(Subpolozky menu nesmi zmizet po odkliknuti)
Diky za radu
Franti#ek STR#N#K
mailto:FSTRANIK(zv)CPOJ.CZ
Ulozene procedury a adonis
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 21.12.2001 14:31:34
A proc rovnou nepouzivas ADOStoreProcedure
ADOStoreProcedure1.Connection:=ADOConnection1;
ADOStoreProcedure1.ProcedureName:='MSP_InsertItem;1';
//1, 1, 10, ''Ahoj''
ADOStoreProcedure1.Parameters[1].Value:=1;
ADOStoreProcedure1.Parameters[2].Value:=1;
ADOStoreProcedure1.Parameters[3].Value:=10;
ADOStoreProcedure1.Parameters[4].Value:='Ahoj';
ADOStoreProcedure1.Prepared:=true;
try
ADOStoreProcedure1.ExecProc;
except
MessageDlg('SQL error !!!',mtError,[mbOk],0);
end;
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
ICQ : 13367373990
+420605/813644
>>> vasicek(zv)ecommerce(tec)cz 21.12.01 12:29 >>>
Ahoj,
mam problem se spoustenim ulozenych procedur pres Adonis.
Priklad:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj'', 1';
DataSet.ExecSQL;
Tohle projde v pohode. Jakmile napisu treba:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj"'', 1';
tak to projde taky, ale v pripade ze napisu:
DataSet.SQL.Text := 'MSP_InsertItem 1, 1, 10, ''Ahoj:"'', 1'; // pridam
dojtecku nakonec retezce, tak to spadne na 'Arguments are wrong type,
are out of acceptable range, or are in conflict with one another.'.
Proc tam nemuze byt ta dvojtecka? Ja ji tam chci. Tusim ze to bude
problem s parametrem ulozene procedury, ale snad pokud mam retezec
uzavreny do apostrofu NESMI mi s tim ADO cokoliv delat! Jak to mam
vyresit? Pokud vyhodim pryc tu uvozovku tak to zase jede...
Ales OT: PF 2002
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 21.12.2001 14:47:02
Vazeni pratele vyvojari,
preji Vam klidne a prijemne proziti svatku vanocnich,
mnoho osobnich i pracovnich uspechu, hodne stesti
a hlavne pevne zdravi v nastavajicim roce 2002.
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================Jak vytvorit ODBC User Data Source za b�hu?
[*] Roman Netu�il <netusil.roman(zv)vspardubice(tec)cz> - 21.12.2001 15:04:28
Panove,
potreboval bych zjistit, jak vytvorit novy User Data Source pro ODBC primo z Delphi aplikace. Potrebuji bytvorit nove pripojeni pro ODBC Microsoft Visual FoxPro Driver a nastavit prislusne parametry, ale nechci s tim otravovat uzivatele. Aplikace by si to mela osetrit sama.
Diky.
D6Prof, W98
netusil.roman(zv)vspardubice(tec)cz
Ulozene procedury a adonis
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 21.12.2001 15:07:16
Toto je Interbazou (ini parser za to nemoze). Parameter nesmie byt testovany
na "is null".
Ale toto iste robi :-( i Firebird
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
> Ja jsem se setkal s chybou v preparu SQL prikazu
>
> SELECT * FROM <tabulka>
> WHERE
> (<sloupec> = :A) OR (:A IS NULL)
>
> Padlo to na chybu ze parametr :A je neznameho typu, zrejme
> parser ktery rozebira SQL nemohl zjistit podle porovnani
> :A IS NULL jakeho je typu. Jednalo se o Interbase 6.0 a
> IBX komponenty.
>
> Sice jsme to nejak vyresili ale zajimalo by me jak to funguje
> na jinych serverech.
Jak vytvorit ODBC User Data Source za b�hu?
[*] Tom Lebr <tom.lebr(zv)volny(tec)cz> - 21.12.2001 15:49:41
Dobry den,
podobny problem se da obejit bez vytvareni DSN, pouzivate-li ADO, kdyz se do connection stringu sikovne napise jmeno driveru
jak je to v pripade FoxPro je popsane tady: http://www.able-consulting.com/ADO Conn.htm#ODBCDriverForVisualFoxPro a taky http://msdn.microsoft.com/library/default.asp?url=/library/en-us/odbc/htm/vfpodbcvisualfoxproodbcdriveroverview.asp - ja to potreboval pro Excel :( ale v podstate staci prepsat jmeno driveru a jmeno souboru nemusi byt v [] protoze nejsou sheety
uses
... ComObj, ADODB TLB, ExtCtrls,...
const
SELECTSTRING = 'SELECT * FROM [%s$]';
CONSTRING = 'Driver={Microsoft Excel Driver (*.xls)}; DriverId=790; DBQ=%s; DefaultDir=%s;';
...
var
oConn: Connection;
rsImport, rsPlochy: RecordSet;
...
OleCheck(CoCreateInstance(CLASS Connection, nil, CLSCTX ALL, IID Connection, oConn));
OleCheck(CoCreateInstance(CLASS RecordSet, nil, CLSCTX ALL, IID RecordSet, rsImport));
DSN := Format(CONSTRING, [fpath+fname+'.xls', fpath]);
sql := Format(SELECTSTRING, [fname]);
oConn.Open(DSN, '', '', adConnectUnspecified);
rsImport.Open(sql, oConn, adOpenForwardOnly, adLockOptimistic, adCmdUnspecified);
while not rsImport.EOF do begin .. atd
----- Original Message -----
From: Roman Netu#il
To: DELPHI-Konference
Sent: Friday, December 21, 2001 3:04 PM
Subject: Jak vytvorit ODBC User Data Source za b�hu? Panove,
potreboval bych zjistit, jak vytvorit novy User Data Source pro ODBC primo z Delphi aplikace. Potrebuji bytvorit nove pripojeni pro ODBC Microsoft Visual FoxPro Driver a nastavit prislusne parametry, ale nechci s tim otravovat uzivatele. Aplikace by si to mela osetrit sama.
Diky.
D6Prof, W98
netusil.roman(zv)vspardubice(tec)cz
Jak vytvorit ODBC User Data Source za behu?
[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 21.12.2001 16:42:58
> podobny problem se da obejit bez vytvareni DSN,
> pouzivate-li ADO, kdyz se do connection stringu
> sikovne napise jmeno driveru
> ...
> const
> SELECTSTRING = 'SELECT * FROM [%s$]';
> CONSTRING = 'Driver={Microsoft Excel Driver (*.xls)}; DriverId=790;
DBQ=%s; DefaultDir=%s;';
Uplne stejny connection string lze pouzit i v ODBC,
staci na misto funkce SQLConnect pouzit SQLDriverConnect
Daniel
OT: Ctecka cipovych karet
[*] Ji�� �edivec <comm(zv)post(tec)cz> - 21.12.2001 19:46:15
Dobry den.
Potrebuji koupit ctecku cipovych karet. Mohli byste mi poradi nejaky typ, na ktery se velmi dobre programuje obsluzny program v Delphi...
Diky moc za odpoved.
Comm
---
4.12.2001 V.I.P. Chat Live s
Terry Gilliamem - MONTY PYTHON
http://chat.volny(tec)cz
Ctecka cipovych karet
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 21.12.2001 20:54:53
Jojo, taky by me to zajimalo ... Jeste lepsi (pro me) by byl pouze nejaky
levny terminal pripojitelny primo na PC (napr. RS232) a ktery by
"odchytaval" bezdotykove karty. Uz jsem se tim trosku zaobiral, ale napr.
pro Dallasy vim pouze o karte do ISA slotu, coz uz dnes ma bude jenom super
masina nebo vrak ;-)
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
hot-line 0776/677776, 0608/944444
tel. 0467/521555, 0467/520141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
> -----P�vodn� zpr�va-----
> Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> u�ivatele Ji�� ?edivec
> Odesl�no: 21. prosince 2001 19:46
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: OT: Ctecka cipovych karet
>
>
> Dobry den.
>
> Potrebuji koupit ctecku cipovych karet. Mohli byste mi poradi
> nejaky typ, na ktery se velmi dobre programuje obsluzny
> program v Delphi...
>
> Diky moc za odpoved.
>
> Comm
> ---
> 4.12.2001 V.I.P. Chat Live s
> Terry Gilliamem - MONTY PYTHON
> http://chat.volny(tec)cz
Firebird a funkcia MAX
[*] Roland Turcan <rolo(zv)sedas.sk> - 21.12.2001 21:10:37
Ahojte skuste dat takyto prikaz na FireBird, vtedy ak je tabulka prazdna, ak
je aspon jeden zaznam tak je vsetko OK:
SELECT extract(year from max(rok_do)+1),extract(month from max(rok_do)+1)
FROM tabulka;
mne to sposobuje "connection lost to database"
a vam ?
Dakujem
S pozdravom
Roland Turcan - amatersky programator
D5Pro, Firebird 1.0, IBX4.62, Win2000Pro/CZ, Win98CZSE
OT- Fiskalny danovy rok v CR
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 22.12.2001 02:28:22
Zdravim,
tato otazka zde asi vubec nepatri.
Zmenu danoveho roku si neurcujes ty, ale musiz zazadat prislusny danovy
urad, a beztak se to tebe asi netyka, protoze muj danovy poradce mi na to
odpovedel, ze na zmenu danoveho roku v nasi zemi ma narok tak akorat
zemedelci.
Pavel
> Ked sa v CR rozhodnem zmenim danovy rok na napr. 5/2003-4/2004.
> Co sa udeje:
>
> Nakazu mi aby som isiel este 1/2002-12/2002, potom mi stanovia ze
> 1. dalsi rok bude len 4 mesiace z 2003, a potom ako som chcel
> 2. dalsi rok mi predlzia od 1/2003-4/2004 t.j. 16 mesiacov
>
> Dakujem.
>
> S pozdravom
>
> Roland Turcan
Posielanie SQL emailom
[*] Viliam Mlich <vmlich(zv)mbox.vol(tec)cz> - 22.12.2001 08:09:48
Hello All!
Pred chvilou som cital v zahranicnej konferencii zaujimavu spravu. Niekto
posielal subor .SQL ako attach Outlook Expresom. Jeden z riadkov .SQL
zacinal slovom 'From' s velkym pismenom na zaciatku a ktosi po ceste mu to
prerobil na '>from'. Neskumal som, netestoval, ale dajte si na to bacha.
Bye
V.Mlich http://www.rar(tec)cz
TWebBrowser a Scrollbar
[*] PSG2 <svorcko(zv)pd.psg.sk> - 22.12.2001 23:10:26
Ahojte,
Potreboval by som poradit ako zakazat komponente TWebBrowser
zobrazovanie vertikalneho ScrollBaru. (Aj ked ho nie je treba, tak sa tam
stale nachadza a je len disabled)
Skusal som windowsovsku API funkciu ShowScrollBar nasledovne:
a)
//neurobi nic
procedure TMainForm.Button1Click(Sender: TObject);
begin
ShowScrollBar(WebBrowser.Handle,SB_BOTH,false);
end;
b)
//zmizne cely WebBrowser
procedure TMainForm.Button1Click(Sender: TObject);
begin
ShowScrollBar(WebBrowser.Handle,SB_CTL,false);
end;
//Tu by mal byt prvy parameter asi Handle daneho scrollbaru, ale ako
ho ziskat?
c)
//vyhodi chybu "Project Project1.exe raised exception class
EOleException with message 'Nespecifikkovana chyba'. Process stopped.
Use Step or Run to continue."
procedure TMainForm.Button1Click(Sender: TObject);
begin
ShowScrollBar(WebBrowser.HWND,SB_BOTH,false);
end;
Dakujem,
Ing. Peter Svorc mailto:svorcko(zv)pd.psg.sk
Posielanie SQL emailom
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 23.12.2001 01:56:38
Znate nedko nejakou dobrou komponentu pro komunikaci pres seriovy port
(COM1 - jako mys)?
Petr Voborn�k
vobornik(zv)mikmik(tec)cz
ICQ#: 23132120
http://www.mikmik(tec)cz
Firebird a funkcia MAX
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 23.12.2001 15:08:49
> Ahojte skuste dat takyto prikaz na FireBird, vtedy ak je tabulka prazdna,
ak
> je aspon jeden zaznam tak je vsetko OK:
> SELECT extract(year from max(rok_do)+1),extract(month from max(rok_do)+1)
> FROM tabulka;
> mne to sposobuje "connection lost to database"
Ahoj,
podle mne by spravne melo byt:
SELECT extract(year from max(rok_do))+1,extract(month from max(rok_do))+1
FROM tabulka, protoze to, co delas ty, zveda o jednicku datum a tim Ti to
zvedne den, ne rok.
Ovsem to nic nemeni na problemu, ze to shodi spojeni, cili da se rici, ze se
asi jedna o bug.
Ten muj priklad funguje, nepada a vraci NULL (db dialect3 na Linux
FB1.0.0.RC2-IO64 / IBO).
Jeste upozorneni, na http://firebird.sourceforge.net je RC2.
Je tam i 64-bitova IO verze pro Linux !!!
Hezke Vanoce vsem,
Leos
Resize component
[*] Ale� Pavel <Aldik(zv)quick(tec)cz> - 23.12.2001 20:02:55
Ahoj kluci,potreboval bych za behu menit velikost a pozici komponent mysi, pozici umim,jak to ale udelam aby se vizualni komponenta chovala jak form a bylo mozne ji roztahovat a stahovat?Existuje na to nejaka API?
Dekuji moc Ales Pavel
Vecny amater W2000 D5Ent
TabOrder a Visible ?
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 24.12.2001 05:45:08
Zdravim,
mam nekolik komponent v danem poradi, ktere se nesmi menit (Panel, DBGrid
apod.), nastavene vsechny na Align=alTop.
V prubehu programu nektere komponenty vypinam (Visible := false) a opetovne
zapinam (Visible := true).
Bohuzel se mi ale zacina menit poradi jednotlivych komponent. Jak to udelat,
aby mi Visible nemenilo poradi v zobrazeni. Nastaveni TabOrder nepomaha.
Diky Pavel
----- KOPR software -----
Pavel ZIDEK
http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz
IPX
[*] <bukaj(zv)iol(tec)cz> - 25.12.2001 21:12:56
Dobry den,
shanim nejake zdrojaky k IPX, a jak tento protokol zakomponovat do programu.
Dik za vsechny rady.
Kuba
zmena fontu
[*] Tom� N�mec - 26.12.2001 16:05:37
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
Nevi nahodou nekdo jak zmenit font v cizi aplikaci?
Zkousel jsem SendMessage(targethandle,WM SETFONT,fonthandle,1); ale to zmeni font na systemovy ... funguje to pouze ve Wordpadu (zahadno proc).
Diky,
Tomas Nemec
Word server problem
[*] Tom� N�mec - 26.12.2001 16:07:30
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
Nevite nahodou nekdo jak mam poslat nejake nestandardni znaky do wordu?
pres worddocument.range.insertafter(string); mi nejde poslat znaky jako #0213 (o s vlnkou) misto toho se to premapuje na o s dvema carkami.plovou menu v IE
[*] Pe�ek Martin <pesek.martin(zv)mymail(tec)cz> - 26.12.2001 16:24:40
Zdravim!
Jak se da udelat menu, ktere by bylo uvnitr Internet Exploreru jako treba zde http://www.google.com/ie ? Mam dojem, ze to nabizi i atlas.
Predek dik.
S pozdravem Martin Pesek.Malickost
[*] Pesek Michal <Michal.Pesek(zv)MNUL.CZ> - 26.12.2001 17:10:21
Hi,
ale pokud mne pamet neklame tak TLabel ma property Trasparent.
S pozdravem
Michal PEPR Pesek
http://www.peprsoft(tec)cz
.. -----Original Message-----
.. From: Martin �d�rsk� [mailto:zdary(zv)seznam(tec)cz]
.. nej text. Ale u Labelu nejde nastavit prusvitny pozadi. Jedine reseni
OT: Malickost
[*] Martin #d�rsk� <zdary(zv)seznam(tec)cz> - 26.12.2001 17:11:24
Ahoj, mam jeden hloupy problem. Potrebuju na pozadi obrazek a pres
nej text. Ale u Labelu nejde nastavit prusvitny pozadi. Jedine reseni
me napadlo pres Paintbox.canvas. ... To je ovsem dost nepohodlne.
Diky
Martin
______________________________________________________________________
Poctenicko pro kazdy den: http://www.novinky(tec)cz
Sobory v databazi
[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 26.12.2001 19:09:24
Primo nejaky kratky prikladek by nebyl? Jak rikam, jsem v databazich uplny
zacatecnik, takze nejak moc nevim, jak na to.
Diky
Vasek
PS. Jinak je mi jedno, co to bude za databazi. Jen proste potrebuju do
databaze dostat a pote z ni zase vybrat nejake soubory
> Jaka DB?
> Plati ale ze to urobis pomocou TMemoFieldu resp TBlobFieldu metodami
> LoadFromStream a SaveToStream.
> Napriklad:
>
> urobis SQL Query.SQL.Text := 'INSERT INTO XXXX (FIELDNAME) VALUES
(:pFIELD)'
> preparnes a pomocou
Query.ParamByName('pFIELD').LoadFromStream(FileName);...
>
> Kaka�ka Pavol
> KasiX(zv)atlas(tec)cz
>
>BDE alternativa?
[*] Jan Novak <megamax(zv)seznam(tec)cz> - 26.12.2001 20:44:21
Ahoj,
Podobny dotaz uz tady sice byl, ale v konferenci jsem nenasel vyhovujici
odpoved:
programuji malou Freeware aplikaci, kde je zapotrebi skladovat z�znamy
formou databaze (jednoduch� adresar osob). Nechce se mi pou��vat "velkou"
datab�zi s (BDE nebo pod.), pot�eboval bych nejakou free komponentu (program
bude taky free), ktera by bez nutnosti cokoliv dalsiho instalovat toto
zvladala. Nevi nekdo zkusenejsi o necem?
Diky za odpoved.
Pavel Novak
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.295 / Virov� b�ze: 159 - datum vyd�n�: 1.11.2001
Ctecka cipovych karet
[*] David Kallab <kallab(zv)seznam(tec)cz> - 26.12.2001 22:39:58
Pred nejakym casem jsem podobny problem resil prez tuto konferenci. A bez
uspokojiveho vysledku.
Bylo by dobre blize specifikovat co ocekavas od ctecky (nebo spis od samotne
cipove karty). Drive zde padla informace (pravdiva), ze je mozne pristupovat
na kartu pomoci cryptoAPI. Priklady k tomu jsou pouze v C (jine jsem
nenasel). Pro svou aplikaci jsem pouzil ctecky GemPlus (rada 4x0) od firmy
Monet (www.monetplus(tec)cz) pro cipove karty. Cena karty je kolem 1000.-, nebo
setu ctecky a karty kolem 2000.-. Cipova karta je univerzalni a umoznuje
napriklad ulozeni cetifikatu vydaneho certifikacni autoritou, viz. napr.
www.ica(tec)cz
Vzhledem k tomu, ze byl realizovany nakup nekolika desitek karet (a jen o
neco mene ctecek), byl dle domluvy s technickou podporou firmy dodan sw pro
pristup k nekterym moznostem karty. Zdrojak je v D3. Je to ve sve podstate
demo, ale velice rad jej poskytnu az po dohode s autory.
Pro uplnost dodavam, ze dodavatelu techto karet a ctecek je na nasem trhu
nekolik a nemam zadny vztah k firme Monet nebo 1.CA :-)
Dalsi konkretni dotazy smerujte na privatni mail kallab(zv)seznam(tec)cz
Zdravi DaK
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Ji�� ?edivec
Sent: Friday, December 21, 2001 7:46 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: OT: Ctecka cipovych karet
Dobry den.
Potrebuji koupit ctecku cipovych karet. Mohli byste mi poradi nejaky typ, na
ktery se velmi dobre programuje obsluzny program v Delphi...
Diky moc za odpoved.
Comm
---
4.12.2001 V.I.P. Chat Live s
Terry Gilliamem - MONTY PYTHON
http://chat.volny(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.310 / Virov� b�ze: 171 - datum vyd�n�: 19.12.2001
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.310 / Virov� b�ze: 171 - datum vyd�n�: 19.12.2001
BDE alternativa?
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.12.2001 05:20:31
Pokud ti staci format DBF, pouzij komponentu TDBF. Je to free
komponenta na praci s DBF formatem, umi indexy a napotrebuje BDE.
Najdes ji na http://tdbf.casdb.com/
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
26.12.2001 Jan Novak:
> programuji malou Freeware aplikaci, kde je zapotrebi skladovat z�znamy
> formou databaze (jednoduch� adresar osob). Nechce se mi pou��vat "velkou"
> datab�zi s (BDE nebo pod.), pot�eboval bych nejakou free komponentu (program
> bude taky free), ktera by bez nutnosti cokoliv dalsiho instalovat toto
> zvladala. Nevi nekdo zkusenejsi o necem?OT : Windows scripting host
[*] tomsir1.edu(zv)mail.cez(tec)cz - 27.12.2001 07:30:04
Kde bych nasel nejakou dobrou tistenou dokumentaci /ucebnici/ k %SUBJ%
Diky Radegast
Obrazky v Imagelistu a v samotne DLL
[*] <kuchar(zv)unicodesys(tec)cz> - 27.12.2001 08:26:46
caute,
mam velke mnozstvi obrazku ulozenych v TImageList, kdyz to skompiluji primo
tak vysledny exe soubor je nehorazne velky, proto bych to chtel umistnit do
smostatne knihovny, mam to udelane a funguje to ale moc se mi to nepozdava,
pri vytvareni knihovny jsem si vytvoril novy unit s tformem a na nej jsem
umistnil komponentu TImageList a TImage a pomoci nasledujiciho kodu predavam
me aplikaci prislusny obrazek :
----------------------------------------------------------------------------
-------------
//kod kterym v hlavnim programu nacitam obrazky z prislusne knihovny
>function obr(c:integer):tbitmap; external 'imagedll.dll';
>
>procedure TForm1.Button1Click(Sender: TObject);
>begin image1.Picture.Bitmap:=obr(s); //s je poradove cislo obrazku
>end;
----------------------------------------------------------------------------
-------------
//knihovna
>library imagedll;
>
>uses sharemem,SysUtils,Classes,Unit1 in 'Unit1.pas' {Form1};
>
>exports obr;
>
>{$R *.RES}
>begin
>end.
//unit s umistnenymi komponentami TImageList, TImage
.
.
.
>function obr(c:integer):tbitmap;export;
>
>implementation
>
>{$R *.DFM}
>
>function obr(c:integer):tbitmap;
>begin form1:=tform1.create(nil);
> form1.ImageList1.GetBitmap(c,form1.image1.Picture.Bitmap);
> result:=form1.image1.Picture.Bitmap;
> form1.close;
>end;
----------------------------------------------------------------------------
------------
na celem tomhle kodu se mi nelibi to neustale vytvareni formu v knihovne ( i
kdyz se nezobrazuje ) a osobne si myslim ze to musi jit udelat jeste jinak,
tak pokud vite tak poradte, prakticka ukazka mi neublizi.
DIK
OT- Fiskalny danovy rok v CR
[*] HTK Pro s.r.o. <delphi(zv)htkpro(tec)cz> - 27.12.2001 10:31:24
>Zdravim,
>tato otazka zde asi vubec nepatri.
>Zmenu danoveho roku si neurcujes ty, ale musiz zazadat prislusny danovy
>urad, a beztak se to tebe asi netyka, protoze muj danovy poradce mi na to
>odpovedel, ze na zmenu danoveho roku v nasi zemi ma narok tak akorat
>zemedelci.
>Pavel
Dobry den,
Nejlepsi by bylo zmenit danoveho poradce. O zmenu fiskalniho roku muze
pozadat jakakoliv firma, ktera splnuje pozadavky dane zakonem a prislusny
financni urad ji musi vyhovet. Mame nekolik zakazniku, kteri uz maji
fiskalni rok nastaveny podle materske zahranicni spolecnosti a vse probehlo
bez problemu. V prechodnem obdobi se zpravidla zkracuje aktualni fiskalni
rok (stale jeste kalendarni), pak se provede mimoradna ucetni zaverka a pote
se zacne s novym fiskalnim rokem treba od 1.5. Samozrejme nelze tuto zmenu
provest v zari kdyz chci zacinat od kvetna, tam je treba pockat na pristi
rok. U prechodu je pouze jeden problem a to ze na zpracovani mimoradne
ucetni zaverky je pouze jeden mesic, ale to se da zvladnout. Fiskalni rok
nemuze trvat dele jak 12 mesicu.
S pozdravem
Jan Kadlecek
HTK Pro s.r.o.
www.htkpro(tec)cz
www.dev-shop(tec)cz
>
>> Ked sa v CR rozhodnem zmenim danovy rok na napr. 5/2003-4/2004.
>> Co sa udeje:
>>
>> Nakazu mi aby som isiel este 1/2002-12/2002, potom mi stanovia ze
>> 1. dalsi rok bude len 4 mesiace z 2003, a potom ako som chcel
>> 2. dalsi rok mi predlzia od 1/2003-4/2004 t.j. 16 mesiacov
>>
>> Dakujem.
>>
>> S pozdravom
>>
>> Roland Turcan
>
>
>Resize component
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 27.12.2001 10:47:34
Odes�latel: Ale# Pavel <Aldik(zv)quick(tec)cz>
Ahoj kluci,potreboval bych za behu menit velikost a pozici komponent mysi, pozici umim,jak to ale udelam aby se vizualni komponenta chovala jak form a bylo mozne ji roztahovat a stahovat?Existuje na to nejaka API?
Nevim, jestli existuje nejake API, asi tezko.
Ja jsem si to zprogramoval sam
-
OnMouseDown - zacatek
-
OnMouseMove - vlastni roztazeni
-
OnMouseUp - konec
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================Firebird a funkcia MAX
[*] Roland Turcan <rolo(zv)sedas.sk> - 27.12.2001 15:21:29
----- Original Message -----
From: "Leos Urban" <Leos.Urban(zv)iol(tec)cz>
Sent: Sunday, December 23, 2001 3:08 PM
> > Ahojte skuste dat takyto prikaz na FireBird, vtedy ak je tabulka
prazdna,
> ak
> > je aspon jeden zaznam tak je vsetko OK:
> > SELECT extract(year from max(rok_do)+1),extract(month from
max(rok_do)+1)
> > FROM tabulka;
> > mne to sposobuje "connection lost to database"
>
> Ahoj,
> podle mne by spravne melo byt:
> SELECT extract(year from max(rok_do))+1,extract(month from max(rok_do))+1
> FROM tabulka, protoze to, co delas ty, zveda o jednicku datum a tim Ti to
> zvedne den, ne rok.
> Ovsem to nic nemeni na problemu, ze to shodi spojeni, cili da se rici, ze
se
> asi jedna o bug.
>
> Ten muj priklad funguje, nepada a vraci NULL (db dialect3 na Linux
> FB1.0.0.RC2-IO64 / IBO).
>
> Jeste upozorneni, na http://firebird.sourceforge.net je RC2.
> Je tam i 64-bitova IO verze pro Linux !!!
> Leos
Ahoj. Ale ja viem ze mam v ROK_DO posledny den mesiaca a ja chcem
inkrementovat ten datum o jeden den a dostanem prvy den dalsieho mesiaca a z
toho si chcem extrahovat mesiac a rok. Ale este raz podotykam ze ak je v
tabulke aspon jeden zaznam tak to funguje, ale ak je prazdna tak padne
spojenie so serverom.
Roland.Cesta k exaci pomoci handle jeho okna
[*] <korin.delphi(zv)centrum(tec)cz> - 27.12.2001 22:45:51
Dobry den,
potrebuji zjistit cestu aplikace, ktera jiz bezi v pameti. Jedine
co mam je handle nejakeho jejiho okna.
priklad :
var h:thandle;s:string;
h:=findwindow('ieframe',nil); {nekde zjistim handle okna internet
exploreru}
...
s:=getexename(h); {takovou procedurku potrebuji.. zkousel sem to
pres toolhelp, ale ten nebyl spolehlivy}
Budu rad za kazdou radu
Ivan Novotny
-----
Nov� vyhled�va� pro �esk� internet www.webfast(tec)cz - prost� najde ...Cesta k exaci pomoci handle jeho okna
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 22:56:25
From: <korin.delphi(zv)centrum(tec)cz>
> potrebuji zjistit cestu aplikace, ktera jiz bezi v pameti. Jedine
> co mam je handle nejakeho jejiho okna.
Ahoj,
pouzij funkci GetProcessNameFromWnd v JclSysInfo:
http://delphi-jedi.org/Jedi:CODELIBJCL
Petr Vones
BDE alternativa?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 22:59:53
From: "Jan Novak" <megamax(zv)seznam(tec)cz>
> programuji malou Freeware aplikaci, kde je zapotrebi skladovat z�znamy
> formou databaze (jednoduch� adresar osob). Nechce se mi pou��vat "velkou"
> datab�zi s (BDE nebo pod.), pot�eboval bych nejakou free komponentu (program
> bude taky free), ktera by bez nutnosti cokoliv dalsiho instalovat toto
> zvladala. Nevi nekdo zkusenejsi o necem?
Ahoj,
1. TClientDataSet
2. Vlastni binarni format, aneb seznam objektu ktery bude persistentni
Petr Vones
FAQ:Wininit.ini
[*] <korin.delphi(zv)centrum(tec)cz> - 27.12.2001 23:01:21
Toto je spise rada pro nezkusene programatory co chteji prepsat
exac jiz spustene aplikace, ci nejake ddl(win9x,ME). Vetsina
programatoru to dela tak ze do autoexecu nacpe nejake nesmysly
ktere to po startu prejmenuji, ale jde to udelat mnohem
jednoduseji :
1. Vytvorte soubor c:\windows\wininit.ini
2. udelejte sekci [rename]
3. pote uz jen pridavejte polozky cilovysoubor=zdrojovysoubor
(napr. c:\windows\explorer.exe=c:\windows\temp\explorer.ex)
timto zpusobem se vyhnete rade potizi, ktere muzou po restartu
systemu nastat.
Vymaz souboru : nul=soubor_co_chci_zmazat.. :)
-----
Nov� vyhled�va� pro �esk� internet www.webfast(tec)cz - prost� najde ...Obrazky v Imagelistu a v samotne DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 23:02:06
From: <kuchar(zv)unicodesys(tec)cz>
> mam velke mnozstvi obrazku ulozenych v TImageList, kdyz to skompiluji primo
> tak vysledny exe soubor je nehorazne velky, proto bych to chtel umistnit do
> smostatne knihovny, mam to udelane a funguje to ale moc se mi to nepozdava,
Ahoj,
obrazky pro imagelist lze hromadne ulozit do jedne bitmapy a tu pak nahrat
jako resource z te DLL pomoci TCustomImageList.ResInstLoad
Petr Vones
plovou menu v IE
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 23:11:18
From: "Pe#ek Martin" <pesek.martin(zv)mymail(tec)cz>
> Jak se da udelat menu, ktere by bylo uvnitr Internet Exploreru jako treba
> zde http://www.google.com/ie ? Mam dojem, ze to nabizi i atlas.
Ahoj,
http://www.euromind.com/iedelphi/ie5tools/bandobjects.htm
Petr Vones
IPX
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 23:11:55
From: <bukaj(zv)iol(tec)cz>
> shanim nejake zdrojaky k IPX, a jak tento protokol zakomponovat do programu.
> Dik za vsechny rady.
Ahoj,
http://www.maxivamoto.narod.ru/DelphiComponents/ipxspx.htm
Petr Vones
Posielanie SQL emailom
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.2001 23:13:06
From: "Petr Voborn�k" <vobornik(zv)ssakhk(tec)cz>
> Znate nedko nejakou dobrou komponentu pro komunikaci pres seriovy port
Ahoj,
napriklad http://sourceforge.net/projects/asyncfree
Petr Vones
OT: MP3 ve Windows XP
[*] Ing. Petr #vejda <lingvista(zv)lingvista(tec)cz> - 28.12.2001 09:52:11
Pot�ebuji v Delphi zpracovavat MP3 soubory a v te souvislosti me napadla
otazka, jak to dopadlo s MP3-kami ve Windows XP. Mluvilo se o tom, ze MS
omezi kvalitu jejich prehravani (z konkurencnich duvodu). Nemate nekdo
zpravy, jak to dopadlo?
Petr
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.310 / Virov� b�ze: 171 - datum vyd�n�: 19.12.2001
Windows CE a Delphi
[*] David Kallab <kallab(zv)seznam(tec)cz> - 28.12.2001 12:06:29
Zdravim
Je mozne vytvaret programy pomoci Delphi pro WindowsCE napriklad pro
Handheldy typu HP 720 Jornada?
Diky. DaK
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.311 / Virov� b�ze: 172 - datum vyd�n�: 27.12.2001
Windows CE a Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.12.2001 13:22:26
From: "David Kallab" <kallab(zv)seznam(tec)cz>
> Je mozne vytvaret programy pomoci Delphi pro WindowsCE napriklad pro
> Handheldy typu HP 720 Jornada?
Ne.
Petr Vones
Windows CE a Delphi
[*] David Kallab <kallab(zv)seznam(tec)cz> - 28.12.2001 14:59:45
Strucne a vystizne, v tom pripade je diskuse na toto tema v teto konferenci
asi tabu. Ale stejne se zeptam, VITE NEKDO O NEJAKEM NASTROJI VE KTEREM JE
MOZNE VYTVARET PROGRAMY PRO WINDOWS CE.
Diky DaK
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vones
Sent: Friday, December 28, 2001 1:22 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Windows CE a Delphi
From: "David Kallab" <kallab(zv)seznam(tec)cz>
> Je mozne vytvaret programy pomoci Delphi pro WindowsCE napriklad pro
> Handheldy typu HP 720 Jornada?
Ne.
Petr Vones
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.311 / Virov� b�ze: 172 - datum vyd�n�: 27.12.2001
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.311 / Virov� b�ze: 172 - datum vyd�n�: 27.12.2001
Windows CE a Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.12.2001 15:06:57
Puvodni zprava, kterou napsal David Kallab dne 28 Dec 2001:
> Strucne a vystizne, v tom pripade je diskuse na toto tema v teto
> konferenci asi tabu. Ale stejne se zeptam, VITE NEKDO O NEJAKEM NASTROJI
> VE KTEREM JE MOZNE VYTVARET PROGRAMY PRO WINDOWS CE.
http://www.microsoft.com/mobile/developer/default.asp
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================Windows CE a Delphi
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.12.2001 15:09:50
> Strucne a vystizne, v tom pripade je diskuse na toto tema v teto
konferenci
> asi tabu.
probiralo se to tady uz nekolikrat.
>Ale stejne se zeptam, VITE NEKDO O NEJAKEM NASTROJI VE KTEREM JE
> MOZNE VYTVARET PROGRAMY PRO WINDOWS CE.
nac ten krik?
MS urcite nejaky nastroj (variantu VC++ (Embeded Visual C++ ), Visual
Basic) prodava...
D. Toman
OT: RE: Windows CE a Delphi
[*] Kr�l Jirka jr. <admin(zv)printo(tec)cz> - 28.12.2001 15:14:51
>>Strucne a vystizne, v tom pripade je diskuse na toto tema v teto
konferenci asi tabu. Ale stejne se zeptam, VITE NEKDO O >>NEJAKEM NASTROJI
VE KTEREM JE MOZNE VYTVARET PROGRAMY PRO WINDOWS CE.
Muzes si u MS zadara pripostahnout tzv. Embedded Visual Tools
http://www.microsoft.com/mobile/downloads/emvt30.asp
Jirka
P.S. Je to sice OT, ale semo tamo se tu na to nekdo pta a tak to aspon najde
v archivu
Keywords: Windows CE, handheld
Cast obrazku na DXDraw
[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 28.12.2001 16:13:35
Zdravim!
Potrebuju nutne jednu radu. Tyka se to komponent DelphiX. V DXImageList mam
ulozenou bitmapu. Na obrazovce, tedy na DXDraw, vsak potrebuju zobrazit jen
cast toho obrazku - tzn. obdelnikovy vyrez obrazku, ktery je ulozeny v
DXImageList. Zkousel jsem, co me napadlo, ale nemuzu prijit na nejake
funkcni reseni. Muzete mi prosim nekdo pomoc?? - je to nalehave!
Diky
Vasek
MP3 ve Windows XP
[*] Hurricane <hurricane(zv)quick(tec)cz> - 28.12.2001 19:48:12
Zdravim
Nemej obavu. Prehravani neni omezeno. Jednalo se o to, ze WindowsMediaPlayer
bude sam o sobe prevadet CD->MP3 jen do urciteho bitratu. Na ostatni
prevadeci softy to nema vliv. Stejnak, kdo prevadi na MP3 ve WMP? Je to
omezeni pouze pro WMP (a pro BFU, kteri ho pouzivaji), ne pro format MP3.
Hurricane
----- Original Message -----
> Pot�ebuji v Delphi zpracovavat MP3 soubory a v te souvislosti me napadla
> otazka, jak to dopadlo s MP3-kami ve Windows XP. Mluvilo se o tom, ze MS
> omezi kvalitu jejich prehravani (z konkurencnich duvodu). Nemate nekdo
> zpravy, jak to dopadlo?Nacteny pole varbinary do streamu
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 28.12.2001 20:49:20
Zdravim,
uz se tu lopotim jakou dobu s takovou blbosti a ne a ne na to prijit. Mam v
MS SQL pole typu varbinary, do ktereho si nahravam obsah nejakeho streamu -
to je vse OK, v poradku se to ulozi, delam to pres parametr v query metodou
loadfromstream. Pak si ho ale nekdy potrebuju zase do toho streamu z pole
nacist, ale nejak se mi to nedari, uz jsem zkousel asi 10 moznosti a stale
nic.
Ma nekdo nejaky hotovy kus kodu ? Dik moc.
M.S.
Nacteni pole varbinary do streamu (part 2)
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 28.12.2001 22:08:14
Jeste doplnuji: V databazi je pole typu varbinary (je to MS SQL 2000) a
zkousim to cist touhle konstrukci:
var
BlobField: TField;
Stream: TStream;
begin
with TADOQuery.Create(nil) do
try
Connection := LokalniDatabaze;
SQL.Clear;
SQL.Add('SELECT TOP 1 Konfigurace FROM KONFIGURACE_TABLE ORDER BY Verze
DESC');
Open;
BlobField := FieldByName('Konfigurace');
Stream := CreateBlobStream(BlobField, bmRead);
try
DBGrid.Columns.LoadFromStream(Stream)
finally
Stream.Free
end;
Close;
finally
Free
end;
end;
Zarve mi to vzdy na radku CreateBlobStream a hlasi to "Invalid class
typecast". Zkousel jsem zamenit TField za TVarBytesField apod., ale bez
uspechu. Fakt nikdo netusi nejake reseni ?
Delphi 5, MS SQL 2000, ADO
vsechno servispakovany ;-)
ScrollBar a StringGrid
[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 29.12.2001 01:21:53
Dobry den,
Lze (a jak) memit sirku a vysku ScrollBaru u StringGridu?
Dekuji
Zdenek
deleni klaves u vice komponent
[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 29.12.2001 02:10:47
Na TForm jsou umisteny TEdit a TStringGrid.
Potrebuji nezavisle na focusu urcite klavesy posilat TEdit a jine
TStringGrid.
Zatim to mam resene tak, ze jsem predefinoval procedury TForm.KeyUp,
KeyDown, KeyPress a totez u TEdit a TStringGrid. V TForm.KeyUp dle podminek
volam bud TEdit.KeyUp nebo TStringGrid.KeyUp. Nejak tak to funguje, ale neni
to prilis elegantni reseni.
Nelze to resit predefinovanim TForm.WndProc? Jak?
Dekuji
Zdenek
Collbar v IE - Petr Vones
[*] Milan ��ek - 29.12.2001 20:01:04
Ahoj,
Take jsem se chtel pokusit urobit si vlastni listu do IE. Stahl jsem
priklad, kter� doporucil PetrV. Tento priklad ale vyzaduje jakousi unitu
SHDocVw_TLB.pas, kterou se mi sice podarilo na internetu najit, ale
zrejme v nejake jine verzi (1.1). Muzete mi nekdo poradit, co to je za
unitu a kde ji vzit, abych to mohl rozchodit?
Chybu to hlasi na techto radcich:
TControlData2(CControlData).FirstEventOfs:=Cardinal((zv)(zv)FOnBeforeNavigate)
-Cardinal(Self);
TControlData2(CControlData).FirstEventOfs:=Cardinal((zv)(zv)FOnStatusTextChang
e)-Cardinal(Self);
Diky
S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP1)
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Collbar v IE - Petr Vones
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 29.12.2001 21:41:38
> From: Milan #ݿek
>
> Take jsem se chtel pokusit urobit si vlastni listu do IE. Stahl jsem
> priklad, kter� doporucil PetrV. Tento priklad ale vyzaduje jakousi unitu
> SHDocVw_TLB.pas, kterou se mi sice podarilo na internetu najit, ale
> zrejme v nejake jine verzi (1.1). Muzete mi nekdo poradit, co to je za
> unitu a kde ji vzit, abych to mohl rozchodit?
A nestacilo by misto unitu SHDocVw_TLB
pouzit primo unit SHDocVw,
ktery je normalne soucasti D5 i D6 prof a vyssi?
Pokud by tam nebyl, melo by stacit naimportovat
ActiveX z SHDocVw.dll
Vaclav Krmela
Detekce Win XP a noveho designu
[*] Josef Semera <semera(zv)atlas(tec)cz> - 30.12.2001 12:49:15
Pouzivam titulkovy pruh k zobrazovani urcite informace ale ve WinXP mi
to kresli tam kam nechci. Jak se da zjistit ze ma uzivatel zapnuty NOVY
A KRASNY DESIGN WIN XP????
Diky Josef Semera
D5Prof Delay
[*] Raul Endymion <raul(zv)raphael(tec)cz> - 30.12.2001 20:29:35
Cau lidi,
potreboval bych poradit s necim jako delay..
Probelm je nasledujici pouzivam lcd display na lpt port. Pokud posilam
instrukce displayi ten vyzaduje pockat mezi nimi cca 0.5 ms (u
nekterych az 1.6 ms), delam to pres timer avsak to uz zavani
asynchronnim pristupem (aktualizuju-li kus displayem napriklad casem a
kus necim jinym), nebo frontou zprav, me ovsem staci synchornni
posilani, a proto bych rad neco co by nahradilo a zpresnilo
nasledujici radky..
procedure pause;
var time : cardinal;
begin
time := gettickcount;
repeat
application.processmessages;
until now - time > 1;
end;
pri tomhle leze zatizeni procesoru neuveritelne nahoru.. jiny program
k lcd zatezuje cca na 1-5 % kdezto muj 10-50%..
Poradte
Delay
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 30.12.2001 21:53:25
Najdi si v helpu funkci Sleep. ;-)
> potreboval bych poradit s necim jako delay..
> Probelm je nasledujici pouzivam lcd display na lpt port. Pokud posilam
> instrukce displayi ten vyzaduje pockat mezi nimi cca 0.5 ms (u
> nekterych az 1.6 ms), delam to pres timer avsak to uz zavani
> asynchronnim pristupem (aktualizuju-li kus displayem napriklad casem a
> kus necim jinym), nebo frontou zprav, me ovsem staci synchornni
> posilani, a proto bych rad neco co by nahradilo a zpresnilo
> nasledujici radky..
>
> procedure pause;
> var time : cardinal;
> begin
> time := gettickcount;
> repeat
> application.processmessages;
> until now - time > 1;
> end;
>
> pri tomhle leze zatizeni procesoru neuveritelne nahoru.. jiny program
> k lcd zatezuje cca na 1-5 % kdezto muj 10-50%..
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Komponenty pro DBF bez BDE
[*] Roman Netu�il <netusil.roman(zv)vspardubice(tec)cz> - 31.12.2001 10:01:45
Panove,
obracim se na Vas s dotazem, zda nevite o nejakych free komponentach pro pristup k tabulkam formatu DBF (DBase, FoxPro) pro Dephi6.
Diky
D6Prof, W98
Roman Netusil
netusil.roman(zv)vspardubice(tec)cz
Detekce Win XP a noveho designu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 31.12.2001 10:38:21
> Pouzivam titulkovy pruh k zobrazovani urcite informace ale ve WinXP
mi
> to kresli tam kam nechci. Jak se da zjistit ze ma uzivatel zapnuty
NOVY
> A KRASNY DESIGN WIN XP????
>
// WinXP
// Win32Platform 2
// Win32MajorVersion 5
// Win32MinorVersion 1
// Win32BuildNumber 2600 (win XP Pro - jak je to jinde nevim,
pro detekci neni podstatne)
Vi nekdo jak rozlisit WinXP Home, Pro ,... ??
jak zjistit nastaveny vzhled oken netusim...
D. Toman
Detekce Win XP a noveho designu
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.12.2001 13:10:28
Puvodni zprava, kterou napsal Dalibor Toman dne 31 Dec 2001:
> Vi nekdo jak rozlisit WinXP Home, Pro ,... ??
Nebude to v registru tady (jako u NT a W2K)?
System\CurrentControlSet\Control\ProductOptions
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================TStrigGrid and ScrollBars
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 31.12.2001 13:20:00
Zdravim,
Jak zrusit zobrazovani vertikalniho scrolbaru? Zobrazuje se mi stale, i kdyz grid neni zmensen. Funguje to jen kdyz vyberu horizontalni, nebo vertikalni, jenze to se mi pak ten druhy pri zmene nezobrazi vubec. Prijde mi ze ta volba both je nejaka ....:-( Dik
M&B
Detekce Win XP a noveho designu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 31.12.2001 13:53:38
>
> > Vi nekdo jak rozlisit WinXP Home, Pro ,... ??
>
> Nebude to v registru tady (jako u NT a W2K)?
>
> System\CurrentControlSet\Control\ProductOptions
>
tak nevim - koukal jsem na tu polozku v registru pod Win2k a WinXP a
obe tam maji jen:
ProductType = WinNT
(doufam, ze ten klic je z HKEY_LOCAL_MACHINE tree)
Radsi bych ale nejakou API fci....
D. Toman