Archív konference Delphi

Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.

Paradox-indexy a obnova

[*] tomas.mazurek(zv)vitkovice(tec)cz - 20.1.2000 12:26:19

Hello,

pro uzivatele Paradoxu: pouzivam utilitku pro kontrolu a obnovu
tabulek typu Paradox, je free i se zdrojakem v 32-bit Delphi, resp. D3,D4-
prekompilovat v D5 jsem zatim nezkousel... Pouziva Borlandi knihovnu
TUTIL32.DLL.

Pokud ma nekdo zajem, necht se ozve... Jinak se tez pripojuji k
heslu:
Ruce pryc od souborovych databazi...

TM


Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 20.1.2000 13:36:09

Poradi mi nekdo, jak bych mohl do zahlavi TDBGridu pridelat tlacitko, aby potom fungoval jako automaticky filtr v Excelu?

Neco jako je na obrazku:


diky za kazdou radu


Paradox: Some Limit exceed

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 20.1.2000 13:53:07

> Zvedni velikost bloku.
> Martin
*** Kde a jak?
A jak je mozne, ze to nekde funguje a jinde ne?

Petr


,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -


MS SQL 7.0 a zamykani recordu

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 20.1.2000 14:02:30

Podle me neni dobry napad zamknout data po celou dobu editace zaznamu.
Ja pouzivam trochu jiny spusob:
1. v kazde tabulce mam sloupec - casove razitko posledni zmeny.
2. Kdyz zaznam vyberu, tak si toto razitko zapamatuju a uzivatel muze
editovat
data (ne primo).
3. Kdyz chce data ulozit, zamknu zaznam (Start transakce, update na stejnou
hodnotu
- jak si popsal) a pak prectu razitko. Kdyz je jine nez puvodni - data
byly zmenene -
zalezi na tobe a uzivatelovi co dal. Kdyz ne zapisu zmeny a zmenim taky
hodnotu v
casovem razitku.

Da se to doplnit i dalsim sloupcem - jmeno uzivatele, ktery naposledy menil
data a testovat
i ten.
Jedina nevyhoda je pri primych zmenach v datech (pomoci nejakeho nastroje -
MSQuery, ...), kdy
se automaticky neaktualizuje tento sloupec. Coz by se vsak dalo vyresit
trigrem (AFTERUPDATE),
ktery by automaticky po kazde zmene toto casove razitko nastavil na aktualni
cas
(a odpadla by i potreba jej aktualizovat i v programu).

Petr

-----Original Message-----
From: Jirka Majvald [mailto:majvald(zv)email(tec)cz]
Sent: Thursday, January 20, 2000 2:12 PM
To: Delphi konference
Subject: MS SQL 7.0 a zamykani recordu


D5 Ent, NT4.0 SP 5, MS SQL 7.0 SP 1

Chtel bych nad MS SQL 7.0 pomoci ADO express zamknout jeden zaznam pro
editaci aby nemohl menit nekdo jiny nez je editace u konec.

Zamknuti se mi povede pomoci UPDATE pred editaci (asi to neni nejlepsi napad
ale nic jineho mne nenapada).
Takze provedu start transakce, update (vlozim hodnoty ktere uz zaznam
obsahoval), potom klient edituje data ktera budou do toho radku ulozena
a na konec provedu commit nebo rollback. Takze pokud chce jiny editovat
zahlasi update chybu. Tento zpusob mi spolehlive funguje na Sybase SQL
Anywhere. Na MS SQL to jde jenom do urcite miry. Zamknout record jde ale ve
chvily kdyz chce jiny klient editovat stejna data ceka MS SQL na to nez
skonci editaci prvni klient. Takze pokud prvni klient provede commit prikaz
se provede. Pokud ne skonci dotaz Timeoutem.

Pokud by slo, chtel bych aby pokus o update zamceneho recordu zahlasil
nejakou chybu a ne cekal na timeout nebo nez zkonci editaci ten prvni.

Dekuji za kazdou pomoc

Jirka


MS SQL 7.0 a zamykani recordu

[*] Jirka Majvald <majvald(zv)email(tec)cz> - 20.1.2000 13:11:56 -0000

D5 Ent, NT4.0 SP 5, MS SQL 7.0 SP 1

Chtel bych nad MS SQL 7.0 pomoci ADO express zamknout jeden zaznam pro editaci aby nemohl menit nekdo jiny nez je editace u konec.

Zamknuti se mi povede pomoci UPDATE pred editaci (asi to neni nejlepsi napad ale nic jineho mne nenapada).
Takze provedu start transakce, update (vlozim hodnoty ktere uz zaznam obsahoval), potom klient edituje data ktera budou do toho radku ulozena
a na konec provedu commit nebo rollback. Takze pokud chce jiny editovat zahlasi update chybu. Tento zpusob mi spolehlive funguje na Sybase SQL Anywhere. Na MS SQL to jde jenom do urcite miry. Zamknout record jde ale ve chvily kdyz chce jiny klient editovat stejna data ceka MS SQL na to nez skonci editaci prvni klient. Takze pokud prvni klient provede commit prikaz se provede. Pokud ne skonci dotaz Timeoutem.

Pokud by slo, chtel bych aby pokus o update zamceneho recordu zahlasil nejakou chybu a ne cekal na timeout nebo nez zkonci editaci ten prvni.

Dekuji za kazdou pomoc

Jirka

FindKey ve FlashFileru

[*] Ing. Miroslav Ondrisek, BONNEL TECHNOLOGIE, s.r.o. <bonnel(zv)telecom(tec)cz> - 20.1.2000 14:23:07

Jde o chybu ve verzi 1.54. Jdi na
ftp://ftp.turbopower.com/pub/flash/updates/ , je tam soubor
FFFix154.txt, tim by se to melo vyresit.

Jinak na strance www.clexpert(tec)cz se muzes prihlasit do konference o
FlashFileru a ostatnich produktech TurboPower Soft.

Doufam, ze Ti to pomuze

Mira


----- P�vodn� zpr�va -----
Od: David Lebeda <david.lebeda(zv)comarr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 20. ledna 2000 10:38
P�edm�t: FindKey ve FlashFileru


| Ahoj,
|
| seznamujeme se tu s FlashFilerem anarazili jsme na nasledujici
| problem. Po zavolani funkce FindKey vznikne vyjimka No current
| record, obvykle v pripade, kdy se zaznam nenajde.
|

Paradox: Some Limit exceed

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 20.1.2000 14:50:54

Mas v IDAPI konfiguraci nastavenu velikost bloku
2048b a podle toho se ridi SQL dotaz CREATE TABLE.

Jinde, kde je velikost bloku vetsi to funguje, protoze
jsi dosahl limitu poctu vet v tabulce (to zavisi na velikosti
bloku).
Musi byt vsude stejna velikost bloku (ve vsech nastavenich
na jednotl. pocitacich.

Martin
nedopil(zv)geocities.com
http://kuchyn.delphi(tec)cz (kuchyn(zv)delphi(tec)cz)


-----P�vodn� zpr�va-----

> Zvedni velikost bloku.
> Martin
*** Kde a jak?
A jak je mozne, ze to nekde funguje a jinde ne?

Petr


ARJ, ACE, RAR, JAR - DLL na packovani

[*] Zak Robert <nrsys(zv)psn.sk> - 20.1.2000 15:11:14

Este som to neskusal ale nasiel som to na www.ziptv.com

-----P�vodn� spr�va-----
Od: Michal HAMPL <hampl(zv)GJS(tec)cz>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 20. janu�r 2000 10:50
Predmet: ARJ, ACE, RAR, JAR - DLL na packovani


>Zdravim vsechny Delphisty.
>Chtel jsem se zeptat, jestli nekdo nevite o nejakych DLL knihovnach (pri
>nejhorsim i komponentach) na baleni do ARJ, ACE, RAR, JAR. Nejlepe FREE.
>
> Diky moc


Interbase zadarmo? (was: PostgreSQL a Delphi - a

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 20.1.2000 15:30:34

Vynatek z mailu od pana Kubata z Inprise CZ.

----------------------------------------------------------------------
InterBase 6 bude v prvni polovine roku uvolnena jako
OpenSource a vznikne i firma se 20% ucasti Inprise,
ktera bude poskytovat IB 6 technickou podporu. Do teto
firmy prejdou i stavajici vyvojari InterBase.

IB 5.6 tedy je jeste za penize (komercni projekt, plne
podporovany firmou), IB 6 bude zadarmo (nekomercni
projekt, financovany vyhradne z technicke podpory),
ovsem podminky licencovani zatim nebyly do detailu
stanoveny.

Vice viz:
http://www2.linuxjournal.com/articles/conversations/010.html

----------------------------------------------------------------------


Pavel


----- Original Message -----
From: Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz>

> Mam v teto souvislosti laicky dotaz. Znamena to, ze InterBase pro Win9x,
> Win200x bude pro m� i pro zakazniky ZADARMO? Nebo kolik bude stat? Znamena
> to konecne konec s BDE pro i pro drobnejsi projekty? Jakym zpusobem bude
> Interbase a pripadne klice distribuovany? Jak to bude s pripadnym
> licencovanim verzi? Zna (a zverejnil) uz Inprise.CZ nejake podrobnosti?
> Uf... :-o
>
> Ing. Petr Svejda
> software specialist
>

MS SQL 7.0 a zamykani recordu

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 20.1.2000 15:42:19

No a co ti brani nastavit nejaky priznak v tom radku kdyz se leze do toho
dialogu ?
V momente aktivace dialogu se nastavi treba polozka [Editing] na 1 a je to.
Dalsi clovek uz si to neotevre.
Je to take dle meho nazoru vhodnejsi nez uzamceni, protoze v pripade zamceni
vety nelze ostatnimi provadet dotazy
na tuto vetu a musi se pockat, az se opet odemkne - to zde nehrozi, jen se
veta oznaci coby prave editovana.
Po ukonceni operaci pak shodis priznak (napriklad vtipne v OnUpdate
triggeru - tim se zajisti, ze tam nezustane
ten priznak "smrdet") a je vse hotovo.

Obdoba by byla vytvorit tabulku se seznamem prave editovanych vet, ale to je
uz trochu nakladnejsi ...

=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Jirka Majvald
Sent: Thursday, January 20, 2000 3:52 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: MS SQL 7.0 a zamykani recordu


Bohuzel zakaznik si pral aby byl zaznam zamcen po celou dobu.
Ale pokud to dobre chapu tak to ze ten zaznam nekdo edituje zjistim az pri
ulozeni a to prave nechci.
Ja to potrebuju hned co zakaznik zacne data editovat.

Jirka

----- Original Message -----
From: Jezek Petr, Ing. <PETR(zv)sevis.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 1:02 PM
Subject: RE: MS SQL 7.0 a zamykani recordu


> Podle me neni dobry napad zamknout data po celou dobu editace zaznamu.
> Ja pouzivam trochu jiny spusob:
> 1. v kazde tabulce mam sloupec - casove razitko posledni zmeny.
> 2. Kdyz zaznam vyberu, tak si toto razitko zapamatuju a uzivatel muze
> editovat
> data (ne primo).
> 3. Kdyz chce data ulozit, zamknu zaznam (Start transakce, update na
stejnou
> hodnotu
> - jak si popsal) a pak prectu razitko. Kdyz je jine nez puvodni - data
> byly zmenene -
> zalezi na tobe a uzivatelovi co dal. Kdyz ne zapisu zmeny a zmenim taky
> hodnotu v
> casovem razitku.
>
> Da se to doplnit i dalsim sloupcem - jmeno uzivatele, ktery naposledy
menil
> data a testovat
> i ten.
> Jedina nevyhoda je pri primych zmenach v datech (pomoci nejakeho
nastroje -
> MSQuery, ...), kdy
> se automaticky neaktualizuje tento sloupec. Coz by se vsak dalo vyresit
> trigrem (AFTERUPDATE),
> ktery by automaticky po kazde zmene toto casove razitko nastavil na
aktualni
> cas
> (a odpadla by i potreba jej aktualizovat i v programu).
>
> Petr
>
> -----Original Message-----
> From: Jirka Majvald [mailto:majvald(zv)email(tec)cz]
> Sent: Thursday, January 20, 2000 2:12 PM
> To: Delphi konference
> Subject: MS SQL 7.0 a zamykani recordu
>
>
> D5 Ent, NT4.0 SP 5, MS SQL 7.0 SP 1
>
> Chtel bych nad MS SQL 7.0 pomoci ADO express zamknout jeden zaznam pro
> editaci aby nemohl menit nekdo jiny nez je editace u konec.
>
> Zamknuti se mi povede pomoci UPDATE pred editaci (asi to neni nejlepsi
napad
> ale nic jineho mne nenapada).
> Takze provedu start transakce, update (vlozim hodnoty ktere uz zaznam
> obsahoval), potom klient edituje data ktera budou do toho radku ulozena
> a na konec provedu commit nebo rollback. Takze pokud chce jiny editovat
> zahlasi update chybu. Tento zpusob mi spolehlive funguje na Sybase SQL
> Anywhere. Na MS SQL to jde jenom do urcite miry. Zamknout record jde ale
ve
> chvily kdyz chce jiny klient editovat stejna data ceka MS SQL na to nez
> skonci editaci prvni klient. Takze pokud prvni klient provede commit
prikaz
> se provede. Pokud ne skonci dotaz Timeoutem.
>
> Pokud by slo, chtel bych aby pokus o update zamceneho recordu zahlasil
> nejakou chybu a ne cekal na timeout nebo nez zkonci editaci ten prvni.
>
> Dekuji za kazdou pomoc
>
> Jirka
>


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999


Indexy v paradox tabulkach

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 20.1.2000 15:44:13


----- Original Message -----
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Skutecne nevidim duvod zacinat dnes vyvoj novych aplikaci nad
> jakoukoliv souborovou databazi, s vyjimkou osobnich telefonnich
> seznamu a nepodstatnych srandicek z oblasti freeware (ne vse ve
> freeware je nepodstatna srandicka :).

tzn, ze i napr. jednouzivatelske ucetnictvi, distribuovane po internetu
by jsi delal nad relacni databazi ? Neni to zbytecne ?
Prosim zadnou "flame" - jen se ptam.


Pavel

MS SQL 7.0 a zamykani recordu

[*] Jirka Majvald <majvald(zv)email(tec)cz> - 20.1.2000 14:51:54 -0000

Bohuzel zakaznik si pral aby byl zaznam zamcen po celou dobu.
Ale pokud to dobre chapu tak to ze ten zaznam nekdo edituje zjistim az pri
ulozeni a to prave nechci.
Ja to potrebuju hned co zakaznik zacne data editovat.

Jirka

----- Original Message -----
From: Jezek Petr, Ing. <PETR(zv)sevis.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 1:02 PM
Subject: RE: MS SQL 7.0 a zamykani recordu


> Podle me neni dobry napad zamknout data po celou dobu editace zaznamu.
> Ja pouzivam trochu jiny spusob:
> 1. v kazde tabulce mam sloupec - casove razitko posledni zmeny.
> 2. Kdyz zaznam vyberu, tak si toto razitko zapamatuju a uzivatel muze
> editovat
> data (ne primo).
> 3. Kdyz chce data ulozit, zamknu zaznam (Start transakce, update na
stejnou
> hodnotu
> - jak si popsal) a pak prectu razitko. Kdyz je jine nez puvodni - data
> byly zmenene -
> zalezi na tobe a uzivatelovi co dal. Kdyz ne zapisu zmeny a zmenim taky
> hodnotu v
> casovem razitku.
>
> Da se to doplnit i dalsim sloupcem - jmeno uzivatele, ktery naposledy
menil
> data a testovat
> i ten.
> Jedina nevyhoda je pri primych zmenach v datech (pomoci nejakeho
nastroje -
> MSQuery, ...), kdy
> se automaticky neaktualizuje tento sloupec. Coz by se vsak dalo vyresit
> trigrem (AFTERUPDATE),
> ktery by automaticky po kazde zmene toto casove razitko nastavil na
aktualni
> cas
> (a odpadla by i potreba jej aktualizovat i v programu).
>
> Petr
>
> -----Original Message-----
> From: Jirka Majvald [mailto:majvald(zv)email(tec)cz]
> Sent: Thursday, January 20, 2000 2:12 PM
> To: Delphi konference
> Subject: MS SQL 7.0 a zamykani recordu
>
>
> D5 Ent, NT4.0 SP 5, MS SQL 7.0 SP 1
>
> Chtel bych nad MS SQL 7.0 pomoci ADO express zamknout jeden zaznam pro
> editaci aby nemohl menit nekdo jiny nez je editace u konec.
>
> Zamknuti se mi povede pomoci UPDATE pred editaci (asi to neni nejlepsi
napad
> ale nic jineho mne nenapada).
> Takze provedu start transakce, update (vlozim hodnoty ktere uz zaznam
> obsahoval), potom klient edituje data ktera budou do toho radku ulozena
> a na konec provedu commit nebo rollback. Takze pokud chce jiny editovat
> zahlasi update chybu. Tento zpusob mi spolehlive funguje na Sybase SQL
> Anywhere. Na MS SQL to jde jenom do urcite miry. Zamknout record jde ale
ve
> chvily kdyz chce jiny klient editovat stejna data ceka MS SQL na to nez
> skonci editaci prvni klient. Takze pokud prvni klient provede commit
prikaz
> se provede. Pokud ne skonci dotaz Timeoutem.
>
> Pokud by slo, chtel bych aby pokus o update zamceneho recordu zahlasil
> nejakou chybu a ne cekal na timeout nebo nez zkonci editaci ten prvni.
>
> Dekuji za kazdou pomoc
>
> Jirka
>

SQL a Divide By Zero

[*] V�clav Nov�k����)^����hq�'z�� - 20.1.2000 16:29:58

Ahoj,

mam dotaz spise pro SQL konferenci, ale zde se jiste take ujme.

Situace : D5,SQL7,ADOSQL komponenta.

Ve stringu ADOSQL mam :

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
order by Prumer

Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.

Jaka konstrukce v selectu u vypocitavaneho sloupce osetri tuto chybu ?
Existuje v SQL nejaky dotaz typu If .. then .. else ?

V dokumentaci i knihach nic vhodneho nenachazim. Asi blbe koukam, nejak to prece
musi jit. Jedine k tematu je nastavovani ruznych SET na serveru, odstavujicich tuto
hlasku, ale to se mi nezda.


V�clav Nov�k

Velikost zkompilovaneho kodu

[*] Tomas Kyjak <xkyjt01(zv)vse(tec)cz> - 20.1.2000 16:36:53

Zdravim,

docela me obtezuje, ze kompilator Delphi (3 nebo 4), generuje casto zbytecne rozsahly kod.
Existuje nejaky zpusob, jak optimalizovat velikost kodu?
Podle me jsou napriklad kompilovany cele pouzite unity, prestoze je z nich pouzita treba jenom jedna funkce.

Dik,
Tomas Kyjak


SQL a Divide By Zero

[*] JAHODA Jozef <jahoda(zv)asset.sk> - 20.1.2000 17:17:04

V�clav Nov�k wrote
> Situace : D5,SQL7,ADOSQL komponenta.
>
> Ve stringu ADOSQL mam :
>
> select Kc,Pocet,(Kc/Pocet) As Prumer
> from Table
> order by Prumer
>
> Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.
>
> Jaka konstrukce v selectu u vypocitavaneho sloupce osetri tuto chybu ?
> Existuje v SQL nejaky dotaz typu If .. then .. else ?
>
v Oracli je na prikaz DECODE

select Kc, Pocet, DECODE(Pocet, 0, 'Error', (Kc/Pocet)) As Prumer
from Table
order by Prumer

JJ


OT: havarovany disk

[*] David Maly <david(zv)archa(tec)com> - 20.1.2000 17:32:35

Ahoj,

omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)

Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
format?

