Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
ScaleBy
[*] jdanek(zv)fnbrno(tec)cz - 12.2.1999 08:03:33
Ahojte,
Dostal jsem se do nasledujiciho problemu.
Protoze prenasim vysledny program na pocitac s jinym rozlisenim monitoru,
nez na jakem jej vyvijim, chtel jsem pouzit metodu ScaleBy, kterou aktivuji
pri otvirani formulare napr. Form1.ScaleBy(9,10);
Myslel jsem si, ze ve stejnem pomeru, v jakem nove meritko zadam se
mi
vse zmensi ci zvetsi, ale texty v ComboBoxech a take v DBGridech se mi v
tom
pomeru nezmemi.
Nevite prosim nekdo, jestli tento problem nejde resit jinak a nebo jsem
neco
zapomnel.
Diky za kazdou radu.
Jozka
jdanek(zv)fnbrno(tec)cz
StoredProc x Transakce
[*] Martin =?iso-8859-2?Q?O=E8en=E1=B9?= <ocenas(zv)proces.sk> - 12.2.1999 08:46:38
je dobre na tento ucel pouzit komponentu TDatabase. Ma
metody StartTransaction, Commit, RollBack. Nastavis si ju na
svoj alias, das jej DatabaseName, ktore simuluje alias. Na
to odkazes vsetky datasety a hotovo.
M.
Jaroslav Sikora wrote:
>
> Hi,
>
> mam problem:
>
> na MS SQL 7.0 potrebuju nastartovat transakci a pomoci
> StoredProc provadet zmeny v tabulkach. Po ukonceni aktualizaci
> dat commit nebo rollback.
>
> Query.Sql.Add('BEGIN TRANSACTION');
> Query.ExecSQL;
> ...
> StoredProc.ExecSQL;
>
> Query.Sql.Add('ROLLBACK TRANSACTION');
> Query.ExecSQL;
>
> Vypada to rozumne, ale je to nefunkcni. Rollback se totiz vubec
> neprojevi !.
> Pokud tu proceduru zavolam pomoci Query
> (Query.Sql.Add('EXEC proc_name ...'), vse je OK.
> Delal bych to timto zpusobem, ale nedokazu zase z Query vydupat
> navratovou hodnotu.
> Tak to vypada, ze StoredProcedure ma nejakou chybku.
> Netusite nekdo, co s tim ?
>
> sikora(zv)kam(tec)czu(tec)cz
Scanner
[*] Pavel ��astn� - 12.2.1999 09:13:37
Nevite prosim nekdo jak by se dal programove ovladat scanner?Scanner
[*] voltrr1.epr(zv)mail.cez(tec)cz - 12.2.1999 09:22:22
> Nevite prosim nekdo jak by se dal programove ovladat scanner?
Pres TWAIN rozhrani.
Radek
RxSpeedBar
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 12.2.1999 10:03:55
Ahoj,
chtel bych se zeptat, zda lze s RxSpeedBar pohybovat podobne jako je
to u jinych aplikaci, kde je, obvykle vlevo, takovy svisly jednoduchy nebo
dvojity uchyt/madlo a pripadne jak? Dekuji.
Jaro B.T602
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 12.2.1999 10:13:52
Zdravim,
neresil nekdo z Vas prevod souboru formatu T602? Nebo nesel by nejak vyvolat
konvertor, ktery je soucasti Wordu?
Jde mi o nacteni souboru z T602 do TRichEditu.
Dekuji.==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================
TDataSet + OnFilteredRecord
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 12.2.1999 10:27:28
Udalost OnFilteredRecord se provadi v pripade, ze je nastaveno
Filtered na True. A provede se pro kazdy record tabulky.
From: "Petr S" <p.sadovsky(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Subject: TDataSet + OnFilteredRecord
Date sent: Thu, 11 Feb 1999 15:17:17 +0100
Send reply to: delphi-l(zv)fwd(tec)cz
> Ahojte,
>
> mam takovy problemek.Nemuzu prijit na to, kdy se provede event
> OnFilteredRecord.
> 1) pri zadavani Filter:=...; ?
> 2) pri Filtered:=True; ?
>
> Z jednoho formu do druheho prenasim udaje o tom, dle ktereho sloupce budu
> mit filtr a jeho hodnotu
> a jednou mi to event OnFilteredRecord provede a trikrat ne a z helpu nejsem
> moudry.A vyse uvedene prikazy volam vzdy.
>
>
> Diky.
>
> Petr
>
>
>
>
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Titan Btrieve, Flash Filer, alebo ine
[*] Administrator <Administrator(zv)rosoft.sk> - 12.2.1999 10:35:13
Caute
Chcel by som pri svojej aplikacii, ktorej hlavnou funkciou je
vyhladavanie v databanke, urychlit ju.
Pustam tam po sebe zopar SQL dotazov, a vsetko spolu so zobrazenim
vysledku trva najviac 6-10s. To je ale moc
a potreboval by som to dostat na 1-3 s. Pouzivam PARADOX a BDE a
rozmyslal som nad BTrieve, ale neviem
ci sa rozhodnut pre Flash, alebo Titan, na cene az tak velmi moc
nezalezi, ide mi najma o rychlost
EnumWindows - jak ziskat jmena EXE
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 12.2.1999 11:10:21
Hi all,
potreboval bych poradit nejaky algoritmus, kterym na woknech pomoci API32
funkci vyloudim jmena EXE/DLL souboru spustenych aplikaci.
1. Na API16 jsem to delal v enumWindowProc() takto:
Task := GetWindowTask(aHandle);
if Task<>0 then
begin
GetModuleFileName(Task,Buf,sizeof(Buf));
...
end;
a nebyly s tim problemy
2. Na API32 to nefunguje, a tak jsem zkousel ruzne funkce a postupy, z nichz
nektere mi daly nejaka jmena souboru, ale ne od vsech spustenych aplikaci,
prestoze handlery jejich oken jsem dostal. Jeden z castecne chodivych
postupu je:
GetModuleFileName(GetClassLong(aHandle,GCL_HMODULE),Buf,sizeof(Buf));
Nepomaha, ani kdyz jako handle pro GetModuleFileName() pouziju
WNDCLASS.hInstance, kterou ziskam pomoci GetClassInfo() apod.
Take cesta pres thready pomoci GetWindowThreadId() me nikam nezavedla.
Neumel by me, pls, nekdo poradit vhodnou funkci?
Thanx, pf
SMTP
[*] Robert Van�k <hugo(zv)kamarad(tec)cz> - 12.2.1999 11:16:12
Zdravim,
Prosim o radu.
Chtel jsem pouzit komponentu z Delphi 4.0 Up. 2 SMTP.
Lec, pokud ji pouziji, program pri ukonceni spadne na drzku.
Mate s tim n�kdo zkusenosti? Co s tim?
Pouzivam akorat Connect, SendMail a Disconnect.
Diky
Bob
P��klad na UpdateSql
[*] halam(zv)email(tec)cz - 12.2.1999 11:38:17
Nem�te pros�m n�jak� primitivn� progr�mek , kde pou��v�te UpdateSql. Jsem
za��te�n�k a tohle nem��u pochopit.
D�ky moc.
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
P��klad na UpdateSql
[*] halam(zv)email(tec)cz - 12.2.1999 11:44:45
Jak m��u kop�rovat a vkl�dat data p�es Clipboard z 1. table do 2. table ?
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Query - zobrazeni v DBGridu (desetina mista).
[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 12.2.1999 11:57:48
Ahoj vsichni !!
Prosim o radu s timto problemem.
Dynamicky provadim SQL dotaz v D4 na DB Paradox, kde pocitam nejake
polozky. Vysledek se mi zobrazi v DBGridu, ale ma moc desetinych
mist. Potreboval bych, aby mel pouze dve. Nazev polozek v DBGridu
je pokazdy jiny. Myslel jsem na neco jako:
DBGrid1.Colums[2] ... a neco ,ale nevim co ????
Nasel jsem taky Display Format, ale nevim jak pouzit v mem pripade.
Dik za kazdou dobrou radu.
Cau Jiri Toman
StoredProc x Transakce
[*] Jaroslav Sikora <sikora(zv)kam(tec)czu(tec)cz> - 12.2.1999 12:11:13 met
To jsem zkousel, ale RollBack to nevratil.
Jarda
> From: Martin O en� <ocenas(zv)proces.sk>
> je dobre na tento ucel pouzit komponentu TDatabase. Ma
> metody StartTransaction, Commit, RollBack. Nastavis si ju na
> svoj alias, das jej DatabaseName, ktore simuluje alias. Na
> to odkazes vsetky datasety a hotovo.
> Jaroslav Sikora wrote:
> > na MS SQL 7.0 potrebuju nastartovat transakci a pomoci
> > StoredProc provadet zmeny v tabulkach. Po ukonceni aktualizaci
> > dat commit nebo rollback.
> >
> > Query.Sql.Add('BEGIN TRANSACTION');
> > Query.ExecSQL;
> > ...
> > StoredProc.ExecSQL;
> >
> > Query.Sql.Add('ROLLBACK TRANSACTION');
> > Query.ExecSQL;
> >
> > Vypada to rozumne, ale je to nefunkcni. Rollback se totiz vubec
> > neprojevi !.
> > Pokud tu proceduru zavolam pomoci Query
> > (Query.Sql.Add('EXEC proc_name ...'), vse je OK.
> > Delal bych to timto zpusobem, ale nedokazu zase z Query vydupat
> > navratovou hodnotu.
> > Tak to vypada, ze StoredProcedure ma nejakou chybku.
> > Netusite nekdo, co s tim ?
> >
> > sikora(zv)kam(tec)czu(tec)cz
Poradte s SQL
[*] sopak.konf(zv)atlas(tec)cz - 12.2.1999 12:17:47
[P��loha v souboru: relace50.jpg]
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Caute predem se omlouvam ze posilam i obrazek, ale bez nej by to bylo tezce
pochopitelne
ridte se podle obrazku
m�m takovej probl�m pot�ebuji zobrazit v�echny pole v tabulce Knihy kter� by
m�li asi n�sleduj�c� Krit�ria
WHERE Auto�i.P��jmen� LIKE "P��jmen�" Obory.FullPath LIKE "Obor";
takze potrebuji zobrazit knihy co maj za autory nebo p�ekladatele "P��jmen�"
a za obory "OBOR"
nev�te jak toho dos�hnout jedn�m SQL dotazem?
j� to um�m propojit pomoc� INNER JOIN, ale jen pro autory nebo p�ekladatele
nebo obory
D�ky za rady �au Sopak
sopak.konf(zv)atlas(tec)cz
TDataSet + OnFilteredRecord
[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 12.2.1999 12:31:10
-----P�vodn� zpr�va-----
Od: Radek KALA <delphi(zv)betacontrol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 11:56
P�edm�t: Re: TDataSet + OnFilteredRecord
>Udalost OnFilteredRecord se provadi v pripade, ze je nastaveno
>Filtered na True. A provede se pro kazdy record tabulky.
Ale kterym prikazem se spusti?
Me to jednou do OnFilteredRecord vjede a trikrat ne.
Na cem zalezi, aby to projelo vzdy ?
Petr
MS SQL 6.5 a zamky na blocich
[*] ing. Martin Porkert <tes(zv)pce(tec)cz> - 12.2.1999 12:42:55
Ahoj delphisti,
Neumi mi n�kdo prosim poradit s nasledujicim stavem na MS SQL 6.5.
Jakym zpusobem zrusim transakcni blokovy zamek na serveru.
Update dvou sousednich radku v tabuli, kter� jsou v jednom bloku a jsou update ze dvou stanic. Update na jednom probehne na druhem ne.
Dik za kazde nakopnuti a omlouvam se za maly offtopic
Martin
Jeste jednou menu
[*] Tom� R��i�ka - 12.2.1999 12:59:26
Ahoj !
Chtel bych se zeptat, jak se daji spojit 2 nebo vice menu (ve WIN API), ktera jsou definovana v *.rc. Chci mit v aplikaci vice ruznych menu, ktere se prepinaji (to neni problem), ale take ktere mohou byt zobrazeny najednou. Tzn. nejaky MergeMenu. Badal jsem nad funkci InsertMenuItem, ale vysledek byl, ze mi to vlozilo do jednoho menu nejakou polozku a pod tu polozku to menu, ktere jsem chtel pripojit; tzn. nespojilo je to na urovni hlavniho menu.
Dalsi veci:
Snazil jsem se v helpu najit nejakou funkci, ktera by umela pracovat s menu def. v resourcech, ale nenasel jsem nic.
Jak funguje a jak se pracuje s Merge v TMainMenu?
Privitam vsechny odpovedi a pripominky k praci s menu (kombinace VCL a WIN API).
Diky predem za odpovedi a namety.
Tomas Ruzicka
------------------------------------------------------
ruzicka(zv)com-tech(tec)cz
SMTP
[*] Lubos <bruce(zv)pobox.sk> - 12.2.1999 13:20:44
> Prosim o radu.
> Chtel jsem pouzit komponentu z Delphi 4.0 Up. 2 SMTP.
> Lec, pokud ji pouziji, program pri ukonceni spadne na drzku.
> Mate s tim n�kdo zkusenosti? Co s tim?
Ja mam podobne skusenosti aj THTML .
Niekto tu uz spominal ze komponenty urcene pre inet su v D
strasne chybove. Ak ma niekto skusenosti s nejakymi dobrimi a free
tak nech da vediet.
/LH
SMTP
[*] Administrator <Administrator(zv)rosoft.sk> - 12.2.1999 14:12:47
[Administrator] Fransoa Piette, ale presnu adresu neviem Poradte s SQL
[*] Stepan Cerny <chaosz(zv)geocities(tec)com> - 12.2.1999 14:25:45
Hi,
a coz taghle
SELECT * FROM Kihy a, Autori b, Obory c
WHERE
a.IdKniha = b.IdKniha AND
a.IdKniha = c.IdKniha AND
b.Prijmeni LIKE "Prijmeni" AND
c.FullPath LIKE "Obor"
;-)
--
Stepan "Chaosz" Cerny
tvoric of software
chaosz(zv)geocities.com
sopak.konf(zv)atlas(tec)cz wrote:
>
> Caute predem se omlouvam ze posilam i obrazek, ale bez nej by to bylo tezce
> pochopitelne
>
> ridte se podle obrazku
>
> m�m takovej probl�m pot�ebuji zobrazit v�echny pole v tabulce Knihy kter� by
> m�li asi n�sleduj�c� Krit�ria
>
> WHERE Auto�i.P��jmen� LIKE "P��jmen�" Obory.FullPath LIKE "Obor";
>
> takze potrebuji zobrazit knihy co maj za autory nebo p�ekladatele "P��jmen�"
> a za obory "OBOR"
>
> nev�te jak toho dos�hnout jedn�m SQL dotazem?
>
> j� to um�m propojit pomoc� INNER JOIN, ale jen pro autory nebo p�ekladatele
> nebo obory
>
> D�ky za rady �au Sopak
> sopak.konf(zv)atlas(tec)cz
>
>Jak stahnout .ASP
[*] roman.palarcik(zv)spt(tec)cz - 12.2.1999 14:30:50
Stahnout chci ten vysledek. To jmeno a heslo je tam proto, ze to jsou
stranky na kterych se clovek zaregistruje aby mel na ne pristup. Potom
se na uvodni strance prihlasi a dostane se dale na placene stranky. Je
to cele pres ASP a http. Moc se nevyznam v tom jak to ASP funguje, ale:
Kdyz mam svuj programek, tak s nim normalne jeste tu uvodni stranku
stahnu, ale kdyz chci stahnout ty dalsi (placene) stranky, uz to nejde.
Pise to "Couldn't resolve hostname". P�itom v IE je po p�ihla�eni
normalne nactu.
Asi to nebude zas tak uplne jednoduche jako u statickych stranek, ale
dost bych to potreboval. Jestli se treba nemusi vyplnit polozka
Authorization u nekterych komponent pro TCPIP.
Roman Palarcik
---------------------------------
Puvodni zprava, kterou napsal roman.palarcik(zv)spt(tec)cz dne 11 Feb 99,:
> Mam, takovyto problem: Potrebuji udelat programek, kterym si stahnu
> webovou stranku. To by nebyl problem, jde o to ze ta stranka je .asp,
ale
Tak to neni webova stranka, ale skript. A ty chces stahnout vysledek
toho skriptu = opravdu webovou stranku a nebo text skriptu (prikazy)?
> znam pritom login a heslo. Jak to ale stahnu, resp. kam ten login a
heslo
> zapisu (pokud se to vubec takto dela). Nemate nekdo jednoduchou radu
nebo
> odkaz, kde to je napsane ?
A ten login a heslo, to je jako co? To je pro pristup FTP nebo jsou
ty stranky chraneny heslem pres HTTP nebo jak? Pokud je to na FTP,
tak se musis pripojit pomoci protokolu FTP.
S pozdravem
Petr Zahradnik, pocitacovy expert
Jak stahnout .ASP
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.2.1999 14:43:43
Puvodni zprava, kterou napsal roman.palarcik(zv)spt(tec)cz dne 12 Feb 99,:
> Stahnout chci ten vysledek. To jmeno a heslo je tam proto, ze to jsou =20
> stranky na kterych se clovek zaregistruje aby mel na ne pristup. Potom =20
> se na uvodni strance prihlasi a dostane se dale na placene stranky. Je =20
> to cele pres ASP a http. Moc se nevyznam v tom jak to ASP funguje, ale:
> Kdyz mam svuj programek, tak s nim normalne jeste tu uvodni stranku =20
> stahnu, ale kdyz chci stahnout ty dalsi (placene) stranky, uz to nejde. =
> =20 Pise to "Couldn't resolve hostname". P=F8itom v IE je po
> p=F8ihla=B9eni = =20 normalne nactu. Asi to nebude zas tak uplne
> jednoduche jako u statickych stranek, ale =20 dost bych to potreboval.
> Jestli se treba nemusi vyplnit polozka =20 Authorization u nekterych
> komponent pro TCPIP.
No, to zalezi na tom, jak je delany ten autorizovany pristup. Pokud
je to delano pres prava na NT, coz pochybuji, jak to tak popisujes,
tak by se dala pouzit komponenta s moznosti autentikace. Ale asi to
bude delane ciste pres ASP, asi pomoci cookies. Pak musis jit na tu
prvni stranku, resp. autorizacni skript za ni, poslat tam POST jmeno
a heslo, no a jit na tvou pozadovanou, pricemz vracet cookies apod.
Ja ale nevim, kdyz to nevidim.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
WinHelp!
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 12.2.1999 15:35:49
Freeware je taky M$ Word :-))), kde si udelas RTF a ten potom
pomoci kompileru a HPJ prekompilujes na hlp soubor...
> ----------
> Od: Pavel Serbajlo[SMTP:serb(zv)mikulov.sol(tec)cz]
> Odesl�no: 8. �nora 1999 15:28
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: WinHelp!
>
> Docela by se hodil nejakej freeware....neni nejaky?
>
> -----Original Message-----
> From: Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ>
> To: <delphi-l(zv)fwd(tec)cz>
> Date: 8. �nora 1999 14:57
> Subject: RE: WinHelp!
>
>
> >Pak je jeste dobry ForeHelp (vlastnim ho), ale je to komercni,
> dodaval
> >InpriseCZ (drive BorlandCZ) - ale jestli to jeste maji ???????
> >
> >
> >
> >> >
> >> >Nazdarek,
> >> >Potrebuju nejakej dobrej soft na vytvareni souboru .hlp
> >> >Muzete mi nejaky doporucit a rict, kde ho stahnout?
> >> >
> >> >dik caf
> >> >
> >> >Serbajlo Pavel
> >> >ICQ: 20849973
> >> >email: serb(zv)mikulov.sol(tec)cz
> >> >www: www.nemamstranky(tec)cz
> >> >
>
> StoredProc x Transakce
[*] Martin =?iso-8859-2?Q?O=E8en=E1=B9?= <ocenas(zv)proces.sk> - 12.2.1999 16:05:18
Pozri sa ci mas na StoredProc a ostatnych DataSet-och
property DatabaseName rovnaku ako na TDatabase v property
DatabaseName. Nam to funguje normalne.
M.
Jaroslav Sikora wrote:
>
> To jsem zkousel, ale RollBack to nevratil.
> Jarda
>
> > From: Martin O en� <ocenas(zv)proces.sk>
> > je dobre na tento ucel pouzit komponentu TDatabase. Ma
> > metody StartTransaction, Commit, RollBack. Nastavis si ju na
> > svoj alias, das jej DatabaseName, ktore simuluje alias. Na
> > to odkazes vsetky datasety a hotovo.
>
> > Jaroslav Sikora wrote:
> > > na MS SQL 7.0 potrebuju nastartovat transakci a pomoci
> > > StoredProc provadet zmeny v tabulkach. Po ukonceni aktualizaci
> > > dat commit nebo rollback.
> > >
> > > Query.Sql.Add('BEGIN TRANSACTION');
> > > Query.ExecSQL;
> > > ...
> > > StoredProc.ExecSQL;
> > >
> > > Query.Sql.Add('ROLLBACK TRANSACTION');
> > > Query.ExecSQL;
> > >
> > > Vypada to rozumne, ale je to nefunkcni. Rollback se totiz vubec
> > > neprojevi !.
> > > Pokud tu proceduru zavolam pomoci Query
> > > (Query.Sql.Add('EXEC proc_name ...'), vse je OK.
> > > Delal bych to timto zpusobem, ale nedokazu zase z Query vydupat
> > > navratovou hodnotu.
> > > Tak to vypada, ze StoredProcedure ma nejakou chybku.
> > > Netusite nekdo, co s tim ?
> > >
> > > sikora(zv)kam(tec)czu(tec)cz
Poradte s SQL
[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 12.2.1999 16:07:48
To by asi moc nefungovalo.
Myslim, ze by to melo byt takhle:
SELECT k.* FROM knihy k, Knih_obor ko, obory o
WHERE k.idkniha=ko.idkniha AND
ko.idobor=o.idobor and o.FullPath like "obor"
and k.idkniha in
(select idkniha FROM knih_aut ka, autori a
where ka.idautora=a.idautora and prijmeni like "Prijmeni"
union
select idkniha FROM knih_prekl kp, autori a
where kp.idautora=a.idautora and prijmeni like "Prijmeni")
Ten union by sel prepsat na idkniha in .... or idkniha in ...
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+> -----Original Message-----
> From: Stepan Cerny [mailto:chaosz(zv)geocities.com]
> Sent: Friday, February 12, 1999 2:26 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Poradte s SQL
>
>
> Hi,
>
> a coz taghle
> SELECT * FROM Kihy a, Autori b, Obory c
> WHERE
> a.IdKniha = b.IdKniha AND
> a.IdKniha = c.IdKniha AND
> b.Prijmeni LIKE "Prijmeni" AND
> c.FullPath LIKE "Obor"
>
> ;-)
> --
> Stepan "Chaosz" Cerny
> tvoric of software
> chaosz(zv)geocities.com
>
>
> sopak.konf(zv)atlas(tec)cz wrote:
> >
> > Caute predem se omlouvam ze posilam i obrazek, ale bez nej
> by to bylo tezce
> > pochopitelne
> >
> > ridte se podle obrazku
> >
> > m�m takovej probl�m pot�ebuji zobrazit v�echny pole v
> tabulce Knihy kter� by
> > m�li asi n�sleduj�c� Krit�ria
> >
> > WHERE Auto�i.P��jmen� LIKE "P��jmen�" Obory.FullPath LIKE "Obor";
> >
> > takze potrebuji zobrazit knihy co maj za autory nebo
> p�ekladatele "P��jmen�"
> > a za obory "OBOR"
> >
> > nev�te jak toho dos�hnout jedn�m SQL dotazem?
> >
> > j� to um�m propojit pomoc� INNER JOIN, ale jen pro autory
> nebo p�ekladatele
> > nebo obory
> >
> > D�ky za rady �au Sopak
> > sopak.konf(zv)atlas(tec)cz
> >
> >
> Parametr v SQL
[*] Plisek Jan Ing. <Plisek(zv)spse(tec)cz> - 12.2.1999 16:19:19
Vazeni kolegove,
prosim o pomoc. Snazim se udelat jednoduchou DB-aplikaci, ktera
vybere z tabulky lidi, jez maji v zadany den narozeniny. Protoze
nevim, jak zadat do SQL dnesni datum, snazim se na to jit pres
parametry. Ani to vsak nejde - system hlasi "Field DDen is of
unknown type" - jakoby DDen chapal jako polozku a ne jako parametr.
procedure TForm1.btnZpracujClick(Sender: TObject);
var Rok,Mesic,Den: word;
begin
if rbNarozeniny.Checked then
if rbDnes.Checked then begin
{Kdo m� dnes narozeniny}
DecodeDate(Date,Rok,Mesic,Den);
Query1.ParamByName('DDen').AsWord:=Den;
Query1.ParamByName('MMesic').AsWord:=Mesic;
end;
with Query1 do begin
SQL.Clear;
SQL.Add('select Jmeno, Prijmeni, Narozen, Ulice, Mesto, PSC from
ZACI '+
'where Extract(Day from Narozen)= :DDen ' +
' and Extract(Month from Narozen)= :MMesic');
ExecSQL;
Open;
end;
end;
===================================================
ing. Jan Plisek e-mail:plisek(zv)spse(tec)cz
SPSE a VOS tel. 040/51 68 21
Karla IV. 13 fax. 040/51 70 37
531 69 PARDUBICE WEB: http://www.spse(tec)cz
Czech Republic
===================================================P��klad na UpdateSql
[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 12.2.1999 16:31:07
Cau,
zkus se podivat do Delphi na priklad
C:\Program Files\Borland\Delphi4\Demos\Db\Cachedup
Tomas
tomas(zv)cobra(tec)cz
-----P�vodn� zpr�va-----
Od: halam(zv)email(tec)cz <halam(zv)email(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 14:48
P�edm�t: P��klad na UpdateSql
Nem�te pros�m n�jak� primitivn� progr�mek , kde pou��v�te UpdateSql. Jsem
za��te�n�k a tohle nem��u pochopit.
D�ky moc.
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Query - zobrazeni v DBGridu (desetina mista).
[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 12.2.1999 16:44:47
Cau,
Myslim, ze ten DisplayFormat ma byt :
,0.00
cili: carka - to pro oddelovace tisicu
nula - povinne zobrazeni nuly na radu jednotek
tecka - desetinna tecka
nula, nula - pro dve desetinna mista
Tomas
tomas(zv)cobra(tec)cz
-----P�vodn� zpr�va-----
Od: Ji�� Toman <jiri.toman(zv)seznam(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 13:54
P�edm�t: Query - zobrazeni v DBGridu (desetina mista).>Ahoj vsichni !!
>
>Prosim o radu s timto problemem.
>
>Dynamicky provadim SQL dotaz v D4 na DB Paradox, kde pocitam nejake
>polozky. Vysledek se mi zobrazi v DBGridu, ale ma moc desetinych
>mist. Potreboval bych, aby mel pouze dve. Nazev polozek v DBGridu
>je pokazdy jiny. Myslel jsem na neco jako:
>DBGrid1.Colums[2] ... a neco ,ale nevim co ????
>
>Nasel jsem taky Display Format, ale nevim jak pouzit v mem pripade.
>
>Dik za kazdou dobrou radu.
> Cau Jiri Toman
Urgentne TCP/IP
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 12.2.1999 21:48:39
Nejak jsem se jeste nedostal k tomu, abych si stahnul dokumentaci k Winsock z www.sockets.com, ale abych pravdu rekl, ani jsem zadnou kloudnou dokumentaci nenasel. Ta na sockets ma byt udajne neaktualizovana.
Ondrej Krajicek
-----P�vodn� zpr�va-----
Od: Gebauer Lukas <gebylist(zv)mlp(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 8:19
P�edm�t: Re: Urgentne TCP/IP
> Ano, mam na mysli, ze nechci aby to byl potomek TComponent. Vadi mi to
> proto, ze potrebuji toto zapouzdreni pouzit prevazne v aplikacich, ktere
> nemaji s RAD NIC spolecneho. Jde predevsim o sluzby Windows NT, ktere pisu
> pomoci API (ne pomoci VCL trid) a komponenta mi do toho nepasuje.
Tak proc si nevolas Winsock taky primo jako api? proc k tomu
potrebujes nejake zapouzdreni? me pripada winsock API natolik
jednoduche, ze zapouzdreni naopak obcas i neco zesloziti... ;-)
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
RichEdit a Color Syntax ?
[*] Marian Mano <mmarianm2(zv)hotmail(tec)com> - 12.2.1999 23:12:16 pst
Zdravim Delfiny.
Poradil by mi niekto, ako spravit v RichEdit farebnu syntax ako je napr.
v Delphi editore ? Robim editor pre progr. jazyk a je to velmi nutna
funkcia.
Vdaka. Marian.
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
ODBCEXPRESS a ODBC98
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 13.2.1999 00:03:42
Ahoj,
mate nekdo zkusenosti s ODBCEXPRESS nebo ODBC98?
Dekuji a jsem s pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Query - zobrazeni v DBGridu (desetina mista).
[*] Jaro <jaro(zv)sinea(tec)cz> - 13.2.1999 00:51:54
Muzes treba takto:
Displayformat: # ### ##0.00
EditFormat: 0.00
Jaro
-----P�vodn� zpr�va-----
Od: Tomas Bradle <tomas(zv)cobra(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 17:39
P�edm�t: Re: Query - zobrazeni v DBGridu (desetina mista).>Cau,
>Myslim, ze ten DisplayFormat ma byt :
>,0.00
>cili: carka - to pro oddelovace tisicu
> nula - povinne zobrazeni nuly na radu jednotek
> tecka - desetinna tecka
> nula, nula - pro dve desetinna mista
>
>Tomas
>tomas(zv)cobra(tec)cz
>
>
>-----P�vodn� zpr�va-----
>Od: Ji�� Toman <jiri.toman(zv)seznam(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 12. �nora 1999 13:54
>P�edm�t: Query - zobrazeni v DBGridu (desetina mista).
>
>>Ahoj vsichni !!
>>
>>Prosim o radu s timto problemem.
>>
>>Dynamicky provadim SQL dotaz v D4 na DB Paradox, kde pocitam nejake
>>polozky. Vysledek se mi zobrazi v DBGridu, ale ma moc desetinych
>>mist. Potreboval bych, aby mel pouze dve. Nazev polozek v DBGridu
>>je pokazdy jiny. Myslel jsem na neco jako:
>>DBGrid1.Colums[2] ... a neco ,ale nevim co ????
>>
>>Nasel jsem taky Display Format, ale nevim jak pouzit v mem pripade.
>>
>>Dik za kazdou dobrou radu.
>> Cau Jiri Toman
>Parametr v SQL
[*] Jaro <jaro(zv)sinea(tec)cz> - 13.2.1999 01:28:04
Zda se, ze to prilis komplikujes.
Datum je na serveru TDateTime a musi byt uvedeno v uvozovkach
podobne jako string. Nemusis datum dekodovat, ale lze ho zadat
najednou do podminky, bud pres parametr nebo pomoci funkce Format.
Zcela jiste to bude fungovat i takto jednoduse: (viz uprava tveho zdroje)
> with Query1 do begin
> SQL.Clear;
> SQL.Add('SELECT Jmeno, Prijmeni, Narozen, Ulice, Mesto, PSC FROM ZACI
');
SQL.Add(Format('WHERE Narozen = "%s" ',[DateToStr(Date)]));
> Open;
> end;
To ExecSQL TAM NEMA CO DELAT.
ExecSQL se pouziva pri spousteni prikazu jako Insert, Update a Delete.
Pro vraceni hodnot dotazu staci Open na TQuery.
V pripade prace s parametry ti tam naopak chybi metoda Prepare
Mrkni na nejake prikladky do Delphi
Jaro
--------------------------
>Vazeni kolegove,
>
>prosim o pomoc. Snazim se udelat jednoduchou DB-aplikaci, ktera
>vybere z tabulky lidi, jez maji v zadany den narozeniny. Protoze
>nevim, jak zadat do SQL dnesni datum, snazim se na to jit pres
>parametry. Ani to vsak nejde - system hlasi "Field DDen is of
>unknown type" - jakoby DDen chapal jako polozku a ne jako parametr.
>
>procedure TForm1.btnZpracujClick(Sender: TObject);
>var Rok,Mesic,Den: word;
>begin
> if rbNarozeniny.Checked then
> if rbDnes.Checked then begin
> {Kdo m� dnes narozeniny}
> DecodeDate(Date,Rok,Mesic,Den);
> Query1.ParamByName('DDen').AsWord:=Den;
> Query1.ParamByName('MMesic').AsWord:=Mesic;
> end;
> with Query1 do begin
> SQL.Clear;
>
> SQL.Add('select Jmeno, Prijmeni, Narozen, Ulice, Mesto, PSC from
> ZACI '+
> 'where Extract(Day from Narozen)= :DDen ' +
> ' and Extract(Month from Narozen)= :MMesic');
> ExecSQL;
> Open;
> end;
>
>end;
>
>===================================================
>ing. Jan Plisek e-mail:plisek(zv)spse(tec)cz
>SPSE a VOS tel. 040/51 68 21
>Karla IV. 13 fax. 040/51 70 37
>531 69 PARDUBICE WEB: http://www.spse(tec)cz
>Czech Republic
>===================================================
>
StoredProc x Transakce
[*] Jaro <jaro(zv)sinea(tec)cz> - 13.2.1999 01:28:30
Ja to tedy delam jinak.
Protoze StartTransaction, Commit a RollBack obsahuje
TDatabase coby vlasni metodu, neni potreba to aktivovat pres pomocne TQuery
Dle nasledovne konstrukce to funguje naprosto spolehlive.
Database1.StartTransaction ; // zahaji transakci
try
......
NactiParametry1();
StoredProc1.ExecProc ;
NactiParametry2();
StoredProc2.ExecProc ;
........
Database1.Commit; // ukonci transakci
except
Database1.Rollback ; // zrusi transakci, pokud doslo k
// vyjimce (napr. jiny uzivatel zahajil transakci nepatrne drive)
Application.MessageBox('Nepodarilo se dokoncit operaci!', MB_OK +
MB_ICONINFORMATION) ;
end ;
Samozrejme musi byt StoredProc1 a StoredProc2 napojena na Database1. V tom
je cely vtip.
Vsechny TQuery a TStoredProc napojene na stejnou TDatabase podlehaji jedne
transakci a na vsechny
se pripadne uplatni Rollback
Jaro
----------------------------
>Pozri sa ci mas na StoredProc a ostatnych DataSet-och
>property DatabaseName rovnaku ako na TDatabase v property
>DatabaseName. Nam to funguje normalne.
>
>M.
>
>Jaroslav Sikora wrote:
>>
>> To jsem zkousel, ale RollBack to nevratil.
>> Jarda
>>
>> > From: Martin O en� <ocenas(zv)proces.sk>
>> > je dobre na tento ucel pouzit komponentu TDatabase. Ma
>> > metody StartTransaction, Commit, RollBack. Nastavis si ju na
>> > svoj alias, das jej DatabaseName, ktore simuluje alias. Na
>> > to odkazes vsetky datasety a hotovo.
>>
>> > Jaroslav Sikora wrote:
>> > > na MS SQL 7.0 potrebuju nastartovat transakci a pomoci
>> > > StoredProc provadet zmeny v tabulkach. Po ukonceni aktualizaci
>> > > dat commit nebo rollback.
>> > >
>> > > Query.Sql.Add('BEGIN TRANSACTION');
>> > > Query.ExecSQL;
>> > > ...
>> > > StoredProc.ExecSQL;
>> > >
>> > > Query.Sql.Add('ROLLBACK TRANSACTION');
>> > > Query.ExecSQL;
>> > >
>> > > Vypada to rozumne, ale je to nefunkcni. Rollback se totiz vubec
>> > > neprojevi !.
>> > > Pokud tu proceduru zavolam pomoci Query
>> > > (Query.Sql.Add('EXEC proc_name ...'), vse je OK.
>> > > Delal bych to timto zpusobem, ale nedokazu zase z Query vydupat
>> > > navratovou hodnotu.
>> > > Tak to vypada, ze StoredProcedure ma nejakou chybku.
>> > > Netusite nekdo, co s tim ?
>> > >
>> > > sikora(zv)kam(tec)czu(tec)cz
>
P��klad na UpdateSql
[*] Jaro <jaro(zv)sinea(tec)cz> - 13.2.1999 01:40:42
Je to snadn�
var i1, i2: integer;
begin
with Query1 do begin
if Active then Close;
SQL.Clear;
SQL.Add(Format('UPDATE Table1 SET Polozka1 = %d WHERE ID1 = %d', [i1,
i2]));
ExecSQL;
end;
.........
Zapi�e hodnotu i1 do pole Polozka1 (integer) pro vsehny zaznamy, ktere
obsahuji hodnotu i2
v polozce ID1.
Jaro
-----P�vodn� zpr�va-----
Od: halam(zv)email(tec)cz <halam(zv)email(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 14:12
P�edm�t: P��klad na UpdateSql
>Nem�te pros�m n�jak� primitivn� progr�mek , kde pou��v�te UpdateSql. Jsem
>za��te�n�k a tohle nem��u pochopit.
>
>D�ky moc.
>
>--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
>--- http://email(tec)cz <--- Get Your Free Email
>
>Urgentne TCP/IP
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 13.2.1999 07:33:38
Hi,> Nejak jsem se jeste nedostal k tomu, abych si stahnul dokumentaci k
Winsock z www.sockets.com,
> ale abych pravdu rekl, ani jsem zadnou kloudnou dokumentaci nenasel.
> Ta na sockets ma byt udajne neaktualizovana.
Pred casem jsem nekolika zajemcum posilal wordovsky dokument s popisem
Winsocku. Neni to buh vi co, ale dokazal jsem z toho udelat pro svoji
tehdejsi potrebu funkcni komponenty resp. potomky tWinControl. Pokud si na
to spravne pamatuju, tak jedine problemy jsem mel s popisy nektery struktur
kolem adresace a jejich konverzi, ale ty jsem resil nahlednutim do nejakeho
Ceckovskeho headeru, protoze z pascalske transkripse i dokumentace jsem
nebyl dvakrat moudry :-)
Pak jsem tam mel jeste nejaky problem s nutnosti volat Bind(), ale na to
jsem taky nejak prisel. Tridy jsem odvozoval od tWinControl proto, ze mi
poskytovaly handler wokna, kteremu Gates posila asynchronni eventy. Na API
by sis musel zaregistrovat tridu vlastniho wokna. To je jedina prace navic,
kterou vidim pri zapoudrovani winsocku do nejakych objektu, ktere nejsou
odvozeny od tComponent.
Bye, pf
Button(x).Caption
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 13.2.1999 09:48:22
Ahoj,
pokud jsem to dobre pochopil, pak asi takto (ale musis mit zajisteno,
ze ta tlacitka existuji, jinak si to musis dodatecne osetrit; navic
v te databazi musis mit aspon deset polozek):
> Table1.First;
> for x := 1 to 10 do
> begin
> Button(x).Caption := Table1.FieldByName ('POPIS').AsString;
(FindComponnet ('Buttton'+IntToStr (i)) as TButton).Caption := ...
> Table1.Next;
> end;
Slavek
> Diky za radu. profia(zv)atlas(tec)cz
----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------
Out of system resources
[*] Petr Poto�ek <alrousse(zv)mbox.vol(tec)cz> - 13.2.1999 09:56:23
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Zdravim vsechny,
mam problem pri ladeni programu. Pri spusteni prg v "ladicim modu"(Run F9) se vraci hlaska "Exception EOutOfResources in module PROJECT.EXE at 0001BD70. Out of system resources.". Pokud projekt zavru a spustim zkompilovany EXE soubor bezi vsecko v poradku, to ovsem samozrejme nemuzu "krokovat" atd. Zrejme jde jen o nejake nastaveni, ale ja tomu vubec nerozumim, takze prosim poradte "kde, co, jak, ...". (Mam Delphi 4-Prof., SP2; Win95).
Predem dekuju za kazdou odpoved. Petr Potocek
Button(x).Caption
[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 13.2.1999 10:11:51
Ahoj,
jestli jsem to dobre pochopil, tak ti jde asi
o tohle napr:
procedure ObnovCaption;
var
I: integer;
begin
Table1.First;
for I:= 0 to ComponentCount-1 do
if Components[I] is TButton then
begin
TButton(Components[I]).Caption:= IntToStr(I);
Table1.Next;
end;
end;
Jestli tam mas butonu vic tak jde jeste pouzit Tag,
tzn. pro ty kterym chces dat Caption z tabulky nastav
Tag napr na 33 a pak to udelej taklhe
procedure ObnovCaption;
var
I: integer;
begin
Table1.First;
for I:= 0 to ComponentCount-1 do
if (Components[I] is TButton) and (TButton(Components[I]).Tag = 33)
then
begin
TButton(Components[I]).Caption:= IntToStr(I);
Table1.Next;
end;
end;
Snad tam neni chyba, jeste sem se moc neprobudil:-)
S pozdravem
================================
> Pavel Malinsky; spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================
GSM: 0602 652 203
> -----P�vodn� zpr�va-----
>Od: profia(zv)atlas(tec)cz <profia(zv)atlas(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 13. �nora 1999 8:41
>P�edm�t: Button(x).Caption
>
>
>Panove (jsou tu vubec damy ??? ) ale to je jiny okruh dotazu :)
>
>Potrebuju aktualizovat popis po sobe jdoucich tla��tek z dbf.
>
> Predstava je asi tahle :)
>
> Table1.First;
> for x := 1 to 10 do
> begin
> Button(x).Caption := Table1.FieldByName ('POPIS').AsString;
> Table1.Next;
> end;
Diky za radu. profia(zv)atlas(tec)cz
treeView- color
[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 13.2.1999 11:47:12
Ahoj
Potreboval bych poradit jak mit barvu podkladu u textu stejnou jakou
nadefinuji TreeView.Color
a jak donutit tu samou komponetu aby mela tu barvu textu jakou vyberu u
font.Color a ne furt cernou.
Jiri Heinisch
Kdo si stahne; potesi mne i sebe
http://www.mujweb(tec)cz/www/heinisch/download
H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec
Zmena fontu
[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 13.2.1999 11:50:40
>> > Ahoj
>> >
>> > Jde programove zmenit font u komponenty TListView pro vlastnost
Petr Vones wrote
>Nepises jakou mas verzi Delphi, v D4 mas primo udalosti
TListView.OnCustomDrawXXX.
>Pro starsi verze muzes pouzit komponentu TEnhListView ktera je tady:
>http://www.tda(tec)cz/vita/delkom.htm
Ahoj
Mam D3 , komponentu jsem stahnul, je to dobry, ale
ja bych potreboval font pro Caption a dalsi pro SubItems
tj. 2 fonty v jednom radku
a komponenta podporuje pouze jeden
S pozdravem a diky
Heinisch Jiri
D4 a neprijemne prodlevy
[*] Honza Fiala <fala(zv)imc(tec)cz> - 13.2.1999 12:09:26
Cao all,
celkem pravidelne se mi v editoru D4s pri pre
pnuti do jineho unitu stava, ze mi vsechno zatuhne a po n
ekolika sekundach to pokracuje dal. To same mi stava pri
spusteni meho programu z delphi. Chtel bych se zeptat, je
stli jste nekdo meli stejne problemy a jakym zpusobem byc
h se toho zbavil.
Dik
Honza Fiala
E-Mail: fala(zv)imc.c
z
Kombinace Treeview a Comobobox
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 13.2.1999 12:32:25
Ahoj vsichni
Nezna nekdo komponentu, ktera by byla kombinaci
Treeview a Combobox ?
Radim
Direct3D???
[*] mpig(zv)post(tec)cz - 13.2.1999 13:27:35
Ahoj vsichni tam na druhim konci
mam delphi 4 a taky delphiX. Dosti by me zajimalo par veci okolo direct3d. Z prikladu jsem pochopil jak objekty a svetla pridavat a posouvat a menit kameru a tak. Co mi je mene jasny, jak to funguje - ty ramecky a buildery.. Co bych potreboval vedet, jak se daji menit materialy objektu a pridavat a menit textury(z objektu si to tam nakou nahralu, ale nebyly perspektivne correct a dosti me to stve).
Kdyby me nekdo dokazal pomoct tak na
MPIG(zv)post(tec)cz
Diky predem i zadem T602
[*] Ale� Krautvor <krautvor(zv)alcatel(tec)cz> - 13.2.1999 13:38:59
> neresil nekdo z Vas prevod souboru formatu T602? Nebo nesel by nejak vyvolat
> konvertor, ktery je soucasti Wordu?
Hi,Jdes dobrou cestou. Moje reseni bylo podobne: v podstate slo o natazeni
dokumentu do Wordu a nasledne ulozeni do pozadovaneho formatu. Vse bezi hezky na
pozadi, Word se ani nespusti, teda ne viditelne. Program mohu poslat, ... jen ho
musim najit.
Ales
--
----------------------------------------------------------------------
Ale� Krautvor, Alcatel Czech +------V------+
phone: +42 02 66094 652 | ALCATEL |
e-mail: krautvor(zv)alcatel(tec)cz +--------------+
----------------------------------------------------------------------
CDX indexy
[*] Petr Ma��k <rtepema(zv)mbox.vol(tec)cz> - 13.2.1999 13:40:27
Diky vsem za odpoved. Problem jsem vyresil zmenou 28.Bytu v hlavicce dbf a nepouzitim CDX indexu.
Zdravi
* Petr Ma��k *
* RT electronic *
* rtepema(zv)mbox.vol(tec)cz *
* tel. -02-20510562 *
Importne filtre
[*] iko(zv)kamarad(tec)cz - 13.2.1999 15:24:11
Zdravim vsetkych
Mam problem. Chcel by som v programe vyuzit importne filtre FLT.
Neviete neikto, ako na to?
IKO
ikino(zv)pobox.sk
http://freeweb.coco(tec)cz/IKO
Test vysunuti CD-ROM mechaniky
[*] Patrik Sladecek <pasla(zv)iname(tec)com> - 13.2.1999 15:46:27
Ahoj,
nev�te n�kdo, jak otestovat, zda je cd-rom mechanika VYSUNUT�?
P a t r i k S l a d e c e k
e-mail: pasla(zv)iname.com
PGP Fingerprint: D746 261E 6A84 D33E 1D8F 4C4A 8475 5008 D33F C92B
D4 a neprijemne prodlevy
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 13.2.1999 19:39:52
Puvodni zprava, kterou napsal Honza Fiala dne 13 Feb 99,:
> celkem pravidelne se mi v editoru D4s pri prepnuti do jineho unitu
> stava, ze mi vsechno zatuhne a po nekolika sekundach to pokracuje dal.
To je v poradku, to si Delphi nacita informace o vsem moznem.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
D4 a neprijemne prodlevy
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 13.2.1999 20:30:58
A mas nainstalovany Delphi patch 2 ? Me se to stavalo pred nainstalovanim v puvodni verzi.
Po nainstalovani se to zrychlilo.
Radim
-----P�vodn� zpr�va-----
Od: Honza Fiala <fala(zv)imc(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 18:40
P�edm�t: D4 a neprijemne prodlevy
Cao all,
celkem pravidelne se mi v editoru D4s pri prepnuti do jineho unitu stava, ze mi vsechno zatuhne a po nekolika sekundach to pokracuje dal. To same mi stava pri spusteni meho programu z delphi. Chtel bych se zeptat, jestli jste nekdo meli stejne problemy a jakym zpusobem bych se toho zbavil.
Dik
Honza Fiala
E-Mail: fala(zv)imc(tec)cz
Urgentne TCP/IP
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 13.2.1999 23:10:07
Neni to nahodou wordovsky dokument z Winsock SDK ?
Ondrej Krajicek
-----P�vodn� zpr�va-----
Od: Petr Fejfar <callnet(zv)telecom(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 20:59
P�edm�t: Re: Urgentne TCP/IP
>Hi,
>
>> Nejak jsem se jeste nedostal k tomu, abych si stahnul dokumentaci k
>Winsock z www.sockets.com,
>> ale abych pravdu rekl, ani jsem zadnou kloudnou dokumentaci nenasel.
>> Ta na sockets ma byt udajne neaktualizovana.
>
>Pred casem jsem nekolika zajemcum posilal wordovsky dokument s popisem
>Winsocku. Neni to buh vi co, ale dokazal jsem z toho udelat pro svoji
>tehdejsi potrebu funkcni komponenty resp. potomky tWinControl. Pokud si na
>to spravne pamatuju, tak jedine problemy jsem mel s popisy nektery struktur
>kolem adresace a jejich konverzi, ale ty jsem resil nahlednutim do nejakeho
>Ceckovskeho headeru, protoze z pascalske transkripse i dokumentace jsem
>nebyl dvakrat moudry :-)
>
>Pak jsem tam mel jeste nejaky problem s nutnosti volat Bind(), ale na to
>jsem taky nejak prisel. Tridy jsem odvozoval od tWinControl proto, ze mi
>poskytovaly handler wokna, kteremu Gates posila asynchronni eventy. Na API
>by sis musel zaregistrovat tridu vlastniho wokna. To je jedina prace navic,
>kterou vidim pri zapoudrovani winsocku do nejakych objektu, ktere nejsou
>odvozeny od tComponent.
>
>
>Bye, pf
>
>Interrupt COM
[*] Viliam Mlich <vmlich(zv)mbox.vol(tec)cz> - 13.2.1999 23:46:39
Hello Daniel!
12. �nora 1999 Daniel Kminek wrote:
> Jak to udelat, aby pri preruseni ( prijmu znaku) na COMu vznikla
> udalost, kterou ja bych obslouzil ihned
Prerusenie a prijem znaku na COM nie je to iste. Porty 16550 maju na
vstupe buffer na 16 byte a da sa nastavit, po prijati kolkych znakov
ma prerusit: najcastejsie sa dava 8, t.j. az po prijati 8-eho znaku
zacne ziadat o prerusenie. Nez to dojde k obsluhe interruptu do
COMM.DRV, stihne sa prijat este dalsich az 6 znakov, hlavne ked je to
pod Windows.
Takze aj keby si spracovanie znaku vlozil priamo do COMM.DRV, nepojdu
ti po jednom, ale v 'chumacoch'. Ale driver bezi s najvyssou
prioritou a keby si v nom data hned spracovaval, tak zase zabrzdis
ine procesy (napriklad LAN-karta by nestihala chytat pakety)
Preto driver znaky iba prijme do buffera a vystavi semafor, ze doslo
k zmene. Pre samotne spracovanie v aplikacii Delphi uz je uplne
jedno, ci sa na stav portu dotazujes periodicky v nejakom timeri,
alebo to nechas ako event na dispecing. Este mozes vytvorit
samostatny thread, ale efekt moze byt uplne opacny: sice sa reakcia
na 1 prijaty znak sotva meratelne zlepsi, ale vsetko ostatne sa
citelne spomali.
Bye a slunce(tec)cz v dusi
mailto:vmlich(zv)mbox.vol(tec)cz
V.Mlich http://www(tec)czech-web(tec)cz/~vmlich
Button(x).Caption
[*] profia(zv)atlas(tec)cz - 14.2.1999 08:28:25
Panove (jsou tu vubec damy ??? ) ale to je jiny okruh dotazu :)
Potrebuju aktualizovat popis po sobe jdoucich tla��tek z dbf.
Predstava je asi tahle :)
Table1.First;
for x := 1 to 10 do
begin
Button(x).Caption := Table1.FieldByName ('POPIS').AsString;
Table1.Next;
end;
Diky za radu. profia(zv)atlas(tec)cz OFF: Alt ve Win98
[*] Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz> - 14.2.1999 11:29:23
Omlouvam se za OFF Topic, ale castecne to s programovanim souvisi.
Ve svem programu jsem pouzival klavesove zkratky Alt+Doleva,
Alt+Doprava. Ve Win95 OK, ve Win98 akorat pipne PC-Speaker
a nic se nestane. Zjistil jsem, ze to nechodi ani v jinych programech.
Napr. v MSIE nechodi Back/Forward, v celych Win98 nechodi Alt+Dolu
na rozbaleni ComboBoxu.
Nevim, jestli je to obecne bug 98 nebo jestli preskocilo jenom
teto konkretni instanci Win98. Bohuzel si ani nepamatuji, jestli to
dela od zacatku nebo jestli se to po***** pozdeji.
Diky
Vojtech Semecky
(Odpovedi prosim na soukromou adresu vojtech.semecky(zv)v-soft(tec)cz,
zaver potom zverejnim).MS SQL 6.5 a zamky na blocich
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.2.1999 11:44:38
Jak se pripojujes (ODBC, SQL Link), co pouzivas (TQuery, TTable) atd.???
Mac
"ing. Martin Porkert" wrote:
> Ahoj delphisti,
> Neumi mi n�kdo prosim poradit s nasledujicim stavem na MS SQL 6.5.
> Jakym zpusobem zrusim transakcni blokovy zamek na serveru.
> Update dvou sousednich radku v tabuli, kter� jsou v jednom bloku a jsou update ze dvou stanic. Update na jednom probehne na druhem ne.
>
> Dik za kazde nakopnuti a omlouvam se za maly offtopic
>
> Martin
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Form - zmena Caption
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.2.1999 14:25:25
From: info(zv)saton(tec)cz (SATON Glass s.r.o.)
Zdravim,
stava se mi posledni dobou (od te doby co jsem presel na D4), ze musim sem
tam pristupovat k Formu jinak nez jsem byl zvykly... muze mi nekdo,
prosim, vysvetlit tuto vec:
nap�. pro form s nazvem FormX, FormStyle=fsNormal, modalni
kdy� nezadam Caption v navrhu, bude prazdny, automaticky se pri behu
doplni FromX (to bych pochopil)
pri zadani
Formx.Caption := 'Cokoliv'; // napr pri create nebo show
bude po spusteni v Caption FormX
az po zadani
Caption:='Cokoliv';
to bude spravne....
jedina otazka PROC! Proc nemohu specifikovat Form?
Diky Kuba
--------------------------------------------------------------------------
-- -------------------------------- SATON Glass, s.r.o. - slu�by v oblasti
programov�n� a v�po�etn� techniky Klicperova 26, Brno, 628 00 �R
Tel./z�zn./fax.:+420 5 44217819 Mob:+420 603 429505 mail: saton(zv)box(tec)cz
ICQ : 4747183
--------------------------------------------------------------------------
-- --------------------------------
Kniha C++ Builder - podrobny pruvodce
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.2.1999 15:47:19
No.....jak bych to napsal...
asi se mi nelibi to, vymysli takove konstrukce, ktere casto nedavaji
zadny smysl, jen aby mohl prokazat nedostatky urciteho prekladace. Je to
proste AKADEMIK a neni to clovex z PRAXE. V praktickem zivote vyvojare
by se takhle nikam nedostal. Dale (ackoliv ho osobne neznam) mam pocit,
ze se chova (pise) znacne povysenecky - alspon v reakci na moji kritiku
jeho nesmyslnych prikladu, ktere nefunguji. Ohanel se tim, ze je to cas
nejakeho vetsiho programu - muze mit pravdu, ale nejak si neumim
predstavit, ze by se ty kousky kodu mohli nejak rozumne pouzit....
tot asi vse....za vic me ten clovek nestoji, i kdyz je to mozna dobry
teoretik.
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Slavek Rydval [SMTP:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Odesl�no: 13. �nora 1999 10:21
> Komu: FRONEK(zv)ZZNSLANY.CZ
> P�edm�t: Re: Kniha C++ Builder - podrobny pruvodce
>
> Ahoj,
>
> > Sice to napsal Miroslav Virius (nemam ho rad - muj problem), ale je
> to
> > zatim jedina ceska kniha o Builderu.
> ****Mohu se optat, co mas proti M. Viriusovi? Chci to vedet ciste ze
> zajmu (pise spatne, dela chyby, nebo neco jineho?).
>
> Diky
>
> Slavek
>
> ----------------------------------------------------------------------
> ------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------------------------------
> ------
Table.Recno
[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 14.2.1999 16:21:54
Ahoj
prave jsem zjistil zavadu u funkce Recno v D3 verze 3.0
Pri zapnute filtraci ukazuje tato funkce poradi vety puvodni tj. v tabulce
bez filtrace
dela to jen me nebo to ma na triku INPRISE.
Vi nekdo jak tomu zamezit.
Diky
Jiri Heinisch
Kdo si stahne; potesi mne i sebe
http://www.mujweb(tec)cz/www/heinisch/download
H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec
Scanner
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 14.2.1999 16:50:19
Zkus si na Inetu vyhledat komponentu EzTwain, treba budes mit stesti. Ja
jsem s ni zkousel pripojovat UMAX 600S, vysledkem bylo, ze se otevrelo okno
scannovaciho driveru, ale po scannovani to zatuhlo. Tenkrat jsem to
nepotreboval natolik, abych se v tom vic stoural, koneckoncu uz muze byt
novejsi verze ...
Hodne stesti,
Mirek
-----P�vodn� zpr�va-----
Od: voltrr1.epr(zv)mail.cez(tec)cz <voltrr1.epr(zv)mail.cez(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 9:46
P�edm�t: Re: Scanner
|
|
|> Nevite prosim nekdo jak by se dal programove ovladat scanner?
|Pres TWAIN rozhrani.
|
|Radek
|
|RichEdit a Color Syntax ?
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 14.2.1999 17:07:11
Pokud netrvat na RichEditu (ja bych u progr. editoru urcite netrval :-),
stahni si mwEdit napr. z DSP
nebo rovnou na http://www.eccentrica.org/gabr/mw/mwedit.htm
Mirek
-----P�vodn� zpr�va-----
Od: Marian Mano <mmarianm2(zv)hotmail.com>
Komu: Delphi-l(zv)fwd(tec)cz <Delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 8:21
P�edm�t: RichEdit a Color Syntax ?|Zdravim Delfiny.
|Poradil by mi niekto, ako spravit v RichEdit farebnu syntax ako je napr.
|v Delphi editore ? Robim editor pre progr. jazyk a je to velmi nutna
|funkcia.
|
|Vdaka. Marian.
|
|
|______________________________________________________
|Get Your Private, Free Email at http://www.hotmail.com
EnumWindows - jak ziskat jmena EXE
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 14.2.1999 17:21:07
Hi,
uz jsem nasel jine reseni: vyfuckoval jsem enumWindows() a pouzil misto toho
CreateToolHelp32SnapShot(), viz TLHELP.PAS.
Bye, pf
>Hi all,
>
>potreboval bych poradit nejaky algoritmus, kterym na woknech pomoci API32
>funkci vyloudim jmena EXE/DLL souboru spustenych aplikaci.
>
>1. Na API16 jsem to delal v enumWindowProc() takto:
>
> Task := GetWindowTask(aHandle);
> if Task<>0 then
> begin
> GetModuleFileName(Task,Buf,sizeof(Buf));
> ...
> end;
>
> a nebyly s tim problemy
>
>2. Na API32 to nefunguje, a tak jsem zkousel ruzne funkce a postupy, z
nichz
>nektere mi daly nejaka jmena souboru, ale ne od vsech spustenych aplikaci,
>prestoze handlery jejich oken jsem dostal. Jeden z castecne chodivych
>postupu je:
>
> GetModuleFileName(GetClassLong(aHandle,GCL_HMODULE),Buf,sizeof(Buf));
>
>Nepomaha, ani kdyz jako handle pro GetModuleFileName() pouziju
>WNDCLASS.hInstance, kterou ziskam pomoci GetClassInfo() apod.
>Take cesta pres thready pomoci GetWindowThreadId() me nikam nezavedla.
>
>
>Neumel by me, pls, nekdo poradit vhodnou funkci?
>
>Thanx, pf
>
>
>
>
>Kompresia *.exe
[*] BoboX <bobox(zv)atlas(tec)cz> - 14.2.1999 17:45:08
Zdar,
neviete niekto o dobrom programe na
kompresiu .exe suborov. Nieco ako
bolo LzExe pod DOS, ale aby to slapalo
na windows programy. Delphi 4 totiz
robi dost velke .exe a rad by som ich
aspon trochu stlacil.
Dik, cau.
--
BoboX
bobox(zv)atlas(tec)cz
Europa
MS SQL 6.5 a zamky na blocich
[*] ing. Martin Porkert <tes(zv)pce(tec)cz> - 14.2.1999 18:36:02
Bardon wrote:
Skus SQL prikaz
SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED
a pak updatuj (mi to pomohlo)
bohuzel me to nefunguje :-((
po otevreni TDatabase jsem poslal p�es TQuery nastaveni transakci a nic.
ing.Martin Kubecka wrote:
Jak se pripojujes (ODBC, SQL Link), co pouzivas (TQuery, TTable) atd.???
Mac
Upresnuji problem:
Pouzivam jednak ODBC a SQL Link 5.01, stanice NT workstation cesky SP4 ,komponentu TTable
Prvn� stanice ma p�es komponentu TTable tabuli v rezimu edit z druh� stanice nelze
provest update p�es komponentu TTable /edit s naslednym post/ sousedniho zaznamu /radku/.
Diky Martin
D4 a neprijemne prodlevy
[*] Honza Fiala <fala(zv)imc(tec)cz> - 14.2.1999 19:43:33
Patch samozrejme nainstalovany mam. Spis si myslim, ze to
ma neco spolecneho se siti a tymovou praci na jednom pro
jektu. Ja sice jedu na single pocitaci, ale mam nainstalo
vane telefonicke pripojeni do site. Ty prodlevy trvaji as
i 5 sekund, okna v delphi se neprekresluji, disk je ztich
a a 95tky tvrdi, ze procesor jede na 100%. Prace v jinyc
h programech behem teto prodlevy jsou uplne normalni. Mam
P166 a 48MB Ram. Nejvic me na to stve, ze mi to nedelalo
do te doby, nez jsem byl nucen preinstalovat Delphi.
-----P�vodn� zpr�va-----
Od: Radim Kunz <rkunz(zv)ova
.comp(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 21:15
P�edm�t: Re: D4 a nep
rijemne prodlevy
A mas nainstalovan
y Delphi patch 2 ? Me se to stavalo pred nainstalovanim v
puvodni verzi.
Po nainstalovani se to zrychlilo
.
Radim
-----P�vo
dn� zpr�va-----
Od: Honza Fiala <fala(zv)imc(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D
atum: 13. �nora 1999 18:40
P�edm�t: D4 a neprije
mne prodlevy
Cao all,
celkem pravidelne se mi v editoru D4s pri prepnuti d
o jineho unitu stava, ze mi vsechno zatuhne a po nekolika
sekundach to pokracuje dal. To same mi stava pri spusten
i meho programu z delphi. Chtel bych se zeptat, jestli js
te nekdo meli stejne problemy a jakym zpusobem bych se to
ho zbavil.
Dik
Honza Fiala
E-Mail: fala(zv)imc(tec)cz
Snapiny, pluginy apod.
[*] Peter Rus <peterrus(zv)intesys(tec)cz> - 14.2.1999 19:48:33
Ahoj Delfici,
rad bych do sveho programu dal moznost <subj>. Jenomze nevim, jak na to
...
Moje osobni predstava je asi takova, ze bud:
I.) Nalezeni DLL souboru
a) projedu patricny adresar a budu hledat *.dll
b) nactu ini soubor s informacemi
c) nactu zaznam(y) v registry (preferovano)
<- Tohle je jasne, umim, na tom nic neni
II.) Pridani
natazeni DLL za behu, a pridani odkazu (buttonek, polozka menu- to je
fuk)
No, a tohle netusim jak na to .. ani natazeni za behu (to se ale da
najit v literature), ale to pridani buttonku/menuitem .. to opravdu
nevim,jak na to. Co musim udelat v DLL, co musim udelat v materske
aplikaci?
Diky za pomoc,
Peter Rus ml.
Intesys Group a. s.
treeView- color
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 14.2.1999 21:00:15
Nepochopil jsem, co presne chces, ale s barvami v TreeView
si muzes hrat treba takhle:
procedure TFormStrom.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
with TreeView1.canvas.font do begin
case node.level of
0: color:=Barva1;
1: color:=Barva2;
2: color:=Barva3;
3: color:=Barva4;
4: color:=Barva5;
else
color:=clWindowText;
end;
end;
if cdsSelected in State then begin
TreeView1.canvas.brush.color:=BarvaVyberu;
end else begin
TreeView1.canvas.brush.color:=clWindow;
end;
DefaultDraw:=true;
end;
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
----------
> Odes�latel: Jiri Heinisch <HeiJu(zv)sol(tec)cz>
> Potreboval bych poradit jak mit barvu podkladu u textu stejnou jakou
> nadefinuji TreeView.Color
> a jak donutit tu samou komponetu aby mela tu barvu textu jakou vyberu u
> font.Color a ne furt cernou.
Snapiny, pluginy apod.
[*] iko(zv)kamarad(tec)cz - 15.2.1999 06:49:15
Ja by som vsetko robil v materskej aplikacii (a asi sa to aj musi). V
dll by som si cez nejaku funkciu zistil nazov funkcie v dll a ikonu.
Kniznicu mozes zaviest napr. takto: funkcia Func musi byt
rovnakeho typu ako je v DLL. Exec je meno funkcie v DLL.
type TFunc=function(a:PChar; d:integer):integer;
EDLLLoadError=class(Exception);
var Lib:THandle;
Func:TFunc;
begin
try
Lib:=LoadLibrary(PChar(FileName));
if Lib<32 then raise EDLLLoadError.Create('Unable to loadDLL');
(zv)Func:=GetProcAddress(Lib,'Exec');
finally
FreeLibrary(Lib);
end;
> II.) Pridani
> natazeni DLL za behu, a pridani odkazu (buttonek, polozka menu- to je
> fuk)
>
> No, a tohle netusim jak na to .. ani natazeni za behu (to se ale da
> najit v literature), ale to pridani buttonku/menuitem .. to opravdu
> nevim,jak na to. Co musim udelat v DLL, co musim udelat v materske
> aplikaci?
>
> Diky za pomoc,
>
> Peter Rus ml.
> Intesys Group a. s.
> IKO
ikino(zv)pobox.sk
http://freeweb.coco(tec)cz/IKO
Dotaz na menu
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 15.2.1999 07:47:10
zkus pouzit:
HMENU LoadMenu(
HINSTANCE hInstance, // handle of application instance
LPCTSTR lpMenuName // menu name string or menu-resource identifier
);
hInstance se da zjistit:
HINSTANCE LoadLibrary(
LPCTSTR lpLibFileName // address of filename of executable module -
treba 'pokus.dll'
);
a pote:
BOOL SetMenu(
HWND hwnd, // handle of window
HMENU hmenu // handle of menu - identifies the new menu. If this
parameter is NULL, the window's current menu is removed
);
pozn. - lpMenuName zjistis v nejakem 'budovaci' *.res-u nebo vyuzij
EnumResourceNames
pokud to nebude fungovat napis - poslu nejakej zdrojak
M.
-----P�vodn� zpr�va-----
Od: Tom� R��i�ka <ruzicka(zv)com-tech(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 11. �nora 1999 15:30
P�edm�t: Re: Dotaz na menu
>
>To jsem nevedel, takze diky, ale presto to neresi muj problem, protoze ja
to
>potrebuju za behu programu. Jestli nekdo vi, jak na to, budu moc rad, kdyz
>mi odpovi.
>
>-----P�vodn� zpr�va-----
>Od: Tomas Bradle <tomas(zv)cobra(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 11. �nora 1999 11:50
>P�edm�t: Re: Dotaz na menu
>
>
>>Cau,
>>
>>zkus v editoru Menu kontextovou nabidku - Import from resource.
>>
>>Tomas
>>tomas(zv)cobra(tec)cz
>>
>> -----P�vodn� zpr�va-----
>> Od: Tom� R��i�ka <ruzicka(zv)com-tech(tec)cz>
>> Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
>> Datum: 9. �nora 1999 18:50
>> P�edm�t: Dotaz na menu
>>
>>
>> Ahoj !
>>
>> Chtel jsem se zeptat, jak se da pridat do formulare menu, ktere je
>>ulozeno v resource (*.rc). Napr. nejaka DLL obsahuje ve svych resource
menu
>>a ja to menu chci pridat k vlastnimu menu na formu (coz je TMainMenu
atd.).
>>Tzn. jakymi funkcemi (bud z VCL nebo WIN API) se toho da docilit.
>>
>> Diky moc.
>>
>>
>
>
>
Kompresia *.exe
[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 15.2.1999 08:07:33
Napr. ASPack na www.alenka.spb.ru/aspack , je to freeware for
noncommercial use
Zatim se mi osvedcuje, neni sice nijak zvlast rychly, ale aplikaci
napsanou pod D4 stlaci ze 788 480 B na 243712B, coz je docela slusne.
Zdar Mira
-----P�vodn� zpr�va-----
Od: BoboX <bobox(zv)atlas(tec)cz>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. �nora 1999 18:06
P�edm�t: Kompresia *.exe
|Zdar,
| neviete niekto o dobrom programe na
| kompresiu .exe suborov. Nieco ako
| bolo LzExe pod DOS, ale aby to slapalo
| na windows programy. Delphi 4 totiz
| robi dost velke .exe a rad by som ich
| aspon trochu stlacil.
|Dik, cau.
|--
| BoboX
| bobox(zv)atlas(tec)cz
| Europa
|
|
|
|Snapiny, pluginy apod.
[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 15.2.1999 08:11:24
> No, a tohle netusim jak na to .. ani natazeni za behu (to se ale da
> najit v literature), ale to pridani buttonku/menuitem .. to opravdu
> nevim,jak na to. Co musim udelat v DLL, co musim udelat v materske
> aplikaci?
>
Napr. muzes nadefinovat v DLL funkci, ktera vraci identifikaci
modulu/pluginu (pozor na stringy, je rozumejsi pouzivat retezce s
urcenou delkou - string[20] apod. - bo na pouziti AnsiString potrebujes
prilinkovat nejaky DelphiMM). Muze vracet treba jmeno a jedinecne ID
modulu.
Pak si v hlavnim programu vytvoris novy TMenuItem, inicializujes jej
(caption na ten string z DLL) a napr. mu das tag, ktery urcuje blize ten
modul. Metodu OnClick odkazes na jednu spolecnou metodu pro takto
pridane menu itemy a v te metode se budes ridit podle Tagu Sendera.
Tenhle item pak pridas do hlavniho menu a je to.
--
Hezky den!
______________________________________________
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, vyvoj(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)Kompresia *.exe
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 15.2.1999 08:25:56
Treba WinZip. Ale pokud to chces na sireni prostrednictvim instalacniho
programu a rozbalovat pomoci LZEXPAND.DLL, existuje COMPRESS.EXE od M$,
ktery to smrskne a v LZEXPAND.DLL je funkce, ktera to taky rozbali.
Patrne je v LZEXPAND.DLL schovana i funkce na zabalovani, ale to nevim
jiste.
********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P�vodn� zpr�va-----
> Od: BoboX [SMTP:bobox(zv)atlas(tec)cz]
> Odesl�no: 14. �nora 1999 17:45
> Komu: Delphi
> P�edm�t: Kompresia *.exe
>
> Zdar,
> neviete niekto o dobrom programe na
> kompresiu .exe suborov. Nieco ako
> bolo LzExe pod DOS, ale aby to slapalo
> na windows programy. Delphi 4 totiz
> robi dost velke .exe a rad by som ich
> aspon trochu stlacil.
> Dik, cau.
> --
> BoboX
> bobox(zv)atlas(tec)cz
> Europa
>
> Poradte s SQL
[*] sopak.konf(zv)atlas(tec)cz - 15.2.1999 08:26:19
Caute tak sem diky vam na to prisel to kouzelne slovicko bylo IN,
ten dotaz nakonec vypada takhle a funguje nejspis spravne mozna tam este
musim dat distinct uvidim az to odskousim
ten SQL prikaz je odskouseny v Accessu
SELECT * FROM Knihy WHERE
(Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-Auto�i],Auto�i
WHERE [Relace Knihy-Auto�i].IDAutora=Auto�i.idautor AND P��jmen� LIKE
"P��jmen�")
OR Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-P�ekladatel�],Auto�i
WHERE [Relace Knihy-P�ekladatel�].IDAutora=Auto�i.IDAutor AND P��jmen� LIKE
"P��jmen�") )
AND Knihy.IDKniha IN (SELECT [Relace Knihy-Obory].IDKniha FROM [Relace
Knihy-Obory],Obory
WHERE [Relace Knihy-Obory].IDObor=Obory.IDObor AND FullPath LIKE
"FullPath") ;
Zatim Cau Sopak
-----P�vodn� zpr�va-----
Od: sopak.konf(zv)atlas(tec)cz <sopak.konf(zv)atlas(tec)cz>
Komu: Diskuzn� skupina o programovani ve Visual Basicu
<VISBAS-L(zv)LIST.FAF.CUNI.CZ>; Konferencia DELPHI <delphi-l(zv)fwd(tec)cz>
Datum: 12. �nora 1999 16:34
P�edm�t: Poradte s SQL
>Caute predem se omlouvam ze posilam i obrazek, ale bez nej by to bylo tezce
>pochopitelne
>
>ridte se podle obrazku
>
>m�m takovej probl�m pot�ebuji zobrazit v�echny pole v tabulce Knihy kter�
by
>m�li asi n�sleduj�c� Krit�ria
>
>WHERE Auto�i.P��jmen� LIKE "P��jmen�" Obory.FullPath LIKE "Obor";
>
>takze potrebuji zobrazit knihy co maj za autory nebo p�ekladatele
"P��jmen�"
>a za obory "OBOR"
>
>nev�te jak toho dos�hnout jedn�m SQL dotazem?
>
>j� to um�m propojit pomoc� INNER JOIN, ale jen pro autory nebo p�ekladatele
>nebo obory
>
>D�ky za rady �au Sopak
>sopak.konf(zv)atlas(tec)cz
>MS WORD + Word.Basic
[*] user <TYSLIC(zv)vsps-su(tec)cz> - 15.2.1999 08:45:08
Ahoj,
marne se snazim nekde sehnat popis alespon zakladnich prikazu
k Word.Basic pro Word 8 (potrebuji vyplnovat formulare ve Wordu
pomoci Delphi). Protoze nemam koupeny OFFICE (je to pro mne dost
drahe) a v konferenci byly vzdy odkazy pouze na nejake adresare
v Office tak bych chtel poprosit nejakou dobrou dusi, jestli by mi
nemohla poslat nejaky help nebo neco ceho bych se mohl chytnout.
Predem moc diky
Jirka
Tyslic(zv)vsps-su(tec)cz Kde je info o Metafile?
[*] muher(zv)csas(tec)cz - 15.2.1999 08:54:02
Zdravim,
Chtel bych vyuzivat ukladani obrazku jako metafile. Help od
D4 neni
moc sdilny. Vite nekdo o lepsim helpu?
Diky
Martin UHER
ZVT Monitoring CS a.s.D4 a neprijemne prodlevy
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 15.2.1999 08:54:37
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
neco podobneho se stavalo pokud jsem mel nainstalovano velke mnozstvi fontu (COREL)
M.
-----P�vodn� zpr�va-----
Od: Honza Fiala <fala(zv)imc(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. �nora 1999 23:07
P�edm�t: Re: D4 a neprijemne prodlevy
Patch samozrejme nainstalovany mam. Spis si myslim, ze to ma neco spolecneho se siti a tymovou praci na jednom projektu. Ja sice jedu na single pocitaci, ale mam nainstalovane telefonicke pripojeni do site. Ty prodlevy trvaji asi 5 sekund, okna v delphi se neprekresluji, disk je zticha a 95tky tvrdi, ze procesor jede na 100%. Prace v jinych programech behem teto prodlevy jsou uplne normalni. Mam P166 a 48MB Ram. Nejvic me na to stve, ze mi to nedelalo do te doby, nez jsem byl nucen preinstalovat Delphi.
-----P�vodn� zpr�va-----
Od: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 21:15
P�edm�t: Re: D4 a neprijemne prodlevy
A mas nainstalovany Delphi patch 2 ? Me se to stavalo pred nainstalovanim v puvodni verzi.
Po nainstalovani se to zrychlilo.
Radim
-----P�vodn� zpr�va-----
Od: Honza Fiala <fala(zv)imc(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 18:40
P�edm�t: D4 a neprijemne prodlevy
Cao all,
celkem pravidelne se mi v editoru D4s pri prepnuti do jineho unitu stava, ze mi vsechno zatuhne a po nekolika sekundach to pokracuje dal. To same mi stava pri spusteni meho programu z delphi. Chtel bych se zeptat, jestli jste nekdo meli stejne problemy a jakym zpusobem bych se toho zbavil.
Dik
Honza Fiala
E-Mail: fala(zv)imc(tec)cz
Jak stahnout .ASP
[*] roman.palarcik(zv)spt(tec)cz - 15.2.1999 09:01:08
>> Stahnout chci ten vysledek. To jmeno a heslo je tam proto, ze to jsou =20
>> stranky na kterych se clovek zaregistruje aby mel na ne pristup. Potom =20
>> se na uvodni strance prihlasi a dostane se dale na placene stranky. Je =20
>> to cele pres ASP a http. Moc se nevyznam v tom jak to ASP funguje, ale:
>> Kdyz mam svuj programek, tak s nim normalne jeste tu uvodni stranku =20
>> stahnu, ale kdyz chci stahnout ty dalsi (placene) stranky, uz to nejde. =
>> =20 Pise to "Couldn't resolve hostname". P=F8itom v IE je po
>> p=F8ihla=B9eni = =20 normalne nactu. Asi to nebude zas tak uplne
>> jednoduche jako u statickych stranek, ale =20 dost bych to potreboval.
>> Jestli se treba nemusi vyplnit polozka =20 Authorization u nekterych
>> komponent pro TCPIP.
>No, to zalezi na tom, jak je delany ten autorizovany pristup. Pokud
>je to delano pres prava na NT, coz pochybuji, jak to tak popisujes,
>tak by se dala pouzit komponenta s moznosti autentikace. Ale asi to
>bude delane ciste pres ASP, asi pomoci cookies. Pak musis jit na tu
>prvni stranku, resp. autorizacni skript za ni, poslat tam POST jmeno
>a heslo, no a jit na tvou pozadovanou, pricemz vracet cookies apod.
>Ja ale nevim, kdyz to nevidim.
>
>S pozdravem
> Petr Zahradnik, pocitacovy expert
S tim poslanim loginu a hesla by to jeste slo, ale nechapu jak do toho zapojit
ty cookies. Idealni by byl nejaky priklad, nevis o nejakem odkazu?
Jinak jde mi o stahovani stranek z Aviza (www.avizo(tec)cz).
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
Zakazani pohybu okna
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 15.2.1999 09:13:03
Preji vsem pekneho dne,
lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
Diky
Slavek
----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------
Snapiny, pluginy apod. - casta chyba programatoru
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 15.2.1999 09:36:53
Hi,
jen tak pro zajimavost upozornuji na castou chybu programatoru na API32:> Lib:=LoadLibrary(PChar(FileName));
> if Lib<32 then raise EDLLLoadError.Create('Unable to loadDLL');
^^^^^^^^^
Tohle plativalo na API16.
Na API32 je to spravne napr. takto:
> if Lib=0 then
raise EDLLLoadError.CreateFmt('Unable to loadDLL, error
code=%s',[GetLastError]);
Bye, pf
Tisk ze starych Dos aplikaci
[*] sopak.konf(zv)atlas(tec)cz - 15.2.1999 09:46:55
Caute mam zas problem
Mam Dos Aplikaci ktera tiskne v latin2 na jehlickovce klasickej font s
jednotnou velikosti pro kazdy znak a rameckuje taky pres znaky, potrebuju
aby bezela pod woknama a tiskla na Laserovou tisk�rnu
nen� nejaky program ktery by tyto znaky v Latin2 prevedl pro laserovou
tisk�rnu ve woknech?
aby netiskla patvary
dik Sopak
Urgentne TCP/IP
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 15.2.1999 09:54:39
-----P�vodn� zpr�va-----
Od: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. �nora 1999 23:27
P�edm�t: Re: Urgentne TCP/IP
Neni to nahodou wordovsky dokument z Winsock SDK ?
Ondrej Krajicek
Je.
Bye, pf
TColorGrid
[*] Jirka <virt(zv)pepa(tec)cz> - 15.2.1999 10:00:23
Ahoj,
Dotaz: Daji se zmenit barvy ve vyberu v TColorGrid?
Jirka Virt
email: virt(zv)pepa(tec)cz
InstallShield Express a pridani souboru k odinstal
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.2.1999 10:11:32
Zdravicko...
Mam program, ktery se nainstaluje pomoci InstallShield Express, ovsem
pozdeji jsem potreboval udelat specialni update. Ten vsak k puvodnimu
programu vytvori i nekolik dalsich souboru, ktere bych rad pridal do
puvodniho seznamu souboru k odinstalaci (soubor DeIsL1.isu ?). Nemate
nekdo popis formatu DeIsL1.isu nebo nejakou komponentu/unitu pro praci s
timto seznamem?
Dekuji za odpovedi, F.
Table.Recno
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 15.2.1999 10:13:16
Ahoj,
mam takovy dojem, ze tohle je standardni chovano fce RecNo a ze je na to
nekde v dokumentaci dokonce upozorneno.
Mirek
-----P�vodn� zpr�va-----
Od: Jiri Heinisch <HeiJu(zv)sol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. �nora 1999 19:22
P�edm�t: Table.Recno
|Ahoj
|
|prave jsem zjistil zavadu u funkce Recno v D3 verze 3.0
|
|Pri zapnute filtraci ukazuje tato funkce poradi vety puvodni tj. v tabulce
|bez filtrace
|dela to jen me nebo to ma na triku INPRISE.
|
|Vi nekdo jak tomu zamezit.
|
|
|Diky
|
|
| Jiri Heinisch
|
|Kdo si stahne; potesi mne i sebe
|http://www.mujweb(tec)cz/www/heinisch/download
|
|H-trading - Danovy a ekonomicky servis
|Vyvoj a tvorba ekonomickeho software
|http://www.mujweb(tec)cz/www/heinisch/
|HeiJu(zv)sol(tec)cz
|691 83 Drnholec
|
|D4 a neprijemne prodlevy
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.2.1999 10:15:07
Vypni si vsechny "Automatic features" v Tools / Environment Options /
Code Insight.
F.
> -----P�vodn� zpr�va-----
> Od: Honza Fiala [SMTP:fala(zv)imc(tec)cz]
> Odesl�no: 13. �nora 1999 12:09
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: D4 a neprijemne prodlevy
>
> Cao all,
> � celkem pravidelne se mi v editoru D4s pri prepnuti do jineho unitu
> stava, ze mi vsechno zatuhne a po nekolika sekundach to pokracuje dal.
> To same mi stava pri spusteni meho programu z delphi. Chtel bych se
> zeptat, jestli jste nekdo meli stejne problemy a jakym zpusobem bych
> se toho zbavil.
> �
> Dik
> Honza Fiala
> E-Mail: fala(zv)imc(tec)cz <mailto:fala(zv)imc(tec)cz>
> Offtopic: Napojenie EZS na PC
[*] Michal Moscovic <moscovic(zv)fred.utc.sk> - 15.2.1999 10:31:26
Zdar seci...
Vopred sa ospravedlnujem za offtopic... (nebite ma)
Zaujimalo by ma, ci sa niekto nestretol s niecim podobnym, pripadne
ci o niecom takom nepocul...
Ide mi o pripojenie elektronickeho zabezpecovacieho zariadenia (EZS)
na PC. Ccel by som vediet, ci ide urobit nieco take, ze ked bude spusteny
poplach, tak EZS vysle signal do PC... PC na to zareaguje tak, ze sa zobudi
zo StandBy rezimu, zacne vytacat nejake telefonne cislo a po tom, co niekto
zodvihne tak vysle zvukovu spravu.
Jedna sa mi hlavne o to, ako zobudit PC a predat mu tu informaciu s
EZS... Otatne viem, ze sa urcite da...
Ak ste sa niekto z niecim podobnym stretli, a viete pomoct tak uvitam
vsetky npady cez svoj sukromny e-mail (moscovic(zv)fred.utc.sk).
Zaujima ma hlavne aky hardware na to budem potrebovat... a ci to
vobec ide...
Vopred diky moc vsetkym a este raz sorry za offtopic.
S pozdravom
SALMON
(Michal Moscovic)
e-mail:
salmon(zv)frcatel.utc.sk
moscovic(zv)fred.utc.sk
web:
http://fred.utc.sk/~moscovic
Jak stahnout .ASP
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.2.1999 10:53:55
Puvodni zprava, kterou napsal roman.palarcik(zv)spt(tec)cz dne 15 Feb 99,:
> >No, to zalezi na tom, jak je delany ten autorizovany pristup. Pokud
> >je to delano pres prava na NT, coz pochybuji, jak to tak popisujes,
> >tak by se dala pouzit komponenta s moznosti autentikace. Ale asi to
> >bude delane ciste pres ASP, asi pomoci cookies. Pak musis jit na tu
> >prvni stranku, resp. autorizacni skript za ni, poslat tam POST jmeno a
> >heslo, no a jit na tvou pozadovanou, pricemz vracet cookies apod. Ja ale
> >nevim, kdyz to nevidim.
>
> S tim poslanim loginu a hesla by to jeste slo, ale nechapu jak do toho
> zapojit ty cookies. Idealni by byl nejaky priklad, nevis o nejakem odkazu?
> Jinak jde mi o stahovani stranek z Aviza (www.avizo(tec)cz).
Zadny priklad nemam, mimochodem cookies pro takoveto prihlasovani
take nemam rad. Ale je to jedna z jednodussich metod, jak programovat
ASP skripty. Kdyz programuji ja, tak si delam praci slozitejsi,
proste cookies nepouzivam pro ukladani informaci. Pak to ale chodi
lepe a hlavne na vsem. Dival jsem se na AVIZO, cookies tam vesele
pouzivaji, takze se muzes snazit. Jde o to, ze kdyz se prihlasis,
server si posle nejake cookies, ktere mu pak zase na vyzadani musis
vracet. Tim on si overuje, zda jsi prihlaseny.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Anglicky help k RxLibrary
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.2.1999 11:00:31
Zdravicko...
Na Torry se objevil anglicky help k RxLibrary
(http://www.torry.ru/vcl/packs/odrxhelp.zip). Takze kdo ho shanel, muze
stahovat...
F.MS SQL 6.5 a zamky na blocich
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.2.1999 11:05:12
Tak to je celkem znamy problem MS SQL a TTable. Pri pouziti TTable totiz dochazi k zamykani
tabulky (bohuzel). Doporucuju pri praci s SQL serverem (obecne) pouzivat TQuery. No a pokud
ani toto nepomuze, tak pouzij CachedUpdates a FetchAll (tim dojde k natazeni vsech
pozadovanych zaznamu na klienta a uvolni se zamky na SQL serveru).
Dost slusne informace o Delphi + MS SQL + CachedUpdates (vcetne problematiky zamykani) najdes
na:
http://www.kallista.com/techpapers.htm
Problem je v tom, ze jakmile vlezes do editu v tabulce, tak naskoci PageLock (row lock umi az
MS SQL 7.0, ale nezkousel jsem to) a pokud ho chces editovat jinym klientem tak (nevim poradne
proc) dochazi k DeadLock-um. Cached updates (popr. FetchAll) to resi - uvolni se pagelock
(tablelock). TTable totiz (podle Kallisty ;-) vyvolava v nekterych pripadech TableLock.
Mac
"ing. Martin Porkert" wrote:
> Upresnuji problem:
> Pouzivam jednak ODBC a SQL Link 5.01, stanice NT workstation cesky SP4 ,komponentu TTable
> Prvn� stanice ma p�es komponentu TTable tabuli v rezimu edit z druh� stanice nelze
> provest update p�es komponentu TTable /edit s naslednym post/ sousedniho zaznamu /radku/.
>
> Diky Martin
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Poradte s SQL
[*] Lubomir Bulej <pallas(zv)kadan(tec)cz> - 15.2.1999 11:08:32 -0100
Hi,> SELECT * FROM Knihy WHERE
> (Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-Auto�i],Auto�i
> WHERE [Relace Knihy-Auto�i].IDAutora=Auto�i.idautor AND P��jmen� LIKE
> "P��jmen�")
> OR Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-P�ekladatel�],Auto�i
> WHERE [Relace Knihy-P�ekladatel�].IDAutora=Auto�i.IDAutor AND P��jmen� LIKE
> "P��jmen�") )
> AND Knihy.IDKniha IN (SELECT [Relace Knihy-Obory].IDKniha FROM [Relace
> Knihy-Obory],Obory
> WHERE [Relace Knihy-Obory].IDObor=Obory.IDObor AND FullPath LIKE
> "FullPath") ;
Hmm, neni to moc slozity ? Ja jsem sice nejak prehlid Tvoji puvodni msg, ale
z toho dotazu usuzuju, ze mas tabulky Knihy, Autori, Prekladatele a relace
ktere davaji dohromady autory s knihama a prekladatele s knihama.
Bude z toho drsnej join, ale vyzkousel bych neco takoveho:
SELECT * FROM
>
> Zatim Cau Sopak
>
> -----P�vodn� zpr�va-----
> Od: sopak.konf(zv)atlas(tec)cz <sopak.konf(zv)atlas(tec)cz>
> Komu: Diskuzn� skupina o programovani ve Visual Basicu
> <VISBAS-L(zv)LIST.FAF.CUNI.CZ>; Konferencia DELPHI <delphi-l(zv)fwd(tec)cz>
> Datum: 12. �nora 1999 16:34
> P�edm�t: Poradte s SQL
>
> >Caute predem se omlouvam ze posilam i obrazek, ale bez nej by to bylo tezce
> >pochopitelne
> >
> >ridte se podle obrazku
> >
> >m�m takovej probl�m pot�ebuji zobrazit v�echny pole v tabulce Knihy kter�
> by
> >m�li asi n�sleduj�c� Krit�ria
> >
> >WHERE Auto�i.P��jmen� LIKE "P��jmen�" Obory.FullPath LIKE "Obor";
> >
> >takze potrebuji zobrazit knihy co maj za autory nebo p�ekladatele
> "P��jmen�"
> >a za obory "OBOR"
> >
> >nev�te jak toho dos�hnout jedn�m SQL dotazem?
> >
> >j� to um�m propojit pomoc� INNER JOIN, ale jen pro autory nebo p�ekladatele
> >nebo obory
> >
> >D�ky za rady �au Sopak
> >sopak.konf(zv)atlas(tec)cz
> >Poradte s SQL
[*] Lubomir Bulej <pallas(zv)kadan(tec)cz> - 15.2.1999 11:18:05 -0100
Sakra preklep :) Sem to odeslal driv nez jsem to stihl dokoncit :))
> SELECT * FROM Knihy WHERE
> (Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-Auto�i],Auto�i
> WHERE [Relace Knihy-Auto�i].IDAutora=Auto�i.idautor AND P��jmen� LIKE
> "P��jmen�")
> OR Knihy.IDKniha IN (SELECT IDKniha FROM [Relace Knihy-P�ekladatel�],Auto�i
> WHERE [Relace Knihy-P�ekladatel�].IDAutora=Auto�i.IDAutor AND P��jmen� LIKE
> "P��jmen�") )
> AND Knihy.IDKniha IN (SELECT [Relace Knihy-Obory].IDKniha FROM [Relace
> Knihy-Obory],Obory
> WHERE [Relace Knihy-Obory].IDObor=Obory.IDObor AND FullPath LIKE
> "FullPath") ;
SELECT * FROM
Knihy,Autori,Prekladatele,Obory,Knihy-Autori,Knihy-Prekladatele,Knihy-Obory
WHERE Knihy.IDKniha=Knihy-Autori.IDKniha AND Autori.IDAutor =
Knihy-Autori.IDAutor AND
Knihy.IDKniha = Knihy-Obory.IDKniha AND Obor.IDObor=Knihy-Obory.IDObor AND
Knihy.IDKniha = Knihy-Prekladatele.IDKniha AND
Prekladatele.IDPrekladatel=Knihy-Prekladatele.IDPrekladatel AND
Autori.Prijimeni LIKE "<prijmeni>" AND Obory.FullPath LIKE "<obor";
Hmm, je otazka co se provede rychleji :) Tohle je dost mohutne join, tys tam
zase mel
vnoreny selecty ... Zkus jestli to bude fungovat ...
Lubos
Sirka textu na vystupu z tiskarny
[*] Kyjak Tomas - IN <xkyjt01(zv)vse(tec)cz> - 15.2.1999 11:18:19 met-1dst
Zdravim,
potreboval bych pri tisku promenne polozky
(printer.canvas.textout) zjistit, kolik zabere mista. Lze to
castecne resit pres printer.canvas.textrect (nebo tak nejak), ale to
mi jenom orizne, a jestli se to do ramecku veslo, stejne nezjistim.
Nasel sem nejakou funkci (StringWidth), ale ta je jenom pro polozky
ListBoxu. Cili, slo by udelat neviditelnej listbox, zjistit ty sirky
a podle toho se zaridit. To je ale dost uchylny...
Jestli k tomu mate co rict, budu rad.
Tomas
Zakazani pohybu okna
[*] Martin Bodlak <martin.bodlak(zv)iname(tec)com> - 15.2.1999 11:20:46
Slavek Rydval wrote:
>
> lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
>
No jde to, ale asi budes muset predefinovat standardni chovani okna.
Tedy nejspis prepsat WndProc (tj. udelat si naslednika okna s novym
WndProc) a nejlepe zkusit prepsat (= odblokovat) chovani na message
WM_SYSCOMMAND jeste pred tim, nez se vola puvodni WndProc:
case Message.Msg of
WM_SYSCOMMAND:
with TWMSysCommand(Message) do
begin
if (CmdType and $FFF0) = SC_MOVE then CmdType := 0;
end {WM_SYSCOMMAND};
end {case Message.Msg};
inherited;
Tohle je primo z meho programu, ergo by to melo fungovat.
--
Hezky den!
______________________________________________
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, vyvoj(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)Mtinformation v MessageDlg
[*] halam(zv)email(tec)cz - 15.2.1999 11:26:35
Kdy� pou�iji funkci MessageDlg, tak v nab�dce MtInformation jsou nazvy
buttonu nap�. [mbOk,mbCancel]. Jak by se dalo m�sto t�chto
p�eddefinovan�ch n�zv� buton� pou��t buttony s �esk�m n�zvem a se stejnou
func�.
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Poradte s SQL
[*] Lubomir Bulej <pallas(zv)kadan(tec)cz> - 15.2.1999 11:35:13 -0100
Hi,
> Caute tak sem diky vam na to prisel to kouzelne slovicko bylo IN,
> ten dotaz nakonec vypada takhle a funguje nejspis spravne mozna tam este
> musim dat distinct uvidim az to odskousim
Dalsi moznost je zalozit si nejake pohledy nad tema tabulkama. Vzhledem
k tomu, jak jsou informace roztrousene, by to ani nebylo k zahozeni a
pozdejsi selecty by byly prehlednejsi ....
CREATE VIEW KnihyAAutori AS
SELECT * FROM Knihy,Autori,Knihy-Autori
WHERE Knihy.IDKniha = Knihy-Autori.IDKniha AND
Autori.IDAutor = Knihy-Autori.IDAutor
CREATE VIEW KnihyAObor AS
SELECT * FROM Knihy,Obory,Knihy-Obory
WHERE Knihy.IDKniha = Knihy-Obor.IDKniha AND
Obor.IDObor = Knihy-Obor.IDObor
CREATE VIEW KnihyAPrekladatele AS
SELECT * FROM Knihy,Prekladatele,Knihy-Prekladatele
WHERE Knihy.IDKniha = Knihy-Prekladatele.IDPrekladatel AND
Prekladatel.IDPrekladatel = Knihy-Prekladatel.IDPrekladatel
Tvuj dotaz pak bude vypadat o trochu jednoduseji
SELECT * FROM KnihyAAutori,KnihyAObor,KnihyAPrekladatele
WHERE KnihyAAutori.IDKniha = KnihyAObor.IDKniha AND
KnihyAAutori.IDKniha = KnihyAPrekladatele.IDKniha AND
KnihyAObory.FullPath LINE "<obor>" AND
(KnihyAAutori.Prijmeni LIKE "<prijmeni>" OR
KnihyAPrekladatele.Prijimeni LIKE <"prijmeni>")
... Jo, mam dojem ze v tom dotazu co jsem posilal naposled jsem zapomel
jeste podminku pro jmeno Prekladatele, ale jinak to snad bude spravne -
omlouvam se za pripadny chyby - pisu to tady tak nejak z hlavy :)
Hmm, navic kdyz tak na to koukam - muze existovat kniha, ktera neni v
zadnem oboru ? Nejspis ne - a pokdu by byla nezarazena, dal by se pro
to udelat specialni obor treba s ID 0. Stejne tak asi neexistuje kniha,
kterou nikdo nenapsal. Pokud je autor neznamy, mohla by to byt specialni
polozka s ID v tabulce autoru. Tim bys usetril 2 relacni tabulky a
atributy IDObor a IDAutor bys nacpal do tabulky Knihy - tim by se ti
trochu zjednodusil zivot.
Cely tohle nejde pochopitelne v pripade, ze kniha ma vic oboru ci
vic autoru. Take to pochopitelne nejde udelat u Prekladatelu, protoze
pak bys nemohl evidovat knihy ktery nebyly prelozeny ...
Lubos
Zakazani pohybu okna
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 15.2.1999 11:50:58
Ahoj,
jde to, jen musis tomu oknu vnutit to, ze kdyz se drzi mys na titulkovem
pruhu, tak to odpovida klientske casti okna. Zde je kod, ktery pracuje
opacne, tj. presvedci okno o tom, ze se drzi mys na titulkovem pruhu,
tak si to zkus upravit:
type
TForm1 = class(TForm)
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMNCHitTest(var M: TWMNCHitTest);
begin
inherited; { call the inherited message handler }
if M.Result = htClient then { is the click in the client area? }
M.Result := htCaption; { if so, make Windows think it's }
{ on the caption bar. }
end;
> -----P�vodn� zpr�va-----
> Od: Slavek Rydval [SMTP:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Odesl�no: 15. �nora 1999 10:13
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Zakazani pohybu okna
>
> Preji vsem pekneho dne,
>
> lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
>
> Diky
>
> Slavek
>
> ----------------------------------------------------------------------
> ------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------------------------------
> ------
Mtinformation v MessageDlg
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 15.2.1999 12:10:54
Pouzitim WIN XX CZ
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: halam(zv)email(tec)cz [SMTP:halam(zv)email(tec)cz]
> Kdy� pou�iji funkci MessageDlg, tak v nab�dce MtInformation jsou nazvy
>
> buttonu nap�. [mbOk,mbCancel]. Jak by se dalo m�sto t�chto
> p�eddefinovan�ch n�zv� buton� pou��t buttony s �esk�m n�zvem a se
> stejnou
> func�.
> Cestina do delphi
[*] Honza Fiala <fala(zv)imc(tec)cz> - 15.2.1999 12:12:28
Zdarte,
potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi hlavne
o tlacitka a standartni dialogy(showmessage..., report preview). Poradte mi
jak na to.
Dik Honza Fiala
Sirka textu na vystupu z tiskarny
[*] Zden�k Moravec <zmo(zv)telecom(tec)cz> - 15.2.1999 12:13:25
>Zdravim,
>potreboval bych pri tisku promenne polozky
>(printer.canvas.textout) zjistit, kolik zabere mista. Lze to
>castecne resit pres printer.canvas.textrect (nebo tak nejak), ale to
>mi jenom orizne, a jestli se to do ramecku veslo, stejne nezjistim.
>Nasel sem nejakou funkci (StringWidth), ale ta je jenom pro polozky
>ListBoxu. Cili, slo by udelat neviditelnej listbox, zjistit ty sirky
>a podle toho se zaridit. To je ale dost uchylny...
>Jestli k tomu mate co rict, budu rad.
>Tomas
co takhle printer.canvas.textwidth () ??
Zdenek Moravec zmo(zv)telecom(tec)cz
Zakazani pohybu okna
[*] Zden�k Moravec <zmo(zv)telecom(tec)cz> - 15.2.1999 12:20:30
>lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
Slo by pri FromCreate si zapamatovat pozici (SaveTop := Top; SaveLeft := Left atd.)
Pak do procedur OnMove nebo OnResize dat Top := SaveTop; Left := SaveLeft
Width := SaveWidth; Height := SaveHeight atd.
Zdenek Moravec zmo(zv)telecom(tec)cz
Cestina do delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.2.1999 12:24:21
Puvodni zprava, kterou napsal Honza Fiala dne 15 Feb 99,:
> potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi
> hlavne
> o tlacitka a standartni dialogy(showmessage..., report preview). Poradte
> mi jak na to.
Zkus treba: http://www.localizator.com
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Mtinformation v MessageDlg
[*] Tomas Balusek <tpplus(zv)zasova(tec)cz> - 15.2.1999 12:28:00
Vsechny retezce jsou nadefinovany v CONSTS.PAS - tam je staci prepsat. Pokud
tedy nechcesh predefinovat primo konstatny ([mbOK] na kuprikladu [mbJasne]
;-))
Czescz
Tomas Balusek
-----P�vodn� zpr�va-----
Od: halam(zv)email(tec)cz <halam(zv)email(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 12:06
P�edm�t: Mtinformation v MessageDlg
Kdy� pou�iji funkci MessageDlg, tak v nab�dce MtInformation jsou nazvy
buttonu nap�. [mbOk,mbCancel]. Jak by se dalo m�sto t�chto
p�eddefinovan�ch n�zv� buton� pou��t buttony s �esk�m n�zvem a se stejnou
func�.
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
D4 a neprijemne prodlevy
[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 15.2.1999 12:37:43
No me se jednak zda, ze ten pocitac je na D4 celkem slabej (mam to
nadvou pocitacich s 64MB a 128 MB a i tech 64 se me zda malo.....). A
pokud to dela az po preinstalovani D4, tak to kus preinstalovat i s
W9x... A dokoupil bych 64 MB.
Ales
Honza Fiala wrote:
> Patch samozrejme nainstalovany mam. Spis si myslim, ze to ma neco
> spolecneho se siti a tymovou praci na jednom projektu. Ja sice jedu na
> single pocitaci, ale mam nainstalovane telefonicke pripojeni do site.
> Ty prodlevy trvaji asi 5 sekund, okna v delphi se neprekresluji, disk
> je zticha a 95tky tvrdi, ze procesor jede na 100%. Prace v jinych
> programech behem teto prodlevy jsou uplne normalni. Mam P166 a 48MB
> Ram. Nejvic me na to stve, ze mi to nedelalo do te doby, nez jsem byl
> nucen preinstalovat Delphi.
>
> -----P�vodn� zpr�va-----
> Od: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 13. �nora 1999 21:15
> P�edm�t: Re: D4 a neprijemne prodlevy
>
>
> A mas nainstalovany Delphi patch 2 ? Me se to
> stavalo pred nainstalovanim v puvodni verzi.Po
> nainstalovani se to zrychlilo. Radim-----P�vodn�
> zpr�va-----
> Od: Honza Fiala <fala(zv)imc(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 13. �nora 1999 18:40
> P�edm�t: D4 a neprijemne prodlevy
> Cao all, celkem pravidelne se mi v editoru D4s
> pri prepnuti do jineho unitu stava, ze mi vsechno
> zatuhne a po nekolika sekundach to pokracuje dal.
> To same mi stava pri spusteni meho programu z
> delphi. Chtel bych se zeptat, jestli jste nekdo
> meli stejne problemy a jakym zpusobem bych se toho
> zbavil. DikHonza Fiala
> E-Mail: fala(zv)imc(tec)cz
>
> w===Kompresia *.exe
[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 15.2.1999 12:38:29
> Napr. ASPack na www.alenka.spb.ru/aspack , je to freeware for
> noncommercial use
> Zatim se mi osvedcuje, neni sice nijak zvlast rychly, ale aplikaci
> napsanou pod D4 stlaci ze 788 480 B na 243712B, coz je docela slusne.
Je to vic nez slusne. Kdyz jsem muj exe smrsknul z 1.4MB na 0.5MB, tak
jsem zkusil to same pomoci zipu. A TEN ZIP BYL VETSI NEZ KOMPRIMOVANY
EXE......
Ales
Mtinformation v MessageDlg
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 15.2.1999 12:40:52
Ahoj,
pouzij Application.MessageBox("Text", "Nadpis", MB_YESNO) apod.
********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P�vodn� zpr�va-----
> Od: halam(zv)email(tec)cz [SMTP:halam(zv)email(tec)cz]
> Odesl�no: 15. �nora 1999 11:27
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Mtinformation v MessageDlg
>
> Kdy� pou�iji funkci MessageDlg, tak v nab�dce MtInformation jsou nazvy
>
> buttonu nap�. [mbOk,mbCancel]. Jak by se dalo m�sto t�chto
> p�eddefinovan�ch n�zv� buton� pou��t buttony s �esk�m n�zvem a se
> stejnou
> func�.
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
> Query - zobrazeni v DBGridu (desetina mista).
[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 15.2.1999 12:55:47
Problem je, ale v tom ze bych potreboval nakopnout jak
Display Format pouzit. Nejak jsem to z Helpu nepochopil.
V programu se totiz jmena sloupcu u DBGridu meni a tak musim nejak
dynamicky po vykonani SQL dotazu rict DBGridu, ze ten a ten sloupec
se ma takhle zobrazit. Nebo se to ma nadefinovat jeste pred dotazem
jeko properties u DBGridu - to ale nevim jmena polozek (field)???
Za radu predem dekuji
Jirka Toman
Jaro p�e:
>
> Muzes treba takto:
> Displayformat: # ### ##0.00
> EditFormat: 0.00
>
> Jaro
>
> -----Puvodn� zpr�va-----
> Od: Tomas Bradle <tomas(zv)cobra(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 12. �nora 1999 17:39
> Predmet: Re: Query - zobrazeni v DBGridu (desetina mista).
>
> >Cau,
> >Myslim, ze ten DisplayFormat ma byt :
> >,0.00
> >cili: carka - to pro oddelovace tisicu
> > nula - povinne zobrazeni nuly na radu jednotek
> > tecka - desetinna tecka
> > nula, nula - pro dve desetinna mista
> >
> >Tomas
> >tomas(zv)cobra(tec)cz
> >
> >
> >-----Puvodn� zpr�va-----
> >Od: Jir� Toman <jiri.toman(zv)seznam(tec)cz>
> >Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> >Datum: 12. �nora 1999 13:54
> >Predmet: Query - zobrazeni v DBGridu (desetina mista).
> >
> >
> >>Ahoj vsichni !!
> >>
> >>Prosim o radu s timto problemem.
> >>
> >>Dynamicky provadim SQL dotaz v D4 na DB Paradox, kde pocitam nejake
> >>polozky. Vysledek se mi zobrazi v DBGridu, ale ma moc desetinych
> >>mist. Potreboval bych, aby mel pouze dve. Nazev polozek v DBGridu
> >>je pokazdy jiny. Myslel jsem na neco jako:
> >>DBGrid1.Colums[2] ... a neco ,ale nevim co ????
> >>
> >>Nasel jsem taky Display Format, ale nevim jak pouzit v mem pripade.
> >>
> >>Dik za kazdou dobrou radu.
> >> Cau Jiri Toman
> >Cestina do delphi
[*] milank(zv)gratex.sk - 15.2.1999 13:45:47
Ak chce� a to sa t�ka v�etk�ch, kto m� z�ujem existuju tzv
multilangue.contants, ktor� sa pridaj� do projektu ako ktor�ko�vek �a��ia
forma a pri kompilovan� sa nahradia v�etky �tandartn� texty buttonov a msg
... a v�etko �o si prep�e� pr�slu�n�m jazykom. Prep�sa� si to do �e�tiny by
pre nikoho v notepade nemal by� probl�m.Z�kladn� hl�ky som nechal v
angli�tine a tie, ktor� sa objavuj� u��vate�ovi som prep�sal do
sloven�iny.(hinty navig�toru, buttony a message). Potom e�te doporu�ujem
prep�sa� dfm s�bor pre Quick report a v celom programe sa neobjavi ani jedna
cudzojazy�n� hl�ka. Je toho v�ak 50k preto to nemienim posla� do
konferencie, ale len na priv�tny mail.
-----Original Message-----
From: Honza Fiala [mailto:fala(zv)imc(tec)cz]
Sent: Monday, February 15, 1999 12:12 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Cestina do delphi
Zdarte,
potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi hlavne
o tlacitka a standartni dialogy(showmessage..., report preview). Poradte mi
jak na to.
Dik Honza Fiala
UPPER
[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 15.2.1999 13:46:32
Ahojte,
chtel bych, aby fungoval tento vyraz:
if Pos(UPPER(Hledan),UPPER(Table1.FieldValues['PRIDELE'])) > 0 ......
Prekladac hulaka, ze UPPER nezna.
Ve kterem DCU je tato fce, nebo jak mam provest, aby mi vyhledal retezec,
aniz bych vedel zda je psan
malymi nebo velkymi pismeny.
Diky
Petr
UPPER
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 15.2.1999 14:00:38
Asi myslis UpperCase
Upper bylo ve foxce :-))
Radim
-----P�vodn� zpr�va-----
Od: Petr S <p.sadovsky(zv)atlas(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 13:50
P�edm�t: UPPER
>Ahojte,
>
> chtel bych, aby fungoval tento vyraz:
>
> if Pos(UPPER(Hledan),UPPER(Table1.FieldValues['PRIDELE'])) > 0 ......
>
>Prekladac hulaka, ze UPPER nezna.
>Ve kterem DCU je tato fce, nebo jak mam provest, aby mi vyhledal retezec,
>aniz bych vedel zda je psan
>malymi nebo velkymi pismeny.
>
>Diky
>
>Petr
>UPPER
[*] Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz> - 15.2.1999 14:07:36
Petr S wrote:
> Ahojte,
>
> chtel bych, aby fungoval tento vyraz:
>
> if Pos(UPPER(Hledan),UPPER(Table1.FieldValues['PRIDELE'])) > 0 ......
>
> Prekladac hulaka, ze UPPER nezna.
> Ve kterem DCU je tato fce, nebo jak mam provest, aby mi vyhledal retezec,
> aniz bych vedel zda je psan
> malymi nebo velkymi pismeny.
>
> Diky
>
> Petr
Tak z helpu:
StrUpper returns a string in upper case.
Unit SysUtils
Category string handling routines (null-terminated)
function StrUpper(Str: PChar): PChar;
Description
The StrUpper functionAnsiUpperCase converts a string to upper case.
Nebo (pro cesky naspane retezce):
AnsiUpperCase converts a string to upper case.
Unit SysUtils
Category string handling routines
function AnsiUpperCase(const S: string): string;
Description
AnsiUpperCase converts all characters in the given string to upper case. The
conversion uses the current Windows locale.
Note
This function supports multi-byte character sets (MBCS).
--
<TT>
/* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
/* xcibulka(zv)hwlab.felk.cvut(tec)cz */
/* KCibulka(zv)seznam(tec)cz */
/* ardour(zv)usa.net */
/* OnLine: If you have ICQ my ICQ# is 4111110. */
/* If you don't have ICQ you can page me through: My Personal */
/* Communication Center: http://wwp.mirabilis.com/4111110 */
/* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
/* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
/* Msgs with word "SMS:" in subject will be sent to my GSM phone */
</TT>
IKONY
[*] BRAIN and HEART <mozek2(zv)iol(tec)cz> - 15.2.1999 14:08:23
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Ahoj
hled�m zaj�mav� ikony.
32x32 pixels
20x10 pixels
16x16 pixels
Sou�asn� pokud n�kdo pot�ebuje zaj�mav� ikony do sv�ch aplikac� mohu na po��d�n� zaslat.
D�ky Ji�� Jurka
Problem pri seriove komunikaci
[*] SPELZA s.r.o. <spelzasro(zv)brno(tec)comp(tec)cz> - 15.2.1999 14:25:50
Hi,
mam opet jeden problem pri seriove komunikaci ve W95.
V D4 potrebuji pomoci AsyncPro obslouzit externi zarizeni s
nasledujicim jednoduchym protokolem. Zarizeni vysle znak a po
potvrzeni od PC vysle dalsi znak, atd. To by samo o sobe nebyl
problem ale presto mam jeden zadrhel - zarizeni potrebuje dostat
odpoved do 3s.
Vlastni obsluhu mam ale dostavam se do situace, kdy nestiham
v case 3s odpovedet. Ve standardnich situacich je to OK, ale mam na siti
jednu aplikaci (cizi), ktera mi pri svem spusteni zpusobi
oddaleni odpovedi. To oddaleni (mam dojem) je zpusobeno casovou prodlevou
mezi vlastnim prerusenim od prijateho znaku
a zpracovanim eventu aplikaci.
AsyncPro pouzivam pomerne kratkou dobu a je proto mozne, ze delam neco blbe
ale vyzkousel jsem co jsem mohl. Da se nejak docilit
toho aby aplikace odpovedela hned pri preruseni a ne az pri OnTriggerAvail?
Pokud bude nutno napsat vlastni driver
nevite o nekom kdo je toho schopen?
Diky, Jarek.
Cestina do delphi
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 15.2.1999 14:27:53
Zdravicko...
Mohu poslat pocesteny consts.pas. Predelaval jsem ho ze zde jiz
nabizeneho consts.pas pro D3, jen jsem pridal chybejici hlasky, ktere
jsem vsak neprekladal (neni jich moc). Zakladni veci, jako jsou treba
tebou zminovane dialogy, jsou vsak pocesteny.
F.
> -----P�vodn� zpr�va-----
> Od: Honza Fiala [SMTP:fala(zv)imc(tec)cz]
> Odesl�no: 15. �nora 1999 12:12
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Cestina do delphi
>
> Zdarte,
> potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi
> hlavne
> o tlacitka a standartni dialogy(showmessage..., report preview).
> Poradte mi
> jak na to.
>
> Dik Honza Fiala
Query - zobrazeni v DBGridu (desetina mista).
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 15.2.1999 14:28:41
Zkusil bych
(Grid.Columns[2].Field As TFloatField).DisplayFormat := '0.0000';
To je pro styri des.. mista.
Upozornuji, ze jsem nezkousel, nemam zrovna nahodou po ruce
DELPHI.
Date sent: Fri, 12 Feb 1999 11:57:48 +0100
From: "Ji�� Toman" <jiri.toman(zv)seznam(tec)cz>
Organization: PL Bohnice
To: delphi-l(zv)fwd(tec)cz
Subject: Query - zobrazeni v DBGridu (desetina mista).
Send reply to: delphi-l(zv)fwd(tec)cz
> Ahoj vsichni !!
>
> Prosim o radu s timto problemem.
>
> Dynamicky provadim SQL dotaz v D4 na DB Paradox, kde pocitam nejake
> polozky. Vysledek se mi zobrazi v DBGridu, ale ma moc desetinych
> mist. Potreboval bych, aby mel pouze dve. Nazev polozek v DBGridu
> je pokazdy jiny. Myslel jsem na neco jako:
> DBGrid1.Colums[2] ... a neco ,ale nevim co ????
>
> Nasel jsem taky Display Format, ale nevim jak pouzit v mem pripade.
>
> Dik za kazdou dobrou radu.
> Cau Jiri Toman
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Zakazani pohybu okna
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 15.2.1999 14:34:01
Ja to resil v obsluze udalosti OnResize. I kdyz to dle nazvu
nevypada tak se spousti i pri pohybu nejen pri zmene velikosti.
From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>
To: delphi-l(zv)fwd(tec)cz
Date sent: Mon, 15 Feb 1999 09:13:03 +0000
Subject: Zakazani pohybu okna
Send reply to: delphi-l(zv)fwd(tec)cz
> Preji vsem pekneho dne,
>
> lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
>
> Diky
>
> Slavek
>
> ----------------------------------------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------------------------------------
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Cestina do delphi
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 15.2.1999 14:37:19
Kup si lokalizator na www.localizator.com
From: "Honza Fiala" <fala(zv)imc(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Subject: Cestina do delphi
Date sent: Mon, 15 Feb 1999 12:12:28 +0100
Send reply to: delphi-l(zv)fwd(tec)cz
> Zdarte,
> potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi hlavne
> o tlacitka a standartni dialogy(showmessage..., report preview). Poradte mi
> jak na to.
>
> Dik Honza Fiala
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Zakazani pohybu okna
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.2.1999 15:01:40
> > lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
Taky by slo nastavit BorderStyle na NONE.
==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================Cestina do delphi
[*] Doller.Jozef(zv)zsr.sk - 15.2.1999 15:20:11
Toto by ma velmi zaujimalo.
Poslite aj mne please ...
> Jozef Doller
> �SR Stredisko informatiky, Kov��ska 3, 832 06 Bratislava
> tel.: 07 / 5058 5431
> mailto:doller(zv)zsr.sk
>
Co by sme tak este mohli pre Vas urobit...> -----P�vodn� zpr�va-----
> Od: milank(zv)gratex.sk [SMTP:milank(zv)gratex.sk]
> Odesl�no: 15. �nora 1999 13:46
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Cestina do delphi
>
> Ak chce� a to sa t�ka v�etk�ch, kto m� z�ujem existuju tzv
> multilangue.contants, ktor� sa pridaj� do projektu ako ktor�ko�vek �a��ia
> forma a pri kompilovan� sa nahradia v�etky �tandartn� texty buttonov a msg
> ... a v�etko �o si prep�e� pr�slu�n�m jazykom. Prep�sa� si to do �e�tiny
> by
> pre nikoho v notepade nemal by� probl�m.Z�kladn� hl�ky som nechal v
> angli�tine a tie, ktor� sa objavuj� u��vate�ovi som prep�sal do
> sloven�iny.(hinty navig�toru, buttony a message). Potom e�te doporu�ujem
> prep�sa� dfm s�bor pre Quick report a v celom programe sa neobjavi ani
> jedna
> cudzojazy�n� hl�ka. Je toho v�ak 50k preto to nemienim posla� do
> konferencie, ale len na priv�tny mail.
> UPPER
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 15.2.1999 15:21:49
Pouzij funkci UpperCase a ne jen Upper to je jen v SQL.
a nebo uplne nejplepe API funkci CharUpper, ktera dokonce
pracuje spravne i pro cestinu. Na rozdil od UpperCase.
From: "Petr S" <<p.sadovsky(zv)atlas(tec)cz<bold>>
To: <<delphi-l(zv)fwd(tec)cz></bold>
Subject: UPPER
Date sent: Mon, 15 Feb 1999 13:46:32 +0100
Send reply to: delphi-l(zv)fwd(tec)cz
<color><param>7F00,0000,0000</param>> Ahojte,
>
> chtel bych, aby fungoval tento vyraz:
>
> if Pos(UPPER(Hledan),UPPER(Table1.FieldValues['PRIDELE'])) > 0 ......
>
> Prekladac hulaka, ze UPPER nezna.
> Ve kterem DCU je tato fce, nebo jak mam provest, aby mi vyhledal retezec,
> aniz bych vedel zda je psan
> malymi nebo velkymi pismeny.
>
> Diky
>
> Petr
>
>
<nofill>
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
UPPER
[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 15.2.1999 15:47:00
Petr
p.sadovsky(zv)atlas(tec)cz
-----P�vodn� zpr�va-----
Od: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 15:33
P�edm�t: Re: UPPER
>Asi myslis UpperCase
>
>Upper bylo ve foxce :-))
Jo vim, ale nasel jsem v helpu v indexu pod heslem Upper function, ale byl
tam priklad pro select
select * from neco where UPPER(text) like UPPER(neco.fieldValues[field])
Zkuste se mrknout.
>
>Radim
>
>-----P�vodn� zpr�va-----
>Od: Petr S <p.sadovsky(zv)atlas(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 15. �nora 1999 13:50
>P�edm�t: UPPER
>
>
>>Ahojte,
>>
>> chtel bych, aby fungoval tento vyraz:
>>
>> if Pos(UPPER(Hledan),UPPER(Table1.FieldValues['PRIDELE'])) > 0
......
>>
>>Prekladac hulaka, ze UPPER nezna.
>>Ve kterem DCU je tato fce, nebo jak mam provest, aby mi vyhledal retezec,
>>aniz bych vedel zda je psan
>>malymi nebo velkymi pismeny.
>>
>>Diky
>>
>>Petr
>>
>
>
RichEdit
[*] Ale� Kle�ka - 15.2.1999 17:02:31
Ahoj, ahoj,
nev�te n�hodou n�kdo, jak vlo�it do RichEditu n�co na zp�sob PageBreak
???
M�m toti� naselektov�no spoustu z�znam�, kter� zobrazuji v RichEditu a
kter� si u�ivatel podle pot�eby m��e prohl�et, ulo�it do souboru nebo
vytisknout. Z�znamy jsou ur�it�m zp�sobem 'goupov�ny', ka�d� grupa za��n�
headrem a j� pot�ebuji aby header za��nal v�dy na nov� str�nce a n�jak se mi
to neda�� prov�st.
Kdyby n�kdo n�hodou tu�il jak na to, tak budu velmi vd��n� ( i za tip ).
D�ky p�edem
Ale� Kle�ka
{ a.klecka(zv)email(tec)cz }Tisk ze starych Dos aplikaci
[*] iko(zv)kamarad(tec)cz - 15.2.1999 17:16:58
Podobny program som pred casom robil, ale pre DOS v Pascale.
Nebol by ale problem to prepisat do Delphi. Staci tam len previest
znaky do laserovej tabulky.
> Caute mam zas problem
>
> Mam Dos Aplikaci ktera tiskne v latin2 na jehlickovce klasickej font s
> jednotnou velikosti pro kazdy znak a rameckuje taky pres znaky, potrebuju
> aby bezela pod woknama a tiskla na Laserovou tisk�rnu
>
> nen� nejaky program ktery by tyto znaky v Latin2 prevedl pro laserovou
> tisk�rnu ve woknech?
> aby netiskla patvary
>
> dik Sopak
>
IKO
ikino(zv)pobox.sk
http://freeweb.coco(tec)cz/IKO
Cestina do delphi
[*] Honza Fiala <fala(zv)imc(tec)cz> - 15.2.1999 17:35:15
Posli mi to prosim. Doufam, ze to bude kompaktibilni s D4
Dik Honza Fiala
-----P�vodn� zpr�va-----
Od: Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 15:46
P�edm�t: RE: Cestina do delphi
Zdravicko...
Mohu poslat pocesteny consts.pas. Predelaval jsem ho ze zde jiz
nabizeneho consts.pas pro D3, jen jsem pridal chybejici hlasky, ktere
jsem vsak neprekladal (neni jich moc). Zakladni veci, jako jsou treba
tebou zminovane dialogy, jsou vsak pocesteny.
F.
> -----P�vodn� zpr�va-----
> Od: Honza Fiala [SMTP:fala(zv)imc(tec)cz]
> Odesl�no: 15. �nora 1999 12:12
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Cestina do delphi
>
> Zdarte,
> potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi
> hlavne
> o tlacitka a standartni dialogy(showmessage..., report preview).
> Poradte mi
> jak na to.
>
> Dik Honza Fiala
Cestina do delphi
[*] Honza Fiala <fala(zv)imc(tec)cz> - 15.2.1999 17:36:02
Posli mi to prosim.
Dik Honza Fiala
-----P�vodn� zpr�va-----
Od: milank(zv)gratex.sk <milank(zv)gratex.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 15:25
P�edm�t: RE: Cestina do delphi
Ak chce� a to sa t�ka v�etk�ch, kto m� z�ujem existuju tzv
multilangue.contants, ktor� sa pridaj� do projektu ako ktor�ko�vek �a��ia
forma a pri kompilovan� sa nahradia v�etky �tandartn� texty buttonov a msg
... a v�etko �o si prep�e� pr�slu�n�m jazykom. Prep�sa� si to do �e�tiny by
pre nikoho v notepade nemal by� probl�m.Z�kladn� hl�ky som nechal v
angli�tine a tie, ktor� sa objavuj� u��vate�ovi som prep�sal do
sloven�iny.(hinty navig�toru, buttony a message). Potom e�te doporu�ujem
prep�sa� dfm s�bor pre Quick report a v celom programe sa neobjavi ani jedna
cudzojazy�n� hl�ka. Je toho v�ak 50k preto to nemienim posla� do
konferencie, ale len na priv�tny mail.
-----Original Message-----
From: Honza Fiala [mailto:fala(zv)imc(tec)cz]
Sent: Monday, February 15, 1999 12:12 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Cestina do delphi
Zdarte,
potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi hlavne
o tlacitka a standartni dialogy(showmessage..., report preview). Poradte mi
jak na to.
Dik Honza Fiala
Copy na SQL serveru
[*] Milevsk� software, s.r.o. <milesoft(zv)mi.cesnet(tec)cz> - 15.2.1999 17:46:13
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Prosim o radu
Mam MSSQL server;
Potreboval bych presunout data z tabulek jedne DB do druhe DB.
Udelal jsem Batch move na copy - dobre;
Problem nastava, kdyz je cilova table rozsirena o field:
tento field je sproste smazan!!
Pokud jsem udelam Batch move na update,
padalo to na nastaveni identity.
At ji nastavi na On nebo OFF, stale to rve, ze je
na ON nastavena.
Jestli mate nejaky napad nebo udelatko, jak
tento problem vyresit, prosim napiste.
Diky moc!
treeView- color -Konec
[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 15.2.1999 19:27:12
-----P�vodn� zpr�va-----
Od: Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. �nora 1999 21:20
P�edm�t: Re: treeView- color
>Nepochopil jsem, co presne chces, ale s barvami v TreeView
>si muzes hrat treba takhle:
>
>procedure TFormStrom.TreeView1CustomDrawItem(Sender: TCustomTreeView;
> Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
Ahoj
pochopeno vyborne, bohuzel se asi bavime kazdy o jine verzi Delphi.
Mam D3 a o teto udalosti tam eni ani vidu.
Diky
Jiri Heinisch
Delphi 3 ve Windows NT 4.0
[*] Mgr. Jan Sluka <snipe(zv)mail.cybernet(tec)cz> - 15.2.1999 19:49:15
Dobry den,
prosel jsem archiv a nemohl jsem najit nikde odpoved na
nasledujici problem.
Presel jsem z Win95 na WinNT 4.0. Delphi 3.0 normalne nainstaluji
, pokud vsak chci pracovat s helpem, Delphi hlasi, ze nemuze
nalezt soubor delphi3.hlp.
Nevite v cem je problem?
S pozdravem Mgr. Jan Sluka, snipe(zv)mail.cybernet(tec)cz
OffTopic - nova verze helpu???
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.2.1999 20:03:34
V tom helpu aby se pra*e vyznalo ;-)))
http://www.amenit(tec)cz/DelphiHelp.jpg
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
dbf - delete
[*] profia(zv)atlas(tec)cz - 15.2.1999 20:28:51
Mam tu dalsi problemek.
Soubor dbf , pro vymazani vsech jeho zaznamu pouziji
For i:=1 to Pocet zaznamu do
begin
Table1.Delete;
end;
Po provedeni se zda ze je soubor prazdny. ALE u nekterych souboru se stane ze pri pridani noveho zaznamu
je v dbf opravdu jen jeden zaznam ale ma poradove cislo 4856 :) a taky ma ten PRAZDNY soubor 6 MB . Diky za radu.Table.Recno
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.2.1999 20:29:28
Jiri Heinisch wrote:
> Pri zapnute filtraci ukazuje tato funkce poradi vety puvodni tj. v tabulce
> bez filtrace
> dela to jen me nebo to ma na triku INPRISE.
Dela to standardne :-( a mam pocit ze za to muze BDE.
> Vi nekdo jak tomu zamezit.
Jo, treba pouzit jine komponenty pro pristup k databazi.
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Zmena fontu
[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 15.2.1999 20:59:51
>> > Ahoj
>> >
>> > Jde programove zmenit font u komponenty TListView pro vlastnost
Petr Vones wrote
>Nepises jakou mas verzi Delphi, v D4 mas primo udalosti
TListView.OnCustomDrawXXX.
>Pro starsi verze muzes pouzit komponentu TEnhListView ktera je tady:
>http://www.tda(tec)cz/vita/delkom.htm
Ahoj
Mam D3 , komponentu jsem stahnul, je to dobry, ale
ja bych potreboval font pro Caption a dalsi pro SubItems
tj. 2 fonty v jednom radku
a komponenta podporuje pouze jeden
S pozdravem a diky
Jiri Heinisch
Kdo si stahne; potesi mne i sebe
http://www.mujweb(tec)cz/www/heinisch/download
H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec
Copy na SQL serveru
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.2.1999 21:00:08
Sice to neni zrovna user-friendly, ale da se pouzit BCP.EXE z utilit k
SQL serveru (Bulk Copy). Je to sice promptacka hracicka, ale zase je to
asi nejrychlejsi zpusob, jak do SQl serveru nasypat data nejrychleji. A
resi to i identity.
Mac
"Milevsk� software, s.r.o." wrote:
> Prosim o raduMam MSSQL server;Potreboval bych presunout data z
> tabulek jedne DB do druhe DB.Udelal jsem Batch move na copy -
> dobre;Problem nastava, kdyz je cilova table rozsirena o field:tento
> field je sproste smazan!!Pokud jsem udelam Batch move na update,padalo
> to na nastaveni identity.At ji nastavi na On nebo OFF, stale to rve,
> ze jena ON nastavena.Jestli mate nejaky napad nebo udelatko, jaktento
> problem vyresit, prosim napiste.Diky moc!
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
dbf - delete
[*] Lubomir Bulej <pallas(zv)kadan(tec)cz> - 15.2.1999 21:11:08 -0100
Hi,> Po provedeni se zda ze je soubor prazdny. ALE u nekterych souboru se stane
> ze pri pridani noveho zaznamu
> je v dbf opravdu jen jeden zaznam ale ma poradove cislo 4856 :) a taky ma
> ten PRAZDNY soubor 6 MB . Diky za radu.
:) Neporadim ti presne, spis ti reknu co bys mel hledat :) Vetsina
databazovych
stroju polozky nemaze fyzicky, ale pouze logicky, aby nemusela delat sileny
aktualizace souboru. Casto ani neresetuji identifikacni cisla objektu.
Takze ty hledas neco, co se v SQL dela pomoci "VACUUM", a pokud si vzpominam
na starou dobrou Foxku, tak tam se to snad delalo prikazem "ZAP" - dojde k
fyzickemu zruseni polozek a aktualizaci souboru ...
Takze hledej metodu, ktera neco takoveho poskytuje :) Bejva to az na urovni
databaze, ne jednotlivych tabulek...
Lubos
Kompresia *.exe
[*] BoboX <bobox(zv)atlas(tec)cz> - 15.2.1999 21:25:58
Zdar,
tak som ho stiahol a musim povedat, ze je perfektny
a ani ta rychlost nieje najhorsia.
Dik za tip, cau.
--
BoboX
bobox(zv)atlas(tec)cz
Europa
>Napr. ASPack na www.alenka.spb.ru/aspack , je to freeware for
>noncommercial use
>Zatim se mi osvedcuje, neni sice nijak zvlast rychly, ale aplikaci
>napsanou pod D4 stlaci ze 788 480 B na 243712B, coz je docela slusne.
>
>Zdar Mira
>
Zakazani pohybu okna
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 22:29:41
"Zden�k Moravec" wrote:
>
> >lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
>
> Slo by pri FromCreate si zapamatovat pozici (SaveTop := Top; SaveLeft := Left atd.)
>
> Pak do procedur OnMove nebo OnResize dat Top := SaveTop; Left := SaveLeft
> Width := SaveWidth; Height := SaveHeight atd.
Ahoj,
Da se to vyresit treba takhle:
procedure TForm1.FormCreate(Sender: TObject);
begin
DeleteMenu(GetSystemMenu(Handle, False), SC_MOVE, MF_BYCOMMAND);
end;
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
Interrupt COM
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 22:43:20
Viliam Mlich wrote:
>
> Hello Daniel!
>
> 12. �nora 1999 Daniel Kminek wrote:
>
> > Jak to udelat, aby pri preruseni ( prijmu znaku) na COMu vznikla
> > udalost, kterou ja bych obslouzil ihned
>
> Prerusenie a prijem znaku na COM nie je to iste. Porty 16550 maju na
> vstupe buffer na 16 byte a da sa nastavit, po prijati kolkych znakov
> ma prerusit: najcastejsie sa dava 8, t.j. az po prijati 8-eho znaku
> zacne ziadat o prerusenie. Nez to dojde k obsluhe interruptu do
> COMM.DRV, stihne sa prijat este dalsich az 6 znakov, hlavne ked je to
> pod Windows.
Ono zalezi na nastaveni rezimu FIFO, kdyz se podivas do datasheetu k
obvodum rady 16550 tak zjistis, ze tech moznosti je tam vic nez nabizi
nastaveni v dialogu ve Windows.
> Preto driver znaky iba prijme do buffera a vystavi semafor, ze doslo
> k zmene. Pre samotne spracovanie v aplikacii Delphi uz je uplne
> jedno, ci sa na stav portu dotazujes periodicky v nejakom timeri,
> alebo to nechas ako event na dispecing. Este mozes vytvorit
> samostatny thread, ale efekt moze byt uplne opacny: sice sa reakcia
> na 1 prijaty znak sotva meratelne zlepsi, ale vsetko ostatne sa
> citelne spomali.
S tim nelze souhlasit, pouziti timeru na sledovani udalosti z COMU je
podle me naprosta prasarna. Win32 API poskytuje pomerne slusny zpusob
k obsluhovani seriove komunikace, typicky staci jeden samostatny thread
na cekani na tyto udalosti pomoci WaitCommEvent. Neni zde ani duvod aby
se vse ostatni nejak vyrazne spomalilo, vzdyt vetsinu casu se v threadu
"na neco ceka". Jedinym problemem pak muze byt nevhodna reakce na tyto
udalosti, ale to uz je zase jiny problem.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
Problem pri seriove komunikaci
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 22:48:38
"SPELZA s.r.o." wrote:
>
> Hi,
>
> mam opet jeden problem pri seriove komunikaci ve W95.
> V D4 potrebuji pomoci AsyncPro obslouzit externi zarizeni s
> nasledujicim jednoduchym protokolem. Zarizeni vysle znak a po
> potvrzeni od PC vysle dalsi znak, atd. To by samo o sobe nebyl
> problem ale presto mam jeden zadrhel - zarizeni potrebuje dostat
> odpoved do 3s.
Ahoj,
To by nemel byt obecne takovy problem, ale uznvam ze v AsyncPro s tim muzes
mit potize. Kdysi jsem potreboval neco podobneho, odpoved do 400ms za kazdych
okolnosti (uz jsem to tu v konferenci popisoval) a nakonec bylo jedine reseni
to napsat cele od zacatku bez AsyncPro.
Tyto problemy me vedly k tomu napsat nejakou jednodussi knihovnu pro seriovou
komunikaci, uz jsem to tu nekolikrat sliboval :-) ale ted v ramci Delphree to
vypada pomerne nadejne. Prvni betaverze zakladni komunikace by mohla byt nekdy
koncem tohoto tydne. Necekej od toho takovy balik jako AsyncPro, ale melo by
to resit tyto situace. Zakladni jadro komunikace nebude odvozeno od TComponent,
ale primo od TObject, takze si potom budes moct napsat ruzne komponenty. Budu
rad, kdyz se co nejvice lidi zapoji do testovani.
> Vlastni obsluhu mam ale dostavam se do situace, kdy nestiham
> v case 3s odpovedet. Ve standardnich situacich je to OK, ale mam na siti
> jednu aplikaci (cizi), ktera mi pri svem spusteni zpusobi
> oddaleni odpovedi. To oddaleni (mam dojem) je zpusobeno casovou prodlevou
> mezi vlastnim prerusenim od prijateho znaku
> a zpracovanim eventu aplikaci.
Tvuj dojem je naprosto spravny, vsechny udalosti v AsycnPro jsou synchronizovane
s hlavnim threadem VCL, takze odpovedi mohou byt diky tomu nekdy velmi zpozdene.
> AsyncPro pouzivam pomerne kratkou dobu a je proto mozne, ze delam neco blbe
> ale vyzkousel jsem co jsem mohl. Da se nejak docilit
> toho aby aplikace odpovedela hned pri preruseni a ne az pri OnTriggerAvail?
V AsyncPro asi tezko (mam verzi 2.11, nevim jak je tomu ve vyssich). Vychazi
to z celkove koncepce "maximalni snadnosti" vyvoje, cenou za toto je vsak
jista nepruznost v mene standartnich situacich.
> Pokud bude nutno napsat vlastni driver
> nevite o nekom kdo je toho schopen?
Vlastni driver neni treba, seriova komunikace je ve Win32 API podporovana
pomerne dobre, problemy jsou spise s tim balastem ktery stoji mezi API a
tvoji aplikaci.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
dbf - delete
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 23:01:37
> profia(zv)atlas(tec)cz wrote:
>
> Mam tu dalsi problemek.
>
> Soubor dbf , pro vymazani vsech jeho zaznamu pouziji
>
> For i:=1 to Pocet_zaznamu do
> begin
> Table1.Delete;
> end;
>
> Po provedeni se zda ze je soubor prazdny. ALE u nekterych souboru se stane ze pri pridani
> noveho zaznamu
> je v dbf opravdu jen jeden zaznam ale ma poradove cislo 4856 :) a taky ma ten PRAZDNY
> soubor 6 MB . Diky za radu.
Ahoj,
Pouzij metodu TTable.EmptyTable
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
Zahadne vypadky pri seriove komunikaci
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 23:03:51
Ahoj,
Dnes jsem se opet asi po roce nachytal :-) na jednu vec ktera se mi jiz drive
objevila. Tyka se to "zahadnych" vypadku (CE_OVERRUN) pri seriove komunikaci
na nekterych pocitacich. Problem je v chybnem driveru videokaret. Ta spojitost
mozna vypada podivne, ale mam to jiz overene na ctyrech rozdilnych pocitacich.
Jedna se o videokarty S3Trio64V2 pouzivane se starsimi drivery (ty co jsou
dodavany s Windows je naprosto nepouzitelne, ale to plati obecne). Chyba se
neprojevuje ve verzich 2.30.30 a vyssich, lze stahnout na - http://www.s3.com
Takze az budete pul dne hledat chybu ve vlastnim programu, tak se predtim
podivejte jestli nemate zrovna tuto videokartu se starym driverem ... :-))
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
RichEdit
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.2.1999 23:12:22
Ale� Kle�ka wrote:
>
> Ahoj, ahoj,
>
> nev�te n�hodou n�kdo, jak vlo�it do RichEditu n�co na zp�sob PageBreak
> ???
>
> M�m toti� naselektov�no spoustu z�znam�, kter� zobrazuji v RichEditu a
> kter� si u�ivatel podle pot�eby m��e prohl�et, ulo�it do souboru nebo
> vytisknout. Z�znamy jsou ur�it�m zp�sobem 'goupov�ny', ka�d� grupa za��n�
> headrem a j� pot�ebuji aby header za��nal v�dy na nov� str�nce a n�jak se mi
> to neda�� prov�st.
>
> Kdyby n�kdo n�hodou tu�il jak na to, tak budu velmi vd��n� ( i za tip ).
Ahoj,
Bohuzel, RichEdit neumi pagebreak, viz odkaz:
http://www.inprise.com/devsupport/delphi/qanda/780.html
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************
Delphi 3 & NT 4.0
[*] Mgr. Jan Sluka <snipe(zv)mail.cybernet(tec)cz> - 15.2.1999 23:28:18
Dobry den,
prosel jsem archiv a nemohl jsem najit nikde odpoved na
nasledujici problem.
Presel jsem z Win95 na WinNT 4.0. Delphi 3.0 normalne nainstaluji
, pokud vsak chci pracovat s helpem, Delphi hlasi, ze nemuze
nalezt soubor delphi3.hlp.
Nevite v cem je problem?
S pozdravem Mgr. Jan Sluka, snipe(zv)mail.cybernet(tec)cz
dbf - delete
[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 15.2.1999 23:49:19
Cau,
Nemam to sice vyzkouseny, ale zkus misto toho TTable.EmptyTable.
Tomas
tomas(zv)cobra(tec)cz
-----P�vodn� zpr�va-----
Od: profia(zv)atlas(tec)cz <profia(zv)atlas(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. �nora 1999 21:09
P�edm�t: dbf - delete
Mam tu dalsi problemek.
Soubor dbf , pro vymazani vsech jeho zaznamu pouziji
For i:=1 to Pocet zaznamu do
begin
Table1.Delete;
end;
Po provedeni se zda ze je soubor prazdny. ALE u nekterych souboru se stane ze pri pridani noveho zaznamu
je v dbf opravdu jen jeden zaznam ale ma poradove cislo 4856 :) a taky ma ten PRAZDNY soubor 6 MB . Diky za radu.Pripojeni k Internetu
[*] rsoucekk(zv)email(tec)cz - 15.2.1999 23:57:23
Ahoj
Nevite nekdo, jak ve Windows programove
menit/nastavovat pripojeni k Internetu-
jake telefonicke pripojeni pouzivat, kolikrat
se pokouset pripojit k siti, za jak dlouho
se odpojit apod. Neco jako v IE v menu
moznosti/pripojeni a to pokud mozno bez
nutnosti mit IE naistalovan.
Predem dik za jakykoli podnet. Radek
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Cestina do delphi
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 16.2.1999 06:48:13
Honza Fiala wrote:
> potreboval bych pocestit programy prekompilovane v D4s. Jedna se mi
> hlavne
> o tlacitka a standartni dialogy(showmessage..., report preview). Poradte
> mi jak na to.
>
Nejlepe to zvlada Jazykovy Lokalizator. Je u toho i slovnik
prelozenych vyrazu, takze to preklada automaticky. Tisice
dekovnych dopisu. :-)
Pro zajimavost ohlasuji: nova verze, ktera se ted testuje, bude
umet prevadet reverzne slovniky - t.j. napr. z anglicko-ceskeho
bude mozne vyrobit cesko-anglicky. Pro uzivatele stavajicich verzi
bude upgrade zdarma.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
UPPER
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 16.2.1999 06:48:13
Tomas Balusek wrote:
> Zkus Uppercase :)
>
Uz se to tu sice objevilo, ale asi bude lepsi to napsat cesky.
UpperCase prehodi na velka pismena pouze znaky z dolnich 127
bajtu. AnsiUpperCase zvetsi i ceske znaky.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Problem pri seriove komunikaci
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 16.2.1999 06:48:13
Ahoj,
na tohle se tezko odpovida, kdyz neni videt zdrojak, a jak je
nastaven ComPort.
Podle mych zkusenosti je 3 vteriny dostatek casu, OnTriggerAvail
je volane dost rychle. Ja zpravidla musim odpovedet do 100 ms a v
drtive vetsine pripadu to v pohode stiham, i kdyz si nekdo masti
neco treba ve Wordu.
Pokud to zjevne brzdi cizi aplikace, dal bych si jako
technologickou podminku nespousteni te aplikace. Muze se totiz
stat, ze on aplikace si nastavi nejvyssi prioritu a ostatni programy
necha cekat.
SPELZA s.r.o. wrote:
> mam opet jeden problem pri seriove komunikaci ve W95.
> V D4 potrebuji pomoci AsyncPro obslouzit externi zarizeni s
> nasledujicim jednoduchym protokolem. Zarizeni vysle znak a po
> potvrzeni od PC vysle dalsi znak, atd. To by samo o sobe nebyl
> problem ale presto mam jeden zadrhel - zarizeni potrebuje dostat
> odpoved do 3s.
>
> Vlastni obsluhu mam ale dostavam se do situace, kdy nestiham
> v case 3s odpovedet. Ve standardnich situacich je to OK, ale mam na siti
> jednu aplikaci (cizi), ktera mi pri svem spusteni zpusobi oddaleni
> odpovedi. To oddaleni (mam dojem) je zpusobeno casovou prodlevou mezi
> vlastnim prerusenim od prijateho znaku a zpracovanim eventu aplikaci.
>
> AsyncPro pouzivam pomerne kratkou dobu a je proto mozne, ze delam neco
> blbe ale vyzkousel jsem co jsem mohl. Da se nejak docilit toho aby
> aplikace odpovedela hned pri preruseni a ne az pri OnTriggerAvail? Pokud
> bude nutno napsat vlastni driver nevite o nekom kdo je toho schopen?
>
> Diky, Jarek.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
UPPER
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 16.2.1999 06:54:28
> >Upper bylo ve foxce :-))
>
> Jo vim, ale nasel jsem v helpu v indexu pod heslem Upper
> function, ale byl
> tam priklad pro select
>
> select * from neco where UPPER(text) like
> UPPER(neco.fieldValues[field])
> Zkuste se mrknout.
>
Odpovedel sis sam. Nasels tam priklad pro select.
To znamena, ze tu funkci ma SQL a neda se ocekavat,
ze stejna funkce bude i v jinem jazyce. Obdobu teto
funkce pro pascal ti uz poradili jini.
Pri hledani v helpu musis rozlisovat, ceho se
nalezene tema tyka a ne bezhlave pouzivat vsechno, co najdes.
BTW nebylo Ti divne, ze v pascalu nefunguje cely select, nejenom
jedna funkce?
Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!Problem pri seriove komunikaci
[*] Kosta <kosta(zv)iol(tec)cz> - 16.2.1999 07:25:45
-----P�vodn� zpr�va-----
Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 16. �nora 1999 6:56
P�edm�t: Re: Problem pri seriove komunikaci
>Podle mych zkusenosti je 3 vteriny dostatek casu, OnTriggerAvail
>je volane dost rychle. Ja zpravidla musim odpovedet do 100 ms a v
>drtive vetsine pripadu to v pohode stiham, i kdyz si nekdo masti
>neco treba ve Wordu.
>Pokud to zjevne brzdi cizi aplikace, dal bych si jako
>technologickou podminku nespousteni te aplikace. Muze se totiz
>stat, ze on aplikace si nastavi nejvyssi prioritu a ostatni programy
>necha cekat.
Neco podobneho jako CD Writer od HP???? Ten taky beha stoprocentne, ale
nesmi se delat
zaroven nic jineho (coko-li ).
Faktem zustava, ze podobne 'technologicky' podminenou aplikaci bych
nenasadil ani nahodou.
Kosta
------------------------------
kosta(zv)iol(tec)cz
0603 / 33 87 47
0602 / 20 31 75
------------------------------
SMTP - Off topic
[*] Robert Van�k <hugo(zv)kamarad(tec)cz> - 16.2.1999 07:30:20
Ahojte,
je uz sice pozde, ale slusna komponenta pro E-mail je SakEmail z DSP.
Pravda, trochu jsme si ji upravil, ale nic podstatneho.
Bob
DBF DELETE 2
[*] profia(zv)atlas(tec)cz - 16.2.1999 07:58:48
Vazeni, dekuji za rady ohledne smazani vsech zaznamu databaze pomoci TTable.EmptyTable
Jestlize dale popisovane skutecnosti jsou obecne zname, povazujte prosim tuto pripominku za bezpredmetnou :)
Pri uplatnovani rady jsem ale ucinil DOSTI ZNEPOKOJUJICI POZNATEK.
Dle mnou prozkoumanych situaci jsem zjistil ze v pripade smazani JEDNOHO zaznamu databaze pouzitim Table1.Delete je zaznam jakoby smazan ale velikost souboru zustava nadale STEJNA. Plati to jak na tabulky dbf tak i na Paradoxove.Pouze u Paradoxovych se zmeni poradove cislo zaznamu ale to jaksi nepomuze. Jestlize Table1.Delete je pouzivano dosti casto, narusta databaze do zajimavych rozmeru :)
Je tohle opravdu "normalni a znama" vec nebo delam neco spatne?
S Diky vsem profia(zv)seznam(tec)cz
Jeste k metode TTable.EmptyTable vse chodi ale na jedne databazi to hlasi Table is busy a samozrejmne neni nikde jinde otevrena :(