Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
IDE - paleta komponent "na patro"
[*] Miroslav Novosad <mirnov2(zv)seznam(tec)cz> - 26.3.2003 01:34:07
Ahoj,
nevite jak dosahnout viceradeho usporadani zalozek na palete komponent?
viz. http://home.arcor.de/groschh/timewatch/kopf.gif
Je na to nejake udelatko nebo jde o vymozenost vyssich verzi?
Miroslav Novosad
mirnov2(zv)seznam(tec)cz
Zjisteni Hwnd z PID procesu
[*] p.sestak(zv)corag.sk - 26.3.2003 16:26:09
Ta aplikacia bezi na desktope ale na inom, nie na beznom uzivatelskom
desktope.
Na takomto desktope spusta system sluzby a planovane joby. Preto sa asi
neda zistit jej hwnd.
U sluzby sa to da zrejme obist tak ze ju nastavime aby mohla mat
interakciu s
uzivatelskym desktopom. U planovanych jobov neviem.
p. sestak
JO, OKNO urcite ma, je to klasicka win32 aplikace.
Petr
> From: "EFG Developer" <developer(zv)efg(tec)cz>
> > hm, ale to okno neni videt, ani aplikace neni nikde jinde
> videt nez v
> > taskmanageru pod procesama, v podstate se divim, ze to funguje,
> > protoze to bezi bez desktopu (ihned po zapnuti PC (bez
> prihlaseni)),
> > ale bezi to.
>
> A ma ta aplikace vubec nejake okno ? Jinak neexistuje zadny
> 100%ni zpusob jak z PID ziskat HWND hlavniho okna.
>
> Petr Vones
>
>
StayOnTop aj nad fullscreen aplikaciami
[*] Mirko Zibolen ml. <mzibolen(zv)enelux.sk> - 26.3.2003 16:47:41
Dobry den prajem,
potreboval by som spravit okno, ktore by bolo naozaj "StayOnTop". Cize
aj v pripade fullscreen hier a podobne. Pripadne by stacil aspon
vykresleny obdlznicek v rohu s nejakou informaciou pre uzivatela.
Pomocou StayOnTop, resp.
SetWindowPos(handle,HWND_TOPMOST,left,top,width,Height,0);
to casto nefunguje.
Skusal som aj kreslenie na Canvas, ale sialene to blika, na striedacku
ho prekreslujem ja a ta druha aplikacia. Ani zvysenie priority procesu
nepomohlo. Rozmyslal som nad tym, ci by sa nedal nejako zamedzit pristup
do pamate grafickej karty (Page_noacces), ze by ziadna ina aplikacia
nemohla prekreslit napr. spodnych 20px obrazovky. Bohuzial, neviem to
spravit (VirtualProtect???).
Dakujem za kazdy navrh
Delphi-student Mirko Zibolen
Ztrata konektivity IB/FB podruhe
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 26.3.2003 16:03:35
> Byl by tu nekdo, kdo dokaze vyresit problem, ktery jsem popisoval v mailu
> dne 14.3. ?
Tohle me sice moc nepomuze,
> Odpovedi, ktere jsem zatim dostal byly jen domnenky, ktere bohuzel nefunguji
> v praxi.
> Pri odpadnuti konektivity, aby vse zase fungovalo normalne, musim zavrit
> celou aplikaci a zase ji spustit a to je dost nehezke reseni...
>
ale zkusim ti nastinit, co pouzivam.
Pokud se prerusi spojeni, je treba znovu otevrit VSECHNY transakce (tim padem i datasety).
Z toho co pises bych si tipnul, ze otevirani DB, pripadne otevirani datasetu se deje v OnCreate
tudiz v konstructoru.
Ja pouzivam techniku, ze mam na kazdem Formu, DataModulu proceduru InitModule, ta mi zajisti
inicializaci tohoto modulu.
Pri trose dobre vule, by stacilo pozit ForceClose a pak jen zavolat InitModule.
Jako detekci bych pouzil odchytavani Exception daneho typu (a hledat text tusim unavaliable database ...).
Slavek
FB a nastaveni Charset 1250
[*] <aldik(zv)quick(tec)cz> - 26.3.2003 15:44:43
>1. Nemazes nekde parametry spojeni po spusteni
aplikace a pak se
>pripojujes?
nemam mam to natvrdo, menim jen cestu k DB,takze
skrtame
>2.Mas presne ten update co ti neprojde aplikaci
nekde odchycenej
>(presne zneni SQL dotazu) a vis na 100% ze tento
dotaz kdyz zadas
>treba z IBConsole tak ti projde?
IBExpert mi spolkne vse...tady to nebude je to
prakticky vsude a je to po zmene charsetu na
1250, driv to nebylo....
>3. Mimo to ta chyba co popisujes muze byt i
preteceni. Napriklad do
>10znakove polozky se snazis ulozit 11znaku.
neni to preteceni....jak jsem rekl objevilo se mi
to vsude v aplikaci...>4. Mas nastaveny dialect 3?
ne, mam dialect 1
Jeste napad?
Jak je to vlastne s tim DEFAULTNIM nastaveni
charsetu u DB? Da se nejak zmenit???
Proste aby od jiste doby vsechny pri zalozeni
pole byly Win1250, me tam asi zustalo puvodni
nastaveni na DB a ted to nejak blbne i kdyz mam
vsechny charovy pole pretukanyyy;-))
zkusim jednu radu co jsem dostal,zalozim novou DB
s charsetem 1250 a preklopim data - vecer to
prubnu.....
PS:
Kde je nas HAJ HOU KDYZ HO POTREBUJEME???;-))))
Ales Pavel
Ztrata konektivity IB/FB podruhe
[*] <rdanhel(zv)centrum(tec)cz> - 26.3.2003 15:24:50
No me to bezproblemu funguje, ale je to postaveny na FIBPlus , demo na
to je primo u tech komponent takze z toho se to da opsat. Ale kolegovy
to funguje i na IBX, uz sem to tady jednou popisoval.
Jinak FIbplus muzes mit instalovane spolu s IBX, do zeli si nelezou.
______________________________________________________________
>> <<< 26. 3. 2003 14:41 - David Liska "konference(zv)thsoft(tec)cz" >>>> DL> Byl by tu nekdo, kdo dokaze vyresit problem, ktery jsem
popisoval v mailu
> DL> dne 14.3. ?> DL> Odpovedi, ktere jsem zatim dostal byly jen domnenky, ktere
bohuzel nefunguji
> DL> v praxi.> DL> Pri odpadnuti konektivity, aby vse zase fungovalo normalne,
musim zavrit
> DL> celou aplikaci a zase ji spustit a to je dost nehezke reseni...> > -------------------------------------------
> My answer:> ----------
> > Ja tiez sa pridam a budem len teoretizovat. Skus si pozriet ako to
> robi napr. FIB Plus, on tam ma event:> > TFIBLostConnectEvent=procedure(Database: TFIBDatabase; E: EFIBError;
var Actions: TOnLostConnectActions) of object;> > property OnLostConnect: TFIBLostConnectEvent;> > Description
> > The OnLostConnect event occurs after a lost of connection to a
database.> > a metodu:> > procedure RestoreConnect(Sender: TObject);> > Description
> > Call the RestoreConnect method to try to restore a connection to a
database.> In the case of a successful connection the AfterRestoreConnect event
occurs,> in the case of an error connection the OnErrorRestoreConnect event
occurs.> > > PS: Ja som to este neskusal, lebo zatial tiez mastim IBX, ale
uvazujem
> o prechode na FIB+.> > -- > Best regards, TRoland
>
>
Zjisteni Hwnd z PID procesu
[*] EFG Developer <developer(zv)efg(tec)cz> - 26.3.2003 14:56:14
JO, OKNO urcite ma, je to klasicka win32 aplikace.
Petr
> From: "EFG Developer" <developer(zv)efg(tec)cz>
> > hm, ale to okno neni videt, ani aplikace neni nikde jinde
> videt nez v
> > taskmanageru pod procesama, v podstate se divim, ze to funguje,
> > protoze to bezi bez desktopu (ihned po zapnuti PC (bez
> prihlaseni)),
> > ale bezi to.
>
> A ma ta aplikace vubec nejake okno ? Jinak neexistuje zadny
> 100%ni zpusob jak z PID ziskat HWND hlavniho okna.
>
> Petr Vones
>
>
Ztrata konektivity IB/FB podruhe
[*] Roland Turcan <rolo(zv)sedas.sk> - 26.3.2003 14:44:42
<<< 26. 3. 2003 14:41 - David Liska "konference(zv)thsoft(tec)cz" >>>
DL> Byl by tu nekdo, kdo dokaze vyresit problem, ktery jsem popisoval v mailu
DL> dne 14.3. ?
DL> Odpovedi, ktere jsem zatim dostal byly jen domnenky, ktere bohuzel nefunguji
DL> v praxi.
DL> Pri odpadnuti konektivity, aby vse zase fungovalo normalne, musim zavrit
DL> celou aplikaci a zase ji spustit a to je dost nehezke reseni...
-------------------------------------------
My answer:
----------
Ja tiez sa pridam a budem len teoretizovat. Skus si pozriet ako to
robi napr. FIB Plus, on tam ma event:
TFIBLostConnectEvent=procedure(Database: TFIBDatabase; E: EFIBError; var Actions: TOnLostConnectActions) of object;
property OnLostConnect: TFIBLostConnectEvent;
Description
The OnLostConnect event occurs after a lost of connection to a database.
a metodu:
procedure RestoreConnect(Sender: TObject);
Description
Call the RestoreConnect method to try to restore a connection to a database.
In the case of a successful connection the AfterRestoreConnect event occurs,
in the case of an error connection the OnErrorRestoreConnect event occurs.
PS: Ja som to este neskusal, lebo zatial tiez mastim IBX, ale uvazujem
o prechode na FIB+.
--
Best regards, TRoland
Re[2]: Ako na service application
[*] Roland Turcan <rolo(zv)sedas.sk> - 26.3.2003 14:39:38
<<< 26. 3. 2003 14:38 - Ludek ZITA "konference(zv)sales(tec)cz" >>>
LZ> ----- Original Message -----
LZ> From: "Roland Turcan" <rolo(zv)sedas.sk>
>> Chcel by som spravit sluzbu, ktora by sa spravala ako FireBird
>> Guardian. T.j. na Win9x by bezala ako aplikacia a na WinNT ako
>> Service.
LZ> Ahoj.
LZ> Ted delam neco podobneho a zatim mi to vychazi napsat to vicem me=
ne dvakrat,
LZ> jednou jako service a jednou jako normalni aplikaci.
LZ> Cely vykonny kod mam =A8ve spolecnych unitach a prujekty service =
i stdapp jen
LZ> obaluji spolecne funkce.
LZ> Ludek
-------------------------------------------
My answer:
----------
Ale musi existovat nejaky postup, lebo aj IBGuard.exe a IBServer.exe
je aj ako app aj ako service.
--=20
Best regards, TRoland
Re[2]: Ako na service application
[*] Jon�s Marian <Jonas(zv)komercpoj(tec)cz> - 26.3.2003 14:53:02
> -----Original Message-----
> From: Roland Turcan [mailto:rolo(zv)sedas.sk]
> Sent: Wednesday, March 26, 2003 2:40 PM
> To: Ludek ZITA
> Subject: Re[2]: Ako na service application
>
> Ale musi existovat nejaky postup, lebo aj IBGuard.exe a IBServer.exe
> je aj ako app aj ako service.
>=20
Podivej se na scktsrvr.dpr v source\vcl
FB a nastaveni Charset 1250
[*] <rdanhel(zv)centrum(tec)cz> - 26.3.2003 14:43:22
Napada me nekolik moznosti.
1. Nemazes nekde parametry spojeni po spusteni aplikace a pak se
pripojujes?
2.Mas presne ten update co ti neprojde aplikaci nekde odchycenej
(presne zneni SQL dotazu) a vis na 100% ze tento dotaz kdyz zadas
treba z IBConsole tak ti projde?
3. Mimo to ta chyba co popisujes muze byt i preteceni. Napriklad do
10znakove polozky se snazis ulozit 11znaku.
4. Mas nastaveny dialect 3?
s pozdravem rostislav danhel
______________________________________________________________
>> To jsem udelal...jeste tam musi byt neco....> proste to nejde a nejde,beee;-((> nemate nekdo napad v cem to bude?> Proste jsem zmenil pole na win1250 z defaultniho > vlozil
> > lc_ctype=WIN1250 a furt to zlobiii;-((((> Please SOS;-((( > > > >Do TIBDatabase.Params dopln radek > >lc_ctype=WIN1250
> > > >> a predpokladam i insert, hlasi to o chybne > >> konverzi znaku, predpokladam tedy ze musim > jeste > > > > Aldik Pavel
> > > >
FB a nastaveni Charset 1250
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 26.3.2003 13:46:36
My pouzivame komponenty dbExpress a tam ma u komponenty SQLConnection =
parametr nasledujici tvar:
SQLConnection1.Params.Add('ServerCharSet=3DWIN1250');
----- Original Message -----=20
From: <aldik(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, March 26, 2003 12:23 PM
Subject: RE: FB a nastaveni Charset 1250
> To jsem udelal...jeste tam musi byt neco....
> proste to nejde a nejde,beee;-((
> nemate nekdo napad v cem to bude?
> Proste jsem zmenil pole na win1250 z defaultniho=20
> vlozil
>=20
> lc_ctype=3DWIN1250 a furt to zlobiii;-((((
> Please SOS;-(((=20
>=20
>=20
> >Do TIBDatabase.Params dopln radek=20
> >lc_ctype=3DWIN1250
>=20
>=20
> >> a predpokladam i insert, hlasi to o chybne=20
> >> konverzi znaku, predpokladam tedy ze musim=20
> jeste=20
> =20
>=20
>=20
> Aldik Pavel
>=20
>=20
ADO dataset - problem s BOF & EOF
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.3.2003 13:41:25
From: "Daniel Frantik" <frantik(zv)telpro(tec)cz>
> Mam problem s ADO. Pouzivam ho k pristupu do Access MDB tabulky. Pote, co
> dataset uspesne otevru, mi pri volani metody Close spadne s vyjimkou:
> "Eighter BOF or EOF are true, or current record was deleted..."
Pokud je to Delphi 5 a MDAC 2.6 ci vyssi tak je na to nejaky patch:
http://info.borland.com/devsupport/delphi/mdac26.html
stahnuti vice obrazku pres TWAIN
[*] Martin Pesava <pesavova(zv)dkm(tec)cz> - 26.3.2003 13:57:26
Potreboval bych stahnout najednou vic obrazku z fotaku pres TWAIN
rozhrani. Umim to udelat tak, ze se zobrazi standardni twainovej
dialog od fotaku a tam si jich vyberu vic a dam, ze je chci stahnout.
Jenze ja bych potreboval tento dialog obejit. Coz sice jde (Da se
nastavit HideUI), ale pak umim stahnout jenom prvni fotku a zaboha
nemuzu prijit na to, jak stahnout i dalsi; pripadne vsechny. Predem
dik za rady
--
Martin Pe�ava mailto:pesavova(zv)dkm(tec)cz
COM Server, typova knihovna a zapis do registru
[*] Slavek Rydval <konference(zv)rydval(tec)cz> - 26.3.2003 13:52:44
Ahoj,
asi bych mel upresnit situaci. Jednak jde o Delphi 6 SP 2. Do me aplikace
jsem si naimportoval typovou knihovnu (pro Windows Script Host, ale to je
myslim jedno) a dale tam mam COM objekty, ktere predavam prave uvedene TLB.
Tedy nejde o pouziti COM objektu z me aplikace jinou aplikaci, ktera si o nej
rekne, ale pouzitim nekym jinym, komu COM objekt vnutim.
Slavek
---------------------
http://www.rydval(tec)cz
slavek(zv)rydval(tec)cz
---------------------
---------- Original Message -----------
From: "Alexandr Stefek" <alex(zv)scova.vabo(tec)cz>
> Od verze tusim 5, se pripadny nedostatek prav pro zapis do registru
> neprojevi vyjimkou (resp. je to osetreno vnitrne)
> Neni pravda, ze registrace TLB do registru je zbytecna, kdyz to pouze
> predavam
> nekomu jinemu. Pokud vim, tak se tyto informace pouzivaji pro automaticky
> marshalling.
> Pokud je do registru nezapisi a COM je out of process, tak musim
> implementovat
> custom marshalling.
> Nejake informace musi stejne v registru byt v kazdem pripade,
> protoze, kdyz klient vytvori COM objekt, musi vedet, kterou
> aplikaci ma spustit (zavest knihovnu). Tato informace je ulozena v
registrech.
> Alexandr STEFEK
------- End of Original Message -------
odstraneni ESC znaku z textu
[*] Lauko Stefan <laukosw(zv)naex.sk> - 26.3.2003 13:47:11
----- Original Message -----
From: "Macko Martin" <martin.macko(zv)m-pro(tec)cz>
IMHO to nejde ani kdyz sekvence znas, to moc dobre nepujde - nektere
sekvenca maji v sobe parametry - treba nastaveni delky stranky ...
A ked uz budes robit zoznam ESC-sekvencii
nahradzaj vzdy od najdlhsej. Nezabudni na #0 napr. #27#33#1 (zapina)
#27#33#0 (vypina),
v pripade, ze bude niekde v texte #0 - nemas sancu precitat znaky za #0
(koniec stringu).
Lauko.None
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 26.3.2003 13:44:41
nevite nekdo neco o tiskarnovem jazyku "Lightweight Imaging Device Interface
Language", tedy krome toho ze je v inkoustovkach HP
Font do TLogFont
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.3.2003 13:37:04
From: "Ondrej Kelle" <O.Kelle(zv)digitalpublishing.de>
> Ak si myslel nejaku API, ktora by vratila LOGFONT pre dane HFONT, neviem o
> takej funkcii.
var
LF: TLogFont;
FillChar(LF, SizeOf(LF), 0);
Win32Check(GetObject(Font.Handle, SizeOf(LF), (zv)LF) > 0);
COM Server, typova knihovna a zapis do registru
[*] Alexandr Stefek <alex(zv)scova.vabo(tec)cz> - 26.3.2003 13:32:13
> Preji vsem pekneho dne,
>
> pokud mam program obsahujici typovou knihovnu a pouzivajici jednotku
ComServ,
> pak pri inicializaci uvedene jednotky se krome jineho snazi server
> zaregistrovat nejake veci do registru.
>
> Implementace COM objektu, ktere v programu pouzivam, vsak neni potreba
> zpristupnovat, pouze je predavam nekomu jinemu\ a proto si myslim, ze
> pouzivat registry je zbytecne. Navic pokud spustit program pod uzivatelem
s
> nedostatkem prav, dostanu akorat chybovou hlasku a program se ukonci.
Od verze tusim 5, se pripadny nedostatek prav pro zapis do registru
neprojevi
vyjimkou (resp. je to osetreno vnitrne)
Neni pravda, ze registrace TLB do registru je zbytecna, kdyz to pouze
predavam
nekomu jinemu. Pokud vim, tak se tyto informace pouzivaji pro automaticky
marshalling.
Pokud je do registru nezapisi a COM je out of process, tak musim
implementovat
custom marshalling.
Nejake informace musi stejne v registru byt v kazdem pripade, protoze, kdyz
klient
vytvori COM objekt, musi vedet, kterou aplikaci ma spustit (zavest
knihovnu). Tato
informace je ulozena v registrech.
Alexandr STEFEK
ADO dataset - problem s BOF & EOF
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 26.3.2003 13:37:42
> Ahoj,
> kamarad Tomas ma problem:
>
> Mam problem s ADO. Pouzivam ho k pristupu do Access MDB tabulky. Pote, co
> dataset uspesne otevru, mi pri volani metody Close spadne s vyjimkou:
> "Eighter BOF or EOF are true, or current record was deleted..."
>
Predpokladam D5 ADOEXPRESS. Je treba si nainstalovat d5adoupdate2.exe, kde
je to opravene.
Bohdan Voska
ADO dataset - problem s BOF & EOF
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 26.3.2003 13:29:15
Ahoj,
kamarad Tomas ma problem:
Mam problem s ADO. Pouzivam ho k pristupu do Access MDB tabulky. Pote, co
dataset uspesne otevru, mi pri volani metody Close spadne s vyjimkou:
"Eighter BOF or EOF are true, or current record was deleted..."
Debugovanim jsem zjistil, ze se pri Close vola CancelUpdates a tam to
spadne. Nenapada mne ale jediny duvod, proc bych pri zavirani datasetu
nesmel stat na zacatku, nebo konci. Obzvlaste pikantni to pak je, kdyz query
nevrati zadny zaznam. To je pak neresitelna situace.
Na jednom stroji (WinME/Access 2000) to funguje dobre, ale na ostatnich
(W2000, WinXP) se to chova tak, jak jsem popsal...
Nesetkal jste se nekdo s timto chovanim?
Tom
komponenta: palety barev
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 26.3.2003 13:03:48
TColorPickerButton:
http://www.delphix.host.sk/index.php?item=categs&act=shc&id=20
> Zdravim, nevite nekdo, kde sehnat komponentu - panel palety barev -
> takovy, jaky je treba v colordialogu v te rozsirene nabidce? nebo
> alespon tu funkci, ktera to vykresluje (podle odstinu, sytosti,
> svetelnosti urci hodnotu pro R,G,B)? diky za odpoved
>
Font do TLogFont
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 26.3.2003 12:59:15
>> Mozes si pozriet, ako to robi VCL pri vytvarani fontu,
>> TFont.GetHandle v unite Graphics.
> To vim, mohl bych to opsat, ale myslel jsem, jestli nato
> neni hotova ve Windows funkce.
Nie je. Windows nevie nic o triedach VCL (TFont).
Ak si myslel nejaku API, ktora by vratila LOGFONT pre dane HFONT, neviem o
takej funkcii.
HTH
Font do TLogFont
[*] Jan Harman <harman(zv)volny(tec)cz> - 26.3.2003 12:46:31
To vim, mohl bych to opsat, ale myslel jsem, jestli nato neni
hotova ve Windows funkce. Honza.
> > Ahoj, poradite nekdo s nactenim aktualniho fontu
> > (treba od TLabel)
> > do struktury TLogFont? Diky moc.
>
> Mozes si pozriet, ako to robi VCL pri vytvarani fontu,
> TFont.GetHandle v
> unite Graphics.
>
> HTH
> TOndrej
>
--
Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
konec radku CRLF
[*] Jiri Virt <virt(zv)volny(tec)cz> - 26.3.2003 12:23:54
...
const CRLF = #13+#10;
...
ShowMessage('Ahoj'+CRLF+'Nazdar');
...
konec radku CRLF
[*] tondrej(zv)t-online.de - 26.3.2003 12:39:48
Tab je #9, CR je #13 a LF je #10.
http://msdn.microsoft.com/library//en-us/vsintro7/html/_pluslang_ascii_character_codes_chart_1.asp
HTH
COM Server, typova knihovna a zapis do registru
[*] Slavek Rydval <konference(zv)rydval(tec)cz> - 26.3.2003 12:24:12
Preji vsem pekneho dne,
pokud mam program obsahujici typovou knihovnu a pouzivajici jednotku ComServ,
pak pri inicializaci uvedene jednotky se krome jineho snazi server
zaregistrovat nejake veci do registru.
Implementace COM objektu, ktere v programu pouzivam, vsak neni potreba
zpristupnovat, pouze je predavam nekomu jinemu\ a proto si myslim, ze
pouzivat registry je zbytecne. Navic pokud spustit program pod uzivatelem s
nedostatkem prav, dostanu akorat chybovou hlasku a program se ukonci.
Jak tedy zakazat zmineny zapis do registru? Nebo jsem neco nepochopil?
Diky za kazdou odpoved
Slavek Rydval
---------------------
http://www.rydval(tec)cz
slavek(zv)rydval(tec)cz
konec radku CRLF
[*] Spider_X <spider_x(zv)quick(tec)cz> - 26.3.2003 12:26:46
TAB je #9.
Spider_X
----- Original Message -----
From: "Tvrz Miroslav" <Miroslav.Tvrz(zv)merlin(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, March 26, 2003 12:07 PM
Subject: RE: konec radku CRLF
> Nevim jestli chapu jasne, ale
>
> #10 (CRLF)
> #8 (TAB) - nesjem si plne jist
>
> zkratka # a za nej ASCII hodnotu daneho znaku
>
> MI'RA
>
> -----Original Message-----
> From: Jakub Cizek [mailto:jakub.cizek(zv)chatspace(tec)cz]
> Sent: Wednesday, March 26, 2003 12:06 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: konec radku CRLF
>
>
> potrebuji nakopnout ..
> jak vlozim do retezce konec radku? a TAB???
> diky...
>
> --
> Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz>
> E-mail klient :: TheBat! 1.62i/CZ
> Antivirus :: Avast! 4.0 Home Edition
>
>
FB a nastaveni Charset 1250
[*] <aldik(zv)quick(tec)cz> - 26.3.2003 12:23:27
To jsem udelal...jeste tam musi byt neco....
proste to nejde a nejde,beee;-((
nemate nekdo napad v cem to bude?
Proste jsem zmenil pole na win1250 z defaultniho
vlozil
lc_ctype=WIN1250 a furt to zlobiii;-((((
Please SOS;-((( >Do TIBDatabase.Params dopln radek
>lc_ctype=WIN1250
>> a predpokladam i insert, hlasi to o chybne
>> konverzi znaku, predpokladam tedy ze musim
jeste
Aldik Pavel
konec radku CRLF
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 12:20:11
26.3.2003 Jakub Cizek:
> Hello Petr,
> Wednesday, March 26, 2003, 12:11:11 PM, you wrote:
>>> Nevim jestli chapu jasne, ale
>>>
>>> #10 (CRLF)
PJ>> POZOR CRLF jsou dva znaky #10#13!
A navic je to jeste obracene #13#10 :-)
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Re[2]: konec radku CRLF
[*] Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz> - 26.3.2003 12:17:42
Hello Petr,
Wednesday, March 26, 2003, 12:11:11 PM, you wrote:
>> Nevim jestli chapu jasne, ale
>>
>> #10 (CRLF)
PJ> POZOR CRLF jsou dva znaky #10#13!
PJ> ---
PJ> Odchoz� zpr�va mo�n� neobsahuje viry.
PJ> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
PJ> Verze: 6.0.465 / Virov� b�ze: 263 - datum vyd�n�: 25.3.2003
diky, to jsem potreboval :))
ja hlava tupa ...
--
Best regards,
Jakub mailto:jakub.cizek(zv)chatspace(tec)cz
konec radku CRLF
[*] Petr Jansky <delphi(zv)amzdy(tec)cz> - 26.3.2003 12:11:11
> Nevim jestli chapu jasne, ale
>
> #10 (CRLF)
POZOR CRLF jsou dva znaky #10#13!
---
Odchoz� zpr�va mo�n� neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.465 / Virov� b�ze: 263 - datum vyd�n�: 25.3.2003
konec radku CRLF
[*] Tvrz Miroslav <Miroslav.Tvrz(zv)merlin(tec)cz> - 26.3.2003 12:07:54
Nevim jestli chapu jasne, ale
#10 (CRLF)
#8 (TAB) - nesjem si plne jist
zkratka # a za nej ASCII hodnotu daneho znaku
MI'RA
-----Original Message-----
From: Jakub Cizek [mailto:jakub.cizek(zv)chatspace(tec)cz]
Sent: Wednesday, March 26, 2003 12:06 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: konec radku CRLF
potrebuji nakopnout ..
jak vlozim do retezce konec radku? a TAB???
diky...
--
Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz>
E-mail klient :: TheBat! 1.62i/CZ
Antivirus :: Avast! 4.0 Home Edition
konec radku CRLF
[*] Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz> - 26.3.2003 12:05:33
potrebuji nakopnout ..
jak vlozim do retezce konec radku? a TAB???
diky...
--
Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz>
E-mail klient :: TheBat! 1.62i/CZ
Antivirus :: Avast! 4.0 Home Edition
Combo SelStart a AutoSelect
[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 26.3.2003 11:44:45
Ahoj,
mam takove dva mensi problemky s ComboBoxem
1) jak udelat aby nebyl napsany text oselektovany po kliknuti mysi na
combicko,
asi jako kdyz u editu date AutoSelect:=3DFalse
2) U editu lze pomoci SelStart zjistit aktualni pozici kurzoru,
U comba sice taky, ale pouze pokud ma Combo fokus.
Po ztrate fokusu vraci SelStart 0
Dekuji za rady
Tomas Bihary
---
Odchoz=ED zpr=E1va neobsahuje viry.
Zkontrolov=E1no antivirov=FDm syst=E9mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.463 / Virov=E1 b=E1ze: 262 - datum vyd=E1n=ED: 17.3.2003
Ladenie Memory Proofilerom
[*] <idulgerov(zv)centrum.sk> - 26.3.2003 11:43:56
Zdravim
> Prave sa pokusam doladit jeden soft programom "MemProof",
> vytrvale mi pri ukonceni tstovaneho softu vypise tuto chybu :
>=20
>=20
> Attemp to free unexisting resource =20
>=20
> &0005033C TMenuItem(zv)Destroy in Menus.pas (770)
>=20
> Neviete co to moze sposobovat ?
Moc informaci jsi neposkytl, takze bych na prvni podivani=20
tipnul, ze mozna nekde v=20
programu provadis dvakrat ruseni teze instance tridy TMenuItem.=20
Nemas v=20
programu nejake vlastni vytvareni/ruseni polozek v menu?
*Nie, menim vlastnost Caption niektorych poloziek Menu.
*Ze by preto ?????
S pozdravom
Ivan Dulgerov
Delphi 5 Prof, Win XP Prof, WIN 98
----------------------------------------------------------------
Ztrata konektivity IB/FB podruhe
[*] David Liska <konference(zv)thsoft(tec)cz> - 26.3.2003 11:32:57
Byl by tu nekdo, kdo dokaze vyresit problem, ktery jsem popisoval v mailu
dne 14.3. ?
Odpovedi, ktere jsem zatim dostal byly jen domnenky, ktere bohuzel nefunguji
v praxi.
Pri odpadnuti konektivity, aby vse zase fungovalo normalne, musim zavrit
celou aplikaci a zase ji spustit a to je dost nehezke reseni...
David
Balicky - vynuceni buildu balicku
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 26.3.2003 11:19:51
Ahoj,
muzu jeste otravovat s temi balicky?
Mam balicek, do nej vlozim formular, na formular komponentu treti
strany.
Muj balicek je allways compile. Po vlozeni komponenty treti strany mi
to hlasi pri buildu:
Never build package ECQDBCD7 must by recompiled.
Proc?
Ja jen pouzil komponentu z toho balicku.
Co se stane, kdyz za nejaky cas vlozim dalsi fomular, provedu tedy
rekompilaci pozadovaneho balicku. Jak poznam co mam tedy poslat
uzivateli?
Diky
Predchozi chyby se mi podarilo "mozna" odtsranit spravnym poradim
kompilace.
--
S pozdravem,
Martin Radvansky
Font do TLogFont
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 26.3.2003 10:59:42
> Ahoj, poradite nekdo s nactenim aktualniho fontu (treba od TLabel)
> do struktury TLogFont? Diky moc.
Mozes si pozriet, ako to robi VCL pri vytvarani fontu, TFont.GetHandle v
unite Graphics.
HTH
Font do TLogFont
[*] Jan Harman <harman(zv)volny(tec)cz> - 26.3.2003 10:36:50
Ahoj, poradite nekdo s nactenim aktualniho fontu (treba od TLabel)
do struktury TLogFont? Diky moc.
Honza.
--
Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
TDBGrid - vyska radku
[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.3.2003 10:56:23
Jen napad mozna to nebude fungovat, ale kdyz zmenis font na vetsi
a pak si napises obsluhu udalosti ondrawcolumncell kde napred das
canvas.font.size :=3D ta puvodni velikost
a pak zavolas defaultdrawcolumncell tak by to prece mohlo fungovat.
> Tohle vim, ale nehodi se mi to. I presto dik za radu. Je nejaky jiny
> zpusob, aniz bych musel menit velikost fontu ? Delphik
>
> ______________________________________________________________________
> ________ U=B9et=F8=EDte, kdy=BE to stihnete... Slevy produkt=F9 HP a=BE =
40 %!
> Notebook 25.980 K=E8, server 19.980 K=E8, po=E8=EDta=E8 + monitor 17.700=
K=E8!
> V=EDce http://www.email(tec)cz/akce_hp
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
MS SQL - ODBCe - parametr dtDate
[*] Lubomir Fule <fule(zv)humansoft.sk> - 26.3.2003 10:52:11
Este by som odporucal stiahnut poslednu verziu ODBCe
(ftp://ftp.humansoft.sk/public/ODBCe.zip), pripadne mozem poslat.
L.
> -----Original Message-----
> From: J. Hasek [mailto:cz602778(zv)tiscali(tec)cz]
> Sent: Wednesday, March 26, 2003 10:17 AM
> To: Lubomir Fule
> Subject: RE: MS SQL - ODBCe - parametr dtDate
>=20
>=20
> To u=BE jsem zkou=B9el a vyhod=ED to chybu:
> [ODBC SQL Server Driver]Neplatn=FD form=E1t =E8asu.
> viz p=F8ilo=BEen=FD log
>=20
> JH
>=20
> >
> >
> >Myslim, ze viem v com je problem aj po predbeznom kuknuti do=20
> logu. Skus
> typ
> >parametra nastavit na dtDateTime. Totiz MSSQL nema datovy=20
> typ DATE iba
> >univerzalny typ DATETIME, ktory sa pouziva aj na ukladanie=20
> "iba" datumu.
> >
> >L.
>=20
>=20
>=20
>=20
> ______________________________________________
> Tiscali special: Valka v Iraku - exkluzivne videa agentury=20
> Reuters, fotogalerie,
> online zpravy, diskuze, ankety, kviz. Vice na=20
http://zpravodajstvi.tiscali(tec)cz
MS SQL - ODBCe - parametr dtDate
[*] Lubomir Fule <fule(zv)humansoft.sk> - 26.3.2003 10:50:25
Prave v tom moze byt problem. Totiz taketo priradovanie parametrov sa =
deje
na nizkej urovni v kniznici FODBCLib.dll a to funguje spravne len za
predpokladu, ze datove typy su rovnake. Predpokladam, ze v DBF mas iba =
DATE
a v MSSQL je DATETIME, takze preto Ti to blbne. Najjednoduchsie =
riesenie je
take ake si uz urobil, teda pred tym ako zavolas ExecSQL naplnit =
prislusny
parameter rucne (najlepsie cez AsDateTime) a pre istotu by som =
odporucal
pomenovat ho inac ako je nazov stlpca v MasterQuery aby to =
nekolidovalo.
Taketo riesenie je naprosto spravne a nijak vyznamne neovplyvni =
performance.
S pozdravom
L. Fule
>=20
> V p=F8=EDkazu INSERT m=E1m asi 12 paramatr=F9, kter=E9 se pln=ED =
automaticky p=F8es
> nastavenou property MasterQuery (odkazuje na otev=F8en=FD SELECT=20
> a parametry
>=20
> a polo=BEky maj=ED stejn=E9 n=E1zvy).=20
> Jen jeden parametr pln=EDm p=F8i=F8azovac=EDm p=F8=EDkazem z =
programu.
>=20
> Na odpov=EC=EF si r=E1d po=E8k=E1m a je=B9t=EC jednou moc d=ECkuju
>=20
> JH
>=20
> >Pozriem sa na to, len prosim o trpezlivost, lebo momentalne=20
> mam nejaku
> surnu
> >robotu, takze asi niekedy poobede. Este otazocka, akym=20
> sposobom naplnas
> >hodnoty parametrov? To moze byt totiz klucom k problemu...
> >
> >L.
> >> Ahoj,
> >> pos=EDl=E1m trasovac=ED log a d=EDky za ochotu
> >>=20
> >> J. Ha=B9ek
> >>=20
> >> PS : provizorn=EC jsem to vy=F8e=B9il t=EDm, =BEe parametry =
p=F8ed=E1v=E1m=20
> >> p=F8i=F8azovac=EDma
> >> p=F8=EDkazama. Ale nen=ED to ono.
> >>=20
> >> >Zapni si v ODBC administratore trasovanie a potom to spust.=20
> >> Log subor,
> >> ktory
> >> >sa vytvori mi posli na sukr. adresu (fule(zv)humansoft.sk),=20
> potom budeme
> >> >mudrejsi...:-) Ja som zatial nemal problemy s datumovymi=20
> parametrami.
> >> >
> >> >L.
> >> >
> >> >> pouzivam komponenty ODBCe pro aktualizaci dat=20
> >> >> zdroj: dbf=20
> >> >> cil: MS SQL (puvodne Access):
> >> >>=20
> >> >> 1. ODBCQuery - SELECT id, datum FROM dbfTab (MasterQuery)
> >> >> 2. ODBCQuery - UPDATE sqlTab SET datum =3D :datum WHERE id =3D =
:id
> >> >>=20
> >> >> DataType parametru datum mam nastaveno na dtDate,=20
> >> >> ale presto pri ExecSQL nastane chyba:
> >> >> [ODBC SQL Server Driver] Volitelna funkce nebyla =
implementovana.
> >> >>=20
> >> >> Problem se objevuje jen u datumovych parametru, pricemz=20
> u Accessu
> >> >> bezi vsechno bez chyb. Poradi mi nekdo?
> >> >>=20
> >>=20
> >>=20
> >>=20
> >>=20
> >> ______________________________________________
> >> Tiscali special: Valka v Iraku - exkluzivne videa agentury=20
> >> Reuters, fotogalerie,
> >> online zpravy, diskuze, ankety, kviz. Vice na=20
> >http://zpravodajstvi.tiscali(tec)cz
> >
> >
> >
> >
>=20
>=20
>=20
>=20
> ______________________________________________
> Tiscali special: Valka v Iraku - exkluzivne videa agentury=20
> Reuters, fotogalerie,
> online zpravy, diskuze, ankety, kviz. Vice na=20
> http://zpravodajstvi.tiscali(tec)cz
>=20
>=20
odstraneni ESC znaku z textu
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 26.3.2003 10:37:48
IMHO to nejde ani kdyz sekvence znas, to moc dobre nepujde - nektere
sekvenca maji v sobe parametry - treba nastaveni delky stranky ...
-----Original Message-----
From: Vladimir Teply [mailto:teplyv(zv)chrudim(tec)cz]=20
Sent: Wednesday, March 26, 2003 10:08 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: odstraneni ESC znaku z textu
Nastesti v tom textu byly pouze 4 kombinace, takze jsem to pomoci
StringReplace odfiltroval. IMHO to obecne, pokud clovek nezna ktere
sekvence byly pouzity, ani nejde.
VT
skin 2000
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 26.3.2003 10:34:19
Skus toto:
DesignXP: http://www.delphix.host.sk/?item=categs&act=shc&id=2
----- Original Message -----
From: "Kamil" <baranek(zv)sterk-olomouc(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, March 21, 2003 8:27 AM
Subject: skin 2000
Nev�te pros�m n�kdo o n�jak�m sajtu, kde lze sehnat komponentu s butony ve
stylu Office 2000 (nebo XP)?
D�kuji
kamil
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.449 / Virov� b�ze: 251 - datum vyd�n�: 27.1.2003
OT: prevod service s Delphi do VB
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 26.3.2003 10:07:59
Zdravim
dostal jsem od jednoho divneho zakaznika pokyn abych prevedl program
ktery bezi jako System Service z Delphi do Visual Basic. No ze soku
jsem se uz spamatoval ale stale nevim jak se programuje ve Visal Basic
service. Nemuzete mi trochu poradit ja vim ze je to totalne off topic
ale co mam robit..
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
MS SQL - ODBCe - parametr dtDate
[*] Lubomir Fule <fule(zv)humansoft.sk> - 26.3.2003 09:38:29
Myslim, ze viem v com je problem aj po predbeznom kuknuti do logu. Skus =
typ
parametra nastavit na dtDateTime. Totiz MSSQL nema datovy typ DATE iba
univerzalny typ DATETIME, ktory sa pouziva aj na ukladanie "iba" =
datumu.
L.
> -----Original Message-----
> From: J. Hasek [mailto:cz602778(zv)tiscali(tec)cz]
> Sent: Wednesday, March 26, 2003 9:30 AM
> To: fule(zv)humansoft.sk
> Subject: RE: MS SQL - ODBCe - parametr dtDate
>=20
>=20
> Ahoj,
> pos=EDl=E1m trasovac=ED log a d=EDky za ochotu
>=20
> J. Ha=B9ek
>=20
> PS : provizorn=EC jsem to vy=F8e=B9il t=EDm, =BEe parametry =
p=F8ed=E1v=E1m=20
> p=F8i=F8azovac=EDma
> p=F8=EDkazama. Ale nen=ED to ono.
>=20
> >Zapni si v ODBC administratore trasovanie a potom to spust.=20
> Log subor,
> ktory
> >sa vytvori mi posli na sukr. adresu (fule(zv)humansoft.sk), potom =
budeme
> >mudrejsi...:-) Ja som zatial nemal problemy s datumovymi =
parametrami.
> >
> >L.
> >
> >> pouzivam komponenty ODBCe pro aktualizaci dat=20
> >> zdroj: dbf=20
> >> cil: MS SQL (puvodne Access):
> >>=20
> >> 1. ODBCQuery - SELECT id, datum FROM dbfTab (MasterQuery)
> >> 2. ODBCQuery - UPDATE sqlTab SET datum =3D :datum WHERE id =3D :id
> >>=20
> >> DataType parametru datum mam nastaveno na dtDate,=20
> >> ale presto pri ExecSQL nastane chyba:
> >> [ODBC SQL Server Driver] Volitelna funkce nebyla implementovana.
> >>=20
> >> Problem se objevuje jen u datumovych parametru, pricemz u Accessu
> >> bezi vsechno bez chyb. Poradi mi nekdo?
> >>=20
>=20
>=20
>=20
>=20
> ______________________________________________
> Tiscali special: Valka v Iraku - exkluzivne videa agentury=20
> Reuters, fotogalerie,
> online zpravy, diskuze, ankety, kviz. Vice na=20
http://zpravodajstvi.tiscali(tec)cz
odstraneni ESC znaku z textu
[*] Vladimir Teply <teplyv(zv)chrudim(tec)cz> - 26.3.2003 10:07:32
Nastesti v tom textu byly pouze 4 kombinace, takze jsem to pomoci
StringReplace odfiltroval. IMHO to obecne, pokud clovek nezna ktere sekve=
nce
byly pouzity, ani nejde.
VT
----- Original Message -----
From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, March 26, 2003 9:01 AM
Subject: Re: odstraneni ESC znaku z textu
> 26.3.2003 "Ing. Jan Dubsk=FD - Stroj=EDrna P=E1lava":
> >>> Ja pouzivam nasledujici funkci - funguje i pro znaky #27 atd.
>
> Zkus se podivat na funkci StringReplace
>
> nahrazeny_string :=3D StringReplace(puvodni_string, co, cim, [rfReplace=
All])
>
> >> Ale k tomu potrebujes seznam ESC sekvenci a nahrazovat je postupne
> jednu po >> druhe, protoze nevis, ktere budou v textu pouzity. A ESC
> > sekvenci je
> >> nekolik desitek.
>
> > Jasne. Ja toto pouzivam v jine souvislosti - hledam a nahrazuji v
> > klasickem lidsky citelnem textu zamena jmen, adres atd. - seznam ESC
> > sekvenci by se skutecne musel doplnit a cyklicky prohledavat - ovsem
> > "nekolik desitek" me zarazilo, ja jsem typoval tak do 15 pouzivanych
> > variant.
>
> A pak nekdo pouzije nejakou jinou variantu, se kterou nepocitas a ....
>
> --
> Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz
>
vyhladavanie v adotable
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 26.3.2003 10:08:19
>
> Za odpoved dakujem ale ako prejdem na dalsi zaznam ?
>
AdoTable.next je dopredu nebo AdoTable.prior je zpet. AdoTable.last je na
konec.
Bohdan Voska
HP Deskjet940c a QuickReport1.1a
[*] Tvrz Miroslav <Miroslav.Tvrz(zv)merlin(tec)cz> - 26.3.2003 09:59:58
Podivam se doma - ted jsem v praci=20
MI'RA=20
-----Original Message-----
From: Tomas Mazurek [mailto:tomas.mazurek(zv)vitkovice(tec)cz]
Sent: Wednesday, March 26, 2003 9:57 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: HP Deskjet940c a QuickReport1.1a
M=F9=BEe=B9 mi, pros=EDm, n=ECjak bl=ED=BEe popsat, kde se to =
nach=E1z=ED ve vlastnostech
tisk=E1rny? U=BE jsem je prolezl horem dolem, asi jsem slep=FD...
D=EDk
TM
----- Original Message -----
From: "Tvrz Miroslav" <Miroslav.Tvrz(zv)merlin(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, March 20, 2003 9:19 AM
Subject: RE: HP Deskjet940c a QuickReport1.1a
> Zdravim,
>
> zkus si nastavit ve vlastnostech tiskarny (mam take HP940c)
> aby se ti specialni pismena (hacky, carky, prehlaskovane, atp.)
> posilaly na tiskarnu jako obrazky - text se nijak neporusi a
> cestina projde OK - kdysi jsem mel podobny problem.
>
> MI'RA
>
> -----Original Message-----
> From: Tomas Mazurek [mailto:tomas.mazurek(zv)vitkovice(tec)cz]
> Sent: Thursday, March 20, 2003 9:12 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: HP Deskjet940c a QuickReport1.1a
>
>
> Dobry den,
>
> mam dotaz ohledne Delphi1. Uzivatel si nainstaloval do Win95 vyse =
uvedenou
> tiskarnu a od te doby jsou tisky z QuickReportu1.1a u nekterych fontu
spatne
> cesky. Nesetkal se jiz nekdo s tim? Uznavam, ze "stare" Delphi1 a =
"nova"
> tiskarna HP uz asi neni to prave, ale zatim s temi 16-ti bitovymi =
programy
> jine problemy nebyly... Navic v tom standardnim preview sestavy v QR =
je
> obcas tlacitko tiskarny disabled i kdyz je tiskarna spravne =
pripojena, ma
> papir apod...
> Dik
>
> Tomas Mazurek
HP Deskjet940c a QuickReport1.1a
[*] Tomas Mazurek <tomas.mazurek(zv)vitkovice(tec)cz> - 26.3.2003 09:57:09
M=F9=BEe=B9 mi, pros=EDm, n=ECjak bl=ED=BEe popsat, kde se to nach=E1z=ED=
ve vlastnostech
tisk=E1rny? U=BE jsem je prolezl horem dolem, asi jsem slep=FD...
D=EDk
TM
----- Original Message -----
From: "Tvrz Miroslav" <Miroslav.Tvrz(zv)merlin(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, March 20, 2003 9:19 AM
Subject: RE: HP Deskjet940c a QuickReport1.1a
> Zdravim,
>
> zkus si nastavit ve vlastnostech tiskarny (mam take HP940c)
> aby se ti specialni pismena (hacky, carky, prehlaskovane, atp.)
> posilaly na tiskarnu jako obrazky - text se nijak neporusi a
> cestina projde OK - kdysi jsem mel podobny problem.
>
> MI'RA
>
> -----Original Message-----
> From: Tomas Mazurek [mailto:tomas.mazurek(zv)vitkovice(tec)cz]
> Sent: Thursday, March 20, 2003 9:12 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: HP Deskjet940c a QuickReport1.1a
>
>
> Dobry den,
>
> mam dotaz ohledne Delphi1. Uzivatel si nainstaloval do Win95 vyse uvede=
nou
> tiskarnu a od te doby jsou tisky z QuickReportu1.1a u nekterych fontu
spatne
> cesky. Nesetkal se jiz nekdo s tim? Uznavam, ze "stare" Delphi1 a "nova=
"
> tiskarna HP uz asi neni to prave, ale zatim s temi 16-ti bitovymi progr=
amy
> jine problemy nebyly... Navic v tom standardnim preview sestavy v QR je
> obcas tlacitko tiskarny disabled i kdyz je tiskarna spravne pripojena, =
ma
> papir apod...
> Dik
>
> Tomas Mazurek
>
Informace o tisku
[*] Jiri Virt <virt(zv)volny(tec)cz> - 26.3.2003 09:47:09
Podivej se na Win32SDK.hlp ...
FindFirstPrinterChangeNotification ....
EnumMonitors ....
EnumPrinters ....
a jejich "GROUP"
Jirka
Informace o tisku
[*] Martin Pesava <pesavova(zv)dkm(tec)cz> - 26.3.2003 09:41:41
Ahojky konfero,
potreboval bych zjistovat stav tiskove fronty na Win2K a LOGovat z
jake stanice se tiskne a kolik stranek. Nikdy jsem nic takovyho
nedelal, tak bych potreboval aspon nakopnout spravnym smerem, kde
hledat a tak. Tusim, ze by to asi chtelo zahookovat tiskarnu ... ale
to je asi tak vsechno, co vim :-/
Predem dik za rady a napady :)
--
Martin Pe�ava mailto:pesavova(zv)dkm(tec)cz
MS SQL - ODBCe - parametr dtDate
[*] Lubomir Fule <fule(zv)humansoft.sk> - 26.3.2003 09:32:32
Pozriem sa na to, len prosim o trpezlivost, lebo momentalne mam nejaku =
surnu
robotu, takze asi niekedy poobede. Este otazocka, akym sposobom naplnas
hodnoty parametrov? To moze byt totiz klucom k problemu...
L.
> -----Original Message-----
> From: J. Hasek [mailto:cz602778(zv)tiscali(tec)cz]
> Sent: Wednesday, March 26, 2003 9:30 AM
> To: fule(zv)humansoft.sk
> Subject: RE: MS SQL - ODBCe - parametr dtDate
>=20
>=20
> Ahoj,
> pos=EDl=E1m trasovac=ED log a d=EDky za ochotu
>=20
> J. Ha=B9ek
>=20
> PS : provizorn=EC jsem to vy=F8e=B9il t=EDm, =BEe parametry =
p=F8ed=E1v=E1m=20
> p=F8i=F8azovac=EDma
> p=F8=EDkazama. Ale nen=ED to ono.
>=20
> >Zapni si v ODBC administratore trasovanie a potom to spust.=20
> Log subor,
> ktory
> >sa vytvori mi posli na sukr. adresu (fule(zv)humansoft.sk), potom =
budeme
> >mudrejsi...:-) Ja som zatial nemal problemy s datumovymi =
parametrami.
> >
> >L.
> >
> >> pouzivam komponenty ODBCe pro aktualizaci dat=20
> >> zdroj: dbf=20
> >> cil: MS SQL (puvodne Access):
> >>=20
> >> 1. ODBCQuery - SELECT id, datum FROM dbfTab (MasterQuery)
> >> 2. ODBCQuery - UPDATE sqlTab SET datum =3D :datum WHERE id =3D :id
> >>=20
> >> DataType parametru datum mam nastaveno na dtDate,=20
> >> ale presto pri ExecSQL nastane chyba:
> >> [ODBC SQL Server Driver] Volitelna funkce nebyla implementovana.
> >>=20
> >> Problem se objevuje jen u datumovych parametru, pricemz u Accessu
> >> bezi vsechno bez chyb. Poradi mi nekdo?
> >>=20
>=20
>=20
>=20
>=20
> ______________________________________________
> Tiscali special: Valka v Iraku - exkluzivne videa agentury=20
> Reuters, fotogalerie,
> online zpravy, diskuze, ankety, kviz. Vice na=20
http://zpravodajstvi.tiscali(tec)cz
Paramstr(0) pre DLL
[*] Alexandr Stefek <alex(zv)scova.vabo(tec)cz> - 26.3.2003 09:35:03
GetModuleFileName
Alexandr Stefek
----- Original Message -----
From: "Burkovsky Ladislav" <Ladislav.Burkovsky(zv)autinform.de>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, March 26, 2003 7:50 AM
Subject: Paramstr(0) pre DLL
> Ahoj konferencia. kto ma napad ako zistit cestu kde sa nachadza natiahnuta
> dll-ka.
> nieco ako ExtractFileDir(ParamStr(0))
>
> Diky, Laco
Vytvoreni NT service s DCOM
[*] Alexandr Stefek <alex(zv)scova.vabo(tec)cz> - 26.3.2003 09:18:27
>client:
>- ConnectKind := ckRunningInstance;
Nejsem si jist, zda TOleServer je optimalni pro pouziti (D)COM
>pri volani metod AutomationObjektu z klienta dostanu hlasku:
>"Unable to retrieve a pointer to a running object registered with OLE for
..".
> PROC? Vzdyt sluzba bezi.
To vypada na problem s nastavenim prav, podival bych se na dcomcnfg.exe
Alexandr STEFEK
FB a nastaveni Charset 1250
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 26.3.2003 09:24:51
Do TIBDatabase.Params dopln radek
lc_ctype=WIN1250
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of aldik(zv)quick(tec)cz
>
> a predpokladam i insert, hlasi to o chybne
> konverzi znaku, predpokladam tedy ze musim jeste
>
> Aldik Pavel
odstraneni ESC znaku z textu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 09:01:19
MjYuMy4yMDAzICJJbmcuIEphbiBEdWJza/0gLSBTdHJvau1ybmEgUOFsYXZhIjoNCj4+PiBKYSBw
b3V6aXZhbSBuYXNsZWR1amljaSBmdW5rY2kgLSBmdW5ndWplIGkgcHJvIHpuYWt5ICMyNyBhdGQu
DQoNClprdXMgc2UgcG9kaXZhdCBuYSBmdW5rY2kgU3RyaW5nUmVwbGFjZQ0KDQpuYWhyYXplbnlf
c3RyaW5nIDo9IFN0cmluZ1JlcGxhY2UocHV2b2RuaV9zdHJpbmcsIGNvLCBjaW0sIFtyZlJlcGxh
Y2VBbGxdKQ0KDQo+PiBBbGUgayB0b211IHBvdHJlYnVqZXMgc2V6bmFtIEVTQyBzZWt2ZW5jaSBh
IG5haHJhem92YXQgamUgcG9zdHVwbmUNCmplZG51IHBvID4+IGRydWhlLCBwcm90b3plIG5ldmlz
LCBrdGVyZSBidWRvdSB2IHRleHR1IHBvdXppdHkuIEEgRVNDDQo+IHNla3ZlbmNpIGplDQo+PiBu
ZWtvbGlrIGRlc2l0ZWsuDQoNCj4gSmFzbmUuIEphIHRvdG8gcG91eml2YW0gdiBqaW5lIHNvdXZp
c2xvc3RpIC0gaGxlZGFtIGEgbmFocmF6dWppIHYNCj4ga2xhc2lja2VtIGxpZHNreSBjaXRlbG5l
bSB0ZXh0dSB6YW1lbmEgam1lbiwgYWRyZXMgYXRkLiAtIHNlem5hbSBFU0MNCj4gc2VrdmVuY2kg
Ynkgc2Ugc2t1dGVjbmUgbXVzZWwgZG9wbG5pdCBhIGN5a2xpY2t5IHByb2hsZWRhdmF0IC0gb3Zz
ZW0NCj4gIm5la29saWsgZGVzaXRlayIgbWUgemFyYXppbG8sIGphIGpzZW0gdHlwb3ZhbCB0YWsg
ZG8gMTUgcG91eml2YW55Y2gNCj4gdmFyaWFudC4NCiANCkEgcGFrIG5la2RvIHBvdXppamUgbmVq
YWtvdSBqaW5vdSB2YXJpYW50dSwgc2Uga3Rlcm91IG5lcG9jaXRhcyBhIC4uLi4NCg0KLS0gDQpK
YW4gRmlhbGENCm1haWx0bzpqYW4uZmlhbGFAaW9sLmN6
CopyFileEx s funkcnim volanim CopyProgressRoutine
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 26.3.2003 09:14:55
> nemate nekdo ve sbirce funkcni priklad funkce CopyFileEx s volanim
> callbackove funkce typu CopyProgressRoutine. Ne ane se mi to podarit.
> Pokud do parametru "lpProgressRoutine" dam "nil", tak o samozrejme bezi
> bez potizi. Diky za radu.
>
> Pavel Hlubik
vcera sem se stim zlobil a zjistil sem ze pokud parametr pbCancel odkazuje
na boolean=false tak mi to okamzite ukonci copirovani kdyz do nej dam nil
tak je to v poradku (myslel jsem ze pbCancel slouzi k tomu aby na zobrazenem
okne povolil tlacitko storno, ale asi ne)
FB a nastaveni Charset 1250
[*] <aldik(zv)quick(tec)cz> - 26.3.2003 09:01:55
Nastavil jsem si charset a ceske trideni(ted si z
hlavy nevybavim jak;-) na databazi FB podle
navodu no a ted mi na databazi v pohode funguji
inserty a update a trideni je OK, ale problem je
na aplikaci,trebaze se vse tvari dobre a selecty
jsou dobre,tak mi proste ne a ne fungovat update
a predpokladam i insert, hlasi to o chybne
konverzi znaku, predpokladam tedy ze musim jeste
neco nastavit na TIBDatabaze - asi nejaky
parametr abych mohl dobre fungovat, jak na to?;-))
Prosim pomozte mi docela to kvacii,
Aldik Pavel
Jehoz rano nelze nazvat zrovna stastne;-((
odstraneni ESC znaku z textu
[*] Ing. Jan Dubsk� - Stroj�rna P�lava <dubsky(zv)s-palava(tec)cz> - 26.3.2003 08:49:52
>> Ja pouzivam nasledujici funkci - funguje i pro znaky #27 atd.
......
>> Vola se jednoduse
......
> Ale k tomu potrebujes seznam ESC sekvenci a nahrazovat je postupne
jednu po > druhe, protoze nevis, ktere budou v textu pouzity. A ESC
sekvenci je
> nekolik desitek.
Jasne. Ja toto pouzivam v jine souvislosti - hledam a nahrazuji v
klasickem lidsky citelnem textu zamena jmen, adres atd. - seznam ESC
sekvenci by se skutecne musel doplnit a cyklicky prohledavat - ovsem
"nekolik desitek" me zarazilo, ja jsem typoval tak do 15 pouzivanych
variant.
MS SQL - ODBCe - parametr dtDate
[*] Lubomir Fule <fule(zv)humansoft.sk> - 26.3.2003 08:41:10
Zapni si v ODBC administratore trasovanie a potom to spust. Log subor, ktory
sa vytvori mi posli na sukr. adresu (fule(zv)humansoft.sk), potom budeme
mudrejsi...:-) Ja som zatial nemal problemy s datumovymi parametrami.
L.
> pouzivam komponenty ODBCe pro aktualizaci dat
> zdroj: dbf
> cil: MS SQL (puvodne Access):
>
> 1. ODBCQuery - SELECT id, datum FROM dbfTab (MasterQuery)
> 2. ODBCQuery - UPDATE sqlTab SET datum = :datum WHERE id = :id
>
> DataType parametru datum mam nastaveno na dtDate,
> ale presto pri ExecSQL nastane chyba:
> [ODBC SQL Server Driver] Volitelna funkce nebyla implementovana.
>
> Problem se objevuje jen u datumovych parametru, pricemz u Accessu
> bezi vsechno bez chyb. Poradi mi nekdo?
Lock WS po dobe necinnosti
[*] Robert Suska <SuskaR(zv)seznam(tec)cz> - 26.3.2003 08:21:36
Ahoj!
Ved to je ten problem potrebujem to v ramci celeho systemu.
Robo
****************************************
Robert Suska
KORAK SLOVAKIA s.r.o.
Horna 52
974 01 Banska Bystrica
www.korak.sk robert(zv)korak.sk
Network administrator, Delphi programmer
****************************************
Pokud to potrebujes pouze "v ramci aplikace", melo by stacit zpracovat
Application.OnIddle. Tam bys vzdy nastartoval Timer a pokud se v aplikaci
nic nebude dit, po vypreseni Timeru neco spustit.
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
14.3.2003 Robert Suska:
> Ahojte!
> Stojim pred otazkou. Ako napisat taku funkciu ktora by vedela ci sa
> kliklo myskou alebo ci sa tuklo do klavesnice bez toho aby som na to
> pouzil hook. Hookom to mam napisane len sa pytam ze ako je to napr.
> robene v screensaveroch, tiez je pouzity hook ?odstraneni ESC znaku z textu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 08:24:08
MjYuMy4yMDAzICJJbmcuIEphbiBEdWJza/0gLSBTdHJvau1ybmEgUOFsYXZhIjoNCj4gSmEgcG91
eml2YW0gbmFzbGVkdWppY2kgZnVua2NpIC0gZnVuZ3VqZSBpIHBybyB6bmFreSAjMjcgYXRkLg0K
DQo+IGZ1bmN0aW9uIFRGa25paGEuTmFocmFkU3RyaW5nKHZhciBDZWx5IDogc3RyaW5nOyBDb05h
aHIgOiBzdHJpbmc7DQo+IENpbU5haHIgOiBzdHJpbmcpIDogc3RyaW5nOw0KPiB2YXINCj4gICBQ
b3MgOiB3b3JkOw0KPiAgIHMgICA6IHN0cmluZzsNCj4gYmVnaW4NCj4gICBzIDo9ICcnOw0KPiAg
IHJlcGVhdA0KPiAgICAgUG9zIDo9IFN5c3RlbS5Qb3MoQ29OYWhyLENlbHkpOw0KPiAgICAgaWYg
UG9zID4gMCB0aGVuDQo+ICAgICBiZWdpbg0KPiAgICAgICBzIDo9IHMrU3lzdGVtLkNvcHkoQ2Vs
eSwxLFBvcy0xKStDaW1OYWhyOw0KPiAgICAgICBDZWx5IDo9IFN5c3RlbS5Db3B5KENlbHksUG9z
K2xlbmd0aChDb05haHIpLGxlbmd0aChDZWx5KSk7DQo+ICAgICBlbmQ7DQo+ICAgdW50aWwgUG9z
ID0gMDsNCj4gICBzIDo9IHMrQ2VseTsNCj4gICBOYWhyYWRTdHJpbmcgOj0gczsNCj4gZW5kOw0K
DQo+IFZvbGEgc2UgamVkbm9kdXNlDQoNCj4gcHJvY2VkdXJlIFRGa25paGEuQnV0dG9uMkNsaWNr
KFNlbmRlcjogVE9iamVjdCk7DQo+IHZhcg0KPiAgIHggOiBzdHJpbmc7DQo+IGJlZ2luDQo+ICAg
eCA6PSAnYWJjJysjMjcjMzMrJ0FCQyc7DQo+ICAgeCA6PSBOYWhyYWRTdHJpbmcoeCwjMjcjMzMs
JycpOw0KPiAgIE1lbW8xLlRleHQgOj0geDsNCj4gZW5kOw0KDQpBbGUgayB0b211IHBvdHJlYnVq
ZXMgc2V6bmFtIEVTQyBzZWt2ZW5jaSBhIG5haHJhem92YXQgamUgcG9zdHVwbmUNCmplZG51IHBv
IGRydWhlLCBwcm90b3plIG5ldmlzLCBrdGVyZSBidWRvdSB2IHRleHR1IHBvdXppdHkuIEEgRVND
DQpzZWt2ZW5jaSBqZSBuZWtvbGlrIGRlc2l0ZWsuDQoNCg0KLS0gDQpKYW4gRmlhbGENCm1haWx0
bzpqYW4uZmlhbGFAaW9sLmN6
MS SQL - ODBCe - parametr dtDate
[*] J. Hasek <cz602778(zv)tiscali(tec)cz> - 26.3.2003 07:57:13
Zdravim pritomne
pouzivam komponenty ODBCe pro aktualizaci dat
zdroj: dbf
cil: MS SQL (puvodne Access):
1. ODBCQuery - SELECT id, datum FROM dbfTab (MasterQuery)
2. ODBCQuery - UPDATE sqlTab SET datum =3D :datum WHERE id =3D :id
DataType parametru datum mam nastaveno na dtDate,
ale presto pri ExecSQL nastane chyba:
[ODBC SQL Server Driver] Volitelna funkce nebyla implementovana.
Problem se objevuje jen u datumovych parametru, pricemz u Accessu
bezi vsechno bez chyb. Poradi mi nekdo?
diky
J. Hasek
WinXPprof, D4P, MS SQL 8 (i 7)), ODBCe v 3.3.0.6
______________________________________________
Tiscali special: Valka v Iraku - exkluzivne videa agentury Reuters, fotog=
alerie,
online zpravy, diskuze, ankety, kviz. Vice na http://zpravodajstvi.tiscal=
i(tec)cz
MSDN
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 08:02:39
MjEuMy4yMDAzIFBldHIgVm9uZXM6DQo+IEZyb206ICJCcm9uaXNsYXYgS2x16GthIiA8ZGVscGhp
QGN6ZWNoZGFuY2UuY29tPg0KPj4gTmV2aXRlIG5la2RvLCBqZXN0bGkgamUgbmVrZGUga2Ugc3Rh
emVuaSBNU0ROPw0KDQo+IFRvIHNpIG11c2lzIGtvdXBpdC4gS2Ugc3RhemVuaSBqZSBqZW4gUGxh
dGZvcm0gU0RLLg0KDQpBbGUgdG8gb24gdXJjaXRlIG15c2xlbCA6LSkNCmh0dHA6Ly93d3cubWlj
cm9zb2Z0LmNvbS9tc2Rvd25sb2FkL3BsYXRmb3Jtc2RrL3Nka3VwZGF0ZS9wc2RrLWZ1bGwuaHRt
DQoNCi0tIA0KSmFuIEZpYWxhDQptYWlsdG86amFuLmZpYWxhQGlvbC5jeg==
Paramstr(0) pre DLL
[*] Burkovsky Ladislav <Ladislav.Burkovsky(zv)autinform.de> - 26.3.2003 07:50:40
Ahoj konferencia. kto ma napad ako zistit cestu kde sa nachadza natiahnuta
dll-ka.
nieco ako ExtractFileDir(ParamStr(0))
Tlacitko v menu baru
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 07:47:51
Jde udelat normalni polozka menu a bud ji priradit ImageIndex nebo
pouzit uzivatelske vykreslovani menu a nakreslit si tam, co potrebujes
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
17.3.2003 Jan Harman:
> To bych prave chtel, ale jak umistit nejake (jakekoliv) tlacitko
> do Menu baru? Zatim jsem to vyresil tim ze jsem z toho udelal MDI
> aplikaci a uvnitr je jeden maximalizovany form. Tlacitka jsou tam
> automaticky, akorat je jich tam moc. Honza.
HTML32
[*] Vojtech Albrecht <vojtech.albrecht(zv)quick(tec)cz> - 26.3.2003 07:44:34
Dobry den
Nevite nekdo nahodou jak pouzit html32.cnv ?
Udelal jsem prevod RTF do HTML, to je v poradku.
Ale pokud chci zpet z HTML udelat RTF tak dojde k tomuto:
vse se nacte az na obrazek, ale pro obrazek je tam vynechane
m=EDsto. Zda se ze mam asi spatny kod pro zpetnou konverzi ale
nevim jak na to.
Pokud nekdo zna, nebo ma kus kodu na prevod zpet, prosim poradte.
Dekuji.
Delphi 5 prof.
Win 2000
Office 2000
---
Odchoz=ED zpr=E1va neobsahuje viry.
Zkontrolov=E1no antivirov=FDm syst=E9mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.465 / Virov=E1 b=E1ze: 263 - datum vyd=E1n=ED: 25.3.2003
=20
Lock WS po dobe necinnosti
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 07:39:32
Pokud to potrebujes pouze "v ramci aplikace", melo by stacit zpracovat
Application.OnIddle. Tam bys vzdy nastartoval Timer a pokud se v
aplikaci nic nebude dit, po vypreseni Timeru neco spustit.
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
14.3.2003 Robert Suska:
> Ahojte!
> Stojim pred otazkou. Ako napisat taku funkciu ktora by vedela ci sa kliklo
> myskou alebo ci sa tuklo do klavesnice bez toho aby som na to pouzil hook.
> Hookom to mam napisane len sa pytam ze ako je to napr. robene v
> screensaveroch, tiez je pouzity hook ?
odstraneni ESC znaku z textu
[*] Ing. Jan Dubsk� - Stroj�rna P�lava <dubsky(zv)s-palava(tec)cz> - 26.3.2003 07:33:37
Ja pouzivam nasledujici funkci - funguje i pro znaky #27 atd.
function TFkniha.NahradString(var Cely : string; CoNahr : string;
CimNahr : string) : string;
var
Pos : word;
s : string;
begin
s := '';
repeat
Pos := System.Pos(CoNahr,Cely);
if Pos > 0 then
begin
s := s+System.Copy(Cely,1,Pos-1)+CimNahr;
Cely := System.Copy(Cely,Pos+length(CoNahr),length(Cely));
end;
until Pos = 0;
s := s+Cely;
NahradString := s;
end;
Vola se jednoduse
procedure TFkniha.Button2Click(Sender: TObject);
var
x : string;
begin
x := 'abc'+#27#33+'ABC';
x := NahradString(x,#27#33,'');
Memo1.Text := x;
end;> ----- Original Message -----
> From: "Vladimir Teply" <teplyv(zv)chrudim(tec)cz>
>>
>> potrebuju z textoveho souboru odstranit ESC sekvence pro tiskarnu
>> (#27#33...). Nevite nekdo o nejake filtrovaci utilite, pripadne neco
>> jako "najdi a nahrad" i pro znaky mensi nez ASCII 32?
>>
> Ahoj.
> Zkus treba StringReplace
StringReplace ti nepomuze, protoze potrebujes odstranit nejen #27, ale i
znaky za tim a tech je ruzny pocet. Nekdy jeden, nekdy treba 3. To bys
musel vytvorit seznam ESC sekvenci a podle toho seznamu to rusit.
Pokud jsou zapsany ve tvaru #xx, slo by to resit prochazenim textu a
rusenim.
jak instalovat BDEMergeModulePro
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 07:30:02
Je to MergeModul pro InstalShield. Takze cesta vede tudy.
Primo to nenainstalujes. MergeModule neni MSI :-(
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
14.3.2003 Zaplik:
> Po instalaci vznikly tyto dva soubory a z prilozeneho popisu nevim co dal.
> Ten exe slouzi pouze pro vyber driveru.
> BDEMMCFG.EXE
> BDE_PRO.msm
> Doufal jsem, ze se mi nainstaluje nova verze BDE 5.2.
>> to je snad "samoinstalovany" SW, ne?
Vytvorenie komponenty za jazdy
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 25.3.2003 18:56:29
> A ako to spravim? Este som to zatia=B5 nepotreboval, tak=BEe sa =
ospravedlnujem
TZaznam =3D class
EdRel : TEdit;
xxRel : Txx;
constructor Create;
destructor Destroy; override;
end;
constructor TZaznam.Create;
begin
EdRel:=3DTEdit.Create(nil);
xxRel:=3DTxx.Create(nil);
end;
destructor TZaznam.Destroy;
begin
EdRel.Free;
xxRel.Free;
end;
Viz nase kurzy Delphi :-)
Honza
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
=3D HAES - RNDr. Jan Sebelik
=3D http://www.haes(tec)cz
=3D Skolici a konzultacni stredisko pro Delphi a Win32
=3D Vojtiskova 206
=3D 507 81 Lazne Belohrad
=3D tel. 493 792 931 (mobil 776 347735)
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
OutlookExpres a adresa
[*] Robert Plz�k <rpvp(zv)vagnerplast(tec)cz> - 26.3.2003 07:16:01
Takto to delam ja...
procedure RunDefaultWabClient(A: TApplication);
var
S, P: string;
I: Integer;
begin
S :=
AnsiUpperCase(GetRegStringValue('certificate_wab_auto_file\shell\open\comman
d', ''));
If S <> '' then
begin
I := Pos('.EXE', S);
If I > 0 then
begin
S := Copy(S, 2, I + 2);
P := '';
// toto je snad ten soubor :o)
// GetRegStringValue('Software\Microsoft\WAB\WAB4\Wab File Name', '',
HKEY_CURRENT_USER);
ExecuteFile(A, S, '', '', SW_SHOWNORMAL);
end;
end;
end;
Cau
R. Plz�k
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Vlastimil Zden�k
Sent: Tuesday, March 25, 2003 3:28 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: OutlookExpres a adresa
jo, a jeste jeden dotaz,
jak zjistim cestu k wab souboru, ktery se prave pouziva na PC??
Diky moc
Vlasta
D5 Ent, WNT
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:21 PM
Subject: Re: OutlookExpres a adresa
> From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> > Uplne nejlepsi by byl maly prikladek. Sand to pry lze pomoci JEDI od
Petra
> > Vonese...
>
> Stahni si WAB konverzi odtud http://delphi-jedi.org/APILIBRARY. Existuji
na to
> i hotove komponenty http://www.abfsoftware.com/products/abfWAB/
>
> Petr Vones
>
>
odstraneni ESC znaku z textu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.3.2003 07:12:16
10.3.2003 Ludek ZITA:
> ----- Original Message -----
> From: "Vladimir Teply" <teplyv(zv)chrudim(tec)cz>
>>
>> potrebuju z textoveho souboru odstranit ESC sekvence pro tiskarnu
>> (#27#33...). Nevite nekdo o nejake filtrovaci utilite, pripadne neco jako
>> "najdi a nahrad" i pro znaky mensi nez ASCII 32?
>>
> Ahoj.
> Zkus treba StringReplace
StringReplace ti nepomuze, protoze potrebujes odstranit nejen #27, ale
i znaky za tim a tech je ruzny pocet. Nekdy jeden, nekdy treba 3.
To bys musel vytvorit seznam ESC sekvenci a podle toho seznamu to
rusit.
Pokud jsou zapsany ve tvaru #xx, slo by to resit prochazenim textu a
rusenim.
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Balicky
[*] Ing. Pavel �ilinec����)b����ȧ~�� - 26.3.2003 06:30:18
My tedy mame D5, ale mame necelych 80 balicku, ktere nam funguji
bez vetsich problemu. Mozne napovedy jsou napsany nize
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
MR> Ahoj vespolek,
MR> Uz si pripadam jako d....
MR> Asi porad nechapu ty balicky nebo co.
MR> Udelam si jednoduchou aplikaci a ta bud skonci internal error U783
MR> (build) a z toho to bezi (compile)
MR> nebo hlasenim, ze dva balicky obsahuji stejnou unitu.
Vetsinou to hlasi chbu, kdyz se udela nejaka zmena do hlavniho balicku
s framy . Pak nekdy pomuze jen Build (balicku A), ale
nekdy to po nem spadne na chybu a musime Delphi restartovat. Tim je
ale vse vyreseno. Ty vsak asi framy nemas, takze by mel stacit build.
MR> Situace D7 pro
MR> Hlavni aplikace
MR> je MDI hlavni okno, menu toolbar, pouziva balicky A,B.
MR> Balicek A obsahuje spolecne funkce - napojeni databaze,
MR> predky formularu, nejake ciselniky a jejich formulare.
MR> Balicek B vyzaduje balicek A, obsahuje datamodul,
MR> a formulare, zdedene z predku, ktere lezi v balicku A
MR> Kazdy balicek obsahuje funcke pro zobrazeni jeho formularu.
MR> Hlavni aplikace v obsluze menu vola tyto funkce z jednotlivych balicku.
Hlavni aplikace musi mit v requires balicky A, B
MR> Nekdy mi to hlasi, ze balicky A,B pouzivaji stejny unit -
MR> jedna se o predka formulare, ktery je umisten v balicku A.
Dej si build a snaz se odstranit vsechny warningy a hinty (90% z nich
lze odstranit upravou kodu, ...). Mimo jine tam v takovem pripade
budes mit, ze automaticky importuje nejaky soubor ... a to je hlavni
problem ... kdyz prelozis A, tak si naimportuje soubor A1 (ten tam
patri), ale neni tam primo vyjmneovatn, a kdzy potom prelozis B, tak
importuje opet vse, co potrebuje s vyjimkou souboru, ktere jsou jiz
soucasti vsech balicku v requires (jenze to A1 vlastne oficialne
neni), takze pak dojde e kolizi.
MR> Pokud ma balicek B required balicek A, muzu v uses pouzit
MR> unitu z balicku A?
Ano. Kazdy balicek muze obsahovat unity z requires balicku.
MR> Muzu v hlavni aplikaci vubec volat funkce z balicku, ktere ma
MR> required?
Stejne jak predchozi. U Tebe plati souslednost
A ... B ... Hlavni, kde kazdy nasledujici balicek muze pouzivat
cokoliv ze svych predchazejicich balicku
MR> Uz nad tim sedim fakt dlouho a netusim co s tim. Obcas to funguje
MR> obcas ne.
MR> Moc diky za kazdou radu a nakopnuti
Vytvorenie komponenty za jazdy
[*] Bronislav Klu�ka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 22:38:05
uz bych spis volil TObjectList
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Robert Suska
Sent: Tuesday, March 25, 2003 7:34 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Vytvorenie komponenty za jazdy
Ahoj!
A co takto. Nadefinuj si dynamicke pole TEditov a mas to. Naco Ti je ten
blby record ?
var e: array of TEdit;
begin
SetLength(e, 1);
e[0]:=3D TEdit.Create(self);
e[0].Width:=3D 100;
e[0].Left:=3D 10;
e[0].Top:=3D 10;
e[0].Height:=3D 21;
e[0].Parent:=3D Form1;
end;
Robo
****************************************
Robert Suska
KORAK SLOVAKIA s.r.o.
Horna 52
974 01 Banska Bystrica
www.korak.sk robert(zv)korak.sk
Network administrator, Delphi programmer
****************************************
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of =A9velta Jaroslav
Sent: Tuesday, March 25, 2003 3:14 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Vytvorenie komponenty za jazdy
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel :=3D TEdit.Create; //toto ti tu chyba
RelZaznam[i].EdRel.Visible:=3DTrue;
...........
V tvojom objekte mas odkaz na TEdit, ale nikde ho nenaplnas platnou
hodnotou. Preto ti to hadze AV.
Jaroslav =A9velta
Program=E1tor
----------------------------------------------------
C=CDGLER SOFTWARE Slovakia, a.s.
Slia=E8ska 10, 831 02 Bratislava, SK
----------------------------------------------------
-----Original Message-----
From: K=F6tele=B9 J=E1n [mailto:Koteles(zv)lumen.sk]
Sent: Tuesday, March 25, 2003 2:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Vytvorenie komponenty za jazdy
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy programu?
Priklad:
Mam deklaraciu:
TZaznam=3D class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=3DTrue;
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
Vzh=B5adom na to =BEe to nefunguje (vypise acces violation) som asi mimo =
misu.
Mozete ma prosim nasmerovat? Dakujem
jk
---
Prich=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
---
Odch=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
prezerac obrazkov
[*] Bronislav Klu�ka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 22:36:18
1/ nenarves tam real... nemuzes rozdelit bod...., takze spis
x:integer;
x:=3DImage1.Picture.Width div 2;
2/Pictur je obekt, ktery pouze vlastni obrazky, s tim nemanipuluj, zkus
nastavit vlastnostr Stretch (nebo tak nejak) komponente Image(tzn. obraze=
k
se bude resizovat a pak nastav Height a Width komponente Image
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of alex
Sent: Tuesday, March 25, 2003 8:15 PM
To: Konfa Delphi
Subject: Re: prezerac obrazkov
Ahojte,
dakujem za odpovede. Skusal som to nasledovne, hla tu je kod:
procedure TForm1.Button5Click(Sender: TObject);
var
real_x: real;
real_y: real;
begin
real_x :=3D Image1.Picture.Width;
real_y :=3D Image1.Picture.Height;
real_x :=3D real_x / 2;
real_y :=3D real_y / 2;
Image1.Picture.Width :=3D real_x;
Image1.Picture.Height :=3D real_y;
end;
Avsak ked chcem vrazit zmenesene hodnoty naspat, vyhodi mi to
na poslednych dvoch riadkoch nasledovnu hlasku:
Cannot assign to a read-only property
Ak vydelim skutocne rozmery obrazku dvomi, dostanem polovicnu velkost,
ale neviem ako to tam vlozim, aby tuto zmenu vykonal.
:-(((
Alex
-----------------------------------------------------
Bugala Alex - stredoskolak
Win2000 Prof CZ + SP2 + Delphi 3 Client/Server Suite
> > Odes=EDlatel: alex <bugala_a(zv)inMail.sk>
> > na form-e mam niekolko TabSheet-ov na jednom z nich by som chcel
zobrazovat
> > obrazky. Problem je vsak v tom, ze ked do komponenty Image loadnem
obrazok
> > vacsi ako je TabSheet, nezobrazi sa cely.
> > Potreboval by som to urobit tak, aby tam boli posuvniky, a funkcia lu=
py.
>
> Nejdriv nastav velikost Image tak, aby odpovidal rozmerum obrazku.
> Skutecna velikost je (myslim) neco jako Image.Picture.Width,Height.
> Pak TImage.Stretch=3Dtrue (obrazek se bude prispusobovat velikosti
komponenty Image).
> Pak lupa je zvetseni/zmenseni TImage.Width,Height (nemel by se menit po=
mer
vyska/sirka).
> Kdyz to cele das do nejakeho scrollboxu, tak se tam (snad) objevi i
posuvniky.
>
> Honza
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
> =3D HAES - RNDr. Jan Sebelik
> =3D http://www.haes(tec)cz
> =3D Skolici a konzultacni stredisko pro Delphi a Win32
> =3D Vojtiskova 206
> =3D 507 81 Lazne Belohrad
> =3D tel. 493 792 931 (mobil 776 347735)
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
>
> ----------
> Teraz uz domena .SK pre kazdeho uplne ZADARMO.
> Viac info na: http://www.slovaknet.sk/sk-zadarmo.asp
>
>
----------
Teraz uz domena .SK pre kazdeho uplne ZADARMO.
Viac info na: http://www.slovaknet.sk/sk-zadarmo.asp
Balicky
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 25.3.2003 21:00:05
Ahoj vespolek,
Uz si pripadam jako d....
Asi porad nechapu ty balicky nebo co.
Udelam si jednoduchou aplikaci a ta bud skonci internal error U783
(build) a z toho to bezi (compile)
nebo hlasenim, ze dva balicky obsahuji stejnou unitu.
Situace D7 pro
Hlavni aplikace
je MDI hlavni okno, menu toolbar, pouziva balicky A,B.
Balicek A obsahuje spolecne funkce - napojeni databaze,
predky formularu, nejake ciselniky a jejich formulare.
Balicek B vyzaduje balicek A, obsahuje datamodul,
a formulare, zdedene z predku, ktere lezi v balicku A
Kazdy balicek obsahuje funcke pro zobrazeni jeho formularu.
Hlavni aplikace v obsluze menu vola tyto funkce z jednotlivych balicku.
Nekdy mi to hlasi, ze balicky A,B pouzivaji stejny unit -
jedna se o predka formulare, ktery je umisten v balicku A.
Pokud ma balicek B required balicek A, muzu v uses pouzit
unitu z balicku A?
Muzu v hlavni aplikaci vubec volat funkce z balicku, ktere ma
required?
Uz nad tim sedim fakt dlouho a netusim co s tim. Obcas to funguje
obcas ne.
Moc diky za kazdou radu a nakopnuti
--
S pozdravem,
Martin Radvansky
vyhladavanie v adotable
[*] taranis <taranis(zv)centrum.sk> - 25.3.2003 20:41:23
24.3.2003 10:33:38, <delphi-l-owner(zv)clexpert(tec)cz> wrote:
Za odpoved dakujem ale ako prejdem na dalsi zaznam ?
>
>>
>> Mozete mi niekto napisat jednoduchy priklad na vyhladavanie zaznamov v
>adotable?
>
>Adotable.Locate(const KeyFields: String; const KeyValues: Variant; Options:
>TLocateOptions
>): Boolean; override;
>
>To by melo stacit pro hledani daneho zaznamu.
>
>
>Bohdan Voska
>
>
>prezerac obrazkov
[*] alex <bugala_a(zv)inMail.sk> - 25.3.2003 20:15:27
Ahojte,
dakujem za odpovede. Skusal som to nasledovne, hla tu je kod:
procedure TForm1.Button5Click(Sender: TObject);
var
real_x: real;
real_y: real;
begin
real_x := Image1.Picture.Width;
real_y := Image1.Picture.Height;
real_x := real_x / 2;
real_y := real_y / 2;
Image1.Picture.Width := real_x;
Image1.Picture.Height := real_y;
end;
Avsak ked chcem vrazit zmenesene hodnoty naspat, vyhodi mi to
na poslednych dvoch riadkoch nasledovnu hlasku:
Cannot assign to a read-only property
Ak vydelim skutocne rozmery obrazku dvomi, dostanem polovicnu velkost,
ale neviem ako to tam vlozim, aby tuto zmenu vykonal.
:-(((
Alex
-----------------------------------------------------
Bugala Alex - stredoskolak
Win2000 Prof CZ + SP2 + Delphi 3 Client/Server Suite
> > Odes�latel: alex <bugala_a(zv)inMail.sk>
> > na form-e mam niekolko TabSheet-ov na jednom z nich by som chcel
zobrazovat
> > obrazky. Problem je vsak v tom, ze ked do komponenty Image loadnem
obrazok
> > vacsi ako je TabSheet, nezobrazi sa cely.
> > Potreboval by som to urobit tak, aby tam boli posuvniky, a funkcia lupy.
>
> Nejdriv nastav velikost Image tak, aby odpovidal rozmerum obrazku.
> Skutecna velikost je (myslim) neco jako Image.Picture.Width,Height.
> Pak TImage.Stretch=true (obrazek se bude prispusobovat velikosti
komponenty Image).
> Pak lupa je zvetseni/zmenseni TImage.Width,Height (nemel by se menit pomer
vyska/sirka).
> Kdyz to cele das do nejakeho scrollboxu, tak se tam (snad) objevi i
posuvniky.
>
> Honza
> =========================================
> = HAES - RNDr. Jan Sebelik
> = http://www.haes(tec)cz
> = Skolici a konzultacni stredisko pro Delphi a Win32
> = Vojtiskova 206
> = 507 81 Lazne Belohrad
> = tel. 493 792 931 (mobil 776 347735)
> =========================================
>
> ----------
> Teraz uz domena .SK pre kazdeho uplne ZADARMO.
> Viac info na: http://www.slovaknet.sk/sk-zadarmo.asp
>
>
----------
Teraz uz domena .SK pre kazdeho uplne ZADARMO.
Vytvorenie komponenty za jazdy
[*] Robert Suska <SuskaR(zv)seznam(tec)cz> - 25.3.2003 19:33:59
Ahoj!
A co takto. Nadefinuj si dynamicke pole TEditov a mas to. Naco Ti je ten
blby record ?
var e: array of TEdit;
begin
SetLength(e, 1);
e[0]:=3D TEdit.Create(self);
e[0].Width:=3D 100;
e[0].Left:=3D 10;
e[0].Top:=3D 10;
e[0].Height:=3D 21;
e[0].Parent:=3D Form1;
end;
Robo
****************************************
Robert Suska
KORAK SLOVAKIA s.r.o.
Horna 52
974 01 Banska Bystrica
www.korak.sk robert(zv)korak.sk
Network administrator, Delphi programmer
****************************************
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of =A9velta Jaroslav
Sent: Tuesday, March 25, 2003 3:14 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Vytvorenie komponenty za jazdy
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel :=3D TEdit.Create; //toto ti tu chyba
RelZaznam[i].EdRel.Visible:=3DTrue;
...........
V tvojom objekte mas odkaz na TEdit, ale nikde ho nenaplnas platnou
hodnotou. Preto ti to hadze AV.
Jaroslav =A9velta
Program=E1tor
----------------------------------------------------
C=CDGLER SOFTWARE Slovakia, a.s.
Slia=E8ska 10, 831 02 Bratislava, SK
----------------------------------------------------
-----Original Message-----
From: K=F6tele=B9 J=E1n [mailto:Koteles(zv)lumen.sk]
Sent: Tuesday, March 25, 2003 2:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Vytvorenie komponenty za jazdy
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy =
programu?
Priklad:
Mam deklaraciu:
TZaznam=3D class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=3DTrue;
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
Vzh=B5adom na to =BEe to nefunguje (vypise acces violation) som asi mimo =
misu.
Mozete ma prosim nasmerovat? Dakujem
jk
---
Prich=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG =
(http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
=20
---
Odch=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG =
(http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
=20
Sejmuti obrazovky
[*] Bronislav Klu�ka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 18:59:22
Kousek z meho programu (bez reklamy ::))))) )
r := Rect(0, 0, Screen.Width, Screen.Height);
dCanvas := TCanvas.Create;
dCanvas.Handle := GetDC(0);
d := TBitmap.Create;
d.Width := Screen.Width;
d.Height := Screen.Height;
d.Canvas.CopyRect(r,dCanvas,r);
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of David Kraina
Sent: Tuesday, March 25, 2003 6:25 PM
To: Delphi Konference
Subject: Sejmuti obrazovky
Dobry den,
realizoval jsem freewarovou aplikaci SaveSnap (http://MX-3.w3.to), ktera je
jakousi jednoduchou utilitku pro rozsirene sejmuti sejmuti obrazovky. Uklada
do schranky ci souboru, nabizi planovane sejmuti a automaticke v danem
intervalu.
Ale dosti reklamy - operace sejmuti je prilis pomala. Pri zadani nizkeho
intervalu u automatickeho sejmuti to PC proste nedava, a to mam 1,3GHz (nic
moc, ale nejhorsi to taky neni).
Potreboval bych nejaky rychly algoritmus, ktery by sejmul obrazovky velmi
rychle (nejaky primy pristup do pameti, ci tak) a neposkytoval pouze canvas
(nebo klidne jo, ale potrebuju prevest do TBitmap pro ulozeni).
Velice dekuji za pomoc pri realizaci produktu.
S pozdravem
===================================================
David Kraina
---------------------------
Vedouci vyvojarskeho tymu MX-3, programator
http://DKx.on.to
http://MX-3.w3.to
===================================================
Sejmuti obrazovky
[*] Bronislav Klu�ka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 18:59:11
kus z emho programu (bez reklamy ::) )
r := Rect(0, 0, Screen.Width, Screen.Height);
dCanvas := TCanvas.Create;
dCanvas.Handle := GetDC(0);
d := TBitmap.Create;
d.Width := Screen.Width;
d.Height := Screen.Height;
d.Canvas.CopyRect(r,dCanvas,r);
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of David Kraina
Sent: Tuesday, March 25, 2003 6:25 PM
To: Delphi Konference
Subject: Sejmuti obrazovky
Dobry den,
realizoval jsem freewarovou aplikaci SaveSnap (http://MX-3.w3.to), ktera je
jakousi jednoduchou utilitku pro rozsirene sejmuti sejmuti obrazovky. Uklada
do schranky ci souboru, nabizi planovane sejmuti a automaticke v danem
intervalu.
Ale dosti reklamy - operace sejmuti je prilis pomala. Pri zadani nizkeho
intervalu u automatickeho sejmuti to PC proste nedava, a to mam 1,3GHz (nic
moc, ale nejhorsi to taky neni).
Potreboval bych nejaky rychly algoritmus, ktery by sejmul obrazovky velmi
rychle (nejaky primy pristup do pameti, ci tak) a neposkytoval pouze canvas
(nebo klidne jo, ale potrebuju prevest do TBitmap pro ulozeni).
Velice dekuji za pomoc pri realizaci produktu.
S pozdravem
===================================================
David Kraina
---------------------------
Vedouci vyvojarskeho tymu MX-3, programator
http://DKx.on.to
http://MX-3.w3.to
===================================================
Seznam souboru adresare
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 25.3.2003 18:41:53
> Odes=EDlatel: Dalibor <dalibor(zv)torola(tec)cz>
> nemate nekdo nejakou funkci, ktera mi vrati seznam vsech souboru =
daneho=20
> adresare vcetne souboru v jeho podadresarich?
Zkus FindFirst, FindNext, FindClose.
Budes to ale muset volat rekurzivne pro podadresare.
Honza
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
=3D HAES - RNDr. Jan Sebelik
=3D http://www.haes(tec)cz
=3D Skolici a konzultacni stredisko pro Delphi a Win32
=3D Vojtiskova 206
=3D 507 81 Lazne Belohrad
=3D tel. 493 792 931 (mobil 776 347735)
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
Sejmuti obrazovky
[*] David Kraina <DKx(zv)Seznam(tec)cz> - 25.3.2003 18:25:18
Dobry den,
realizoval jsem freewarovou aplikaci SaveSnap (http://MX-3.w3.to), ktera je
jakousi jednoduchou utilitku pro rozsirene sejmuti sejmuti obrazovky. Uklada
do schranky ci souboru, nabizi planovane sejmuti a automaticke v danem
intervalu.
Ale dosti reklamy - operace sejmuti je prilis pomala. Pri zadani nizkeho
intervalu u automatickeho sejmuti to PC proste nedava, a to mam 1,3GHz (nic
moc, ale nejhorsi to taky neni).
Potreboval bych nejaky rychly algoritmus, ktery by sejmul obrazovky velmi
rychle (nejaky primy pristup do pameti, ci tak) a neposkytoval pouze canvas
(nebo klidne jo, ale potrebuju prevest do TBitmap pro ulozeni).
Velice dekuji za pomoc pri realizaci produktu.
S pozdravem
===================================================
David Kraina
---------------------------
Vedouci vyvojarskeho tymu MX-3, programator
http://DKx.on.to
http://MX-3.w3.to
===================================================
Archiv ARC
[*] Martin Falta <martin(zv)aprog(tec)cz> - 25.3.2003 18:06:41
Ahoj,
nevite nekdo o nejake free (neni podminkou) komponente nebo ActiveX, ktera
by umela rozbali archiv ARC?
Diky
Martin
Zjisteni Hwnd z PID procesu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.3.2003 17:50:24
From: "EFG Developer" <developer(zv)efg(tec)cz>
> hm, ale to okno neni videt, ani aplikace neni nikde jinde videt nez v
> taskmanageru pod procesama, v podstate se divim, ze to funguje, protoze
> to bezi bez desktopu (ihned po zapnuti PC (bez prihlaseni)), ale bezi
> to.
A ma ta aplikace vubec nejake okno ? Jinak neexistuje zadny 100%ni zpusob jak
z PID ziskat HWND hlavniho okna.
Petr Vones
ip
[*] Petr Langer <langer(zv)xdom(tec)cz> - 25.3.2003 17:40:41
----- Original Message -----
> From: "Pavel K�epelka" <Estrasius(zv)seznam(tec)cz>
> Sent: Tuesday, March 25, 2003 5:15 PM
> Subject: ip
> Zdravim,
> Jak se identifikuje pocitac ktery se pripojuje k internetu pres jiny
> PC???
Nijak. Na venek je videt pouze ten pocitac pres ktery se pripojujes - ten
pak provadi preklad internich IP na externi IP a zpet.
Pokud by bylo automaticky zvenku videt cokoliv ve vnitrni siti, bylo by to
sakra spatne.
> Delam chat, server bezi na PC ktery je zapojen v siti. Jeden ze
> sitovich PC mam pristup k internetu s pres ten se tam dostava i muj.
> Jak se z venci pripojit k cilovymu serveru???
Na tom vystrcenem pocitaci musis nastavit "premosteni" (premapovani) portu
na kterem ti Chat komunikuje tak, aby to dotazy na nej preposilalo na
pozadovany stroj unvitr site. Co za proxy/firewall mas instalovany? S
WinRoute Pro jsem to resil a je to jednoduche.
HTH
Petr Langer
Balicky a cesty
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.3.2003 17:46:11
From: "Dusan Nagy" <Nagy(zv)inomacomp.sk>
> daj ich kde chces ale nastav systemovu premennu PATH do adresara kde
> sa nachadzaju.
Jenze to muze prinaset urcite problemy. Zaprve je nutne to zapsat do systmeove
PATH promenne (a po odinstalaci zase po sobe odstranit), dale se muze stat ze
v ceste uz bude take nekde BPL stejneho nazvu z jine aplikace ale starsi verze
a podobne. Vzhledem k tomu, ze PE loader hleda importovane DLL nejdrive tam
kde je EXE soubor me toto reseni prijde nejsnazsi.
Jen pro zajimavost, ve Windows XP SP1 byla zavedena funkce SetDllDirectory.
Petr Vones
Re[2]: Balicky a cesty
[*] Dusan Nagy <Nagy(zv)inomacomp.sk> - 25.3.2003 17:39:12
Dobr=FD den,
25. marca 2003, 16:51:45, napsal jste:
PV> From: "Martin Radvansky" <delphicz(zv)stereo(tec)cz>
>> Mam aplikaci, ktera pouziva balicky. Rad bych vsechny balicky umistil
>> do jednoho adresare v ramci aplikace, napr. BPL. Da se nastavit, kde
>> bude hlavni exe hledat balicky? Samozrejme ze ve stejnem adresari,
PV> Ne, balicky jsou totez co DLL a plati pro ne tedy stejna pravidla vyh=
ledavani.
PV> Dej je do stejneho adresare jako EXE.
PV> Petr Vones
daj ich kde chces ale nastav systemovu premennu PATH do adresara kde
sa nachadzaju.
--=20
S pozdravem,
Dusan
Nagy(zv)inomacomp.sk
create za behu aplikace
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 25.3.2003 17:04:08
>Zdravim. Poradte, prosim, kde delam chybu. Nize uvadim kousek programu. Dle
meho nazoru je vse OK, ale asi >nebude, protoze tlacitko MyCudl se
nezobrazi. Proc asi ??? Dik za rady. Delphik
>
>procedure TTEST03.FormCreate(Sender: TObject);
>begin
>...
>...
> MyCudl := MyTCudl.Create(Self);
*******************************
napr. MyCudl.Parent:=Self;
*******************************
Roman
==============================
http://kouzelne.misto(tec)cz
ip
[*] Pavel K�epelka <Estrasius(zv)seznam(tec)cz> - 25.3.2003 17:15:52
Zdravim,
Jak se identifikuje pocitac ktery se pripojuje k internetu pres jiny
PC???
Delam chat, server bezi na PC ktery je zapojen v siti. Jeden ze
sitovich PC mam pristup k internetu s pres ten se tam dostava i muj.
Jak se z venci pripojit k cilovymu
serveru???
______________________________________________________________________
Reklama:
Jarn=ED pom=ECna. Zm=EC=F2 se d=EDky nov=FDm, komfortn=EDm barevn=FDm =E8=
o=E8k=E1m FreshLook! Nyn=ED ak=E8n=ED nab=EDdka. V=EDce na http://ad2.s=
create za behu aplikace - VYRESENO (jsem to ale tu
[*] <delphik(zv)email(tec)cz> - 25.3.2003 16:59:05
Ahoj, na muj dotaz z asi pred deseti minutami uz nereagujte. Uz jsem zjis=
til chybu - zapomnel jsem urcit MyCudl.Parent. Kdyz jsem zadal MyCudl.Par=
ent :=3D Self, tak je jiz vse tak jak ma byt. Delphik
_________________________________________________________________________=
_____
U=B9et=F8=EDte, kdy=BE to stihnete... Slevy produkt=F9 HP a=BE 40 %! Note=
book 25.980 K=E8, server 19.980 K=E8, po=E8=EDta=E8 + monitor 17.700 K=E8=
! V=EDce http://www.email(tec)cz/akce_hp
create za behu aplikace
[*] tondrej(zv)t-online.de - 25.3.2003 16:53:51
> Poradte, prosim, kde delam chybu.
[snip]
> type MyTCudl = class(TButton)
[snip]
> procedure TTEST03.FormCreate(Sender: TObject);
> begin
> ...
> ...
> MyCudl := MyTCudl.Create(Self);
MyCudl.Parent := Self;
...
HTH
Balicky a cesty
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.3.2003 16:51:45
From: "Martin Radvansky" <delphicz(zv)stereo(tec)cz>
> Mam aplikaci, ktera pouziva balicky. Rad bych vsechny balicky umistil
> do jednoho adresare v ramci aplikace, napr. BPL. Da se nastavit, kde
> bude hlavni exe hledat balicky? Samozrejme ze ve stejnem adresari,
Ne, balicky jsou totez co DLL a plati pro ne tedy stejna pravidla vyhledavani.
Dej je do stejneho adresare jako EXE.
Petr Vones
create za behu aplikace
[*] <delphik(zv)email(tec)cz> - 25.3.2003 16:50:38
Zdravim. Poradte, prosim, kde delam chybu. Nize uvadim kousek programu. D=
le meho nazoru je vse OK, ale asi nebude, protoze tlacitko MyCudl se nezo=
brazi. Proc asi ??? Dik za rady. Delphik
=2E..
=2E..
type MyTCudl =3D class(TButton)
end;
var MyCudl:MyTCudl;
=2E..
=2E..
=2E..
=2E..
procedure TTEST03.FormCreate(Sender: TObject);
begin
=2E..
=2E..
MyCudl :=3D MyTCudl.Create(Self);
MyCudl.Left :=3D 8;
MyCudl.Top :=3D 8;
MyCudl.Width :=3D 80;
MyCudl.Height :=3D 25;
=2E..
=2E..
MyCudl.Visible :=3D True;
Self.Repaint;
=2E..
=2E..
end;
_________________________________________________________________________=
_____
U=B9et=F8=EDte, kdy=BE to stihnete... Slevy produkt=F9 HP a=BE 40 %! Note=
book 25.980 K=E8, server 19.980 K=E8, po=E8=EDta=E8 + monitor 17.700 K=E8=
! V=EDce http://www.email(tec)cz/akce_hp
Balicky a cesty
[*] Bronislav Klucka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 16:46:23
zkus hlavni menu: project/options/direct....
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Martin Radvansky
Sent: Tuesday, March 25, 2003 4:17 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Balicky a cesty
Zdravim,
Mam aplikaci, ktera pouziva balicky. Rad bych vsechny balicky umistil
do jednoho adresare v ramci aplikace, napr. BPL. Da se nastavit, kde
bude hlavni exe hledat balicky? Samozrejme ze ve stejnem adresari,
nebo v system32 to funguje.
Jeste podotykam, ze ty balicky se nahravaji implicitne, takze je
nelouduju sam.
D7 Pro
Diky
--
S pozdravem,
Martin Radvansky
Balicky a cesty
[*] tondrej(zv)t-online.de - 25.3.2003 16:38:09
> Mam aplikaci, ktera pouziva balicky. Rad bych vsechny
> balicky umistil do jednoho adresare v ramci aplikace,
> napr. BPL. Da se nastavit, kde bude hlavni exe hledat
> balicky?
>
> Samozrejme ze ve stejnem adresari, nebo v system32 to
> funguje.
>
> Jeste podotykam, ze ty balicky se nahravaji implicitne,
> takze je nelouduju sam.
Implicitne linkovane kniznice nehlada samotny .exe ale operacny system
este pred spustenim kodu. Preto samotny .exe toto hladanie nedokaze
ovplyvnit.
Poradie adresarov, v ktorych pritom operacny system hlada, je popisane
v dokumentacii Platform SDK: Base Services\DLLs, Processes and
Threads\Dynamic-Link Libraries\Load-Time Dynamic Linking.
HTH
Vytvorenie komponenty za jazdy
[*] �velta Jaroslav <jsvelta(zv)ciglersw.sk> - 25.3.2003 15:14:05
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel :=3D TEdit.Create; //toto ti tu chyba
RelZaznam[i].EdRel.Visible:=3DTrue;
...........
V tvojom objekte mas odkaz na TEdit, ale nikde ho nenaplnas platnou =
hodnotou.
Preto ti to hadze AV.
Jaroslav =A9velta
Program=E1tor
----------------------------------------------------
C=CDGLER SOFTWARE Slovakia, a.s.
Slia=E8ska 10, 831 02 Bratislava, SK
----------------------------------------------------
-----Original Message-----
From: K=F6tele=B9 J=E1n [mailto:Koteles(zv)lumen.sk]
Sent: Tuesday, March 25, 2003 2:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Vytvorenie komponenty za jazdy
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy =
programu?
Priklad:
Mam deklaraciu:
TZaznam=3D class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=3DTrue;
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
Vzh=B5adom na to =BEe to nefunguje (vypise acces violation) som asi mimo =
misu.
Mozete ma prosim nasmerovat?
Dakujem
jk
---
Prich=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG =
(http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
=20
---
Odch=E1dzaj=FAca spr=E1va neobsahuje v=EDrusy.
Skontrolovan=E9 antiv=EDrusov=FDm syst=E9mom AVG =
(http://www.grisoft(tec)cz).
Verzia: 6.0.463 / V=EDrusov=E1 datab=E1za: 262 - d=E1tum vydania: 17. 3. =
2003
Seznam souboru adresare
[*] Pavel Hlub�k <hlubik(zv)dashofer(tec)cz> - 25.3.2003 16:23:12
Zkus todle:
procedure NactiSeznamSouboru(cesta,maska:string;var
sl:TStringList;norit:boolean=false);
var
sr:TSearchRec;
begin
if FindFirst(IncludeTrailingPathDelimiter(cesta)+maska,faAnyFile,sr)=0
then
begin
repeat
if (sr.Attr and faDirectory)=faDirectory then
begin
if sr.Name[1]<>'.' then
begin
if norit then
NactiSeznamSouboru(IncludeTrailingPathDelimiter(cesta)+sr.Name,maska,sl,
norit);
end;
end
else
sl.Add(IncludeTrailingPathDelimiter(cesta)+sr.Name);
until FindNext(sr)<>0;
end;
sysutils.FindClose(sr);
end;
Priklad pouziti:
sl:=TStringlist.Create;
NactiSeznamSouboru('C:\WINDOWS','*.dll',sl,true);
Pred uzavrenim aplikace nezapomen na uvolneni pameti:
sl.Free;
K jednotlivym polozkam se dostanes podobne jako k polozkam v poli:
sl[i].
Pavel Hlubik
hlubik(zv)dashofer(tec)cz
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Langer
> Sent: Tuesday, March 25, 2003 3:47 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Seznam souboru adresare
>
>
> Nedavno (a jiste mnohokrat pred tim) se to tu objevilo -
> pohledej v archivu.
>
> Petr Langer
>
> ----- Original Message -----
> From: "Dalibor" <dalibor(zv)torola(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Tuesday, March 25, 2003 2:51 PM
> Subject: Seznam souboru adresare
>
>
> > Ahoj,
> > nemate nekdo nejakou funkci, ktera mi vrati seznam vsech souboru
> > daneho
> > adresare vcetne souboru v jeho podadresarich?
> > Diky
> >
> >
> >
>
>
Balicky a cesty
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 25.3.2003 16:17:27
Zdravim,
Mam aplikaci, ktera pouziva balicky. Rad bych vsechny balicky umistil
do jednoho adresare v ramci aplikace, napr. BPL. Da se nastavit, kde
bude hlavni exe hledat balicky? Samozrejme ze ve stejnem adresari,
nebo v system32 to funguje.
Jeste podotykam, ze ty balicky se nahravaji implicitne, takze je
nelouduju sam.
D7 Pro
Diky
--
S pozdravem,
Martin Radvansky
Zjisteni Hwnd z PID procesu
[*] p.sestak(zv)corag.sk - 25.3.2003 15:55:49
obavam sa, ze ak je aplikacia spustena Task Schedulerom,
bezi na inom desktope a nie na tom na ktorom bezia ostatne aplikacie
a zrejme preto sa neda ziskat jej HWND.
To je vsak lem moj dohad.
Palo Sestak.
CopyFileEx s funkcnim volanim CopyProgressRoutine
[*] Pavel Hlub�k <hlubik(zv)dashofer(tec)cz> - 25.3.2003 15:56:43
Zdravim,
nemate nekdo ve sbirce funkcni priklad funkce CopyFileEx s volanim
callbackove funkce typu CopyProgressRoutine. Ne ane se mi to podarit.
Pokud do parametru "lpProgressRoutine" dam "nil", tak o samozrejme bezi
bez potizi. Diky za radu.
Pavel Hlubik
Seznam souboru adresare
[*] Petr Langer <langer(zv)xdom(tec)cz> - 25.3.2003 15:47:14
Nedavno (a jiste mnohokrat pred tim) se to tu objevilo - pohledej v archivu.
Petr Langer
----- Original Message -----
From: "Dalibor" <dalibor(zv)torola(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:51 PM
Subject: Seznam souboru adresare > Ahoj,
> nemate nekdo nejakou funkci, ktera mi vrati seznam vsech souboru daneho
> adresare vcetne souboru v jeho podadresarich?
> Diky
>
>
>
Overovani emailove adresy
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 25.3.2003 15:56:43
DD,
>adresu kter=E1 pravidly projde, ale zjevn=EC je blb=EC. Je mi jasn=FD, =BE=
e
chyba je v
>pravidlech, ale m=E1 eml adresa n=ECjak=E1 p=F8esn=EC definovan=E9 pravi=
dla ?
emailova adresa ma definovana pravidla - staci se podivat do
prislusneho RFC (2821 a 2822).
Myslim, ze vetsina lidi by se divila co vsechno je jeste emailova
adresa.
Strucne receno - teoreticky muze byt temer libovolny znak pred
zavinacem. V praxi lze
pred zavinacem doporucit pouzivani pouze alfanumerickych znaku plus
nekolik pouzivanych
dalsich znaku ('.', '-', " ' "). Za zavinacem je to doufam jasne.
PS: pan Rybicka by mohl mit podle RFC treba takovouhle adresu:
"<<^^><"(zv)seznam(tec)cz
(ale posilat na ni email bych radeji nezkousel :-)
D. Toman
Zjisteni Hwnd z PID procesu
[*] EFG Developer <developer(zv)efg(tec)cz> - 25.3.2003 15:54:55
hm, ale to okno neni videt, ani aplikace neni nikde jinde videt nez v
taskmanageru pod procesama, v podstate se divim, ze to funguje, protoze
to bezi bez desktopu (ihned po zapnuti PC (bez prihlaseni)), ale bezi
to.
proste bych potreboval neco co mi z PIDu zjisti handle ty aplikace
(jejiho hlavniho okna).
mam predstavu, ze az budu mit ten handle tak ty aplikaci poslu message,
ktery spusti kod, ktery mi zobrazi tray ikonku.
Petr Sikola
> Ja jsem na webu a reverzem .NET knihovny ve ktere je funkce
> na zjisteni hlavniho okna nasel tento test:
>
> if ((IsWindowVisible(window)) and (GetWindow(window,
> GW_OWNER) = 0)) then
> Result := true;
>
> kde window beru z enumWindowCallback podobne jako je to v JCL.
>
> HTH
> Petr Langer
> ----- Original Message -----
> From: "EFG Developer" <developer(zv)efg(tec)cz>
> > zdravim, mam aplikaci, kterou spoustim v planovaci uloh po
> startu PC,
> > v task listu neni videt, je videt jen v procesech. Funkce
> FindWindow
> > take nic "nenajde".
> >
> > Pomoci RunningProcessesList a GetPidFromProcessName z JclSysInfo
> > overim, ze aplikace bezi a zjistim jeji PID. Nedari se mi
> vsak zjistit
> > handle jejiho hlavniho okna (GetMainAppWndFromPid), stale
> mi to vraci
> > 0. Potrebuju totiz te aplikaci poslat zpravu.
> >
> > Nesetkal jste se s tim nekdo?
> > dekuji za nakopnuti.
> >
> > Petr Sikola
Vytvorenie komponenty za jazdy
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 25.3.2003 15:24:27
>Mam deklaraciu:
>TZaznam= class
> EdRel:TEdit;
>end;
>
>Var Zaznam[1..10] of TZaznam;
>
>a potom v jednej procedure nieco taketo:
> RelZaznam[i]:=TRelZaznam.Create;
> RelZaznam[i].EdRel.Visible:=True;
> RelZaznam[i].EdRel.Left:=10;
> RelZaznam[i].EdRel.Top:=i*30;
> RelZaznam[i].EdRel.Width:=121;
> RelZaznam[i].EdRel.Height:=21;
>
>Vzh�adom na to �e to nefunguje (vypise acces violation) som asi mimo misu.
>Mozete ma prosim nasmerovat?
>Dakujem
Sice nevim o co se to pokousis, ale chybi ti tam neco jako
RelZaznam[i].EdRel:=TEdit.Create;
Roman
==============================
http://kouzelne.misto(tec)cz
Zjisteni Hwnd z PID procesu
[*] Petr Langer <langer(zv)xdom(tec)cz> - 25.3.2003 15:46:07
Ja jsem na webu a reverzem .NET knihovny ve ktere je funkce na zjisteni
hlavniho okna nasel tento test:
if ((IsWindowVisible(window)) and (GetWindow(window, GW_OWNER) = 0)) then
Result := true;
kde window beru z enumWindowCallback podobne jako je to v JCL.
HTH
Petr Langer
----- Original Message -----
From: "EFG Developer" <developer(zv)efg(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:40 PM
Subject: Zjisteni Hwnd z PID procesu
> zdravim, mam aplikaci, kterou spoustim v planovaci uloh po startu PC, v
> task listu neni videt, je videt jen v procesech. Funkce FindWindow take
> nic "nenajde".
>
> Pomoci RunningProcessesList a GetPidFromProcessName z JclSysInfo overim,
> ze aplikace bezi a zjistim jeji PID. Nedari se mi vsak zjistit handle
> jejiho hlavniho okna (GetMainAppWndFromPid), stale mi to vraci 0.
> Potrebuju totiz te aplikaci poslat zpravu.
>
> Nesetkal jste se s tim nekdo?
> dekuji za nakopnuti.
>
> Petr Sikola
>
>
>
Vytvorenie komponenty za jazdy
[*] K�tele� J�n <Koteles(zv)lumen.sk> - 25.3.2003 15:43:45
> No asi by si mel mit svuj konstruktor, ve kterem si vytvoris=20
> tu instanci
A ako to spravim? Este som to zatia=B5 nepotreboval, tak=BEe sa =
ospravedlnujem
za svoju nevedomost. Ak to chapem dobre, zrejme by potom stacilo volat
konstruktor, ktory zariadi ten zaklad....> .. Ale kdyz tak na to koukam nechces spis udelat
> TZaznam=3Dclass(TCustomEdit)
Nie nechcem to spravit, budem tam potrebovat aj dalsie komponenty okrem
OutlookExpres a adresa
[*] Vlastimil Zden�k <delphi(zv)gestore(tec)cz> - 25.3.2003 15:27:39
jo, a jeste jeden dotaz,
jak zjistim cestu k wab souboru, ktery se prave pouziva na PC??
Diky moc
Vlasta
D5 Ent, WNT
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:21 PM
Subject: Re: OutlookExpres a adresa
> From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> > Uplne nejlepsi by byl maly prikladek. Sand to pry lze pomoci JEDI od
Petra
> > Vonese...
>
> Stahni si WAB konverzi odtud http://delphi-jedi.org/APILIBRARY. Existuji
na to
> i hotove komponenty http://www.abfsoftware.com/products/abfWAB/
>
> Petr Vones
>
>Ako na service application
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 25.3.2003 15:43:56
----- Original Message -----
From: "Roland Turcan" <rolo(zv)sedas.sk>
> Chcel by som spravit sluzbu, ktora by sa spravala ako FireBird
> Guardian. T.j. na Win9x by bezala ako aplikacia a na WinNT ako
> Service.
Ahoj.
Ted delam neco podobneho a zatim mi to vychazi napsat to vicem mene dvakrat,
jednou jako service a jednou jako normalni aplikaci.
Cely vykonny kod mam �ve spolecnych unitach a prujekty service i stdapp jen
obaluji spolecne funkce.
Ludek
OutlookExpres a adresa
[*] Vlastimil Zden�k <delphi(zv)gestore(tec)cz> - 25.3.2003 15:14:22
WAB od tebe je skoro to, co potrebuji!! Hotove komponenty (za $) delaji
uplne to samy....
Ja bych ale potreboval najit outlook kontakt bez uzivatelske komunikace -
cislo telefonu mi poda jina aplikace, zavolam fci v me aplikaci a ta mi
vrati prijmeni, jmeno, email.... z outlooku.
lze to nejak udelat??
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:21 PM
Subject: Re: OutlookExpres a adresa
> From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> > Uplne nejlepsi by byl maly prikladek. Sand to pry lze pomoci JEDI od
Petra
> > Vonese...
>
> Stahni si WAB konverzi odtud http://delphi-jedi.org/APILIBRARY. Existuji
na to
> i hotove komponenty http://www.abfsoftware.com/products/abfWAB/
>
> Petr Vones
>
>Overovani emailove adresy
[*] Tom Beran<tfuzzy(zv)atlas(tec)cz> - 25.3.2003 15:37:33
> Mam v DB overovaci pravidla, ale user-ri vzdy spolehlive
> zvladnou vymyslet adresu ktera pravidly projde, ale zjevne je
> blbe. Je mi jasny, ze chyba je v pravidlech, ale ma eml
> adresa nejaka presne definovane pravidla ?
No, bezne pouzivany format (kdy si v adrese nedefinujes, pres ktere serery ma e-mail projit), by mohl jit overit napr. timto regularnim
vyrazem:
[_a-zA-Z0-9\-\.]+(zv)[_a-zA-Z0-9\-]+(\.[_a-zA-Z0-9\-]+)+
Jinac presne rozpitvane by to snad melo byt v RFC #822.
Vytvorenie komponenty za jazdy
[*] Pavel Poles <xCony(zv)seznam(tec)cz> - 25.3.2003 15:32:53
No asi by si mel mit svuj konstruktor, ve kterem si vytvoris tu instanci
TEdit....
.. Ale kdyz tak na to koukam nechces spis udelat
TZaznam=class(TCustomEdit)
...
?
Pavel Poles
----- Original Message -----
From: "K�tele� J�n" <Koteles(zv)lumen.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, March 25, 2003 2:19 PM
Subject: Vytvorenie komponenty za jazdy
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy programu?
Priklad:
Mam deklaraciu:
TZaznam= class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=TRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=True;
RelZaznam[i].EdRel.Left:=10;
RelZaznam[i].EdRel.Top:=i*30;
RelZaznam[i].EdRel.Width:=121;
RelZaznam[i].EdRel.Height:=21;
Vzh�adom na to �e to nefunguje (vypise acces violation) som asi mimo misu.
Mozete ma prosim nasmerovat?
Dakujem
jk
Vytvorenie komponenty za jazdy
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 25.3.2003 15:09:44
RelZaznam[i]:=3DTRelZaznam.Create; //tim se vytvori instance tridy,
ale jeste ne instance toho EdRel
RelZaznam[i].EdRel:=3D TEdit.Create(...); //vytvoreni instance EdRel
RelZaznam[i].EdRel.Visible:=3DTrue; //a tady uz by to nemelo padat
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
//a jeste nezapomen pripsat
RelZaznam[i].EdRel.Parent:=3D .... //tvuj form
Zdravim
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]=20
http://web.redbox(tec)cz/petr.brant
D&COMM s.r.o.
Korunova=E8n=ED 6
Praha 7
tel. +420724007234
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy
programu?
Priklad:
Mam deklaraciu:
TZaznam=3D class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=3DTrue;
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
Vzh=B5adom na to =BEe to nefunguje (vypise acces violation) som asi =
mimo
misu.
Ako na service application
[*] Roland Turcan <rolo(zv)sedas.sk> - 25.3.2003 14:41:01
Hello Delphi CZ konferencia!
Chcel by som spravit sluzbu, ktora by sa spravala ako FireBird
Guardian. T.j. na Win9x by bezala ako aplikacia a na WinNT ako
Service.
Ako na to?
--
Best regards, TRoland
Vytvorenie komponenty za jazdy
[*] K�tele� J�n <Koteles(zv)lumen.sk> - 25.3.2003 14:19:19
Mozete my prosim popisat ako vytvorit nejaku komponenu za jazdy =
programu?
Priklad:
Mam deklaraciu:
TZaznam=3D class
EdRel:TEdit;
end;
Var Zaznam[1..10] of TZaznam;
a potom v jednej procedure nieco taketo:
RelZaznam[i]:=3DTRelZaznam.Create;
RelZaznam[i].EdRel.Visible:=3DTrue;
RelZaznam[i].EdRel.Left:=3D10;
RelZaznam[i].EdRel.Top:=3Di*30;
RelZaznam[i].EdRel.Width:=3D121;
RelZaznam[i].EdRel.Height:=3D21;
Vzh=B5adom na to =BEe to nefunguje (vypise acces violation) som asi =
mimo misu.
Mozete ma prosim nasmerovat?
Dakujem
Seznam souboru adresare
[*] Dalibor <dalibor(zv)torola(tec)cz> - 25.3.2003 14:51:34
Ahoj,
nemate nekdo nejakou funkci, ktera mi vrati seznam vsech souboru daneho
adresare vcetne souboru v jeho podadresarich?
Diky
Combo SelStart AutoSelect
[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 25.3.2003 14:43:10
Ahoj,
mam takove dva mensi problemky s ComboBoxem
1) jak udelat aby nebyl napsany text oselektovany po kliknuti mysi na
combicko,
asi jako kdyz u editu date AutoSelect:=3DFalse
2) U editu lze pomoci SelStart zjistit aktualni pozici kurzoru,
U comba sice taky, ale pouze pokud ma Combo fokus.
Po ztrate fokusu vraci SelStart 0
Dekuji za rady
Tomas Bihary
---
Odchoz=ED zpr=E1va neobsahuje viry.
Zkontrolov=E1no antivirov=FDm syst=E9mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.463 / Virov=E1 b=E1ze: 262 - datum vyd=E1n=ED: 17.3.2003
Zjisteni Hwnd z PID procesu
[*] EFG Developer <developer(zv)efg(tec)cz> - 25.3.2003 14:40:24
zdravim, mam aplikaci, kterou spoustim v planovaci uloh po startu PC, v
task listu neni videt, je videt jen v procesech. Funkce FindWindow take
nic "nenajde".
Pomoci RunningProcessesList a GetPidFromProcessName z JclSysInfo overim,
ze aplikace bezi a zjistim jeji PID. Nedari se mi vsak zjistit handle
jejiho hlavniho okna (GetMainAppWndFromPid), stale mi to vraci 0.
Potrebuju totiz te aplikaci poslat zpravu.
Nesetkal jste se s tim nekdo?
dekuji za nakopnuti.
Petr Sikola
Outlook a nalezeni kontaktu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.3.2003 14:23:00
From: "Vlastimil Zden�k" <delphi(zv)gestore(tec)cz>
> mohl by mi nekdo poradit, jak najdu v OutlookExpresu a ve "velkym" Outlooku
> kontakt podle napr.
> emailu nebo telefoniho cisla?
Ve "velkem" Outlooku pomoci komponent ktere mas v palete Servers.
Petr Vones
Overovani emailove adresy
[*] Ji�� Baudy� - 25.3.2003 14:28:33
Kr=E1sn=FD den,
ne=F8e=B9il jste n=ECkdo ov=EC=F8ov=E1n=ED eml. adres.
M=E1m v DB ov=EC=F8ovac=ED pravidla, ale user-=F8i v=BEdy spolehliv=EC zv=
l=E1dnou vymyslet
adresu kter=E1 pravidly projde, ale zjevn=EC je blb=EC. Je mi jasn=FD, =BE=
e chyba je v
pravidlech, ale m=E1 eml adresa n=ECjak=E1 p=F8esn=EC definovan=E9 pravid=
la ?
D=EDky
Jirka
ADMIN: OT: Flex 4.0 Personal Edition - prvni beta
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.3.2003 14:27:42
Puvodni zprava, kterou napsal Ond=F8ej Tu=E8n=FD dne 25 Mar 2003:
> Oznamujeme, ze na webu www.flexlanguage.com je pro vsechny vyvojare
> k dispozici prvni verejna beta verze produktu Flex 4.0 Personal Edition =
-
> prekladace programovaciho jazyka Flex.
Prosim oznamuj to priste do jine konference, toto nema s Delphi vubec nic
spolecneho a pokud to bude komercni, je to navic v dalsim hrubem rozporu
s pravidly. Ber to jako napomenuti.
S pozdravem
Petr Zahradnik, pocitacovy expert
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 475 500 610, 475 501 627, 475 511 337
Mobilni telefon: 602 409 601, Fax: 475 511 338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D
OutlookExpres a adresa
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.3.2003 14:21:01
From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> Uplne nejlepsi by byl maly prikladek. Sand to pry lze pomoci JEDI od Petra
> Vonese...
Stahni si WAB konverzi odtud http://delphi-jedi.org/APILIBRARY. Existuji na to
i hotove komponenty http://www.abfsoftware.com/products/abfWAB/
Petr Vones
Schovanie okna po spusteni programu
[*] Bronislav Klucka <delphi(zv)pro2-soft(tec)com> - 25.3.2003 14:19:20
spis zkus: ShowWindow(Handle, SW_MINIMIZE);
ShowWindowAsync(Application.Handle, SW_HIDE);
ShowWindow(application.Handle, SW_HIDE);
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Roland Turcan
Sent: Tuesday, March 25, 2003 9:51 AM
To: Delphi CZ konferencia
Subject: Schovanie okna po spusteni programu
Hello Delphi CZ konferencia!
V TfrmMain.OnActivate volam tieto prikazy aby mi schoval okno a zrusil zo
zoznamu aplikacii, hlavneho panela a minimalizoval sa.
Lenze program sa spusti zrusi sa zo zoznamu aplikacii a hlavneho
panela, ale sa neminimalizuje
SendMessage(Handle, SW_MINIMIZE, 0, 0);
ShowWindowAsync(Application.Handle, SW_HIDE);
SendMessage(Handle, SW_HIDE, 0, 0);
Co stym ?
--
Best regards, TRoland
OT: Flex 4.0 Personal Edition - prvni beta verze
[*] Ond�ej Tu�n������'�������̿ - 25.3.2003 13:50:26
Oznamujeme, ze na webu www.flexlanguage.com je pro vsechny vyvojare
k dispozici prvni verejna beta verze produktu Flex 4.0 Personal Edition
- prekladace programovaciho jazyka Flex.
Flex je novy univerzalni programovaci jazyk klasicke koncepce s rozsahlymi
moznostmi a do detailu promyslenymi vlastnostmi. Umoznuje efektivni vyvoj
rozsahlych distribuovanych multiplatformnich aplikaci i snadne psani
drobnych jednoucelovych programku.
Instalace je urcena pro Windows NT/2000/XP a podporuje preklad pro tuto
platformu na IA-32. Podpora pro Linux byla docasne odstranena a bude znovu
doplnena pozdeji.
Pro technickou podporu, dotazy, diskutovani o Flexu a souvisejicich vecech,
zasilani bug reportu, prani a podobne je urcena konference
flex-support(zv)flexlanguage.com. Pro prihlaseni poslete prazdny mail na adresu
flex-support-subscribe(zv)flexlanguage.com a ridte se prosim pokyny v
automaticke odpovedi.
Prosim vyuzivejte prednostne mailing listu flex-support(zv)flexlanguage.com
a neodpovidejte primo na tuto zpravu.
Pokud chcete byt informovani o dalsich beta verzich, prihlaste se do mailing
listu flex-announce(zv)flexlanguage.com. Pro prihlaseni poslete prazdny mail
na adresu flex-announce-subscribe(zv)flexlanguage.com a ridte se prosim pokyny
v automaticke odpovedi.
Uvitame jakekoliv pripominky a tesime se na prvni beta testery.
--
Ondrej Tucny a Ales Prochaska, autori Flexu
DLL a formular
[*] Vlastimil Zden�k <delphi(zv)gestore(tec)cz> - 25.3.2003 13:34:23
jeste bych si dovolil jeden dotaz :)
v DLL prilinkovane za behu aplikace chci vytvorit formular a zobrazit ho.
Jak udelat, aby se mi na liste nezobrazila dalsi "aplikace"?
Cim naplnit vlastnika toho formulare pri jeho vytvareni?
Diky moc za kazdou radu
Vlasta
D5 Ent, WNT
Outlook a nalezeni kontaktu
[*] Vlastimil Zden�k <delphi(zv)gestore(tec)cz> - 25.3.2003 13:21:12
Zdravim vsechny,
mohl by mi nekdo poradit, jak najdu v OutlookExpresu a ve "velkym" Outlooku
kontakt podle napr.
emailu nebo telefoniho cisla?
Uplne nejlepsi by byl maly prikladek. Snad to pry lze pomoci JEDI od Petra
Vonese...
Diky moc
Vlasta
D5 Ent, WNT
Write v Kylixu
[*] Daniel VALS <vals(zv)apls(tec)cz> - 25.3.2003 12:55:02
Dne Tuesday 25 March 2003 12:43, jste napsal:
> > To ReadLn znamena, ze to ceka na stistk klavesy Enter . Pokud tam
>
> nebude,
>
> > okno hned zmizi a Ty neuvidis co se vypsalo.
>
> pri ladeni zadne okno nezmizi (ani se nevytvori). Program pise do
> konzole ze ktere se soustel Kylix
>
>
> D> Toman
Pokud si v menu Run > Parameters zaskrtnes volbu Use launcher application=
kde=20
je vyplneno /usr/X11R6/bin/xterm -T KylixDebuggerOutput -e bash -i -c=20
%debuggee% tak tvuj program bude spoustet v nove vytvorene konzoli.
Daniel VALS - programator
Apls s.r.o. Zlin
Write v Kylixu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 25.3.2003 12:43:30
> To ReadLn znamena, ze to ceka na stistk klavesy Enter . Pokud tam
nebude,
> okno hned zmizi a Ty neuvidis co se vypsalo.
pri ladeni zadne okno nezmizi (ani se nevytvori). Program pise do
konzole ze ktere se soustel Kylix
D> Toman
Schovanie okna po spusteni programu
[*] Roland Turcan <rolo(zv)sedas.sk> - 25.3.2003 09:50:52
Hello Delphi CZ konferencia!
V TfrmMain.OnActivate volam tieto prikazy aby mi schoval okno a zrusil zo
zoznamu aplikacii, hlavneho panela a minimalizoval sa.
Lenze program sa spusti zrusi sa zo zoznamu aplikacii a hlavneho
panela, ale sa neminimalizuje
SendMessage(Handle, SW_MINIMIZE, 0, 0);
ShowWindowAsync(Application.Handle, SW_HIDE);
SendMessage(Handle, SW_HIDE, 0, 0);
Co stym ?
--
Best regards, TRoland
Write v Kylixu
[*] Petr Hlo�ek <petr h(zv)mrp(tec)cz> - 25.3.2003 12:25:54
To ReadLn znamena, ze to ceka na stistk klavesy Enter . Pokud tam nebude,
okno hned zmizi a Ty neuvidis co se vypsalo.
Petr
----- Original Message -----
From: "Bukacek Michal" <bukacek.michal(zv)post(tec)cz>> Ahoj, moc dik ya radu ten tvuj program se od toho meho lisil jen v
> jednom radku a to> ReadLn;
> vubec nic nechapu v Delphi mi to fungovalo dobre. ibey tohoto.
> Tusim ze Read slouyil v PASCALU pro cteni a tohle vudbec nechapu,
> hlavne ze to funguje. moc dik MICHAL
>
> Od: "Daniel VALS" <vals(zv)apls(tec)cz>
> > Dne Tuesday 25 March 2003 10:54, jste napsal:
> > > Cau lidi delam, konyolovou aplikaci v
> > > Kylixu pro LINUX. a vubec
> > > nemuzu prijit na to proc mi nefunguje
> > > prikaz "WRITE", nevite co
> > > stim .
> >
> > Me "write" v Kylixu normalne funguje. Viz
> > ukazka zdrojaku:
> >
> > program Test;
> > {$APPTYPE CONSOLE}
> > uses
> > SysUtils;
> > begin
> > WriteLn('Hello world!!!');
> > ReadLn;
> > end.
> >
> > A pise ti to nejakou chybu nebo to proste nic
> > neudela?
> >
Schovanie okna po spusteni programu
[*] Ale� Va���ek�����"q��y�&���w�3 - 25.3.2003 12:20:49
Zkus v OnCreate formulare zavolat:
Application.ShowMainForm :=3D False;
ShowWindowAsync(Application.Handle, SW_HIDE);
Ales
> -----Original Message-----
> From: Roland Turcan [mailto:rolo(zv)sedas.sk]=20
>=20
> SendMessage(Handle, SW_MINIMIZE, 0, 0);
> ShowWindowAsync(Application.Handle, SW_HIDE);
> SendMessage(Handle, SW_HIDE, 0, 0);
Indy SMTP
[*] Peter Ondras <peter.ondras(zv)pse.sk> - 25.3.2003 12:12:29
To znie celkom hodnoverne. Velmi pravdepodobne to bude tym. :( Aspon
viem, kde je chyba. :((
>: -----Original Message-----
>: From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]
On
>: Behalf Of Sula Milos
>: Sent: Tuesday, March 25, 2003 11:55 AM
>: To: delphi-l(zv)clexpert(tec)cz
>: Subject: RE: Indy SMTP
>:
>: Jen jestli to neni tim, ze jste pripojeny pres dialup ci lokalni sit
tim
>: padem muzete pres urcite SMTP servery posilat emaily(je na nich
nastaven
>: relaying z vasi IP) a pokud to nahrajete na server ktery ma jinou IP
,
>: tak ty SMTP servery neumoznuji spamovat nebo chcete li relayovat z
teto
>: IP adresy
>:
>: Milos
>:
>: -----Original Message-----
>: From: Peter Ondras [mailto:peter.ondras(zv)pse.sk]
>: Sent: Tuesday, March 25, 2003 11:40 AM
>: To: delphi-l(zv)clexpert(tec)cz
>: Subject: Indy SMTP
>:
>:
>: Mam dost velky problem s Indy SMTP. Vytvoril som CGI skript na
>: odosielanie mailov, ktory mi z localhostu bezproblemov maily
odosiela.
>: Ked je vsak pouzity priamo na serveri, tak skript pada na
SMTP.Connect.
>: Skusal som zadat adresu SMTP serveru aj v tvare IP, ale nijako to
>: nepomohlo. Pritom komponenty FastNet mi fungovali v minulosti bez
>: problemov, avsak tie som v Delphi 7 nenasiel a stare Delphi prilis
>: instalovat nechcem. Stretli ste sa s tym uz niekto?
>:
>: P.S.: Skusal som aj zdrojak CGI maileru z Indy Demos, avsak aj ten
>: funguje rovnako. Na localhoste bezi a priamo na serveri uz nie.
>:
>: Win 2000 Server SP3 + IIS 5
>:
>: P.S.2: Najnovsi poznatok. Server je v CR. Moj smtp server je v SR.
Ked
>: pouzijem smtp.nextra.sk, tak to chodi len lokalne. Ked pouzijem
>: smtp.superhosting(tec)cz, tak to beha aj na nete. Zdrojak skriptu je
stale
>: rovnaky. Viete niekto ako je to mozne? Stretli ste sa uz s tym?
>:
>: Peter Ondras
>: peter.ondras(zv)pse.sk
>: (+421) 0904 421 925
>: ---
>: avast! Antivirus: Odchadzajuca sprava cista.
>: Virova databaza (VPS): 21. 3. 2003
>: Testovane: 25. 3. 2003 11:34:12
>: avast! (c) copyright 2000-2003 ALWIL Software. http://www.avast.com
>:
>:
>:
---
avast! Antivirus: Odchadzajuca sprava cista.
Virova databaza (VPS): 21. 3. 2003
Testovane: 25. 3. 2003 12:09:12
avast! (c) copyright 2000-2003 ALWIL Software.
http://www.avast.com
Indy SMTP
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 25.3.2003 11:55:06
Jen jestli to neni tim, ze jste pripojeny pres dialup ci lokalni sit tim
padem muzete pres urcite SMTP servery posilat emaily(je na nich nastaven
relaying z vasi IP) a pokud to nahrajete na server ktery ma jinou IP ,
tak ty SMTP servery neumoznuji spamovat nebo chcete li relayovat z teto
IP adresy
Milos
-----Original Message-----
From: Peter Ondras [mailto:peter.ondras(zv)pse.sk]=20
Sent: Tuesday, March 25, 2003 11:40 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Indy SMTP
Mam dost velky problem s Indy SMTP. Vytvoril som CGI skript na
odosielanie mailov, ktory mi z localhostu bezproblemov maily odosiela.
Ked je vsak pouzity priamo na serveri, tak skript pada na SMTP.Connect.
Skusal som zadat adresu SMTP serveru aj v tvare IP, ale nijako to
nepomohlo. Pritom komponenty FastNet mi fungovali v minulosti bez
problemov, avsak tie som v Delphi 7 nenasiel a stare Delphi prilis
instalovat nechcem. Stretli ste sa s tym uz niekto?
P.S.: Skusal som aj zdrojak CGI maileru z Indy Demos, avsak aj ten
funguje rovnako. Na localhoste bezi a priamo na serveri uz nie.
Win 2000 Server SP3 + IIS 5
P.S.2: Najnovsi poznatok. Server je v CR. Moj smtp server je v SR. Ked
pouzijem smtp.nextra.sk, tak to chodi len lokalne. Ked pouzijem
smtp.superhosting(tec)cz, tak to beha aj na nete. Zdrojak skriptu je stale
rovnaky. Viete niekto ako je to mozne? Stretli ste sa uz s tym?
Peter Ondras
peter.ondras(zv)pse.sk
(+421) 0904 421 925
---
avast! Antivirus: Odchadzajuca sprava cista.
Virova databaza (VPS): 21. 3. 2003
Testovane: 25. 3. 2003 11:34:12
avast! (c) copyright 2000-2003 ALWIL Software. http://www.avast.com
Ladenie Memory Proofilerom
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 25.3.2003 11:51:17
> Prave sa pokusam doladit jeden soft programom "MemProof",
> vytrvale mi pri ukonceni tstovaneho softu vypise tuto chybu :
>
>
> Attemp to free unexisting resource
>
> &0005033C TMenuItem(zv)Destroy in Menus.pas (770)
>
> Neviete co to moze sposobovat ?
Moc informaci jsi neposkytl, takze bych na prvni podivani tipnul, ze mozna nekde v
programu provadis dvakrat ruseni teze instance tridy TMenuItem. Nemas v
programu nejake vlastni vytvareni/ruseni polozek v menu?
Write v Kylixu
[*] Bukacek Michal <bukacek.michal(zv)post(tec)cz> - 25.3.2003 11:48:45
Ahoj, moc dik ya radu ten tvuj program se od toho meho lisil jen v
jednom radku a to> ReadLn;
vubec nic nechapu v Delphi mi to fungovalo dobre. ibey tohoto.
Tusim ze Read slouyil v PASCALU pro cteni a tohle vudbec nechapu,
hlavne ze to funguje. moc dik MICHAL=20
----- P=D9VODN=CD ZPR=C1VA -----
Od: "Daniel VALS" <vals(zv)apls(tec)cz>
Komu: delphi-l(zv)clexpert(tec)cz
P=F8edm=ECt: Re: Write v Kylixu
Datum: 25.3.2003 - 11:13:41
> Dne Tuesday 25 March 2003 10:54, jste napsal:
> > Cau lidi delam, konyolovou aplikaci v
> > Kylixu pro LINUX. a vubec
> > nemuzu prijit na to proc mi nefunguje
> > prikaz "WRITE", nevite co
> > stim .
>=20
> Me "write" v Kylixu normalne funguje. Viz
> ukazka zdrojaku:
>=20
> program Test;
> {$APPTYPE CONSOLE}
> uses
> SysUtils;
> begin
> WriteLn('Hello world!!!');
> ReadLn;
> end.
>=20
> A pise ti to nejakou chybu nebo to proste nic
> neudela?
>=20
> Daniel VALS - programator
> APLS s.r.o. Zlin
> http://www.apls(tec)cz
>=20
--=20
Ziskejte kvalitu, kterou si zasluhujete. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/postpaid/
Indy SMTP
[*] Peter Ondras <peter.ondras(zv)pse.sk> - 25.3.2003 11:39:55
Mam dost velky problem s Indy SMTP. Vytvoril som CGI skript na
odosielanie mailov, ktory mi z localhostu bezproblemov maily odosiela.
Ked je vsak pouzity priamo na serveri, tak skript pada na SMTP.Connect.
Skusal som zadat adresu SMTP serveru aj v tvare IP, ale nijako to
nepomohlo. Pritom komponenty FastNet mi fungovali v minulosti bez
problemov, avsak tie som v Delphi 7 nenasiel a stare Delphi prilis
instalovat nechcem. Stretli ste sa s tym uz niekto?
P.S.: Skusal som aj zdrojak CGI maileru z Indy Demos, avsak aj ten
funguje rovnako. Na localhoste bezi a priamo na serveri uz nie.
Win 2000 Server SP3 + IIS 5
P.S.2: Najnovsi poznatok. Server je v CR. Moj smtp server je v SR. Ked
pouzijem smtp.nextra.sk, tak to chodi len lokalne. Ked pouzijem
smtp.superhosting(tec)cz, tak to beha aj na nete. Zdrojak skriptu je stale
rovnaky. Viete niekto ako je to mozne? Stretli ste sa uz s tym?
Peter Ondras
peter.ondras(zv)pse.sk
(+421) 0904 421 925
---
avast! Antivirus: Odchadzajuca sprava cista.
Virova databaza (VPS): 21. 3. 2003
Testovane: 25. 3. 2003 11:34:12
avast! (c) copyright 2000-2003 ALWIL Software.
http://www.avast.com
Write v Kylixu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 25.3.2003 11:07:48
> Cau lidi delam, konyolovou aplikaci v Kylixu pro LINUX. a vubec
> nemuzu prijit na to proc mi nefunguje prikaz "WRITE", nevite co
> stim .
A co ti dela, kdyz nefunguje? ja s tim nejak problemy nemel...
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
Write v Kylixu
[*] Petr Hlo�ek <petr h(zv)mrp(tec)cz> - 25.3.2003 11:05:56
----- Original Message -----
From: "Bukacek Michal" <bukacek.michal(zv)post(tec)cz>
> Cau lidi delam, konyolovou aplikaci v Kylixu pro LINUX. a vubec
> nemuzu prijit na to proc mi nefunguje prikaz "WRITE", nevite co
> stim .
Jak nefunguje?
Petr
Write v Kylixu
[*] Daniel VALS <vals(zv)apls(tec)cz> - 25.3.2003 11:07:10
Dne Tuesday 25 March 2003 10:54, jste napsal:
> Cau lidi delam, konyolovou aplikaci v Kylixu pro LINUX. a vubec
> nemuzu prijit na to proc mi nefunguje prikaz "WRITE", nevite co
> stim .
Me "write" v Kylixu normalne funguje. Viz ukazka zdrojaku:
program Test;
{$APPTYPE CONSOLE}
uses
SysUtils;
begin
WriteLn('Hello world!!!');
ReadLn;
end.
A pise ti to nejakou chybu nebo to proste nic neudela?
Daniel VALS - programator
APLS s.r.o. Zlin
Write v Kylixu
[*] Bukacek Michal <bukacek.michal(zv)post(tec)cz> - 25.3.2003 10:54:27
Cau lidi delam, konyolovou aplikaci v Kylixu pro LINUX. a vubec
nemuzu prijit na to proc mi nefunguje prikaz "WRITE", nevite co
stim .
--
Ziskejte kvalitu, kterou si zasluhujete. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/postpaid/
Ladenie Memory Proofilerom
[*] <idulgerov(zv)centrum.sk> - 25.3.2003 09:43:24
Zdarvim.
Prave sa pokusam doladit jeden soft programom "MemProof",
vytrvale mi pri ukonceni tstovaneho softu vypise tuto chybu :
Attemp to free unexisting resource =20
&0005033C TMenuItem(zv)Destroy in Menus.pas (770)
Neviete co to moze sposobovat ?
Mam Delphi 5 Prof , Win XP Prof, Win 98,
S pozdravom=20
Ivan Dulgerov
----------------------------------------------------------------
komponenta
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 25.3.2003 09:23:17
> nevite nekdo, kde sehnat komponentu - panel palety
> barev - takovy, jaky je treba v colordialogu v te
> rozsirene nabidce? nebo alespon tu funkci, ktera
> to vykresluje (podle odstinu, sytosti,
> svetelnosti urci hodnotu pro R,G,B)? diky za odpoved
Pozri si www.delphi-gems.com v sekcii Controls najdes Color Picker Button.
HTH
OutlookExpres a adresa
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 25.3.2003 08:57:25
Zdravim vsechny,
mohl by mi nekdo poradit, jak najdu v OutlookExpresu kontakt podle napr.
emailu nebo telefoniho cisla?
Uplne nejlepsi by byl maly prikladek. Sand to pry lze pomoci JEDI od Petra
Vonese...
Diky moc
Vlasta
D5 Ent, WNT
tvorba dialog-driven wizardu
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 25.3.2003 09:21:09
> prosim o radu ve veci zminene (mozna nepresne)
> v subjektu. Chci vytvorit aplikaci v Delphi 6,
> ktera by se chovala podobne jako napr. vetsina
> instalacnich programu. Dialog uzivateli neco
> sdeli a ocekava, ze uzivatel stiskne Next,
> v dalsim dialogu treba navic neco vyklika a pak
> opet stiskne Next nebo uz Finish, atd. atp.
Mozes pouzit aj pagecontrol, nevyhodou vsak moze byt, ze vsetky taby a
kontrolky na nich existuju po cely cas behu programu. Ja som nedavno pisal
instalacny wizard s pouzitim frames, ktore su vytvarane a uvolnovane podla
potreby.
Potrebujes si tiez napisat akysi state machine na prechody medzi stavmi
podla akcii uzivatela.
HTH
Z Order pri dynamickem vytvareni
[*] Jan Harman <harman(zv)volny(tec)cz> - 25.3.2003 09:11:21
Ahoj, dival jsem se v konferenci i na microsoftu, ale vubec nic
kloudneho jsem nenasel. Potreboval bych pri zavreti formu precist
Z Order vsech prvku (TLabel, TImage, TShape) na nem a pri
vytvareni zase ty prvky podle toho poskladat. Uzivatel si totiz
muze poradi menit. Jak nato?
Zkousel jsem GetTopWindow, ale to nemuzu aplikovat treba na
TLabel. Diky moc.
Honza.
--
Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
Ctecka po x-te
[*] Jiri Virt <virt(zv)volny(tec)cz> - 25.3.2003 09:04:31
Ctecka se v tomto pripade chova jako uzivatel, ktery pise na klavesnici.
tzn probihaji vsechny udalosti spojene s klavesnici.
Ctecka po x-te
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 25.3.2003 09:01:09
Bronislav Klu=E8ka dne 25 Mar 2003 v 8:56:
> ze jeste otravuju s tou cteckou... je teda na klavesnicovych portech,
> nevite, jestli teda bude aktivovat hook na klavesnici, kdyz z ni neco
> prectu???
Je to UPLNE stejne, jako kdybys to namackal na klavesnici. Pokud Ti to akt=
ivuje klavesnice, bude
to aktivovat i ta ctecka.
K.