Diky za kazdou radu, chtel bych se vyhnout nastrojum typu "magnet",
"kladivo" apod. :)

s pozdravem,
David mailto:david(zv)archa.com

SQL a Divide By Zero

[*] viragi(zv)eurotel.sk - 20.1.2000 18:36:19

V Oracle na to existuje funkce DECODE. Ta je obecna. Na kontrolu NULL
hodnoty je k dispozici funkce NVL.. Verim, ze v SQL7 existuje neco
podobneho.

Ivan Virag

puvodni zprava:

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
order by Prumer

Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.

MS SQL 7.0 a zamykani recordu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 20.1.2000 19:17:25

On 20 Jan 00, at 15:42, Hynek Svato� wrote:

> No a co ti brani nastavit nejaky priznak v tom radku kdyz se leze do
> toho dialogu ? V momente aktivace dialogu se nastavi treba polozka
> [Editing] na 1 a je to. Dalsi clovek uz si to neotevre. Je to take dle
> meho nazoru vhodnejsi nez uzamceni, protoze v pripade zamceni vety
> nelze ostatnimi provadet dotazy na tuto vetu a musi se pockat, az se
> opet odemkne - to zde nehrozi, jen se veta oznaci coby prave
> editovana. Po ukonceni operaci pak shodis priznak (napriklad vtipne v
> OnUpdate triggeru - tim se zajisti, ze tam nezustane ten priznak
> "smrdet") a je vse hotovo.

Zde dojde k problemu v pripade, ze tomu kdo edituje spadne
uprostred spojeni, a v poli zustane viset "zamek". Zde by musel
osetrit, ze tento "zamek" je prirazen urcitemu uzivateli, a kdyz
uzivatel spadne, tak se zamek musi rozpojit. Coz vidim jako docela
peknou pakarnu. :-)


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Indexy v paradox tabulkach

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 20.1.2000 19:17:25

On 20 Jan 00, at 15:44, Pavel Medek wrote:

> > Skutecne nevidim duvod zacinat dnes vyvoj novych aplikaci nad
> > jakoukoliv souborovou databazi, s vyjimkou osobnich telefonnich
> > seznamu a nepodstatnych srandicek z oblasti freeware (ne vse ve
> > freeware je nepodstatna srandicka :).
>
> tzn, ze i napr. jednouzivatelske ucetnictvi, distribuovane po
> internetu by jsi delal nad relacni databazi ? Neni to zbytecne ?
> Prosim zadnou "flame" - jen se ptam.

Dokonce i to. Z jednoducheho duvodu - vzdy (ci brzy) se muze
objevit uzivatel, ktery to bude chtit provozovat sitove, pak muzes
rict ano, a zkasirovat dalsi penizky. :-) V pripade sireni internetem
bych vahal s MSDE, protoze je toho cca 20 MB instalace. To se
vsak instaluje jednou, updaty pak posilas bez databaze. Slysel
jsem, ze IB by mohla byt v tomto ohledu prijemnejsi.

Dokonce uvazuji o tom, ze udelam novou verzi programu Kuchta
pro Wokna (vypustil jsem to asi pred 4 lety a porad mi kvuli tomu
volaji nejaci zajemci :), a ze pouziji prave IB. Mozna, ze to udelam
jako Open Source a udelam z toho demo na pouziti mych OLE DB
komponent. Sireni bude samozrejme po internetu, jak jinak, ze? :-)

BTW - mam uz predstavu o projektu, pokud by se nasli zajemci o
pomoc (s pouzitim mych OLE DB; ale az tak za dva mesice, driv
ne), pak bych to dal do Open source urcite.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


PostgreSQL a Delphi

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 20.1.2000 20:11:20


