Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
BDE - KeyViolation
[*] Jirka Virt <virt(zv)volny(tec)cz> - 25.1.2002 19:34:04
Ahoj,
dej to do udalosti tabulky
OnPostError
priklad...
function IsKeyViol(E:EDatabaseError;MessageF:boolean):boolean;
begin
result:=false;
if (E is EDBEngineError) then
begin
if (E as EDBEngineError).Errors[0].Errorcode = eKeyViol then
begin
result:= true;
if MessageF = true then
MessageBoxEx(0,'Tento z�znam ji� existuje','Duplicitn�
z�znam', MB_OK
+ MB_ICONWARNING,Lang_czech);
end;
end;
end;
......
procedure TForm1.Table1PostError(DataSet: TDataSet;E: EDatabaseError;E:
EDatabaseError; var Action: TDataAction);
begin
if IsKeyviol(E,True) then Abort;
end;
.....
Snad to staci
Jirka Virt
email: virt(zv)volny(tec)cz
----- Original Message -----
From: "Str�n�k Franti�ek" <FStranik(zv)cpoj(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 18, 2002 11:38 AM
Subject: RE: BDE - KeyViolation
a kam to vrazim ?
vraceni komponent z dll <- doplneni
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.1.2002 19:48:21
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> A kdyby to slo bez balicku :-) ... jsou "moc" delphi, chtel bych
> univerzalnejsi reseni, nebo snad muzu v C napsat BPL?
A jak by jsi chtel aby Delphi aplikace "vedela" o objektech z te DLL ? Zkratka
jinak to nejde. V C psat BPL nemuzes, protoze BPL obsahuje Delphi tridy. Ovsem
muzes napsal BPL v C++ Builderu, protoze umi prekladat i Object Pascal kod.
Otazkou zustava jaky to ma smysl.
Petr Vones
Stack tracer
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.1.2002 19:49:30
From: "Ivan Z" <izernovac(zv)zoznam.sk>
> Pozna niekto nejaky dobry free stack tracer?
Ahoj,
napriklad JclDebug v JCL http://delphi-jedi.org/Jedi:CODELIBJCL
Petr Vones
OT:Spojovac videa
[*] David Kraina <DKx(zv)Seznam(tec)cz> - 25.1.2002 20:12:46
Nazdar lidi,
potreboval bych pomoct - mam dve videa, obe se stejnym framerate a kodekem,
a potrebuji je spojit. VirtualDub je spojit nechce, ale existuji porgramy
primo na spojovani. Jednim zastaralym z nich je Peck's Power Join, ale ten
nap�e chybu error in read frame cislo. To bych sice chapal, ale chyba tam
neni, protoze vido se v pohode spousti a VirtualDub mi ten pry vadny frame
ukaze. Proto se ptam, jestli nekdo nevite o nejakem novejsim, nebo lepsim
programu. Moc diky za kazdou radu.
David Kraina, DKx
vedouc� n.v.t. MX-3
http://MX-3.w3.to
Support.MX-3(zv)Seznam(tec)cz
OT:XP vs. skins
[*] David Kraina <DKx(zv)Seznam(tec)cz> - 25.1.2002 20:15:16
Je WindowsXP skinovatelne ? Vim, ze vsechno to pekne na obrazovce je bitmapa
(taskbar,okna...), a take v zakladni instalaci ma tri skiny - modra,zelena a
stribrna. Nevite jestli nejsou na netu nekde skiny volne k stazeni ?
David Kraina, DKx
vedouc� n.v.t. MX-3
http://MX-3.w3.to
Support.MX-3(zv)Seznam(tec)cz
Dump from COM port to FILE
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 25.1.2002 20:25:59
> > Pokud chces ulozit komunikace z Casia tak je Hyperterminal k nicemu
> (nedoslo
> > mi to hned).
>
> Ja som nevedel ze je rozdiel komunikacie Casia a inych beznych zariadeni,
v zasade jsou dva typy komunikce:
1) zarizeni chrli data stale - typicky napriklad GPS prijimace,
ctecky caroveho kodu, digitalni vahy, atd
2) zarizeni odpovida na povely/dotazy.
(tefonni modem, diar casio,..)
> pouzit diar. Ale moj zamer je ocitat udaje z balickovacieho stroja a ten
> nemozem zobrat z vyroby a keby aj, do kancelarie by sa mi nezmestil :-);
nejlepsi je zkusit zjistit z dokumentace jak vlastne komunikuje (zda chrli
data
samo nebo vyzaduje nejaky dotaz).
pokud je jiz ten stroj k nejakemu PC pripojen (tj komunikace bezi), pak
muzes vlozit do kabelu
odbocku (koupit konektory a zbastlit spojku s odbockou) a tak dalsim PC
odposlechnout komunikaci.
D. Toman
Komunikace s mobilem
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 25.1.2002 21:19:09
> Servus vsem,
> nevite nekdo, kde bych sehnal informace o moznosti
> komunikace mobilu s PC?
Zalezi s JAKYM mobilem!
Treba s mymi oblibenymi Siemensy se komunikuje jako s modemem (mobil ma
zabudovany HW modem). Popis At prikazu je ke stazeni na strankach
siemensu. A na komunikaci staci libovolne komponenty na komunikaci se
seriovym portem, napriklad muj SynaSer, ktery ma i podporu pro AT
prikazy.
Pro kazdy druh mobilu to ale cele muze byt trosku jinak!
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Komunikace s mobilem
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 25.1.2002 22:25:20
From: "Rumcajs" <prajz.rumcajs(zv)quick(tec)cz>
> nevite nekdo, kde bych sehnal informace o
> moznosti komunikace mobilu s PC?
je-li tvuj zajem opravdovy, tak si urcite nastuduj ETSI normy
GSM 3.38 - GSM alpabets
GSM 3.40 - SMS - point-to-point protocol
GSM 7.05 - DTE-DCE interface
4SM 7.07 - AT commands for ME
jeste by se nasla par dalsich, ale tyhle jsou zakladno. Muzes je po
registraci emajlu stahnout z www.etsi.org.
Taky se muzes podivat na nas site www.callnet(tec)cz ;-)
Bye, pf
Komunikace s mobilem
[*] Marek Vilda Jelen <marek.jelen(zv)mybox(tec)cz> - 26.1.2002 09:43:36
http://www.builder(tec)cz
Vyslo tady p�r cl�nku o pr�ci se s�riov�m portem a mezi nimi i jak pracovat
s mobilem.
Marek Jelen
null v paradoxu
[*] Zden�k Sv�en - 26.1.2002 11:43:39
Zdravim,
potrebuju prepocitat pole v tabulce paradoxu7.
Chtel jsem udelat UPDATE pomoci SQL, ale to pole (s nazvem Pocet) muze byt i
null, takze kdyz ja udelam nasledujici konstrukci: Pocet=Pocet+neco, tak
null+neco=null.
Otazka je tedy jasna. Jak zaridit, aby se v tomto mem konkretnim dotazu null
nahrazovalo nulou?
Predem diky za reseni.
Zdenek
nezobrazit ScrollBars
[*] Zden�k Sv�en - 26.1.2002 11:43:38
Ahoj,
nevite nekdo, jak zakazat zobrazeni scroll baru (horizontalniho i
vertikalniho)?
Jde mi nejvice o komponentu DBGrid, uvitam vsak i postup, jak stejnou vec
zaridit v ListBoxu.
Moc dik.
Zdenek
Network
[*] Milos Veselovsky <milos(zv)seko.sk> - 26.1.2002 11:48:42
Zdravim odbornikov,
Prosim o radu:
potrebujem v klasickej windows sieti (cca 20 PC) vytvarat subory na
diskoch tych pocitacov a zapisovat do nich data. Chcem vediet, ci je
vyhodnejsie pristupovat cez UNC alebo cez IP cisla. Vsade je Win98,
1 pocitac je akoze server.
Dik za kazdu radu, popr. nejake priklady.
Milos
nezobrazit ScrollBars
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 26.1.2002 14:07:25
Koukni na http://www.kopr(tec)cz/delphi/index.htm
Mam zde rozdelanou praci na komponente K_DBGrid.pas
Stahni si a uvidis.
ListBox se dela jednoduseji.
Pavel
----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz
> nevite nekdo, jak zakazat zobrazeni scroll baru (horizontalniho i
> vertikalniho)?
> Jde mi nejvice o komponentu DBGrid, uvitam vsak i postup, jak stejnou vec
> zaridit v ListBoxu.
Flash filer
[*] Ivan Z <izernovac(zv)zoznam.sk> - 26.1.2002 14:50:54 ut
Kupil uz niekto Flash Filer? Stoji to zato?
-I
MS Office Assistent (Clippy)
[*] Ondrej Kr�ko <krsko(zv)gjh.sk> - 26.1.2002 15:51:09
Dobry den,
Do svojej aplikacie by som chcel pridat nieco ako je ten otravny Assistent
z MS Officu (spinka, pripinacka, alebo co to je). Uvazoval som, ci to
nemam spravit cez nepravidelny tvar okna, ale neviem, ci to bude to
najlepsie riesenie. (pretoze ten asistent casto meni svoj tvar, a teda by
sa musel menit aj tvar okna, presne podla animacie v nom).
Ako by ste to robili vy ?
Za kazdy napad dakuje
Ondrej Krsko
gnuregex tutorial
[*] Ivan Z <izernovac(zv)zoznam.sk> - 26.1.2002 15:21:50 ut
Pozna niekto nejaky tutorial s Delphi prikladmi pre kniznicu gnuregex? Demo
mi vela nehovori a help je len vseobecne zamerany.
-I
Flash filer
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 26.1.2002 17:27:00
Velka spokojenost, vrele doporucuji.
V. Riha
-----P�vodn� zpr�va-----
Od: Ivan Z [SMTP:izernovac(zv)zoznam.sk]
Odesl�no: 26. ledna 2002 15:51
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: Flash filer
<<Soubor: ATT00015.txt; charset = utf-8>> nezobrazit ScrollBars
[*] Zden�k Sv�en - 26.1.2002 18:44:27
Dik za tip, stahnul jsem si to a vyzkousel. Bohuzel pri pohybu v DBGridu se
ten vertikalni posuvnik objevuje a zase mizi, takze to vyvolava efekt dosti
nepekneho poblikavani.
Nevite nekdo, jak se toho vertikalniho posuvniku zbavit tak, aby se proste
neobjevoval?
Procedura ShowScrolBar(handle, SB_BOTH, FALSE) dokaze ty posuvniky
odstranit, ale pri jakekemkoliv pohybu uvnitr gridu se bohuzel znova objevi.
Dokonce ani kniha 1001 t&t pro Delphi nenabizi reseni, je tam pouze navod
jak odstranit horiz. posuvnik. Skoro to vypada, ze to ani nejde.
Doufam, ze se mylim a nekdo mi poradite.
Diky.
Zdenek
Koukni na http://www.kopr(tec)cz/delphi/index.htm
Mam zde rozdelanou praci na komponente K_DBGrid.pas
Stahni si a uvidis.
> nevite nekdo, jak zakazat zobrazeni scroll baru (horizontalniho i
> vertikalniho)?
> Jde mi nejvice o komponentu DBGrid, uvitam vsak i postup, jak stejnou vec
> zaridit v ListBoxu.
MySQL
[*] Marek Vilda Jelen <marek.jelen(zv)mybox(tec)cz> - 26.1.2002 19:16:16
Jak se d� z Delphi p�istupovat k MySQL serveru?
D�ky Marek JElen
Office Assistent (Clippy)
[*] Marek Vilda Jelen <marek.jelen(zv)mybox(tec)cz> - 26.1.2002 19:17:51
J� si importoval ActiveX ovlada�e t�chto pomocn�k� a animuju je p�es n�.
Marek Jelen
----- Original Message -----
From: Ondrej Kr�ko
To: delphi-l(zv)clexpert(tec)cz
Sent: Saturday, January 26, 2002 3:33 PM
Subject: Office Assistent (Clippy) Dobry den,
Do svojej aplikacie by som chcel pridat nieco ako je ten otravny Assistent z MS Officu (spinka, pripinacka, alebo co to je).
Uvazoval som, ci to nemam spravit cez nepravidelny tvar okna, ale neviem, ci to bude to najlepsie riesenie. (pretoze ten asistent casto meni svoj tvar, a teda by sa musel menit aj tvar okna, presne podla animacie v nom).
Ako by ste to robili vy 20
Za kazdy napad dakuje
Ondrej Krsko
MySQL
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 26.1.2002 19:57:19
Zkus MyOLEDB (treba) - stahnout jde z www.mysql.com
A nepis v HTML.
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
tel. 0 776 677 776
tel. 0467 521 555
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Marek Vilda Jelen
Sent: Saturday, January 26, 2002 7:16 PM
To: Delphi konference
Subject: MySQL
Jak se d� z Delphi p�istupovat k MySQL serveru?
D�ky Marek JElen
Internetov� odkaz
[*] Mart Spurny <spurnymart(zv)atlas(tec)cz> - 26.1.2002 20:29:37
Ahoj,
programovat v Delphi teprve zacina takze jestli se ptam mimo tak prominte.
Potreboval bych vytvorit v aplikace iternetov� odkaz na nejakou stranku a
odkaz ktery umozni poslat mail (neco takovyho jako byva v dialogu "about").
Jedine co me napadlo je najit si v registrech cestu k inet prohlizeci a
postovnimu klientu a ty pak spustit.
Neexistuje nejaka jednodusi cesta, ktera by bezpecne fungovala na kazdym
systemu? Pokud ne ocenil bych nejakej tip s tema registrama.
Diky
Mart Spurny -D3 Profes.
spurnymart(zv)atlas(tec)cz
Internetov� odkaz
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 26.1.2002 22:03:24
Zkus se podivat na funkci ShellExecute a dej ji parametry 'open' a 'http://
...' nebo 'mailto: ...' (krome jinych)
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
tel. 0 776 677 776
tel. 0467 521 555
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Mart Spurny
> Sent: Saturday, January 26, 2002 8:30 PM
> To: Konference Delphi
> Subject: Internetov� odkaz
>
>
> Ahoj,
> programovat v Delphi teprve zacina takze jestli se ptam mimo
> tak prominte.
> Potreboval bych vytvorit v aplikace iternetov� odkaz na
> nejakou stranku a
> odkaz ktery umozni poslat mail (neco takovyho jako byva v
> dialogu "about").
> Jedine co me napadlo je najit si v registrech cestu k inet
> prohlizeci a
> postovnimu klientu a ty pak spustit.
> Neexistuje nejaka jednodusi cesta, ktera by bezpecne
> fungovala na kazdym
> systemu? Pokud ne ocenil bych nejakej tip s tema registrama.
> Diky
> Mart Spurny -D3 Profes.
> spurnymart(zv)atlas(tec)cz
SSH (telnet)
[*] Pavel =?ISO-8859-2?Q?Slav=EDk?= <pavel.prog(zv)centrum(tec)cz> - 27.1.2002 00:52:24
Zdravim
neznate nahodou nekdo nejakou komponentu na SSH (nebo alespon
telnet pro telnet) server, nebo jak
by se dal jednoduse naprogramovat.
Dekuji vsem za jakekoliv napady a odkazy.
Pavel
-----
Centrum pro milovn�ky pen�z
http://finance.centrum(tec)cz
nezobrazit ScrollBars
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.1.2002 10:24:32
No to ja vim, bohuzel mi to dost taky vadi.
Jak od starnit ty vertikalni posuvniky mi poradil Vones, a asi doopravdy nic
lepsiho neni. Uz jsem se koukal, jak to delaji o Borlandu a neprisel jsem na
to. Asi by bylo dobre DBGrid naprogramovat uplne znovu.
Jakmile dam DBGrid.Edit, tak vert. posuvnik se objevi. Jestli to delaji
Windowsy nebo vlastni TDBGrid nevim.
Pavel
> ten vertikalni posuvnik objevuje a zase mizi, takze to vyvolava efekt
dosti
> nepekneho poblikavani.
>
> Dokonce ani kniha 1001 t&t pro Delphi nenabizi reseni, je tam pouze navod
> jak odstranit horiz. posuvnik. Skoro to vypada, ze to ani nejde.
>
> Koukni na http://www.kopr(tec)cz/delphi/index.htm
>
Flash filer
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.1.2002 10:27:44
Zdravim,
ja je mam a az na drobne broblemky je dobry. Sbiram vlatnosti, ktere mi na
FF2 vadi http://www.kopr(tec)cz/delphi/ff2.htm.
Klady nepopisuji, protoze jsou dobre popsany na
http://www.clexpert(tec)cz/software/turbopower/flashfiler.asp
----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz
> Kupil uz niekto Flash Filer? Stoji to zato?
Uprava Exploreru
[*] Zden�k Sv�en - 27.1.2002 13:31:25
Ahoj,
pomoci ShellExecute(0, PChar('open'), PChar('neco.htm'), NIL, PChar(''),
SW_MAXIMIZE);
si otevru prohlizec se strankou, kterou potrebuju. Jak ale v exploreru
odstranit pruh s navigacnimi tlacitky, pruh s URL a jak nastavit velikost
okna?
V javaScriptu si vse potrebne obstaram:
wind
ow.o
pen
('ne
co.h
tm',
'Nad
pis'
,'to
olba
r=0,
dire
ctor
ies=
0,st
atus=0,menubar=0,location=0,scrollbars=yes,width=640,height=500,resizable=0,
left=50, top=50')
Jak to udelat z Delphi?
Diky.
Zdenek
Office Assistent (Clippy)
[*] Ondrej Kr�ko <krsko(zv)gjh.sk> - 27.1.2002 13:44:10
Ale takto predpokladam, ze to bude vyzadovat nainstalovany Office 97 a
vyssi, nie ?
----- Original Message -----
From: Marek Vilda Jelen
J� si importoval ActiveX ovlada�e t�chto pomocn�k� a animuju je p�es n�.
Marek Jelen
------------------------------------
From: Ondrej Kr�ko
Dobry den,
Do svojej aplikacie by som chcel pridat nieco ako je ten otravny Assistent z
MS Officu (spinka, pripinacka, alebo co to je).
Uvazoval som, ci to nemam spravit cez nepravidelny tvar okna, ale neviem, ci
to bude to najlepsie riesenie. (pretoze ten asistent casto meni svoj tvar, a
teda by sa musel menit aj tvar okna, presne podla animacie v nom).
Ako by ste to robili vy ?
Za kazdy napad dakuje
Ondrej Krsko
MySQL
[*] David Janko <djanko(zv)infoware(tec)cz> - 27.1.2002 16:28:34
Zatim nejlepsi co jsem nasel je ZeosLib.org (free vcetne zdrojovych kodu)
nebo mysqlDAC (dejte hledat napriklad v google.com) ale to je za penize (ale
prijatelna cena). Vzhledem k tomu, ze snad se casem naucim upravovat/psat
komp. v D, tak asi zvolim ZEOS. Testil jsem take dbExpress ale z duvodu,
kterych vetsinu najdete v archivu, jsem dosel k zaveru ze je skoro
nepouzitelny ....
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe
----- Original Message -----
From: Marek Vilda Jelen
To: Delphi konference
Sent: Saturday, January 26, 2002 7:16 PM
Subject: MySQL
Jak se d� z Delphi p�istupovat k MySQL serveru?
D�ky Marek JElen
SSH (telnet)
[*] David Janko <djanko(zv)infoware(tec)cz> - 27.1.2002 16:33:28
Na telnetu nic neni, je to ciste tcp/ip na port. Zkusil bych komponenty od
indi, a v kazdem pripade budou dostupne knihovny a zdrojaky od
OpenSSH(d)/telnet(d) (na linux, ale nejspis to bude prenositelne - ale asi
to da trochu prace).
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe
> Zdravim
> neznate nahodou nekdo nejakou komponentu na SSH (nebo alespon
> telnet pro telnet) server, nebo jak
> by se dal jednoduse naprogramovat.
> Dekuji vsem za jakekoliv napady a odkazy.
> Pavel
>MySQL
[*] Tomas Vida <vida(zv)uniware(tec)cz> - 27.1.2002 19:02:23
Doporucuji ZEOS komponenty (www.zeoslib.org). Jsou zatim to nejlepsi, co
jsem pro komunikaci s mysql serverem videl. Mam je odzkousene se
serverem pod Win i pod Linuxem. Take doporucuji
http://www.artronic.hr/mysql/index.htm - ARTADMIN - docela slusny admin.
Pokud budes mit problem s kompilaci tech komponent, tak si v options
prepni zalozku rebuild packages..... (ted nevim presne, jak to tam je).
Nevim, co s mysql planujes, ale pokud mohu doporucit, tak ho vynechej a
pust se do IB. Ja mam pod mysql serverem tri databaze, a momentalne je
predelavam pod IB. Casem totiz zjistis, ze jenom ukladat data, a
vytvaret jednoduche selecty nestaci, a mysql toho navic moc neumi.
Zdravi
Tomas V.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Marek Vilda Jelen
Sent: Saturday, January 26, 2002 7:16 PM
To: Delphi konference
Subject: MySQL
Jak se d� z Delphi p�istupovat k MySQL serveru?
D�ky Marek JElen
ALT+F4
[*] Tomis <Tomis(zv)mail(tec)cz> - 27.1.2002 20:20:30
Zdravim vsechny ucastniky konference, mam na vas jeden dotaz. Jakym zpusobem
zabranim aplikaci, aby se ukoncila pri stisku klaves ALT+F4. Diky za radu
Tomas Sladek
------------------------------
Http://Sweb(tec)cz/tomovyprogramy - M� programy
jmeno pocitace a usera z IP
[*] Zden�k �t�p�nek�����^��ޏ����� - 27.1.2002 23:04:09
Zdravim
Znam IP adresu sitoveho stroje a potrebuju zjistit jeho jmeno a prihlaseneho
uzivatele. V archivu jsem nasel jen prihlaseneho uzivatele. I kdyz z toho
moc chytrej nejsem. Muzete nekdo poradit?
Diky
Zdenek
ALT+F4
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 27.1.2002 23:28:28
Do OnCloseQuery formulare dej CanClose := False;
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
From: "Tomis" <Tomis(zv)mail(tec)cz>
> Zdravim vsechny ucastniky konference, mam na vas jeden dotaz. Jakym
zpusobem
> zabranim aplikaci, aby se ukoncila pri stisku klaves ALT+F4. Diky za radu
Select s podminkou na alias
[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 28.1.2002 01:05:12
Dobry den,
presel jsem z PostgressSQL na IB 6 a jsem z ni trosku zmaten:
- Existuje ceska dokumentace k IB a SQL?
- Nejak jsem neprisel jak "upravit" nasledujici SQL dotaz pro IB:
SELECT s."ID" AS "_ID",
(s."Kusu" - (SELECT SUM(v."Kusu")
FROM "Vydej" v
WHERE s."ID" = v."SkladID")) AS "_Ks",
(s."Nazev" || ', ' || s."Oznaceni" || ', ' || s."Vaha" || ',
' || s."Rozmer") AS "Zbo��"' +
FROM "Sklad" s
WHERE "_Ks" > 0
ORDER BY s."Nazev";
Myslenka: Zobrazi vsechny polozky s nenulovym mnoztvim.
Dekuji za pomoc
Zdenek Janish
OT:XP vs. skins
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 28.1.2002 07:42:14
Jsou volne k zaplaceni v Plus Pack XP. Jinak je to v nejake DLL knihovne
ktera se stara o ulozeni skinu a jejich velikost - mozna uz to je na MSDN,
takze by sla napsat vlastni.
>Je WindowsXP skinovatelne ? Vim, ze vsechno to pekne na obrazovce je bitmapa
>(taskbar,okna...), a take v zakladni instalaci ma tri skiny - modra,zelena a
>stribrna. Nevite jestli nejsou na netu nekde skiny volne k stazeni ?
>
>David Kraina, DKx
>vedouc� n.v.t. MX-3
>http://MX-3.w3.to
>Support.MX-3(zv)Seznam(tec)cz
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/
---------------------------------------------------------------------------
SSH (telnet)
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 28.1.2002 07:47:52
Pan Jakno se plete -> telnet se domlouva na typu terminalu, barvach,
podpore kodovani,....
At 16:33 27.1.2002 +0100, you wrote:
>Na telnetu nic neni, je to ciste tcp/ip na port. Zkusil bych komponenty od
>indi, a v kazdem pripade budou dostupne knihovny a zdrojaky od
>OpenSSH(d)/telnet(d) (na linux, ale nejspis to bude prenositelne - ale asi
>to da trochu prace).
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/
---------------------------------------------------------------------------
OT:XP vs. skins
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 28.1.2002 08:34:47
> >Je WindowsXP skinovatelne ? Vim, ze vsechno to pekne na obrazovce je bitmapa
> >(taskbar,okna...), a take v zakladni instalaci ma tri skiny - modra,zelena a
> >stribrna. Nevite jestli nejsou na netu nekde skiny volne k stazeni ?
Ahoj,
hotove skiny jako takove stahnes na spouste mist, zkus treba
www.wincustomize.com. Pokud jsem se dival uz na hotove skiny, jde o
jeden soubor, ktery je pakovan zipem. System je podobny jako treba u
MediaPlayeru. Tento archiv obsahuje nejen samotne bitmapy, ale take
konfiguracni soubory.
S pozdravem Milan Cizek, amatersky programator, D5 Ent (SP1), D6 Ent
Win2k (SP2,Pre-SP3) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ:
59826637
______________________________________________________________________
Vylepsete svuj prohlizec Internetu na http://software.seznam(tec)cz/listicka
plnenie databazy v SQL SERVER 2000
[*] Slavom�r �eke� - 28.1.2002 09:00:55
Zdravim ...
spustil som si SQL SERVER 2000, vytvoril som si tabulku, a narazil som
na takyto problem ... chcem si hned naplnit databazu, ale nikde som
nenasiel NIC, teda urcite sa to da cez SQL, ale preco pisat SQL davky,
ked sa to MOZNO da priamo do tabulky sukat, v IB sa to pekne da, prepnem
sa a som v tabulke a pekne si ju plnim ...
tos poradte, da sa to v SQL SERVER 2000, alebo neda ? Ak sa da ... tak
ako ?
Slavo
SSH (telnet)
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.1.2002 09:45:55
> Pan Jakno se plete -> telnet se domlouva na typu terminalu, barvach,
> podpore kodovani,....
Pravda klasicky terminal na zacatku spojeni posila binarni smeti,
kterym se
domlouva na ruznych vecech se serverem, taky obcas pouziva OOB data.
Ale
da se bez toho vetsinou zit (krome pripadu, kdy server takove spojeni
odmitne)
D. Toman
plnenie databazy v SQL SERVER 2000
[*] ing. Pavel �ilinec����)b���zf���3 - 28.1.2002 10:05:38
Jsou dve moznosti:
Enterprise Manager -> [database] -> Tables -> prave tlacitko na tabulce -> Open Table
Query Analyzer -> Object Browser (F8) -> prave tlacitko na tabulce -> Open
------
ing. Pavel �ilinec
mailto:zilinec(zv)email(tec)cz
28.1.2002 Slavom�r �eke�:
> spustil som si SQL SERVER 2000, vytvoril som si tabulku, a narazil som
> na takyto problem ... chcem si hned naplnit databazu, ale nikde som
> nenasiel NIC, teda urcite sa to da cez SQL, ale preco pisat SQL davky,
> ked sa to MOZNO da priamo do tabulky sukat, v IB sa to pekne da, prepnem
> sa a som v tabulke a pekne si ju plnim ...DB, Informix + client + ESQL popis
[*] iturcan(zv)gamo.sk - 28.1.2002 10:10:15
Hi all,
potrebujem ziskat popis funkcii ESQL-C , ktore su v DLL kniznici
isqlt07c.DLL popripade na novsiu isqltXXY.DLL
dost to ponahla,
Ivan Turcan
ps. ak ma niekto vyrobeny unit na toto tak to super pomoze
Visiaci conect pri WNetAddConnection2
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 28.1.2002 10:45:24
Ahoj,
v programe pouzivam funkciu WNetAddConnection2 na zdielanie
sietovych zdrojov, ktore po skonceni programu uvolnujem
volanim WNetCancelConnection2.
Na staniciach s Windows 9x mi program funguje bez problemov,
ak vsak bezi na Windows NT 4.0, tak po skonceni programu
ostane zdielany sietovy prostriedok neuvolneny.
Pri novom spusteni mojho programu a pokuse zdielat tento
prostriedok mi potom funkcia WNetAddConnection2 stale
vracia chybu.
Jedine riesenie je potom bud reset pocitaca, ku ktoremu som
sa predtym pripajal alebo manualne odpojenie pripojeneho
uzivatela na tomto sietovom pocitaci pomocou programu
NetWatch.exe
Nestretol sa niekto s niecim podobnym?
Za pripadne rady alebo pomoc vdaka.
Vlkovic
plnenie databazy v SQL SERVER 2000
[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 28.1.2002 11:06:01
Slavom�r �eke�, <mailto:cekel(zv)noves.sk> napsal:
> spustil som si SQL SERVER 2000, vytvoril som si tabulku, a narazil som
> na takyto problem ... chcem si hned naplnit databazu, ale nikde som
V Enterprise Manageru si vyberes databazi, v ni na tabulce pravym
tlacitkem a vyberes Open Table-Return all rows. A vesele editujes ...
Kliknutim na ikonu s vykricnikem se zmeny ulozi.
------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
W2K/SP1, D5Ent/UP1
Nastaveni Width a Height komponenty
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 28.1.2002 11:12:25
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj vespolek, bastlim komponentu odvozenou od TCustomControl a mam tento
problem:
V konstruktoru nastavuji defaultni Width a Height:
constructor TTimeAxisImage.Create(AOwner: TComponent);
begin
inherited;
Created:= false;
FTABitmap:= TBitmap.Create;
Width:= 300;
Height:= 100;
SetAxisColor(clGreen);
...
end;
Vsechno funguje v poradku, pouze kdyz se programove pokusim zvetsit Width
nebo Height, prekresli se plocha komponenty jen tak, ze zaplni puvodne
definovany obdelnik 300 x 100 pixelu a za jeho hranicemi se uz nekresli nic.
Takze je videt jen prislusny detail a jinak nic. Zmensovani funguje v
pohode. Pro jistotu jeste prikladam kod pro prekreslovani:
procedure TTimeAxisImage.Paint;
begin
RepaintBitmap;
Canvas.CopyRect(FTABitmapRect, FTABitmap.Canvas, FTABitmapRect);
if Assigned(FOnPaint) then FOnPaint(Self);
end;
Tusite nekdo, co muze byt blbe?
Diky predem
RNDr. Petr Brant
********************************************
* D&COMM s.r.o. - sledov�n� vozidel *
* v re�ln�m �ase a prodej licenc� *
* v r�mci programu Microsoft Select *
* ---------------------------------------- *
* Korunova�n� 6 *
* Praha 7 *
********************************************RPC procedura
[*] �imek Ji�� <Jiri.Simek(zv)czech-tv(tec)cz> - 28.1.2002 11:39:31
Mam v projektu Delphi6 proceduru, kterou je nutne zavolat z jine aplikace
pres RPC.
Mate nejakou ukazku nebo navod jak tuto funkci nebo projekt nakonfigurovat,
aby prijimal volani pres RPC?
JirkaS
IB/FB - SP a pole typu date
[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 28.1.2002 12:05:31
Ahoj,
prosim o radu. Nemohu prijit na to jak do pole typu date vlozit datum
pomoci ulozene procedury.
V archivu konference jsem odpovidajici reseni take nenasel a tak
predpokladam, ze je to trivialni, jenze ...
Libilo by se mi to takto, ale ani jakoukoliv jinou kombinaci to
neprojde a vyhodi chybu.
with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
ptInput) do
AsDate := DTPickerVzniku.Date; //TDateTimePicker
Win2000 SP1, D6 Pro
Dekuji za pomoc,
preji hezky den,
Jarek Uher
XP a security
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 28.1.2002 12:40:34
> kamos se s tim taky trapil, ale pod W2K. Tvrdil neco o tom, ze
> nasel nejakou
Bez zaruky:
http://groups.google.com/groups?hl=cs&selm=3BE61E30.FEA958D2%40mindspring.co
m
From: H.J.M.Woerden(zv)lr.tudelft.nl (Arjan)
Newsgroups: microsoft.public.windowsxp.general
Subject: Re: Win XP and Nero 5
Date: 10/30/01
Message-ID: <daf3c7f9.0110300115.1f4da91c(zv)posting.google.com>
There are 2 solutions to this problem:
SOLUTION 1:
You should first of all download the fix for this Nero-behaviour at:
http://www.wintotalserver.de/server/fixes/w2kaspi.zip
You can also get to this file by going to the following website:
http://www.wintotal.de/softw/bugap/nerow2k.htm and click on the link
"Patch f�r Nero-Burning CD-Rom zum Brennen ohne Admin-Rechte" (it's in
German, I know)
Next follow these steps:
1) Log on to Windows as administrator.
2) Install the WinASPI driver from LSI-Logic (can be found in the
downloaded ZIP-file). It is called "w2kaspi.exe".
3) Restart your computer.
4) Log on to Windows as administrator.
5) Import the Registry-data (also in the ZIP-file) into your registry
(doubleclick on "ASPIXNT_Enable_ports.reg").
6) Restart you computer.
7) Log on to Windows as administrator.
8) Rename the "WNASPI32.DLL" in the NERO installation directory to
"WNASPI32.DL_". (Do NOT rename the one in the system32 folder, because
that is the one you just installed!).
Now even users without Administrator rights can burn CD's with Nero!
There are two slight drawbacks to this workaround:
- If a user is logged on to Windows without Administrator rights, the
multimounter from Nero does not work correctly (but who wants to use
that feature anyway?).
- USB and FireWire drives are NOT recognized by this WinASPI-driver,
it can only be used for SCSI and IDE drives (which are most PC-drives
anyhow).
SOLUTION 2:
In Nero 5.5.3.5 there was a "security" tab in the preferences window
in Nero. However, there have been problems with this feature and
therefore Ahead removed it from the succesive versions. However, Ahead
did forget to remove the help file item about this! Sloppy! I do still
have the files that will give you this security tab in Nero (even for
the versions after 5.5.3.5). I installed it with version 5.5.5.1 and
it works for me. Email me if you want those files and I will be happy
to send them to you....however, installing them is at your own risk.
It worked for me, but it might not work for you.
Good luck!
Arjan
"CD" wrote...
>
> Making Nero work in Win XP
>
> I installed the latest version of Nero (5.5.5.1) under Win XP
> Professional using the admin account. The installation was successful.
> However, I cannot seem to get the other user levels to access the CD
> recorder. Nero keeps giving me an insufficient rights error. I already
tried
> giving the Everyone group backup rights, but it is still not working.
Also,
> in Nero's help file, they mentioned a Security tab under File >>
> Preferences. However, I am not seeing it.
===================
IB/FB - SP a pole typu date
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 28.1.2002 12:43:19
> with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
> ptInput) do
> AsDate := DTPickerVzniku.Date; //TDateTimePicker
>
Mam pocit, ze by mohl prekazet cas, tak bych zkusil neco
takoveho:
...AsDateTime := int(DTPickerVzniku.Date);
(jestli funguje AsDate ted z hlavy nevim).
David Lebeda
Flash filer
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 28.1.2002 12:52:14
> Zdravim,
> ja je mam a az na drobne broblemky je dobry. Sbiram vlatnosti, ktere mi na
> FF2 vadi http://www.kopr(tec)cz/delphi/ff2.htm.
Hmm, zda se, ze na te strance nefunguji vyjmenovana slova po L:
" ... z toho vypliva: v jakemkoliv DBGridu bude vertikalni ... "
^^^
T.
IB/FB - SP a pole typu date
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 28.1.2002 12:54:37
ahoj,
nevim, jak v IBStoredProc,
ale u IBQuery mi funguje:
p1:=IBQuery1.Params.FindParam('Datum');
if Assigned(p1)and(not Storno) then
begin
Application.CreateForm(TFPDatum, FPDatum);
if FPDatum.ShowModal=mrOK then
p1.AsDate:=FPDatum.Datum
else
Storno:=True;
FPDatum.Release;
end;
je to kus univerzalni procedury, ktere se stara o
vyzadani doplneni parametru pro sestavy, ale
jinak IBQuery1.Params[0].AsDate:=DateTimePicker1.Date;
musi fungovat. nicmene si vzpominam, ze kdyz jsem
mel IBStoredProc vytvareny dynamicky, musel jsem
nejprve priradit, databazi, transakci a nazev procedury,
potom zavolat prepare a teprve pak mi sly doplnovat parametry.
dekuji PeC(zv)IB/FB - SP a pole typu date
[*] B�in�il Tom� - 28.1.2002 13:10:50
AsDate by melo bez problemu fungovat. Ja to pouzivam.
Tomas Brincil
> > with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
> > ptInput) do
> > AsDate := DTPickerVzniku.Date; //TDateTimePicker
> >
>
> Mam pocit, ze by mohl prekazet cas, tak bych zkusil neco
> takoveho:
>
> ...AsDateTime := int(DTPickerVzniku.Date);
>
> (jestli funguje AsDate ted z hlavy nevim).
---
Avast/SMTP2000 Antivirus: Outbound message clean.
Virus Database (VPS): 15.1.2002
Tested on: 28.1.2002 13:10:50 +0200
Avast! is copyright (c) 2000-2001 ALWIL Software.
OT - automatizovane zalohovani dat
[*] tomsir1.edu(zv)mail.cez(tec)cz - 28.1.2002 13:45:08
Ahoj,
resim problemek, jak automaticky vypalit data na CD.
Pomoci skriptu si data pripravim, zabalim a nakopiruju na predem urcene
misto. A nyni bych potreboval nejakym mechanismem ona data vypalit na CD,
uzivatel - ka /naprosty laik/, pouze spusti paleni napr. kliknutim na
ikonku na plose ...
Takze asi potrebuju poradit soft, ktery by bral parametry z prikazove
radky, nevite nekdo o necem ??
Diky Radegast
tisk se strankovanim
[*] Marek C�zek - 28.1.2002 13:57:26
Ahoj,
nevite prosim nekdo o nejake free
komponente, ktera by umela tisk
nejakeho standardniho formatu
(nejlepe .doc nebo .rtf )
s respektovanim koncu stranek ?
Z archivu jsem se zadneho reseni
nedobral.
Dik,
Marek OT - automatizovane zalohovani dat
[*] Kinsky Filip <xkinf01(zv)vse(tec)cz> - 28.1.2002 14:12:42
to by slo jednoduse treba pres DirectCD od Roxio - to umozni
pristupovat na CD jako na disk...
Filip Kinsky
On Mon, 28 Jan 2002 13:45:08 +0100
tomsir1.edu(zv)mail.cez(tec)cz wrote:
>
> Ahoj,
> resim problemek, jak automaticky vypalit data na CD.
> Pomoci skriptu si data pripravim, zabalim a nakopiruju na
> predem urcene
> misto. A nyni bych potreboval nejakym mechanismem ona
> data vypalit na CD,
> uzivatel - ka /naprosty laik/, pouze spusti paleni napr.
> kliknutim na
> ikonku na plose ...
> Takze asi potrebuju poradit soft, ktery by bral parametry
> z prikazove
> radky, nevite nekdo o necem ??
>
> Diky Radegast
> Uprava Exploreru
[*] JIM Design <jim.design(zv)iol(tec)cz> - 28.1.2002 14:12:54
Ahoj,
jak uz jsem pred nekolika dny psal, muzes vyuzit komponenty TWebBrowser,
kterou je mozne upravit vizuelne Object Inspectoru nebo v ni otevrit/zavolat
ten tvuj skript.
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Zden�k Sv�en
Ahoj,
pomoci ShellExecute(0, PChar('open'), PChar('neco.htm'), NIL, PChar(''),
SW_MAXIMIZE);
si otevru prohlizec se strankou, kterou potrebuju. Jak ale v exploreru
odstranit pruh s navigacnimi tlacitky, pruh s URL a jak nastavit velikost
okna?
V javaScriptu si vse potrebne obstaram:
window.open('neco.htm','Nadpis','toolbar=0,directories=0,status=0,menubar=0,
location=0,scrollbars=yes,width=640,height=500,resizable=0,left=50, top=50')
Jak to udelat z Delphi?IB/FB - SP a pole typu date
[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 28.1.2002 14:18:14
On 28 Jan 2002, at 13:10, B in il Tom� wrote:
> AsDate by melo bez problemu fungovat. Ja to pouzivam.
> Tomas Brincil
Ahoj,
a mohl bys mi, PROSIM, poslat kousek kodu, abych s tim pokrocil a
nemusel zbytecne experimentovat. Urcite se to bude hodit i jinym.
Diky moc,
Jarek Uher
> > > with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
> > > ptInput) do
> > > AsDate := DTPickerVzniku.Date; //TDateTimePicker
> > >
> >
> > Mam pocit, ze by mohl prekazet cas, tak bych zkusil neco
> > takoveho:
> >
> > ...AsDateTime := int(DTPickerVzniku.Date);
> >
> > (jestli funguje AsDate ted z hlavy nevim).tisk se strankovanim
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 28.1.2002 14:22:03
http://www.torry.net
S pozdravem
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
ICQ : 13367373990
+420605/813644
>>> cizek(zv)ica(tec)cz 28.1.02 13:57 >>>
Ahoj,
nevite prosim nekdo o nejake free
komponente, ktera by umela tisk
nejakeho standardniho formatu
(nejlepe .doc nebo .rtf )
s respektovanim koncu stranek ?
Z archivu jsem se zadneho reseni
nedobral.
Dik,
Marek
XP a security
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 28.1.2002 14:24:23
Nie je to az tak moc skryte...
Raz som to uz urobil (nemam XP) je to niekde v Control Paneli
a treba nastavit nieco ako Advanced Sharing ... checkbox
a potom sa to objavi velmi podobne ako vo Win2k, tam kde to cakas...
Jaro
----- Original Message -----
From: "Robert Suska" <robert(zv)korak.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, January 24, 2002 11:01 AM
Subject: XP a security
| Ahojte
|
| Moja problem spociva v tom ze pracujem na jednom programe na napalovanie
CD
| diskov pod WinXP v inom profile ako Administrator mi to trubi ze nebude
| palit lebo nemam Administratorske prava alebo mam nastavit full access na
| pristup ku napalovacke. Ono by to nebol problem pod W2k lebo tam security
| viem nastavit ale pod WinXP je to nejake strasne skryte. Prosim pomozte mi
| ako nastavim Full access ku zariadeniu aj pre napr. Power Usera.
|
| Dufam ze som sa nejako nezaplietol ak ano tak ma vyvedte z omylu.
|
| Dakujem
|
| Robo
|
|
---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.317 / V�rusov� datab�za: 176 - d�tum vydania: 21. 1. 2002
OT - automatizovane zalohovani dat
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.1.2002 14:53:44
Puvodni zprava, kterou napsal tomsir1.edu(zv)mail.cez(tec)cz dne 28 Jan 2002:
> resim problemek, jak automaticky vypalit data na CD.
Podivej se sem: http://www.cooldev.com
Tam jsem objevil CdRwLib SDK, ktere funguje nad vrstvou ASPI. Neni to
kupodivu ani drahe (jen $199, to uz jsem videl knihovny za $5k), ale me
se to rozjet nepodarilo. Mam vypalovacku Yamaha a ta asi nema driver
ASPI. Kdyby to nekdo pitval, tak necht mi da pripadne vedet :)
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
============================================================OT - automatizovane zalohovani dat
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.1.2002 14:56:38
Puvodni zprava, kterou napsal Kinsky Filip dne 28 Jan 2002:
> to by slo jednoduse treba pres DirectCD od Roxio - to umozni
> pristupovat na CD jako na disk...
DirectCD bych moc nedoporucoval, pred par roky jsem nahraval par cedecek
timto zpusobem a nektera jsem uz nikdy vice neprecetl. Od te doby k tomu
mam dost silnou neduveru.
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
============================================================OT - automatizovane zalohovani dat
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 28.1.2002 15:02:53
K nejakym vypalovackam se dodaval soft, ktery si "naformatoval"
cedecko tak, ze se pak tvarilo jako disketa, na kterou pak slo
nahravat data standardnim zpusobem. Aby slo na toto cedecko
zapisovat a cist, musel pouze tento soft bezet (tvaril se jako
ikonka v tray-oblasti). Nevim ale jestli to fungovalo i s CDR,
ale bezpecne to jelo s CDRW.
Martin Schayna
Aktis a.s.
----- Original Message -----
From: <tomsir1.edu(zv)mail.cez(tec)cz>>
> Ahoj,
> resim problemek, jak automaticky vypalit data na CD.
> Pomoci skriptu si data pripravim, zabalim a nakopiruju na predem urcene
> misto. A nyni bych potreboval nejakym mechanismem ona data vypalit na CD,
> uzivatel - ka /naprosty laik/, pouze spusti paleni napr. kliknutim na
> ikonku na plose ...
> Takze asi potrebuju poradit soft, ktery by bral parametry z prikazove
> radky, nevite nekdo o necem ??
>
> Diky Radegast
> Delphi - redirect
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 28.1.2002 15:38:05
Ahoj,
narazil jsem na zajimave chovani v D5. Mam projekt tvoreny radou
formularu a kazdy form obsahuje Toolbar. Mimo to existuji dva
datamoduly. Na jednom bylo pripojeni do databaze a jine
cerepeticky, na druhem pouze jediny ImageList nesouci ikony pro
tlacitka. Nyni jsem jsem rozhodl ten ImageList premistit na prvni
datamodul a ten druhy zrusit. A ted problem.
Za jistych podminek po prebuildovani programu mi Delphi
automaticky nabidne presmerovat odkazy (z Toolbaru), z jiz
neexistujiciho datamodulu na ten druhy. To je spravne, necham to
udelat, vse se podari. Projekt muzu ulozit, zavrit...a po dalsim
otevreni projektu jsou nektere z tech odkazu presmerovane a
nektere ne. Nechapu to. Setkal jste se s tim nekdo? Pokud ta
presmerovani provedu rucne, je to OK.
David Lebeda
Poslani stisku klaves
[*] EFG developer <developer(zv)efg(tec)cz> - 28.1.2002 15:59:38
Zdravim, mam v aplikaci menu a na jeho polozky mam nadefinovane
klavesove zkratky.
Potreboval bych po vykonani kodu obsluhy kliknuti na menu "poslat" tuto
klavesovou zkratku jeste jine komponente v programu (memo).
Jak tohoto co nejjednoduseji dosahnout ?
Petr Sikola
Editace souboru primo na disku
[*] EFG developer <developer(zv)efg(tec)cz> - 28.1.2002 16:02:20
Zdravim,
Mam v aplikaci udelanou editaci souboru, ale pokud nacitam velke soubory
(>10MB) tak jeho otevreni trva neumerne dlouho.
Lze nejak vyresit nacteni souboru do mema nebo do gridu tak, aby se
tento soubor nemusel cely "natahovat" do pameti ?
Dekuji Petr Sikola
OT - automatizovane zalohovani dat
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 28.1.2002 16:05:16
> resim problemek, jak automaticky vypalit data na CD.
Zhruba 3 roky pouzivam pro zalohovani dat SW Easy CD Creator, ktery ma
"DirectCD"
Pak se CDRW opravdu tvari jako prepisovatelne medium a je na nej mozno
pristupovat jako na HDD,FDD ci ZIP mechaniku jakymkoliv managerem, nebo
primo z aplikace. Za celou dobu pouzivani se mi nestalo, ze bych se nedostal
na data. Je ale pravdou, ze na jinem PC s CDRW mechanikou se stava, ze se
nahrane a neuzavrene CDRW neda precist.
Viktor Marek
viktor(zv)mbox.vol(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.317 / Virov� b�ze: 176 - datum vyd�n�: 21.1.2002
IB/FB - SP a pole typu date
[*] B�in�il Tom� - 28.1.2002 16:23:13
To bych rad, ale bohuzel budes muset experimentovat, protoze ja k tomu ted
nemam pristup.
Tomas
> Ahoj,
>
> a mohl bys mi, PROSIM, poslat kousek kodu, abych s tim pokrocil a
> nemusel zbytecne experimentovat. Urcite se to bude hodit i jinym.
>
> Diky moc,
>
> Jarek Uher
>
---
Avast/SMTP2000 Antivirus: Outbound message clean.
Virus Database (VPS): 15.1.2002
Tested on: 28.1.2002 16:23:14 +0200
Avast! is copyright (c) 2000-2001 ALWIL Software.
TIBUpdateSQL a INSERT
[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 28.1.2002 16:48:50
Dobry den,
mam tabulku:
CREATE DOMAIN "DateIns" AS DATE DEFAULT 'NOW' CHECK (VALUE <= 'NOW') NOT
NULL;
CREATE DOMAIN "Ident" AS INTEGER DEFAULT 0 CHECK (VALUE > 0) NOT NULL;
CREATE GENERATOR "OsobaID";
CREATE TABLE "Osoba"
(
"ID" "Ident",
/* Proc nejde: "ID" INTEGER DEFAULT GEN_ID("OsobaID", 1) ????????? */
"Datum" "DateIns",
"Funkce" VARCHAR(10) CHARACTER SET UNICODE_FSS DEFAULT '' NOT NULL,
"Jmeno" VARCHAR(50) CHARACTER SET UNICODE_FSS DEFAULT '' NOT NULL,
"Adresa" VARCHAR(30) CHARACTER SET UNICODE_FSS DEFAULT '',
"Mesto" VARCHAR(30) CHARACTER SET UNICODE_FSS DEFAULT '',
"Poznamka" VARCHAR(100) CHARACTER SET UNICODE_FSS DEFAULT '',
UNIQUE ("ID")
);
CREATE TRIGGER "Osoba_Before_Insert" FOR "Osoba"
ACTIVE BEFORE INSERT POSITION 0 AS
BEGIN
NEW."ID" = GEN_ID("OsobaID", 1);
END
Pokud udelam "rucne" pres TIBQuery:
INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
VALUES ('Dodavatel', 'Jirka Vseticka', 'Bilovice 10', 'Praha 10 -
Hostivar');
tak vse probehne jak ma, tedy se provede TRIGGER a doplni ID.
V pripade, ze vyuziji TIBUpdateSQL a do InsertSQL:
INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
VALUES (:"Funkce", :"Jmeno", :"Adresa", :"Mesto");
tak obdrzim milouckou zpravicku:
"Field 'ID' must have value."
Proc se po ID v INSERu shani? Kdyt v SQL i nem neni ani zminka.
Je to v nastaveni komonent? A nebo spatne vytvorena tabulka?
Dekuji za rady
Zdenek Janish
Bitmap - transparent color
[*] Peter Surovy <psurovy(zv)uevora.pt> - 28.1.2002 15:48:19 -0000
Ahoj,
chcem na Canvas Image-u vykreslit bitmapu
ktoru si predtym nacitam zo suboru.
Pouzivam metodu canvas.draw.
Narazil som hned na dva problemy
1-nedokazem otvorit subor .png, ktory by mal normalne
fungovat. vytvaram ho v Adobe Photoshop. Preco?
2-aj ked pouzijem bitmapu(bmp) priehladna farba sa mi zobrazi ako
biela. Niekde v Helpe som cital ze sa da nastavit aby priehladna
zostala priehladna ale uz to neviem najst teraz neviem ci sa mi to len
nesnivalo.
Da sa to? Ako?
Vdaka za rady.
S pozdravom
Ing.Peter Surovy
IB/FB - SP a pole typu date
[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 28.1.2002 16:54:32
Zkousel jsi misto AsDate nebo AsDateTime pouzit Value ?
with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU', ptInput) do
Value := DTPickerVzniku.Date; //TDateTimePicker
Martin Ben
> -----Puvodni zprava-----
> Od: Jaroslav Uher [mailto:moravia(zv)mbox.vol(tec)cz]
>
> Ahoj,
>
> with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
> ptInput) do
> AsDate := DTPickerVzniku.Date; //TDateTimePicker
Vyber tlacoveho generatora.
[*] Miroslav Hro��o <hrossik(zv)nrsys.sk> - 28.1.2002 17:06:46
Dobry den,
Potreboval by som poradit ohladne vyberu tlacoveho generatora.
Doteraz sme skusali SINEU a List&Label. Ale ani jedno nam nevyhovuje uplne.
Potreboval by som poradit ohladne vyberu.
Tlacovy generator by mal mat nasledujuce vlastnosti :
1) Vediet expotrovat do Wordu, EXCELU (nemusi byt to v DOC, XLS).
2) Vediet ulozit do tlacovku do suboru, z ktoreho sa da tlacit na lubovolnej
tlaciarni.
3) Z suboru, v ktorom je ulozena, aby sa dal spravit export do Wordu a
Excelu.
4) Tento ulozeny subor mal by mat rozumnu velkost, cize porovnatelnu s
Textovim suborom.
5) Aby mal prehiadac, v ktorom sa da hladat. Toto nemusi splnat.
Dovody, pre ktore to potrebujeme, su naprklad :
1) ulozenie faktur, ktore zo zakona musia vzdy byt rovnake.
2) vediet fakturu aj opakovane tlacit, a vzdy rovnako.
3) posielanie tlacoviek mailom, aj mimo firmu.
Tento generator nemusi byt Free (to asi ani nebude). Na cene nezalezi.
Miroslav Hrosso
OT - automatizovane zalohovani dat
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 28.1.2002 18:25:47
Pokud ma uzivatel nainstalovany DirectCD nebo podobny program, tak se mu
palirna chova jako pevny disk (transparentni v systemu). Jedina nevyhoda je
otevreni disku (naformatovani pred prvnim pouziti) a pri vyjeti CD-cka jeho
uzavreni nebo neuzavreni. Tam musi uzivatel alespo� podle navodu
zareagovat.
S pozdravem Vaclav Riha
-----P�vodn� zpr�va-----
Od: tomsir1.edu(zv)mail.cez(tec)cz [SMTP:tomsir1.edu(zv)mail.cez(tec)cz]
Odesl�no: 28. ledna 2002 13:45
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: OT - automatizovane zalohovani dat
Ahoj,
resim problemek, jak automaticky vypalit data na CD.
Pomoci skriptu si data pripravim, zabalim a nakopiruju na predem urcene
misto. A nyni bych potreboval nejakym mechanismem ona data vypalit na CD,
uzivatel - ka /naprosty laik/, pouze spusti paleni napr. kliknutim na
ikonku na plose ...
Takze asi potrebuju poradit soft, ktery by bral parametry z prikazove
radky, nevite nekdo o necem ??
Diky Radegast
tisk se strankovanim
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 28.1.2002 18:32:09
QRRichText umi i strankovat, ale musi lezet na na detailu (ne na QReportu).
Band musi byt BandType=rbDetail a musi mit nastaveno ForceNewPage=True
QRRichText musi mit property AutoStretch=True
S pozdravem Vaclav Riha
-----P�vodn� zpr�va-----
Od: Marek C�zek [SMTP:cizek(zv)ica(tec)cz]
Odesl�no: 28. ledna 2002 13:57
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: tisk se strankovanim
Ahoj,
nevite prosim nekdo o nejake free
komponente, ktera by umela tisk
nejakeho standardniho formatu
(nejlepe .doc nebo .rtf )
s respektovanim koncu stranek ?
Z archivu jsem se zadneho reseni
nedobral.
Dik,
Marek
IB/FB - SP a pole typu date - OMLUVA
[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 28.1.2002 18:35:42
Ahoj,
musim se omluvit vsem, kteri jste se mi snazili poradit a pomoci.
Chyba byla v razeni dat do SP a tudiz v me slepote :-<
Do pole SmallInt datum opravdu NELZE vlozit.
Nasledujici kod je v poradku.
with IBStoredProc.Params.CreateParam(ftDate, 'DT_VZNIKU',
ptInput) do
AsDate := DTPickerVzniku.Date; //TDateTimePicker
Jarek Uher
Seriova a paralelni komunikace
[*] Frankie Y <frankie.y(zv)seznam(tec)cz> - 28.1.2002 19:30:53
Ahoj,
chtel bych napsat program pro prenos souboru po seriovem nebo paralelnim
kabelu. O seriove ci paralelni komunikaci toho vsak mnoho nevim a shanim co
nejvice informaci. Nevite nahodu o nejakem podrobnem tutorialu ci knize, jez
by mohli zacatecnika nejlepe zasvetit do dane problematiky?
Diky
Frankie
PS: Videl jsem unitu Synaser, ale bez zakladnich znalosti se mi jevi jako
nepouzitelna. Uz samotna fce connect() ma totiz nekolik "zahadnych"
parametru (bits, parity, stop, softflow, hardflow). Priklad pouziti by jiste
neskodil. Slo by tuto jednotku pouzit i pro komunikaci po paralelnim kabelu?DBGrid Sinea VCL3 a trideni cesky
[*] Josef Straka <strakajosef(zv)seznam(tec)cz> - 28.1.2002 19:43:34
Prijemny den,
pouzivam D5Prof a Win 95 OSR2
Pouzivam knihovnu komponent Sinea VCL3 a z ni DBGrid. Problem je v tom, ze
se mi jednotlive polozky v tomto gridu netridi podle abecedy tedy i s hacky
a carkami. Polozky zacinajici na C s hackem, Z s hackem a vsechny ostatni s
carkou nebo hackem se mi radi nakonec. V demu k tomuto baliku komponent to
funguje dobre, ale nemohu prijit na to, jak toho mam docilit ja.
Dekuji predem, protoze zadem se v teto konferenci dekovat nesmi.
S pozdravem Straka Josef,
kteremu uz kukacka 28krat oznamila jaro.
e-mail: strakaj(zv)hbnet(tec)cz
www: http://strakaj.zde(tec)cz
Office Assistent (Clippy)
[*] Marek Jelen <marek.jelen(zv)mybox(tec)cz> - 28.1.2002 19:51:50
Ne, ale musis mit naistalovanej engine od Microsoftu.MySQL
[*] Marek Jelen <marek.jelen(zv)mybox(tec)cz> - 28.1.2002 20:12:54
D�ky za radu. J� mysql pot�ebuju, proto�e d�l�m chat v PhP a tam jinou db
neumim. V delphi k tomu delam aplikaci.
Marek Jelen
vraceni komponent z dll <- doplneni
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 28.1.2002 20:45:07
> From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> > A kdyby to slo bez balicku :-) ... jsou "moc" delphi, chtel bych
> > univerzalnejsi reseni, nebo snad muzu v C napsat BPL?
>
> A jak by jsi chtel aby Delphi aplikace "vedela" o objektech z te DLL ?
Zkratka
> jinak to nejde. V C psat BPL nemuzes, protoze BPL obsahuje Delphi tridy.
Ovsem
> muzes napsal BPL v C++ Builderu, protoze umi prekladat i Object Pascal
kod.
> Otazkou zustava jaky to ma smysl.
Delphi aplikace nepotrebuje vedet o objektech v DLL. Asi se vyjadruju
spatne: ja z te DLL otevru formular, v tom si uzivatel provede nastaveni a
formular zavre, bez komunikace s Delphi aplikaci. Je to jakobych pustil
jinou aplikaci.
Ja chtel to okno (formular) z DLL umistit do meho formulare tak, aby to
treba jenom vypadalo, ze je jeho soucasti...
Roman
- - - - - - - - - - - - - - - - - - - - -
http://kouzelne.misto(tec)cz/
Re[2]: OT - automatizovane zalohovani dat
[*] Filip Kinsky <xkinf01(zv)vse(tec)cz> - 28.1.2002 21:29:03
od toho je prece v Options -> Eject Options -> Always Close a pro
jistotu "Close to Read on Any Computer" :o)
tak se CD automaticky pri Ejectu uzavre a nemuze pak nastat takovy
problem... dokonce DirectCD takhle umoznuje pracovat i s CDR...
Filip Kinsky
VM> > resim problemek, jak automaticky vypalit data na CD.
VM> Zhruba 3 roky pouzivam pro zalohovani dat SW Easy CD Creator, ktery ma
VM> "DirectCD"
VM> Pak se CDRW opravdu tvari jako prepisovatelne medium a je na nej mozno
VM> pristupovat jako na HDD,FDD ci ZIP mechaniku jakymkoliv managerem, nebo
VM> primo z aplikace. Za celou dobu pouzivani se mi nestalo, ze bych se nedostal
VM> na data. Je ale pravdou, ze na jinem PC s CDRW mechanikou se stava, ze se
VM> nahrane a neuzavrene CDRW neda precist.
VM> Viktor Marek
VM> viktor(zv)mbox.vol(tec)cz
VM> ---
VM> Odchoz� zpr�va neobsahuje viry.
VM> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
VM> Verze: 6.0.317 / Virov� b�ze: 176 - datum vyd�n�: 21.1.2002
Re[2]: OT - automatizovane zalohovani dat
[*] Raul Endymion <raul(zv)raphael(tec)cz> - 28.1.2002 21:58:59
Panove...
Zkusili jste jiz pouzit programky nasich pratel z okoli linuxu jako
isowriter, makeiso apod, myslim ze toto presne kolega potrebuje a je
to zadarmo, teda pro soukrome ucely (to zde nechci rozebirat).
Nech si na www.google.com vyhledat hesla cdrtools. Tento balik
obsahuje nasledujici soubory
cdda2wav.exe
cdrecord.exe
cygwin1.dll
devdump.exe
isodump.exe
isoinfo.exe
isovfy.exe
mkisofs.exe
mount.exe
readcd.exe
rscsi.exe
scgcheck.exe
sh.exe
myslim ze s trochou konfigurovani vytvoris prosty .bat ktery udela co
potrebujes.. Napojit ho na ikonku uz potom pujde :-) Navic takto
vytvorene CD bude standartni, zadny incd,directcd apod, klidne joilet,
nebo proste ISO apod..
Raul
MS> K nejakym vypalovackam se dodaval soft, ktery si "naformatoval"
MS> cedecko tak, ze se pak tvarilo jako disketa, na kterou pak slo
MS> nahravat data standardnim zpusobem. Aby slo na toto cedecko
MS> zapisovat a cist, musel pouze tento soft bezet (tvaril se jako
MS> ikonka v tray-oblasti). Nevim ale jestli to fungovalo i s CDR,
MS> ale bezpecne to jelo s CDRW.
>> resim problemek, jak automaticky vypalit data na CD.
>> Pomoci skriptu si data pripravim, zabalim a nakopiruju na predem urcene
>> misto. A nyni bych potreboval nejakym mechanismem ona data vypalit na CD,
>> uzivatel - ka /naprosty laik/, pouze spusti paleni napr. kliknutim na
>> ikonku na plose ...
>> Takze asi potrebuju poradit soft, ktery by bral parametry z prikazove
>> radky, nevite nekdo o necem ??Poslani stisku klaves
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.1.2002 22:14:54
A co tak neposilat tem komponentam klavesovou zkratku, ale primo
zavolat tu akci, ktera se ma vykonat, napr. PasteFromClipboard apod ?
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
28.1.2002 EFG developer:
> Zdravim, mam v aplikaci menu a na jeho polozky mam nadefinovane
> klavesove zkratky.
> Potreboval bych po vykonani kodu obsluhy kliknuti na menu "poslat" tuto
> klavesovou zkratku jeste jine komponente v programu (memo).Editace souboru primo na disku
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.1.2002 22:15:07
Memo nebo Grid jsou objekty, ktere jsou v pameti. Tim si moc
nepomuzes.
Resenim je nenatahovat soubor cely, ale jen tu cast kterou potrebujes.
Nepises, o jaky soubor se jedna, zda databazovy nebo obecny.
Zkus si jeste v poradne vyhledat prispevky o mapovani souboru do
pameti.
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
28.1.2002 EFG developer:
> Zdravim,
> Mam v aplikaci udelanou editaci souboru, ale pokud nacitam velke soubory
(>>10MB) tak jeho otevreni trva neumerne dlouho.
> Lze nejak vyresit nacteni souboru do mema nebo do gridu tak, aby se
> tento soubor nemusel cely "natahovat" do pameti ?
> Dekuji Petr Sikola
Re[2]: MySQL
[*] Filip Kinsky <xkinf01(zv)vse(tec)cz> - 28.1.2002 22:28:43
z PHP se prece da pohodlne pristupovat i k IB (funkce ibase_*), takze neni duvod proc
do IB nejit kdyz je taky zadarmo a je 100x lepci nez MySQL...bohuzel free
hosting s IB asi jen tak nesezenes, ale to ty asi ani na chat shanet
nechces...(ale kdybys prece jen o necem vedel, tak dej vedet :))
Filip Kinsky
MJ> D�ky za radu. J� mysql pot�ebuju, proto�e d�l�m chat v PhP a tam jinou db
MJ> neumim. V delphi k tomu delam aplikaci.
MJ> Marek Jelen
Office Assistent (Clippy)
[*] Ondrej Kr�ko <krsko(zv)gjh.sk> - 29.1.2002 00:17:26
co pod tym myslis ? Co musi mat nainstalovane user ? Je niekde ten engine
pristupny ? Je zadarmo ?
Je pouzitelny aj v komercnych aplikaciach ?
----------------------------------------------------------------------------
----
> Ne, ale musis mit naistalovanej engine od Microsoftu.
Ale takto predpokladam, ze to bude vyzadovat nainstalovany Office 97 a
vyssi, nie ?
----- Original Message -----
From: Marek Vilda Jelen
J� si importoval ActiveX ovlada�e t�chto pomocn�k� a animuju je p�es n�.
Marek Jelen
------------------------------------
From: Ondrej Kr�ko
Dobry den,
Do svojej aplikacie by som chcel pridat nieco ako je ten otravny Assistent z
MS Officu (spinka, pripinacka, alebo co to je).
Uvazoval som, ci to nemam spravit cez nepravidelny tvar okna, ale neviem, ci
to bude to najlepsie riesenie. (pretoze ten asistent casto meni svoj tvar, a
teda by sa musel menit aj tvar okna, presne podla animacie v nom).
TIBUpdateSQL a INSERT
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 06:28:50
Protoze ho mas v SelectSQL. Tam si u toho ID nastav (tusim se to tak nazyva,
nemam ted delphouna otevreneho) Required := False;
Sroub
----- Original Message -----
From: "Zdenek Janish" <medusa(zv)brajan(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, January 28, 2002 4:48 PM
Subject: TIBUpdateSQL a INSERT
> Dobry den,
>
> mam tabulku:
>
> CREATE DOMAIN "DateIns" AS DATE DEFAULT 'NOW' CHECK (VALUE <= 'NOW') NOT
> NULL;
> CREATE DOMAIN "Ident" AS INTEGER DEFAULT 0 CHECK (VALUE > 0) NOT NULL;
> CREATE GENERATOR "OsobaID";
> CREATE TABLE "Osoba"
> (
> "ID" "Ident",
> /* Proc nejde: "ID" INTEGER DEFAULT GEN_ID("OsobaID", 1) ????????? */
> "Datum" "DateIns",
> "Funkce" VARCHAR(10) CHARACTER SET UNICODE_FSS DEFAULT '' NOT NULL,
> "Jmeno" VARCHAR(50) CHARACTER SET UNICODE_FSS DEFAULT '' NOT NULL,
> "Adresa" VARCHAR(30) CHARACTER SET UNICODE_FSS DEFAULT '',
> "Mesto" VARCHAR(30) CHARACTER SET UNICODE_FSS DEFAULT '',
> "Poznamka" VARCHAR(100) CHARACTER SET UNICODE_FSS DEFAULT '',
> UNIQUE ("ID")
> );
>
> CREATE TRIGGER "Osoba_Before_Insert" FOR "Osoba"
> ACTIVE BEFORE INSERT POSITION 0 AS
> BEGIN
> NEW."ID" = GEN_ID("OsobaID", 1);
> END
>
> Pokud udelam "rucne" pres TIBQuery:
> INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
> VALUES ('Dodavatel', 'Jirka Vseticka', 'Bilovice 10', 'Praha 10 -
> Hostivar');
>
> tak vse probehne jak ma, tedy se provede TRIGGER a doplni ID.
>
> V pripade, ze vyuziji TIBUpdateSQL a do InsertSQL:
> INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
> VALUES (:"Funkce", :"Jmeno", :"Adresa", :"Mesto");
>
> tak obdrzim milouckou zpravicku:
> "Field 'ID' must have value."
>
> Proc se po ID v INSERu shani? Kdyt v SQL i nem neni ani zminka.
> Je to v nastaveni komonent? A nebo spatne vytvorena tabulka?
>
> Dekuji za rady
>
> Zdenek Janish
>DBGrid Sinea VCL3 a trideni cesky
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 06:37:42
Na jake databazi to chodi? To by nemelo byt o trideni v DBGridu, ale v
databazi (u Interbase musis nastavit Collation Order pro select, U MSSQL
nastavujes uz pri instalaci kodovou stranku a case sensitive apod viz
konference)
Sroub
> Prijemny den,
> pouzivam D5Prof a Win 95 OSR2
>
> Pouzivam knihovnu komponent Sinea VCL3 a z ni DBGrid. Problem je v tom, ze
> se mi jednotlive polozky v tomto gridu netridi podle abecedy tedy i s
hacky
> a carkami. Polozky zacinajici na C s hackem, Z s hackem a vsechny ostatni
s
> carkou nebo hackem se mi radi nakonec. V demu k tomuto baliku komponent to
> funguje dobre, ale nemohu prijit na to, jak toho mam docilit ja.
Delphi - redirect
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 29.1.2002 07:08:26
Lebeda David dne 28 Jan 2002 v 15:38:
> narazil jsem na zajimave chovani v D5. Mam projekt tvoreny radou
> formularu a kazdy form obsahuje Toolbar. Mimo to existuji dva
> datamoduly. Na jednom bylo pripojeni do databaze a jine cerepeticky,
> na druhem pouze jediny ImageList nesouci ikony pro tlacitka. Nyni jsem
> jsem rozhodl ten ImageList premistit na prvni datamodul a ten druhy
> zrusit. A ted problem.
> Za jistych podminek po prebuildovani programu mi Delphi
> automaticky nabidne presmerovat odkazy (z Toolbaru), z jiz
> neexistujiciho datamodulu na ten druhy. To je spravne, necham to
> udelat, vse se podari. Projekt muzu ulozit, zavrit...a po dalsim
> otevreni projektu jsou nektere z tech odkazu presmerovane a nektere
> ne. Nechapu to. Setkal jste se s tim nekdo? Pokud ta presmerovani
> provedu rucne, je to OK.
Ahoj,
mam pocit, ze chyba je v D5 - ony sice zmeni ty odkazy, ale u toho zmeneneho souboru si zapomenou poznamenat, ze ho
zmenily. Takze kdyz pak das "Ulozit cely projekt", stejne se to neulozi. Obejit se to da samozrejme tim, ze v tom
formulari/datamodulu udelas nejakou zmenu (s necim pohnes, pak to das rucne zpet); tim bude formular "zmenen" a pri
ukladani projektu se uz opravdu zapise na disk.
Snad moc nekecam, ale tak se mi to jevilo :-))
S pozdravem
Karel Rys
TIBUpdateSQL a INSERT
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 29.1.2002 07:13:28
> Pokud udelam "rucne" pres TIBQuery:
> INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
> VALUES ('Dodavatel', 'Jirka Vseticka', 'Bilovice 10', 'Praha 10 -
> Hostivar');
>
> tak vse probehne jak ma, tedy se provede TRIGGER a doplni ID.
>
> V pripade, ze vyuziji TIBUpdateSQL a do InsertSQL:
> INSERT INTO "Osoba" ("Funkce","Jmeno","Adresa","Mesto")
> VALUES (:"Funkce", :"Jmeno", :"Adresa", :"Mesto");
>
> tak obdrzim milouckou zpravicku:
> "Field 'ID' must have value."
>
> Proc se po ID v INSERu shani? Kdyt v SQL i nem neni ani zminka.
> Je to v nastaveni komonent? A nebo spatne vytvorena tabulka?
To je riziko pouziti prime editace dat pomoci IBUpdateSQL nebo
IBDatasetu. Delphi predpoklada, ze vsechna pole v SelectSQL,
ktera jsou not null, obdrzi hodnotu a iniciativne to kontroluje
(Delphi, nikoli SQL server). To, ze tam je default nebo generator,
Delphi neumi poznat. Mozne reseni je v AfterOpen dat neco jako
IBQuery.FieldByName('id').Required := False
, pokud ta pole mas vytvorena jiz v design time, muzes to udelat
rovnou rucne v object inspektoru, ale aby ses zbavil te zavislosti
insertu na selectu, zkusil bych zvazit provadeni insertu v jinem
nezavislem datasetu a jine nezavisle (kratke) transakci. Nerikam,
ze to musi byt vhodne reseni, ale zvazit to muzes :)
David Lebeda
PickList a problemy
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 29.1.2002 07:34:00
Ahoj,
pouzivam DBGrid v jednom miste podobnym zpusobem jako object
inspector, tj. 2 sloupce, v jednom nazev vlastnosti, ve druhem
hodnota. V zavislosti na typu vlastnosti pak pri AfterScroll menim
TColumn.ButtonStyle pro prislusny sloupec, pripadne PickList, ma-
li jit o combo. Jenomze...grid to nereflektuje, resp. se zpozdenim
jedne zmeny radku. Priklad.
Necht vsechny vlastnosti jsou typu Integer, tj. ButtonStyle je
cbsNone a nekde mezi nimi je i vlastnost Style umoznujici vybrat
jeden ze 4 stylu. Pokud projizdim gridem sipkou dolu a najedu na
radek se Style, zadne combo se nenabidne, ale jakmile prejedu na
dalsi radek (uz zase integer), objevi se combo s nabidkou stylu.
Jak to udelat spravne?
Stavajici kusy kodu:
procedure TParametry.DatasetAfterScroll(DataSet: TDataSet);
begin
GridColEnter(Grid);
end;
procedure TParametry.GridColEnter(Sender: TObject);
begin
case Dataset.FieldByName('TYP').AsInteger of
1: // cele cislo
begin
Grid.Columns[IndexParm].ButtonStyle:=cbsNone;
end;
2: // vycet
begin
Grid.Columns[IndexParm].PickList := nejaky TStringList;
Grid.Columns[IndexParm].ButtonStyle:=cbsAuto;
end;
end;
end;
Nepomohlo ani nedavat ten kod do OnColEnter a volat ho az v
reakci na uzivatelskou zpravu.
Diky.
David Lebeda
MySQL
[*] Lasevic, Martin <MLasevic(zv)ratiopharm(tec)cz> - 29.1.2002 07:49:17
Jak to? V PHP4 jsou moduly na podporu Interbase, MS SQL ....
> -----Original Message-----
> From: Marek Jelen [mailto:marek.jelen(zv)mybox(tec)cz]
> Sent: Monday, January 28, 2002 8:13 PM
> To: delphi-l(zv)clexpert(tec)cz
>
> D�ky za radu. J� mysql pot�ebuju, proto�e d�l�m chat v PhP a
> tam jinou db
> neumim. V delphi k tomu delam aplikaci.
> Marek Jelen
> Problem so zmenou ulozenia v IB
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 07:50:57
Nedelas to pres dve komponenty (TIBDataset, TIBQuery, TIBTable), ktere maji
kazda svou vlastni transakci?
Sroub
----- Original Message -----
From: <delphi(zv)zvlauto.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, January 29, 2002 7:50 AM
Subject: Problem so zmenou ulozenia v IB
> Zdravim,
>
> Mam taky "mensi" problem. V programe pristupujem do databazy (IB6). Pridam
> nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
> zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to
pouzijem
> nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a
spustim
> danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam
IBTable.Post.
> Viete mi niekto pomost?
>
> D5, IB6, W2000.
>
> Robo
Problem so zmenou ulozenia v IB
[*] <delphi(zv)zvlauto.sk> - 29.1.2002 07:50:32
Zdravim,
Mam taky "mensi" problem. V programe pristupujem do databazy (IB6). Pridam
nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to pouzijem
nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a spustim
danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam IBTable.Post.
Viete mi niekto pomost?
D5, IB6, W2000.
Robo
DBGrid Sinea VCL3 a trideni cesky
[*] ales(zv)kerner(tec)cz - 29.1.2002 07:51:11
Nesel by napsat nejaky priklad s tim Collation order, nemam s nim zadne
zkusenosti
Dik Ales
Cituji z emailu od Ren� Otisk <otisk(zv)MISEL(tec)cz>:
> Na jake databazi to chodi? To by nemelo byt o trideni v DBGridu, ale v
> databazi (u Interbase musis nastavit Collation Order pro select, U MSSQL
> nastavujes uz pri instalaci kodovou stranku a case sensitive apod viz
> konference)
>
> Sroub
>
>
>
> > Prijemny den,
> > pouzivam D5Prof a Win 95 OSR2
> >
> > Pouzivam knihovnu komponent Sinea VCL3 a z ni DBGrid. Problem je v tom,
> ze
> > se mi jednotlive polozky v tomto gridu netridi podle abecedy tedy i s
> hacky
> > a carkami. Polozky zacinajici na C s hackem, Z s hackem a vsechny ostatni
> s
> > carkou nebo hackem se mi radi nakonec. V demu k tomuto baliku komponent
> to
> > funguje dobre, ale nemohu prijit na to, jak toho mam docilit ja.
>
>
OT: Vypisanie vsetkych variacii k-tej triedy z N p
[*] Info About <dinfo(zv)post.sk> - 29.1.2002 07:52:44
Poskytne niekto algoritmus na %subj%
kde k>n
malo by ich byt n na k-tu
Dakujem
Maros
P.S. Permutacie som nemal na mysli, bol to "ranny" preklep:)))
--
Nove bezplatne online inzeraty v 296 kategoriach?
Kliknite na http://www.inzeraty.sk
Seriova a paralelni komunikace
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 29.1.2002 07:55:32
> PS: Videl jsem unitu Synaser, ale bez zakladnich znalosti se mi jevi jako
> nepouzitelna. Uz samotna fce connect() ma totiz nekolik "zahadnych"
> parametru (bits, parity, stop, softflow, hardflow). Priklad pouziti by jiste
> neskodil. Slo by tuto jednotku pouzit i pro komunikaci po paralelnim kabelu?
K tomu SynaSeu...
Priklad pouziti najdes v distribucnim balicku synaseru. piokud ta
zadne demo nemas, stahni si novejsi verzi!
Ony zahadne parametry jsou ale nezbytne pro zahajeni sriove
komunikace. Jsou to zkratka konfiguracni parametry, ktere kdyz nevis,
NEMUZES navazat serovou komunikaci. nestaci jen rychlost, musis jeste
rict:
bit - delka slova u seriove komunikace se ne vzdy pouziva 8 bitu na
slovo.
parita - specifikujes, jesti prenasene slovo ma ci nema na konci
pridany paritni bit, a jestlize ano, tak jakym zpusobem je pocitan.
stop - definuje pocet stopbitu. tedy pocet bitu na konci prenaseneho
sova, kterym je prenos slova ukoncen.
sftflow a hardrflow - urcuje druh rizeni toku dat.
jinak synaser v soucasne dobe nejlze pouzit pro paraleni komunikaci,
na tomto poli jsem nepodniknul zatim zadne pokusy.
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.DBGrid Sinea VCL3 a trideni cesky
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 08:01:39
Jakou DB pouzivas. Jestlize Interbase tak:
select sloupec1, sloupec2 from tabulka order by sloupec1 collate PXW_CSY
Sroub
----- Original Message -----
From: <ales(zv)kerner(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, January 29, 2002 7:51 AM
Subject: Re: DBGrid Sinea VCL3 a trideni cesky
> Nesel by napsat nejaky priklad s tim Collation order, nemam s nim zadne
> zkusenosti
>
> Dik Ales
>
> Cituji z emailu od Ren� Otisk <otisk(zv)MISEL(tec)cz>:
>
> > Na jake databazi to chodi? To by nemelo byt o trideni v DBGridu, ale v
> > databazi (u Interbase musis nastavit Collation Order pro select, U MSSQL
> > nastavujes uz pri instalaci kodovou stranku a case sensitive apod viz
> > konference)
> >
> > Sroub
> >
> >
> >
> > > Prijemny den,
> > > pouzivam D5Prof a Win 95 OSR2
> > >
> > > Pouzivam knihovnu komponent Sinea VCL3 a z ni DBGrid. Problem je v
tom,
> > ze
> > > se mi jednotlive polozky v tomto gridu netridi podle abecedy tedy i s
> > hacky
> > > a carkami. Polozky zacinajici na C s hackem, Z s hackem a vsechny
ostatni
> > s
> > > carkou nebo hackem se mi radi nakonec. V demu k tomuto baliku
komponent
> > to
> > > funguje dobre, ale nemohu prijit na to, jak toho mam docilit ja.
> >
> >
>
>Zjisteni behu MSSQL
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 29.1.2002 08:11:04
Ahoj,
Jak zjistim ze na pocitaci je nainstalovany MS SQL Server (SQL nemusi
nutne bezet, muze byt stopped)?
Jak ho programove nahodim nebo zastavim?
Diky,
Ales
Zjisteni behu MSSQL
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 08:14:56
Hi,
Existuje v registrech
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer
Sroub
Jak zjistim ze na pocitaci je nainstalovany MS SQL Server (SQL nemusi
nutne bezet, muze byt stopped)?
Jak ho programove nahodim nebo zastavim?Zjisteni behu MSSQL
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 29.1.2002 08:21:45
Ahoj,
To sice jo, ale neni to uplne ono. Napriklad ja mam nainstalovany pouze
nastroje na spravu DB (query analyzer + enterprise manager) +
connectivity tools, cili zadny MSSQL mi na masine nebezi, ale presto ten
klic v registru mam. Potrebuji neco spolehlivejsiho :(
Ales
> -----Original Message-----
> From: Ren� Otisk [mailto:otisk(zv)MISEL(tec)cz]
>
> Hi,
>
> Existuje v registrech
> HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer
>
> Sroub
>
>
> Jak zjistim ze na pocitaci je nainstalovany MS SQL Server (SQL nemusi
> nutne bezet, muze byt stopped)?
> Jak ho programove nahodim nebo zastavim?
>
> Zjisteni behu MSSQL
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.1.2002 08:27:25
Navic ten klic, jak znam MS, tam urcite zustane, i kdyz MS SQL
odinstalujes :-(
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
29.1.2002 Ales Vasicek:
> To sice jo, ale neni to uplne ono. Napriklad ja mam nainstalovany pouze
> nastroje na spravu DB (query analyzer + enterprise manager) +
> connectivity tools, cili zadny MSSQL mi na masine nebezi, ale presto ten
> klic v registru mam. Potrebuji neco spolehlivejsiho :(
>> HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer
>> Jak zjistim ze na pocitaci je nainstalovany MS SQL Server (SQL nemusi
>> nutne bezet, muze byt stopped)?
>> Jak ho programove nahodim nebo zastavim?
OT: Vypisanie vsetkych variacii k-tej triedy z N p
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 29.1.2002 08:46:02
http://www.nist.gov/dads/terms.html
S pozdravem
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
ICQ : 13367373990
+420605/813644
>>> dinfo(zv)post.sk 29.1.02 7:52 >>>
Poskytne niekto algoritmus na %subj%
kde k>n
malo by ich byt n na k-tu
Dakujem
Maros
P.S. Permutacie som nemal na mysli, bol to "ranny" preklep:)))
--
Nove bezplatne online inzeraty v 296 kategoriach?
Kliknite na http://www.inzeraty.sk
Razeni nalezenych souboru s FindFirst/FindNext
[*] Obermaier Petr Ing. <Obermaier(zv)mail.sdas(tec)cz> - 29.1.2002 08:58:51
Zdravim,
zajimalo by me, zda existuje nejaky jednoduchy zpusob, jak seradit soubory
nalezene pomoci FindFirst/FindNext, resp. jiz hledat i s ohledem na ABC.
Popr. je-li nejaky jiny (neVCL) zpusob, jak vypsat soubory v adresari dle
zadane masky podle abecedy.
S pozdravem
Ober
Problem so zmenou ulozenia v IB
[*] ales(zv)kerner(tec)cz - 29.1.2002 09:30:07
Vypada to, jako by si neuzaviral transakci, zkuz po provedeni prikazu
provest neco jako Transaction.Commit.
Ales
Cituji z emailu od delphi(zv)zvlauto.sk:
> Zdravim,
>
> Mam taky "mensi" problem. V programe pristupujem do databazy (IB6). Pridam
> nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
> zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to pouzijem
> nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a
> spustim
> danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam
> IBTable.Post.
> Viete mi niekto pomost?
>
> D5, IB6, W2000.
>
> Robo
>
zapis do registru
[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 29.1.2002 09:38:55
Jiz druhy den se trapim se zapisem do registru. Pouzivam tohoto postupu pro
vytvoreni asociace se souborem typu .qst:
Reg:= TRegistry.Create;
Reg.Access:= KEY_ALL_ACCESS;
Reg.RootKey:= HKEY_CLASSES_ROOT;
try
if not Reg.OpenKey('.qst',False) then // neni li vytvoreno, pak
vytvor
begin
Reg.CreateKey('.qst');
Reg.WriteString('', 'qst_file');
Reg.CloseKey;
Reg.CreateKey('qst_file');
Reg.WriteString('', 'Health promotion screening processing');
Reg.CloseKey;
Reg.CreateKey('qst_file\Shell');
Reg.WriteString('', 'open' );
Reg.CloseKey;
Reg.CreateKey('qst_file\Shell\Open\Command');
Reg.WriteString('', Application.ExeName + ' "%1"');
Reg.CloseKey;
end;
finally
Reg.Free;
end;
Pokud spustim program z IDE, pak vse probehne jak je naprogramovano a
asociace se vytvori. Pokud spustim program jinak, pak se vytvori jen prvni
klic a nekdy to ohlasi vyjimku pri zapisu do tohoto klice; vetsinou vsak to
skonci bez hlaseni a dalsi klice se nevytvori. Setkal se nekdo s timto
problemem, ci muze nekdo poradit cestu k dosazeni zadouciho vysledku?
Predem dekuji za kazdou radu.
Ing. Jan Dvorak
Variant
[*] HOST user <cico(zv)host.sk> - 29.1.2002 09:40:04
Dobry den.
Mam problem s Variantom a ActiveX v Delphi.
goWorkingFolder := loTempObject.Contents(lsUserName);
goWorkingFolder, a loTempObject su Varianty. loTempObject je nasetovany
ActivX....
Horeuvedenym riadkom zistujem pritomnost foldra lsUserName na serveri...
Ak dany folder nexistuje mal by vratit hodnotu NULL... vrati($00000000).
Neviem to nejako osetrit a metody VarIsClear a VarIsEmty, VarIsNull mi
vracaju false.
Neviete mi niekto poradit ako to porovnat??? pretoze goWorkingFolder =
$00000000 mi vyhadzuje invalid variant operation...
Vdaka
CheckListBox-vybrany radek
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 29.1.2002 09:56:04
Dobry den.
Muj problem: ma-li CheckListBox tolik radku, ze se nevejde do
okenka a objevi se posouvaci lista, pak pri zaskrtavani pomoci
mysi zustane spravne jako vybrany ten radek, na jehoz zaskrtavaci
pole jsem tuknul. Kdyz ale provedu zaskrtnuti mezernikem,
seznam se vrati na prvni radek. Da se tomu nejak odpomoci? Diky.
D5, W2000
Z.Kalhous
IB/FB - SP a pole typu date
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 29.1.2002 10:01:23
----- Original Message -----
From: "Jaroslav Uher" <moravia(zv)mbox.vol(tec)cz>> Nezda se mi mozne, ze NIKDO nepouzivate SP s polem date.
Nevim jak v IB 6, ale v IB 5.x byla prace s polem typu DATE
straaaasne pomala, pokud bylo v tabulce toto pole a pouzilo
se do WHERE, bylo to o rad pomalejsi nez s jinymi typy.
Z toho duvodu (a take kvuli kompatibilite databaze a programu
kde se pouziva TDateTime, ktery je v podstate float) vsechny
datumy ukladame do databaze jako FLOAT. Ale to ti asi
nepomuze...
Martin Schayna
Aktis a.s.
Vyber tlacoveho generatora.
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 29.1.2002 10:11:16
----- Original Message -----
From: "Miroslav Hro��o" <hrossik(zv)nrsys.sk>> Potreboval by som poradit ohladne vyberu.
> Tlacovy generator by mal mat nasledujuce vlastnosti :
> 1) Vediet expotrovat do Wordu, EXCELU (nemusi byt to v DOC, XLS).
> 2) Vediet ulozit do tlacovku do suboru, z ktoreho sa da tlacit na
lubovolnej
> tlaciarni.
> 3) Z suboru, v ktorom je ulozena, aby sa dal spravit export do Wordu a
> Excelu.
> 4) Tento ulozeny subor mal by mat rozumnu velkost, cize porovnatelnu s
> Textovim suborom.
> 5) Aby mal prehiadac, v ktorom sa da hladat. Toto nemusi splnat.
Pouzivame QuickReporty (ja vim co chcete rict, ale ctete dal), ktere
jsme si nalezite upravili a vcelku splnuji vsechny vase pozadovane
vlastnosti krome bodu 3)
viz http://www.aktis(tec)cz/ -> Abra G3 -> download, ke stazeni je
i prohlizec ARPView.exe na tiskove sestavy "vytisknute" do souboru.
Martin Schayna
Aktis a.s.
Vyber tlacoveho generatora.
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 29.1.2002 10:22:21
zkus RTF-Report
nevim co vsecko splnujem, ponevadz ho nepouzivam.
excel asi umet nebude, ale to bych ani necekal.
vzdy se da vytvorit csv a ten do excelu nacist.
http://gpb.skiftel.ru/ec/index.html
dekuji PeC(zv)Problem so zmenou ulozenia v IB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 29.1.2002 10:26:54
Haj hou1
On 29 Jan 2002, at 7:50, delphi(zv)zvlauto.sk wrote:
> Mam taky "mensi" problem. V programe pristupujem do databazy
> (IB6). Pridam nejaku polozku - v pohode. Ale akonahle potom ju
> chcem modifikovat a zapisat, tak ta zmena sa neprejavi. Ako je to
> mozne? Pritom ked to pouzijem nasledne este raz tak to funguje.
> Staci ze program vypnem a zapnem a spustim danu proceduru na zmenu,
> tiez to funguje. Na ulozenie pouzivam IBTable.Post.
Pridanim polozky minis pridani pole do struktury tabulky ? A jak
pritom postupujes ? Je dulezite, aby jsi...
1) provedl commit po zmene struktury
2) Transakce ktera ma zmeny vydet byla typu "read committed"
(vlastnosti transakce, viz. comp. editor TIBTransaction)
S pozdravem
Pavel Cisar
http://www.ibphoenix.com
For all your upto date Firebird and
InterBase information
zapis do registru
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.1.2002 10:38:44
29.1.2002 Jan Dvorak:
> Jiz druhy den se trapim se zapisem do registru. Pouzivam tohoto postupu pro
> vytvoreni asociace se souborem typu .qst:
> Reg:= TRegistry.Create;
> Reg.Access:= KEY_ALL_ACCESS;
> Reg.RootKey:= HKEY_CLASSES_ROOT;
> try
> if not Reg.OpenKey('.qst',False) then // neni li vytvoreno, pak
> vytvor
> begin
> Reg.CreateKey('.qst');
> Reg.WriteString('', 'qst_file');
> Reg.CloseKey;
> Reg.CreateKey('qst_file');
> Reg.WriteString('', 'Health promotion screening processing');
> Reg.CloseKey;
> Reg.CreateKey('qst_file\Shell');
> Reg.WriteString('', 'open' );
> Reg.CloseKey;
> Reg.CreateKey('qst_file\Shell\Open\Command');
> Reg.WriteString('', Application.ExeName + ' "%1"');
> Reg.CloseKey;
> end;
> finally
> Reg.Free;
> end;
> Pokud spustim program z IDE, pak vse probehne jak je naprogramovano a
> asociace se vytvori. Pokud spustim program jinak, pak se vytvori jen prvni
> klic a nekdy to ohlasi vyjimku pri zapisu do tohoto klice; vetsinou vsak to
> skonci bez hlaseni a dalsi klice se nevytvori. Setkal se nekdo s timto
> problemem, ci muze nekdo poradit cestu k dosazeni zadouciho vysledku?
RegCreateKey je docela nestastna konstrukce, pokud klic jiz existuje.
Testujes to pouze u prvni a u dalsich jiz ne.
Lepsi bych videl konstrukci
If Reg.OpenKey('\qst_file', True) then ...
Pokud klic existuje, otevre jej, pokud neexistuje vytvori a otevre.
Kazdopadne je treba do cest uvadet lomitka, takze ne primo 'qst_file',
ale '\qst_file'
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
zapis do registru
[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 29.1.2002 10:39:03
Odpovim si sam: V tom kousku programu je prirozene chyba; nestaci klic jen
vytvorit je nutne jej take otevrit. Mel jsem to puvodne dobre, avsak pri tom
zmatkovani v poslednich hodinach jsem to predelal na spatnou verzi. Kdyz se
to opravi, tak je to v poradku.
Problem je vsak jiny. Pokud program spustim po vytvoreni (build, compile, z
IDE) vse se provede. Pokut vsak vytvorim setup.exe pomoci Inno Setup
Compiler Verze 2.0.18, tak po provedeni instalace se klice vytvori, avsak
zapisy do registru se neprovedou. Pri vytvareni setupu pouzivam registry jen
pro odinstalovani tekto:
[Registry]
Root: HKCR; Subkey: ".qst"; Flags: uninsdeletekey
Root: HKCR; Subkey: "qst_file"; Flags: uninsdeletekey
Ma s timto nekdo zkusenosti?
Ing. Jan Dvorak
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Jan Dvorak
> Sent: Tuesday, January 29, 2002 9:39 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: zapis do registru
>
>
> Jiz druhy den se trapim se zapisem do registru. Pouzivam tohoto
> postupu pro
> vytvoreni asociace se souborem typu .qst:
>
> Reg:= TRegistry.Create;
> Reg.Access:= KEY_ALL_ACCESS;
> Reg.RootKey:= HKEY_CLASSES_ROOT;
> try
> if not Reg.OpenKey('.qst',False) then // neni li vytvoreno, pak
> vytvor
> begin
> Reg.CreateKey('.qst');
> Reg.WriteString('', 'qst_file');
> Reg.CloseKey;
> Reg.CreateKey('qst_file');
> Reg.WriteString('', 'Health promotion screening processing');
> Reg.CloseKey;
> Reg.CreateKey('qst_file\Shell');
> Reg.WriteString('', 'open' );
> Reg.CloseKey;
> Reg.CreateKey('qst_file\Shell\Open\Command');
> Reg.WriteString('', Application.ExeName + ' "%1"');
> Reg.CloseKey;
> end;
> finally
> Reg.Free;
> end;
>
> Pokud spustim program z IDE, pak vse probehne jak je naprogramovano a
> asociace se vytvori. Pokud spustim program jinak, pak se vytvori jen prvni
> klic a nekdy to ohlasi vyjimku pri zapisu do tohoto klice;
> vetsinou vsak to
> skonci bez hlaseni a dalsi klice se nevytvori. Setkal se nekdo s timto
> problemem, ci muze nekdo poradit cestu k dosazeni zadouciho vysledku?
>
> Predem dekuji za kazdou radu.
> Ing. Jan Dvorak
>Zjisteni behu MSSQL
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 29.1.2002 11:10:03
> Jak zjistim ze na pocitaci je nainstalovany MS SQL Server (SQL nemusi
> nutne bezet, muze byt stopped)?
> Jak ho programove nahodim nebo zastavim?
Ak je nainstalovany, potom by SCM (Service Control Manager) mal mat
zaregistrovany jeho service. Pomocou SCM sa da tiez spustit alebo zastavit.
Podla MSDN ak si spolu s MSSQL nainstalujes aj samples, mali by tam byt na
to priklady v C-cku:
...\Devtools\Samples\Misc\Scm\SCMStatus
...\Devtools\Samples\Misc\Scm\SCMControl
Po odinstalovani MSSQL predpokladam, ze sa tiez odregistruje service z SCM,
takze by to mal byt dost spolahlivy sposob.
HTH
TOndrej
FB a Unicode_FSS
[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 29.1.2002 11:27:51
Ahoj stretli sme sa s problemom (prilozeny), tusite co s tym?
D5Ent, FB1RC2(RC1), Win(NT) i Linux, ...
Kakacka Pavol
KasiX(zv)atlas(tec)cz
> Aplikaci musime vytvorit jako vicejazycnou. Jedinym resenim
> koexistence znaku vice znakovych sad je pouziti Unicode resp. UTF-8.
> Bohuzel je v Interbase jedna chyba, viz n�sledujici postup:
>
> 1) Vytvorime tabulku:
> CREATE DOMAIN ZEMEKOD AS VARCHAR(2) CHARACTER SET UNICODE_FSS;
> CREATE TABLE TAB_ZEME
> (
> ZEME_KOD ZEMEKOD NOT NULL,
> NAZEV VARCHAR(40) CHARACTER SET UNICODE_FSS NOT NULL,
> PRIMARY KEY (ZEME_KOD)
> );
> 2) Do tabulky je mozn� vlozit data pomoci IBCONSOLE (i jinych nastroju)
takto:
> insert into TAB_ZEME (ZEME_KOD,NAZEV) values ('abcdef','abc')
>
> To je ale v rozporu s definici tabulky, nebot policko ZEME_KOD m� byt
> dlouh� maxim�lne 2 znaky. Pomoci IBCONSOLE je mozn� tato data cist, ale
> JDBC ovladac nahl�si chybu:
>
> SQL error code=-303 arithmetic exception, numeric overflow, or string
> truncation
>
> Z toho vyplyvaji dva probl�my:
> 1) Interbase sice alokuje dostatek mista pro k�dov�ni UTF-8, ale
> nekontroluje skutecnou d�lku retezce.
> 2) Data, vlozen� jednim n�strojem pro pristup k datum (IBCONSOLE), nelze
> precist pod jinym n�strojem (JDBC)
Zjisteni behu MSSQL
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 29.1.2002 11:36:41
Ale pouze na NT - tam je sluzba MSSQLServer, ktera se da ovladat
(spustet, zastavit) a mate-li prava tak i vzdalene.
Ale jak je to na Win9x? Tam bych to potreboval take, protoze standardni
instalace MSDE ho nestartuje po spusteni.
Na MSDN jsem kdysi nasel clanek o tom jak instalovat MSDE a mimo jine se
tam zminuji o nejake ukazkove instalaci ve VB, kde by melo byt mimo jine
nastartovani MSSQL pres nejaky COM objekt. Ale z toho textu jsem
nevyrozumnel ktery a ty ukazkove zdrojaky jsem nikde nenasel.
Honza +
> Ak je nainstalovany, potom by SCM (Service Control Manager) mal mat
> zaregistrovany jeho service. Pomocou SCM sa da tiez spustit
> alebo zastavit.
> Podla MSDN ak si spolu s MSSQL nainstalujes aj samples, mali
> by tam byt na
> to priklady v C-cku:
>
> ...\Devtools\Samples\Misc\Scm\SCMStatus
> ...\Devtools\Samples\Misc\Scm\SCMControl
>
> Po odinstalovani MSSQL predpokladam, ze sa tiez odregistruje
> service z SCM,
> takze by to mal byt dost spolahlivy sposob.
>
> HTH
> TOndrej
> Zjisteni behu MSSQL
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 29.1.2002 11:43:57
> Ale jak je to na Win9x? Tam bych to potreboval take, protoze
> standardni instalace MSDE ho nestartuje po spusteni.
Priznam sa, vobec ma nenapadlo, ze by niekto mohol pouzivat Win9x na
prevadzku databazoveho servra.
Zda sa, ze MSSQL pre Win9x instaluje cosi ako svoj vlastny SCM pre Win9x:
w95scm.dll. Je mozne, ze tym padom je rovnaky postup pre vsetky platformy,
akurat na Win9x musis linkovat k w95scm.dll namiesto advapi32.dll.
Tiez by si mal na to najst priklad niekde v tych ukazkach.
Ja MSSQL nainstalovany nemam, a nie je mi to z tej dokumentacie v MSDN
jasne, takze sa mozno mylim.
HTH
TOndrej
Razeni nalezenych souboru s FindFirst/FindNext
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 29.1.2002 11:51:41
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.
Napada me treba davat ty nazvy do TStringListu a ten jiz umi trideni.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
********************************************
* D&COMM s.r.o. - sledov�n� vozidel *
* v re�ln�m �ase a prodej licenc� *
* v r�mci programu Microsoft Select *
* ---------------------------------------- *
* Korunova�n� 6 *
* Praha 7 *
********************************************
> zajimalo by me, zda existuje nejaky jednoduchy zpusob, jak
> seradit soubory
> nalezene pomoci FindFirst/FindNext, resp. jiz hledat i s
> ohledem na ABC.
> Popr. je-li nejaky jiny (neVCL) zpusob, jak vypsat soubory v
> adresari dle
> zadane masky podle abecedy.Problem so zmenou ulozenia v IB
[*] <delphi(zv)zvlauto.sk> - 29.1.2002 12:20:05
ked dam Transaction.Commit tak mi to ale uzavrie celu databazu. Neda sa to
obist?
Nedelas to pres dve komponenty (TIBDataset, TIBQuery, TIBTable), ktere maji
kazda svou vlastni transakci? Nie, v celom programe je jedina transakcia.
Robo.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of ales(zv)kerner(tec)cz
Sent: Tuesday, January 29, 2002 9:30 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Problem so zmenou ulozenia v IB
Vypada to, jako by si neuzaviral transakci, zkuz po provedeni prikazu
provest neco jako Transaction.Commit.
Ales
Cituji z emailu od delphi(zv)zvlauto.sk:
> Zdravim,
>
> Mam taky "mensi" problem. V programe pristupujem do databazy (IB6). Pridam
> nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
> zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to
pouzijem
> nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a
> spustim
> danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam
> IBTable.Post.
> Viete mi niekto pomost?
>
> D5, IB6, W2000.
>
> Robo
>D�tum s�boru
[*] Martin Kasman <martinkasman(zv)pobox.sk> - 29.1.2002 12:36:35
Mam subor 1.txt a subor 2.txt.
Ako najjednoduchsim sposobom priradim datum a cas vytvorenia suboru z 1.txt
do 2.txt.
Vdaka za kazdu radu.Problem so zmenou ulozenia v IB
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 29.1.2002 12:57:18
tak dej commitretaining a nebo ty dva datasety poves na stejnou transakci...
Sroub
> ked dam Transaction.Commit tak mi to ale uzavrie celu databazu. Neda sa to
> obist?
>
> Nedelas to pres dve komponenty (TIBDataset, TIBQuery, TIBTable), ktere
maji
> kazda svou vlastni transakci? Nie, v celom programe je jedina transakcia.
>
> Robo.
>
> Vypada to, jako by si neuzaviral transakci, zkuz po provedeni prikazu
> provest neco jako Transaction.Commit.
>
> Ales
>
> Cituji z emailu od delphi(zv)zvlauto.sk:
>
> > Zdravim,
> >
> > Mam taky "mensi" problem. V programe pristupujem do databazy (IB6).
Pridam
> > nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
> > zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to
> pouzijem
> > nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a
> > spustim
> > danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam
> > IBTable.Post.
> > Viete mi niekto pomost?
> >
> > D5, IB6, W2000.
> >
> > Robo
> >
>
>Vyber tlacoveho generatora.
[*] PeJaSoft <pejasoft(zv)volny(tec)cz> - 29.1.2002 13:04:11
Na adrese
http://www.xs4all.nl/~dgb/delreprt.html
mas seznam nejznamejsich generatoru tiskovych sestav.
Osobne doporucuju ReportBuilder.
S pozdravem
Petr Jarkovsky
pejasoft(zv)post(tec)cz
Filtr v MS Access v poli datum/cas
[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 29.1.2002 13:11:33
Zdravim ve spolek!
Narazil jsem na jisty problem, a to: Potrebuju z databaze MS Access nacist
tabulku -> OK a pak v ni provest filtraci dat -> PROBLEM. Jedna se o
filtraci dle pole DATUM, kter je ale ve formatu datum/cas. Ja chci ale
vybrat data jen podle datumu, tj. DATUM=DateToStr(Datum: TDate); Nevite
nekdo jak na to?Oskar SMS prez HTTP
[*] Robert Plz�k <rpvp(zv)vagnerplast(tec)cz> - 29.1.2002 13:23:05
Zdravim,
poradite nekdo jak poslat SMS na Oskara prez HTTP s Indy IdHTTP clientem?
Nabizim vymenou zdrojak s Paegasem pres HTTP :o)
S �ctou
R. Plz�k
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.319 / Virov� b�ze: 178 - datum vyd�n�: 28.1.2002
FindFirst - FindClose
[*] Martin Fi�ar <Martin Fisar(zv)gordic(tec)cz> - 29.1.2002 13:27:17
Zdravim vsechny,
stalo se mi na W2000 (Delphi 3), ze v tomto kodu:
DosError := FindFirst( '*.*', $27, SR);
while DosError=0 do
begin
...
DosError := FindNext( SR);
end;
FindClose( SR);
mi program vytuhnul na radku FindClose v pripade, ze
nebyly prikazem FindFirst nalezeny zadne soubory !!
Na W98 to jede dobre.
Kdyz kod upravim na:
DosError := FindFirst( '*.*', $27, SR);
if DosError=0 then
begin
while DosError=0 do
begin
...
DosError := FindNext( SR);
end;
FindClose( SR);
end;
tak to funguje, ale nevim jestli je to dobre, ze FindFirst nebude
vzdy ukoncen prikazem FindClose a tim padem nebude provedena
dealokace zdroju (pameti). Priklad v helpu D3 je dost blbej.
Martin Fisar
Martin_Fisar(zv)gordic(tec)cz
FindFirst - FindClose
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.1.2002 13:37:57
29.1.2002 Martin Fi�ar:
> Zdravim vsechny,
> stalo se mi na W2000 (Delphi 3), ze v tomto kodu:
> DosError := FindFirst( '*.*', $27, SR);
> while DosError=0 do
> begin
> ...
> DosError := FindNext( SR);
> end;
> FindClose( SR);
> mi program vytuhnul na radku FindClose v pripade, ze
> nebyly prikazem FindFirst nalezeny zadne soubory !!
> Na W98 to jede dobre.
> Kdyz kod upravim na:
> DosError := FindFirst( '*.*', $27, SR);
> if DosError=0 then
> begin
> while DosError=0 do
> begin
> ...
> DosError := FindNext( SR);
> end;
> FindClose( SR);
> end;
> tak to funguje, ale nevim jestli je to dobre, ze FindFirst nebude
> vzdy ukoncen prikazem FindClose a tim padem nebude provedena
> dealokace zdroju (pameti). Priklad v helpu D3 je dost blbej.
Pokud neni prvni soubor nalezen, sr neni alokovano, takze nepotrebuje
dealokaci.
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Problem so zmenou ulozenia v IB
[*] <delphi(zv)zvlauto.sk> - 29.1.2002 13:51:37
Nie, commitretaining nepomaha. :((
Robo
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Ren� Otisk
Sent: Tuesday, January 29, 2002 12:57 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Problem so zmenou ulozenia v IB
tak dej commitretaining a nebo ty dva datasety poves na stejnou transakci...
Sroub
> ked dam Transaction.Commit tak mi to ale uzavrie celu databazu. Neda sa to
> obist?
>
> Nedelas to pres dve komponenty (TIBDataset, TIBQuery, TIBTable), ktere
maji
> kazda svou vlastni transakci? Nie, v celom programe je jedina transakcia.
>
> Robo.
>
> Vypada to, jako by si neuzaviral transakci, zkuz po provedeni prikazu
> provest neco jako Transaction.Commit.
>
> Ales
>
> Cituji z emailu od delphi(zv)zvlauto.sk:
>
> > Zdravim,
> >
> > Mam taky "mensi" problem. V programe pristupujem do databazy (IB6).
Pridam
> > nejaku polozku - v pohode. Ale akonahle potom ju chcem modifikovat a
> > zapisat, tak ta zmena sa neprejavi. Ako je to mozne? Pritom ked to
> pouzijem
> > nasledne este raz tak to funguje. Staci ze program vypnem a zapnem a
> > spustim
> > danu proceduru na zmenu, tiez to funguje. Na ulozenie pouzivam
> > IBTable.Post.
> > Viete mi niekto pomost?
> >
> > D5, IB6, W2000.
> >
> > Robo
> >
>
>
OT:zrusenie CD-ROM autorun
[*] DHederer(zv)softip.sk - 29.1.2002 13:52:00
Ospravedlnujem sa za vyrusenie, ale
kde sa rusi vo Win2000 auto. spustanie CD?
Dakujem
FindFirst - FindClose
[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 29.1.2002 13:58:31
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Martin Fi�ar
Ahoj,
tohle by ti mohlo pomoct:
procedure ScanPath(const cPath: string);
var
SR: TSearchRec;
begin
if FindFirst(cPath + '*.*',faAnyFile,SR) = 0 then
begin
repeat
if (SR.Name <> '.') and (SR.Name <> '..') then
if (SR.Attr and faDirectory) = faDirectory then
begin
//Adresare
ScanPath(cPath+SR.Name+'\');
end
else
begin
//Soubory
end;
until FindNext(SR) <> 0;
FindClose(SR);
end;
end;
S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203
DesignTime vyber TImageIndexu
[*] Ludek Sveller <ludek(zv)slim(tec)cz> - 29.1.2002 14:14:08
Ahoj,
nemohu prijit na to jak naplnit vyber obrazku z TImageIndex v Object
Inspectoru z ImageListu.
Mam osetrenou komunikaci mezi ImageListem a moji komponentou (pri zmene
v ImageListu
se aktualizuje moje komponenta) ale ve vyberu indexu obrazku se mi nic
nezobrazi
- nevim jak rict IDE kde ma ty obrazky brat
Ludek Sveller
Filtr v MS Access v poli datum/cas
[*] Lasevic, Martin <MLasevic(zv)ratiopharm(tec)cz> - 29.1.2002 14:17:46
Primo v MS Access je format datumu sice jako string, ale uzavren do # a v US
formatu. Co se tyce omezujici podminky, tak bych pouzil mozna BETWEN od
Datum do Datum+1 den.
Martin
> -----Original Message-----
> From: Rumcajs [mailto:prajz.rumcajs(zv)quick(tec)cz]
> Sent: Tuesday, January 29, 2002 1:12 PM
> Subject: Filtr v MS Access v poli datum/cas
>
> tabulku -> OK a pak v ni provest filtraci dat -> PROBLEM. Jedna se o
> filtraci dle pole DATUM, kter je ale ve formatu datum/cas. Ja chci ale
> vybrat data jen podle datumu, tj. DATUM=DateToStr(Datum:
> TDate); Nevite
> nekdo jak na to?
> Nacteni dat z OE
[*] Vymazal Milan <Vymazal.milan(zv)seznam(tec)cz> - 29.1.2002 14:37:42
Zdravim konferu
Potreboval bych nejak ziskat data z OE. Myslim tim Emaily. Kompletni
obsah. Pomoci MAPI toho dostahnu, castecne nektere polozky jsou
nepristupne. Napr. X-Mailer coz ja potrebuju. Tak me nepadlo ze bych
to mohl vytahnou z toho binarniho souboru co tam je ale v tomhle se
nevyznam nikdy jsem to nedelal. Nema nekdo s tim skusenosti nebo by mi
nemohl pripadne nekdo poradit jak na to??
Diky
Milan
FB a Unicode_FSS
[*] Rado Benc <bego(zv)pobox.sk> - 29.1.2002 14:48:37
Nazdar,
nie som znalec Unicode, ale par poznamok:
> Ahoj stretli sme sa s problemom (prilozeny), tusite co s tym?
>
> > Aplikaci musime vytvorit jako vicejazycnou. Jedinym resenim
> > koexistence znaku vice znakovych sad je pouziti Unicode resp. UTF-
8.
> > Bohuzel je v Interbase jedna chyba, viz n�sledujici postup:
> >
> > 1) Vytvorime tabulku:
> > CREATE DOMAIN ZEMEKOD AS VARCHAR(2) CHARACTER SET UNICODE_FSS;
> > CREATE TABLE TAB_ZEME
> > (
> > ZEME_KOD ZEMEKOD NOT NULL,
> > NAZEV VARCHAR(40) CHARACTER SET UNICODE_FSS NOT
NULL,
> > PRIMARY KEY (ZEME_KOD)
> > );
> > 2) Do tabulky je mozn� vlozit data pomoci IBCONSOLE (i jinych
nastroju)
> takto:
> > insert into TAB_ZEME (ZEME_KOD,NAZEV) values ('abcdef','abc')
Z Data Definition Guide:
---
In some character sets, such as ISO8859_1, each symbol requires only
a single byte of storage. In others, such as UNICODE_FSS, each symbol
requires from 1 to 3 bytes of storage.
---
V tomto pripade sa kazdy znak retazca 'abcdef' v pohode "zmesti" do 1
byte. Teda zostava otazkou, ci ma dojst k chybe. Vid dalej
Opat z DDG:
---
Note To determine the maximum number of characters allowed in the
data definition statement of any multi-byte column, look up the
number of bytes per character in Appendix A. Then divide 32,767 (the
internal byte storage limit for any character datatype) by the number
of bytes for each character. Two-byte character sets have a character
limit of 16,383 per field, and a three-byte character set has a limit
of 10,922 characters per field.
---
AFAIK, manual nehovori nic o tom, co sa ma stat v pripade hore
uvedenom pripade pre DML statementy ktore nerespektuju maximalny
pocet znakov v definicii stlpca.
Pozn.
insert into TAB_ZEME (ZEME_KOD,NAZEV) values ('abcdefg','abc')
vyvola samozrejme chybu.
> > To je ale v rozporu s definici tabulky, nebot policko ZEME_KOD m�
byt
> > dlouh� maxim�lne 2 znaky. Pomoci IBCONSOLE je mozn� tato data
cist, ale
> > JDBC ovladac nahl�si chybu:
> > SQL error code=-303 arithmetic exception, numeric overflow, or
string
> > truncation
> > Z toho vyplyvaji dva probl�my:
> > 1) Interbase sice alokuje dostatek mista pro k�dov�ni UTF-8, ale
> > nekontroluje skutecnou d�lku retezce.
Zalezi na tom, co myslis pod skutocnou dlzkou:
CREATE DOMAIN ZEMEKOD AS VARCHAR(2) CHARACTER SET UNICODE_FSS;
alokuje 6 bytov - a 'abcdef' sa do 6 bytov zmesti. 6 arabskych znakov
urcite nie. BTW skus si otvorit Character Map, vybrat nejaky exoticky
kvet (myslim napr. Arabic Letter Ghain Final Form - je ich tam
plno :-) a pastnut ho do SynEditu pouzivaneho IBConsole)...
> > 2) Data, vlozen� jednim n�strojem pro pristup k datum
(IBCONSOLE), nelze
> > precist pod jinym n�strojem (JDBC)
Hmm, lenze:
1) AFAIK, IBConsole nie je schopna vlozit do Unicode stlpca viac nez
jednobytovy znak.
2) Ci je schopny JDBC driver Unicode znak citat zavisi od jeho
implementacie - a tie su pre IB / FB vacsinou dost biedne.
FWIW,
Rado
____________________________________
http://www.pobox.sk/ - najvacsi slovensky freemail
FB a Unicode_FSS]
[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 29.1.2002 15:39:49
Rado, skusim to povedat inak pretoze si mi odpovedal na nieco co nebolo
predmetom otazky :) to je jedno.
Takze skusim este raz:
Nehovorim o nastrojoch, driveroch ani o DDL, ...
ale:
Ked definujem pole v IB/FB s UNICODE_FSS ako varchar(2) tak nastane problem
pri jeho naplneni. Podla mna by bolo normalne chovanie to keby mi nedovolila
IB zadat viac ako dva znaky! Ale ona mi ich dovoli zadat 6. Cize ide o to ze
FB/IB to pravdepodobne kontroluje na zaklade datovej dlzky a nie podla dlzky
retazca!
Povazujem to za bug ale mozna ze to neni bug. Ale z uzivatelskeho pohladu
ked mam omezenie ze NAZOV_OBCE je varchar(20) tak chcem aby ten nazov bol
dodrzany inak aby FB/IB vyhucala na chybu.
Kaka�ka Pavol
KasiX(zv)atlas(tec)cz
Filtr v MS Access v poli datum/cas
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 29.1.2002 16:22:11
> Zdravim ve spolek!
> Narazil jsem na jisty problem, a to: Potrebuju z databaze MS Access nacist
> tabulku -> OK a pak v ni provest filtraci dat -> PROBLEM. Jedna se o
> filtraci dle pole DATUM, kter je ale ve formatu datum/cas. Ja chci ale
> vybrat data jen podle datumu, tj. DATUM=DateToStr(Datum: TDate); Nevite
> nekdo jak na to?
Zkus pouzit
'Datum=#'+FormatDateTime('mm"/"dd"/"yyyy',StrToDate('1.1.2002'))+'#';
Roman
- - - - - - - - - - - - - - - - - - - - -
http://kouzelne.misto(tec)cz/Cas
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 29.1.2002 17:11:27
Stahl jsem si tip na mereni caoveho useku
procedure TForm1.Button1Click(Sender: TObject);
var
a, b: Integer;
begin
a := GetTickCount;
Sleep(50);
Application.ProcessMessages;
b := GetTickCount;
ShowMessageFmt('Rozd�l je %d ms.',[b-a]);
end;
Poradi nekdo jak z vysledku dostat vteriny a milisekundy ve tvaru 00:000
napr.
10 ms 00:010
500 ms 00:500
1005 ms 01:005
.
.
.
1595 ms 01:595
Diky za radu
Viktor Marek
viktor(zv)mbox.vol(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.319 / Virov� b�ze: 178 - datum vyd�n�: 28.1.2002
Cas
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 29.1.2002 17:17:19
Ahoj,
zkus neco jako
s := Format('%2.2d:%3.3d',[((b-a) div 1000), ((b-a) mod 1000)]);
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> P�edm�t: Cas
>
>
> Stahl jsem si tip na mereni caoveho useku
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> a, b: Integer;
> begin
> a := GetTickCount;
> Sleep(50);
> Application.ProcessMessages;
> b := GetTickCount;
> ShowMessageFmt('Rozd�l je %d ms.',[b-a]);
> end;
>
> Poradi nekdo jak z vysledku dostat vteriny a milisekundy ve
> tvaru 00:000
> napr.
> 10 ms 00:010
> 500 ms 00:500
> 1005 ms 01:005
> .
> .
> .
> 1595 ms 01:595
Cas
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 29.1.2002 18:15:20
http://dusek.webz(tec)cz/tips/msectime.php
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
From: "Viktor Marek" <viktor(zv)mbox.vol(tec)cz>
> Poradi nekdo jak z vysledku dostat vteriny a milisekundy ve tvaru 00:000
> napr.
> 10 ms 00:010
> 500 ms 00:500
> 1005 ms 01:005
> .
> .
> .
> 1595 ms 01:595
Shortcut Button
[*] Peter Surovy <psurovy(zv)uevora.pt> - 29.1.2002 17:16:03 -0000
Ahoj
chcel by som pridat do aplikacie klasicke
skratk.gombiky ako ma aj delphi trebars OpenFile
Na Shortcut paneli
myslim take gombiky ktore pri prechadzani mysou
vystupuju do popredia.
Ma Delphi taku komponentu?
Ani pri jednom druhu buttonov v Delphi5 Ent som zatial
taku vlastnost nenasiel.
Vdaka
S pozdravom Peter Surovy
DesignTime vyber TImageIndexu
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 29.1.2002 18:18:13
> Ahoj,
>
> nemohu prijit na to jak naplnit vyber obrazku z TImageIndex v Object
> Inspectoru z ImageListu.
> Mam osetrenou komunikaci mezi ImageListem a moji komponentou
> (pri zmene
> v ImageListu
> se aktualizuje moje komponenta) ale ve vyberu indexu obrazku se mi nic
> nezobrazi
> - nevim jak rict IDE kde ma ty obrazky brat
Cau,
v dclstd60.bpl su implementovane property editory pre TImageIndex, ale
bohuzial nie su pristupne, takze si na to musis napisat vlastny property
editor, napriklad takto:
unit ImageIndexReg;
interface
procedure Register;
implementation
uses
Classes, SysUtils, Types, TypInfo,
ImgList, Graphics,
DesignIntf, DesignEditors, VCLEditors;
type
TComponentImageIndexEditor = class(TIntegerProperty,
ICustomPropertyListDrawing)
private
{ ICustomPropertyListDrawing }
procedure ListDrawValue(const Value: string; ACanvas: TCanvas; const
ARect: TRect; ASelected: Boolean);
procedure ListMeasureHeight(const Value: string; ACanvas: TCanvas; var
AHeight: Integer);
procedure ListMeasureWidth(const Value: string; ACanvas: TCanvas; var
AWidth: Integer);
function GetImageList: TCustomImageList;
public
function GetAttributes: TPropertyAttributes; override;
procedure GetValues(Proc: TGetStrProc); override;
end;
{ TComponentImageIndexEditor private: ICustomPropertyListDrawing }
procedure TComponentImageIndexEditor.ListDrawValue(const Value: string;
ACanvas: TCanvas; const ARect: TRect;
ASelected: Boolean);
var
Images: TCustomImageList;
begin
Images := GetImageList;
if Assigned(Images) then
begin
if ASelected then
with ACanvas, Brush do
begin
Style := bsSolid;
Color := clHighlight;
FillRect(ARect);
DrawFocusRect(ARect);
end;
Images.Draw(ACanvas, ARect.Left, ARect.Top, StrToInt(Value));
ACanvas.TextOut(ARect.Left + Images.Width + 4, ARect.Top, Value);
end;
end;
procedure TComponentImageIndexEditor.ListMeasureHeight(const Value: string;
ACanvas: TCanvas; var AHeight: Integer);
var
Images: TCustomImageList;
begin
Images := GetImageList;
if Assigned(Images) then
AHeight := Images.Height;
end;
procedure TComponentImageIndexEditor.ListMeasureWidth(const Value: string;
ACanvas: TCanvas; var AWidth: Integer);
var
Images: TCustomImageList;
begin
Images := GetImageList;
if Assigned(Images) then
AWidth := Images.Width;
end;
{ TComponentImageIndexEditor private }
function TComponentImageIndexEditor.GetImageList: TCustomImageList;
var
P: TPersistent;
begin
Result := nil;
P := GetComponent(0);
if Assigned(P) then
Result := TCustomImageList(GetObjectProp(P, 'Images',
TCustomImageList));
end;
{ TComponentImageIndexEditor public }
function TComponentImageIndexEditor.GetAttributes: TPropertyAttributes;
begin
Result := inherited GetAttributes + [paValueList];
end;
procedure TComponentImageIndexEditor.GetValues(Proc: TGetStrProc);
var
Images: TCustomImageList;
I: Integer;
begin
Images := GetImageList;
if Assigned(Images) then
for I := 0 to Images.Count - 1 do
Proc(IntToStr(I));
end;
procedure Register;
begin
RegisterPropertyEditor(TypeInfo(TImageIndex), TComponent, '',
TComponentImageIndexEditor);
end;
end.
Tuto unitu si pridaj do nejakej designtime-only package a nainstaluj ju.
Tato registracia je dost vseobecna; kazda nova komponenta bude pouzivat
tento property editor pre kazdu published property typu TImageIndex
(nezavisle na mene property) kazdeho potomka TComponent.
Ak Ti to takto nevyhovuje, mozes si prepisat tu registraciu tak, aby to bolo
viac obmedzene.
Dalej, metoda GetImageList hlada prislusny imagelist podla nazvu published
property 'Images' (hard-coded). To Ti tiez nemusi vyhovovat, tak si to mozes
prepisat alebo vymysliet nejaku registraciu mien vlastnosti typu
TCustomImageList, ktore by tento property editor rozoznaval.
HTH
TOndrej
Shortcut Button
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:05:16
From: "Peter Surovy" <psurovy(zv)uevora.pt>
> Ahoj
> chcel by som pridat do aplikacie klasicke
> skratk.gombiky ako ma aj delphi trebars OpenFile
> Na Shortcut paneli
> myslim take gombiky ktore pri prechadzani mysou
> vystupuju do popredia.
> Ma Delphi taku komponentu?
Ahoj,
jiste, TToolBar. Pokud nastavis vlastnost Flat na True tak se to bude chovat
tak jak popisujes.
Petr Vones
Cas
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:11:47
From: "Viktor Marek" <viktor(zv)mbox.vol(tec)cz>
> Stahl jsem si tip na mereni caoveho useku
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> a, b: Integer;
> begin
> a := GetTickCount;
> Sleep(50);
> Application.ProcessMessages;
> b := GetTickCount;
> ShowMessageFmt('Rozd�l je %d ms.',[b-a]);
> end;
Ahoj,
takhle cas moc presne nezmeris. K tomu je lepsi pouzit performance counter.
Cele toto zapouzdrene do Delphi tridy najdes treba v unitu JclCounter v JCL:
http://delphi-jedi.org/Jedi:CODELIBJCL
Priklad pouziti:
uses
JclCounter;
procedure TForm1.Button1Click(Sender: TObject);
var
Counter: TJclCounter;
TotalTime: Extended;
begin
StartCount(Counter);
Sleep(50);
TotalTime := StopCount(Counter);
ShowMessageFmt('%5.3f ms', [TotalTime * 1000]);
end;
Petr Vones
OT:zrusenie CD-ROM autorun
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:12:56
From: <DHederer(zv)softip.sk>
> Ospravedlnujem sa za vyrusenie, ale kde sa rusi vo Win2000 auto. spustanie
> CD?
Z Control Panelu v Tweak UI (da se stahnout od Microsoftu)
Petr Vones
Razeni nalezenych souboru s FindFirst/FindNext
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:14:21
From: "Obermaier Petr Ing." <Obermaier(zv)mail.sdas(tec)cz>
> zajimalo by me, zda existuje nejaky jednoduchy zpusob, jak seradit soubory
> nalezene pomoci FindFirst/FindNext, resp. jiz hledat i s ohledem na ABC.
Ahoj,
zapsat do seznamu a setridit (napriklad do TStringListu)
> Popr. je-li nejaky jiny (neVCL) zpusob, jak vypsat soubory v adresari dle
> zadane masky podle abecedy.
Uvedeny zpusob nema nic spolecneho s VCL, je to volani Win32 API funkci.
Petr Vones
Nacteni dat z OE
[*] miromr <miromr(zv)hotmail(tec)com> - 29.1.2002 19:16:02
Ahoj daj si na internete vyhladavat subor
oexpress2a.zip
Ak ho nenajdes ozvi sa mi na sukromny mail mrazik(zv)alfanet.sk
Miro
> Potreboval bych nejak ziskat data z OE. Myslim tim Emaily. Kompletni
Seriova a paralelni komunikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:18:09
From: "Frankie Y" <frankie.y(zv)seznam(tec)cz>
> chtel bych napsat program pro prenos souboru po seriovem nebo paralelnim
> kabelu. O seriove ci paralelni komunikaci toho vsak mnoho nevim a shanim co
> nejvice informaci. Nevite nahodu o nejakem podrobnem tutorialu ci knize, jez
> by mohli zacatecnika nejlepe zasvetit do dane problematiky?
Ahoj,
seriova komunikace je primo podporovna ve Win32 API. Priklady najdes treba v
MSDN nebo pro Delphi treba http://sourceforge.net/projects/asyncfree
Pro paralelni komunikaci by jsi musel napsat specialni kernel driver (nebo jej
koupit). Vzhledem k zastaralosti printer portu, pomalosti a dalsim nevyhodam
se uz asi nevyplati se tim vubec zabyvat.
Petr Vones
Editace souboru primo na disku
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:20:03
From: "EFG developer" <developer(zv)efg(tec)cz>
> Mam v aplikaci udelanou editaci souboru, ale pokud nacitam velke soubory
> (>10MB) tak jeho otevreni trva neumerne dlouho.
> Lze nejak vyresit nacteni souboru do mema nebo do gridu tak, aby se
> tento soubor nemusel cely "natahovat" do pameti ?
Ahoj,
Do mema to jinak udelat rozhodne nejde. V pripade ze ti staci soubor editovat
tak, ze nepotrebujes zvetsit jeho velikost lze vyuzit mapovani souboru do
pameti.
Petr Vones
OT - automatizovane zalohovani dat
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:22:03
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
> K nejakym vypalovackam se dodaval soft, ktery si "naformatoval"
> cedecko tak, ze se pak tvarilo jako disketa, na kterou pak slo
> nahravat data standardnim zpusobem. Aby slo na toto cedecko
> zapisovat a cist, musel pouze tento soft bezet (tvaril se jako
> ikonka v tray-oblasti). Nevim ale jestli to fungovalo i s CDR,
> ale bezpecne to jelo s CDRW.
Toto je nejlepsi cesta jak o ty data prijit. V techto pripadech je asi
nejvyhodnejsi pouzivat sessiony, navic cena CD media je vcelku mala.
Petr Vones
nezobrazit ScrollBars
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2002 19:25:08
From: "Zden�k Sv�en" <dkonf(zv)seznam(tec)cz>
> Nevite nekdo, jak se toho vertikalniho posuvniku zbavit tak, aby se proste
> neobjevoval?
Removing the vertical scrollbar from a TDBGrid
http://community.borland.com/article/0,1410,15874,00.html
Petr Vones
Je mozne cist (zalohovat) soubor?
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 29.1.2002 19:41:56
Potrebuji pred zalohovanim obecneho souboru v OS zjistit, zda ho muzu
zalohovat - tedy, zda ho muzu otevrit pro cteni. Nesmim ho vsak zadnym
zpusobem ovlivnit - zapsat do nej. Potrebuji, aby operace byla velmi rychla,
protoze takto budu overovat v kratke dobe velke mnozstvi souboru (radove
tisice). Vse musi byt nezavisle na OS (samozrejme Win32 platforma - tedy
W9x, WME, W2k, XP, NT).
Mate nekdo nejaky napad nebo reseni?
Diky Petr
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.317 / Virov� b�ze: 176 - datum vyd�n�: 21.1.2002