Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Zm�na pr�v interbase
[*] Petr Kal� - 15.5.2001 10:53:33
Je mozne z delphi(5) nastavovat nebo menit pristupova prava na ser.
interbase?
dekuji
S pozdravem,
Petr Kalis
mailto:p.kalis(zv)worldonline(tec)cz
TRichEdit
[*] Viktor Bul�nek <xbulanek(zv)fi.muni(tec)cz> - 15.5.2001 10:59:43
Zdravim,
nevite nekdo, jak se dela v teto komponente skrolovani. Potreboval bych, aby,kdyz vlozim radek,aby se to o radek posunulo.
Predem diky
Viktor Bulanek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.251 / Virov� b�ze: 124 - datum vyd�n�: 26.4.2001
Focus na vybrany text v MDIChildu
[*] Ing. Rudolf Krizek <rudolf.krizek(zv)mlade(tec)cz> - 15.5.2001 11:15:01
FindDialog uzavrit nechci - memo1.setfocus mi fungovalo, ale pouze kdyz jsem
to zkousel v SDI aplikaci (kdyz nebyli MDIchild formy) v MDI mi to nefunguje
porad je aktivni ten finddialog (tedy respektive replacedialog - snad v tom
neni nejaky podstatny rozdil). Zkusil bych to podle vaseho prikladu, ale
memo nema podle me (v D5) metodu FindText - tu ma pouze richedit - a to bych
musel predelat pulku programu :(
Zkousel jsem taky neco jako MDICHild.bringtofront a to taky nefacha.
----- Original Message -----
From: "ing. Pavel Zilinec" <zilinec(zv)email(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 15, 2001 10:03 AM
Subject: Re: Focus na vybrany text v MDIChildu
> Ja pouziva tento kod pro vyhledavani v memo. Mas tady ukazku kodu.
> Neni problem po uspesnem nalezeni dat za NajdiRetezen prikaz
> FindDialog1.CloseDialog a vratis se automaticky zpet. Muzes take
> udelat Memo1.SetFocus a okno pro vyhledani zustane, ale aktivni bude
> Tvuj formular.
> Navic mam jeste navazanou klavesu F3 na hledani dalsiho vyskytu.
>
> procedure TDEV_fMain.FindDialog1Find(Sender: TObject);
> begin
> FindDialog1.Execute;
> NajdiRetezec;
> end;
>
> procedure TDEV_fMain.NajdiRetezec;
> begin
> with FindDialog1 do
> begin
> if FindText = '' then exit;
> Screen.Cursor:= crHourGlass;
> if Memo1.FindText(FindText, frDown in Options, frMatchCase in Options,
frWholeWord in Options) then
> Memo1.ScrollInView
> else
> PS_Chyba('', 'Nelze naj�t "' + FindText + '"');
> end;
> Screen.Cursor:= crDefault;
> end;
>
> ------
> ing. Pavel Zilinec
> mailto:zilinec(zv)email(tec)cz
>Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.5.2001 11:16:20
> > Ccko ocekava, ze nevyjmenovane parametry (trojtecka) budou mist stejny
typ
> > (resp. stejnou velikost) jako posledni uvedeny parametr. 'Int' zabere 4
> > byty, Variant 16 bytu....
>
> Tak to se seredne pletes. Vem si napriklad "printf" !
nepletu. Ale presnejsi by bylo kdybych napsal "Cckova funkce, kterou
potrebuju predpoklada, ze vsechny volitelne parametry zaberou stejnou
velikost na stacku". Ale obecne podle me plati, ze vetsina funkci s
volitelnymi parametry
---
CCkovy printf by mel byt deklarovan takto (prevzato z dokumentace v Linuxu):
int printf(const char *format, ...);
(vsechny parametry jsou tedy pointry, resp. 4 bytove promenne na stacku)
cili predpokladam, ze vlastni funkce je napsana nejak takto:
- dostane na stack _pointry_ na parametry *lhostejno, zda pointer miri
opravdu ns retezec znaku, nebo na integer cislo)
- predpoklada, ze prvni parametr je formatovaci predpis - proleze jej a
postupne se pohybuje od prvniho argumentu k poslednimu tak, ze si nastavi
nejaky pointer na stack a inkrementuje ho o velikost argumentu na stacku
(vzdy stejna - 4 byty)
kdyby mohl mit kazdy argument na stacku jinou velikost, pak by se odnekud
musela brat informace o tom kolik zabira na stacku mista aby se bylo mozne
dostat spravne na pozici dalsiho argumanetu. Neni to neresitelne ale
zbytecne komplikovane a nespolehlive (napriklad by stacilo pred kazdy
skutecny argument umistit dalsi parametr, ktery definuje velikost) ale CCko
to jinak zrejme neumi.
PS: Podotykam, ze jsem v CCku nikdy neprogramoval (krome nekolika pokusu
typu "Hello world"), takze se mohu mylit. Pri svych uvahach vychazim z toho
co mi rekl kolega Cckar a muj zdravy rozum.
D. Toman
Help creator
[*] "Milan Skalsk�" - 15.5.2001 9:45:46
Mam sice Shareware, ale je docela dobry ...
Jmenuje se to HELPExpress a HelpWorkShop a ma to 4 MB dohromady.
Pokud to chces poslat, dej vedet
(uz jsem tu mel problem s posilanim priloh a tak nechci zase neco poblbat
:))
--- P�vodn� dopis ----------------------------------------------------------
Datum: 15.05.2001 08:52
Od: "Robert Suska" <robert(zv)korak.sk>
Pro: milan_2(zv)sose-sou(tec)cz, ...
V�c: Help creator
----------------------------------------------------------------------------
>Potrebujem nejaky jednoduchy softi kna tvorbu helpu. Ale fakt jednoduchy
>:).
>Neviete nejaku URL, alebo nemate niekto nieco take?
>
>Dakujem
>
>S pozdravom,
Milan
Delphi beginner
Delphi3 C/S, W98
Automaticka detekce parametru RS323
[*] Zaplik <zaplik(zv)volny(tec)cz> - 15.5.2001 11:50:33
Zdravim a tazi se.
Da se nejakym zpusobem zjistit na jakych komunikacnich parametrech
komunikuje zarizeni pripojene na seriovy port. Neznam ani strukturu dat
vysilanych na port abych mohl porovnavat s prijatejma datama a popripade
prepinat komunikacni parametry, dokud se netrefim do struktury. nevite nekdo
o necem?
Pro obsluhu portu pouzivam AsyncPro.
D5, W2000
Martin Zapletal
zaplik(zv)volny(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.242 / Virov� b�ze: 117 - datum vyd�n�: 27.3.2001
TXT File otev��t jako HEXA
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 15.5.2001 11:57:39
prectes byte po bajtu ze souboru a prevedes to pomoci IntToHex a zobrazis to
v napr v TMemo (pro prehlednost tam muzes dat mezy byty jako oddelovac
mezeru).
po uprave pouzijes StrToInt na kazdy byte a prepises editovany soubor.
-----Original Message-----
From: Libor V�trovec [mailto:libor(zv)wlw(tec)cz]
Sent: Tuesday, May 15, 2001 12:49 PM
To: Delphi-L
Subject: TXT File otev��t jako HEXA
Zdrav�m
pros�m o radu, jak na to. M�m TXT file, kter� pot�buji otev��t v HEXA a
naj�t v tomto k�du "01" a nahradit za "0D 0A" jak to ud�lat? Naj�t to a
opravit to nen� probl�m probl�m m�m v tom �e nev�m jak otev��t TXT file do
Hexa. Za Radu p�edem d�kuji
Libor
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000
TXT File otev��t jako HEXA
[*] brant(zv)dcomm(tec)cz - 15.5.2001 12:08:42
Otevri to jako file of char nebo file of byte a pak s tim muzet delat
cokoli.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
Tel. 0724/007234
M�m TXT file, kter� pot�buji otev��t v HEXA a
naj�t v tomto k�du "01" a nahradit za "0D 0A" jak to ud�lat? Naj�t to a
opravit to nen� probl�m probl�m m�m v tom �e nev�m jak otev��t TXT file do
Hexa. Prepis funkce z Ccka do Pascalu
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 15.5.2001 12:14:17
Odpoledne se pokusim najit presnou definici primo od pana Stroustrupa (a to
je pan nekdo) a poslu to.
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
WIN CE
[*] Zden�k Adler <zdeneka(zv)seznam(tec)cz> - 15.5.2001 12:22:28
Ahojte,
omlouvam se za nevhodny dotaz, snad ani do konference nepatri.... ale chtel
jsem se zeptat, zda nekdo nezna nejaky free vyvojovy software podobny
Delphi, ve kterem by sly psat aplikace pro Windows CE bud primo na H/PC nebo
primo na PC. Diky
Zdenek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 9.5.2001
WIN CE
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 15.5.2001 13:18:05
no snad jen embeded visual basic. Pokud vim nic jineho podbneho delphi a
free neni.
-----Original Message-----
From: Zdenik Adler [mailto:zdeneka(zv)seznam(tec)cz]
Sent: Tuesday, May 15, 2001 12:22 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: WIN CE
Ahojte,
omlouvam se za nevhodny dotaz, snad ani do konference nepatri.... ale chtel
jsem se zeptat, zda nekdo nezna nejaky free vyvojovy software podobny
Delphi, ve kterem by sly psat aplikace pro Windows CE bud primo na H/PC nebo
primo na PC. Diky
Zdenek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 9.5.2001
IDE: Toolbary v D5
[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 15.5.2001 13:47:40
Ahoj,
mam jeden (asi) primitivni dotaz.
Co je treba udelat, aby si Delphi zapamatovaly zmeny provedene v
toolbarech? Myslel jsem si, ze se to uklada spolu s "View/Save
Desktop...", ale ne a nic jineho jsem nenasel:-(
Moc me nebavi po kazdem spusteni si prerovnavat "ikonky" k obrazu svemu.
Tedy predpokladam, ze to jde:-))
Diky.
Miroslav Novosad
mirnov(zv)atlas(tec)cz
Avast32 (VPS 27.4.2001): zprava neobsahuje virus
Jiny problem s hledanim textu
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 15.5.2001 14:20:46
Zdravim,
bojuji s timto problemem: MDI aplikace, uzivatel
potrebuje hledat text. Do FindDialog-u text napise,
program oznaci nalezeny objekt na vykrese. Focus
zustava v tom FindDialog-u. Pokud vsak uzivatel nyni
stiskne klavesu Delete, nezpracuje ji bohuzel
FindDialog, jak bych si ja pral, ale vyvola se tim akce
v tActionList hlavniho formulare. Zkousel jsem u
hlavniho formulare i u MDIChild nastavit
KeyPreview=false, nepomohlo to. Dokazal byste prosim
nekdo poradit, jak zaridit, aby klavesy zpracovaval
FindDialog? (Stejny problem je s klavesou Insert. Pokud
ale uzivatel pise jen nejaka pismenka, zpracovava je
normalne FindDialog.)
Diky,
Karel Rys
Prepis funkce z Ccka do Pascalu
[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 15.5.2001 14:34:53
Ahoj,
jeste v teto diskusi nebyla zminena nasledujici moznost:
procedure A(B: Integer; const C: array of const); {cdecl;}
procedure A(B: Integer; C: array of const); {cdecl;}
protoze je mozne nasledujici volani (s polozkami ruznych typu),
ktere se po vyuziva napr. u funkce Format:
A(11, [1, 'a', 1.2]);
bylo by logicke, ze i tady budou predavany ukazatele na jednotlive polozky,
(viz tvoje uvaha nad printf() ). (pouze domenka...)
Mozna by ti jako inspirace mohla poslouzit funkce FormatBuf (cca 500 radky v
ASM :-))))))
Tomas Bihary
----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, May 14, 2001 3:41 PM
Subject: Prepis funkce z Ccka do Pascalu
> DD,
>
> lze vubec nejak prepsat v pascalu deklaraci hlavicky funkce, ktera je v
Ccku
> deklarovana takto:
>
> void NejakeJmeno(int, ...);
>
> tedy ma variabilni pocet parametru?
>
> D. Toman
>
InterBase 6.x a Zaloha dat
[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 15.5.2001 13:47:27
Lze nejakym zpusobem prinutit IB, aby provedla zalohu dat, aniz bych byl
prihlasen jako SYSDBA ?
Marian Jonas
Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.5.2001 15:04:37
>
> Ahoj,
> jeste v teto diskusi nebyla zminena nasledujici moznost:
>
> procedure A(B: Integer; const C: array of const); {cdecl;}
> procedure A(B: Integer; C: array of const); {cdecl;}
>
> protoze je mozne nasledujici volani (s polozkami ruznych typu),
> ktere se po vyuziva napr. u funkce Format:
>
> A(11, [1, 'a', 1.2]);
>
> bylo by logicke, ze i tady budou predavany ukazatele na jednotlive
polozky,
> (viz tvoje uvaha nad printf() ). (pouze domenka...)
Sice mi to s tim prevedom hlavicky Cckove funkce nepomuze (variant opravdu
neni pouzitelny) ale zkousel jsem to a vysledkem je, ze se zrejme predava
pointer na Variant - ale zaroven i neco navic (na stack se kopiruje vzdy cca
8krat tolik bytu nez je parametru)> Mozna by ti jako inspirace mohla poslouzit funkce FormatBuf (cca 500 radky
v
> ASM :-))))))
500 radku ma byt moc? Kdysi jsem psal projekt, ktery celkem mel nekolik
desitek tisic radku v ASM :-)
D. Toman
Pointer
[*] Jozef Cervenansky <dodosoft(zv)hotmail(tec)com> - 15.5.2001 15:08:37
ahojte,
mohol by mi niekto poradit, ako mam rozumiet tomuto zapisu ?
Result := inet_ntoa(pptr^[I]^);
---------
--
---------> co je toto?
diky za pomoc.
jozo
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.Pointer
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 15.5.2001 15:13:57
Jozef Cervenansky dne 15 May 2001, v 15:08:
> mohol by mi niekto poradit, ako mam rozumiet tomuto zapisu ?
>
> Result := inet_ntoa(pptr^[I]^);
> ---------
> --
> ---------> co je toto?
Rekl bych, ze pptr je ukazatel (proto je za nim ta striska). Ukazuje
na pole (proto ty zavorky). No a to pole obsahuje take ukazatele,
nepoznam z toho ale na co - to poznas treba podle typu parametru te
funkce.
Karel Rys
InterBase 6.x a Zaloha dat
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.5.2001 15:14:31
Haj hou!
On 15 May 2001,, Jon� Mari�n wrote:
> Lze nejakym zpusobem prinutit IB, aby provedla zalohu dat, aniz bych byl
> prihlasen jako SYSDBA ?
Pomoci utility GBAK ? Parametry -USER a -PAS pomohou :)
Uzivatel ovsem musi mit prava ke cteni objektu databaze.
SYSDBA je tak jako tak nejjistejsi a nejjednodussi.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.WinCVS - synchonizace zdroj�k
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.5.2001 15:20:46
Haj hou!
On 15 May 2001,, Michal Jiskra wrote:
> hledam nekoho, kdo ma zkusenosti s programem WinCVS pro synchronizaci
> zdrojovych kodu pri tymove praci a kdo by byl ochoten poradit.
> Mam problem se synchronizaci vetve programu. Pri vytvareni vetve jsem
> zapomel po oznaceni vetve udelat "update" pro danou vetev. Ted kdyz to chci
> synchronizovat , tak mi to halsi neco o "sticky tags" a ze to neni "branch".
> To bude zrejme tim , ze jsem neprovedl ten update. Zajimalo by mne jak z
> toho ven a jak se to bude sychronizovat.
Pokud tomu dobre rozumim, tak jste provedl zalozeni vetve a
neprovedl checkout vetve, ale pokracoval jste v praci na HEAD v
pracovnim adresari ? Pokud ano, nebo neco podobneho, pak
nejjednodussi postup IMHO je nasledujici:
1) Chekout vetve do noveho pracovniho adresare
2) Provest diff (unixovy, napr. z GNU cygwin) mezi vetvi a upravami
v head a vysledek ulozit do souboru (patch soubor)
3) Aplikovat patch soubor programem patch(unixova utilita, napr. z
cygwin) na chekout vetve
4) Commit vetve zpet
Nevahejte se zeptat pokud to neni dost srozumitelne.
S pozdravem
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Zm na pr�v interbase
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.5.2001 15:22:06
Haj hou!
On 15 May 2001,, Petr Kal� wrote:
> Je mozne z delphi(5) nastavovat nebo menit pristupova prava na ser.
> interbase?
Samozrejme. Pres SQL prikazy GRANT a REVOKE
(TQuery/TIBQuery -> ExecuteSQL).
S pozdravem
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.pristupova prava k ibase
[*] Petr Kal� - 15.5.2001 15:23:17
Nevite nekdo jak nastavit z programu v D5 pristupova prava k interbase? S pozdravem,
Petr Kalis
mailto:p.kalis(zv)worldonline(tec)cz
FileVersion
[*] Tibor Galik <tgalik(zv)usske.sk> - 15.5.2001 15:41:23
>> Uz sa tu velakrat spominalo ze na ziskanie info o subore sa da pouzit
>> komponenta %subj%. Ale ako zapisat tieto udaje uz do existujuceho exe
>> file-u?
>
>Mam obavu, ze na to zadne specialni funkce nejsou. Ale lze to
>udelat tak, ze vyjmes resource s VersionInfo, predelas si ho, a pak
>ho soupnes zpatky. Preji peknou zabavu. :-))
>
>Pokud chces jenom zmenit jiz existujici textove polozky, pak si
>porid Jazykovy Lokalizator.
>
Asi som sa zle vyjadril alebo som nepochopil vysvetlenie.
Takze este raz. Ak chcem ziskat nejake informacie (Company name, File Description, File Version, ...), mozem pouzit napr. %subj% alebo funkcie z Windows. Ja vsak chcem v subore file.exe zmenit napriklad obsah File Description. Su to hodnoty ktore sa nastavuju pred kompilaciou v project/option. DAjusa tieto hodnoty zmenit uz na skompilovanom pgm ?
tg
S pozdravom / Regards
Tibor Galik
tgalik(zv)usske.sk
Pointer
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.5.2001 15:53:12
> mohol by mi niekto poradit, ako mam rozumiet tomuto zapisu ?
>
> Result := inet_ntoa(pptr^[I]^);
> ---------
> --
> ---------> co je toto?
>
- inet_ntoa() - prevod IP adresy vyjadrene integerem do string podoby
- pptr^[I]^ : pptr je zrejme promenna, ktera obsahuje pointer na
THostEnt.h_addr_list (PHostEnt vraci napriklad funkce GetHostByName), coz je
pole IP adres
D. Toman
Prepis funkce z Ccka do Pascalu
[*] Erik Salaj <winsoft(zv)stonline.sk> - 15.5.2001 15:55:36
> ?!? ty tecky znamenaji v Cecku (neni to uplne presne ale pro tu funkci,
> kterou chci volat to plati), ze se libovolne krat opakuje parametr jehoz
> type je _shodny_ s predchozim paremetrem. Cili pokud byl posledni parametr
> pred trojteckou typu 'int' pak i ostatni budou typu 'int' (resp zaberou 4
> byty na stacku - cili muzu predat cokoliv, co zabere stejny pocet bytu)
Ellipsis (...) znamena, ze tu moze byt lubovolny pocet parametrov
lubovolneho
typu. Funkcia s premennym poctom parametrov moze byt deklarovana napr.
void MyFunc(...);
a volana ako
MyFunc(1, 2, 3);
MyFunc(3.4, "Hello, world", -2);
Obvykle sa pridava jeden pevny parameter, pomocou ktoreho je mozne
urcit ostatne (premenne) parametre (ich pocet a typ),
napr. funkcia printf je deklarovana takto:
int __cdecl printf(const char* format, ...);
A volanie printf potom v prvom parametri specifikuje ostatne parametre:
printf("%d %c %lf", 10, 'x', 3.45);
Delphi taketo funkcie neumoznuje, nemal by byt ale problem ich pouzit
v urcitych pripadoch napr. tak, ze si deklarujem takuto funkciu viackrat,
pre rozne parametre, napr.
procedure MyFunc1(a, b, c: Integer); cdecl; external 'MyDll.dll' name
'MyFunc';
procedure MyFunc2(a: Real; b: PChar; c: Integer); cdecl; external
'MyDll.dll' name 'MyFunc';
a zavolat pomocou
MyFunc1(1, 2, 3);
MyFunc2(3.4, 'Hello, world', -2);
Erik
WinCVS - synchonizace zdrojaku
[*] Michal Jiskra <jiskra(zv)eskon(tec)cz> - 15.5.2001 16:45:27
Ahoj,
omlouvam se za nepresny popis situace. V navodu, ktery mam k dispozici je
napsano :
1) udelej adresar pro vetev
2) udelej checkout s parametrem "By revision"
3) oznac ze je to vetev (fork selection) tzn. otaguj vetev
4) proved update na vetev, tak aby v polozce revision byl tag, kterym jsi
oznacil vetev, tzn. update s parametrem sticky tag "by revision"
pak se pracuje na vetvi(patch programu) a po dokonceni se vse updatne -
merge a pak commit
no a ja jsem zapomel udelat bod 4, takze jsem nepracoval na vetvi, ale na
prvotni revizi
a pak jsem udelal v podstate to co pises, udelal jsem to cele znovu az po
bod 4 a prehral jsem zmeny do spravne vytvorene vetve, jen jsem to neudelal
pomoci toho diffu, ale zkopiroval jsem soubory, muze to mit nejaky vliv, ze
jsem tak kopnul cele soubory a ne jen zmeny ?(jeste jsem nemergoval)
A jeste bych se zeptal, v navodu varuji pred dvojitym commitem(merge) z
vetve. Co kdyz udelam zmenu ve vetvi, pak synchro(merge), a pote budu nucen
udelat jeste jednu zmenu ve vetvi. Jak ji mam potom bezpecne sychronizovat ?
Pisi tam neco o dvojitem pouziti prepinace -j, ale chtel bych vedet jak to
udelat pomoci WinCVS.
Diky.
Michal Jiskra
----- Original Message -----
From: "Pavel Cisar" <pcb(zv)atlas(tec)cz>
To: < >
Sent: Tuesday, May 15, 2001 3:20 PM
Subject: Re: WinCVS - synchonizace zdroj k
> Haj hou!
>
> On 15 May 2001,, Michal Jiskra wrote:
>
> > hledam nekoho, kdo ma zkusenosti s programem WinCVS pro synchronizaci
> > zdrojovych kodu pri tymove praci a kdo by byl ochoten poradit.
> > Mam problem se synchronizaci vetve programu. Pri vytvareni vetve jsem
> > zapomel po oznaceni vetve udelat "update" pro danou vetev. Ted kdyz to
chci
> > synchronizovat , tak mi to halsi neco o "sticky tags" a ze to neni
"branch".
> > To bude zrejme tim , ze jsem neprovedl ten update. Zajimalo by mne jak z
> > toho ven a jak se to bude sychronizovat.
>
> Pokud tomu dobre rozumim, tak jste provedl zalozeni vetve a
> neprovedl checkout vetve, ale pokracoval jste v praci na HEAD v
> pracovnim adresari ? Pokud ano, nebo neco podobneho, pak
> nejjednodussi postup IMHO je nasledujici:
>
> 1) Chekout vetve do noveho pracovniho adresare
> 2) Provest diff (unixovy, napr. z GNU cygwin) mezi vetvi a upravami
> v head a vysledek ulozit do souboru (patch soubor)
> 3) Aplikovat patch soubor programem patch(unixova utilita, napr. z
> cygwin) na chekout vetve
> 4) Commit vetve zpet
>
> Nevahejte se zeptat pokud to neni dost srozumitelne.
>
> S pozdravem
>
> Pavel Cisar <pcisar(zv)borland(tec)cz>
> Borland s.r.o.WinCVS - synchonizace zdrojaku
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.5.2001 16:57:06
Haj hou!
On 15 May 2001,, Michal Jiskra wrote:
> a pak jsem udelal v podstate to co pises, udelal jsem to cele znovu az po
> bod 4 a prehral jsem zmeny do spravne vytvorene vetve, jen jsem to neudelal
> pomoci toho diffu, ale zkopiroval jsem soubory, muze to mit nejaky vliv, ze
> jsem tak kopnul cele soubory a ne jen zmeny ?(jeste jsem nemergoval)
Jo, tvuj postup jde taky pokud jsi v CVS sam a nikdo ti mezitim tu
vetev nezmenil.
> A jeste bych se zeptal, v navodu varuji pred dvojitym commitem(merge) z
> vetve. Co kdyz udelam zmenu ve vetvi, pak synchro(merge), a pote budu nucen
> udelat jeste jednu zmenu ve vetvi. Jak ji mam potom bezpecne sychronizovat ?
> Pisi tam neco o dvojitem pouziti prepinace -j, ale chtel bych vedet jak to
> udelat pomoci WinCVS.
Uf, commit neni to same co merge, alespon pokud jde o vetve.
Merge v tomto kontextu je aplikovani zmen ve vetvi do hlavniho
proudu. Commit aplikovany na chekoutnutou vetev se chova AFAIK
uplne stejne jako commit na chekoutnuty modul (HEAD),
aktualizuje prislusnou vetev (on HEAD je v podstate take vetev).
Pokud je o spojovani vetvi (merge branch), pak je to myslim dost
dobre popsane i se schematy v helpu u WinCVS (alespon v me
posledni verzi 1.2 tak tomu je :). Pokud jde o plikaci vzlastnich
kombinaci prikazu/prepinacu, pak jdou normalne zapsat a provest
z command view WinCVS (myslim ze to ale vyzaduje instalovane
TCL).
HTH
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.TXT File otev��t jako HEXA
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 15.5.2001 17:34:39
On 15 May 2001, at 11:49, Libor V�trovec wrote:
> pros�m o radu, jak na to. M�m TXT file, kter� pot�buji otev��t v HEXA
> a naj�t v tomto k�du "01" a nahradit za "0D 0A" jak to ud�lat? Naj�t
> to a opravit to nen� probl�m probl�m m�m v tom �e nev�m jak otev��t
> TXT file do Hexa.
Tak si udelej jednoduchy programek, ktery nacte ten soubor jako
binarni a nahradi 01 koncem radku. Treba takto (velice
zjednodusene):
var
b: byte;
const
CRLF: word = $0D0A;
for i := 0 to Pred(FileStream.Size) do
begin
FileStream.Read(b, 1);
if b = 1 then OutStream.Write(CRLF, 2) else
OutStream.Write(b, 1);
end;
Samozrejme, ze by to slo udelat efektivneji, ale zalezi na tom, zda
je to jednorazova akce, nebo se to bude casto opakovat.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Prepis funkce z Ccka do Pascalu
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 15.5.2001 17:34:38
On 15 May 2001, at 11:16, Dalibor Toman wrote:
> > > (resp. stejnou velikost) jako posledni uvedeny parametr. 'Int'
> > > zabere 4 byty, Variant 16 bytu....
> >
> > Tak to se seredne pletes. Vem si napriklad "printf" !
>
> ---
> CCkovy printf by mel byt deklarovan takto (prevzato z dokumentace v
> Linuxu):
>
> int printf(const char *format, ...);
>
> (vsechny parametry jsou tedy pointry, resp. 4 bytove promenne na
> stacku)
No nevim, nezkousel jsem to, ale podle popisu v MSDN to nemusi byt tak
jednoduche.
Podle nasledujicicho vypisu je ch jednobajtovy s hodnotou, *string je pointer,
count je 4bajtovy, ale nese primo hodnotu, fp je 8bajtovy s hodnotou, wch je
dvoubajtovy a *wstring je pointer. Kdyby byly vsechno pointery, pak by se
musely predavat parametry takto:
&ch, string, &count, &fp, &wch, wstring.
char ch = 'h', *string = "computer";
int count = -9234;
double fp = 251.7366;
wchar_t wch = L'w', *wstring = L"Unicode";
/* Display integers. */
printf( "Integer formats:\n"
"\tDecimal: %d Justified: %.6d Unsigned: %u\n",
count, count, count, count );
printf( "Decimal %d as:\n\tHex: %Xh C hex: 0x%x Octal: %o\n",
count, count, count, count );
/* Display in different radixes. */
printf( "Digits 10 equal:\n\tHex: %i Octal: %i Decimal: %i\n",
0x10, 010, 10 );
/* Display characters. */
printf("Characters in field (1):\n%10c%5hc%5C%5lc\n", ch, ch, wch, wch);
wprintf(L"Characters in field (2):\n%10C%5hc%5c%5lc\n", ch, ch, wch, wch);
/* Display strings. */
printf("Strings in field (1):\n%25s\n%25.4hs\n\t%S%25.3ls\n",
string, string, wstring, wstring);
wprintf(L"Strings in field (2):\n%25S\n%25.4hs\n\t%s%25.3ls\n",
string, string, wstring, wstring);
/* Display real numbers. */
printf( "Real numbers:\n\t%f %.2f %e %E\n", fp, fp, fp, fp );
/* Display pointer. */
printf( "\nAddress as:\t%p\n", &count);
/* Count characters printed. */
printf( "\nDisplay to here:\n" );
printf( "1234567890123456%n78901234567890\n", &count );
printf( "\tNumber displayed: %d\n\n", count );
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Zmena prav interbase
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 15.5.2001 17:55:24
Ahoj,
jak pristupujes k IB? Komponenty z Delphi (IBExpress)?
Kazdopadne by to melo jit pomoci SQL prikazy GRANT a REVOKE..
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
>
>
> Je mozne z delphi(5) nastavovat nebo menit pristupova prava na ser.
> interbase?
>
> dekuji
>
>
> S pozdravem,
> Petr Kalis
>
> mailto:p.kalis(zv)worldonline(tec)cz
>
>
>
> Defaultni hodnoty v komponente
[*] brant(zv)dcomm(tec)cz - 15.5.2001 19:49:48
Psal jsem dnes svou prvni komponentu a nevim jednu vec. Jedna se o potomka
TCustomPanel, vsechno funguje tak jak ma, ale komponenta si nepamatuje
defaultni hodnoty, ktere jsem tam nastavil. Musel jsem prepsat konstruktor a
do neho napsat ty defaultni hodnoty znova, pak to jde. V cem by mohl byt
problem?
Napriklad takto to vypada v kodu komponenty:
property FrameGap: byte read FFrameGap write SetFrameGap default 3;
Jenze pri spusteni testovaciho programu je ta property v designtime rovna 0.
A i kdyz v designtime nastavim rucne pozadovanou hodnotu, stejne je v
runtime rovna 0. Teprve kdyz se napise v konstruktoru
constructor TFramedPanel.Create(AOwner: TComponent);
begin
inherited;
SetFrameGap(3);
(...)
tak to funguje. Je to normalni, ze se to musi nastavovat dvakrat?Prepis funkce z Ccka do Pascalu
[*] Erik Salaj <winsoft(zv)stonline.sk> - 15.5.2001 21:21:27
> CCkovy printf by mel byt deklarovan takto (prevzato z dokumentace v
Linuxu):
>
> int printf(const char *format, ...);
>
> (vsechny parametry jsou tedy pointry, resp. 4 bytove promenne na stacku)
Nie je to tak, napr. double ma 8 bajtov a odovzdava sa hodnotou.
> cili predpokladam, ze vlastni funkce je napsana nejak takto:
> - dostane na stack _pointry_ na parametry *lhostejno, zda pointer miri
> opravdu ns retezec znaku, nebo na integer cislo)
> - predpoklada, ze prvni parametr je formatovaci predpis - proleze jej a
> postupne se pohybuje od prvniho argumentu k poslednimu tak, ze si nastavi
> nejaky pointer na stack a inkrementuje ho o velikost argumentu na stacku
> (vzdy stejna - 4 byty)
>
> kdyby mohl mit kazdy argument na stacku jinou velikost, pak by se odnekud
> musela brat informace o tom kolik zabira na stacku mista aby se bylo mozne
> dostat spravne na pozici dalsiho argumanetu. Neni to neresitelne ale
> zbytecne komplikovane a nespolehlive (napriklad by stacilo pred kazdy
> skutecny argument umistit dalsi parametr, ktery definuje velikost) ale
CCko
> to jinak zrejme neumi.
Funkcia sa musi nejakym sposobom dozvediet, ake parametre dostane,
napr. z prveho parametra (napr. sprintf). C-cko ma funkcie/makra
na ulahcenie pristupu k premennym parametrom: va_start, va_arg a va_end
Erik
Prepis funkce z Ccka do Pascalu
[*] Erik Salaj <winsoft(zv)stonline.sk> - 15.5.2001 21:22:10
> Ccko ocekava, ze nevyjmenovane parametry (trojtecka) budou mist stejny typ
V tomto nemas pravdu, moze tam byt lubovolny pocet parametrov lubovolneho
typu.
Erik
Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.5.2001 21:33:48
> > int printf(const char *format, ...);
> >
> > (vsechny parametry jsou tedy pointry, resp. 4 bytove promenne na
> > stacku)
>
> No nevim, nezkousel jsem to, ale podle popisu v MSDN to nemusi byt tak
> jednoduche.
Ty priklady jsou zajimave (zvlaste ty s &count a count). Rekl bych, ze se jeste ledacos da vysvetlit kompilatorem (muze prevest sam na pointr to co se do 4 bytu nevejde). Ale take muze byt vsechno uplne jinak. Chtelo by to zdrojaky k printf().
>
> Podle nasledujicicho vypisu je ch jednobajtovy s hodnotou, *string je pointer,
> count je 4bajtovy, ale nese primo hodnotu, fp je 8bajtovy s hodnotou, wch je
> dvoubajtovy a *wstring je pointer. Kdyby byly vsechno pointery, pak by se
> musely predavat parametry takto:
> &ch, string, &count, &fp, &wch, wstring.
ono i v Pascalu je mozne do pointroveho parametru (String, PChar) predat napriklad konstantu (ale dal mi to ponekud pokulhava :-)
Podival jsem se na:
http://msdn.microsoft.com/library/wcedoc/wcecrt/crt2_89.htm
a tam je odkaz na:
http://msdn.microsoft.com/library/wcedoc/wcecrt/crt2_94.htm#_wcecrt_size_prefixes_for_printf_and_wprintf_format_type_specifiers
, kde se pise, ze je mozne nejakymi prefixy zmenit defaultni velikost parametru. Cili zrejme to v Ccku funguje takto:
- neni pravda, ze kompilator generuje ukladani parametru zavisle na definici deklarace hlavicky funkce (tj velikost a ulozeni parametru na stacku neni totozne s poslednim vyjmenovanym parametrem (ten pred trojteckou)
- parametry jsou na stack ukladany v zavislosti na tom jak jej uvede pri volani funkce! Tedy printf(ch) ulozi na stack jeden byte (i kdyz ve skutecnosti to stejne mohou byt byty 4) a printf(&ch) pak 4 bytovy pointer na ch. (v Ccku je defaultni volaci konvence cdecl - coz znamena, ze stack uklizi volajici kod a ne procedura, coz umoznuje variabilitu na stacku).
- aby to fungovalo musi printf znat delku jednotlivych parametru. K tomu slouzi jednak nejaka dohoda o defaultni velikosti, jednak explicitni prefixy (L,..) a jednak vlastni definice parametru vkladanych do formatovaneho stringa (%c, %d,...)
> char ch = 'h', *string = "computer";
> int count = -9234;
> double fp = 251.7366;
> wchar_t wch = L'w', *wstring = L"Unicode";
>
> /* Display integers. */
> printf( "Integer formats:\n"
> "\tDecimal: %d Justified: %.6d Unsigned: %u\n",
> count, count, count, count );
%d a %u interpretuje printf jako hodnotou volane parametry. Cili netreba pointeru
>
> printf( "Decimal %d as:\n\tHex: %Xh C hex: 0x%x Octal: %o\n",
> count, count, count, count );
obdobne
>
> /* Display in different radixes. */
> printf( "Digits 10 equal:\n\tHex: %i Octal: %i Decimal: %i\n",
> 0x10, 010, 10 );
obdovne
>
> /* Display characters. */
>
> printf("Characters in field (1):\n%10c%5hc%5C%5lc\n", ch, ch, wch, wch);
%c je interpretovan jako znak (1 byte)
%C je interpretovan jako wide znak (2 byte)
> wprintf(L"Characters in field (2):\n%10C%5hc%5c%5lc\n", ch, ch, wch, wch);
protoze je pouzit prefix L prohodi se vyznam %c a %C
>
> /* Display strings. */
>
> printf("Strings in field (1):\n%25s\n%25.4hs\n\t%S%25.3ls\n",
> string, string, wstring, wstring);
%s %hs obycejny string
%S %ls wide string
kompilator zrejme automaticky prevede na pointer (4 byty na stacku). Ale mozna taky ne.
> wprintf(L"Strings in field (2):\n%25S\n%25.4hs\n\t%s%25.3ls\n",
> string, string, wstring, wstring);
L otaci vyznam %s a %S
> /* Display real numbers. */
> printf( "Real numbers:\n\t%f %.2f %e %E\n", fp, fp, fp, fp );
>
> /* Display pointer. */
> printf( "\nAddress as:\t%p\n", &count);
>
> /* Count characters printed. */
> printf( "\nDisplay to here:\n" );
> printf( "1234567890123456%n78901234567890\n", &count );
%n rika, ze dany arguyment je pointrem na Integer - a printf do nej uklada pocet vytistenych znaku
> printf( "\tNumber displayed: %d\n\n", count );
>
D> Toman
Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.5.2001 21:44:30
> > ?!? ty tecky znamenaji v Cecku (neni to uplne presne ale pro tu funkci,
> > kterou chci volat to plati), ze se libovolne krat opakuje parametr jehoz
> > type je _shodny_ s predchozim paremetrem. Cili pokud byl posledni parametr
> > pred trojteckou typu 'int' pak i ostatni budou typu 'int' (resp zaberou 4
> > byty na stacku - cili muzu predat cokoliv, co zabere stejny pocet bytu)
>
> Ellipsis (...) znamena, ze tu moze byt lubovolny pocet parametrov
> lubovolneho
> typu. Funkcia s premennym poctom parametrov moze byt deklarovana napr.
Konecne se ozval nekdo zna Ccko :-)
>
> void MyFunc(...);
>
> a volana ako
>
> MyFunc(1, 2, 3);
> MyFunc(3.4, "Hello, world", -2);
>
> Obvykle sa pridava jeden pevny parameter, pomocou ktoreho je mozne
> urcit ostatne (premenne) parametre (ich pocet a typ),
> napr. funkcia printf je deklarovana takto:
>
> int __cdecl printf(const char* format, ...);
>
> A volanie printf potom v prvom parametri specifikuje ostatne parametre:
>
> printf("%d %c %lf", 10, 'x', 3.45);
Cili interpretace parametru je plne v rukou kodu te rutiny (napriklad printf)...
A pokud nespravne definuju formatovaci predpis (popletu %c s %e) dojde ke problemum (jednak se muze cist pamet mimo proces a jednak se rozsype synchronizace parametru (tj funkce bude hledat dalsi argument na spatne adrese stacku)..?
>
> Delphi taketo funkcie neumoznuje, nemal by byt ale problem ich pouzit
> v urcitych pripadoch napr. tak, ze si deklarujem takuto funkciu viackrat,
> pre rozne parametre, napr.
>
> procedure MyFunc1(a, b, c: Integer); cdecl; external 'MyDll.dll' name
> 'MyFunc';
> procedure MyFunc2(a: Real; b: PChar; c: Integer); cdecl; external
> 'MyDll.dll' name 'MyFunc';
>
> a zavolat pomocou
>
> MyFunc1(1, 2, 3);
> MyFunc2(3.4, 'Hello, world', -2);
Delphi funkce s dopredu nedefinovanym poctem parametru take podporuje - ale ma na to svou (s Cckem nekompatibilni) metodu:
napriklad:
Procedure Test(A : array of const);
povoluje libovolny pocet argumentu temer libovolneho typu (Variant)
Typickym prikladem jsou prave ekvivalenty Cckovskeho printf() - FmtBuff(), FmtStr()
D. Toman
OT: ASM
[*] Robert Kindl <rob(zv)exec(tec)cz> - 15.5.2001 21:45:38
> > Mozna by ti jako inspirace mohla poslouzit funkce FormatBuf (cca 500
radky
> v
> > ASM :-))))))
> 500 radku ma byt moc? Kdysi jsem psal projekt, ktery celkem mel nekolik
> desitek tisic radku v ASM :-)
> D. Toman
A desitky tisic jsou moc? :-)
To ja kdysi delal projekt, ktery mel pres milion radek v objektovem ASM...
Rob
TRichEdit
[*] Ma Fi <MarekFi(zv)centrum(tec)cz> - 16.5.2001 02:32:05
Viktor Bul�nek wrote:
> Zdravim, nevite nekdo, jak se dela v teto komponente skrolovani.
> Potreboval bych, aby,kdyz vlozim radek,aby se to o radek
> posunulo.Predem diky Viktor Bulanek
RichEdit1.SetFocus;
RichEdit1.SelStart := Length(RichEdit1.Text); // zajisti presunuti
kurzoru nakonec(a tim i zobrazeni), ale musi mit Focus
Marek Fiala
Help creator
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 06:16:03
> Potrebujem nejaky jednoduchy softi kna tvorbu helpu. Ale fakt jednoduchy
:).
> Neviete nejaku URL, alebo nemate niekto nieco take?
Zkus Help Scribble na www.jgsoft.com .
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Prepis funkce z Ccka do Pascalu
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 06:31:18
>> Ellipsis (...) znamena, ze tu moze byt lubovolny pocet parametrov
>> lubovolneho
>> typu. Funkcia s premennym poctom parametrov moze byt deklarovana napr.
>Konecne se ozval nekdo zna Ccko :-)
Tohle sem tvrdil celou dobu .
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Chyba v TIBQuery.IsEmpty ?
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 06:34:00
> Preco mi IBX 4.52 v TIBQuery.IsEmpty vrati true aj napriek tomu ze tam
> zarucene nie je ziadny zaznam. Opytam sa ho to napr. tri krat a potom mi
> odpovie true. Medzi kazdym opytanim este refreshnem data. Som na lokale
ako
> single user takze mi nikto do dat nefusuje a predsa si niekedy vrati ze
nie
> je Empty.
Tezko rict. Zkus pouzit RecordCount. Pokud tam bude 0 je to jasne, jinak tam
byva cislo 1.
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Chyba v TIBQuery.IsEmpty ?
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 16.5.2001 06:49:46
A neni to tim, ze podle nazvu IsEmpty by mela vracet true,
kdyz je tabulka prazdna?
Karel Chmel
> -----P�vodn� zpr�va-----
> Od: Roland Turcan (RoTurSoft) [mailto:rotursoft(zv)nextra.sk]
> Odesl�no: 15. kv�tna 2001 0:55
> Komu: Delphi CZ konferencia
> P�edm�t: Chyba v TIBQuery.IsEmpty ?
>
>
> Zdravim.
>
> Preco mi IBX 4.52 v TIBQuery.IsEmpty vrati true aj napriek tomu ze tam
> zarucene nie je ziadny zaznam. Opytam sa ho to napr. tri krat
> a potom mi
> odpovie true. Medzi kazdym opytanim este refreshnem data. Som
> na lokale ako
> single user takze mi nikto do dat nefusuje a predsa si
> niekedy vrati ze nie
> je Empty.
>
> Why ?
>
> Dakujem.
>
> Roland.
> FileVersion
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.5.2001 07:42:18
On 15 May 2001, at 15:41, Tibor Galik wrote:
> >Pokud chces jenom zmenit jiz existujici textove polozky, pak si porid
> >Jazykovy Lokalizator.
> >
> Asi som sa zle vyjadril alebo som nepochopil vysvetlenie.
>
> Takze este raz. Ak chcem ziskat nejake informacie (Company name, File
> Description, File Version, ...), mozem pouzit napr. %subj% alebo
> funkcie z Windows. Ja vsak chcem v subore file.exe zmenit napriklad
> obsah File Description. Su to hodnoty ktore sa nastavuju pred
> kompilaciou v project/option. DAjusa tieto hodnoty zmenit uz na
> skompilovanom pgm ?
Daji, porid si Jazykovy Lokalizator, ten tohle umi (mimo jine).
Pokud si to chces udelat sam, pak ti stale preju peknou zabavu. :-)
Dela se to tak, ze vylovis prislusny resource z exace, rozeberes ho
(popis formatu najdes v MSDN), vymenis texty, slozis ho opet
dohromady, no a pak to vrazis zpet do exace. Nic na tom neni. :-)
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
TXT File otev��t jako HEXA
[*] Sl�va Roman <rsliva(zv)novahut(tec)cz> - 16.5.2001 07:57:25
Ahoj.
Nev� .... Co takhle otevri soubor jako binarni a po jednom byte ho
projit
procedure bla;
var f : file;
buf : array[0.10000] of byte - pro soubory max 10000 byte
begin
Assign(f,'bla.txt');
Rewrite(f,1); ' musi byt 1
BlockRead(f,buf,FileSize(f));
CloseFile(f);
if b[1] = ???? then atd .... ?
end;Defaultni hodnoty v komponente
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 16.5.2001 08:10:00
Ahoj,
brant(zv)dcomm(tec)cz wrote:
>
> Psal jsem dnes svou prvni komponentu a nevim jednu vec. Jedna se o potomka
> TCustomPanel, vsechno funguje tak jak ma, ale komponenta si nepamatuje
> defaultni hodnoty, ktere jsem tam nastavil. Musel jsem prepsat konstruktor a
> do neho napsat ty defaultni hodnoty znova, pak to jde. V cem by mohl byt
> problem?
Tak je to schvalne. Specifikace default hodnoty nema za nasledek, ze ji
nemusis sam nastavit v constructoru, ale ze v pripade, ze aktualni
hodnota property je rovna te defaultni, neuklada se do DFM, a tak se
setri mistem.
S pozdravem,
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Zmena obrazu
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 16.5.2001 08:17:30
Ahoj,
mam kameru ze ktere bych potreboval sejmout obraz v pripade zmeny.(nekdo
projde atd.).
Nejde mi o program, ale o nejake vhodne reseni, algoritmus, apod.
Nemate s tim nekdo zkusenosti.
Moc dekuji.
Dalibor
Excel
[*] prajz.rumcajs(zv)quick(tec)cz - 16.5.2001 8:24:18
Potreboval bych poradit, jak mam do souboru *.xls pridat tabulku, anichz
bych oteviral Excel .... Ulozit tabulku do formatu *.xls neni problem, jen
tam dodat ten graf ...
Dik za kazdou odpoved
Lukas Weiss receny Rumcajs
InterBase 6.x a Zaloha dat
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 16.5.2001 08:39:17
Ahoj,
Jon�# Mari�n wrote:
>
> O tech parametrech vim, ale pokud dam gbak -b -user zaloha -password -x1
> c:\data\data.gdb d:\zaloha\gbk tak mi to napise ze bud musim byt SYSDBA nebo
> vlastnik databaze (verze WI-V6.0.1.0) Jak lze nastavit vlastnik databaze ?
Udelej backup jako SYSDBA a pote restore pod novym uzivatelem, ten se
stane ownerem.
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Chyba v TIBQuery.IsEmpty ?
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 16.5.2001 08:58:27
Ahoj,
ja osobne pouzivam TIBDataset a nic takoveho nepozoruji (coz jeste
neznamena, ze to tam neni:-). Zkus provest nekterou z metod datasetu pro
pohyb po mnozine zaznamu, v tomto pripade bych zkusil First. Uz na skoleni
nam v Borlandu tloukli do hlavy, ze Dataset.BOF a Dataset.EOF se nastavi az
po provedeni nektere z techto metod. Jestli to plati i pro IsEmpty, vsak
nevim..
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
?
>
> Zdravim.
>
> Preco mi IBX 4.52 v TIBQuery.IsEmpty vrati true aj napriek tomu ze tam
> zarucene nie je ziadny zaznam. Opytam sa ho to napr. tri krat a potom mi
> odpovie true. Medzi kazdym opytanim este refreshnem data. Som na
> lokale ako
> single user takze mi nikto do dat nefusuje a predsa si niekedy
> vrati ze nie
> je Empty.
>
> Why ?
>
> Dakujem.
>
> Roland.
>
>
Defaultni hodnoty v komponente
[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 16.5.2001 08:03:02
>-----Original Message-----
>From: brant(zv)dcomm(tec)cz [mailto:brant(zv)dcomm(tec)cz]
>Sent: Tuesday, May 15, 2001 7:50 PM
>To: delphi-l(zv)clexpert(tec)cz
>Subject: Defaultni hodnoty v komponente
>
>
>Psal jsem dnes svou prvni komponentu a nevim jednu vec. Jedna
>se o potomka
>TCustomPanel, vsechno funguje tak jak ma, ale komponenta si nepamatuje
>defaultni hodnoty, ktere jsem tam nastavil. Musel jsem prepsat
>konstruktor a
>do neho napsat ty defaultni hodnoty znova, pak to jde. V cem
>by mohl byt
>problem?
>
>Napriklad takto to vypada v kodu komponenty:
> property FrameGap: byte read FFrameGap write SetFrameGap default 3;
>
>Jenze pri spusteni testovaciho programu je ta property v
>designtime rovna 0.
>A i kdyz v designtime nastavim rucne pozadovanou hodnotu, stejne je v
>runtime rovna 0. Teprve kdyz se napise v konstruktoru
>
>constructor TFramedPanel.Create(AOwner: TComponent);
>begin
> inherited;
> SetFrameGap(3);
> (...)
>
>tak to funguje. Je to normalni, ze se to musi nastavovat dvakrat?
>
Kdyz jsem psal prvni komponentu, tak jsem narazil na stejny problem, pak
jsem se podival do zdrojaku VCL a tam maji nastaveni defaultni hodnoty taky
dvakrat, jednou v property xxx a podruhe v constructoru.
Marian Jonas
Chyba v TIBQuery.IsEmpty ?
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 16.5.2001 09:06:44
>
> Tezko rict. Zkus pouzit RecordCount. Pokud tam bude 0 je to
> jasne, jinak tam
> byva cislo 1.
>
Mam pocit, ze v RecordCount je pouze pocet uz fetchnutych zaznamu, nikoli
celkovy pocet. Na tenhle rozdil se pravidelne "nachyta" TDBComboBox, ktery
se rozbali do jednoho radku i kdyz mnozina jich ma treba sto. Ja pouzivam na
odstraneni tohoto FetchAll, ale to ta mnozina nesmi mit prilis mnoho zaznamu
(to lze vhodne omezit klauzuli WHERE v Selectu).
Ota Maly
D5Prof; IBX4.52;
Jak udelat viceradkovy DBEdit ?
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 16.5.2001 09:08:53
Ahojte,
poradte mi prosim nekdo, jak prepsat komponentu DBEdit, nebo lepe udelat
novou, ktera bude vychazet z DBEditu, ale bude viceradkova ?
Diky
Filip
Jak udelat viceradkovy DBEdit ?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 16.5.2001 09:15:15
> Ahojte,
> poradte mi prosim nekdo, jak prepsat komponentu DBEdit, nebo lepe
> udelat novou, ktera bude vychazet z DBEditu, ale bude viceradkova ?
>
A neslo by pouzit DBMemo?
David Lebeda
InterBase 6.x a Zaloha dat
[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 16.5.2001 08:26:07
>> Lze nejakym zpusobem prinutit IB, aby provedla zalohu dat,
>> aniz bych byl prihlasen jako SYSDBA ?
>>
>> Marian Jonas
>
>Pomoci utility GBAK ? Parametry -USER a -PAS pomohou :)
>Uzivatel ovsem musi mit prava ke cteni objektu databaze.
>SYSDBA je tak jako tak nejjistejsi a nejjednodussi.
>
>Hodne zdaru
>
>Pavel Cisar <pcisar(zv)borland(tec)cz>
>Borland s.r.o.
O tech parametrech vim, ale pokud dam gbak -b -user zaloha -password -x1
c:\data\data.gdb d:\zaloha\gbk tak mi to napise ze bud musim byt SYSDBA nebo
vlastnik databaze (verze WI-V6.0.1.0) Jak lze nastavit vlastnik databaze ?
Marian Jonas
Pripojeni k internetu
[*] Fink Alois <delphi(zv)profia(tec)cz> - 16.5.2001 09:33:03
Potrebuji nekolikrat denne aplikaci pripojit k internetu pomoci vytacene
linky. Jsou nejake komponenty , nebo rada jak na to ?
Diky Fink.Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.5.2001 09:39:15
> >> Ellipsis (...) znamena, ze tu moze byt lubovolny pocet parametrov
> >> lubovolneho
> >> typu. Funkcia s premennym poctom parametrov moze byt deklarovana napr.
>
> >Konecne se ozval nekdo zna Ccko :-)
>
> Tohle sem tvrdil celou dobu .
ty jsi tvrdil, ze se to musi v Pascalu prepsat pomoci Variantu, coz neni
spravne.
V minulych mailech jsem uznal, ze muj predpoklad, ze volitelne parametry
maji stejny typ byl mylny (vychazel jsem z toho, ze by bylo vhodne, kdyby to
mel kompilator pod vetsi kontrolou - zapomnel jsem ale ze se jedna o Ccko
:-)
D. Toman
WIN CE
[*] Karasek Jaroslav <Jaroslav.Karasek(zv)swh.sk> - 16.5.2001 10:02:09
> jsem se zeptat, zda nekdo nezna nejaky free vyvojovy
> software podobny
> Delphi, ve kterem by sly psat aplikace pro Windows CE bud
> primo na H/PC nebo
> primo na PC. Diky
Embedded Visual Tool 3.0 od MS. A z neho Visual Basic. Da sa to
objednat od MS za 15$.
Jaro
Prepis funkce z Ccka do Pascalu
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.5.2001 10:11:06
On 15 May 2001, at 21:44, Dalibor Toman wrote:
> > A volanie printf potom v prvom parametri specifikuje ostatne
> > parametre:
> >
> > printf("%d %c %lf", 10, 'x', 3.45);
>
> Cili interpretace parametru je plne v rukou kodu te rutiny (napriklad
> printf)... A pokud nespravne definuju formatovaci predpis (popletu %c
> s %e) dojde ke problemum (jednak se muze cist pamet mimo proces a
> jednak se rozsype synchronizace parametru (tj funkce bude hledat dalsi
> argument na spatne adrese stacku)..?
V kazdem pripade bude v Delphi asi nejaky zavazny problem,
protoze napriklad wsprintf, ktery ma v C take volitelne parametry, je
v jednotce Windows predeklarovan takto:
function wsprintf(Output: PChar; Format: PChar): Integer; stdcall;
To znamena, ze za dosazeni parametru odpovida programator jeste
pred volanim funkce. Jinak bych ocekaval, ze tam bude deklarace
const Args: array of const (urcite ne variant). Patrne zde vsak neni
kompatibilita s C.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Pointer
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.5.2001 10:11:06
On 15 May 2001, at 15:08, Jozef Cervenansky wrote:
> mohol by mi niekto poradit, ako mam rozumiet tomuto zapisu ?
>
> Result := inet_ntoa(pptr^[I]^);
Je to ukazatel na pole, ktere obsahuje ukazatele na nejakou(e)
strukturu(y).
Pod tim muze byt schovane napriklad neco takoveho:
type
PMujRec = ^TMujRec;
TMujRec = record ...
Pole = array[0..max] of PMujRec;
pptr = ^Pole;
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chyba v TIBQuery.IsEmpty ?
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 10:15:54
> Mam pocit, ze v RecordCount je pouze pocet uz fetchnutych zaznamu, nikoli
> celkovy pocet. Na tenhle rozdil se pravidelne "nachyta" TDBComboBox, ktery
> se rozbali do jednoho radku i kdyz mnozina jich ma treba sto. Ja pouzivam
na
> odstraneni tohoto FetchAll, ale to ta mnozina nesmi mit prilis mnoho
zaznamu
> (to lze vhodne omezit klauzuli WHERE v Selectu).
Ano. Mas pravdu, ale je to jednoduchy zpusob, jak zjistit zda obsahuje
nejake zaznamy (kdyz mu blbne IsEmpty).
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Pripojeni k internetu
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.5.2001 10:22:08
Puvodni zprava, kterou napsal Fink Alois dne 16 May 2001,:
> Potrebuji nekolikrat denne aplikaci pripojit k internetu pomoci vytacene
> linky. Jsou nejake komponenty , nebo rada jak na to ?
Vzdyt mas Async Professional a tam je na to RAS, kterym
se pripojis...
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================Jak udelat viceradkovy DBEdit ?
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 16.5.2001 10:30:11
Ahoj,
a TDBListBox neni to, po cem tve srdce touzi? Nebo to potrebujes v jednom
zaznamu to jedno pole na vice radek? Pak mozna TDBMemo..
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
>
> Ahojte,
> poradte mi prosim nekdo, jak prepsat komponentu DBEdit, nebo lepe udelat
> novou, ktera bude vychazet z DBEditu, ale bude viceradkova ?
>
> Diky
> Filip
>
Chyba v TIBQuery.IsEmpty ?
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 10:53:59
> Ahoj,
> ja osobne pouzivam TIBDataset a nic takoveho nepozoruji (coz jeste
> neznamena, ze to tam neni:-). Zkus provest nekterou z metod datasetu pro
> pohyb po mnozine zaznamu, v tomto pripade bych zkusil First. Uz na skoleni
> nam v Borlandu tloukli do hlavy, ze Dataset.BOF a Dataset.EOF se nastavi
az
> po provedeni nektere z techto metod. Jestli to plati i pro IsEmpty, vsak
> nevim..
Jenze ten tazatel z nejakeho duvodu nepouziva TIBDataset ale TIBQuery a tam
First neni (myslim).
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.5.2001 11:02:21
>
> V kazdem pripade bude v Delphi asi nejaky zavazny problem,
> protoze napriklad wsprintf, ktery ma v C take volitelne parametry, je
> v jednotce Windows predeklarovan takto:
>
> function wsprintf(Output: PChar; Format: PChar): Integer; stdcall;
>
> To znamena, ze za dosazeni parametru odpovida programator jeste
> pred volanim funkce. Jinak bych ocekaval, ze tam bude deklarace
> const Args: array of const (urcite ne variant). Patrne zde vsak neni
> kompatibilita s C.
>
Jak jsem jiz psal - Delphi preklada Open array parametry tak, ze ve vysledku
je to nekompatibilni s Cckem.
A: Array of Const je deklarace, ktera zpusobi, ze se pouzije Variant typ
parametru
A: Array of Pointer by bylo schudnejsi - ale Delphi bud predaji pointer na
cele open array (s cimz Ccko nepocita) nebo
(v pripade ze argument neni uveden jako VAR ci CONST) Delphi predaji take
jen pointer na cele pole - _ALE_ vlastni subrutina si vytvori sama kopii na
stacku (cili zase odisne od Ccka). A to i pokud je rutina deklarovana jako
'cdecl'
D. Toman
Zmena obrazu
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 11:14:31
> Nejde mi o program, ale o nejake vhodne reseni, algoritmus, apod.
> Nemate s tim nekdo zkusenosti.
Nejucinejsi zpusob asi bude :
Na zacatku "naskenovat obraz" vybrat nekolik svetlych orientacnich bodu v
rozumnem pokryti celeho obrazu (treba 10 x 10 prez obraz) a ty prubezne
kontrolovat.
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Problemy s IB
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 16.5.2001 11:18:10
Dobry den,
// WinNT 4 Workst.(sp5) - Delphi 5 Ent. - IB Express
// WinNT 4 Server - IB 6
Mam neustale problemy s IB.
Za posledni pulrok se mi jiz asi petkrat vyskytly problemy typu:
"Wrong page type (Expected 5, found 7)"
"Software gds bug. Can't continue, after bug check"
GFix mi nikdy nepomohl. Bud se mi vubec nedarilo ho spustit, nebo bezel cely
den a pak vypsatl hlasku typu:
"I/O Error,
Can't read file DB_05.gdb,
Wrong page type (Expected 5, found 7)
(Software gds bug. Can't continue, after bug check)"
Ted bezi zase jiz nekolik hodin.
Mam databzi o velikosti 3GB, byvala by byla jiz davno vetsi, kdybych nemusel
po kazde takove havarii zacinat znovu.
Nemate nekdo podobne zkusenosti? Je nejaky odzkouseny zpusob opravy
poskozene db?
Dekuju za kazdou radu - jsem v nouzi - mam delat kazdy tyden reporty
zalozene na velkem mnozstvi dat, ale ta data nemam. :)
Michal Tiller
(poukaz na vyvojare)
Michal.Tiller(zv)OskarMobil.Cz
IB a scripty
[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 16.5.2001 11:34:42
Ahoj, existuje nejaka moznost jak pustit z programu script na
interbase.
Napr. kdyz chci udelat upgrade database a pridat par tabulek a
indexu, tak bych dal do programu nekam script a ten se pusti, ze
abych nemusel k zakaznikovi jezdit, ale aby si udelal sam.
Pouzivam IB 6, D5, IBExpress 4.52
Dekuji.
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
Problemy s IB
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 16.5.2001 11:37:49
Ahoj,
Michal Tiller wrote:
>
> Mam neustale problemy s IB.
> Za posledni pulrok se mi jiz asi petkrat vyskytly problemy typu:
>
> "Wrong page type (Expected 5, found 7)"
> "Software gds bug. Can't continue, after bug check"
>
> GFix mi nikdy nepomohl. Bud se mi vubec nedarilo ho spustit, nebo bezel cely
> den a pak vypsatl hlasku typu:
>
> "I/O Error,
> Can't read file DB_05.gdb,
> Wrong page type (Expected 5, found 7)
>
> (Software gds bug. Can't continue, after bug check)"
>
> Ted bezi zase jiz nekolik hodin.
>
> Mam databzi o velikosti 3GB, byvala by byla jiz davno vetsi, kdybych nemusel
> po kazde takove havarii zacinat znovu.
Matne si pamatuji, ze jsi se drive ptal na to, jak opravit databazi, kde
velikost souboru prekrocila povolenou velikost 2GB na jeden soubor.
Jestli to tak je (tj. nemylim-li se), tak to spolu souvisi a je to
hlavne chyba Tva, bohuzel :-( Musis definovat databazi tak, ze pokud
hrozi rust nad mez 2GB, je treba rovnou zalozit i dalsi soubory, ve
kterych databaze muze dale rust (viz. dokumentace). Neznam presne
interni strukturu DB, ale neco o ni vim. Zjednodusene: je slozena z
ruznych typu stranek, ktere obsahuji ruzne typy dat (o transkacich,
normalni data, BLOB data ...). Pretecenim povolene velikosti souboru
dojde k tomu, ze se data patrici na nejaky typ stranky zapisou na jinou
adresu v souboru, nez kam patri, a tak poskodi strukturu. Vysledkem je,
ze s tim zadny program nemuze nic delat.
Chybou/nedostatkem IB je, ze povoli rust souboru nad onu mez. V
nejblizsi dobe Firebird (a pote mozna i InterBase) tento velikostni
limit na jeden soubor maji udajne odstranit (presneji receno, bude
zavisly na OS), takze se tohle uz opakovat nebude, ale to Tobe uz
nepomuze ...
Stale tady je moznost, ze to neni Tvuj pripad, ale ja bych si na to
vsadil.
S pozdravem,
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Chyba v TIBQuery.IsEmpty ?
[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 16.5.2001 10:55:17
Pouzivam TIBQuery a IsEmpty funguje v poradku, tzn. po Open ma IsEmpty
spravnou hodnotu. Ale je potreba davat si pozor na to, ze pokud mam SQL
prikaz select sum(obnos) from tabulka where cislo=1, tak mi to muze vratit
jeden radek, kde bude hodnota NULL. Takze pouzivam konstrukci:
IF (ISEMPTY=TRUE) OR (FIELDBYNAME('HODNOTA').ISNULL) THEN ...
Marian Jonas
>Ahoj,
>ja osobne pouzivam TIBDataset a nic takoveho nepozoruji (coz jeste
>neznamena, ze to tam neni:-). Zkus provest nekterou z metod
>datasetu pro
>pohyb po mnozine zaznamu, v tomto pripade bych zkusil First.
>Uz na skoleni
>nam v Borlandu tloukli do hlavy, ze Dataset.BOF a Dataset.EOF
>se nastavi az
>po provedeni nektere z techto metod. Jestli to plati i pro
>IsEmpty, vsak
>nevim..
>
>
>S pozdravem
>Ota Maly
>
>PaPouch elektronika
>http://www.papouch.com
>
>?
>>
>>
>> Zdravim.
>>
>> Preco mi IBX 4.52 v TIBQuery.IsEmpty vrati true aj napriek
>tomu ze tam
>> zarucene nie je ziadny zaznam. Opytam sa ho to napr. tri
>krat a potom mi
>> odpovie true. Medzi kazdym opytanim este refreshnem data. Som na
>> lokale ako
>> single user takze mi nikto do dat nefusuje a predsa si niekedy
>> vrati ze nie
>> je Empty.
>>
>> Why ?
>>
>> Dakujem.
>>
>> Roland.Problem s ToolBarom
[*] mstevlik(zv)gamo.sk - 16.5.2001 12:07:51
Zdravim all,
Mam asi trivialny problem, ale neviem si snim poradit.
Mam D5 W2000 a pouzivam v app ToolBar s ToolButtonami kt. su flat. Cely
ToolBar je v ControlBare do kt. vytvaram dynamicky dalsie ToolBary. Problem
nastane, ked velkost okna nepostacuje dlzke vsetkych toolbarov a potom s
posledneho vidim len niektore buttony. Zatial to riesim pomocou AutoSize
ToolBaru ten mi potom zvacsi vysku ControlBaru a sam sa prehodi do dvoch or
n riadkov aby bol komplet zobrazeny.
Chcel by som vsak vyuzit nieco take ako je pouzite v MS Office, ze ak sa
nemozu zobrazit vsetky buttony, tak na konci daneho toolbaru sa zjavi
tlacitko v tvare dvoch sipiek, kt. mi potom zobrazi zvysne buttony.
Je to mozne vobec riesit pomocou ToolBaru?
Dik vopred
Stevlik Marian
ISYS-KOM programator
GAMO a.s., Banska Bystrica
+421 88 413 7935, 413 2942
mstevlik(zv)gamo.sk
+421 905 462 010
ICQ: 38493645
Pouziva se soubor?
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 16.5.2001 13:26:53
Zdravim,
zajimalo by me jest-li lze zjistit, zda-li je soubor pouzivan jinym procesem
nebo ne?
S pozdravem,
Petr
Eventy TForm
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 16.5.2001 13:29:18
Vykrokovat sa to da! Urcite, prinajhorsom posielanim sprav v tych metodach
do extenreho debuggera, napriklad Overseer od Pavla Cisare.
(http://delphree.clexpert.com/pages/projects/nexus/).
Ale:
OnCloseQuery sa vola pri poziadavku na ukonecie aplikacie jednak od OS tak
od samoztnej aplikacie.
OnDestroy pri zruseni
OnClose (nevola sa pri zruseni formu (free)) ale pri zatvoreni
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
> OnClose, OnCloseQuery, OnDestroy
>
> ktere z techto eventu se vola pri:
>
> a) spustene aplikaci a vypnuti/restartu Windowsu (nevim jak vykrokovat)
> b) pri ukonceni aplikace (jenom Close, CloseQuery??)
> c) pri pouziti metody Free (only Destroy??)
Prepis funkce z Ccka do Pascalu
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 16.5.2001 13:37:44
> ty jsi tvrdil, ze se to musi v Pascalu prepsat pomoci Variantu, coz neni
> spravne.
Nic jsem netvrdil. Pouze jsem napsal jak by to mohlo vypadat a hlavne tam
slo o ten ARRAY. To jestli tam bude Variant nebo const je vedlejsi. On
nevedel jak "napodobit ellipsis" v pascalu. Nic vic, nic min.
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
IB a scripty
[*] Marek Muller <delphi-konference(zv)bcpraha(tec)com> - 16.5.2001 13:57:57
Jednoduse vloz ten skript do TQuery.SQL.Text a zavolej TQuery.Execute. S IB nedelam, ale snad by to tam melo jit taky.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Radek KALA
Sent: Wednesday, May 16, 2001 11:35 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: IB a scripty
Ahoj, existuje nejaka moznost jak pustit z programu script na
interbase.
Napr. kdyz chci udelat upgrade database a pridat par tabulek a
indexu, tak bych dal do programu nekam script a ten se pusti, ze
abych nemusel k zakaznikovi jezdit, ale aby si udelal sam.
Pouzivam IB 6, D5, IBExpress 4.52
Dekuji.
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
prihlasen k ibase
[*] Petr Kal� - 16.5.2001 13:58:06
Hi
Jak je mozne predavat jmeno a heslo interbasi z prog. v delphi 5 aby me tam
neskakalo to prihlasovaci okenko?
Tzn. kdyz pouziju select v componente sqlquery tak aby se rovnou
prihlasil a nechtel od uzivatele jmeno a heslo.
dik
S pozdravem,
Petr Kalis
mailto:p.kalis(zv)worldonline(tec)cz
IB a scripty
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.5.2001 14:19:12
Haj hou!
On 16 May 2001,, Radek KALA wrote:
> Ahoj, existuje nejaka moznost jak pustit z programu script na
> interbase.
> Napr. kdyz chci udelat upgrade database a pridat par tabulek a
> indexu, tak bych dal do programu nekam script a ten se pusti, ze
> abych nemusel k zakaznikovi jezdit, ale aby si udelal sam.
> Pouzivam IB 6, D5, IBExpress 4.52
Da se to snadno napsat napr. pomoci TIBSql nebo TIBQuery. Nebo
by mohl byt nejaky takovy programek na internetu
(www.interbase2000.org a www.ibphoenix.com je dobry start).
Pripadne se da zavolat externi ISQL a predat mu textovy soubor ke
zpracovani.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.5.2001 14:20:14
> > ty jsi tvrdil, ze se to musi v Pascalu prepsat pomoci Variantu, coz neni
> > spravne.
>
> Nic jsem netvrdil. Pouze jsem napsal jak by to mohlo vypadat a hlavne tam
> slo o ten ARRAY. To jestli tam bude Variant nebo const je vedlejsi. On
> nevedel jak "napodobit ellipsis" v pascalu. Nic vic, nic min.
>
no podle me to bylo dost kategoricky receno (uryvek z Tveho prvniho mailu k
danemu threadu):
--
> Nejsem ceckar (to slovo zni blbe), ale co takhle dynamicke pole Array of
> integer?
Tri tecky nenaznacuje ze tam budou cisla, nybrz COKOLI.
Proto Array of Variant.
Jak jsem jiz psal, bude to vypadat takto :
procedure NejakeJmeno ( i : integer; args : array of variant);
--
D. Toman
prihlasen k ibase
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.5.2001 14:21:16
Haj hou!
On 16 May 2001,, Petr Kal� wrote:
> Jak je mozne predavat jmeno a heslo interbasi z prog. v delphi 5 aby me tam
> neskakalo to prihlasovaci okenko?
>
> Tzn. kdyz pouziju select v componente sqlquery tak aby se rovnou
> prihlasil a nechtel od uzivatele jmeno a heslo.
Nutne pouzit komponentu TIBDatabase/TDatabase a nastavit
property LoginPrompt na FALSE. Potom do Parameters nastavit
hodnoty parametru pro uzivatelske jmeno a heslo (lisi se u
TIBDatabase a TDatabase), nejsnaze s pouzitim komponent
editoru prislusne komponenty.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Problemy s IB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.5.2001 14:33:43
Haj hou!
> "Wrong page type (Expected 5, found 7)"
> "Software gds bug. Can't continue, after bug check"
Vazny problem: Misto datove stranky se nasla stranka s indexem.
Duvodu muze byt vice, nejpravdepodobnejsi jsou:
1) Problem nevznikl pri rustu databaze na 2GB (limit pro single file
db)
2) Databaze byla puvodne ve strasi verzi IB a pri prechodu na IB6
nebyl pouzit postup 'zaloha na stare verzi -> obnova na nove'.
Nektere revize IB6 maji problem se ctenim starsich databazi
(ODS9) a dochazi k jejich poskozeni.
3) Starsi verze IB6 mely problem s generatory. Pri prekroceni
urciteho poctu dochazelo k prepisovani pameti.
Reseni:
1) Nejdriv bych se pokusil o backup a restore (do jine databaze!).
2) Obnova ze starsi zalohy
3) IBPhoenix opravuje poskozene databaze. Ann Harrison umi
uplna kouzla (neni to ovsem levne).
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Prepis funkce z Ccka do Pascalu
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 16.5.2001 14:46:10
Ve FreePascalu (viz http://gate.nbu.bg/Doc/FreePascal/prog/node6.html) to resi takto:
To use functions in C that have a variable number of arguments, you must compile your unit or program in objfpc mode or
Delphi mode, and use the Array of const argument, as in the following example:
program testaocc;
{$mode objfpc}
Const
P : Pchar
= 'example';
F : Pchar
= 'This %s uses printf to print numbers (%d) and strings.'#10;
procedure printf(fm: pchar;args: array of const);cdecl;external 'c';
begin
printf(F,[P,123]);
end.
IB a scripty
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 16.5.2001 14:47:20
Drobna poznamka, musis prikaz po prikazu, ale to by nemel byt problem, ze ?
Slavek
>
> Jednoduse vloz ten skript do TQuery.SQL.Text a zavolej TQuery.Execute. S IB nedelam, ale snad by to tam melo jit taky.
>
>
> Ahoj, existuje nejaka moznost jak pustit z programu script na
> interbase.
> Napr. kdyz chci udelat upgrade database a pridat par tabulek a
> indexu, tak bych dal do programu nekam script a ten se pusti, ze
> abych nemusel k zakaznikovi jezdit, ale aby si udelal sam.
> Pouzivam IB 6, D5, IBExpress 4.52
> TXT File =?iso-8859-2?Q?otev=F8=EDt?= jako HEXA
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 16.5.2001 15:16:42
Ahoj,
skoro bych rekl, ze const CRLF by mela byt v tomto pripade $0A0D.
Vaclav Sazima
Zbysek Hlinka wrote:
>
> Tak si udelej jednoduchy programek, ktery nacte ten soubor jako
> binarni a nahradi 01 koncem radku. Treba takto (velice
> zjednodusene):
>
> var
> b: byte;
> const
> CRLF: word = $0D0A;
>
> for i := 0 to Pred(FileStream.Size) do
> begin
> FileStream.Read(b, 1);
> if b = 1 then OutStream.Write(CRLF, 2) else
> OutStream.Write(b, 1);
> end;
>Pouziva se soubor?
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 16.5.2001 15:23:42
Ahoj,
zkus ho otevrit s parametrem fmShareExclusive.
Vaclav Sazima
Petr Reichl wrote:
>
> Zdravim,
>
> zajimalo by me jest-li lze zjistit, zda-li je soubor pouzivan jinym procesem
> nebo ne?
>
> S pozdravem,
>
> Petr
Dialog Open width...
[*] goryl(zv)insdata.sk - 16.5.2001 15:32:29
Ahojte
Ako programovo vyvolat dialog "Open width..."?
Vdaka, Marian.IB6.0.1.6: Backup/Restore
[*] Dusan Fojtik <fojtikd(zv)aix.upol(tec)cz> - 16.5.2001 15:58:28
Nazdar
mam vazny problem se zalohovanim a obnovovanim databaze. V databazi jsou
ulozeny v retezcich ceske znaky a COLLATE je pro ne nastaveno na COLLATE
PXW_CSY,v BDE mam u LANGDRIVERu nastaveno Pdox ANSI Czech.
Dale jsou v databazi pouizity generatory a procedury.
Kdyz zazalohuji databazi utilitou gbak(probehne to bez problemu), pak kdyz
chci potom tuto zazalohovano databazi obnovit, tak mi obnovovani spadne na
teto chybe:
,,Arithmetic exception, numeric overflow, or string truncation"
Nevite nekdo co s tim ?
S pozdravem
Dusan Fojtik
IB a scripty
[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 16.5.2001 16:01:32
Jak jsem psal pouzivam IBExpress, takze TIBQuery, ale to jsem
zkusil a dopadl jsem blbe. prvni prikaz byl create a dalsi alter (
pridani indexu, a ten alter se mu nelibi ( TOKEN UNKNOWN )
Pritom je to normalni script, kterej z IBExperta normalka bezi
> Jednoduse vloz ten skript do TQuery.SQL.Text a zavolej TQuery.Execute. S IB nedelam, ale snad by to tam melo jit taky.
>
> -----Original Message-----
>
> Ahoj, existuje nejaka moznost jak pustit z programu script na
> interbase.
> Napr. kdyz chci udelat upgrade database a pridat par tabulek a
> indexu, tak bych dal do programu nekam script a ten se pusti, ze
> abych nemusel k zakaznikovi jezdit, ale aby si udelal sam.
> Pouzivam IB 6, D5, IBExpress 4.52
> 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
Prepis funkce z Ccka do Pascalu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.5.2001 16:20:25
>
> Ve FreePascalu (viz http://gate.nbu.bg/Doc/FreePascal/prog/node6.html) to
resi takto:
>
> To use functions in C that have a variable number of arguments, you must
compile your unit or program in objfpc mode or
> Delphi mode, and use the Array of const argument, as in the following
example:
bohuzel si to nemuzu vyzkouset - musel bych hledat na Linuxu nejakou
knihovnu s funkci kterou muzu prilinkovat k pascalskemu zdrojaku. Ale snad
to funguje. Problem je, ze ja jsem to chtel pouzit v Delphi.
Plati ale, ze FreePascal se chova podobne jako Delphi (funkce s parametrem
open array si vytvari sama kopie parametru na stacku) pokud neni uvedena
direktiva external (rozdil mezi FPC a Delphi je pouze ten, ze FPC generuje
presun na stack pomoci MOVS).
D. Toman
>
>
> program testaocc;
>
> {$mode objfpc}
>
> Const
> P : Pchar
> = 'example';
> F : Pchar
> = 'This %s uses printf to print numbers (%d) and strings.'#10;
>
> procedure printf(fm: pchar;args: array of const);cdecl;external 'c';
>
> begin
> printf(F,[P,123]);
> end.
>
>
Pouziva se soubor?
[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 16.5.2001 16:20:46
Ja to resim tak, ze se ho pokusim otevrit exkluzivne pro zapis a pokud to
selze, tak ho ma otevreny nekdo jiny....
Ale neresi to pripad, ze ho nejaky program pouziva obcas... tedy nema ho
stale otevreny.
Ales
> zajimalo by me jest-li lze zjistit, zda-li je soubor pouzivan
> jinym procesem
> nebo ne?Dialog Open width...
[*] <Maly(zv)pds.pce.cdrail(tec)cz> - 16.5.2001 16:38:02
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj,
zkus tohle
function ShellOpenAs(const FileName: String): Boolean;
var
Se: TShellExecuteInfo;
Param: String;
begin
Param := Format('shell32.dll,OpenAs_RunDLL %s', [FileName]);
ZeroMemory((zv)Se, Sizeof(Se));
Se.cbSize := Sizeof(Se);
Se.lpVerb := 'open';
Se.lpFile := 'rundll32.exe';
Se.lpParameters := PChar(Param);
Se.nShow := SW_SHOWNORMAL;
Se.Wnd := GetDesktopWindow;
Result := ShellExecuteEx((zv)Se);
end;
LM
>
> Ahojte
>
> Ako programovo vyvolat dialog "Open width..."?
>
> Vdaka, Marian.
> zmacknuty SpeedButton
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 16.5.2001 17:10:28
Zdravim,
ve SpeedButtonu mam kontrolu onMouseDown, jestli je mackane prave, nebo leve tlacitko. Pokud je zmacknute leve tlacitko, pak se otevira formular z DLL. Po zavreni ovsem zustava tlacitko porad zmacknute. Dokud neukoncim aplikaci.
Setkal jste se nekdo s timto problemem?
Predem dik za jakoukoli radu.
Mirek Drejcek.
IB a scripty
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 16.5.2001 17:25:37
to nejde, musis to rosparsovat na jednotlive dotazy a kazdy poslat
zvlast.
nebo se podivat po nejake komponente, ktera to umi.
nebo prustudovat zdrojaky IBConsole.
> Jak jsem psal pouzivam IBExpress, takze TIBQuery, ale to jsem
> zkusil a dopadl jsem blbe. prvni prikaz byl create a dalsi alter (
> pridani indexu, a ten alter se mu nelibi ( TOKEN UNKNOWN )
> Pritom je to normalni script, kterej z IBExperta normalka bezi
> > Jednoduse vloz ten skript do TQuery.SQL.Text a zavolej
> TQuery.Execute. S IB nedelam, ale snad by to tam melo jit taky.
a imho neumi to ani TQuery.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Kill DLL
[*] Zden�k Sv�en - 16.5.2001 19:12:08
Ahoj,
oteviram NEMODALNI formular umisteny v DLL pomoci LoadLibrary. Po uzavreni
toho formulare samozrejme chci tu knihovnu uvolnit z pameti. Kdy to ale mam
provest?
V udalosti OnClose toho formulare jsem nastavil Action:=caFree.
Kdyz ji uvolnuju na zaklade udalosti OnDestroy primo toho formulare v DLL,
tak to zpusobi otresny veci a hlodnou se Delphi.
Muj dotaz tedy zni:
Kdy uvolnit DLL s nemodalnim formularem, aby to nezpusobilo nejaky kolaps?
Pravdepodobne bude problem v tom, ze uvolnuju knihovnu z pameti, kdyz jeste
neni uvolnenej ten formular. Jak mam ale poznat, ze formular uz je Free,
kdyz jsem s udalosti OnDestroy neuspel?
Dik za kazdou pripominku.IDE:Toolbary v D5
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 16.5.2001 21:00:32
Nastavtit si v Enviroment option auto save pro Projekt desktop.
Mam to nastaveny a rozmisteni si to pamatuje, leda ze by to bylo
necim uplne jinym.
Slavek
> Co je treba udelat, aby si Delphi zapamatovaly zmeny provedene v
> toolbarech? Myslel jsem si, ze se to uklada spolu s "View/Save
> Desktop...", ale ne a nic jineho jsem nenasel:-(
>
> Moc me nebavi po kazdem spusteni si prerovnavat "ikonky" k obrazu svemu.
> Tedy predpokladam, ze to jde:-))Jak odchytit WM_SPOOLERSTATUS ??
[*] Jirka Virt <virt(zv)volny(tec)cz> - 16.5.2001 21:01:22
Ahoj,
nevite jak bych mel odchytit zpravu WM_SPOOLERSTATUS ??
Nemuzu to chytit.Pritom ve WinSigth to krasne vidim jak je posilana do me
aplikace.
Diky
Jirka Virt
emal: virt(zv)volny(tec)cz
Nefungujici Lazarus
[*] Jirka Virt <virt(zv)volny(tec)cz> - 16.5.2001 21:03:58
Ahoj,
nepracujete nekdo s Lazarusem.Nainstaloval jsem ho podel pokynu s
FP Win32FULL, rozebehnul ho,
ale vubec nemuzu dostat na formular jakoukoli komponentu.Pri prekladu to
hlasi
prazdnou chybovou hlasku.Nevite co s tim je???
Diky
Jirka Virt
email: virt(zv)volny(tec)cz
Zachovani dat i po ukonceni aplikace
[*] Ale� Kresta <ales.kresta(zv)atlas(tec)cz> - 16.5.2001 21:04:51
Dobry den,
chtel bych se zeptat zda jdou nejak jednoduse ulozit vlastnosti
zakladnich objektu.. Mam na mysli zda neexistuje nejaka funkce nebo
procedura, ktera by mi ulozila do souboru vsechny parametry objektu a dalsi
ktera by je potom nacetla a nastavila dany objekt na tyto vlastnosti.
Napriklad TLabel bych pred ukoncenim aplikace ulozil, po opetovnem spusteni
nahral vlastnosti a tento TLabel by mel stejny font,vysku,sirku,barvu
.......
Predem dekuji za odpoved
IDE & GUI
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 16.5.2001 21:05:41
Jaky je rozdil mezi IDE a GUI ?
Nechtel jsi nahodou rozdil mezi Console a GUI ?
To bych resil jako dve aplikace, ty by si vzdy otestovali
co maji na vstupu a podle toho by bud pokracovali v inicializaci,
nebo by sputily druhou aplikaci a samy se ukoncily.
Slavek
> Jak lze docilit aby aplikace mela vystup bud IDE nebo GUI v zavislosti na
> tom zda je volana s nejakymi parametry?
>
>
> Pazout
Jak udelat viceradkovy DBEdit ?
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 16.5.2001 21:19:26
Me DBMemo moc s SQL Serverem nechodilo.
Filip
-----Original Message-----
From: David Lebeda [mailto:david.lebeda(zv)comarr(tec)cz]
Sent: Wednesday, May 16, 2001 9:15 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak udelat viceradkovy DBEdit ?> Ahojte,
> poradte mi prosim nekdo, jak prepsat komponentu DBEdit, nebo lepe
> udelat novou, ktera bude vychazet z DBEditu, ale bude viceradkova ?
>
A neslo by pouzit DBMemo?
David Lebeda
Chyba v TIBQuery.IsEmpty ?
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 16.5.2001 21:22:50
Ti jediny si si vsimol ze som sa sproste opytal, ale v postate to kazdy
pochopil tak ako som to myslel. Proste sa stane ze po IsEmpty mi vrati false
aj napriek tomu je prazdna tabulka.
R.
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
A neni to tim, ze podle nazvu IsEmpty by mela vracet true,
kdyz je tabulka prazdna?
> Od: Roland Turcan (RoTurSoft) [mailto:rotursoft(zv)nextra.sk]
> Preco mi IBX 4.52 v TIBQuery.IsEmpty vrati true aj napriek tomu ze tam
> zarucene nie je ziadny zaznam. Opytam sa ho to napr. tri krat
---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.252 / V�rusov� datab�za: 125 - d�tum vydania: 9. 5. 2001
Pouziva se soubor?
[*] Jaroslav Bayer <jaroslav.bayer(zv)quick(tec)cz> - 16.5.2001 22:33:00
Pokud by soubor byl otevren pouze pro cteni - nedelalo by to potize?
----- Original Message -----
From: Ales Radikovsky <radik(zv)allstar(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, May 16, 2001 4:20 PM
Subject: RE: Pouziva se soubor?> Ja to resim tak, ze se ho pokusim otevrit exkluzivne pro zapis a pokud to
> selze, tak ho ma otevreny nekdo jiny....
> Ale neresi to pripad, ze ho nejaky program pouziva obcas... tedy nema ho
> stale otevreny.
>
> Ales
>
> > zajimalo by me jest-li lze zjistit, zda-li je soubor pouzivan
> > jinym procesem
> > nebo ne?SQL
[*] Jaroslav Bayer <jaroslav.bayer(zv)quick(tec)cz> - 16.5.2001 22:46:49
Dekuji za radu, ale nevim, jak ji odstranit, protoze jsem jiz drive zkousel
query vypnout, zobrazit jinou tabulku a podobne veci - jednou otevrena
tabulka je nevymazatelna do restartu programu - i v pripade, ze se jiz
zobrazuje jina tabulka.
----- Original Message -----
From: Zbysek Hlinka <hlinka(zv)hlinka(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 15, 2001 10:30 AM
Subject: Re: SQL
> On 14 May 2001, at 23:36, Jaroslav Bayer wrote:
>
> > Muj problem spociva v tom, ze po nacteni
> > tabulky napr. do DBGrid pomoci prikazu "SELECT * FROM nazev tabulky"
> > nejsem schopen tuto tabulku odstranit prikazem "DROP TABLE nazev
> > tabulky". Chyba neni v napojeni QUERY nebo jinych komponent - ani v
> > readonly tabulce.
>
> Tvoje chyba je v tom, ze pri DROP nesmi byt tabulka otevrena.
> Standardni komponenty maji tu nestastnou vlastnost, ze behem
> zobrazovani udrzuji permanentne otevreny dataset i v databazi, coz
> brani smazani tabulky.
>
> S pozdravem
>
> Zbysek Hlinka
>
> http://www.hlinka(tec)cz http://www.slhaters(tec)cz
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
>zmacknuty SpeedButton
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 17.5.2001 07:43:40
no, ja bych si na OnMouseDown ulozil ktery to bylo tlacitko a akci
vykonal a na OnClick. treba by se to chovalo lepeji.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/TXT File otev��t jako HEXA
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.5.2001 07:46:04
On 16 May 2001, at 15:16, Vaclav Sazima wrote:
> skoro bych rekl, ze const CRLF by mela byt v tomto pripade $0A0D.
> Vaclav Sazima
No jo, je, ale predstav si to prekvapeni, az by zjistil, ze to ma
obracene. :-)
> Zbysek Hlinka wrote:
> >
> > const
> > CRLF: word = $0D0A;
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Jak udelat viceradkovy DBEdit ?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 17.5.2001 07:53:09
> Me DBMemo moc s SQL Serverem nechodilo.
> > poradte mi prosim nekdo, jak prepsat komponentu DBEdit, nebo lepe
> > udelat novou, ktera bude vychazet z DBEditu, ale bude viceradkova ?
> >
> A neslo by pouzit DBMemo?
>
Ahoj,
ja sice s DBMemo nemam zadne zkusenosti, ale co to znamena,
ze to moc nechodilo? Bez konkretnejsiho popisu problemu se neda
nic poradit.
David Lebeda
Intervaly
[*] EFG developer <developer(zv)efg(tec)cz> - 17.5.2001 07:55:40
Zdravim,
potrebuji porovnat dva integerove intervaly (pocatek a delka) jestli do sebe
nezasahuji.
Potreboval bych nejaky algoritmus aby to bylo s nejmensim poctem porovnani a
pokud mozno co nejefektivnejsi. Krajni meze se prekryvat mohou.
napr intervaly 10,5 a 15,4 se neprekryvaji, ale 10,5 a 14,5 se prekryvaji.
Dekuji Petr Sikola
Intervaly
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 17.5.2001 08:41:57
> Potreboval bych nejaky algoritmus aby to bylo s nejmensim
> poctem porovnani a pokud mozno co nejefektivnejsi.
> Krajni meze se prekryvat mohou.
> napr intervaly 10,5 a 15,4 se neprekryvaji, ale 10,5 a 14,5
> se prekryvaji. Dekuji Petr Sikola
hm, jestli nejefektiovnejsi nevim:
mejme i1 a d1 a i2 a d2 typu integer
pak
if ((i1<i2) and (i1+d1>i2)) or
((i1>i2) and (i1<i2+d2)) then
intervaly se prekryvaji.
snad jsem na neco nezapomnel.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Reset na CD
[*] Ji�� HAVELKA����*���zY�W�#�� - 17.5.2001 08:47:17
> V Pascalu existovala promenna FileMode (nebo nejak podobne) , byla v
> jednotce system (myslim).
> Ta umoznovala nastavit rezim prace se soubory , ja jsem ji pouzil pro
> povoleni sdileni souboru pod Windows.
Promenna FileMode v unitu system nastavuje opravdu zpusob otevreni souboru
metodou
Reset (na ReWrite a Append nema vliv) . Defaul hodnota je Read/Write {2},
coz umoznuje otevrit soubor Reset a pomoci Seek nastavit zaznam a dokonce
zmenit prislusnou polozku (paskal v norme ISO specifikuje Reset pouze jako
ReadOnly).
> Myslim si, ze by mohlo fungovat neco takoveho:
> FMOld := FileMode;
> FileMode := READONLY;
> Reset(f);
> FileMode := FMOld;
Po zmene na hodnotu ReadOnly {0} jako v priklade uz jde otevirat soubory z
CD
nebo treba sdilet. Problem nastava pokud potrebujete pouzivat nekolik
souboru zaroven
nektere pomoci Reset v ReadOnly modu a nektre v ReadWrite. Pak nezbyva nez
skutecne
pouzit fileOpen a k tomu prislusne operace.
S pozdravem Jiri HAVELKA
zmacknuty SpeedButton
[*] "Mirek Drej�ek"���v#�q��#�d�ʿ - 17.5.2001 09:05:14
Diky za radu, ale bohuzel nepomaha. Stale zustava tlacitko zmacknute.
Opravdu nikdo nevite c s tim?
Mirek Drejcek.
*********** REPLY SEPARATOR ***********
On 17.5.2001 at 7:43 Petr Palicka wrote:
>no, ja bych si na OnMouseDown ulozil ktery to bylo tlacitko a akci
>vykonal a na OnClick. treba by se to chovalo lepeji.
>
>dekuji PeC(zv)
>
>CU onTheFutureOfMatrix
> MatriX.CyberSpace.Cz
>
>/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
>|[smtp:petr.palicka(zv)atlas(tec)cz]|
>|[smtp:peca(zv)email(tec)cz] |
>\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Kill DLL
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 17.5.2001 09:30:06
Neslo by ten formular uvolnovat az ve finalization sekci te DLL ?? Pak je
mozno tu knihovnu uvolnit vicemene kdykoliv.
Ond�ej
----- Original Message -----
From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, May 16, 2001 7:12 PM
Subject: Kill DLL
> Ahoj,
> oteviram NEMODALNI formular umisteny v DLL pomoci LoadLibrary. Po uzavreni
> toho formulare samozrejme chci tu knihovnu uvolnit z pameti. Kdy to ale
mam
> provest?
> V udalosti OnClose toho formulare jsem nastavil Action:=caFree.
> Kdyz ji uvolnuju na zaklade udalosti OnDestroy primo toho formulare v DLL,
> tak to zpusobi otresny veci a hlodnou se Delphi.
> Muj dotaz tedy zni:
> Kdy uvolnit DLL s nemodalnim formularem, aby to nezpusobilo nejaky kolaps?
> Pravdepodobne bude problem v tom, ze uvolnuju knihovnu z pameti, kdyz
jeste
> neni uvolnenej ten formular. Jak mam ale poznat, ze formular uz je Free,
> kdyz jsem s udalosti OnDestroy neuspel?
>
> Dik za kazdou pripominku.
>
>
MSDE a Internet
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 17.5.2001 09:40:00
Mam nasledujici problem: Na pocitaci je nainstalovano MSDE a vytacene
pripojeni na Internet. Pokud bezi SQL server neni mozne se pripojit
jakymkoliv zpusobem an Internet - Outlook express i Explorer vubec
nepozadaji o vytaceni cisla a musi se natvrdo odstrelit. Kdyz se SQL server
ukonci Internet bezi dobre. Nevite nekdo cim to muze byt?
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
zmacknuty SpeedButton
[*] Petr Kandera <p_kandera(zv)tanger(tec)cz> - 17.5.2001 09:47:31
Speedbutton nefunguje jako normalni button, takze zustane stisknuty. Staci
ale upravit stav zpet, napr. MySpeedButton.Down:=False;
Petr Kandera
<p_kandera(zv)tanger(tec)cz>
----- Original Message -----
From: Mirek Drej�ek <drejcek(zv)schkocr(tec)cz>
To: Konference Delphi <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 17, 2001 9:05 AM
Subject: Re: RE: zmacknuty SpeedButton
> Diky za radu, ale bohuzel nepomaha. Stale zustava tlacitko zmacknute.
> Opravdu nikdo nevite c s tim?
>
> Mirek Drejcek.
>
> *********** REPLY SEPARATOR ***********
>
> On 17.5.2001 at 7:43 Petr Palicka wrote:
>
> >no, ja bych si na OnMouseDown ulozil ktery to bylo tlacitko a akci
> >vykonal a na OnClick. treba by se to chovalo lepeji.
> >
> >dekuji PeC(zv)
> >
> >CU onTheFutureOfMatrix
> > MatriX.CyberSpace.Cz
> >
> >/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
> >|[smtp:petr.palicka(zv)atlas(tec)cz]|
> >|[smtp:peca(zv)email(tec)cz] |
> >\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
>
>Intervaly
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 17.5.2001 09:51:21
> P�edm�t: Intervaly
>
>
> Zdravim,
> potrebuji porovnat dva integerove intervaly (pocatek a delka)
> jestli do sebe
> nezasahuji.
> Potreboval bych nejaky algoritmus aby to bylo s nejmensim
> poctem porovnani a
> pokud mozno co nejefektivnejsi. Krajni meze se prekryvat mohou.
>
> napr intervaly 10,5 a 15,4 se neprekryvaji, ale 10,5 a 14,5
> se prekryvaji.
Ahoj,
co treba takto:
type
TInterval = record
Z : integer; // zacatek
L : integer; // delka
end;
function IsOverlayed(I1, I2 : TInterval) : boolean;
var
Z1, K1 : integer;
begin
// normalizace prvniho intervalu pro pripad, ze je jeho delka zaporna
if I1.L < 0 then
begin
K1 := I1.Z;
Z1 := I1.Z + I1.L;
end
else
begin
Z1 := I1.Z;
K1 := I1.Z + I1.L;
end;
// urcime prekryti
if I2.L < 0 then
begin
Result := (K1 <= (I2.Z + I2.L)) or (Z1 <= I2.Z);
end
else
begin
Result := (K1 <= I2.Z) or (Z1 <= (I2.Z + I2.L));
end;
end;
Max 4 porovnani, 2 prirazeni, 2 soucty.
Zdravim
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Zachyceni obsahu obrazovky DOS programu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 17.5.2001 10:24:54
DD,
lze nejak precist, co zustalo na obrazovce po ukonceni DOSovske (i
consolove) aplikace (v DOS box okne pod Windows)? Potrebuju vyhodnocovat
vysledky programu, ktere nepracuji se standardnim vystupem a nelze tedy
zapisy na obrazovku (STDOUT) tedy presmerovat pomoci parametru
CreateProcess().
Nejaka moznost pristupu ke kopii video pameti boxu?
D. Toman
zmacknuty SpeedButton
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 17.5.2001 10:33:05
Tak jsem to vyzkousel. Ale to tlacitko se vubec nechce vratit zpatky. A to jsem SpeedButton2.Down:=False daval primo do OnMouseDown, pak do onClick, pak jeste do onMouseMove jednoho Panelu, a take do SpeedButton1 v onClick. Ale ani jednou to nemelo kyzeny efekt. Skoro si zacinam myslet, ze za to muze ta procedura z knihovny, kterou volam pri stisknuti tohoto tlacitka. V zavislosti na stavu programu totiz toto tlacitko vola jednu ze tri procedur. Ale pouze pri jednom stavu se vola procedura z knihovny. Pri pouziti tech dvou zbylych procedur je vse OK.
Mirek Drejcek.
*********** REPLY SEPARATOR ***********
On 17.5.2001 at 9:47 Petr Kandera wrote:
>Speedbutton nefunguje jako normalni button, takze zustane stisknuty. Staci
>ale upravit stav zpet, napr. MySpeedButton.Down:=False;
>
>Petr Kandera
><p_kandera(zv)tanger(tec)cz>
>
>----- Original Message -----
>From: Mirek Drej�ek <drejcek(zv)schkocr(tec)cz>
>To: Konference Delphi <delphi-l(zv)clexpert(tec)cz>
>Sent: Thursday, May 17, 2001 9:05 AM
>Subject: Re: RE: zmacknuty SpeedButton
>
>
>> Diky za radu, ale bohuzel nepomaha. Stale zustava tlacitko zmacknute.
>> Opravdu nikdo nevite c s tim?
>>
>> Mirek Drejcek.
>>
>> *********** REPLY SEPARATOR ***********
>>
>> On 17.5.2001 at 7:43 Petr Palicka wrote:
>>
>> >no, ja bych si na OnMouseDown ulozil ktery to bylo tlacitko a akci
>> >vykonal a na OnClick. treba by se to chovalo lepeji.
>> >
>> >dekuji PeC(zv)
>> >
>> >CU onTheFutureOfMatrix
>> > MatriX.CyberSpace.Cz
>> >
>> >/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
>> >|[smtp:petr.palicka(zv)atlas(tec)cz]|
>> >|[smtp:peca(zv)email(tec)cz] |
>> >\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
>>
>>
>>zmacknuty SpeedButton
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 17.5.2001 10:39:26
> Speedbutton nefunguje jako normalni button, takze zustane
> stisknuty. Staci
> ale upravit stav zpet, napr. MySpeedButton.Down:=False;
to jsem nikdy nedelal a pritom se vzdy vraci zpatky.
dole zustane zamackly pouze, pokud mu nastavim groupindex>0, nebo tak
nejak.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Capability not supported ?
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 17.5.2001 10:45:16
Ahoj vsem.
Pripojuji se na SQL Server 7.0 ve Windows 95 pres ODBC. Kdyz se prihlasim k
databazi a otviraji se tabulky, vzdy mi to zahlasi Capability is not
supported ? Nevite nekdo co to znamena ?
Dik
Filip
OT: Manual
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 17.5.2001 11:20:16
Potrebuji vytvorit manual ve forme male brozury.
Existuji nejake prostredky, ktere by mi v tom pomohly.
Pokousim se to delat ve Wordu, ale je s tim strasna prace.
Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
Za jakekoliv namety moc dekuji.
Manual
[*] Ing. Jozef Baranec <joba(zv)digitaldocuments.org> - 17.5.2001 11:21:02
Skus PageMaker od Adobe
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
>
> Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>
> Za jakekoliv namety moc dekuji.
Manual
[*] Radek Janka <radek.janka(zv)ipsystem(tec)cz> - 17.5.2001 11:23:12
no, ja toto vetsinou resim pomoci digitalni kopirky sharp ar-335, ktera toto
umi (i s pripadnym zmensenim, pokud jsou zdrojove listy A4). Proste tam
nacpes libovolne mnozstvi stranek, navolis funkci "brozura" a pustis
kopirovani. Na doma je to moc draha hracka, ale mohli by ji mit v nejakem
kopirovacim centru...
R.
-----Original Message-----
From: Bednar��k Dalibor [mailto:dalibor(zv)torola(tec)cz]
Sent: Thursday, May 17, 2001 11:20 AM
To: forum
Subject: OT: Manual
Potrebuji vytvorit manual ve forme male brozury.
Existuji nejake prostredky, ktere by mi v tom pomohly.
Pokousim se to delat ve Wordu, ale je s tim strasna prace.
Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
Za jakekoliv namety moc dekuji.Manual
[*] "FAIT Ji��, ml." <fait(zv)jakl(tec)cz> - 17.5.2001 11:35:50
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
>
> Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>
> Za jakekoliv namety moc dekuji.
>
Manual napis ve Wordu a vytiskni pomoci FinePrint (napr. na
www.studna(tec)cz )
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.249 / Virov� b�ze: 122 - datum vyd�n�: 13.4.2001
Capability not supported ?
[*] Jon�s Mari�n <Jonas(zv)komercpoj(tec)cz> - 17.5.2001 10:49:28
Nemas nahodou Delphi Standart ?
Marian Jonas
>-----Original Message-----
>From: Hazuka Filip [mailto:filip.hazuka(zv)multivac(tec)cz]
>Sent: Thursday, May 17, 2001 10:45 AM
>To: 'delphi-l(zv)clexpert(tec)cz'
>Subject: Capability not supported ?
>
>
>Ahoj vsem.
>Pripojuji se na SQL Server 7.0 ve Windows 95 pres ODBC. Kdyz
>se prihlasim k
>databazi a otviraji se tabulky, vzdy mi to zahlasi Capability is not
>supported ? Nevite nekdo co to znamena ?
>
>Dik
>Filip
>
>Kill DLL
[*] Zden�k Sv�en - 17.5.2001 11:53:46
Dik za radu, jeste jsem to nezkousel, ale melo by to jit. Napada me ale
jeden problem.
DLL nahravam nasledovne:
LibHandle:=LoadLibrary('jmenoknihovny.DLL');
LibHandle je globalni promenna v unite hlavniho formulare. Pokud dam DLL
uvolnit ve finalization sekci DLL, tak tato sekce se provadi jako uplne
posledni a mam takovej pocit, ze se dokonce provadi az pote, co je
zlikvidovan z pameti hlavni formular.
Za prve tedy nevim, jestli v tu dobu jeste muzu uvolnovat promenou z unity,
ktera uz nejspis nebezi.
Za druhe, pokud by jeste v danou chvili LibHandle existovala, jak ji mam
uvolnit z DLL ? Jak muzu z DLL pristupovat k promennym unity, z ktery DLL
spoustim ?> Neslo by ten formular uvolnovat az ve finalization sekci te DLL ?? Pak je
> mozno tu knihovnu uvolnit vicemene kdykoliv.
>
> Ond�ej
> ----- Original Message -----
> From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
> To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
> Sent: Wednesday, May 16, 2001 7:12 PM
> Subject: Kill DLL
>
>
> > Ahoj,
> > oteviram NEMODALNI formular umisteny v DLL pomoci LoadLibrary.
> Po uzavreni
> > toho formulare samozrejme chci tu knihovnu uvolnit z pameti. Kdy to ale
> mam
> > provest?
> > V udalosti OnClose toho formulare jsem nastavil Action:=caFree.
> > Kdyz ji uvolnuju na zaklade udalosti OnDestroy primo toho
> formulare v DLL,
> > tak to zpusobi otresny veci a hlodnou se Delphi.
> > Muj dotaz tedy zni:
> > Kdy uvolnit DLL s nemodalnim formularem, aby to nezpusobilo
> nejaky kolaps?
> > Pravdepodobne bude problem v tom, ze uvolnuju knihovnu z pameti, kdyz
> jeste
> > neni uvolnenej ten formular. Jak mam ale poznat, ze formular uz je Free,
> > kdyz jsem s udalosti OnDestroy neuspel?
> >
> > Dik za kazdou pripominku.
> >
> >
>
>Kill DLL
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 17.5.2001 12:06:35
Asi Ti uplne nerozumim. DLL natazenou pomoci LoadLibrary, ktere je volana z
nejakeho exe je dobre uvolnit pomoci FreeLibrary volanou ze stejneho exe
(uvolnovat DLL z jeji finalization sekce tedy asi neni moc dobry napad).
Pokud zminena DLL obsahuje nejake formulare, je tyto mozno uvolnovat ve
finalization sekci teto DLL.
S pozdravem
Ond�ej Male�ek
RADOM s.r.o.
ondrej.malecek(zv)radom-cz(tec)cz
----- Original Message -----
From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 17, 2001 11:53 AM
Subject: RE: Kill DLL
> Dik za radu, jeste jsem to nezkousel, ale melo by to jit. Napada me ale
> jeden problem.
> DLL nahravam nasledovne:
> LibHandle:=LoadLibrary('jmenoknihovny.DLL');
> LibHandle je globalni promenna v unite hlavniho formulare. Pokud dam DLL
> uvolnit ve finalization sekci DLL, tak tato sekce se provadi jako uplne
> posledni a mam takovej pocit, ze se dokonce provadi az pote, co je
> zlikvidovan z pameti hlavni formular.
> Za prve tedy nevim, jestli v tu dobu jeste muzu uvolnovat promenou z
unity,
> ktera uz nejspis nebezi.
> Za druhe, pokud by jeste v danou chvili LibHandle existovala, jak ji mam
> uvolnit z DLL ? Jak muzu z DLL pristupovat k promennym unity, z ktery DLL
> spoustim ?
>
> > Neslo by ten formular uvolnovat az ve finalization sekci te DLL ?? Pak
je
> > mozno tu knihovnu uvolnit vicemene kdykoliv.
> >
> > Ond�ej
> > ----- Original Message -----
> > From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
> > To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
> > Sent: Wednesday, May 16, 2001 7:12 PM
> > Subject: Kill DLL
> >
> >
> > > Ahoj,
> > > oteviram NEMODALNI formular umisteny v DLL pomoci LoadLibrary.
> > Po uzavreni
> > > toho formulare samozrejme chci tu knihovnu uvolnit z pameti. Kdy to
ale
> > mam
> > > provest?
> > > V udalosti OnClose toho formulare jsem nastavil Action:=caFree.
> > > Kdyz ji uvolnuju na zaklade udalosti OnDestroy primo toho
> > formulare v DLL,
> > > tak to zpusobi otresny veci a hlodnou se Delphi.
> > > Muj dotaz tedy zni:
> > > Kdy uvolnit DLL s nemodalnim formularem, aby to nezpusobilo
> > nejaky kolaps?
> > > Pravdepodobne bude problem v tom, ze uvolnuju knihovnu z pameti, kdyz
> > jeste
> > > neni uvolnenej ten formular. Jak mam ale poznat, ze formular uz je
Free,
> > > kdyz jsem s udalosti OnDestroy neuspel?
> > >
> > > Dik za kazdou pripominku.
> > >
> > >
> >
> >
>
Packages and Dlls
[*] Radim Hampel <hampel(zv)ecommerce(tec)cz> - 17.5.2001 12:33:53
Dobry den,
mame aplikaci, ktera podle potreby vytvari a rusi COMy, ktere tvori
jednotlive moduly aplikace. Z tech COMu volame DLL, ve kterych jsou
tiskove sestavy QR a zaroven nastaveni teto sestavy na Formu. Otevre se
DLL, ta nastavi parenta nastaveni sestavy na formular do hlavni
aplikace, uzivatel provede sva nastaveni, DLL je aplikuje a vrati
ukazatel na objekt QR. Problemy nastaly az s tim nastavenim, nechtelo se
zobrazovat ve formulari hlavni aplikace. Tato chyba zde byla
konzultovana, na radu P. Vonese jsme testovali kompilovat moduly s
balicky, aby meli vsichni stejnou VMT a RTTI. Pokud to zkompiluji s
balicky, tak DLL mohu otevrit, pracovat s ni, ale nelze priradit objektu
z DLL parent z hlavni aplikace. Pokud se to zkompiluje s balicky,
knihovna nejde otevrit, vubec se nedostane ani na zacatek. Kde muze byt
zakopany ( :-) ) pes? Ve vyberu balicku? V necem jinem? Dekuji za
sirokosahlou diskusi, ktera se jiste rozebehne.
W2k Srv, D5 Prof, Adonis, QR
Radim Hampel
Kill DLL
[*] Zden�k Sv�en - 17.5.2001 12:52:05
Pri ukoncovani (OnClose) hlavniho formulare (tzn. pri ukonceni aplikace}
pouziju FreeLibrary. Tim se mi spusti finalization sekce v DLL, kde se
pokusim uvolnit formular, ktery jsem v DLL oteviral. Takze takhle:
Form_v_DLL.Free;
A na tom miste mi to taky zatuhne. Proc?
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Ond�ej Male�ek
> Sent: Thursday, May 17, 2001 12:07 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kill DLL
>
>
> Asi Ti uplne nerozumim. DLL natazenou pomoci LoadLibrary, ktere
> je volana z
> nejakeho exe je dobre uvolnit pomoci FreeLibrary volanou ze stejneho exe
> (uvolnovat DLL z jeji finalization sekce tedy asi neni moc dobry napad).
> Pokud zminena DLL obsahuje nejake formulare, je tyto mozno uvolnovat ve
> finalization sekci teto DLL.
>
> S pozdravem
>
> Ond�ej Male�ek
> RADOM s.r.o.
> ondrej.malecek(zv)radom-cz(tec)cz
>
> ----- Original Message -----
> From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Thursday, May 17, 2001 11:53 AM
> Subject: RE: Kill DLL
>
>
> > Dik za radu, jeste jsem to nezkousel, ale melo by to jit. Napada me ale
> > jeden problem.
> > DLL nahravam nasledovne:
> > LibHandle:=LoadLibrary('jmenoknihovny.DLL');
> > LibHandle je globalni promenna v unite hlavniho formulare. Pokud dam DLL
> > uvolnit ve finalization sekci DLL, tak tato sekce se provadi jako uplne
> > posledni a mam takovej pocit, ze se dokonce provadi az pote, co je
> > zlikvidovan z pameti hlavni formular.
> > Za prve tedy nevim, jestli v tu dobu jeste muzu uvolnovat promenou z
> unity,
> > ktera uz nejspis nebezi.
> > Za druhe, pokud by jeste v danou chvili LibHandle existovala, jak ji mam
> > uvolnit z DLL ? Jak muzu z DLL pristupovat k promennym unity, z
> ktery DLL
> > spoustim ?
> >
> >
> > > Neslo by ten formular uvolnovat az ve finalization sekci te DLL ?? Pak
> je
> > > mozno tu knihovnu uvolnit vicemene kdykoliv.
> > >
> > > Ond�ej
> > > ----- Original Message -----
> > > From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
> > > To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
> > > Sent: Wednesday, May 16, 2001 7:12 PM
> > > Subject: Kill DLL
> > >
> > >
> > > > Ahoj,
> > > > oteviram NEMODALNI formular umisteny v DLL pomoci LoadLibrary.
> > > Po uzavreni
> > > > toho formulare samozrejme chci tu knihovnu uvolnit z pameti. Kdy to
> ale
> > > mam
> > > > provest?
> > > > V udalosti OnClose toho formulare jsem nastavil Action:=caFree.
> > > > Kdyz ji uvolnuju na zaklade udalosti OnDestroy primo toho
> > > formulare v DLL,
> > > > tak to zpusobi otresny veci a hlodnou se Delphi.
> > > > Muj dotaz tedy zni:
> > > > Kdy uvolnit DLL s nemodalnim formularem, aby to nezpusobilo
> > > nejaky kolaps?
> > > > Pravdepodobne bude problem v tom, ze uvolnuju knihovnu z
> pameti, kdyz
> > > jeste
> > > > neni uvolnenej ten formular. Jak mam ale poznat, ze formular uz je
> Free,
> > > > kdyz jsem s udalosti OnDestroy neuspel?
> > > >
> > > > Dik za kazdou pripominku.
> > > >
> > > >
> > >
> > >
> >
>
>Manual
[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 17.5.2001 12:59:19
Nejsem si ted 100% jistej, ale mam pocit, ze neco takovyhleho umi
FinePrint. (http://www.fineprint(tec)cz ???).
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
>
> Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>
> Za jakekoliv namety moc dekuji.
--
Martin Pe#ava
/--------------------------------------------------------------\
| E-Mail: mailto:mail(zv)jimx.net ICQ# 18148896 |
| WebMaster of |
|http://miss.jimx.net - Neofici�ln� str�nka MISS #R a CyberMiss|
\--------------------------------------------------------------/Kill DLL
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 17.5.2001 13:08:35
> Form_v_DLL.Free;
Na uvolnovani formu pouzivej spise Release. Release uvolni pamet az po
ukonceni vsech udalosti toho formu (zatimco Free zavola pouze destruktor).
Petr Jur�k, Spr�vce s�t�, program�tor
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
Problem s ToolBarom
[*] Zden�k Sv�zen - 17.5.2001 13:25:38
Nevim teda jestli uplne spravne chapu tvuj problem, ale jestli ti de o to,
jak zobrazit vsechny buttonky z toolbaru, i kdyz se nevejdou na obrazovku,
tak mam radu.
Umisti na toolbar jeste komponentu PageScroller (zalozka Win32). V pripade,
ze se buttonky nevejdou na obrazovku, tak se objevi sipecky, kteryma muzes v
tech buttoncich scrollovat.
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of mstevlik(zv)gamo.sk
> Sent: Wednesday, May 16, 2001 12:08 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Problem s ToolBarom
>
>
> Zdravim all,
> Mam asi trivialny problem, ale neviem si snim poradit.
> Mam D5 W2000 a pouzivam v app ToolBar s ToolButtonami kt. su flat. Cely
> ToolBar je v ControlBare do kt. vytvaram dynamicky dalsie
> ToolBary. Problem
> nastane, ked velkost okna nepostacuje dlzke vsetkych toolbarov a potom s
> posledneho vidim len niektore buttony. Zatial to riesim pomocou AutoSize
> ToolBaru ten mi potom zvacsi vysku ControlBaru a sam sa prehodi
> do dvoch or
> n riadkov aby bol komplet zobrazeny.
> Chcel by som vsak vyuzit nieco take ako je pouzite v MS Office, ze ak sa
> nemozu zobrazit vsetky buttony, tak na konci daneho toolbaru sa zjavi
> tlacitko v tvare dvoch sipiek, kt. mi potom zobrazi zvysne buttony.
> Je to mozne vobec riesit pomocou ToolBaru?
>
> Dik vopred
> Stevlik Marian
> ISYS-KOM programator
> GAMO a.s., Banska Bystrica
> +421 88 413 7935, 413 2942
> mstevlik(zv)gamo.sk
> +421 905 462 010
> ICQ: 38493645
>
>Selhavajici Items.Add v konstruktoru TPanel
[*] brant(zv)dcomm(tec)cz - 17.5.2001 13:39:21
Mam tento problem: Vytvarim dynamicky TEnhPanel (potomek TPanel), ve kterem
jsou vsazeny napr. TLabel, TButton apod. a take TComboBox. Vsechno je OK az
na jednu vec, ze totiz v konstruktoru toho TPanelu nelze provest vlozeni
itemu do toho comboboxu. Tam to vzdycky zarve Component "" has no parent
window. Delam neco, co se v konstruktoru nesmi?
Zde je kod:
unit EnhPanelUnit;
interface
uses stdctrls, extctrls, classes;
type TEnhPanel = class(TPanel)
public
TypeCombo: TComboBox;
constructor Create(AOwner: TComponent); override;
end;
implementation
{ TEnhPanel }
constructor TEnhPanel.Create(AOwner: TComponent);
begin
inherited;
Top:=5;
Left:=5;
Width:= 185;
Height:=97;
TypeCombo:= TComboBox.Create(self);
with TypeCombo do
begin
Parent:=self;
Left:= 8;
Top:= 4;
Width:=105;
Style:=csDropDownList;
Items.Add('Text');
Items.Add('#�slo'); ----> a tady to rve
end;
end;
end.
Pokud se pokusim pridat polozku z parentskeho okna (z toho, do ktereho je
vsazeny ten EnhPanel), projde to. Stejne tak projde v tom konstruktoru
vsazeni tech buttonu apod. Tyhle problemy dela jen ComboBox. Zkousel jsem
pro zajimavost i TListBox (ale ten nepotrebuji) a dela presne ty same
problemy.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
Tel. 0724/007234
Manual
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 17.5.2001 13:41:01
my to delame taky ve wordu a imho to staci.
jde o to seznamit se s moznostmi.
ja v tom NEdelam a dodneska kolegini udivuji znalostmi.
proste se pozastavim, nad nejakou funkci, kterou slozite dela
(napriklad pise obsah) a reknu, to prece musi jit automaticky.
pak se kouknu do menu, do helpu a ukazu ji jak.
takze mam pocit, ze na dokumentaci word bohate staci.
umi (uz od nejaky verze 97) dostatek veci pro vytvoreni male brozurky.
sezen si nejakou zacatecnikou pricurku. zjistis, ze se toho da delat
opravdu dost.
ale pokud myslis tisk jakoze A4 a potom poskladat na sebe a prelozit,
tak to neumi.
my to sijeme postrane do takovyho plastovyho hrbetu.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/IB6.0.1.6: Backup/Restore
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 17.5.2001 13:58:24
Haj hou!
On 16 May 2001,, Dusan Fojtik wrote:
> mam vazny problem se zalohovanim a obnovovanim databaze. V databazi jsou
> ulozeny v retezcich ceske znaky a COLLATE je pro ne nastaveno na COLLATE
> PXW_CSY,v BDE mam u LANGDRIVERu nastaveno Pdox ANSI Czech.
> Dale jsou v databazi pouizity generatory a procedury.
> Kdyz zazalohuji databazi utilitou gbak(probehne to bez problemu), pak kdyz
> chci potom tuto zazalohovano databazi obnovit, tak mi obnovovani spadne na
> teto chybe:
>
> ,,Arithmetic exception, numeric overflow, or string truncation"
>
> Nevite nekdo co s tim ?
Je na nekterem poli s jinym CHARSETem definovana DEFAULT
hodnota ? Pokud ano, pak je to znama chyba
http://sourceforge.net/tracker/index.php?func=detail&aid=212177&g
roup_id=9028&atid=109028
(pozor na zalomeni radky).
S pozdravem
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Problemy s IB
[*] Zelen� Ale� <azeleny(zv)csas(tec)cz> - 17.5.2001 14:12:39
DDV,
> > Mam databzi o velikosti 3GB, byvala by byla jiz davno
> vetsi, kdybych nemusel
> > po kazde takove havarii zacinat znovu.
NEMEJTE databazi vice nez 3 GB. Tez jsem mel (z blbosti, jak jinak) na SCO
databazi IB5.x vice jak 2 GB a mel jsem to velike stesti, ze proslo jeji
zazalohovani a restore do multifile-u.
Pokud mate takovu moznost udeljte to drive nez pozdeji.
> Matne si pamatuji, ze jsi se drive ptal na to, jak opravit
> databazi, kde
> velikost souboru prekrocila povolenou velikost 2GB na jeden soubor.
> Jestli to tak je (tj. nemylim-li se), tak to spolu souvisi a je to
> hlavne chyba Tva, bohuzel :-( Musis definovat databazi tak, ze pokud
> hrozi rust nad mez 2GB, je treba rovnou zalozit i dalsi soubory, ve
> kterych databaze muze dale rust (viz. dokumentace). Neznam presne
> interni strukturu DB, ale neco o ni vim. Zjednodusene: je slozena z
> ruznych typu stranek, ktere obsahuji ruzne typy dat (o transkacich,
> normalni data, BLOB data ...). Pretecenim povolene velikosti souboru
> dojde k tomu, ze se data patrici na nejaky typ stranky
> zapisou na jinou
> adresu v souboru, nez kam patri, a tak poskodi strukturu.
> Vysledkem je,
> ze s tim zadny program nemuze nic delat.
Jenom doplnim, ze _VYCERPAVAJICI_ dokument je na ibphoenix.com od koho
jineho nez Ann Harisson. Tedy ona pise, ze podrobne to neni, ale me to
spustu veci poradilo. Dozvite se kde co prave o tech typech stranek a o
mechanismu alokace dlasich... Link si nepamatuji, ale podivejte se do
dokumentu pro vyvojare.
Vubec je tam spousta dobreho cteni...
ales.OT: Manual
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 17.5.2001 14:24:57
Puvodni zprava, kterou napsal Bednar��k Dalibor dne 17 May 2001,:
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
Ja to delam v Microsoft Publisheru, to je soucast Office 2000
(ted z hlavy nevim, v jakych verzich, ja mam Developer Edition,
tj. Premium to ma urcite).
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================COM - agregace rozhrani IMarshal
[*] �ejka Pavel <cejka(zv)proteco(tec)cz> - 17.5.2001 14:31:31
-----Original Message-----
From: #ejka Pavel [mailto:cejka(zv)proteco(tec)cz]
Sent: Thursday, May 17, 2001 9:35 AM
To: delphi-l(zv)dexpert(tec)cz
Subject: COM - agregace rozhrani IMarshal
Prosim o radu. Pokousim se o vytvoreni FTM komponenty a tedy o agregaci
rozhrani IMarshal. Pro agregaci provadim postup, ktery me pro agregaci
jinych rozhran� funguje. Problem je v tom, ze pri nastaveni modelu
komponenty "Free", dojde pri vytvareni teto komponenty v "Factory" k
vyjimce (patrne pri dealokaci Factory). Pri modelu "Both" se komponenta
vytvori dobre, ale jakykoliv pokus o ziskani rozhrani IMarshal skonci
opet vyjimkou (Katastrofalni selhani..).
Obdobne napsana komponenta v C++ Builderu od jin�ho autora se stejnym
klientem funguje dobre.
Uvadim zde jeste zakladni casti me agregace IMarshal v zdrojaku
...
type
TPROTECO_JLR = class(TTypedComObject,
IPROTECO_JLR, ..., IMarshal)
protected
FMarshal: IMarshal;
....
{Declare IPROTECO_JLR methods here}
public
procedure Initialize; override;
property Marshal: IMarshal read FMarshal implements IMarshal;
end;
.....
procedure TPROTECO_JLR.Initialize;
var
R: HResult;
Unk: IUnknown;
begin
R := CoCreateFreeThreadedMarshaler(Self, Unk);
FMarshal := Unk as IMarshal;
end;
.....
initialization
TTypedComObjectFactory.Create(ComServer, TPROTECO_JLR,
Class_PROTECO_JLR_,
ciMultiInstance, tmFree);
end.
----------------
Pouzivam D5 Professional na NT 4.0 (service pack 6).
Dik za jakoukoliv radu.
Pavel.
Intervaly
[*] Alexandr #tefek <alex(zv)scova.vabo(tec)cz> - 17.5.2001 14:32:41
> > Potreboval bych nejaky algoritmus aby to bylo s nejmensim
> > poctem porovnani a pokud mozno co nejefektivnejsi.
> > Krajni meze se prekryvat mohou.
> > napr intervaly 10,5 a 15,4 se neprekryvaji, ale 10,5 a 14,5
> > se prekryvaji. Dekuji Petr Sikola
>
> hm, jestli nejefektiovnejsi nevim:
> mejme i1 a d1 a i2 a d2 typu integer
> pak
> if ((i1<i2) and (i1+d1>i2)) or
> ((i1>i2) and (i1<i2+d2)) then
Staci nasledujici (d1 a d2 musi byt >0)
if (i1<i2+d2)and(i2<i1+d1) then prekryvaji
> intervaly se prekryvaji.
> snad jsem na neco nezapomnel.
>
> dekuji PeC(zv)
>
> CU onTheFutureOfMatrix
> MatriX.CyberSpace.Cz
>
Manual
[*] Alexandr #tefek <alex(zv)scova.vabo(tec)cz> - 17.5.2001 14:35:39
Pokud vim, tak to umi Office 2000, pripadne primo drivery
pro inkoust od HP pod Win98/95/NT (ne 2000).>Potrebuji vytvorit manual ve forme male brozury.
>Existuji nejake prostredky, ktere by mi v tom pomohly.
>Pokousim se to delat ve Wordu, ale je s tim strasna prace.
>Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>Za jakekoliv namety moc dekuji.
Manual
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.5.2001 14:47:47
Lze pouzit i novejsi tiskarny od HP (vsechny, kter� umej� obracet papir),
existuje zde volba "tisk brozury" (lze i urcit zda prvni strana bude suda
nebo licha) !
Pavel
-----P�vodn� zpr�va-----
Od: Martin Pe#ava [mailto:jimx(zv)volny(tec)cz]
Odesl�no: 17. kv�tna 2001 12:59
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: Re: Manual
Nejsem si ted 100% jistej, ale mam pocit, ze neco takovyhleho umi
FinePrint. (http://www.fineprint(tec)cz ???).
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
>
> Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>
> Za jakekoliv namety moc dekuji.
--
Martin Pe#ava
/--------------------------------------------------------------\
| E-Mail: mailto:mail(zv)jimx.net ICQ# 18148896 |
| WebMaster of |
|http://miss.jimx.net - Neofici�ln� str�nka MISS #R a CyberMiss|
\--------------------------------------------------------------/ALGORITMUS - Krizovky
[*] goryl(zv)insdata.sk - 17.5.2001 14:51:46
Ahojte,
O tomto by sa chcel viac dozvediet jeden moj znamy...
Chcel by som niekoho poprosit o nejaky algoritmus, program alebo komponentu
na generovanie krizoviek. Pripadne ci niekto nevie nejake WWW stranky, kde
by som sa mohol o tom dozvedit viac.
Dakujem.
Marian
Kill DLL
[*] Zden�k Sv�en - 17.5.2001 14:55:10
Tak ani Release nepomohl. Bude to nekde jinde.
> > Form_v_DLL.Free;
>
> Na uvolnovani formu pouzivej spise Release. Release uvolni pamet az po
> ukonceni vsech udalosti toho formu (zatimco Free zavola pouze destruktor).
>
> Petr Jur�k, Spr�vce s�t�, program�tor
> COMET System s.r.o.
> 1.M�je 1220
> 756 61 Ro�nov pod Radho#t�m
> tel. 0651/653990
> fax. 0651/653993
> www.cometsystem(tec)cz
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> COMET System Network Administrator.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 09.05.01
>Problem s pameti
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 17.5.2001 14:57:12
Ahoj vsichni
Mam dojem ze se to uz rozebiralo, ale nevim s jakym vysledkem. Mam delphi 5
na Win 98. Mam projekt s nekolika formular, ktere spotrebuji celkem dost
pameti a systemovych prostredku. Problem je v tom ze pri otevreni techto
formularu v navrhu se vycerpa jiste mnozstvi pameti a po zavreni zalozky a
formulare se ji uvolni mene. Nekolikanasobne opakovanivede k vycerpani vsech
zdroju a havarii Windows. Nevite nekdo co s tim. Jaromir Cermak Manual
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 17.5.2001 14:59:25
Jak jiz bylo receno.. FinePrint to dokaze take, navic dokaze delat
mnohem vice sikovnych veci (jako treba nahled pred tiskem, takze kdyz
se pokousisi tisknout blbost, uvidis o a vystornujes...), atd.
Moc sikovne, pokud treba pisete a posleze odladujete nejaky program s
tiskovym vystupem.
A tohle umi s KAZDYM ovladacem JAKEKOLIV tiskarny.
Lukas.
> Lze pouzit i novejsi tiskarny od HP (vsechny, kter� umej� obracet
> papir), existuje zde volba "tisk brozury" (lze i urcit zda prvni
> strana bude suda nebo licha) !
>
> Pavel
>
> -----P�vodn� zpr�va-----
> Od: Martin Pe#ava [mailto:jimx(zv)volny(tec)cz]
> Odesl�no: 17. kv�tna 2001 12:59
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: Manual
>
>
> Nejsem si ted 100% jistej, ale mam pocit, ze neco takovyhleho umi
> FinePrint. (http://www.fineprint(tec)cz ???).
>
> > Potrebuji vytvorit manual ve forme male brozury.
> > Existuji nejake prostredky, ktere by mi v tom pomohly.
> >
> > Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> > Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
> >
> > Za jakekoliv namety moc dekuji.
>
> --
> Martin Pe#ava
>
> /--------------------------------------------------------------\
> | E-Mail: mailto:mail(zv)jimx.net ICQ# 18148896 |
> | WebMaster of |
> |http://miss.jimx.net - Neofici�ln� str�nka MISS #R a CyberMiss|
> \--------------------------------------------------------------/
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
Problem s pameti
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 17.5.2001 15:14:28
Hmm to vyzera na zle uvolnovanie objektov. Budes musiet pouzit MemProof. Uz
som tu pisal aj postup jak sa s tym pracuje tak hladaj v archive.
S pozdravom
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
> Mam dojem ze se to uz rozebiralo, ale nevim s jakym vysledkem. Mam delphi
5
> na Win 98. Mam projekt s nekolika formular, ktere spotrebuji celkem dost
> pameti a systemovych prostredku. Problem je v tom ze pri otevreni techto
> formularu v navrhu se vycerpa jiste mnozstvi pameti a po zavreni zalozky a
> formulare se ji uvolni mene. Nekolikanasobne opakovanivede k vycerpani
vsech
> zdroju a havarii Windows. Nevite nekdo co s tim.
Zachyceni obsahu obrazovky DOS programu
[*] Radek Cervinka <radek.cervinka(zv)centrum(tec)cz> - 17.5.2001 15:31:28
Zkus
API funkci ReadConsoleOutput a dalsi z group console
Radek
-----P�vodn� zpr�va-----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: delphi-l(zv)clexpert(tec)cz <delphi-l(zv)clexpert(tec)cz>
Datum: 17. kv�tna 2001 10:25
P�edm�t: Zachyceni obsahu obrazovky DOS programu
>DD,
>
>lze nejak precist, co zustalo na obrazovce po ukonceni DOSovske (i
>consolove) aplikace (v DOS box okne pod Windows)? Potrebuju vyhodnocovat
>vysledky programu, ktere nepracuji se standardnim vystupem a nelze tedy
>zapisy na obrazovku (STDOUT) tedy presmerovat pomoci parametru
>CreateProcess().
>
>Nejaka moznost pristupu ke kopii video pameti boxu?
>
>
>D. Toman
>
>
>zmacknuty SpeedButton
[*] Petr Hartman <petr.hartman(zv)medisoft(tec)cz> - 17.5.2001 15:32:43
Ahoj,
podle mne je problem v tom, ze pokud na udalost OnMouseDown otevres
novy formular, tak SpeedButton jiz nezachyti naslednou zpravu
WM_LBUTTONUP a tudiz zustane zamacknuty. Obejit by to slo napr. rucnim
poslanim zpravy WM_LBUTTONUP, napr. takto:
procedure TForm1.SpeedButton1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
P: TPoint;
begin
if Button = mbLeft then begin
DalsiForm.ShowModal;
P := ScreenToClient(SpeedButton1.ClientToScreen(Point(X, Y)));
PostMessage(Handle, WM_LBUTTONUP, 0, P.Y shl 16 + P.X);
end;
end;
S pozdravem
Petr Hartman
----- Original Message -----
From: Mirek Drej�ek <drejcek(zv)schkocr(tec)cz>
Zdravim,
ve SpeedButtonu mam kontrolu onMouseDown, jestli je mackane prave, nebo
leve tlacitko. Pokud je zmacknute leve tlacitko, pak se otevira formular
z DLL. Po zavreni ovsem zustava tlacitko porad zmacknute. Dokud
neukoncim aplikaci.
EAN font
[*] kinekus <kinekus(zv)nextra.sk> - 17.5.2001 15:38:00
Kto mi moze poslat nejaky EAN font ?
Dakujem.
Milan F�bik
OT: Manual
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 17.5.2001 15:48:34
> > Potrebuji vytvorit manual ve forme male brozury.
> > Existuji nejake prostredky, ktere by mi v tom pomohly.
> Ja to delam v Microsoft Publisheru, to je soucast Office 2000
tak ten jsme zahodily, na dokumentace to bylo nepouzitelny
odli�n� ikona programu a z�stupce
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 17.5.2001 15:51:02
ahoj,
chci se zeptat, jestli je n�jak mo�n� ud�lat n�sleduj�c�:
mam 2 ikony - 16x16 a 32x32, chci, aby program normalne pouzival tu 16x16, ale jakmile vytvorim zastupce na plose, tak aby se pouzila ta 32x32. Lze to?
Diky
S pozdravem Milan Cizek, D5 Ent
______________________________________________________________________________
Koncert kapely Lucie zive na tvem pocitaci. Pokec s Davidem, Robertem,
Michalem a P. B. CH. jen na http://lucie.wo(tec)cz
Manual
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 17.5.2001 15:59:00
Ahoj
Pro pripravu profesionalnich publikaci se v prostredi univerzit pouziva
system Latex. Manual se v ni da vytvorit pomoci jakehosi jazyka pro popis
formularu. Tusim ze je zdarma nebo zdarma pro nekomercni ucely. Je
prenositelny mezi Windows a Linux. Chce to trochu cviku, ale jinak je
vyborny. Jaromir Cermak
-----Original Message-----
From: Ing. Jozef Baranec [mailto:joba(zv)digitaldocuments.org]
Sent: Thursday, May 17, 2001 11:21 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Manual
Skus PageMaker od Adobe
> Potrebuji vytvorit manual ve forme male brozury.
> Existuji nejake prostredky, ktere by mi v tom pomohly.
>
> Pokousim se to delat ve Wordu, ale je s tim strasna prace.
> Stranky se musi prehazovat. A to nemluve o budouci nejake zmene.
>
> Za jakekoliv namety moc dekuji.
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.242 / Virov� b�ze: 117 - datum vyd�n�: 27.3.2001
Kill DLL
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 17.5.2001 15:59:40
Ja to resim pres zpravy. Poslu na ondestroy formulare zpravu formulari,
ktery dll zakladal, ze formular skoncil a tam potom po odchyceni zpravy
provedu freelibrary.
Bohdan Voska
bohdan(zv)softok(tec)cz
----- Original Message -----
From: "Zden�k Sv��en" <delphiforum(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 17, 2001 2:55 PM
Subject: RE: Kill DLL
> Tak ani Release nepomohl. Bude to nekde jinde.
>
ScreenSaver
[*] <volcik(zv)email(tec)cz> - 17.5.2001 16:02:47
Zdravim vsecky. Zkousim delat screensaver. Probiralo se to tu nekolikrat, ale nenasel jsem co potrebuji. Nevim co udelat, aby se pri vyberu setrice zobrazovala jeho ukazka v malem okne (Obrazovka - vlastnosti / Sporic obrazovky). Vim ze jako druhy parametr je handle toho maleho okna. Co mam ale udelat, aby se muj setric v tomto okne zobrazil. Dekuji za kazdou radu. D.V.
---
EMAIL.CZ - Vase posta je vzdy s Vami
http://www.email(tec)cz
Zachyceni obsahu obrazovky DOS programu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 17.5.2001 16:21:01
> API funkci ReadConsoleOutput a dalsi z group console
Ano to funguje. Pouzivam rutinu zhruba vypadajici jako ta dole (detekce chyb
jem vyhazel). Narazil jsem pri tom na dalsi problemy:
- aby to fungovalo GUI aplikace musi mit prirazenou konzolu - tedy musim ji
vytvorit pomoci AllocConsole. To ale zpusobi, ze se objevi DOS box okno, ve
kterem spoustena aplikace probehne. Po ukonceni teto aplikace zustava v
nekterych pripadech (mam tu dva programy - po jednom okno nezustava viset,
po druhem ano) okno viset (nezmizi ani po FreeConsole). To vede k tomu, ze
se postupne pri opakovanem spousteni objevuji dalsi a dalsi DOS okna :-(.
Pokousel jsem se to resit tim, ze ihned po vytvoreni DOS okna jej schovam
(ShowWindow(SW_HIDE) ) a po uzavreni konzoly jej odstrelim (DestroyWindow).
Vetsinou to zabere, ale okno vzdy blikne. Moznym resenim by take bylo
alokovat konzoly pri startu GUI aplikace a neustale ji nevytvaret, ale to
se mi moc nelibi (navic ten kod co pisu je soucasti DLLka)
Resenim by pravdepodobne bylo napsat konzolovou aplikaci jako wrapper.
Spustim wrapper (se schovanym oknem) a ten teprve spusti DOS aplikaci. Ale
radeji bych to vyresil bez nej.
Optimalni by bylo, kdybych se dostal ke screen buferu cizi konzole (konzole
vytvorena pro DOS aplikaci mimo mou GUI aplikaci). Ale netusim jak to udelat
(nejak zavolat GetSTDHandle() v kontextu te aplikace. Dalsim problemem je
jak se dostat k tomu bufferu vcas (tj. po dobehnuti aplikace ale jeste pred
uzavrenim konzole)
D. Toman
AllocConsole;
FillChar(StartupInfo, SizeOf(StartupInfo), #0);
StartupInfo.cb := SizeOf(StartupInfo);
Result := CreateProcess(nil, PChar(CommandLine), nil, nil, True,
{CREATE_NEW_CONSOLE or }NORMAL_PRIORITY_CLASS, nil, nil,
StartupInfo,
ProcessInfo);
if Result then
begin
.. cekej na konec programu (WaitforSongleObject(....))
end;
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
Upper.X := 0;
Upper.Y := 0;
if NOT ReadConsoleOutputCharacter(GetSTDHandle(STD_OUTPUT_HANDLE),(zv)Buff
,SizeOf(Buff),Upper,NumOfChar) then
begin
end;
FreeConsole;