> Zdravim
> nema nekdo zkusenosti s PosgreSQL a konektivitou na Delphi ?
****Vim o nekom, kdo by nedoporucil PostreSQL ani nepriteli.
Krome toho, ze je brutalne narocna na pamet ma jeste dalsi
,,fajnovosti` a ,,vymozenosti`` jako ze pri ORDER BY nepouziva
index a dalsi. Jestli chces, mohu Ti dat kontakt a muzete si o tom
popovidat.

Slavek


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------


Velikost zkompilovaneho kodu

[*] Sabbath <mai20um(zv)axpsu.fpf.slu(tec)cz> - 20.1.2000 20:11:44


No tak za prve, to ze kompilator kompiluje celou unitu, to jeste
neznamena, ze do tvyho programu "zahrne" i funkce, ktery nepouzivas.
Videl jsem par programku, ktery vyseka "mrtvy oblasti", ale neni vzdycky
uspesnej :)

Sabbath

On Thu, 20 Jan 2000, Tomas Kyjak wrote:

> Zdravim,
>
> docela me obtezuje, ze kompilator Delphi (3 nebo 4), generuje casto zbytecne rozsahly kod.
> Existuje nejaky zpusob, jak optimalizovat velikost kodu?
> Podle me jsou napriklad kompilovany cele pouzite unity, prestoze je z nich pouzita treba jenom jedna funkce.
>
> Dik,
> Tomas Kyjak
>

OT: havarovany disk

[*] V�clav Muchna <apscomp(zv)seznam(tec)cz> - 20.1.2000 21:01:39

David Maly wrote:

> omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
> Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
> leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
> provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
> BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)
>
> Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
> format?

Lowlevel formatovat disky se uz neprovadi nekolik let, a dost
se to nedoporucovalo ani na 286.
Ovsem pomoc je jednoducha. Pokud nechces data zadnym zpusobem zachranit,
tak nabootoj ze systemove diskety (necekane) a pust si norton diskeditora
(ted to nectete: muzu ti ho dyztak poslat) a zobraz si disk jako
fyzicky (to je dulezite, pri pokusu o log. zobr. dojde k chybe). No a ruco smaz
prvnich par sektoru. Podle me by mohlo stacit smazat 0. (resp. 1.) sector,
na tom je ulozena partition table (v pohledech si muzes nechat dany
sektor zobrazit jako "partition table", "master boot record", "fat", "binary").
Pak by mel uz fdisk fungovat. Pokud stejne nezafunguje, tak mu smaz nekolik
vic sektoru ze zacatku disku (mj. j MBR - master boot record) a pak to
fungovat _musi_, pokud ovsem nebudou chyby na disku. Od tech ti ale
nepomuze ani lowlevel format.

Hodne stesti preje

Vasek Muchna
--
Vaclav Muchna
verejny pgp klic: http://www.apscomputer(tec)cz/vasek/pubring.html


Font u Memo

[*] Ale� Kresta <ales.kresta(zv)atlas(tec)cz> - 20.1.2000 21:30:11

Ahoj

Nevim jak ulozit a znovu nacist font u Memo ze souboru. Zkousel jsem to takhle, ale po stisknuti tlacitka Button1 se nestalo nic. Prosim poradte.
Diky
Ale�
var soubor:file of Tfont;
zaznam:Tfont;

procedure TForm1.Button1Click(Sender: TObject);
begin
assignfile(soubor,'c:\pokus.txt');
reset(soubor);
read(soubor,zaznam);
Memo1.font:=zaznam;
closefile(soubor);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
assignfile(soubor,'c:\pokus.als');
rewrite(soubor);
write(soubor,Memo1.font);
closefile(soubor);
end;

Rychle nacitani bmp

[*] Straka Josef <kshb(zv)seznam(tec)cz> - 20.1.2000 21:50:10

D4 standard W95 OSR2
mam jeden problem s nacitanim bmp. Mam bitmapu, jejiz velikost je 10 MB a
vice. Jeji otevreni v komponente Image.Picture.LoadFromFile() na mem
P200MMX, 32 MB RAM trva asi 7 vterin. Ta bmp je samozrejme vetsi nez
formular, a tak s ni pohybuji pomoci ScrollBars.
Neslo by ale nejak udelat, aby se bmp nacetla jen ta cast, ktera je po
spusteni videt (levy horni roh), ten se zobrazil, a teprve potom se docetl
zbytek. Tak by se bmp nacitala velice rychle a hlavne by cas nacteni nebyl
zavisly na velikost souboru?

Zacinajici amatersky programator
Straka Josef
email: strakaj(zv)hba(tec)czn(tec)cz
www: http://mujweb(tec)cz/www/strakaj/

MS SQL 7.0 a zamykani recordu

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 20.1.2000 22:35:06


>> No a co ti brani nastavit nejaky priznak v tom radku kdyz se leze do
>> toho dialogu ? V momente aktivace dialogu se nastavi treba polozka
>> [Editing] na 1 a je to. Dalsi clovek uz si to neotevre. Je to take dle
>> meho nazoru vhodnejsi nez uzamceni, protoze v pripade zamceni vety
>> nelze ostatnimi provadet dotazy na tuto vetu a musi se pockat, az se
>> opet odemkne - to zde nehrozi, jen se veta oznaci coby prave
>> editovana. Po ukonceni operaci pak shodis priznak (napriklad vtipne v
>> OnUpdate triggeru - tim se zajisti, ze tam nezustane ten priznak
>> "smrdet") a je vse hotovo.

> Zde dojde k problemu v pripade, ze tomu kdo edituje spadne
> uprostred spojeni, a v poli zustane viset "zamek". Zde by musel
> osetrit, ze tento "zamek" je prirazen urcitemu uzivateli, a kdyz
> uzivatel spadne, tak se zamek musi rozpojit. Coz vidim jako docela
> peknou pakarnu. :-)

> Zbysek Hlinka

Samozrejme vim, ze je to reseni "pres ruku" anobrz takova "vopicka".
To odstraneni nezadoucich zamku by slo zaridit napr. periodicky se
spoustejici (na strane SQL serveru) davkou,
ovsem pripoustim, ze to jiz neni nic pekneho ...
Sam preferuji reseni, ktere tu jiz padlo - predlozil ho Petr Jezek - casova
znamka.
Mimochodem: tu casovou znamku lze elegantne zajistit pomoci sloupce typu
timestamp, ten se aktualizuje vzdy pri operaci INSERT nebo UPDATE.
Ovsem na to, co si vymyslel ten zakaznik asi nezbude nic jineho,
nez pouzit neco tezkopadnejsho.

Dovolil bych si problem shrnout:
Jak udrzet zaznam zablokovany po celou dobu editace:
1) Nastartovat transakci
Vyhody: nemusim se starat o nic, jen nastartovat transakci a ukoncit ji
kdyz aplikace spadne, nic se nedeje
Nevyhody: Ostatni uzivatele nemohou provest ani select na tuto vetu a jsou
tedy ve stavu zablokovanem
2) Vlastni sprava zamku
Vyhody ostatni mohou vesele selectovat atd.
Nevyhody vetsi rezije pri sprave zamku

3) lze jeste snizit Isolation level na Read uncommited a pak lze klidne
nastavit transakci a ostatni mohou v pohode i cist tuto vetu. Nevyhoda:
snizena bezpecnost konzistence dat - jeden proces zmeni data, druhy si tyto
zmeny precte a poklada tyto data za dane ale potom proces 1 udela Rollback a
proces 2 tudiz pouzival nespravna data a muze se jit klouzat ...

Tak veru nevim kudy z toho ven :-)

=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999


SQL a Divide By Zero

[*] Hynek Svatos <svatos(zv)kam(tec)czu(tec)cz> - 20.1.2000 22:45:22

Zkus:

select Kc,Pocet, Prumer=CASE WHEN ISNULL(Pocet, 0)=0 THEN NULL ELSE
(Kc/Pocet) END
from Table
order by Prumer

tim je zajisteno, ze kdyz je Pocet NULL nebo 0, pak se vypocet preskoci a
placne se tam hodnota NULL.

=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
viragi(zv)eurotel.sk
Sent: Thursday, January 20, 2000 6:36 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: SQL a Divide By Zero


V Oracle na to existuje funkce DECODE. Ta je obecna. Na kontrolu NULL
hodnoty je k dispozici funkce NVL.. Verim, ze v SQL7 existuje neco
podobneho.

Ivan Virag

puvodni zprava:

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
order by Prumer

Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999


export dat

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 20.1.2000 22:50:02

Aj ja som riesil tento problem. Ja som navrhol MDI aplikaciu, ktora z
viacerych formov pozerala do toho isteho table. T.j. nie je mozne v takomto
pripade pouzit, ani DataModule. Riesenie je podla mna najjednoduhsie ak
pridas na form dalsi table, ktory budes posuvat a exportovat, alebo ak ti
navadi, ze na kratku dobu poposuvas kurzor TTable, tak zapamatas si pre
exportom cislo zaznamu cez Kurzor:=Table1.RecNo; a po exporte
Table1.RecNo:=Kurzor;

Dufam ze som ti pomohol.

Best regards.
--------------------
Roland Turcan
RoTurSoft
Palarikova 10/20
934 01 Levice
Slovakia

tel: ++421-905-487 908



----- Original Message -----
From: Ren� Otisk <otisk(zv)misel(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 7:53 AM
Subject: Re: export dat


> Hi,
> Neslo by to spis pres SQL dotaz
> SELECT * FROM ZdrojTabke
> INSERT INTO CilTable WHERE ...
>
> Kdyz tak to trochu bliz specifikuj...
>
> Sroub
>
> > Zdravim,
> > mam jeden dotaz. potrebujem urobit export dat z klasickej Paradox
> > tabulky do
> > inej tiez Paradox tabulky. Rozdiel je v tom ze v tej druhej tabulke
> > budu len
> > filtrovane data z prvej. No a problem je v dvoch veciach:
> >
> > 1. Vytvorenie novej paradox tabulky. (relativne to viem vyriesit
> > skopirovanim prazdne tabulky - nic moc riesenie)
> >
> > 2. Pri exporte dat robim toto
> > for i:=1 to table.RecordCount do
> > begin
> > If zaznam vyhovuje then exportuj;
> > posun zaznam;
> > end;
> >
> > problem je v posun zaznam. Nieviem ako mam posunut zaznam inac ako
> > table.next; Ked pouzijem next, posunie sa mi na dalsi zaznam aj v vo
> > vsetkych editoch na fromulari. Mozem urobit to ze dam
> > form1.enabled:=false;
> > ale to sa mi nezda moc korektne.
> > Da sa to riesit aj nejak inak?
> >
> > Vdaka, Miso
>
>

Opravy D5

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:07:44

From: Lud�k ZITA <konference(zv)sales(tec)cz>
> Jsem cerstvym uzivatelem D5 PROFESSIONAL Verze 5.0 (Build 5.62)
> (Drive D4 STANDART)
> Existuje potreba nejakych dodatecnych oprav (at uz oficialnich nebo
> neoficialnich). Jedine co jsem zatim nasel, je Delphi 5 Help System Updates

Ahoj,

U D5 to nastesti neni zakladni potreba (jako to bylo u D4 :-). Patche samozrejme
budou (jako u kazdeho softwaru). Z "neoficialnich" patchu je akorat jeden na ADO
komponenty, ale ty stejne nemas standartne v Professional verzi.

Petr Vones, amatersky programator


havarovany disk

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:07:54

From: David Maly <david(zv)archa.com>
> omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
> Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
> leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
> provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
> BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)
>
> Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
> format?

Ahoj,

Pokud si vzpominam, tak ty ruzne "low-level" formaty z BIOSu disk spise
dokonale odrovnaly. Na disky vetsinou byva zaruka minimalne 3 roky, tak
jej zkus reklamovat.

Petr Vones, amatersky programator


Datka, DLT atd.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:08:20

From: <rjunga(zv)oku-ka(tec)cz>
> nemate nekdo komponenty pro praci s datkama a DLT? Jeste jsem nepatral po
> tom, jak to pracuje, ale predpokladam, ze to nebude nic jednoducheho.

Ahoj,

Pro NTcka snad existuji nejake funkce primo v API, hledej ve Win32 API tema
"Tape Backup Functions".

Petr Vones, amatersky programator

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:08:29

From: Pavel Bl�hovec <blahovec(zv)stapro(tec)cz>
> Poradi mi nekdo, jak bych mohl do zahlavi TDBGridu pridelat tlacitko, aby
> potom fungoval jako automaticky filtr v Excelu?

Ahoj,

Zkus se podivat na demo aplikaci s komponentu ExpressQuantumGrid (neni ale
zadarmo). Nevim ted presne jestli umi zrovna tohle, ale je tam plno veci,
takze by to tam snad byt mohlo.

http://www.devexpress.com/downloads/EQGrid.zip

Petr Vones, amatersky programator

OpenPictureDialog v Delphi 5

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:08:14

From: bures <bures(zv)ssakhk(tec)cz>
> Stava se to ve Windows 98 pri ladeni aplikace a dialog se vubec nezobrazi.

Ahoj,

Me se to prave pri ladeni ve Win95 stava obcas take. Nejdriv jsem si myslel,
ze mam nekde chybu (pri uprave std.dialogu), ale ono to obcas pada i s temi
z VCL. Tezko rict jestli je to chyba debuggeru, VCL nebo Windows. Tipoval
bych to asi na "hrackovitost" Win9x. Stava se to zde nekomu na NTckach ?

Petr Vones, amatersky programator


Nacitanie z text file

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:08:40

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Zdravim, potreboval by som vediet ako najjednoduchsie nacitam kurzovy listok
> Narodnej banky Slovenska, z ktoreho som kusok prekopiroval. Ked pouzijem
> TTable.TableType:=ttASCII, tak mi to nacital len do jedneho stlpca. V subore

Ahoj,

Musis si vytvorit prislusny .SCH soubor. Zrovna se to ted probira v konferenci.
Podrobne to mas popsane v BDE API helpu, pod heslem ASCIIDRV, a pak v odkazu
"Binding external schema to text tables"

Petr Vones, amatersky programator

Globalni odchyceni exceptionu (very long)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:09:42

From: Tomas Skoda <tomas.skoda(zv)jdsoftware.sk>
> Mohol by si trocha rozvinut ako co si myslel tym pristupom k systemovym
> funkciam v RTL ?

Ahoj,

Jde o funkce v unitu System.pas, ktere zacinaji znakem "_". Napriklad prikaz
raise v ObjectPascalu vola proceduru _RaiseExcept v System.pas a podobne.
Pokud by zde existovala moznost odchyceni volani teto funkce, podobnym
zpusobem jako jsou treba promenne ExceptProc apod., byla by cela zalezitost
s odchytavanim vyjimek podstatne snadnejsi. Dalsi moznost by byla hookovat
primo kod RTL misto funkci Win32, Delphi ale bohuzel neumoznuje ziskat
adresu _XXX funkci pomoci standartnich operatoru, takze by bylo nutne pouzit
informace z MAP filu.

Dalsi moznost globalniho odchytavani by byla verze s debuggerem. Tady se ale
narazi na problem identifikace tridy vyjimky (debugger nepobezi ve stejnem
kontextu s aplikaci), takze by se musela opet vyuzit informace z MAP filu dane
aplikace.

Petr Vones, amatersky programator

jeste k txt tabulkam a komponente TTable

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:09:00

From: Martin Palas <PalasM(zv)Kaucuk(tec)cz>
> tak na vase dobre rady uz ctu TXT soubory jako
> tabulky, akorat ve SCH souboru je nastaveni
> CHARSET = ASCII.
> Moje otazka : Existuji i jine promenne pro charset (jake) ?
> protoze mi nemaka cestina .....

Ahoj,

napriklad pro "Pdox ANSI Czech" je to "anczech". Cely seznam najdes v BDE API
helpu pod heslem "Language drivers".

Petr Vones, amatersky programator

Setri DLL pamet nebo ne?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:10:11

From: Pavel Cisar <pcisar(zv)aktis(tec)cz>
> O zadne takove nevim, ale snad by se neco takoveho dalo vytvorit. Mam dojem,
> ze primarni imagebase lze zjistit z hlavicky DLL ?

Ahoj,

To da, ale jeste by to chtelo ziskat urcitou ochotu ke zmenam koliznich balicku
od jejich autoru :-)

> > v Options Image base vetsi nez $7FFFFFFF (alespon me to porad nadava :-).
> :o) A neni ta adresa nahodou nad 2GB ? :o)

Jasne ze je :-) Ale proc mi Delphi brani v tom vytvorit "systemovou" DLL.

Petr Vones, amatersky programator

Nastroje pro Paradox tabulky (Was: reindexace para

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:12:38

From: <Petr.Motlicek(zv)bcbrno(tec)cz>
> prosim upresni to, nemohu to najit...

Ahoj,

Jelikoz se tu seslo vice dotazu na ruzne nastroje pro Paradox tabulky, tak
vsechny od Borlandu jsou tady:

http://www.borland.com/devsupport/bde/utilities.html

Najdete tam:
- knihovny TUtility pro vsechny verze BDE (posledni pro 5.0)
http://www.borland.com/devsupport/bde/files/tutil50.zip
- nastroj pro opravy tabulek (Paradox Table Repair with Delphi source)
http://www.borland.com/devsupport/bde/files/tutil32d.zip
- nastroj pro zmenu nekterych parametru (Paradox table alter with Delphi source)
http://www.borland.com/devsupport/bde/files/pxrest.zip
- nastroj na zjistovani informaci o tabulkach (Table Interrogator)
http://www.borland.com/devsupport/bde/files/tableint.zip
- odkaz na stranku s nejnovejsimi updaty BDE (BDE / SQL Links 5 update)
http://www.borland.com/devsupport/bde/bdeupdate.html

Petr Vones, amatersky programator

Velikost zkompilovaneho kodu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.1.2000 23:20:19

From: Tomas Kyjak <xkyjt01(zv)vse(tec)cz>
> docela me obtezuje, ze kompilator Delphi (3 nebo 4), generuje casto zbytecne rozsahly
> kod. Existuje nejaky zpusob, jak optimalizovat velikost kodu? Podle me jsou napriklad
> kompilovany cele pouzite unity, prestoze je z nich pouzita treba jenom jedna funkce.

Ahoj,

Kdepak, linker je pomerne dobre udelany. Z unitu se do vysledneho kodu linkuje
jen to co je opravdu nutne. Problem je totiz v samotne VCL, ktera pro zakladni
zivotaschopnost potrebuje pomerne velke mnozstvi kodu. Zkratka jak uz to byva,
pohodlnost a snadnost vyvoje aplikaci v Delphi neco stoji a tim je prave
minimalni velikost vysledneho EXE souboru.

Moznych reseni je nekolik. Za prve pouzivat balicky, dalsi moznost je psat
aplikace bez VCL primo ve WinAPI. Tim uz ale prijdes o vizualni navrh a tezko
lze takto delat nejake slozitejsi aplikace. Jeden takovy priklad najdes treba
tady:

ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Api/DelphiDays99_Prezentace.zip

Pak jeste existuje knihovna XCL, ktera usnadnuje vyvoj aplikaci bez VCL pomoci
vlastnich trid. Zjednodusene receno je to takovy pokus o neco jako MFC pro
Delphi. Odkaz na XCL najdes na Delphree:

http://delphree.clexpert.com/pages/default.htm

Petr Vones, amatersky programator

TUTIL32.DLL

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 21.1.2000 01:59:49

Kde zozeniem kompletny popis TUTIL32.DLL


Dakujem.

Best regards.
--------------------
Pouzivam D3Pro, BDE 5.01, Win98PanEuro, RX Lib, SineaVCL.

Roland Turcan
RoTurSoft
Palarikova 10/20
934 01 Levice
Slovakia

tel: ++421-905-487 908


Maximalna velkost kompilovaneho EXE suboru

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 21.1.2000 03:11:20

Zdravim

Aka je maximalna velkost kompilovaneho EXE suboru v Delphi 3,4,5 ?

Dakujem.

Best regards.
--------------------
Pouzivam D3Pro, BDE 5.01, Win98PanEuro, RX Lib, SineaVCL.

Roland Turcan
RoTurSoft
Palarikova 10/20
934 01 Levice
Slovakia

tel: ++421-905-487 908


havarovany disk

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.1.2000 05:51:40

V DOS verzi NU byl program CALIBRAT.EXE, ktery by to mel zvladnout

Jan Fiala

----- Original Message -----
From: David Maly <david(zv)archa.com>> Ahoj,
>
> omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
> Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
> leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
> provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
> BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)
>
> Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
> format?
>
> Diky za kazdou radu, chtel bych se vyhnout nastrojum typu "magnet",
> "kladivo" apod. :)
>
> s pozdravem,
> David mailto:david(zv)archa.com
>
>
>

SQL a Divide By Zero

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.1.2000 05:56:17

>Ahoj,
>
>mam dotaz spise pro SQL konferenci, ale zde se jiste take ujme.
>Situace : D5,SQL7,ADOSQL komponenta.
>Ve stringu ADOSQL mam :

>select Kc,Pocet,(Kc/Pocet) As Prumer
>from Table
>order by Prumer

>Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.
>Jaka konstrukce v selectu u vypocitavaneho sloupce osetri tuto chybu ?
>Existuje v SQL nejaky dotaz typu If .. then .. else ?
>V dokumentaci i knihach nic vhodneho nenachazim. Asi blbe koukam, nejak to
prece
>musi jit. Jedine k tematu je nastavovani ruznych SET na serveru, odstavujicich
tuto
>hlasku, ale to se mi nezda.

Pokud te nezajimaji polozky s poctem nula, muzes udela

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
where pocet <> 0
order by Prumer


Jan Fiala


Nastroje pro Paradox tabulky (Was: reindexace para

[*] Ren� Otisk - 21.1.2000 06:26:53

Hi,
...a existuje i neco jako tutil16 pro 16bit aplikace s paradoxem?
Sroub


----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 11:12 PM
Subject: Re: Nastroje pro Paradox tabulky (Was: reindexace paradox tabulek)> From: <Petr.Motlicek(zv)bcbrno(tec)cz>
> > prosim upresni to, nemohu to najit...
>
> Ahoj,
>
> Jelikoz se tu seslo vice dotazu na ruzne nastroje pro Paradox tabulky, tak
> vsechny od Borlandu jsou tady:
>
> http://www.borland.com/devsupport/bde/utilities.html
>
> Najdete tam:
> - knihovny TUtility pro vsechny verze BDE (posledni pro 5.0)
> http://www.borland.com/devsupport/bde/files/tutil50.zip
> - nastroj pro opravy tabulek (Paradox Table Repair with Delphi source)
> http://www.borland.com/devsupport/bde/files/tutil32d.zip
> - nastroj pro zmenu nekterych parametru (Paradox table alter with Delphi
source)
> http://www.borland.com/devsupport/bde/files/pxrest.zip
> - nastroj na zjistovani informaci o tabulkach (Table Interrogator)
> http://www.borland.com/devsupport/bde/files/tableint.zip
> - odkaz na stranku s nejnovejsimi updaty BDE (BDE / SQL Links 5 update)
> http://www.borland.com/devsupport/bde/bdeupdate.html
>
> Petr Vones, amatersky programator
>

MS SQL 7.0 a zamykani recordu

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 21.1.2000 07:13:45

Dotaz, pot�ebuji take zamykat z�znamy. Bude mi principielne fungovat toto?

REPEAT
REPEAT
UNTIL record je odemcen
zamkni record {nastav field lock = userid}
aktualizuj tabulku
UNTIL record je zamceny mym zamkem

editace
post
odemceni

btw. jak zamknu zaznam pomoci sql? jde to?

UpCase

[*] Riedel Petr <Petr.Riedel(zv)ipbpojistovna(tec)cz> - 21.1.2000 07:17:22

Dobry den,
funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod? Mam
D4Prof., Win95.
Petr Riedel


UpCase

[*] Brabec Tom� <brabec(zv)nym.pvt(tec)cz> - 21.1.2000 07:44:52

V D3 je to fce AnsiUpperCase. S pozdravem Tom

Tom� Brabec
PVT Nymburk, a.s.
e_mail: Tomas.Brabec(zv)pvt(tec)cz
brabec(zv)nym.pvt(tec)cz
tel: 0325/519639


-----P�vodn� zpr�va-----
Od: Riedel Petr [mailto:Petr.Riedel(zv)ipbpojistovna(tec)cz]
Odesl�no: 21. ledna 2000 7:17
Komu: Delphi (el. adresa)
P�edm�t: UpCase


Dobry den,
funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod? Mam
D4Prof., Win95.
Petr Riedel


UpCase

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 21.1.2000 07:49:49

Ahoj,
zkus pouzit fci AnsiUpperCase;

Dobra.

> ----------
> Od: Riedel Petr[SMTP:Petr.Riedel(zv)ipbpojistovna(tec)cz]
>
> funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
> diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod?

UpCase

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.1.2000 07:52:10

Zkus AnsiUpperCase()

Jan Fiala


----- Original Message -----
From: Riedel Petr <Petr.Riedel(zv)ipbpojistovna(tec)cz>> Dobry den,
> funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
> diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod? Mam
> D4Prof., Win95.
> Petr Riedel
>
>

SQL a Divide By Zero

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 21.1.2000 08:12:03

> -----P�vodn� zpr�va-----
> Od: Jan Fiala [mailto:jan.fiala(zv)iol(tec)cz]
> Odesl�no: 21. ledna 2000 5:56
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: SQL a Divide By Zero
>
>
> Pokud te nezajimaji polozky s poctem nula, muzes udela
>
> select Kc,Pocet,(Kc/Pocet) As Prumer
> from Table
> where pocet <> 0
> order by Prumer
>

A pokud chces mit stejny vysledek jako v puvodnim selectu,
dopln i ty polozky s nulou:


select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
where pocet <> 0
order by Prumer

union

select Kc,Pocet,NULL As Prumer
from Table
where pocet = 0
order by Prumer



Jura


UpCase

[*] Ing. Milan VALENTA <valenta(zv)telecom(tec)cz> - 21.1.2000 08:34:44

A co takhle AnsiUpperCase(const S: string): string;


AnsiUpperCase converts a string to upper case.


Unit
SysUtils

Category
string handling routines

function AnsiUpperCase(const S: string): string;
Description

AnsiUpperCase converts all characters in the given string to upper case. The
conversion uses the current Windows locale.

Note
This function supports multi-byte character sets (MBCS).


S pozdravem

Ing. Milan VALENTA

Horn� Slavkov
tel.: +420 168 329241
e-mail: valenta(zv)telecom(tec)cz
**************************************************************


-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Riedel Petr
Odesl�no: 21. ledna 2000 7:17
Komu: Delphi (el. adresa)
P�edm�t: UpCase


Dobry den,
funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod? Mam
D4Prof., Win95.
Petr Riedel


Outlook - global address book

[*] OLEJNIK Andrej <olej(zv)nt2.asset.sk> - 21.1.2000 08:44:29

D 3.02 C/S, RX Lib, RA Lib, ...
WIN NT 4, SP 5

Nevie niekto nahodou ako sa da vytiahnut zoznam adries z Global adress booku
Outlooku a dalsich adress bookov?

Niekde na Inete som nasiel priklad pre Visual Basic
ale ked to prepisem do Delphi, tak mi to vyhodi, ze Address list not
supportes

tu je priklad pre Visual Basic> Dim appOutlook As Outlook.Application

Set appOutlook = CreateObject("Outlook.Application")

Dim objNames As Outlook.AddressList

' Get the global address list

Set objNames =
appOutlook.GetNamespace("MAPI").AddressLists.Item("Global Address
List")

Dim Index As Long

For Index = 1 To objNames.AddressEntries.Count

msgbox objNames.AddressEntries.Item(Index).Name
'output names to msagboxes

Next Index

Set objNames = Nothing

Set appOutlook = Nothing


dakujem

olej


olej> http://members.xoom.com/aolej
PRIVATE: olej(zv)atlas(tec)cz

SQL a parametry

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 21.1.2000 08:45:01

Ahoj,

jmeno tabulky a ni sloupce jako parametr SQL dotazu takto pouzit u MS SQL6.5 nelze.
Jedina sance je (jak ukazal na prikladu Vladislav Skalicka) pouzit EXEC.

S pozdravem, Ladislav Nagy

Nazdar Deplhisti,
prosim o radu nebi odpoved:
Lze jako parametru StoredProc pouzit jmeno tabulky nebo sloupce?
napr:
CREATE PROCEDURE FINDKLIENT
(zv)Tabulka varchar(20)='',
(zv)Sloupec varchar(20)='',
(zv)Promena varchar(40)=''
AS
SELECT Nazev
FROM (zv)Tabulka
WHERE (zv)Sloupec LIKE (zv)Promena+'%'
GO


havarovany disk

[*] DS-SOFT David Sauer <ds.soft(zv)atlas(tec)cz> - 21.1.2000 08:53:47

Zkusil bych reklamaci. (je-li to mozne)
Je-li to Western Digital tak na jejich WWW je utilitka na test a opravu.
Vetsinou pomuze. Kdyz ne tak napise ze je to neopravitelne a vytisk teto
hlasky pro reklamaci solidni dodavatel respektuje.
(Je-li to jiny vyrobce kouknul bych se na jejich WWW nemaji-li neco
podobneho)
David Sauer

----- Original Message -----
From: David Maly <david(zv)archa.com>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 5:32 PM
Subject: OT: havarovany disk


> Ahoj,
>
> omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
> Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
> leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
> provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
> BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)
>
> Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
> format?
>
> Diky za kazdou radu, chtel bych se vyhnout nastrojum typu "magnet",
> "kladivo" apod. :)
>
> s pozdravem,
> David mailto:david(zv)archa.com
>
>

Pristup k MS Word 97

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 21.1.2000 09:10:03

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,
lze nejak z Delphi otevrit zaheslovany dokument
MS Word-u ? Jde mi o to, aby doument byl zaheslovany,
aby se k nemu uzivatel nedostal a aby jej mohl
otevrit jedine prostrednictvym programu k tomu
urcenemu.

<OT>
S tim souvisi i muj druhy dotaz. Nevite
jak se da toto heslo prolomit ? Vzhledem
k tomu, MS si nedela hlavu s takovou veci,
jakou hash-ovani predpokladam, ze bude dat
nejakym zpusobem zjistit. Nevite prosim jak ?
</OT>

Dobra.

Font u Memo

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 21.1.2000 09:25:04

TFont je trida objektu, proto to nejde ulozit.
Podle me by to melo jit asi takto
TrFont=record
fName : string;
fColor : TColor;
fSize : word;
fStyle : word;
//atd atd...
end;

var rFont : TrFont;
a v Button1.Click potom
rFont.fName:=Memo1.Font.Name
//atd atd...

Dobra.

> ----------
> Od: Ale> � Kresta[SMTP:ales.kresta(zv)atlas(tec)cz]
>
> Nevim jak ulozit a znovu nacist font u Memo ze souboru.
> Zkousel jsem to takhle, ale po stisknuti tlacitka Button1
> se nestalo nic.
>
> var soubor:file of Tfont;
> zaznam:Tfont;
> �>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> assignfile(soubor,'c:\pokus.txt');
> reset(soubor);
> read(soubor,zaznam);
> Memo1.font:=zaznam;
> closefile(soubor);
> end;
> �>
> procedure TForm1.Button2Click(Sender: TObject);
> begin
> assignfile(soubor,'c:\pokus.als');
> rewrite(soubor);
> write(soubor,Memo1.font);
> closefile(soubor);
> end;
>

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 21.1.2000 09:32:08

Tenhle DBGrid je napsan od TCustomControl a tudiz je tam zahrnuto
spousta novych funkci, o kterych se standardnim DBGridum (nebo jejich
potomkum)
muze jen zdat.


Pavel



----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>

> Zkus se podivat na demo aplikaci s komponentu ExpressQuantumGrid (neni ale
> zadarmo). Nevim ted presne jestli umi zrovna tohle, ale je tam plno veci,
> takze by to tam snad byt mohlo.
>
> http://www.devexpress.com/downloads/EQGrid.zip
>
> Petr Vones, amatersky programator
>

MS SQL 7.0 a zamykani recordu

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 21.1.2000 09:32:55

> Dotaz, pot�ebuji take zamykat z�znamy. Bude mi principielne fungovat toto?
>
> REPEAT
> REPEAT
> UNTIL record je odemcen
> zamkni record {nastav field lock = userid}
> aktualizuj tabulku
> UNTIL record je zamceny mym zamkem
>
> editace
> post
> odemceni

> btw. jak zamknu zaznam pomoci sql? jde to?

Mno to je prave ta otazka, primarne to jde tak, ze nastavis transakci a
provedes UPDATE.
Jestli funguje i neco jineho, vi buh. Podivej se do Books OnLine k SQL
Serveru 7.
Mrkni se na heslo "Locking", "Hints" a podobne. Jestli neco vypatras, tak se
pochlub,
hrozne rad bych to take vedel ...=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999


SQL a Divide By Zero

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 21.1.2000 09:58:52

Mozna by bylo lepsi:

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table WHERE Pocet <> 0
UNION
select Kc,Pocet,0 As Prumer
from Table WHERE Pocet = 0
order by Prumer

Petr

-----Original Message-----
From: Hynek Svatos [mailto:svatos(zv)kam(tec)czu(tec)cz]
Sent: Thursday, January 20, 2000 10:45 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: SQL a Divide By Zero


Zkus:

select Kc,Pocet, Prumer=CASE WHEN ISNULL(Pocet, 0)=0 THEN NULL ELSE
(Kc/Pocet) END
from Table
order by Prumer

tim je zajisteno, ze kdyz je Pocet NULL nebo 0, pak se vypocet preskoci a
placne se tam hodnota NULL.

=========================
Hynek Svatos
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
viragi(zv)eurotel.sk
Sent: Thursday, January 20, 2000 6:36 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: SQL a Divide By Zero


V Oracle na to existuje funkce DECODE. Ta je obecna. Na kontrolu NULL
hodnoty je k dispozici funkce NVL.. Verim, ze v SQL7 existuje neco
podobneho.

Ivan Virag

puvodni zprava:

select Kc,Pocet,(Kc/Pocet) As Prumer
from Table
order by Prumer

Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.

OT: havarovany disk

[*] Michal �viga <info(zv)cd-amper(tec)cz> - 21.1.2000 10:45:04

> fungovat _musi_, pokud ovsem nebudou chyby na disku. Od tech ti ale
> nepomuze ani lowlevel format.

Pokud jsou chyby na disky v prvnim zavadecim sektoru, muzou pomoct programy
pro vytvareni partision od konce disku, kde treba chyby nejsou. Docela
slusny je PQMagic.

S pozdravem

Michal �viga (Sviga)
=============================[PROTON]====
CROSS MEDIA SERVIS - CD KATALOG AMPER
http://www.cd-amper(tec)cz mailto:info(zv)cd-amper(tec)cz
tel.,fax: +420 2 65 15 052 mobil: 0602/ 207 557
DAMA.CZ - Internetovy casopis pro vsechny zeny
http://www.dama(tec)cz mailto:reklama(zv)dama(tec)cz
======ICQ: 57557677 =======================

----- Original Message -----
From: V�clav Muchna <apscomp(zv)seznam(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 20, 2000 9:01 PM
Subject: Re: OT: havarovany disk


> David Maly wrote:
>
> > omlouvam se za OT, ale nevim si rady. Nejak se mi po... harddisk,
> > Norton DiskDoctor mi oznamil, ze s tim nic nesvede a ze mi pomuze
> > leda low-level format. To je ale ten hacek, jelikoz nevim, jak to
> > provest. Videl jsem 486-ky, ktery mely lowlevel format primo v
> > BIOSu, ale to ja nemam. (FDISK hlasi chybu, tim si nepomuzu.)
> >
> > Nevite nekdo, jestli treba neexistuje nejaka uttilita na lowlevel
> > format?
>
> Lowlevel formatovat disky se uz neprovadi nekolik let, a dost
> se to nedoporucovalo ani na 286.
> Ovsem pomoc je jednoducha. Pokud nechces data zadnym zpusobem zachranit,
> tak nabootoj ze systemove diskety (necekane) a pust si norton diskeditora
> (ted to nectete: muzu ti ho dyztak poslat) a zobraz si disk jako
> fyzicky (to je dulezite, pri pokusu o log. zobr. dojde k chybe). No a ruco
smaz
> prvnich par sektoru. Podle me by mohlo stacit smazat 0. (resp. 1.) sector,
> na tom je ulozena partition table (v pohledech si muzes nechat dany
> sektor zobrazit jako "partition table", "master boot record", "fat",
"binary").
> Pak by mel uz fdisk fungovat. Pokud stejne nezafunguje, tak mu smaz
nekolik
> vic sektoru ze zacatku disku (mj. j MBR - master boot record) a pak to
> fungovat _musi_, pokud ovsem nebudou chyby na disku. Od tech ti ale
> nepomuze ani lowlevel format.
>
> Hodne stesti preje
>
> Vasek Muchna
> --
> Vaclav Muchna
> verejny pgp klic: http://www.apscomputer(tec)cz/vasek/pubring.html
>

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 21.1.2000 10:57:00

Zdravim.
Taky mne to zajima, proto jsem si stahnul EQGrid.ZIP. DEMO je doopravdy
skvele, ale ta cena 299$ je odstrasujici. Ma nekdo s timto softem zkusenosti
nez vydam tolik penez za ostrou verzi.
Pavel


> From: Pavel Bl�hovec <blahovec(zv)stapro(tec)cz>
> > Poradi mi nekdo, jak bych mohl do zahlavi TDBGridu pridelat tlacitko,
aby
> > potom fungoval jako automaticky filtr v Excelu?
>
> Ahoj,
>
> Zkus se podivat na demo aplikaci s komponentu ExpressQuantumGrid (neni ale
> zadarmo). Nevim ted presne jestli umi zrovna tohle, ale je tam plno veci,
> takze by to tam snad byt mohlo.
>
> http://www.devexpress.com/downloads/EQGrid.zip
>
> Petr Vones, amatersky programator
>
>

zjisteni uzivatelskeho jmena v NOVELLu 4.11

[*] Zdenek Marsik <admin(zv)jakub.hiedu(tec)cz> - 21.1.2000 11:10:21

Zdravim,

nevite nekdo jak zjistit jmeno prihlaseneho uzivatele k siti NOVELL 4.11?
Funkce getcomputername zjisti uzivate WINDOWS95.

function GetComputerName : String;
var
pcComputer : PChar;
dwCSize : DWORD;
begin
dwCSize := MAX_COMPUTERNAME_LENGTH + 1;
GetMem( pcComputer, dwCSize ); // allocate memory for the string
try
if Windows.GetComputerName( pcComputer, dwCSize ) then
Result := pcComputer;
finally
FreeMem( pcComputer ); // now free the memory allocated for the string
end;
end;

Zdenek

UpCase

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 21.1.2000 11:32:29

On 21 Jan 00, at 7:17, Riedel Petr wrote:

> funkce UpCase() mi nechce prevest na velke znaky, znaky s ceskou
> diakritikou. Nevite co s tim nebo jak jinak udelat tento prevod?

AnsiUpperCase.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


MS SQL 7.0 a zamykani recordu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 21.1.2000 11:32:29

On 20 Jan 00, at 22:35, Hynek Svato� wrote:

> >> No a co ti brani nastavit nejaky priznak v tom radku kdyz se leze
> >> do toho dialogu ? V momente aktivace dialogu se nastavi treba
> >> polozka [Editing] na 1 a je to. Dalsi clovek uz si to neotevre. Je
>
> > Zde dojde k problemu v pripade, ze tomu kdo edituje spadne
> > uprostred spojeni, a v poli zustane viset "zamek". Zde by musel
>
> Samozrejme vim, ze je to reseni "pres ruku" anobrz takova "vopicka".
> To odstraneni nezadoucich zamku by slo zaridit napr. periodicky se
> spoustejici (na strane SQL serveru) davkou, ovsem pripoustim, ze to
> jiz neni nic pekneho ... Sam preferuji reseni, ktere tu jiz padlo -
> predlozil ho Petr Jezek - casova znamka. Mimochodem: tu casovou znamku
> lze elegantne zajistit pomoci sloupce typu timestamp, ten se
> aktualizuje vzdy pri operaci INSERT nebo UPDATE. Ovsem na to, co si
> vymyslel ten zakaznik asi nezbude nic jineho, nez pouzit neco
> tezkopadnejsho.

Vzhledem k moznym problemum, ke kterym muze realne dojit,
bych volil spise tyto zpusoby:
1. Pokud to neni technologicka zalezitost, pokusil bych se tento
pozadavek zakaznikovi vymluvit, a popsal bych problemy v co
nejcernejsich barvach.
2. Pokud je to technologicka zalezitost, snazil bych se zajistit,
pokud by to slo, aby v tabulce mohl editovat pouze jeden clovek.
3. Pokud by nesel ani jeden z predchozich bodu, zkusil bych
postavit celou vec tak, aby k databazi mohl pristupovat jen muj
program, a "zamykani" vet bych resil pres serverovou cast, ktera
by hlidala seznam "zamcenych" zaznamu a klienti by se vzdy
dotazali, zda mohou editovat.

> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
>
V odchozi zprave nebyl nalezen zadny virus, protoze nebyl ani
hledan.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Outlook - global address book

[*] "Be�varov, Boris" <boro(zv)gratex.sk> - 21.1.2000 11:37:52

Ahoj !

mne toto funguje :

-------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
var
oApp : OleVariant;
oAddList : OleVariant;
count, i : Longint;
begin
oApp:=CreateoleObject('Outlook.Application');
oAddList:=oApp.GetNamespace('MAPI').AddressLists.Item('Global Address
List');

count:=oAddList.AddressEntries.Count;
for i:= 1 to count do
begin
ShowMessage(oAddList.AddressEntries.Item(i).Name);
end;

oAddList:=Unassigned;
oApp:=Unassigned;
end;
----------------------------------------------------

S pozdravom

Ing. Boris Becvarov
Gratex International
mailto:boro(zv)gratex.sk



-----Original Message-----
From: OLEJNIK Andrej [mailto:olej(zv)nt2.asset.sk]
Sent: Friday, January 21, 2000 8:44 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Outlook - global address book


D 3.02 C/S, RX Lib, RA Lib, ...
WIN NT 4, SP 5

Nevie niekto nahodou ako sa da vytiahnut zoznam adries z Global adress booku
Outlooku a dalsich adress bookov?

Niekde na Inete som nasiel priklad pre Visual Basic
ale ked to prepisem do Delphi, tak mi to vyhodi, ze Address list not
supportes

tu je priklad pre Visual Basic> Dim appOutlook As Outlook.Application

Set appOutlook = CreateObject("Outlook.Application")

Dim objNames As Outlook.AddressList

' Get the global address list

Set objNames =
appOutlook.GetNamespace("MAPI").AddressLists.Item("Global Address
List")

Dim Index As Long

For Index = 1 To objNames.AddressEntries.Count

msgbox objNames.AddressEntries.Item(Index).Name
'output names to msagboxes

Next Index

Set objNames = Nothing

Set appOutlook = Nothing


dakujem

olej


olej> http://members.xoom.com/aolej
PRIVATE: olej(zv)atlas(tec)cz


zjisteni uzivatelskeho jmena v NOVELLu 4.11

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.1.2000 11:49:54

Funkce GetComputerName zjistuje jmeno pocitace, ne jmeno uzivatele. Pouzij
funkci GetUserName

Jan Fiala

----- Original Message -----
From: Zdenek Marsik <admin(zv)jakub.hiedu(tec)cz>> Zdravim,
>
> nevite nekdo jak zjistit jmeno prihlaseneho uzivatele k siti NOVELL 4.11?
> Funkce getcomputername zjisti uzivate WINDOWS95.
>
> function GetComputerName : String;
> var
> pcComputer : PChar;
> dwCSize : DWORD;
> begin
> dwCSize := MAX_COMPUTERNAME_LENGTH + 1;
> GetMem( pcComputer, dwCSize ); // allocate memory for the string
> try
> if Windows.GetComputerName( pcComputer, dwCSize ) then
> Result := pcComputer;
> finally
> FreeMem( pcComputer ); // now free the memory allocated for the string
> end;
> end;
>
> Zdenek
>
>
>

emulator modemu...

[*] Ivan Turcan <iturcan(zv)gamo.sk> - 21.1.2000 11:55:41



Hi lidi,

nevie nahodou niekto ci existuje nieco ako emulator modemu. Vyvyjam totizto
aplikaciu ktora vyuziva
modemove spojenie (TAPI) a v pripade ze som doma toho moc na svojom notebooku
nenatestujem.
Moja predstava je asi taka ze nejaky emulator mi vytvori dve modemove zariadenia
ktore budu moct medzi
sebou normalne komunikovat. Viem ze takyto emulator nebude moct pravdepodobne
simulovat spolahlivost liniek a podobne chyby ktore casto pri modemoch vznikaju
ale ide mi tu vyhradne o moznost testovat aplikaciu mobilne bez pripojenia na
akukolvek telefonnu siet.

Ivan Turcan

zjisteni uzivatelskeho jmena v NOVELLu 4.11

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 21.1.2000 12:04:12

> nevite nekdo jak zjistit jmeno prihlaseneho uzivatele k siti NOVELL 4.11?
> Funkce getcomputername zjisti uzivate WINDOWS95.
> Zdenek

Zkus NDK na http:\\developer.novell.com, jsou tam i knihovny pro Delphi,
priklady.... Problem muze byt v tom, ze tech jmen muze byt nekolik pokud
jsi prihlaseny do nekolika stromu a bude to fungovat jen pod Novellskym
klientem.

Ales


--

Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093


Outlook - global address book

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 21.1.2000 12:11:58

> Ahoj !
>
> mne toto funguje :

Hej, kdyz takhle krasne pracujete s adresarem, umite pracovat s
distribucnimi seznamy? Nevrtal jsem se v tom, jenom
po par dotazech na zasvecenejsi outlookare jsem nabyl
dojmu, ze to nejde nebo to neni dokumentovane.
Potreboval bych generovat obsah distribucniho seznamu.
Jestli to nekdo umi, budu mu velmi vdecny, kdyz o tom
napise.

Diky

Jura


SQL a Divide By Zero

[*] Hynek Svatos <svatos(zv)kam(tec)czu(tec)cz> - 21.1.2000 12:40:40

Myslim si ze ne. Domnivam se, ze UNION je nakladnejsi nez jednoduch select s
vyrazem CASE.
Uznavam, ze jsem tam napsal blbost:
WHEN ISNULL(Pocet, 0)=0 THEN NULL ELSE ...
lepsi je do vysledku dat misto NULL nulu, pak bude OK i trideni.

select Kc,Pocet, Prumer=CASE WHEN ISNULL(Pocet, 0)=0 THEN 0 ELSE
(Kc/Pocet) END
from Table
order by Prumer

=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Jezek Petr, Ing.
> Sent: Friday, January 21, 2000 9:59 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: SQL a Divide By Zero
>
>
> Mozna by bylo lepsi:
>
> select Kc,Pocet,(Kc/Pocet) As Prumer
> from Table WHERE Pocet <> 0
> UNION
> select Kc,Pocet,0 As Prumer
> from Table WHERE Pocet = 0
> order by Prumer
>
> Petr
>
> -----Original Message-----
> From: Hynek Svatos [mailto:svatos(zv)kam(tec)czu(tec)cz]
> Sent: Thursday, January 20, 2000 10:45 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: SQL a Divide By Zero
>
>
> Zkus:
>
> select Kc,Pocet, Prumer=CASE WHEN ISNULL(Pocet, 0)=0 THEN NULL ELSE
> (Kc/Pocet) END
> from Table
> order by Prumer
>
> tim je zajisteno, ze kdyz je Pocet NULL nebo 0, pak se vypocet preskoci a
> placne se tam hodnota NULL.
>
> =========================
> Hynek Svatos
> svatos(zv)kam(tec)czu(tec)cz
> hynek.svatos(zv)atlas(tec)cz
> =========================
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> viragi(zv)eurotel.sk
> Sent: Thursday, January 20, 2000 6:36 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: SQL a Divide By Zero
>
>
> V Oracle na to existuje funkce DECODE. Ta je obecna. Na kontrolu NULL
> hodnoty je k dispozici funkce NVL.. Verim, ze v SQL7 existuje neco
> podobneho.
>
> Ivan Virag
>
> puvodni zprava:
>
> select Kc,Pocet,(Kc/Pocet) As Prumer
> from Table
> order by Prumer
>
> Pokud je Pocet=0 SQL pochopitelne za behu padne na Divide by Zero.
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999


Outlook - global address book

[*] Grubhoffer(zv)software602(tec)cz - 21.1.2000 13:12:50

> Hej, kdyz takhle krasne pracujete s adresarem, umite pracovat s
> distribucnimi seznamy? Nevrtal jsem se v tom, jenom
> po par dotazech na zasvecenejsi outlookare jsem nabyl
> dojmu, ze to nejde nebo to neni dokumentovane.
> Potreboval bych generovat obsah distribucniho seznamu.
> Jestli to nekdo umi, budu mu velmi vdecny, kdyz o tom
> napise.

Zda to jde pomoci CDO netusim. Ale pomoci Extended MAPI to samozrejme jde a jak na to je popsano zde http://msdn.microsoft.com/library/psdk/mapi/consider 7v04.htm.
Predem upozornuji, ze to neni uplne trivialni.

J.G.
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.115 / Virov� b�ze: 54 - datum vyd�n�: 23.12.1999


emulator modemu...

[*] Nikodem <nikodem(zv)kh-kinetic(tec)cz> - 21.1.2000 13:15:51



Ahoj,

zadny emulator sice neznam, protoze kdyz potrebuji programovat modemove
spojeni pouzivam dva pocitace a modemy. Ale zminujes se tu o TAPI, uz delsi
dobu shanim nejake blizsi informace o TAPI, nemel bys neco k dispozici.
S
pozdravem
Jindrich
Nikodem

Delphi 4 Std. Win98

nikodem(zv)kh-kinetic(tec)cz


Outlook - global address book

[*] OLEJNIK Andrej <olej(zv)nt2.asset.sk> - 21.1.2000 13:21:56

Uz som na to prisiel

Outlook 97 nepodporuje AddressLists

olej

> -----Original Message-----
> From: "Be�varov, Boris"
> Sent: 21. janu�r 2000 11:38
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: Outlook - global address book
>
> Ahoj !
>
> mne toto funguje :
>
> -------------------------------------------------
> procedure TForm1.Button1Click(Sender: TObject);
> var
> oApp : OleVariant;
> oAddList : OleVariant;
> count, i : Longint;
> begin
> oApp:=CreateoleObject('Outlook.Application');
> oAddList:=oApp.GetNamespace('MAPI').AddressLists.Item('Global Address
> List');
>
> count:=oAddList.AddressEntries.Count;
> for i:= 1 to count do
> begin
> ShowMessage(oAddList.AddressEntries.Item(i).Name);
> end;
>
> oAddList:=Unassigned;
> oApp:=Unassigned;
> end;
> ----------------------------------------------------
>
> S pozdravom
>
> Ing. Boris Becvarov
> Gratex International
> mailto:boro(zv)gratex.sk
>
>
>
> -----Original Message-----
> From: OLEJNIK Andrej [mailto:olej(zv)nt2.asset.sk]
> Sent: Friday, January 21, 2000 8:44 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Outlook - global address book
>
>
> D 3.02 C/S, RX Lib, RA Lib, ...
> WIN NT 4, SP 5
>
> Nevie niekto nahodou ako sa da vytiahnut zoznam adries z Global adress
> booku
> Outlooku a dalsich adress bookov?
>
> Niekde na Inete som nasiel priklad pre Visual Basic
> ale ked to prepisem do Delphi, tak mi to vyhodi, ze Address list not
> supportes
>
> tu je priklad pre Visual Basic>
>
>
> Dim appOutlook As Outlook.Application
>
> Set appOutlook = CreateObject("Outlook.Application")
>
> Dim objNames As Outlook.AddressList
>
> ' Get the global address list
>
> Set objNames =
> appOutlook.GetNamespace("MAPI").AddressLists.Item("Global Address
> List")
>
> Dim Index As Long
>
> For Index = 1 To objNames.AddressEntries.Count
>
> msgbox objNames.AddressEntries.Item(Index).Name
> 'output names to msagboxes
>
> Next Index
>
> Set objNames = Nothing
>
> Set appOutlook = Nothing
>
>
> dakujem
>
> olej
>
>
> olej> http://members.xoom.com/aolej
> PRIVATE: olej(zv)atlas(tec)cz


Komprimovane archivy

[*] Ondrej Jaura <jaura(zv)datalock.sk> - 21.1.2000 14:14:53

Zdravim :)

Zhanam komponenty na pracu s komprimovanym archivom (a'la ZIP, RAR, a
pod.).
Mala by vytvarat a rozpakovat archiv (to mi staci). Preferoval by som
ZIP archivy a free.

Co pouzivate, s cim ste spokojni?

Za zachranne kolesa dakujem

Ondrej Jaura

------
Ondrej Jaura
Datalock a.s.
jaura(zv)datalock.sk
------ :)

emulator modemu...

[*] Ivan Turcan <iturcan(zv)gamo.sk> - 21.1.2000 14:26:29

>zadny emulator sice neznam, protoze kdyz potrebuji programovat modemove
>spojeni pouzivam dva pocitace a modemy.

To hej, ja podla potreby bud pouzivam dva PC a dva modemy alebo jedno PC na
ktorom mam
nainstalovane dva modemy a tie medzi sebou komunikuju

>Ale zminujes se tu o TAPI, uz delsi
>dobu shanim nejake blizsi informace o TAPI, nemel bys neco k dispozici.

informacie o TAPI sa daju najst napr. v casopise Delphi Informant(seria clankov
bola od cisla 7/1998) ale aj na www.delphi-jedi.org, dalej tiez na MSDN od
Microsoftu.

Ja pouzivam na TAPI pristup vlastny balik komponent. DTAPI

Su to dve komponenty s ktorych jedna je riesena like TMenu tj.
komponenta TDTAPIManager ktora zapuzdruje zakladnu funkcnost TAPI a v nej sa
vytvaraju
tzv. TAPI eventy (TDTapiEvent) pre kazde zariadenie. jednoduchsou variantou je
komponenta
TDTapi ktora zahrna vlastnosti oboch predchadzajucich tried (TDTapiManager aj
TDTapiEvent)
vramci jednej komponenty


S pozdravom

Ivan Turcan

p.s. napadla ma este moznost. Ja mam NT a tu je moznost nainstalovat si Dial-UP
Networking
Serial Cable between 2 PCs. Lenze moj Notebook ma len jeden seriovy
konektor takze nemozem
pouzit komunikaciu z COM1 na COM2 cez kabel pomocou TAPI.

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 21.1.2000 14:28:45

> > Taky mne to zajima, proto jsem si stahnul EQGrid.ZIP. DEMO je doopravdy
> > skvele, ale ta cena 299$ je odstrasujici. Ma nekdo s timto softem
> zkusenosti
> > nez vydam tolik penez za ostrou verzi.
> > Pavel

Kde se da demo stahnout?

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

prohlizec JPG, GIF, BMP pro Win 3.11

[*] Soudny, Jiri <Jiri.Soudny(zv)oriflame(tec)cz> - 21.1.2000 14:37:55

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.

Shanim nejaky prohlizec JPG, GIF, BMP pro Win 3.11 .

Poradte mi nekdo. Diky

Jiri Soudny

kresleni tydenniho rozvrhu

[*] Soudny, Jiri <Jiri.Soudny(zv)oriflame(tec)cz> - 21.1.2000 14:42:20

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.

Vite nekdo o nejakym sikovnym software na kresleni tydenniho rozvrhu?
Mam predstavu, ze bych zadal
Po 8 - 8:45 Pocty
St 16-17:25 Plavani
...

a ten software by to nejak prehledne vytisknul jako rozvrh.

Diky za namety

Jir Soudny

Volume

[*] Jaroslav Mazanek <maza(zv)volny(tec)cz> - 21.1.2000 14:51:34

Delphi 5:
Pot�ebuji pro sv�j program ovl�d�n� hlasitosti.(System, Wave...) Pora�te
pros�m jak to m�m vy�e�it. Diky za ka�dou pomoc.


----------------------------------------------------------------
Jaroslav Maz�nek
student VO� Liberec - po��ta�ov� syst�my
Email:maza(zv)volny(tec)cz
-----------------------------------------------------------------

kresleni tydenniho rozvrhu

[*] Tomas Kyjak <xkyjt01(zv)vse(tec)cz> - 21.1.2000 15:52:28


Tohle mi prijde, jako kdyz nekdo vychytrale napise do programatorsky
koneference a predstavuje si, ze mu to nekdo napise. Zabralo by to hodinu
nanejvejs, kdyz by si clovek hral s designem...
Tomas


> Vite nekdo o nejakym sikovnym software na kresleni tydenniho rozvrhu?
> Mam predstavu, ze bych zadal
> Po 8 - 8:45 Pocty
> St 16-17:25 Plavani
> ...
>
> a ten software by to nejak prehledne vytisknul jako rozvrh.
>
> Diky za namety
>
> Jir Soudny
>

prohlizec JPG, GIF, BMP pro Win 3.11

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 21.1.2000 16:08:58

Mam shareware PaintShop 2.01. Chces-li, ozvi se, poslu zitra. Ma to cca
400 kB.

**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi
**************************************************
> -----P�vodn� zpr�va-----
> Od: Soudny, Jiri [SMTP:Jiri.Soudny(zv)oriflame(tec)cz]
> Odesl�no: 21. ledna 2000 14:38
> Komu: DELPHI, konference
> P�edm�t: prohlizec JPG, GIF, BMP pro Win 3.11
>
> Shanim nejaky prohlizec JPG, GIF, BMP pro Win 3.11 .
>
> Poradte mi nekdo. Diky
>
> Jiri Soudny
>

Rychle nacitani bmp

[*] Mojmir Nemecek <xmojmr(zv)volny(tec)cz> - 21.1.2000 16:32:29

> Od: Straka Josef[SMTP:kshb(zv)seznam(tec)cz]
> ..Mam bitmapu, jejiz velikost je 10 MB a vice. Jeji otevreni v komponente
> Image.Picture.LoadFromFile() ...asi 7 vterin.
> Ta bmp je samozrejme vetsi nez formular, a tak s ni pohybuji pomoci ScrollBars.
> Neslo by ale nejak udelat, aby se bmp nacetla jen ta cast...

Format bmp souboru bez komprimace je dobre citelny. Jednotlive pixely jsou ulozeny ve forme matice. Pro 256 barevne bitmapy plati tohle:

THeader=packed record
magic:array [1..2] of char;
size:longint;
reserved1,reserved2:word;
offset:longint;
palSize:longint;
width:longint;
height:longint;
end;

TPalette=array [0..255] of record b,g,r,dummy:byte end;

Seek 0
Read THeader
Seek $36
Read TPalette
Seek THeader.offset
xSirka = THeader.sirka zaokrouhlena nahoru na nasobky 4
for y=vyska downto 1
Read xSirka*byteIndexDoPalety
next


Font u Memo

[*] Mojmir Nemecek <xmojmr(zv)volny(tec)cz> - 21.1.2000 16:50:25

Z hlediska Windows API je font dost dobre popsan strukturou TLogFont

var log:TLogFont;
var f:TFont;

{ nahraje font do struktury }
GetObject(f.Handle,sizeof(log),(zv)log)

{ nahraje strukturu do fontu }
f.Handle:=CreateFontIndirect(log)

> TFont je trida objektu, proto to nejde ulozit.
> Podle me by to melo jit asi takto
> TrFont=record
> fName : string;
> fColor : TColor;
> fSize : word;
> fStyle : word;
> //atd atd...
>end;

DB cestina pri editaci

[*] Alinex <alinex(zv)alinex(tec)cz> - 21.1.2000 17:56:46

Zdravim,
a prosim o radu zkusene.
Delphi 2.0 C/S. Vytvorim pomoci "interbase windows ISQL" databazi s nekolika tabulkami. Pokud zadavam data v programu, tak vse funguje O.K.(v DBEDITech jsou hacky, carky) , ale pri zobrazovani mi velejzaji na mistech s diakritikou blbosti. Takze vse zadavam bez cestiny. Hledal jsem v dokumentavi, v archivu, ale mam v tom silny hokej (to same je kdyz napojim nejakou DB tabulku). Zkousel jsem menit v LANGDRIVER ale nejak to stejne nejde, zkousel jsem nastavit LANGDRIVER a potom vytvorit DATABAZI.GDB, ale vysledek je stejny a jeste jako premii to nezna starou DATABAZI.GDB. Prosim o pomoc.
ALI


Globalni odchyceni exceptionu

[*] Mojmir Nemecek <xmojmr(zv)volny(tec)cz> - 21.1.2000 19:03:13

Zajimavy dokument k tematu:
"Underneath Structured Exceptions & C++ Exceptions"

http://www.tietovayla.fi/BORLAND/techlib/cppexcp/cppexcp1.html

>> Myslenka to neni spatna, ale misto hookovani API funkce
>> RaiseException by mozna
>> stalo za zvazeni se napojit primo na systemove funkce v RTL.
>> Skoda ze neco takoveho
>> Delphi primo nenabizi.
> Mohol by si trocha rozvinut ako co si myslel tym pristupom k systemovym
> funkciam v RTL ?

Tuhnouci IIS a Active Server komponenta

[*] Petr Kro�a - 21.1.2000 22:14:51

Zdravim vsechny,
potreboval bych poradit s nasledujicim problemem:

Potrebuji vytvorit serverovou komponentu, ktera se bude volat z ASP skriptu
klasickym prom=Server.CreateObject.("nazev");

http://www.15seconds.com/Issue/981007.htm
Dle clanku na 15seconds, ktery tu byl kdysi ohledne teto problematiky
doporucen,
jsem celou komponentu bezproblemove vytvoril a odladil na W98 s Personal web
serverem.

Nemile prekvapeni me cekalo, kdyz jsem ji zaregistroval na NT serveru s IIS
3.0 a
spustil jsem testovaci ASP skript.

Komponenta na NTckach staci vzdycky odpovedet spravne sve vysledky, ale
pri dalsim volani jakehokoliv skriptu dostavam hlaseni

error 'ASP 0115'
Unexpected error

/test/gdslist.asp

A trappable error occurred in an external object. The script cannot continue
running.

Nasledne cele IIS zatuhne a do manualniho restartu v services uz nevyda ani
stranku.
Protoze jsem mel podezreni na chybu ve sve komponente, zkusil jsem pracovat
s
prikladem, ktery byl publikovan na 15seconds, ale ten se chova naprosto
stejne.

Mam Delphi 3. Nevite nekdo kde by mohl byt zakopany pes?

Diky
Petr Kroca


Velikost zkompilovaneho kodu

[*] Martin Kucera <mk(zv)paegas.vol(tec)cz> - 22.1.2000 01:54:56

Ahoj,
jeste je tu jedna moznost, tady pred casem zminovana, a to program AsPack.
www.entechtaiwan.com/aspack.htm


> From: Tomas Kyjak <xkyjt01(zv)vse(tec)cz>
> > docela me obtezuje, ze kompilator Delphi (3 nebo 4), generuje casto
zbytecne rozsahly
> > kod. Existuje nejaky zpusob, jak optimalizovat velikost kodu? Podle me
jsou napriklad
> > kompilovany cele pouzite unity, prestoze je z nich pouzita treba jenom
jedna funkce.

Nahrada SYSUTILS

[*] lustyl1.edu(zv)mail.cez(tec)cz - 22.1.2000 06:36:48



Pratele
potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
v nahrazeni knihovny pres ALIAS a rekompilaci upravene
SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?

Diky L.Lustyk z tovarny na elektricky proud

lustyl1.edu(zv)mail.cez(tec)cz

Win98+D3 C/S

TUTIL32.DLL

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 22.1.2000 08:28:07

Co myslis tim kompletni popis ? Myslim, ze jsou dostupne zdrojaky
na inprise, je to jedna z adres co psal Petr Vones pred par dny.


Pavel


----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>

> Kde zozeniem kompletny popis TUTIL32.DLL

TUTIL32.DLL

[*] Roman �ev��k������Ȥ�*%�̿ - 22.1.2000 09:13:49

http://www.borland.com/devsupport/bde/utilities.html


----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 21, 2000 1:59 AM
Subject: TUTIL32.DLL


> Kde zozeniem kompletny popis TUTIL32.DLL
>
>
> Dakujem.
>
> Best regards.
> --------------------
> Pouzivam D3Pro, BDE 5.01, Win98PanEuro, RX Lib, SineaVCL.
>
> Roland Turcan
> RoTurSoft
> Palarikova 10/20
> 934 01 Levice
> Slovakia
>
> tel: ++421-905-487 908
>
>

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 22.1.2000 12:19:20

Puvodni zprava, kterou napsal Pavel ZIDEK dne 21 Jan 00,:

> Taky mne to zajima, proto jsem si stahnul EQGrid.ZIP. DEMO je doopravdy
> skvele, ale ta cena 299$ je odstrasujici. Ma nekdo s timto softem zkusenosti
> nez vydam tolik penez za ostrou verzi.

Pavle, je fakt super!


S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 22.1.2000 12:20:57

Puvodni zprava, kterou napsal Jaroslav Nadhera dne 21 Jan 00,:

> Kde se da demo stahnout?

http://www.devexpress.com/


S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


Komprimovane archivy

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 22.1.2000 13:26:50

Ahoj,

zacal jsem pouzivat ZipMaster (freeware) a zda se, ze je " v
pohode". Pouziva Zipdll.DLL a Unzdll.DLL. CZ resource.
Vse, vcetne dema je se zdroji. Navic ziskas komponentu SortGrid.

http://www.geocities.com/SiliconValley/Orchard/8607/

Jarek Uher

From: "Ondrej Jaura" <jaura(zv)datalock.sk>
> Zhanam komponenty na pracu s komprimovanym archivom (a'la ZIP, RAR, a
> pod.).
> Mala by vytvarat a rozpakovat archiv (to mi staci). Preferoval by som
> ZIP archivy a free.
>
> Co pouzivate, s cim ste spokojni?
>
> Za zachranne kolesa dakujem
>
> Ondrej Jaura
>
> ------
> Ondrej Jaura
> Datalock a.s.
> jaura(zv)datalock.sk
> ------ :)
>
>
>

Skryti TaskBaru

[*] Va�ek N�vrat���zx"��뢖�z?� - 22.1.2000 21:27:51

Zdravicko :o)
tohle by mohlo byt ono - zkousel jsem ostatni navrhy, ktere prisli, ale kvuli komplikovanemu pouziti DirectX to nefunguje. Ta Tvoje API funkce by mohla byt spravne reseni, ale bohuzel nevim, jak ji pouzit... bude to zrejme tato konstanta:

SPI SETWORKAREA Sets the size of the work area. The work area is the portion of the screen not obscured by the taskbar. The pvParam parameter must point to the RECT structure that contains the coordinates of the work area.

Pracovni plocha se zrejme nastavuje do nejakeho RECT, ale ja vubec nemam paru, co to je a uz vubec, jak se to pouziva...Mohl by mi nekdo poradit, jak to spravne vlozit do moji aplikace??

Moc diky...
Vasek

P.S. Aplikace musi pracovat v plnem okne pri rozliseni 800x600

--Original Message--
vyhladaj si v helpe(momentalne ho nemam poruke)
win api prikaz SystemParametersInfo
nejaka jeho konstanta to robi...

Zdravim, Majo


Instalace komponenty

[*] lukas(zv)oknet(tec)cz (Vana Lukas) - 22.1.2000 21:54:44

Dobry den,

v Delphi 4 instaluji komponentu TEnhWaveIn (pracuje s mikrofonem, web je:
http://ascu.unian.it/~milani/delphi , kdyby mel nekdo zajem). Komponentu
jsem pouzival v Delphi 2, a ted jsem si stahl jeji verzi pro Delphi 4 a
nejde mi nainstalovat.

V instalacnim baliku jsou soubory DCR, DCU, BPL, DCP a DCU. Ja instaluji ten
DCU a Delphi mi pise, ze jeden nebo vice radku byl moc dlouhy a byl zkracen,
po OK skonci chybovou hlaskou, ze nemuze najit soubor typu PAS.

Je fakt, ze v Delphi neumim instalovat komponenty. Chyba je jiste na moji
strane, protoze zminena komponenta vadna pradvdepodobne neni.
Muze mi nekdo pomoct? Predem diky,

Lukas Vana.

Instalace BDE a MSAccess

[*] Pavel Bansky <pbansky(zv)volny(tec)cz> - 22.1.2000 22:28:15

ave

Jak je mozne buildnout aplikaci pro DAO3.6 kdyz bde DAO3.6 nepodporuje ?
Popripade jak lze nastavit aby BDE umelo to DAO pouzit, (automaticky z IS)

diky

Pavel

>No uz jsem prisel na to kde delam chybu. Na cilovem PC jsem instaloval DAO
>3.5
>ale aplikace byla buildena s komponenty pro DAO 3.6. Kdyz jsem pouzil
>komponenty pro
>prislusne DAO tak je to O.K.
>
>Mimochodem neni nekde k dispozici take IS script pro DAO 3.6

------------------------------------------------------
Pavel Bansky
pbansky(zv)volny(tec)cz


excel a delphi

[*] Bejvlov� Martina <M.Bejvlova(zv)cra(tec)cz> - 23.1.2000 05:56:57

Ahoj!
Mam D5S asi mesic a teprve se rozkoukavam, co s tim jde vsechno delat.
Stravila jsem desnou dobu procitanim helpu na CD, ale kdyz netusim co
hledat, je to tezky.
Snad mi tedy nekdo na muj (nejspis naivni) dotaz odpovi.
Potrebuji data ukladat do formatu xls a opet je nacitat zpatky, zaroven
tvorit nove sesity a listy. Zatim to delam tak, ze v Delphi vytvorim txt
soubor a spustim externe nejaky xls soubor, ktery obsahuje jenom kod ve VB.
Pomoci jeho vytvorim spravny vysledny xls soubor, z txt nactu data a ulozim
je do nej. Nebo opacne nactu data z jineho xls souboru a postupne je ukladam
do txt souboru. Na konec zavru samotny excel a pokracuji dal v dephi. Ze to
je metoda trochu neprakticka, to uznavam. Predpokladam, ze je v Delphi mozne
nejak primo vytvaret xls soubory a nepouzivat VB. Jestli ano, mohl by mi
nekdo poradit, kde o tom zjistim neco vic? Pripadne pokud to nejde (a nebo
to jde moc komplikovane - napr. s desne drahou komponentou), potrebovala
bych poradit, jak mezitim, co bezi Excel, pozastavit Dephi. (Potrebuji
pracovat z txt souborem, ktery v Excelu vznikne) jinak nez nutit uzivatele
mackat tlacitko nebo showmessage.

Soubor s kodem ve VB spoustim takto:

path := cesta+'EXCEL.EXE program3.xls';
visibility:=SW_SHOWNORMAL;
pcharpath:=pchar(path);
winexec(pcharpath,1);

Dekuji a omlouvam se obsirny dotaz.
Martina Bejvlova

Problem s pouzitim PackTable z RxLib 2.75

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 23.1.2000 10:47:26

Ahojte.

Takto vypada moja procedure na vyhladanie vsetkych suborov v adresari a ich
pakovanie, ale za kazdym ked chcem ju pouzit tak mi vyvola exception "System
has been illegaly re-entered" preco ?

-------------------------------------------------
procedure TfrmPack.RTSPack(Path:string);
var Found:Integer;
SearchRec:TSearchRec;
PackedTable:TTable;
begin

PackedTable:=TTable.Create(Self);
try
PackedTable.DatabaseName:=Path;
PackedTable.SessionName:=SEDAS_Session;
PackedTable.Exclusive:=True;
PackedTable.TableType:=ttParadox; Found := FindFirst(Path+'*.db', faAnyFile, SearchRec);
while Found = 0 do
begin
lbPack.Items.Add(Path+SearchRec.Name);
Application.ProcessMessages;

PackedTable.TableName:=SearchRec.Name;
PackedTable.Open;

PackTable(PackedTable);

if PackedTable.Active then packedTable.Close;

Found := FindNext(SearchRec);
end;
FindClose(SearchRec);
finally PackedTable.Free; end;
end;
------------------------------------------------------------------------
Za kazde nakopnutie spravnym smerom dakujem.

Tenk j� veri ma�.

H�j. Roland Tur�an

Innosetup BDEINST.CAB

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 23.1.2000 10:50:27

Kde zozeniem potrebne sucasti na doplnenie BDEInstalacie s Innosetupom.

Tenk j� veri ma�.

H�j. Roland Tur�an


Nahrada SYSUTILS

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 23.1.2000 10:57:56

Ahoj. Tak toto som sa aj ja pital aj TeamB, ale mi odpovedali, ze na
kompilaciu potrebujes TASM ver. 4 nie je sucastou Delphi, lebo je to
separatny produkt, ale este aj to ze aj tak nemame vsetky zdrojaky na
kompletnu rekompilaciu.

Hi. Roland Turcan.

----- Original Message -----
From: <lustyl1.edu(zv)mail.cez(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 22, 2000 6:36 AM
Subject: Nahrada SYSUTILS


>
> Pratele
> potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
> mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
> Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
> v nahrazeni knihovny pres ALIAS a rekompilaci upravene
> SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?
>
> Diky L.Lustyk z tovarny na elektricky proud
>
> lustyl1.edu(zv)mail.cez(tec)cz
>
> Win98+D3 C/S
>
>
>

(no subject)

[*] Petr Skacel <skacel(zv)sdesign(tec)cz> - 23.1.2000 11:27:02

Zhanim nekoho kdo dobre zvlada Delphi3 a SQL na mesicni praci. Velmi
dobre placeno. Pro mimoprazske i s ubytovanim. Specha. Nastup mozny
ihned. V pripade zajmu me kontatkujte na skacel(zv)sdesign(tec)cz S diky.

Innosetup BDEINST.CAB

[*] Lauko �tefan <lauko(zv)salamon.sk> - 23.1.2000 13:32:27

Dobry den,
Delphi 4 obsahuje subor BDEInst.CAB, napr. Windows Comander ho rozpakuje -
vznikne BDEInst.DLL tato DLL-ka obsahuje jedinu proceduru
"DllRegisterServer" ked ju zavolate spusti sa instalacia BDE.
Postup:
- Novy project
- Zrusit vsetky Form

---------------- Komplet program -------------------------
program Project1;

Procedure DLLRegisterServer;
external 'BDEInst.DLL' name 'DllRegisterServer';

begin
DLLRegisterServer;
end.
-------------------------------------------------------------
Subor BDEInst.DLL musi byt v tom adresari ako je program "Project1".
BDEInst.CAB je na instalacnom CD Delphi 4 v adr. RUNIMAGE\..\BDE.
>Kde zozeniem potrebne sucasti na doplnenie BDEInstalacie s Innosetupom.
>
>Tenk j� veri ma�.
>
>H�j. Roland Tur�an
>

Innosetup BDEINST.CAB

[*] Petr Reichl <reichl(zv)atlas(tec)cz> - 23.1.2000 13:33:22

Podivej se na http://www.jordanr.dhs.org/isfaq.htm

P�eji p��jemn� den.

Petr Reichl
---
* E-mail: reichl(zv)centrum(tec)cz
* PGP: support
* ICQ: 56430979
---

> Kde zozeniem potrebne sucasti na doplnenie BDEInstalacie s Innosetupom.
>
> Tenk j� veri ma�.
>
> H�j. Roland Tur�an
>

Instalace BDE a MSAccess

[*] Erik Salaj <winsoft(zv)napri.sk> - 23.1.2000 21:14:41

DAO 3.6 nie je mozne pouzit s BDE a tato moznost podla
niektorych vyjadeni na Inprise newsgroups nebude ani v dalsich
verziach BDE.

Erik Salaj

----- Original Message -----
From: Pavel Bansky <pbansky(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 22, 2000 10:28 PM
Subject: Re: Re: Instalace BDE a MSAccess


> ave
>
> Jak je mozne buildnout aplikaci pro DAO3.6 kdyz bde DAO3.6 nepodporuje ?
> Popripade jak lze nastavit aby BDE umelo to DAO pouzit, (automaticky z IS)
>
> diky
>
> Pavel
>
> >No uz jsem prisel na to kde delam chybu. Na cilovem PC jsem instaloval
DAO
> >3.5
> >ale aplikace byla buildena s komponenty pro DAO 3.6. Kdyz jsem pouzil
> >komponenty pro
> >prislusne DAO tak je to O.K.
> >
> >Mimochodem neni nekde k dispozici take IS script pro DAO 3.6
>
> ------------------------------------------------------
> Pavel Bansky
> pbansky(zv)volny(tec)cz


Instalace BDE a MSAccess a BDE + DAO

[*] Ji�� Fait�������?��? - 23.1.2000 22:35:00

Komponenty pro DAO 3.5 i DAO 3.6, ktere pouzivam, pro svou cinnost vubec
nepotrebuje BDE :-)

Nevim jestli to bude nekoho zajimat ale mam zajimavy postreh s pouzitim BDE
a pristum pres jeho "nativni" linky
na Access.
Mam u jednoho zakaznika rozsahlou evidenci ktere je postavena nad tabulkama
FoxPro a castecne Access.
Zvazovali jsme prevod do Paradoxu, ale to jsme po predchozich zkusenostech
zavrhly. Paradox je celkem OK
pokud nepotrebujete pracovat v sitovem rezimu s pouzitim filtru (nebo SQL
dotazu) vykon jde katastrofalne
dolu.
Rozhodli jsme se pro postupny prevod do Acces s pozdejsim prenosem na MS SQL
server.
Vytvorili jsme Acces databaze ve kterych jsme namapovali tabulky FoxPro. Nad
nimi jsme vytvorili ulozene
procedury typu "Select * from FoxTabulka". V BDE jme vytvorili aliasy nad
zminenymi databazemi. Nad timto jsme
postupne vytvareli konecnou aplikaci. Vse bylo OK az do okamziku kdy se nam
zhroutila prvni databaze a to takovym
zpusobem ze byla uplne v pr... Nase radost samozrejme neznala mezi, nastalo
14-denni zjistovani co se vlastne stalo.
Veskere logy byly OK, no proste nic jsme nesjistili.
Konecne podesdreni padlo nakonec na spolupraci BDA a DAO. Koupili jsme
komponenty pro DAO. Zrusili BDE a
najednou je vse OK.

Mimochodem rychlost po odbourani BDE se asi o 20 procent zvysila.

Jeste neco nevite nekdo o webu ktery se venuje Delphi + DAO (ADO)?


----- Original Message -----
From: Pavel Bansky <pbansky(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 22, 2000 10:28 PM
Subject: Re: Re: Instalace BDE a MSAccess


> ave
>
> Jak je mozne buildnout aplikaci pro DAO3.6 kdyz bde DAO3.6 nepodporuje ?
> Popripade jak lze nastavit aby BDE umelo to DAO pouzit, (automaticky z IS)
>
> diky
>
> Pavel
>
> >No uz jsem prisel na to kde delam chybu. Na cilovem PC jsem instaloval
DAO
> >3.5
> >ale aplikace byla buildena s komponenty pro DAO 3.6. Kdyz jsem pouzil
> >komponenty pro
> >prislusne DAO tak je to O.K.
> >
> >Mimochodem neni nekde k dispozici take IS script pro DAO 3.6
>
> ------------------------------------------------------
> Pavel Bansky
> pbansky(zv)volny(tec)cz
>

Pozadi v Sinei

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 23.1.2000 22:37:13

> From: David Lebeda
> >mam nasledujici dotaz. V D4 C/S pouzivame tiskove sestavy Sinea.
> >Potrebuji programem vyplnit nejaky formular. Existuje nejaky
> >zpusob, jak nascanovanou podobu tohoto formulare umistit pri editaci
> sestavy na pozadi,
> >ale nakonec vytisknout jen vyplnena data
> >bez tohoto obrazku s formularem?
> >Preview typu, za na bilem papire jsou nekde pohazena nejaka data se mi
> naprosto nelibi.
> >
>
> Jako namet na rozsireni funkcnosti generatoru sestav to neni spatne.
> Vaclav Krmela
>

Od verze 3.39q ze dne 23.1.2000 jiz generator tiskovych sestav
SINEA umoznuje vkladani obrazku na pozadi editoru predloh a preview.
Volitelne je potom mozny i tisk s timto obrazkem, nebo bez neho.
Obrazek muze byt v libovolnem registrovanem grafickem formatu.

Vaclav Krmela

Ako poslat ENTER externej aplikacii

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:49:33

From: pachimat <pachimat(zv)rocketmail.com>
> Bezi aplikacia A, je to napr. len formular na ktorom je len jeden button.
> Ja potrebujem z mojej aplikacie B tento button stlacit (stlacit klavesu
> ENTER).

Ahoj,

Musis najit handle daneho buttonu v te aplikaci a pak mu zaslat zpravu:

SendMessage(ButtonHandle, BM_CLICK, 0, 0);

Petr Vones, amatersky programator

programove pridani fieldu do query

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:50:56

From: Ji�� Kr�l jr. <admin(zv)printo.com>
> potreboval bych zevnitr aplikace udelat pridani vsech fieldu do TADOQuery,
> takove jako kdyz na query dvojkliknete a pak rightclick, Add all.
> Nemuzu na to porad prijit.

Ahoj,

Podivej se do zdrojaku \Source\Property Editors\dsdesign.pas na metody
TFieldsEditor.DoAddFields, TDSDesigner.DoCreateField atd...

Petr Vones, amatersky programator

Zoom na TImage

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:50:49

From: Straka Josef <kshb(zv)seznam(tec)cz>
> D4 standard W95 OSR2
> mam jeden problem s komponentou TImage. Mam v ni zobrazeny obrazek BMP,
> ktery je vetsi nez formular. Proto s obrazkem pohybuji za pomoci ScrollBar.
> Ale ted bych chtel jeste doplnit Zoom +a -. A to tak, aby se obrazek plynule
> po stisku nejake klavesy zmensoval z puvodni velikosti 1:1 a pak zase zpatky

Ahoj,

Jednoduchy priklad mas tady. Pri vetsich narocich na rychlost vykreslovani by
jiz bylo treba vytvorit novou komponentu a udelat to cele trochu jinak. Ale i
tak je to stale rychlejsi nez TImage (Stretch = True) + TScrollBox.

ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Other/Example_BitmapViewZoom.zip

Petr Vones, amatersky programator


Instalace komponenty

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:43

From: Vana Lukas <lukas(zv)oknet(tec)cz>
> v Delphi 4 instaluji komponentu TEnhWaveIn (pracuje s mikrofonem, web je:
> http://ascu.unian.it/~milani/delphi , kdyby mel nekdo zajem). Komponentu
> jsem pouzival v Delphi 2, a ted jsem si stahl jeji verzi pro Delphi 4 a
> nejde mi nainstalovat.
>
> V instalacnim baliku jsou soubory DCR, DCU, BPL, DCP a DCU. Ja instaluji ten
> DCU a Delphi mi pise, ze jeden nebo vice radku byl moc dlouhy a byl zkracen,
> po OK skonci chybovou hlaskou, ze nemuze najit soubor typu PAS.

Ahoj,

Instaluj .BPL pres Component|Install packages -> Add. Nicmene obecne plati,
ze komponenty bez zdrojaku je lepsi nepouzivat. Vyhnes se tak rade problemu.

Petr Vones, amatersky programator


DBGrid , MouseDown nefunguje ?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:51

From: J�n Tungli <tungli(zv)datapac.sk>
> Ako sa da detekovat stlacenie mysi MouseDown na DBGride. Problem je v tom ze
> MouseDown udalost nenastane ale MouseUp ano. Myslim si ze je to chyba v D5.

Ahoj,

Je to chyba VCL v D5. Bez upravy zdrojaku to asi jednoduse odstranit nepujde.
Snad to bude opraveno v patchi.

Petr Vones, amatersky programator

Skryti TaskBaru

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:59

From: Va�ek N�vrat <engine(zv)ropacek(tec)cz>
> P.S. Aplikace musi pracovat v plnem okne pri rozliseni 800x600

Ahoj,

a zkousel jsi tohle ?
http://www.delphi(tec)cz/soubor.asp?rok=2000&mesic=Jan&den=16&first=16&soubor=dlfaaaaw.htm

Petr Vones, amatersky programator

MACXW4.drv

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:19

From: CERMAK <CERMAK(zv)procomcr(tec)cz>
> Nevite nekdo jak z toho?
> Stala se mi divna vec. Mame u zakaznika program v Delphi 3, (BDE z Delphi 5)
> ktery pracuje s tabulkama ve formatu DBF. Program pracovalcelkem v pohode s
> jedinou vyjimkou, ze se DBF soubory, ktere byly vytvoreny prikazem create
> table nedali nacist do Excelu. Zjistil jsem ze je to tim ze maji format
> Visual Dbase 7. Zmenil jsem parametr LEVEL v BDE u prislusneho linku ze 7 na
> 5. a doma (na W98) vse fungovalo dobre, i s importem do Excelu. U zakaznika
> se pri nejake akci (asi otevreni DBF tabulky nebo nastaveni filtru) objevi
> obecna chyba ochrany v modulu MACXW4.drv.

Ahoj,

Staci zadat "MACXW4.drv" do vhodneho vyhledavace (AltaVista) a hned se neco
dozvis :-) Pravdepodobne to vypada, ze zakaznik ma ATI videokartu se starym
ovladacem (nebo jeste hure s tim nouzovym co se dodava s Windows). Podobna
chyba je popsana i tady:

http://member.aol.com/keithrst/private/macxw4.html

Podivej se jaky ma presne typ te videokarty a nainstaluj mu nove ovladace.
(http://support.atitech.ca/drivers)

Petr Vones, amatersky programator


Rychle nacitani bmp

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:24

From: Straka Josef <kshb(zv)seznam(tec)cz>
> D4 standard W95 OSR2
> mam jeden problem s nacitanim bmp. Mam bitmapu, jejiz velikost je 10 MB a
> vice. Jeji otevreni v komponente Image.Picture.LoadFromFile() na mem
> P200MMX, 32 MB RAM trva asi 7 vterin. Ta bmp je samozrejme vetsi nez
> formular, a tak s ni pohybuji pomoci ScrollBars.
> Neslo by ale nejak udelat, aby se bmp nacetla jen ta cast, ktera je po
> spusteni videt (levy horni roh), ten se zobrazil, a teprve potom se docetl

Ahoj,

Slo, zabyva se tim treba tenhle clanek:
http://www.undu.com/DN970101/00000013.htm

Petr Vones, amatersky programator


Nastroje pro Paradox tabulky (Was: reindexace para

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:51:55

From: Ren� Otisk <otisk(zv)misel(tec)cz>
> ...a existuje i neco jako tutil16 pro 16bit aplikace s paradoxem?

Ahoj,

na te strance (http://www.borland.com/devsupport/bde/utilities.html) mas dole
sekci "16 Bit Utilities", takze tam mozna neco bude.

Petr Vones, amatersky programator

emulator modemu...

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:24

From: Ivan Turcan <iturcan(zv)gamo.sk>
> nevie nahodou niekto ci existuje nieco ako emulator modemu. Vyvyjam totizto
> aplikaciu ktora vyuziva
> modemove spojenie (TAPI) a v pripade ze som doma toho moc na svojom notebooku
> nenatestujem.

Ahoj,

Pro takoveto pripady mam v pocitaci propojene dva COM porty, jeden pak vyuziva
dana aplikace a druhy obsluhuje jednoduchy emulator. V pripade TAPI to ale bude
asi trochu slozitejsi, budes muset emulovat cely modem (tedy pomerne velkou sadu
prikazu a odpovedi). Ohledne TAPI vysel pred casem serial na Delphi Informant.

Petr Vones, amatersky programator

Problem s pouzitim PackTable z RxLib 2.75

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:06

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Takto vypada moja procedure na vyhladanie vsetkych suborov v adresari a ich
> pakovanie, ale za kazdym ked chcem ju pouzit tak mi vyvola exception "System
> has been illegaly re-entered" preco ?

Ahoj,

Zkus pouzit pakovani tabulky primo od Borlandu (do Rx jsem se nedival):
http://www.borland.com/devsupport/bde/bdeapiex/dbidorestructure.html#Ex2

> begin
> lbPack.Items.Add(Path+SearchRec.Name);
> Application.ProcessMessages;
^^^^^^^^^^^^^^^^^^^^^^^^^^^
toto nahrad: lbPack.Update;

Petr Vones, amatersky programator

Maximalna velkost kompilovaneho EXE suboru

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:28

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Aka je maximalna velkost kompilovaneho EXE suboru v Delphi 3,4,5 ?

Ahoj,

Teoreticky vzato cca 2 GB :-)

Petr Vones, amatersky programator


excel a delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:53

From: Bejvlov� Martina <M.Bejvlova(zv)cra(tec)cz>
> Mam D5S asi mesic a teprve se rozkoukavam, co s tim jde vsechno delat.
>
> Potrebuji data ukladat do formatu xls a opet je nacitat zpatky, zaroven
> tvorit nove sesity a listy. Zatim to delam tak, ze v Delphi vytvorim txt
> soubor a spustim externe nejaky xls soubor, ktery obsahuje jenom kod ve VB.

Ahoj,

Za prve, skoda ze nemas alespon verzi Delphi 5 Professional (ono se Standard
verzi se toho ani moc delat neda), tam uz jsou totiz primo komponenty pro cely
Office, vcetne udalosti.

Jinak MS Office lze ovladat pres OLE automation, tady najdes maly serial i s
priklady:

http://community.borland.com/article/0,1410,10126,00.html

Petr Vones, amatersky programator

Nahrada SYSUTILS

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:36

From: <lustyl1.edu(zv)mail.cez(tec)cz>
> potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
> mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
> Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
> v nahrazeni knihovny pres ALIAS a rekompilaci upravene
> SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?

Ahoj,

upravy ve standartnich knihovnach Delphi bych nedoporucoval. Co ti tam
presne vadi ? Neslo by to resit napsanim novych funkci do noveho unitu ?

Petr Vones, amatersky programator

Volume

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.1.2000 22:52:11

From: Jaroslav Mazanek <maza(zv)volny(tec)cz>
> Delphi 5:
> Pot�ebuji pro sv�j program ovl�d�n� hlasitosti.(System, Wave...) Pora�te
> pros�m jak to m�m vy�e�it. Diky za ka�dou pomoc.

Ahoj,

jedna z moznosti je treba tady:
http://www.delphi(tec)cz/soubor.asp?rok=1998&mesic=Sep&den=15&first=61&soubor=dlfaaaco.htm

Petr Vones, amatersky programator

Outlook - global address book

[*] Michal Hlav�� - 23.1.2000 23:05:19

Zdravim,

mne to padne na hlaseni EOleSysError "Nespr�vny �etezec t��dy" ....

Neviete co s tym moze byt?

Miso
-----P�vodn� zpr�va-----
>mne toto funguje :>procedure TForm1.Button1Click(Sender: TObject);
>var
> oApp : OleVariant;
> oAddList : OleVariant;
> count, i : Longint;
>begin
> oApp:=CreateoleObject('Outlook.Application');
> oAddList:=oApp.GetNamespace('MAPI').AddressLists.Item('Global Address
>List');
>
> count:=oAddList.AddressEntries.Count;
> for i:= 1 to count do
> begin
> ShowMessage(oAddList.AddressEntries.Item(i).Name);
> end;
>
> oAddList:=Unassigned;
> oApp:=Unassigned;
>end;

excel a delphi

[*] Martin Kucera <mk(zv)paegas.vol(tec)cz> - 23.1.2000 23:26:46


> Potrebuji data ukladat do formatu xls a opet je nacitat zpatky, zaroven
> tvorit nove sesity a listy.

Ahoj,
snad by mohly pomoct komponenety XLSRead a XLSWrite z CD Chip 12/1999, ktere
jsem uspesne pouzil pri tvorbe takove jednoduchoucke aplikace. Umi
zapisovat, tvorit nove sheety, nacitat, no zdaji se mi byt dobre. Navic si
myslim, ze to neni ten pripad, kdy je lepsi psat kod nez pouzit komponenty.
Pak jsou tu jeste xlGrid z CD Chipu 1/2000.

Innosetup BDEINST.CAB

[*] Ale� Radikovsk� <radik(zv)seznam(tec)cz> - 23.1.2000 23:45:39

> Kde zozeniem potrebne sucasti na doplnenie BDEInstalacie s Innosetupom.
>

Soubor BDEINST.CAB je v adresari BDEcka (program Files\Common Files\Borland
Shared\Bde), pokud ho tam nemas, tak si nainstaluj treba upgrade BDEcka,
ten se myslim na instalaci toho souboru zepta.

Ales


Rekurzivne vyhladanie suborov v ceste

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 24.1.2000 00:00:09

Zdravim.

Potreboval by som funkciu na rekurzivne vyhladanie suborov v zadanej ceste.
('*.db','d:\data\')

Za prihratie adresy alebo zdrojaku tenk j� veri ma�.

H�j. Roland Tur�an

OT: C++ Builder...

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 24.1.2000 06:52:03

Ahoj

nevi nekdo, kde bych jeste mohl koupit Borland C++ Buider 3 Standard ?
( verze 4 na mem PC beha hrozne pomalu, 3-ka mi uplne staci )

diky za kazdou odpoved

Zdenek Fryz


__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.

kresleni tydenniho rozvrhu

[*] sup(zv)svitap(tec)cz - 24.1.2000 8:03:08

> Vite nekdo o nejakym sikovnym software na kresleni tydenniho rozvrhu?
> Mam predstavu, ze bych zadal
> Po 8 - 8:45 Pocty
> St 16-17:25 Plavani
> ...
>
> a ten software by to nejak prehledne vytisknul jako rozvrh.

Udelej to pres StringGrid nebo pres DBStringGrid a ten potom vytiskni. Je to
prace na cca 2 hodiny.

Jaroslav Weiss
odd. informatiky

SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02

tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz


excel a delphi

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 24.1.2000 08:11:13

V Delphi 3 ale Profi existuje komponenta
Formula One. Je to OCX, ktere lze sirit s vlastni
aplikaci a to umi dobre cist XLS 4.0 format.
Ma i vlastni format VTS, ktery je pro Excel citelny
(ale ne zpet). Rozhrani je velmi podobne Visual
Basic for Apps a pekne se s tim pracuje.

Ale jak rikam, az od Prof.

Martin

OT Novell hidden directory

[*] sup(zv)svitap(tec)cz - 24.1.2000 8:34:32

Sorry za OT, ale mam maly problem. Potrebuji se dostat do hidden adresare
SYS:\_NETWARE, staci pro cteni.... Novell 4.11, D3Profi.

Jaroslav Weiss
odd. informatiky

SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02

tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz


emulator modemu...

[*] Ivan Turcan <iturcan(zv)gamo.sk> - 24.1.2000 08:40:27

>Pro takoveto pripady mam v pocitaci propojene dva COM porty, jeden pak vyuziva
>dana aplikace a druhy obsluhuje jednoduchy emulator.

Jasne, prepojenie COM portov ma napadlo , lenze moj notebook ma len jeden COM
port takze je
to nerealne.

>V pripade TAPI to ale bude
>asi trochu slozitejsi, budes muset emulovat cely modem (tedy pomerne velkou
sadu
>prikazu a odpovedi).

Ak si nainstalujem "Dial-UP Networking Serial Cable between 2 PCs" tak mozem
pouzit aj TAPI

Cize, este raz. Potrebujem emulator modemu alebo COM portu. Predstavujem si to
asi tak
ze si nainstalujem 2 virtualne COM porty na ktore budem moct nainstalovat 2
virtualne zariadenia
ktore budu moct medzi sebou normalne komunikovat prostrednictvom TAPI


Ivan Turcan

Jak udelat, aby TDBGrid mel fitrt jako Excel

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 24.1.2000 08:43:59

> > > Taky mne to zajima, proto jsem si stahnul EQGrid.ZIP. DEMO je
doopravdy
> > > skvele, ale ta cena 299$ je odstrasujici. Ma nekdo s timto softem
> Kde se da demo stahnout?

http://www.devexpress.com/

>
> 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
>
>

emulator modemu...

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 24.1.2000 09:05:41

> Jasne, prepojenie COM portov ma napadlo, lenze moj
> notebook ma len jeden COM port takze je to nerealne.
Na notebooku s jednim portem jsem si vypomahal
loopbackem, ale to jsem mel port pod svou kontrolou,
v TAPI ti to asi nepomuze.

Daniel Rott

Unit QuickRep

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 24.1.2000 09:15:00

Zdravim,
nevim jak tisknou ostatni delfisti, ale ja mam problemy. Chci pouzivat QuickRep, ale Preview je v Anglictine a navic ovladatelne pouze pomoci mysi.
QuickRep1.Preview;
Existuje nejaka moznost, jak se dostat ke zdrojaku unity QuickRep pro D4 ?
Diky Pavel

Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
http://www.kopr(tec)cz/w-delphi.htm http://www.kopr(tec)cz
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~

excel a delphi

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 24.1.2000 09:45:09

Ahoj,
nevim, do jake miry Ti toto pomuze, ale na Torry
je (myslim, ze nekde v sekcich Grids) toto :

TAdvColumn Grid v1.0 - AdvCGrid
-------------------------------
TStringGrid organized in columns of which all properties
can be set at design time or run time through the Columns
property for color, font, sortstyle, printcolor, header,
inplace editors. Additional non column bound possibilities
include:
insert,delete,hide,unhide rows and colums
save / load to file, stream, CSV, XLS,
formatted ascii files save to HTML, DOC, XML
copy / paste to clipboard + intelligent automatic
series expansion, duplication
cell alignment, cell color, cell font color, read-only cells,
HTML and RTF formatted cells, URL aware cells, cells with
rotated text.
automatic printing with optional title, pagenumber, date, time,
border, cell fonts, colors, custom drawing, fit to page, cell
border automatic column/row sizing
inplace editors: combobox, spinedit, ellipsedit, datepicker,
checkbox, buttons, autolookup edits, numeric edit, float edit,
capital edit, mixedcase edit, radiobutton
many more...

Delphi 5 compatible.
Source on purchase/registration

Exe-demo included


> ----------
> Od: Bejvlov> � Martina[SMTP:M.Bejvlova(zv)cra(tec)cz]
>
> Potrebuji data ukladat do formatu xls a opet je nacitat zpatky, zaroven
> tvorit nove sesity a listy...
>

pripojeni sdileneho disku

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 24.1.2000 10:12:18

Ahoj
nevite jak pod win9x pripojit sdileny disk, ale pod jinym uctem nez na jaky
jsem prihlasen do NT ? Normalne se windows ptaji pri pokusu o namapovani
pouze na heslo a jako jmeno dosazuji jmeno uzivatele ??? ale pokud chci
pripojit sdileny disk pod jinym uzivatelem tak mam smulu. Existuje nejaka
API ktera to umozni ? Pod NT to jde pomoci net use je tam parametr udavajici
jmeni usera a heslo. win9x jsou o toto ocesane.

Nahrada SYSUTILS

[*] Robert Kindl <rob(zv)exec(tec)cz> - 24.1.2000 10:14:10

Ja jsem na internetu nasel soubor Y2K.ZIP,
ktery pro Delphi 3 implementoval promennou
TwoDigitYearCenturyWindow znamou z Delphi 4 a 5.

V baliku byly opravene zdroje Sysutils.pas
a ffmt.asm a prekompilovany ffmt.obj
To cele Freeware.

Kompilovano to je TASM 5 (not included :-)),
takze to asi kompilovat jde!

Presnou adresu ke stazeni nevim, ale myslim, ze to bylo
z Torry nebo z DSP a jmenovalo se to Y2K.ZIP.

Rob

> Ahoj. Tak toto som sa aj ja pital aj TeamB, ale mi odpovedali, ze na
> kompilaciu potrebujes TASM ver. 4 nie je sucastou Delphi, lebo je to
> separatny produkt, ale este aj to ze aj tak nemame vsetky zdrojaky na
> kompletnu rekompilaciu.
> Hi. Roland Turcan.
> > Pratele
> > potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
> > mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
> > Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
> > v nahrazeni knihovny pres ALIAS a rekompilaci upravene
> > SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?
> >
> > Diky L.Lustyk z tovarny na elektricky proud
> > lustyl1.edu(zv)mail.cez(tec)cz
> > Win98+D3 C/S


OT Novell hidden directory

[*] Luk� Gallina - 24.1.2000 10:18:26

Zdravim.
Obavam se, ze se tam nedostanes, protoze tento adresar si NetWare chrani,
neb
v nem ma NDSku atd... Proc tam chces jit?

S pozdravem

Luk� (Lukas) Gallina
lukas.gallina(zv)raceknet(tec)cz
http://www.raceknet(tec)cz


> Sorry za OT, ale mam maly problem. Potrebuji se dostat do hidden adresare
> SYS:\_NETWARE, staci pro cteni.... Novell 4.11, D3Profi.

DB cestina pri editaci

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 24.1.2000 10:43:49

Databazi musis vytvorit s nejakym DEFAULT CHARACTER napr. takhle

create database 'D:\Ibpokus.gdb' user 'PAVEL' password 'aa' page size = 8192
DEFAULT CHARACTER SET WIN1250;


Pavel

----- Original Message -----
From: Alinex
To: delphi
Sent: Friday, January 21, 2000 5:56 PM
Subject: DB cestina pri editaci Zdravim,
a prosim o radu zkusene.
Delphi 2.0 C/S. Vytvorim pomoci "interbase windows ISQL" databazi s nekolika tabulkami. Pokud zadavam data v programu, tak vse funguje O.K.(v DBEDITech jsou hacky, carky) , ale pri zobrazovani mi velejzaji na mistech s diakritikou blbosti. Takze vse zadavam bez cestiny. Hledal jsem v dokumentavi, v archivu, ale mam v tom silny hokej (to same je kdyz napojim nejakou DB tabulku). Zkousel jsem menit v LANGDRIVER ale nejak to stejne nejde, zkousel jsem nastavit LANGDRIVER a potom vytvorit DATABAZI.GDB, ale vysledek je stejny a jeste jako premii to nezna starou DATABAZI.GDB. Prosim o pomoc.
ALI

Unit QuickRep

[*] Lauko �tefan <lauko(zv)salamon.sk> - 24.1.2000 10:52:11

Ku zdrojaku sa asi nedostanete.
Pomoze vam TQRPreview - pouzitie najdete v QuickRpt.hlp.

S pozdravom Lauko Stefan.

Zdravim,
nevim jak tisknou ostatni delfisti, ale ja mam problemy. Chci pouzivat QuickRep, ale Preview je v Anglictine a navic ovladatelne pouze pomoci mysi.
QuickRep1.Preview;
Existuje nejaka moznost, jak se dostat ke zdrojaku unity QuickRep pro D4 ?
Diky Pavel

Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
http://www.kopr(tec)cz/w-delphi.htm http://www.kopr(tec)cz
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
Pomoze vam TQRPreview - pouzitie najdete v QuickRpt.hlp.

Nahrada SYSUTILS

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 24.1.2000 10:57:15

Ahoj,
tyka se problem i D2?
Jaro B.

> -----P�vodn� zpr�va-----
> Od: Robert Kindl [SMTP:rob(zv)exec(tec)cz]
> Odesl�no: 24. ledna 2000 10:14
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Nahrada SYSUTILS
>
> Ja jsem na internetu nasel soubor Y2K.ZIP,
> ktery pro Delphi 3 implementoval promennou
> TwoDigitYearCenturyWindow znamou z Delphi 4 a 5.
>
> V baliku byly opravene zdroje Sysutils.pas
> a ffmt.asm a prekompilovany ffmt.obj
> To cele Freeware.
>
> Kompilovano to je TASM 5 (not included :-)),
> takze to asi kompilovat jde!
>
> Presnou adresu ke stazeni nevim, ale myslim, ze to bylo
> z Torry nebo z DSP a jmenovalo se to Y2K.ZIP.
>
> Rob
>
> > Ahoj. Tak toto som sa aj ja pital aj TeamB, ale mi odpovedali, ze na
> > kompilaciu potrebujes TASM ver. 4 nie je sucastou Delphi, lebo je to
> > separatny produkt, ale este aj to ze aj tak nemame vsetky zdrojaky na
> > kompletnu rekompilaciu.
> > Hi. Roland Turcan.
> > > Pratele
> > > potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
> > > mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
> > > Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
> > > v nahrazeni knihovny pres ALIAS a rekompilaci upravene
> > > SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?
> > >
> > > Diky L.Lustyk z tovarny na elektricky proud
> > > lustyl1.edu(zv)mail.cez(tec)cz
> > > Win98+D3 C/S
>
>
>

Cislo aktivneho riadku v TDBGrid

[*] Macko Peter <macko(zv)axa.sk> - 24.1.2000 11:49:26

Ahojte,
poradte mi prosim Vas ako zistit cislo riadku v TDBGrid na ktorom sa
nachadza kurzor (aktivny riadok)?

Peter Macko
macko(zv)axa.sk


Nahrada SYSUTILS

[*] Jan Tomsa <tomsa(zv)NOTIA.CZ> - 24.1.2000 11:53:09

ffmt.asm potrebuje k prekladu jeste soubor se.asm,
ktery ve standardnich zdrojacich je

ja jsem to kompiloval TASM32 5.0 a slo to v pohode.

Tomy
D2, WNT


Lokalizace

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 24.1.2000 11:59:12

Ahoj,

vim, ze se o tom v konferenci uz psalo, prostudoval jsem v archivu
radu clanku a na dalsi radu uz jsem nemel silu, tak prosim jeste
jednou:

Existuje nejaky rozumny legalni zpusob, jak pocestit vyjimky
BDE? V konferenci se pise, ze sice lze pocestit prislusne DLL, ale
sireni teto DLL je porusenim autorskeho zakona.

Pokouset se v prelepovat tyto vyjimky v kazdem try...except
bloku mi prijde silene. Tech vyjimek je jiste spousta a davat kazde
pouziti BDE do try...except, kde za except bude dlouha nudle
prelozenych textu se mi nelibi.

Dospel jsem k zaveru, ze rozumne reseni neexistuje. Nebo se
pletu?

David Lebeda


Porty LPT

[*] SPELZA s.r.o. <spelza(zv)spelza(tec)cz> - 24.1.2000 12:03:25

Nevite nekdo jak ve W95/98/NT zjistim pocet a parametry (konkretne adresu)
instalovanych paralelnich portu? Mam D4Std.

Dik. Jara.

Nahrada SYSUTILS

[*] Jan Tomsa <tomsa(zv)NOTIA.CZ> - 24.1.2000 12:16:53

> Ahoj,
> tyka se problem i D2?
> Jaro B.

ano,
mimochodem TASM32 5.0 lze stahnout mj. na http://astalavista.box.sk

Honza


Unit QuickRep

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 24.1.2000 12:23:48

Ahoj,
ja to udelal tak (D3), ze jsem si z adresare,
kde je QuickRep (%Delphi%\Lib) otevrel (v IDE)
formular QRPrev.dfm (jako text) a jednotlive
texty jsem proste prepsal, ulozil a hotovo.

Dobra.

> ----------
> > �>
> nevim jak tisknou ostatni delfisti, ale ja mam problemy.
> Chci pouzivat QuickRep, ale Preview je v Anglictine
> a navic ovladatelne pouze pomoci mysi.
> QuickRep1.Preview;
> Existuje nejaka moznost, jak se dostat ke zdrojaku unity
> QuickRep pro D4 ?
>
>

OT Novell hidden directory

[*] sup(zv)svitap(tec)cz - 24.1.2000 12:24:22

>Zdravim.
>Obavam se, ze se tam nedostanes, protoze tento adresar si NetWare chrani,
>neb
>v nem ma NDSku atd... Proc tam chces jit?
>

Prave kvuli NDS... Mam lakomy sefy, nechcou mi koupit NWLib od Devontu
(www.devont.com).

>> Sorry za OT, ale mam maly problem. Potrebuji se dostat do hidden adresare
>> SYS:\_NETWARE, staci pro cteni.... Novell 4.11, D3Profi.

Jaroslav Weiss
odd. informatiky

SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02

tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz


setup provedl neplatnou operaci

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 24.1.2000 12:25:53

Ahoj,
pri spusteni setup.exe vygenerovanem z InstallShieldu se objevi chyba
"Program provedl neplatnou operaci ..."a jmeno souboru zacinajici na
"isset_se". Totez se stane kdyz se spusti setup od BDE 501. Na
pocitaci jsou stare w95 a ie 5 cz, asi aktivni desktop. IS je z D3.
Nevite nekdo co s tim?

Dekuji za odpoved
Vaclav Sazima


Odchytenie portu tlaciarne

[*] Lauko �tefan <lauko(zv)salamon.sk> - 24.1.2000 12:31:36

Zdravim Vas,
je mozne vo Win32 prevziat tlacovu ulohu z DOS-programu ktora smeruje na LPTx.
Potreboval by som vytvorit bypas medzi DOS a tlacovu frontu Win32 a tak ziskat
textovy subor.
Vie mi niekto poradit?
Dakujem. Lauko Stefan

ISAPI a upload souboru

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 24.1.2000 12:33:36

Mam takovy maly problem...

.. a uz se s tim trapim cely vikend.
Potreboval bych nahravat z IE smerem k
memu ISAPI DLL nejake soubory (ZIPy).
Jenze, kdyz poslu takovy zip, tak sice prijde,
ulozi se do Request.Content, ale jelikoz je
to string polozka usekne se u prvni #0.

Nemate nekdo nejaky podnetny napad ?
Help jsem uz cetl, ale nic

Diky

martin
nedopil(zv)geocities.com
http://kuchyn.delphi(tec)cz (kuchyn(zv)delphi(tec)cz)

Odchytenie portu tlaciarne

[*] OLEJNIK Andrej <olej(zv)nt2.asset.sk> - 24.1.2000 13:30:34

Ja potrebujem nieco podobne ale s tym rozdielom,
ze musi ten subor vytlacit

z DOSu sa tlaci na tlaciaren s riadiacimi znakmi pre EPSON
co dnesne vymlete tlaciarne nepodporuju

olej

-----Original Message-----
From: Lauko �tefan [mailto:lauko(zv)salamon.sk]
Sent: Monday, January 24, 2000 12:32 PM
To: Delphi CZ konferencia
Subject: Odchytenie portu tlaciarne


Zdravim Vas,
je mozne vo Win32 prevziat tlacovu ulohu z DOS-programu ktora smeruje na
LPTx.
Potreboval by som vytvorit bypas medzi DOS a tlacovu frontu Win32 a tak
ziskat
textovy subor.
Vie mi niekto poradit?
Dakujem. Lauko Stefan

© Delphi.cz, program netcode.cz, 2008-9.