Archív konference Delphi

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

Velikost View.Height se meni sama?

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 25.2.1999 13:39:08

Myslim, ze je to podle velikosti pisma (podle fontu) ...

> ----------
> Od: Karel Kral[SMTP:kral(zv)purus(tec)cz]
> Odesl=E1no: 24. =FAnora 1999 17:07
> Komu: Konference Delphi
> P=F8edm=ECt: Velikost View.Height se meni sama?
>=20
> Muzete mi poradit?
> M=E1m na formulari TEdit. Nastavim velikost Height napr. na 23. Pak
> timto
> editem pohnu na jinou pozici a najednou ma velikost 25! Kdo to udelal
> a
> co s tim?=20
> --=20
> ______________________________________________________
> Karel Kral, informatik
> Purus, s.r.o., Cezavy 627, 664 56 Blucina
> Tel: 05/47235000, 0602/552432, Fax: 05/47231203
> E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
> ______________________________________________________
>=20

QuickReport bez BDE

[*] tomas.mazurek(zv)vitkovice(tec)cz - 25.2.1999 13:40:18

Hello,

mam nasledujici problem s D1 a QuickReportem 1.1a. Vytvoril jsem si
primitivni program - prohlizec sestav, tj. souboru s priponou QRP.
Predpokladam, ze takovyto program nepotrebuje BDE. Alespon se pise v
QUICKREP.PAS nasledujici:

USING QUICKREPORT WITHOUT BDE (Borland Database Engine):
--------------------------------------------------------
QuickReport can be used in applications where you don't use the BDE
at all by including the following line:

{$define XBDE}

This will remove all data aware functionallity from QuickReport,
including the QRDBText and QRDBCalc components, all DataSource
properties and all other code depending on the BDE. You will need
to use the OnNeedData events to control data flow. Please note that
1.0c is the first version where this compiler directive is
introduces and this is not very well tested yet. Please report any
problems

Samozrejme, ze mi muj program na PC bez BDE pise Chyba inicializace
BDE...

Dovede nekdo poradit?

Diky

Tomas

Exception

[*] Ing. Miroslav Ondrisek, Bonnel Technologie, s.r.o. <bonnel(zv)telecom(tec)cz> - 25.2.1999 13:46:20


Pri uzavirani me aplikace dostanu vzdy hlasku Exception class C0000005
with message: access violation at address xxx: read of address
0xffffffff.

Kdyz si necham najit tu adresu xxx, kde nastala chyba, zjistim, ze je to
to TThread.Suspend rutina. Vzhledem k tomu, ze ja thready nepouzivam (v
teto aplikaci), potreboval bych zjistit, co je zdrojem teto chyby. Jak ?

Diky za pripadne popostrceni.

Mira


Pretahnuti souboru z jine aplikace

[*] OLEJNIK Andrej <olej(zv)asset.sk> - 25.2.1999 13:49:01

niekde na DSP alebo Torry je komponenta pre FileDrop
hodis to na formu a stringliste mas zoznam suborov, co=20
niekto hodil na nejaky wincontrol na forme (asi tak nejako)

olej

> -----Original Message-----
> From: Jan =A9ebel=EDk [SMTP:honza(zv)haes(tec)cz]
> Sent: Monday, February 22, 1999 6:30 PM
> To: delphi-l(zv)fwd(tec)cz
> Cc: David Arthur Mu=9E=E1tko
> Subject: Re: Pretahnuti souboru z jine aplikace
>=20
> Dela se to cele pres COM.
> Pokud se nemylim, predvadi Vlada Bodecek neco podobneho na kurzu
> "COM/DCOM" resp. "Win32API".
> Neni to jednoduche.
>=20
> Honza
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
> =3D HAES - RNDr. Jan Sebelik
> =3D http://www.haes(tec)cz
> =3D Skolici stredisko pro Delphi a Win32
> =3D Vojtiskova 206
> =3D 507 81 Lazne Belohrad
> =3D tel. 0434 692 931
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
> ----------
> > Odes=EDlatel: Medusa <medusa(zv)brajan(tec)cz>
> > Komu: Konference DELPHI <delphi-l(zv)fwd(tec)cz>
> > P=F8edm=ECt:=20
> > Datum: 21. =FAnora 1999 23:58
> >=20
> > Ahoj,
> >=20
> > Opet jeden dotazik...
> >=20
> > Poreboval bych poradit a nebo priklad, kterej resi pretahnuti souboru
> > (ikony, ...) z jine aplikace
> > nebo exploreru na muj form...
> >=20
> > Trebas: Mam tMemo a chci abych mohl chytit soubor z plochy a pustit h=
o
> do
> > do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to
> bude
> > stacit...
> >=20
> > Dekuji
> > Medusa

MS SQL 7 + ulozene procedury

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 25.2.1999 13:56:38

Polak Jiri wrote:

> > Testuji MS SQL 7 (Beta 3) pres ADO. Po prvnich pokusech se
> > zda, ze to funguje dobre. Zadne BDE k tomu neni potreba. Chce to
> > vsak udelat zcela nove komponenty. Ja se do toho pustim urcite,
> > protoze to potrebuji. Spolupraci bych vsak radeji videl pres
> > Delphree nez na soukromem pisecku.
>
> Vzhledem k tomu, ze ja pouzivam ostrou verzi
> MS SQL, myslim, ze se to nebude chovat stejne.

Patrne netusis, o cem jsem psal? ADO je nova COM/DCOM
technologie pripojeni k databazim. BDE pouziva starou, jiz
prakticky nepodporovanou technologii, ktera pouziva funkce
DbiXxxx (podivej se do zdrojaku napr. DBTables.pas, tam se to jimi
jen hemzi). A problem je prave v tom, ze tyto funkce jsou jiz
prastare a SQL Server 7 se k nim nemusi chovat prave privetive. :-)

> Me staci k plne spokojenosti aby to fungovalo pres BDE,

No, a zde je prave ten nejozehavejsi hacek. Proto se take poustim
do ADO. Nez s tim vyleze Inprise, myslim, ze uz bude rada veci
hotova.

> ale spolupraci pri vyvoji novych komponent se nebranim,
> bylo by rozhodne prijemejsi se BDE vyhnout.
> Neni to vsak prilis velke sousto?

No a? Kdo se boji, nesmi programovat. Pevne doufam, ze v tom
nezustanu sam. :-)

> Nebude potreba prepsat vsechno od TDatabase az po DB controls?
> Nebo se daji pouzit nektere komponenty delphi?
> Nemam predstavu o tom, jak moc jsou zavisle na BDE.

Zkousel jsem vyjit alespon od TDataSet, ale kdyz jsem si prohlizel
jeho streva, dosel jsem k zaveru, ze daleko jednodussi a
pruzracnejsi bude napsat vse zcela znovu. Ma to vsak jeden hacek
- budou se tomu muset prizpusobit i generatory tiskovych sestav.
:-) Hi, lidi od Sinea, co vy na to? Chcete se zucastnit navrhu
rozhrani uz od pocatku?


S pozdravem

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

Zapis do Version Info do hotoveho exe souboru

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 25.2.1999 13:56:38

Marian Jonas wrote:

> Zdravim vsechny Delphisty,
> Naskytl se mi tento problem, potrebuji v .EXE souboru prepsat
> hodnotu Version Info z hodnoty 1.0.0.0 na hodnotu 1.0.0.1.
> Existuje na toto nejaka API funkce, nebo je treba jit natvrdo
> pres primy zapis do souboru ?

V externim EXE, nebo v tom, ktery je prave spusteny? Pokud je to
externi EXE, musis si vytahnout resource VersionInfo, zmenit
prislusnou hodnotu a pak to nacpat zpet. V NT jsou na nacpani
funkce, v 95, 98 nevim. Urcity navod ti poskytne resxplor z
demoprikladu.


S pozdravem

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

Pozor na MS SQL Server!

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 25.2.1999 13:56:38

Polak Jiri wrote:

> Zjistil jsem jednu podle meho nazoru zvlastni vlastnost
> MS SQL Serveru 7.0. Posudte sami:
>=20
> 1)
> Pri volani SQL z klienta zohlednuje SQL Server
> narodni vlastnosti usera.
> Takze nemohu datum 31. prosince 1999
> posilat z frontendu v textovem formatu formatu
> (napr '1999-12-31'), protoze pro nektere uzivatele
> by zamenil mesic se dnem).

Reseni: udelat programovy server, ktery pustis na pocitadle s SQL=20
Serverem. Z klienta budes posilat datum napriklad jako TDateTime,=20
a az tvuj server to ulozi do databaze ve spravnem formatu. Protoze=20
vsak licencni politika na MIDAS je naprosto nepruchodna, vidim=20
reseni prave v ADO - to si o vicevrstvou architekturu primo samo=20
rika.

> 2)
> Pri behu procedury na serveru jsou zohlednovany
> vlastnosti klienta. Konkretne funkce
> DatePart(weekday, (zv)Datum) vrati pro nektere uzivatele
> (opet podle narodnich vlastnosti)
> 1 n=ECkdy pro nedeli, jindy pro pondeli.
> BTW obdobna funkce v Delphi DayOfWeek vraci vzdy 1 pro nedeli.

Dtto.

> Me to pripada dost stupidni. Samozrejme existuje reseni,
> muzeme nastavit promennou (zv)(zv)DateFirst, je to
> ale prace navic. Myslim, ze na serveru by se mel program
> chovat podle nastaveni serveru a ne podle jeho klientu.
> Nebo chapete nekdo smysl?

A ted si predstav - MS v tom ma bordel, v BDE je bordel (jsou tam=20
dosta zavazne chyby) - jaky muze byt vysledek? No jeste vetsi=20
bordel. :-)


S pozdravem

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

Velikost View.Height se meni sama?

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 25.2.1999 13:58:43

Martin Fron=ECk
ZZN Slan=FD a.s.
Pra=BEsk=E1 1579, 274 49, Slan=FD
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P=F9vodn=ED zpr=E1va-----
> Od: Karel Kral [SMTP:kral(zv)purus(tec)cz]
> Odesl=E1no: 24. =FAnora 1999 17:08
> Komu: Konference Delphi
> P=F8edm=ECt: Velikost View.Height se meni sama?
>=20
> Muzete mi poradit?
> M=E1m na formulari TEdit. Nastavim velikost Height napr. na 23. Pak
> timto
> editem pohnu na jinou pozici a najednou ma velikost 25! Kdo to udelal
> a
>=20
[Martin Fron=ECk] J=E1 to nebyl. Bart Simpson.

HDD seriove cislo ...

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 25.2.1999 14:12:49

Hi,

>Bohuzial, nie je to ono ... potrebujem VYROBNE cislo disku...
>Ono to tam naozaj je a niektore test-programy v dose ho pekne detekuju....
>Chcel by som to pouzit ako ochranu proti kopirovaniu :-)


Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala tusim
IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z radice
disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to k
necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to emajlem.

bye, pf

Komponenty? K �emu?

[*] Lubo Fule <fule(zv)sct.sk> - 25.2.1999 14:17:09

Hold, otazka: Na co ma vtak kridla...:-) Nic v zlom.

Komponenty su v podstate vsetky objekty, ktore sa v Delphi pouzivaju na
"poskladanie" aplikacie (napr. editovacie polia, tlacitka, databazove
objekty), skratka vsetko, co sa da "polozit" na formular alebo datovy modul
(aj to je vlastne formular).


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
standa kunc
Sent: Thursday, February 25, 1999 12:30 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Komponenty? K �emu?


Jsem za��te�n�k po��d �tu o n�jak�ch komponent�ch. Co to je? Na co se to
pou?�v�? Jak to (uni)instalovat? Existuje je?t� n�jak� server (�esk�), kter�
by informoval stejn� jako www.undu.com?
D�ky za ka?dou odpov��.

-- http://email.seznam(tec)cz
-- email zdarma na cely zivot

Velke disky, BIOSy, overclock

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.2.1999 14:24:14

To je pravda. Posledni Celery 300A uz moc pretaktovat nejdou (zkousel jse=
m
dva posledni dobou a nesly - kouse se to). Lepe na tom jsou boxovane
(primo s chladicem od Intelu a s triletou zarukou). Ty mi zatim sly
pretaktovat vsechny, ale bouhuzel se prestaly vyrabet, takze je problem j=
e
v soucasnosti sehnat a jejich cena je vyssi nez Celeron 333 (myslim, ze
prave diky jejich bezproblemovemu chodu na vyssich frekvencich :-).

Mac

Tu=E8ek Roman wrote:

> Zalezi na kusu a na boardu

--
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
=3D Ing. Martin Kubecka - Amenit s.r.o. =3D
=3D Na Valech - budova Dytron, 741 01 Novy Jicin =3D
=3D telefon/fax: +420 656 706203 mobil: +420 603 265926 =3D
=3D http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =3D
=3D ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =3D
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

rucne cucanie dat z TQuery

[*] Lubos <bruce(zv)pobox.sk> - 25.2.1999 14:25:36

Caute All !

Mam dalsi blby problemik. Uz som to niekde videl v helpe,
ale ani zaboha sa k tomu neviem znovu dostat.
Takze by som potreboval postupne cuckat vysledky z vykonaneho Query.
Ked to bachnem do TDBTable, tak je vsetko OK, ale ja to potrebujem
vyplut do suboru.

Vopred vdaka .

/LH


F.Piette - TSMTPClient

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 25.2.1999 14:31:01

Jaky je Charset pro cestinu. Defaultne je nastaveny : 'iso 8859-1' to
znetvori ceske znaky. Diky moc.
PS . Asi to bude v nejakem RFC, ale bohuzel to ted rychle nemuzu
zjistit. Pokud vite poradte prosim.

MSSQL vs. TTable + TDBGrid

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.2.1999 14:35:56

Svatos ma svatou pravdu ;-)))

Mac

P.S. Sorry Hynku ;-)

Hynek svatos wrote:

> Nechci nikomu vnucovat svuj nazor, ale myslim si, ze spojeni SQL
> databazoveho stroje a TTable je hodne spatna alternativa. Radsi
> bych to asi prepsal na ty Query ...

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================

Pozor na MS SQL Server!

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.2.1999 14:44:32

Taky uz jsem na to narazil, ale podle me zalezi na tom, jak je nastaveny
jazyk pro daneho uzivatele na SQL serveru, nebo se pletu? Tam je ted
mozne zvolit pro kazdeho uzivatele zvlast jeho narodni prostredi. Takze
pokud tam nastavis English tak by to melo chodit tak jako predtim. Ovsem
pripada mi to taky stupidni - zmenis nastaveni uzivatele na serveru a
prestane ti chodit klient (ale moc jsem se tim zatim nezabyval, takze
tam treba je jeste nejaka finta, jak si usetrit praci). Z tohoto duvodu
(teda nejen z tohoto ;-) posilame veskere udaje do serveru pomoci
parametru a je to.

Mac

Polak Jiri wrote:

> Zjistil jsem jednu podle meho nazoru zvlastni vlastnost
> MS SQL Serveru 7.0. Posudte sami:
>
> 1)
> Pri volani SQL z klienta zohlednuje SQL Server
> narodni vlastnosti usera.
> Takze nemohu datum 31. prosince 1999
> posilat z frontendu v textovem formatu formatu
> (napr '1999-12-31'), protoze pro nektere uzivatele
> by zamenil mesic se dnem).
>
> 2)
> Pri behu procedury na serveru jsou zohlednovany
> vlastnosti klienta. Konkretne funkce
> DatePart(weekday, (zv)Datum) vrati pro nektere uzivatele
> (opet podle narodnich vlastnosti)
> 1 n=ECkdy pro nedeli, jindy pro pondeli.
> BTW obdobna funkce v Delphi DayOfWeek vraci vzdy 1 pro nedeli.
>
> Me to pripada dost stupidni. Samozrejme existuje reseni,
> muzeme nastavit promennou (zv)(zv)DateFirst, je to
> ale prace navic. Myslim, ze na serveru by se mel program
> chovat podle nastaveni serveru a ne podle jeho klientu.
> Nebo chapete nekdo smysl?

--
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
=3D Ing. Martin Kubecka - Amenit s.r.o. =3D
=3D Na Valech - budova Dytron, 741 01 Novy Jicin =3D
=3D telefon/fax: +420 656 706203 mobil: +420 603 265926 =3D
=3D http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =3D
=3D ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =3D
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

F.Piette - TSMTPClient

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

iso 8859-2 (?) my ho pouzivame...

> ----------
> Od: Mor=9Eol Marian[SMTP:Marian.Morzol(zv)ostrava.aksignal(tec)cz]
> Odesl=E1no: 25. =FAnora 1999 14:31
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: F.Piette - TSMTPClient
>=20
> Jaky je Charset pro cestinu. Defaultne je nastaveny : 'iso 8859-1' to
> znetvori ceske znaky. Diky moc.
> PS . Asi to bude v nejakem RFC, ale bohuzel to ted rychle nemuzu
> zjistit. Pokud vite poradte prosim.
>=20

Pozor na MS SQL Server!

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 25.2.1999 14:53:25

> > Zjistil jsem jednu podle meho nazoru zvlastni vlastnost
> > MS SQL Serveru 7.0. Posudte sami:
> >
> > 1)
> > Pri volani SQL z klienta zohlednuje SQL Server
> > narodni vlastnosti usera.
> > Takze nemohu datum 31. prosince 1999
> > posilat z frontendu v textovem formatu formatu
> > (napr '1999-12-31'), protoze pro nektere uzivatele
> > by zamenil mesic se dnem).
>
> Reseni: udelat programovy server, ktery pustis na pocitadle s SQL
> Serverem. Z klienta budes posilat datum napriklad jako TDateTime,
> a az tvuj server to ulozi do databaze ve spravnem formatu. Protoze
> vsak licencni politika na MIDAS je naprosto nepruchodna, vidim
> reseni prave v ADO - to si o vicevrstvou architekturu primo samo
> rika.

Diky, reseni mam - s novym ODBC klientem funguje
dobre komunikace pres parametry a predavam to jako datetime.
To chybujici reseni bylo z doby, kdy byl nepouzitelny ODBC driver
a nativni driver neumel predavat datetime jako parametr (7.0 Beta).

Zbysku, ty porad propagujes to ADO. Myslis si, ze zavrzenim
microsofti technologie a prijetim jine microsofti technologie
se situace zlepsi? Nedomyslenosti tam budou urcite porad.

Zmet technologii a standardu Microsoftu, ktery vytvori ruzne
databazove technologie (ODBC, ADO, DAO,...) a potom mezi nimi dela
zmatky me desi, kdyz jsem videl nakres toho smodrchance
tak jsem doufal, ze microsoft uz brzy zkrachuje.

>
> > Me to pripada dost stupidni. Samozrejme existuje reseni,
> > muzeme nastavit promennou (zv)(zv)DateFirst, je to
> > ale prace navic. Myslim, ze na serveru by se mel program
> > chovat podle nastaveni serveru a ne podle jeho klientu.
> > Nebo chapete nekdo smysl?
>
> A ted si predstav - MS v tom ma bordel, v BDE je bordel (jsou tam
> dosta zavazne chyby) - jaky muze byt vysledek? No jeste vetsi
> bordel. :-)

Nevim, co je tady k smichu :-)

Jura

Pozor na MS SQL Server!

[*] Lubo Fule <fule(zv)sct.sk> - 25.2.1999 15:02:52

Myslim, ze riesenie je jednoduchsie. Zohladnovanie narodnych vlastnosti
klienta sa da vypnut. V ODBC je take "zaskrtavatko" (Use regional
settings...), ktorym sa zapne alebo vypne pouzivanie narodnych nastaveni. Aj
pre Native SQLLink sa to da vypnut zaskrtavatkom "Use international
settings" v "Client Network Utility" na zalozke "DB Library Options",
pretoze SQLLink na MSSQL pouziva DB Library.

Lubo

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Zbysek Hlinka
Sent: Thursday, February 25, 1999 1:57 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Pozor na MS SQL Server!


Polak Jiri wrote:

> Zjistil jsem jednu podle meho nazoru zvlastni vlastnost
> MS SQL Serveru 7.0. Posudte sami:
>
> 1)
> Pri volani SQL z klienta zohlednuje SQL Server
> narodni vlastnosti usera.
> Takze nemohu datum 31. prosince 1999
> posilat z frontendu v textovem formatu formatu
> (napr '1999-12-31'), protoze pro nektere uzivatele
> by zamenil mesic se dnem).

Reseni: udelat programovy server, ktery pustis na pocitadle s SQL
Serverem. Z klienta budes posilat datum napriklad jako TDateTime,
a az tvuj server to ulozi do databaze ve spravnem formatu. Protoze
vsak licencni politika na MIDAS je naprosto nepruchodna, vidim
reseni prave v ADO - to si o vicevrstvou architekturu primo samo
rika.

> 2)
> Pri behu procedury na serveru jsou zohlednovany
> vlastnosti klienta. Konkretne funkce
> DatePart(weekday, (zv)Datum) vrati pro nektere uzivatele
> (opet podle narodnich vlastnosti)
> 1 n�kdy pro nedeli, jindy pro pondeli.
> BTW obdobna funkce v Delphi DayOfWeek vraci vzdy 1 pro nedeli.

Dtto.

> Me to pripada dost stupidni. Samozrejme existuje reseni,
> muzeme nastavit promennou (zv)(zv)DateFirst, je to
> ale prace navic. Myslim, ze na serveru by se mel program
> chovat podle nastaveni serveru a ne podle jeho klientu.
> Nebo chapete nekdo smysl?

A ted si predstav - MS v tom ma bordel, v BDE je bordel (jsou tam
dosta zavazne chyby) - jaky muze byt vysledek? No jeste vetsi
bordel. :-)


S pozdravem

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

Komponenty? K �emu? - trocha teor

[*] GRAAS Jan, Mgr. <Jan.GRAAS(zv)otr.br.ds.mfcr(tec)cz> - 25.2.1999 15:20:45

standa kunc
>>Jsem za=E8=E1te=E8n=EDk po=F8=E1d =E8tu o n=ECjak=FDch komponent=E1ch. =
Co to je? Na co se to
>>pou=BE=EDv=E1? Jak to >(uni)instalovat? Existuje je=B9t=EC n=ECjak=FD s=
erver (=E8esk=FD),
>>kter=FD by informoval stejn=EC jako >www.undu.com?

Komponentove programovani je system vyuzivajici reseni problematiky
znovupouzitelnosti dilcich aplikaci. Myslenka spociva v definovani
programovych znovupouzitelnych entit zapouzdrujicich krome sameho
fragmentu kodu i doplnkove data, nesouci informace napriklad o
vlastnostech dane komponenty. Jde o plug-in moduly, plne integrovane do
vyvojarskych prostredi na platforme Windows ve forme popisnych souboru
distribuovanych spolecne s vyslednou aplikaci.
Vyodou takovehoto postupu je moznost koexistence aplikacnich
programatoru a vicerych uzce specializovan=FDch dodavatelu zabyvajicich s=
e
vyvojem =84instantnich" kousku aplikaci.

V Delphi lze pouzivat a tvorit 4 hlavni typy komponent: standardni
ovladace, zakaznicke ovladace, graficke ovladace a nevizualni
komponenty.=20
Soucasti Delphi je knohovna vizualnich komponent VCL. Skoro vsechny
komponenty, ktere se v Delphi pouzivaji, poch=E1zeji z TComponent.
TComponent je zajimava svou schopnosti vlastnit jine komponenty.=20
VCL je zalozena na objektovem modelu a je navrzena pro praci ve
vizualnim prostredi Delphi. Napriklad misto tvorby oken tradicnim
postupem muzete modifikovat charakteristiky chovani a vzhledu komponent
pri vizualnim n=E1vrhu programu.=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
Jan Graas, Otrokovice, CR
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
>V korespondenci se mnou muzete vyuzit software
podporujici MIME ISO-8859-2 a psat vse v cestine

Komponenty? K �emu? - troch

[*] GRAAS Jan, Mgr. <Jan.GRAAS(zv)otr.br.ds.mfcr(tec)cz> - 25.2.1999 15:31:02

standa kunc
>>>Jsem za=E8=E1te=E8n=EDk po=F8=E1d =E8tu o n=ECjak=FDch komponent=E1ch.=
Co to je? Na co se to
pou=BE=EDv=E1?=20

Komponenty jsou stavebni bloky kazde aplikace psane v Delphi, a zaklad
knihovny vizualnich komponent Delphi. Kazda stranka v palete komponent
zobrazi skupinu ikon reprezentujici komponenty pouzivane k navrhu vasi
aplikace.=20
Komponenty jsou bud vizualni nebo nevizualni. Kazda komponenta ma
specificke vlastnosti, ktere umoznuji rizeni vasi aplikace. Tyto
atributy jsou vlastnosti, udalosti a metody.=20
Horizontalni velikost palety komponent muzete menit presouvanim del=EDcic=
h
car, ktere lezi mezi paletou komponent a speed barem.
Paleta komponent poskytuje bublinovou napovedu. Bublinova napoveda
zobrazi maly popisek obsahujici jmeno nebo kratky popis tlacitka, kdyz
na nem kurzorem setrvate dele nez jednu sekundu. K povoleni bublinove
napov=ECdy, vyberte Show Hints ze Speed Menu palety komponent.
Vyberte jednu z n=E1sledujicich stranek pro informaci o jejich
komponentach a jejich funkcich.

Standard components Standardni Windows komponenty
Additional components Uzivatelske komponenty
Windows 95 components Obecne komponenty pro Windows 95
Data Access components Komponenty pro databazovy pristup
Data Controls components Komponety databazovych ridicich prvku
Windows 3.1 components Windows 3.1 komponenty
System components Systemove komponenty

Komponenty na strankach VBX a Samples jsou poskytnuty pouze jako ukazky.
Zdrojovy kod komponent na strance Samples lze nalezt v adresari v
DELPHI x.x\SOURCE\SAMPLES standardni instalace.

Pozor na MS SQL Server!

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.2.1999 15:51:56

Polak Jiri wrote:

> Zbysku, ty porad propagujes to ADO. Myslis si, ze zavrzenim
> microsofti technologie a prijetim jine microsofti technologie
> se situace zlepsi? Nedomyslenosti tam budou urcite porad.

Nejen ze budou, ale i jsou, ale zatim to vypada funkcne ;-). Teda neco
;-)

> Zmet technologii a standardu Microsoftu, ktery vytvori ruzne
> databazove technologie (ODBC, ADO, DAO,...) a potom mezi nimi dela
> zmatky me desi, kdyz jsem videl nakres toho smodrchance
> tak jsem doufal, ze microsoft uz brzy zkrachuje.

Kdyz se na to mrknes poradne, tak zjistis, ze zase takovy smodrchanec to
neni ;-).

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================

MS SQL 7 + ulozene procedury

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.2.1999 15:55:39



Zbysek Hlinka wrote:

> Zkousel jsem vyjit alespon od TDataSet, ale kdyz jsem si prohlizel
> jeho streva, dosel jsem k zaveru, ze daleko jednodussi a
> pruzracnejsi bude napsat vse zcela znovu. Ma to vsak jeden hacek
> - budou se tomu muset prizpusobit i generatory tiskovych sestav.
> :-) Hi, lidi od Sinea, co vy na to? Chcete se zucastnit navrhu
> rozhrani uz od pocatku?

??? Procpak? Ja do toho teda tak moc nevidim, ale podle me by mely byt
databazove komponenty kompatibilni se vsim ostatnim jako jsou DBEdit,
DBGrid a spol. vcetne QuickReportu atd. Jinak je to podle mne
nepruchozi.

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================

Datum a nazev BIOSu ....

[*] Erik Salaj <erik(zv)dodo.sk> - 25.2.1999 16:05:45

Na NT-cku je mozne zistit datum BIOS-u pomocou komponentu MemPort
(je to shareware na http://www.cybermagic.co.nz/winsoft ) takto:

MemPort1.Close;
MemPort1.Address :=3D 0;
MemPort1.Length :=3D $100000;
MemPort1.Open;

BiosDate :=3D 'BIOS date: ';
for i :=3D 0 to 7 do
BiosDate :=3D BiosDate + MemPort1.Memory[$FFFF5 + i];
ShowMessage(BiosDate);

Erik Salaj
erik(zv)dodo.sk

-----Original Message-----
From: Fryz, Zdenek <fryz(zv)dcb(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 23 February 1999 12:08
Subject: RE: Datum a nazev BIOSu ....>v Delphi neexistuje pole 'mem', tak jako P7.0, ale nasel jsem funkci (ve
>SWAGu), ktera by mela resit tento problem:
>
>function ReadMem (address : longint) : byte; assembler;
>asm
> les di, address;
> mov al, es:[di];
>end;
>
>bohuzel vsak Delphi vypisuj=ED hlaseni
>- na prvnim radku fce: 'Operand size mismatch'
>- na druhem radku fce: 'Invalid register combination'
>
>protoze neznam assembler, nevim v cem je problem, umel by nekdo poradit =
?
>
>za pripadne odpovedi dekuji
>
>Zdenek Fryz
>
>> -----P=F9vodn=ED zpr=E1va-----
>> Od: Jirka [SMTP:virt(zv)pepa(tec)cz]
>> Odesl=E1no: 22.02.1999 10:55
>> Komu: delphi-l(zv)fwd(tec)cz
>> P=F8edm=ECt: Re: Datum a nazev BIOSu ....
>>
>> Ahoj
>> datum Biosu v P7.0:
>>
>> program datbios;
>> uses dos;
>> var
>> b:integer;
>> begin
>> b :=3D 0;
>> write('Datum biosu je: ');
>> while b < 8 do
>> begin
>> write(chr(mem[$f000:$fff5 + b]));
>> inc(b);
>> end;
>> writeln('.');
>> end.
>>
>> Vyrobce biosu jsem taky nekde delal, ale nemuzu to ted najit.
>>
>>
>> Cau
>>
>> Jirka Virt
>>
>> email: virt(zv)pepa(tec)cz


Velikost View.Height se meni sama?

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.2.1999 16:17:49

Puvodni zprava, kterou napsal Karel Kral dne 24 Feb 99,:

> Muzete mi poradit?
> M=E1m na formulari TEdit. Nastavim velikost Height napr. na 23. Pak tim=
to
> editem pohnu na jinou pozici a najednou ma velikost 25! Kdo to udelal a=
co

To asi udelalo Delphi :-))) Nastav AutoSize na FALSE a melo by to pomoci.=
..


S pozdravem
Petr Zahradnik, pocitacovy expert

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


Datum a nazev BIOSu ....

[*] Peter Arbet <arbet(zv)fred.utc.sk> - 25.2.1999 16:17:53

Hi.

>v Delphi neexistuje pole 'mem', tak jako P7.0, ale nasel jsem funkci (ve

Co takto skusit zadeklarovat:

var
Mem:array [0..2147483646] of byte absolute 0;

Pouzivam to ako simulaciu klasickeho Mem z Pascalu.

Bye

RAZIIARS

e-mail: arbet(zv)px.psg.sk
ICQ: 29272626


Nastaveni mrizky pri navrhu formulare

[*] Peter Arbet <arbet(zv)fred.utc.sk> - 25.2.1999 16:40:39

>> Muzete mi prozradit, jakou velikost mrizky mate nastavenou v Delphi. A
>> pouzivate Snap to grid? At zkousim jak zkousim, nic se mi nelibi. --

>Ja to mam nastavene na 5 a snap, aby se mi to zarovnavalo.

Ja tiez. Uplne rovnako.

RAZIIARS

e-mail: arbet(zv)px.psg.sk
ICQ: 29272626

Microsoft Outlook guarantees complete sending of this messa


Odcitani casu

[*] Jan Ko�� <honza(zv)skoda-ujp(tec)cz> - 25.2.1999 16:41:45


Chtel bych se zeptat.
Lze nejakym zpusobem odecist cas napr.
02:00 - 05:00 aby mi vyslo -03:00

Zkousel jsem toto.

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := TimeToStr(StrToTime('02:00') - StrToTime('05:00'));
end;

No a vyslo mi kladny 3:00:00
V cem je problem?


Predem dekuji za odpoved.

Jan Koci


///////////////////////////////////////////
mail: honza.koci(zv)mujmail(tec)cz

Velikost View.Height se meni sama?

[*] Peter Arbet <arbet(zv)fred.utc.sk> - 25.2.1999 16:54:08

>Muzete mi poradit?
>M=E1m na formulari TEdit. Nastavim velikost Height napr. na 23. Pak timt=
o
>editem pohnu na jinou pozici a najednou ma velikost 25! Kdo to udelal a
>co s tim?

Hi.

Skusal si nastavit AutoSize na false?

Bye

RAZIIARS

e-mail: arbet(zv)px.psg.sk
ICQ: 29272626

Microsoft Outlook guarantees complete sending of this mess


Odcitani casu

[*] Peter Rus <peterrus(zv)intesys(tec)cz> - 25.2.1999 17:01:29

Ahoj!,

Zkousel jsi jeste dat nuly pred ten cas? Takhle on odecita spis hodiny
od hodin:
"0:02:00" - takhle jsou to minuty.

S pozdravem

Peter

Jan Ko=E8=ED wrote:

> Edit1.Text :=3D TimeToStr(StrToTime('02:00') - StrToTime('05:00'));

rucne cucanie dat z TQuery

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 25.2.1999 17:15:45

Ahoj,=20

nevim, jestli jsem to pochopil dobre, nejsem zadny odbornik na databaze,
ale snad...

Kdyz nad TTable vykonas Query, muzes pouzit metody pro pohyb v tabulce
(myslim MoveNext apod.) a z aktualniho recordu vzit cokoli a placnout do
souboru.

********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************

> -----P=F9vodn=ED zpr=E1va-----
> Od: Lubos [SMTP:bruce(zv)pobox.sk]
> Odesl=E1no: 25. =FAnora 1999 14:26
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: rucne cucanie dat z TQuery
> D=F9le=BEitost: Velk=E1
>=20
> Caute All !
>=20
> Mam dalsi blby problemik. Uz som to niekde videl v helpe,
> ale ani zaboha sa k tomu neviem znovu dostat.
> Takze by som potreboval postupne cuckat vysledky z vykonaneho Query.
> Ked to bachnem do TDBTable, tak je vsetko OK, ale ja to potrebujem
> vyplut do suboru.
>=20
> Vopred vdaka .
>=20
> /LH

Velikost View.Height se meni sama?

[*] Ing. Jaroslav K�e�ek - 25.2.1999 18:27:45


>Muzete mi poradit?
>M=E1m na formulari TEdit. Nastavim velikost Height napr. na 23. Pak timt=
o
>editem pohnu na jinou pozici a najednou ma velikost 25! Kdo to udelal a
>co s tim?


Pokud mas nastavenou autosize property, tak height se nastavi podle vysky
pisma na
Font.Height + autobus
A to ve fazi behu programu ne navrhu.

Jaroslav K=F8e=E8ek

**********************************************
Ing. Jaroslav K=F8e=E8ek
-------------------------------------------------------------
GRAFEX - software =B9it=FD na m=EDru
- harware pro Va=B9e pot=F8eby
-------------------------------------------------------------
http://web.iol(tec)cz/grafex
mailto:grafex(zv)iol(tec)cz
-------------------------------------------------------------
tel + SMS: +420.603.226103
tel + fax: +420.327.761992
**********************************************

Oddelovac cisel

[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 25.2.1999 19:10:10

Ahoj,

nebyl jste prosim nekdo nekdy nucen zjistit jaky
je nastaven oddelovac cisel, jestli tecka nebo carka.
Myslim tim globalni nastaveni Windows.
V D1 bohuzel neexistuje fce GetLocaleInfo().
Sla by pouzit nejaka nahrada pro D1.

Za kazdy napad dik

S pozdravem a diky
================================
> Pavel Malinsky; spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================
GSM: 0602 652 203


REINSTALACE WOKEN

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 25.2.1999 19:34:59

Nerikejte, ze nevite: To jste nikdo neresil podobny problem??

-----Original Message-----
From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
To: Delphi cz <delphi-l(zv)fwd(tec)cz>
Date: 24. =FAnora 1999 23:57
Subject: REINSTALACE WOKEN


>Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam drobny
>problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych spoustu
>komponent, expertu, atd. No a jak to tak byva, me se to nechce posleze
>priinstalovavat jedno po druhem.
>
>Ty wokna musim nejdrive SMAZAT!
>
>Napadlo me, ze bych exportoval registry, kde je delphi a po instalaci
>importoval
>Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva, ale
>nevim jake....:((
>
>Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni mis=
to,
>fungovaol by Delphi korektne???
>
>dik za jakoukoliv radu
>
>Serbajlo Pavel
>ICQ: 20849973
>email: serb(zv)mikulov.sol(tec)cz
>www: www.nemamstranky(tec)cz
>
>

REINSTALACE WOKEN

[*] Michal �viga <proton(zv)iol(tec)cz> - 25.2.1999 21:28:52

Nevim, co si kam uklada Delphi, ale existuje program pro spravu a
vyhledavani DLL
(ktera patri ke kteremu programu atp.).
Tusim, ze to bylo na nekterem CD CHIP ke konci roku. Uz si ale nepamatuju
jak se to jmenovalo, ale bylo to neco s DLL.

S pozdravem

Michal =A9viga (Sviga)
PROTON
CD KATALOG AMPER '99
http://www.cd-amper(tec)cz
mailto:proton(zv)iol(tec)cz
ICQ:20510677
tel., fax:02/65 15 052
mobil:0602/ 207 557
-----P=F9vodn=ED zpr=E1va-----
Od: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. =FAnora 1999 19:46
P=F8edm=ECt: Re: REINSTALACE WOKEN


Nerikejte, ze nevite: To jste nikdo neresil podobny problem??

-----Original Message-----
From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
To: Delphi cz <delphi-l(zv)fwd(tec)cz>
Date: 24. =FAnora 1999 23:57
Subject: REINSTALACE WOKEN


>

REINSTALACE WOKEN

[*] Rudolf Balada <rudolf.balada(zv)parlament(tec)cz> - 25.2.1999 22:30:51

Svym zpusobem jsem tento problem vyresil instalaci Windows NT, protoze u =
W95
jsem mel tendenci z nich delat gamesnickou konzoli a zpusobovat jim tim
velke problemy se stabilitou. Takova instalace vcetne delphi nevydrzela d=
ele
jak 6-7 tydnu a pak znovu cele preinstalovat. V pripade Windows NT se da =
ta
doba protahnout az cca na 3/4-1 rok (takova cetnost reinstalace uz se da
prezit).

Mimochodem zalohovani registru jsem taky zkousel ... doporucuji jit touto
cestou jen pokud opravdu velmi dobre vis co delas (mimochodem nestabilita
systemu se muze pri zazalohovani a obnove registru velmi dobre prenest na
novou instalaci :-()). Kdysi jsem mel napad, ktery jsem nezrealizoval, al=
e
melo by byt schudne jej dokoncit. Lze se povesit na system a dostavat od =
nej
informace kdo a co prave zapisuje do registru. Kdyz se takovej programek
spusti jen na dobu instalace, tak si muze hezky zapamatovat co se tam del=
o a
pak to pripadne zopakovat resp. zrusit :)).

Rudolf Balada
kancler(zv)parlament(tec)cz

-----Original Message-----
From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 25. =FAnora 1999 19:50
Subject: Re: REINSTALACE WOKEN


>Nerikejte, ze nevite: To jste nikdo neresil podobny problem??
>
>-----Original Message-----
>From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
>To: Delphi cz <delphi-l(zv)fwd(tec)cz>
>Date: 24. =FAnora 1999 23:57
>Subject: REINSTALACE WOKEN
>
>
>>Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam drobny
>>problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych spoustu
>>komponent, expertu, atd. No a jak to tak byva, me se to nechce posleze
>>priinstalovavat jedno po druhem.
>>
>>Ty wokna musim nejdrive SMAZAT!
>>
>>Napadlo me, ze bych exportoval registry, kde je delphi a po instalaci
>>importoval
>>Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva, ale
>>nevim jake....:((
>>
>>Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni
misto,
>>fungovaol by Delphi korektne???
>>
>>dik za jakoukoliv radu
>>
>>Serbajlo Pavel
>>ICQ: 20849973
>>email: serb(zv)mikulov.sol(tec)cz
>>www: www.nemamstranky(tec)cz
>>
>>

Aplikace bez formu

[*] Petr Medek <xmedekp(zv)sun.felk.cvut(tec)cz> - 25.2.1999 22:48:37

Zdravim
Poteboval bych trochu teorie o programovani windows.
Mam jednoduchou aplikaci, jejiz beh je indikovan jenom tray ikonou. Mam
pusteny casovac a hlidam si napr. spusteny nejakeho exe v urcitou hodinu.
Lze to napsat bez pouziti unity Forms (potazmo instance TApplication)?
Vypadalo to ze lze, ale nedovedu vyresit pasivni cekani, kdyz neobsluhuji
casovac.

Nezbylo mi nic jineho, nez
repeat
Application.ProcesMessages;
until JeKonec // globalni promena, kterou nahodim pri obsluze casovace

coz je ovsem s pouzitim unity Forms.

Petr Medek


Komponenty? K �emu? - trochu lidsky :-

[*] Mirun <forcom(zv)telecom(tec)cz> - 25.2.1999 23:00:49

Z jineho oboru:
---------------------
V davnych dobach se elektronicke pristroje vyrabely tim zpusobem, ze doty=
cny
technik si nakoupil spoustu tranzitoru, odporu a dratu, studoval spoustu =
let
literaturu a ke konci zivota sestavil na zaklade vsech svych znalosti rad=
io
se zesilovacem.
Pak se zacaly vyrabet integrovane obvody. Dnesni technik si vezme priruck=
u,
kde se docte ze cerveny drat je +, modry -, vezme katalog, koupi si dva
integrovane obvody - jeden pro prijem radia, druhy je zesilovac, a vezme =
si
oba zminene draty, dle prirucky je propoji s baterii a obema obvody. Za
10minut udelal to, co prvnimu trvalo 25let.
Z delphi:
------------
V davnych dobach se programy vyrabely tim zpusobem, ze dotycny programato=
r
studoval spoustu prirucek, ucil se mnoho matematiky, a ke konci zivota se=
mu
konecne podarilo naprogramovat Notepad, ktery mel 20000 radku.
Pak se vymyslelo objektove programovani, a komponenty. Dnesni programator=
si
vezme prirucku Getting Started, podlozi s ni stul, na palete komponent v
Delphi si vezme komponentu TMemo, polozi ji na formular, vezme komponentu
TMainMenu, polozi ji na formular, napise 50 radku, a stiskne Run. Za 10mi=
nut
udelal to, co prvnimu trvalo 25let.

S komponentami je to jako s integrovanymi obvody - staci vedet co delaji,=
a
nemusis se zabyvat tim, jak to delaji. Nemusis se tolik soustredit na to =
jak
to udelat, ale co chces udelat. Proste kdyz te rano napadne, ze
naprogramujes CorelDraw, muzes cely den hrat fotbal, vecer prijdes domu,
spustis Delphi, vezmes z palety komponentu TCorelDraw, pustis ji na
formular, a mas hotovo....

Rika se tomu RAD - Rapidni vyvoj aplikace.

PS: Toto neni reklamni akce nejmenovane firmy (cti Inprise), nebot praxe =
je
trochu slozitejsi a vetsinou v rozporu z vyse uvedenym extremne nadneseny=
m
popisem.

Mirun



-----P=F9vodn=ED zpr=E1va-----
Od: GRAAS Jan, Mgr. <Jan.GRAAS(zv)otr.br.ds.mfcr(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 25. =FAnora 1999 15:47
P=F8edm=ECt: RE: FW: Komponenty? K =E8emu? - trocha praxe


standa kunc
>>>Jsem za=E8=E1te=E8n=EDk po=F8=E1d =E8tu o n=ECjak=FDch komponent=E1ch.=
Co to je? Na co se to
pou=BE=EDv=E1?

Aplikace bez formu

[*] Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz> - 26.2.1999 00:45:12

Petr Medek wrote:

> Zdravim
> Poteboval bych trochu teorie o programovani windows.
> Mam jednoduchou aplikaci, jejiz beh je indikovan jenom tray ikonou. Mam
> pusteny casovac a hlidam si napr. spusteny nejakeho exe v urcitou hodinu.
> Lze to napsat bez pouziti unity Forms (potazmo instance TApplication)?
> Vypadalo to ze lze, ale nedovedu vyresit pasivni cekani, kdyz neobsluhuji
> casovac.
>
> Nezbylo mi nic jineho, nez
> repeat
> Application.ProcesMessages;
> until JeKonec // globalni promena, kterou nahodim pri obsluze casovace
>
>

Kdyz se podivas do unity Forms na metodu TApplication.ProcessMessages, tak
najdes tohle:

procedure TApplication.ProcessMessages;
var Msg: TMsg;
begin
while TApplication.ProcessMessage(Msg) do {loop};
end;

function TApplication.ProcessMessage(var Msg: TMsg): Boolean;
var Handled: Boolean;
begin
Result := False;
if PeekMessage(Msg, 0, 0, 0, PM_REMOVE) then
begin
Result := True;
if Msg.Message <> WM_QUIT then
begin
// nasledujici kod vymazes...
Handled := False;
if Assigned(FOnMessage) then FOnMessage(Msg, Handled);
if not IsHintMsg(Msg) and not Handled and not IsMDIMsg(Msg) and
not IsKeyMsg(Msg) and not IsDlgMsg(Msg) then
begin
// ... tohle nechas:
TranslateMessage(Msg);
DispatchMessage(Msg);
// end;
end
else
FTerminate := True; // aplikace dostala WM_QUIT...
end;
end;

Kdyz tam nechas tu smycku s PeekMessage ... TranslateMessage a
DispatchMessage, tak to bude normalne
chodit...

K.

--
<TT>
/* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
/* xcibulka(zv)hwlab.felk.cvut(tec)cz */
/* KCibulka(zv)seznam(tec)cz */
/* ardour(zv)usa.net */
/* OnLine: If you have ICQ my ICQ# is 4111110. */
/* If you don't have ICQ you can page me through: My Personal */
/* Communication Center: http://wwp.mirabilis.com/4111110 */
/* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
/* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
/* Msgs with word "SMS:" in subject will be sent to my GSM phone */
</TT>

QuickReport a DbMemo

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.2.1999 00:55:41

------- Forwarded Message Follows -------
Send reply to: "Lubom=EDr Kupka" <saton(zv)box(tec)cz>
From: info(zv)saton(tec)cz (SATON Glass s.r.o.)

Melo by stacit napojit to na QRDBText a nastavit wordwrap:=3Dtrue.
Mne to moc nechodilo, takze jsem toto pole roztahl na sirku stranky a
nastavil autosize na false - v kombinaci s wordwrap=3Dtrue by to melo del=
at,
to co chces.
Kuba
-------------------------------------------------------------------------=
-
-- --------------------------------------- SATON Glass, s.r.o. - sluzby v
oblasti programov=E1n=ED a v=FDpocetn=ED techniky Klicperova 26, Brno, 62=
8 00 CR
Tel./z=E1zn./fax.:+420 5 44217819 Mob:+420 603 429505 mail: saton(zv)box(tec)cz =
=20
ICQ : 4747183
-------------------------------------------------------------------------=
-
-- ---------------------------------------- -----P=F9vodn=ED zpr=E1va----=
- Od:
jdanek(zv)fnbrno(tec)cz <jdanek(zv)fnbrno(tec)cz> Komu: delphi-l(zv)fwd(tec)cz
<delphi-l(zv)fwd(tec)cz> Datum: 25. =FAnora 1999 1:41 P=F8edm=ECt: QuickReport a=
DbMemo


>
>Mam takovy problem. V Quick reportu jsem chtel vytisknout obsah memo
>polozek jako jednotlive zaznamy pod sebe jako kdyz se tiskne napriklad
>znakova polozka z tabulky. Nenasel jsem komponentu na tuto polozku (tedy
>neco jako TQRDbMemo). Kdyz to dam do TQRDbtext, tak mi text jde "za roh"
>a nepokracuje dale. Nevim vubec jestli to jde.
>

> Diky vsem
> Jozka
> jdanek(zv)fnbrno(tec)cz
>
>

Delphi z USA

[*] Ing. Karel Chramosil <Karel.Chramosil(zv)iol(tec)cz> - 26.2.1999 03:30:08


-----P=F9vodn=ED zpr=E1va-----
Od: Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 24. =FAnora 1999 22:58
P=F8edm=ECt: Delphi z USA


>Ahoj delphisti.
>Mame moznost koupit Delphi Builder i jine
>Inprise produkty primo z USA.
>Tudiz levneji. Pokud by jste meli zajem
>piste na soukromy mail cwas(zv)vtupv(tec)cz.
>
>
>
>

Ahoj obchodn=EDci

Po=B9lete cen=EDk Karel.Chramosil(zv)iol(tec)cz


Zakaz usporneho rezimu

[*] Ing. Ji�� Kub��ek - 26.2.1999 06:37:12

Zdravim spriznene duse, zabyvajici se DELPHI a opakuji svou prosbu o radu.
Jak zakazat v programu (D1) aby se po case PC nepreplo do usporneho rezimu.
Resim komunikacni program a "usnuti" PC dela pak problemy. Myslel jsem, ze
to vyresim obcasnym generovanim zpravy, simulujici pohyb mysi nebo tuk do
klaves, ale neuspel jsem.Stourat do registru bych nerad a nic jineho me
nechce napadnout.
Aspon mi nekdo prosim reknete, ze je to pitoma otazka, nebo neresitelna
(cemuz neverim).

Jiri Kubicek

Znacka do THeader [2]

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 26.2.1999 06:39:00

Ahoj,

potreboval bych dat do THeader sekce nejakou znacku (maly bmp
obrazek). Je to mozne nejak jednoduse udelat? Diky

Jaro B.

pomoc

[*] Martin <geoplan(zv)pp.sinet.sk> - 26.2.1999 06:49:42

Zdravim,

prosim pomozte mi niekto vyriesit nasled. problem. Uz si neviem rady.
Ale ni pouzitim komponenty QRCompositeRepor, pretoze Delphi 2 ju
neobsahuju, ani pouzitim komercnych komponent, pretoze program ktory robim
je iba na moju potrebu prip. sa bude pouzivat iba vo vnutry firmy.

Mam napr. tabulku :
CZ HODINY
12/99 2
13/99 3
14/99 1
12/99 5
14/99 7

potrebujem z toho urobit zostavu, najlepsie pomocou Qreport aby najskor isli
vsetky riadky ako su v tabulke a potom aby urobil pre kazdu zakazku sucet
hodin, takze zostava by mala vyzerat asi takto :

12/99 2
13/99 3
14/99 1
12/99 5
14/99 7

sucty :

12/99 7
13/99 3
14/99 8

Potrebujem to na jednej zostave, prip. na jednom papiery.

dakujem za kazdu radu

Martin

Odcitani casu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.2.1999 07:29:07

Jan Ko=E8=ED wrote:

> Chtel bych se zeptat.
> Lze nejakym zpusobem odecist cas napr.
> 02:00 - 05:00 aby mi vyslo -03:00
>=20
> Zkousel jsem toto.
>=20
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> Edit1.Text :=3D TimeToStr(StrToTime('02:00') - StrToTime('05:00'));
> end;
>=20
> No a vyslo mi kladny 3:00:00
> V cem je problem?

Asi to bude tim, ze valid hodnoty jsou od 0:0:0:0 do 23:59:59:999.=20
Viz help k EncodeTime.


S pozdravem

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

MS SQL 7 + ulozene procedury

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.2.1999 07:29:07

Martin Kubecka wrote:

> Zbysek Hlinka wrote:
>
> > Zkousel jsem vyjit alespon od TDataSet, ale kdyz jsem si prohlizel
> > jeho streva, dosel jsem k zaveru, ze daleko jednodussi a
> > pruzracnejsi bude napsat vse zcela znovu. Ma to vsak jeden hacek
> > - budou se tomu muset prizpusobit i generatory tiskovych sestav.
> > :-) Hi, lidi od Sinea, co vy na to? Chcete se zucastnit navrhu
> > rozhrani uz od pocatku?
>
> ??? Procpak? Ja do toho teda tak moc nevidim, ale podle me by mely byt
> databazove komponenty kompatibilni se vsim ostatnim jako jsou DBEdit,
> DBGrid a spol. vcetne QuickReportu atd. Jinak je to podle mne nepruchozi.

Jenze to by muselo byt odvozene od TDataSet, a to zase povazuji
za nepruchozi ja. Edity a Gridy by nemel byt zas az takovy
problem dodelat, nejvetsi problemy vidim s tiskovymi sestavami.


S pozdravem

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

Pozor na MS SQL Server!

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.2.1999 07:29:07

Polak Jiri wrote:

> Zbysku, ty porad propagujes to ADO. Myslis si, ze zavrzenim
> microsofti technologie a prijetim jine microsofti technologie
> se situace zlepsi? Nedomyslenosti tam budou urcite porad.

Urcite. Technologie pouzita v BDE uz rozhodne lepsi nebude,
protoze se dal nevyviji. U ADO je aspon sance. Zkousim nad tim
delat zakladni komponenty, a umi to treba takove veci, jako refresh
jednoho zaznamu, zjistovani poctu nactenych vet u SQL a
podobne. Zkus neco takoveho u TQuery. :-)))

> Zmet technologii a standardu Microsoftu, ktery vytvori ruzne
> databazove technologie (ODBC, ADO, DAO,...) a potom mezi nimi dela
> zmatky me desi, kdyz jsem videl nakres toho smodrchance
> tak jsem doufal, ze microsoft uz brzy zkrachuje.

Hrabu se v tom treti den, a libi se mi to cim dal tim vic. Nemyslim,
ze by to byl takovy smodrchanec jako stavajici TDataSet a jeho
pitomci.
S pozdravem

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

REINSTALACE WOKEN

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 26.2.1999 07:29:40

Hi,
> Nerikejte, ze nevite: To jste nikdo neresil podobny problem??


Ne, protoze si nezasvinujeme pocitac ruznym balastam a na pocitaci mame
pouze SW, ktery nezbytne potrebujeme ke sve praci. Takze jen z CD
nainstalujeme okna, prekladace, slusny editor, nejake utility, z archivu
obnovime zdrojovky a jedem dal.

BTW, take si temer zadny soft neprizpusobujeme k obrazu svemu, protoze
1. kdyz prijdeme k jinemu pocitaci, byli bychom jako bez ruky
2. nez bychom preinstalovanou nebo upgradovanou verzi znovu doladili, asi by
nas z toho ....


Bye, pf

Ukryti programu - jak na to

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 07:39:53

Reseni je, jak jsem vcera overil, zcela trivialni:

(C++)
AfxGetMainWnd()->ShowWindow (SW_HIDE);

V tom okamziku aplikace zmizi z plochy, taskbaru i seznamu aplikaci v task
manageru. I nadale vsak zustava viditelny proces v seznamu procesu. Obavam
se, ze s tim tezko pujde co udelat, ale kdyz se vhodne pojmenuje
(CSYSMOD.EXE apod.), nikdo nebude mit tuchy o co jde.

Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby nebyla videt v
menu "Po spusteni", co?

To bych taky rad vedel...

Viktor Cistic


Ahoj vsichni...
...chtel bych totalne ukryt bezici program, tj. nejen schovat ikonu s
tasbaru,
ale aby program nebyl ani v TaskMangeru (po Ctrl-Alt-Del).
Vite jak na to...
...nekdo to vi urcite, protoze se tu o tom uz psalo, v archivu konference
jsem bohuzel uspesny nebyl a ani ve sve poste jsem to nenasel.

Diky...
...Dobra

(ShowWindow(Handle, SW_SHOW) necha zaznam v TaskListu a taky, pokud se
objevi
MessageDlg tak i behem toho, co je tento dialog na obrazovce se objevi
ikona
aplikace na taskbaru)

begin 600 WINMAIL.DAT
M>)\^(AT&`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`(zv)````4D4Z
M(%5K<GET:2!P<F]G<F%M=2 M(&IA:R!N82!T;P";"(zv)$%(zv) ,`#(zv)```,\'`(zv)`:
M``<`)P`U``4`6(zv)$!(( #``X```#/!P(`&(zv)`'`"4`"(zv)`%`"T!`0F `0`A````
M03=!-D)&030T-4-$1#(Q,3DS.3DP,#(P048S0D0Y,4,`00<!`Y &`#P'```A
M````"P`"``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`
M-(zv)``````0 `Y`# 6RM!28;X!'(zv)!P``$````0````56MR>71I('!R;V=R86UU
M``(!<0`!````&P````&^8*#YP_T!*F/,CA'2D:4`X"D/:O0`+%VH( `>`!X,
M`0````4```!33510`````!X`'PP!````%(zv)```'9I:W1O<BYL;W-T86M 8VAM
M:2YC>(zv)````,`!A#](zv)HHX`P`'$"H#```>``(zv)0`0```&4```!215-%3DE*12Q*
M04M*4T5-5D-%4D%/5D5224PL6D-%3$%44DE624%,3DDZ*$,K*RE!1EA'151-
M04E.5TY$*"DM4TA/5U=)3D1/5RA35TA)1$4I.U943TU/2T%-6DE+54%03$E+
M``````(!"1 !````(P0``!\$``"W!0``3%I&=?/3;CT#``H`<F-P9S$R-1<!
M0P$T"V!N#A P,CD=`?<(zv)`J0#XP(`<')Q$C<"`&-H"L!S971\," '$P*#`% 0
M=A%5,M0S. ``*(zv)+A80> $=;1!Q,(zv)0T4"(zv)S($1A#3_Q*!$R\4,0A5![("(zv)!?Y
M%2-F?0J ",(zv)(zv).PEO#C U,P* "H%U8P!0"P-L:30S-(zv)% 8P!!#P0S,P\+I(zv)?P
M!Y )\&D(zv):F4R+![(zv)86L>X!&0;2"$=F,$D&$(zv);W8&<9IL'Q!Z'] +8"!T!1!V
M=(zv)<Q`P`Z"J(*A J *!!#*RLI(:1!9G(zv)*1Q&(zv)30MQ5VYD* `I+3Y3:&]W5P4+
M(zv)&0D0" H4U=?8$A)1$4I&J AN587(/ #<" 0:Q0(zv)>FEK>'4(zv)80M0)N `T!1
M>JQM:2;0() (zv)"U!O$5#&>1\0`9!S:V(*P"<`NQ[0$9!Z%!$G!Q[0=BBC$B #
M(zv)6%G!)!U+B T22 4$&0'0!1 =G/1'T%Z=7,!D'8(zv)`"$PR&1I="# ;GDH( -(zv)
MOQ_0!" J<"EF+80K44\H\+\LL!^(zv)$9 (zv)(zv)11 !"!T!W"3(/ I<&MO*"!U:(zv)$`
MLB %H"!U`0`+8'0?$/$KTFMD>2(zv)0$9 ?L"0P1&1N%$!P;VH'(zv)&X',- 40")(zv)
M4UE334](zv)1"Y%6$4G$01P+KXI'Q #`#(0,* RT&(Q4?\JT"T0(/ <0"AP(! Q
M$C#A^BXAJE0)(zv)![A+( 40!\R^S8`*=AS,, L(zv)#71$/ I07\A`#&0+G$H4"T0
M)W$QL6+[+6 U47D(zv)T2SA$: J83,RN" B4#"(zv).5,>L2(?$'T%H#\V^S"(zv).S 1
M4"BA:]\M8!_P-] (zv),#%A+C_(zv))7OW)N F4 7 0P0`," `X \&/Q)B(;D=(0%
M+8$M(&-TMQ6"(L0D,&HL`0W(zv): ,`_S_G/^$14"TA/J5#D"%1%$#0=6MR>05
M8BEP#>#?'M M(zv)0G %" HD6HK8#+0_Q[P`Z $\"0P++ %0";(zv)`B#O)P`P`2C
M*/(L(:0KTCLBWT?U.U0G$![!*G!4*,$C<#\/("LQ), S`!4(zv)(0!L+:!!;'0M
M1"# *3;E_T#0."44$"9!13HRT#42)E"[+-$Q0'(ZH1\!0W)O+]+O%$ XD5#B
M'Z!U*!$L( D`?Q\0*G *P!%0(2 G`$FQ9K\$D GP'] AI!]S!N!H4R#[1B$L
M<' 'D"U13 5,5"_A_U=Q,P`X$Q^"40$RT!00$9 K/] AJD0FX'E%.D1O3F(?
M\"&K)"(zv)H2 !P9 <KX!\0).%32$]7*;<U01%1()!A*8),E4Q!4?\G`3[S4<$F
MD#%0,E);$![P.R$P(:1-!Y L("L(zv)1&SN9S[R*3%'(zv)&A88R0P/7+_'N$P40(P
M,* M`%-Q8=!/D?U;$GH(zv)(">!8%=)DUM%)R=?3Y(HQ5W (:09P0!H8 `#`! 0
M``````,`$1 ``````P" $/____] ``<P0 <E<%)AO(zv)% ``(zv)P0 <E<%)AO(zv)$+
M``" "" &``````# ````````1(zv)`````#A0````````,``H (( 8``````, `
M``````!&`````!"%`````````P`%(zv) (zv)(zv)!(zv)``````P ```````$8`````4H4`
M`/ .```>`"6 "" &``````# ````````1(zv)````!4A0```0````0````X+C `
M`P`F(zv) (zv)(zv)!(zv)``````P ```````$8``````84````````+`"^ "" &``````#
M````````1(zv)`````.A0````````,`,( (( 8``````, ```````!&`````!&%
M`````````P`R(zv) (zv)(zv)!(zv)``````P ```````$8`````&(4````````>`$& "" &
M``````# ````````1(zv)`````VA0```0````$`````````'(zv)!"(zv) (zv)(zv)!(zv)``````
MP ```````$8`````-X4```$````!`````````!X`0X (( 8``````, `````
M``!&`````#B%```!`````0`````````>`#T``0````4```!213H(zv)``````,`
(#33]-P``N;R%
`
end


REINSTALACE WOKEN

[*] Ing. Miroslav Ondrisek, Bonnel Technologie, s.r.o. <bonnel(zv)telecom(tec)cz> - 26.2.1999 07:41:17

Takovy program existuje, jmenuje se RegMon for W95/98

Cau Mira


-----P=F9vodn=ED zpr=E1va-----
Od: Rudolf Balada <rudolf.balada(zv)parlament(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. =FAnora 1999 22:37
P=F8edm=ECt: Re: REINSTALACE WOKEN


> Kdysi jsem mel napad, ktery jsem nezrealizoval, ale
> melo by byt schudne jej dokoncit. Lze se povesit na system a dostavat
od nej
> informace kdo a co prave zapisuje do registru. Kdyz se takovej
programek
> spusti jen na dobu instalace, tak si muze hezky zapamatovat co se tam
delo a
> pak to pripadne zopakovat resp. zrusit :)).

F.Piette - TSMTPClient

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 26.2.1999 07:42:40

> Jaky je Charset pro cestinu. Defaultne je nastaveny : 'iso 8859-1' to
> znetvori ceske znaky. Diky moc. PS . Asi to bude v nejakem RFC, ale
> bohuzel to ted rychle nemuzu zjistit. Pokud vite poradte prosim.

ISO-8859-2



Louci se Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz

BringToFront?

[*] Lubos Dusanic <lubos(zv)iname(tec)com> - 26.2.1999 07:43:23

caves,

mam komponentu typu tpagecontrol a na nej niekolko stranok. na kazdej z
nich sa nachadza n komponent (tfield, tcombobox). ak nevyhovuje nejaka
zaverecna podmienka (napr. field1.text='') potrebujem nastavit focus na ten
field, ktoreho podmienka nebola splnena. problem je v tom, ze ked sa field
nachadza na inej, ako aktivnej page, musi sa zaroven nastavit tato page ako
aktivna. viete niekto poradit?

ps: dolezite je urobit to tak, aby to fungovalo vseobecne, t.j. pre
lubovolnu komponentu (nielen pre tpagecontrol) - nieco v zmysle:

for i:=0 to componentscount-1 do begin
if ( trim(components[i] as tfield).text)='' ) then
nastav_ako_aktivny ???
end;

vdaka

--
lubos dusanic

mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613

REINSTALACE WOKEN

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 26.2.1999 07:55:11

Ja sem ho resil a nemel by tu byt problem, teoreticky - TEORETICKY.
Vsechno smazat a nainstalovat znovu je ale opravdu ten
nejlepsi zpusob.

Ondrej Krajicek

Pavel Serbajlo wrote:
>=20
> Nerikejte, ze nevite: To jste nikdo neresil podobny problem??
>=20
> -----Original Message-----
> From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> To: Delphi cz <delphi-l(zv)fwd(tec)cz>
> Date: 24. =FAnora 1999 23:57
> Subject: REINSTALACE WOKEN
>=20
> >Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam drobny
> >problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych spoust=
u
> >komponent, expertu, atd. No a jak to tak byva, me se to nechce posleze
> >priinstalovavat jedno po druhem.
> >
> >Ty wokna musim nejdrive SMAZAT!
> >
> >Napadlo me, ze bych exportoval registry, kde je delphi a po instalaci
> >importoval
> >Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva, al=
e
> >nevim jake....:((
> >
> >Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni m=
isto,
> >fungovaol by Delphi korektne???
> >
> >dik za jakoukoliv radu
> >
> >Serbajlo Pavel
> >ICQ: 20849973
> >email: serb(zv)mikulov.sol(tec)cz
> >www: www.nemamstranky(tec)cz
> >
> >

HDD seriove cislo ...

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.2.1999 07:58:29

To by me taky zajimalo. Diky.

> -----P=F9vodn=ED zpr=E1va-----
> Od: Petr Fejfar [SMTP:callnet(zv)telecom(tec)cz]
> Odesl=E1no: 25. =FAnora 1999 14:13
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: HDD seriove cislo ...
>=20
> Hi,
>=20
> >Bohuzial, nie je to ono ... potrebujem VYROBNE cislo disku...
> >Ono to tam naozaj je a niektore test-programy v dose ho pekne
> detekuju....
> >Chcel by som to pouzit ako ochranu proti kopirovaniu :-)
>=20
>=20
> Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala
> tusim
> IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z
> radice
> disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to
> k
> necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to
> emajlem.
>=20
> bye, pf
>=20

Ukryti programu - jak na to

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 26.2.1999 08:02:43

> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby
> nebyla videt v menu "Po spusteni", co?
>
> To bych taky rad vedel...

Treba takhle:

REGEDIT4

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
"Nazev"="C:\\ADRESAR\\APLIKACE.EXE"

Oddelovac cisel

[*] Karel Chmel <kchmel(zv)csob(tec)cz> - 26.2.1999 08:06:46

Ahoj,

podivej se na DecimalSeparator, to by melo byt to prave.
Karel

----------
> Ahoj,
>
> nebyl jste prosim nekdo nekdy nucen zjistit jaky
> je nastaven oddelovac cisel, jestli tecka nebo carka.
> Myslim tim globalni nastaveni Windows.
> V D1 bohuzel neexistuje fce GetLocaleInfo().
> Sla by pouzit nejaka nahrada pro D1.
>
> Za kazdy napad dik
>
> S pozdravem a diky


Oddelovac cisel

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.2.1999 08:15:12

Puvodni zprava, kterou napsal Pavel Malinsk=FD dne 25 Feb 99,:

> nebyl jste prosim nekdo nekdy nucen zjistit jaky
> je nastaven oddelovac cisel, jestli tecka nebo carka.
> Myslim tim globalni nastaveni Windows.
> V D1 bohuzel neexistuje fce GetLocaleInfo().
> Sla by pouzit nejaka nahrada pro D1.

DecimalSeparator by mel byt i v Delphi 1.


S pozdravem
Petr Zahradnik, pocitacovy expert

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


Oddelovac cisel

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 26.2.1999 08:18:37

Ahoj, Pavle.
Ja menim oddelovac na tecku takhle (pro W32):

function SetDecimalSeparator32 (const NewValue:shortstring): boolean;
var R: tRegistry; S: ShortString;
begin
Result :=3D false;
R :=3D tRegistry.Create;
try
R.RootKey :=3D HKEY_CURRENT_USER;
if R.OpenKey('Control Panel\International',false) then begin
S :=3D R.ReadString ('sDecimal');
if S <> NewValue then begin
R.WriteString ('sDecimal',NewValue);
Result :=3D true;
end;
end;
finally
R.Free;
end;
end;
{-------------------------------------------------------------}


Pro W3.x se to nastavuje ve Win.ini

GetWindowsDirectory (Buf, SizeOf (Buf));
Ini :=3D tIniFile.Create(StrPas (Buf)+'\'+'Win.INI');
DecSepar :=3D Ini.ReadString ('Intl','sDecimal','?');
if DecSepar <> '.' then begin
ShowMessage ('M=ECn=EDm nastaven=ED des. odd=EClova=E8e ve Windows.');
Ini.WriteString ('Intl','sDecimal','.');
end;
Ini.Free;

Mirek Junek

-----P=F9vodn=ED zpr=E1va-----
Od: Pavel Malinsk=FD <spiderland(zv)usa.net>
Komu: DELPHI Distribution List <delphi-l(zv)fwd(tec)cz>
Datum: 26. =FAnora 1999 4:36
P=F8edm=ECt: Oddelovac cisel


|Ahoj,
|
| nebyl jste prosim nekdo nekdy nucen zjistit jaky
|je nastaven oddelovac cisel, jestli tecka nebo carka.
|Myslim tim globalni nastaveni Windows.
|V D1 bohuzel neexistuje fce GetLocaleInfo().
|Sla by pouzit nejaka nahrada pro D1.
|
|Za kazdy napad dik
|
| S pozdravem a diky
|=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
|> Pavel Malinsky; spiderland(zv)usa.net <
|>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D<
|> ...The Truth Is Out There... <
|=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
|GSM: 0602 652 203
|
|

CreateTable v D4

[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 26.2.1999 08:26:33

Ahojte.

Pros=EDm o radu vsechny velke nacelniky konference.

K pristupu k tabulkam pouzivam TTable.
Pri vytvareni tabulky za behu programu jsem mel problem s typem Smallint.
Prikaz Add(F3,ftSmallint,0,False); vytvori sloupec F3 o size=3D6.Field ed=
itor
pro vytvoreni TSmallintFieldu bere ciselny sloupec pouze do size=3D4
a od size=3D5 a vice vytvori TFloatField, a tyto typove rozdily se mi zat=
im
nepodarily sladit. Vypada to, ze budu muset tabulky kopirovat, abych se
tomuto vyhnul.

Dalsi, co mne prekvapilo, bylo vytvareni indexu.Database Desktop vytvori
k tabulce ttFoxPro index *.MDX, ale za behu programu pri pouziti fce
AddIndex(...) se vytvori *.CDX. Nevite proc?

A taky pri vytvareni tabulky v Database Desktopu lze zadavat jakykoli siz=
e u
jakehokoli typu.
Proc to neudelali i pro TFieldDefs.Add(..), nebo existuje nejaka fce, kte=
ra
to umi?

Jsem mirne receno zmaten a dekuji predem za jakekoli rozumne vysvetleni.
Petr
p.sadovsky(zv)atlas(tec)cz

Ukryti programu - jak na to

[*] Pavel Zichovsky <zichovsky(zv)jesnem(tec)cz> - 26.2.1999 08:28:24

Viktor Lostak napsal(a) toto:

> V tom okamziku aplikace zmizi z plochy, taskbaru i seznamu aplikaci v task
> manageru. I nadale vsak zustava viditelny proces v seznamu procesu. Obavam
> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby nebyla videt v
> menu "Po spusteni", co?
> To bych taky rad vedel...

Ve win95/98 staci pridat do registru, klice
H_KEY_LOCAL_MACHINE\software\microsoft\windows\currentversion\runservices

textovou polozku, kterou si pojemnujes jak chces, a jako obsah das
celoucestu k tomu programu (vcetne .exe na konci).

Pak se ten program spusti uz pri startu, jeste pred prihlasenim do site.


Jestli tento trik funguje i v NT nevim, nemam moznost vyskouset.
S pozdravem
Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
mobil: zichovsky(zv)gate.mobil(tec)cz (120 znaku)
PGP podporovano a vitano


Oddelovac cisel

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 26.2.1999 08:39:26

Ahoj,=20

delal jsem to kdysi ve Visual Basicu tak, ze jsem prevedl cislo 11/10 na
retezec a kdyz se v tom retezci objevila carka, je nastavena carka.
Podobne s teckou. ZKus to, melo by to fungovat.

********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P=F9vodn=ED zpr=E1va-----
> Od: Pavel Malinsk=FD [SMTP:spiderland(zv)usa.net]
> Odesl=E1no: 25. =FAnora 1999 19:10
> Komu: DELPHI Distribution List
> P=F8edm=ECt: Oddelovac cisel
>=20
> Ahoj,
>=20
> nebyl jste prosim nekdo nekdy nucen zjistit jaky
> je nastaven oddelovac cisel, jestli tecka nebo carka.
> Myslim tim globalni nastaveni Windows.
> V D1 bohuzel neexistuje fce GetLocaleInfo().
> Sla by pouzit nejaka nahrada pro D1.
>=20
> Za kazdy napad dik
>=20
> S pozdravem a diky
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
> > Pavel Malinsky; spiderland(zv)usa.net <
> >=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D<
> > ...The Truth Is Out There... <
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
> GSM: 0602 652 203

pomoc

[*] Viliam Mlich <vmlich(zv)mbox.vol(tec)cz> - 26.2.1999 08:40:54

Hello Martin!

> potrebujem z toho urobit zostavu, najlepsie pomocou Qreport aby najskor isli
> vsetky riadky ako su v tabulke a potom aby urobil pre kazdu zakazku sucet
> hodin, takze zostava by mala vyzerat asi takto :
>
> 12/99 2
> 13/99 3
> 14/99 1
> 12/99 5
> 14/99 7
>
> sucty :
>
> 12/99 7
> 13/99 3
> 14/99 8
>
> Potrebujem to na jednej zostave, prip. na jednom papiery.

Podla poslednej vety (pominieme teraz tvoju znalost gramatiky) sa zda, ze tych
zakziek nie je moc. V tom pripade by si to mohol riesit tak, ze:

1. Urobis prvu cast - blby opis netriedenej databazy

2. Do HeaderBandu si das na event BeforePrint nejake inicializacie (pocet:=0;)

3. V detailbande si na event BeforePrint si das suctovanie, nieco v zmysle:
i := najdi(zakazka);
if i>0 then sucet[i]:=sucet[i]+hodiny
else begin { este nebola, pridame }
pocet:=pocet+1;
zak[pocet]:=zakazka;
sucet[pocet]:=hodiny;
end;
(pochopitelne musis nejako vyriesit obmedzenie na max pocet, bud alokovanim
dostatocne velkych poli zak[],sucet[] alebo dynamicky)

4. Do FooterBandu si das textove pole, na zaciatku prazdne, ale v BeforePrint
toho footerbandu ho 'for i:=1 to pocet' naplnis.


Ovsem keby ti v prvej casti nevadilo doplnit do query 'order by zakazka', mohol
by si zaobist bez vsetkej tej onanie a sucet za zakazku by si tlacil vo
footerbande hned po vymenovani vsetkych jej poloziek ako obycajne suctove pole.
Potom by vystup bol:

12/99 2
12/99 5
celkom za 12/99: 7
13/99 3
celkom za 13/99: 3
14/99 1
14/99 7
celkom za 14/99: 8
=================
Celkom: 18

Bye mailto:vmlich(zv)mbox.vol(tec)cz
V.Mlich http://www(tec)czech-web(tec)cz/~vmlich

Ukryti programu - jak na to

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.2.1999 08:40:37

>
>Ted jeste jak tu aplikaci spustit pri stratu pocitace,
aby nebyla videt v menu "Po spusteni", co?
>
>To bych taky rad vedel...


Jde to vlozit do registry :
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
nebo, dle standardu Win 3.11 dat do Win.ini sekce [Windows] radek run=
a load=

D.

databaze bez BDE

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 26.2.1999 08:41:56

Panove a damy nebijte mne,
vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv konference a diky
Velkemu Billovi jsem prisel o svuj archiv v Outlooku

Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez pouziti
BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je nekde jinde a
pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by mel
fungovat bez nutnosti instalace)

Diky

===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP==============

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco
dela


rucne cucanie dat z TQuery

[*] Lubos <bruce(zv)pobox.sk> - 26.2.1999 08:42:28

> Kdyz nad TTable vykonas Query, muzes pouzit metody pro pohyb v tabulce
> (myslim MoveNext apod.) a z aktualniho recordu vzit cokoli a placnout do
> souboru.
>

ano, to ma napadlo tiez, ale musi predsa existovat sposob, ako
vyberat data priamo z kurzoru. Mam na mysli nieco ako

while (!DataSet->Eof)
{
}

ale ja pouzivam TDataSource a TQuery a neviem ako to aplikovat
na ne.

vopred vdaka za kazdu radu.

/LH


Retezce

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 26.2.1999 08:42:41

Zdravim,

daji se nejakym zpusobem (bez pouziti LOKALIZATORU) vytahnout z aplikace
vsechny pouzite retezce?==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

REINSTALACE WOKEN

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.2.1999 08:46:16

Neresil, windows mam od v3.1 pres v95 az k v98 BEZ JEDINE PREINSTALACE a
to i pri zmenach zakladni desky, videokarty a uz na ctvrtem disku. Stale
je to ovsem ta puvodni instalace, jen upgradovana. Ze by to s MS nebylo
az tak spatne?


Martin Fron=ECk
ZZN Slan=FD a.s.
Pra=BEsk=E1 1579, 274 49, Slan=FD
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P=F9vodn=ED zpr=E1va-----
> Od: Pavel Serbajlo [SMTP:serb(zv)mikulov.sol(tec)cz]
> Odesl=E1no: 25. =FAnora 1999 19:35
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: REINSTALACE WOKEN
>=20
> Nerikejte, ze nevite: To jste nikdo neresil podobny problem??
>=20
> -----Original Message-----
> From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> To: Delphi cz <delphi-l(zv)fwd(tec)cz>
> Date: 24. =FAnora 1999 23:57
> Subject: REINSTALACE WOKEN
>=20
>=20
> >Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam
> drobny
> >problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych
> spoustu
> >komponent, expertu, atd. No a jak to tak byva, me se to nechce
> posleze
> >priinstalovavat jedno po druhem.
> >
> >Ty wokna musim nejdrive SMAZAT!
> >
> >Napadlo me, ze bych exportoval registry, kde je delphi a po instalaci
> >importoval
> >Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva,
> ale
> >nevim jake....:((
> >
> >Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni
> misto,
> >fungovaol by Delphi korektne???
> >
> >dik za jakoukoliv radu
> >
> >Serbajlo Pavel
> >ICQ: 20849973
> >email: serb(zv)mikulov.sol(tec)cz
> >www: www.nemamstranky(tec)cz
> >
> >

QuickReport 3.04 Profesional

[*] emilm(zv)gratex.sk - 26.2.1999 08:47:31

Nevie niekto =E8o m=E1 QuickReport 3.04 Profesional naviac oproti =B9tand=
artu..

Emil Mislovi=E8
emilm(zv)gratex.sk

Retezce

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.2.1999 08:52:26

Puvodni zprava, kterou napsal Krayzel Libor dne 26 Feb 99,:

> daji se nejakym zpusobem (bez pouziti LOKALIZATORU) vytahnout z aplikace
> vsechny pouzite retezce?

Vsechny standardni retezce ano - viz Resource Explorer, ktery
najdes v DEMOS. Ale ne uz treba retezce TurboPoweru, ktere
maji svuj vlastni format.


S pozdravem
Petr Zahradnik, pocitacovy expert

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


QuickReport 3.04 Profesional

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.2.1999 08:52:33

Puvodni zprava, kterou napsal emilm(zv)gratex.sk dne 26 Feb 99,:

> Nevie niekto =E8o m=E1 QuickReport 3.04 Profesional naviac oproti =B9ta=
ndartu..

Zdrojove kody, runtime navrhar reportu (mimochodem zatim nic moc)
a par dalsich veci...


S pozdravem
Petr Zahradnik, pocitacovy expert

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


Zakaz usporneho rezimu

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 26.2.1999 08:52:04

Ahoj,=20

vim reseni v podobe zakazu screensaveru. Nevim, jestli to bude stacit:

Funkce SystemParametersInfo umi disablovat nebo enablovat screensaver
(ale neukonci jiz bezici), umi take nastavovat prodleni pred jeho
spustenim - k tomu se pouzivaji parametry SPI_SETSCREENSAVEACTIVE a
SPI_SETSCREENSAVETIMEOUT.=20

********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************> -----P=F9vodn=ED zpr=E1va-----
> Od: Ing. Ji=F8=ED Kub=ED=E8ek [SMTP:etatherm(zv)telecom(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 6:37
> Komu: Konference DELPHI
> P=F8edm=ECt: Zakaz usporneho rezimu
>=20
> Zdravim spriznene duse, zabyvajici se DELPHI a opakuji svou prosbu o
> radu.
> Jak zakazat v programu (D1) aby se po case PC nepreplo do usporneho
> rezimu.
> Resim komunikacni program a "usnuti" PC dela pak problemy. Myslel
> jsem, ze
> to vyresim obcasnym generovanim zpravy, simulujici pohyb mysi nebo tuk
> do
> klaves, ale neuspel jsem.Stourat do registru bych nerad a nic jineho
> me
> nechce napadnout.
> Aspon mi nekdo prosim reknete, ze je to pitoma otazka, nebo
> neresitelna
> (cemuz neverim).
>=20
> Jiri Kubicek
>=20

Ukryti programu - jak na to

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 26.2.1999 08:54:45


A pokud se ma spustit jen jednorazove (takove legracni programy
jako "naledi.exe" nebo "parkinson.exe"), tak se pouzije sekce
> [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce
> ]
>=20
********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************> -----P=F9vodn=ED zpr=E1va-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 8:03
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Ukryti programu - jak na to
>=20
> > Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby=20
> > nebyla videt v menu "Po spusteni", co?
> >=20
> > To bych taky rad vedel...
>=20
> Treba takhle:
>=20
> REGEDIT4
>=20
> [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
> "Nazev"=3D"C:\\ADRESAR\\APLIKACE.EXE"

Ukryti programu - jak na to

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 09:01:18

A jede to i na 95/98, nebo jenom na NT?

> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby
> nebyla videt v menu "Po spusteni", co?
>
> To bych taky rad vedel...

Treba takhle:

REGEDIT4

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
"Nazev"="C:\\ADRESAR\\APLIKACE.EXE"

begin 600 WINMAIL.DAT
M>)\^(A0(`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`(zv)````4D4Z
M(%5K<GET:2!P<F]G<F%M=2 M(&IA:R!N82!T;P";"(zv)$%(zv) ,`#(zv)```,\'`(zv)`:
M``D``0`2``4`$P$!(( #``X```#/!P(`&(zv)`)``$``P`%``0!`0F `0`A````
M,T-!-T)&030T-4-$1#(Q,3DS.3DP,#(P048S0D0Y,4,`0 <!`Y &``(zv)%```A
M````"P`"``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`
M-(zv)``````0 `Y`&"5D3!>8;X!'(zv)!P``$````(zv)````4D4Z(%5K<GET:2!P<F]G
M<F%M=2 M(&IA:R!N82!T;P`"`7$``0```!8````!OF%>,(VDOZ<]S441TI.9
M`""O.]D<```>`!X,`0````4```!33510`````!X`'PP!````%(zv)```'9I:W1O
M<BYL;W-T86M 8VAM:2YC>(zv)````,`!A#H>\AM`P`'$.P````>``(zv)0`0```&4`
M``!!2D5$151/24Y!.34O.3(zv)L3D5"3TI%3D]-3D%.5#]4141*15-414I!2U15
M05!,24M!0TE34%535$E44%))4U1205154$]#251!0T4L04)93D5"64Q!5DE$
M1516345.52)03U-0``````(!"1 !````X0$``-T!``!J`(zv)``3%I&=5S&<N0W
M``H!`P'W( *G`(zv)!C: $*P'-E=# (zv)5&$^: -Q`H,`4 /4#S<R,ZHX```J`N%A
M!X (zv)!Q.C`H '$R!#10* ?0J B0C((#L);S(U-0* &0J!=6,`4 L#;&DS&C8!
M0&,`00M(zv);F<QF# S,PNF$F (zv):(zv)F 01)0=&\(zv):2 2("! .34O.3(zv)L&/!E&P;(zv)
M&%%N`W 8\DY4/Y\*H(zv)J!%O !0!<T,CD*H'4#8'0%D'00<AK$`9$(zv);CX/T F
M&%%S'" 84&$B:QB(zv)=2!A"U!I:Z,`T!C(zv)<W!U'<!I!4 C&_ >X71R81Y!<&^S
M'M !D&-E&8 !H'D*XXL<UQFA>0M(zv)('9I`0`I!4!V( > ;AY0(E#G&, ?`PGP
M:2(9(zv) 6(zv)&J;_'00<G!C (. /4!B(zv)'A (zv)\,L?X!V =AAQ;"XG0!JU-1RH5 EP
M8AD0)F%H; 1E.B=Z4D5'140(250T)WI;2$M%`%E?3$]#04Q?`$U!0TA)3D5<
M(zv)%Q33T945T$J$(DL(zv)$UI!0!O<V\!(zv)$4L(zv)%<+(zv)&1O=Q$`7.Y#"' )< (P5(zv)20
M`) "("$L(zv)%)U;ET:M").`&%Z978B/2)#TRE ,-%!1"H04RSP,-,04$Q)2RP(zv)
M12Y%6%A%(B=Z$X$`,Y ````#`! 0``````,`$1 ``````P" $/____] ``<P
MH&J )UYAO(zv)% ``(zv)PH&J )UYAO(zv)$+``" "" &``````# ````````1(zv)`````#
MA0````````,``H (( 8``````, ```````!&`````!"%`````````P`%(zv) (zv)(zv)
M!(zv)``````P ```````$8`````4H4``/ .```>`"6 "" &``````# ````````
M1(zv)````!4A0```0````0````X+C ``P`F(zv) (zv)(zv)!(zv)``````P ```````$8`````
M`84````````+`"^ "" &``````# ````````1(zv)`````.A0````````,`,( (
M( 8``````, ```````!&`````!&%`````````P`R(zv) (zv)(zv)!(zv)``````P ``````
M`$8`````&(4````````>`$& "" &``````# ````````1(zv)`````VA0```0``
M``$`````````'(zv)!"(zv) (zv)(zv)!(zv)``````P ```````$8`````-X4```$````!````
M`````!X`0X (( 8``````, ```````!&`````#B%```!`````0`````````>
=`#T``0````4```!213H(zv)``````,`#33]-P``>P*%
`
end


databaze bez BDE

[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 26.2.1999 09:09:54


Ahoj,

mo=9En=E1, =9Ee te=EF nap=ED=9Au n=ECjakej bl=E1bol, Delphi obdivuju, ale=
nejsem v n=ECm =9E=E1dn=E1
jedni=E8ka. J=E1 si d=EClal jednoduchou aplikaci a cht=ECl jsem pou=9E=ED=
vat tabulky DBF
v adres=E1=F8i, kde ona aplikace byla. Jednodu=9Ae jsem do Table.Database=
Name
napsal cestu, kde je ona DBF, napr.: C:\Pokus a d=E1le jsem Table.TableTy=
pe
nastavil na ttFoxPro. Je=9At=EC jsem doplnil Table.FieldDefs a funguje to=
. Mo=9En=E1
tady popisuju pou=9Eit=ED BDE, nev=EDm.

Va=9Aek

-----P=F9vodn=ED zpr=E1va-----
Od: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
Odesl=E1no: 26. =FAnora 1999 8:42
Komu: 'DELPHI Distribution List (el. adresa 2)'
P=F8edm=ECt: databaze bez BDE


Panove a damy nebijte mne,
vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv konference a di=
ky=20
Velkemu Billovi jsem prisel o svuj archiv v Outlooku

Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez pouziti=
=20
BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je nekde jinde=
a=20
pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by mel=20
fungovat bez nutnosti instalace)

Diky

=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco=20
dela

REINSTALACE WOKEN

[*] Kriz David <david.kriz(zv)ccv(tec)cz> - 26.2.1999 09:13:49

Nize popisovanou funkci resi take program "Norton Registry Tracker", kter=
y
je soucasti Norton Utilities pro Windows95 od firmy Symantec. A myslim ze
hlida i windows.ini a system.ini.

> -----P=F9vodn=ED zpr=E1va-----
> Od: Ing. Miroslav Ondrisek, Bonnel Technologie, s.r.o.
> [SMTP:bonnel(zv)telecom(tec)cz]
> Odesl=E1no: p=E1tek 26. =FAnora 1999 7:41
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: REINSTALACE WOKEN
>=20
> Takovy program existuje, jmenuje se RegMon for W95/98
>=20
> Cau Mira
>=20
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Rudolf Balada <rudolf.balada(zv)parlament(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 25. =FAnora 1999 22:37
> P=F8edm=ECt: Re: REINSTALACE WOKEN
>=20
>=20
> > Kdysi jsem mel napad, ktery jsem nezrealizoval, ale
> > melo by byt schudne jej dokoncit. Lze se povesit na system a dostavat
> od nej
> > informace kdo a co prave zapisuje do registru. Kdyz se takovej
> programek
> > spusti jen na dobu instalace, tak si muze hezky zapamatovat co se tam
> delo a
> > pak to pripadne zopakovat resp. zrusit :)).
>=20
>=20

REINSTALACE WOKEN

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 26.2.1999 09:14:35

Myslim, ze je bezpecnejsi instalovat znova,ale...
kdyz uz to musi byt, tak napr. Cleansweep umi
neco jako zkopirovani instalovaneho programu
na jiny disk. Tusim, ze kdyz se mu neprozradi,
ze je to vlastne potom stejny disk :-), ze by to
dokazal nainstalovat zpet.(bez zaruky)

> Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam drobny
> problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych spoustu
> komponent, expertu, atd. No a jak to tak byva, me se to nechce posleze
> priinstalovavat jedno po druhem.
>
> Ty wokna musim nejdrive SMAZAT!
>
> Napadlo me, ze bych exportoval registry, kde je delphi a po instalaci
> importoval
> Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva, ale
> nevim jake....:((
>
> Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni misto,
> fungovaol by Delphi korektne???
>
> dik za jakoukoliv radu
>
> Serbajlo Pavel
> ICQ: 20849973
> email: serb(zv)mikulov.sol(tec)cz
> www: www.nemamstranky(tec)cz
>
>
>
>
-----------------------------------------------
Ing. Zdenek Drvota e-mail:drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail:info(zv)zds(tec)cz
Internet proti monopolu http://www.bojkot(tec)cz


Komponenty? K �emu? - trochu lidsky :- )))

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.2.1999 09:24:42

Mirun wrote:

> S komponentami je to jako s integrovanymi obvody - staci vedet co delaji,
> a nemusis se zabyvat tim, jak to delaji. Nemusis se tolik soustredit na to
> jak to udelat, ale co chces udelat. Proste kdyz te rano napadne, ze
> naprogramujes CorelDraw, muzes cely den hrat fotbal, vecer prijdes domu,
> spustis Delphi, vezmes z palety komponentu TCorelDraw, pustis ji na
> formular, a mas hotovo....
>
> Rika se tomu RAD - Rapidni vyvoj aplikace.
>
> PS: Toto neni reklamni akce nejmenovane firmy (cti Inprise), nebot praxe
> je trochu slozitejsi a vetsinou v rozporu z vyse uvedenym extremne
> nadnesenym popisem.

Jasne. :-)) Protoze tvuj konkurent nejde hrat fotbal, udela to uz rano
a je s tim driv na trhu. :-)


S pozdravem

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

Ukryti programu - jak na to

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

Fsude. -A jede to i na 95/98, nebo jenom na NT?

> > Ted jeste jak tu aplikaci spustit pri stratu pocitace,
> aby
> > nebyla videt v menu "Po spusteni", co?
> >
> > To bych taky rad vedel...
>
> Treba takhle:
>
> REGEDIT4
>
>
> [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
> "Nazev"="C:\\ADRESAR\\APLIKACE.EXE"
>
>

HDD seriove cislo ...

[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 26.2.1999 09:29:14

Na Torry jsem videl nejake komponenty, ktere to umi.

Petr
p.sadovsky(zv)atlas(tec)cz
-----P=F9vodn=ED zpr=E1va-----
Od: Mor=BEol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 26. =FAnora 1999 8:41
P=F8edm=ECt: RE: HDD seriove cislo ...>To by me taky zajimalo. Diky.
>
>> -----P=F9vodn=ED zpr=E1va-----
>> Od: Petr Fejfar [SMTP:callnet(zv)telecom(tec)cz]
>> Odesl=E1no: 25. =FAnora 1999 14:13
>> Komu: delphi-l(zv)fwd(tec)cz
>> P=F8edm=ECt: Re: HDD seriove cislo ...
>>
>> Hi,
>>
>> >Bohuzial, nie je to ono ... potrebujem VYROBNE cislo disku...
>> >Ono to tam naozaj je a niektore test-programy v dose ho pekne
>> detekuju....
>> >Chcel by som to pouzit ako ochranu proti kopirovaniu :-)
>>
>>
>> Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala
>> tusim
>> IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z
>> radice
>> disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to
>> k
>> necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to
>> emajlem.
>>
>> bye, pf
>>
>
>

Ukryti programu - jak na to

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 26.2.1999 09:34:54

> A jede to i na 95/98, nebo jenom na NT?

Samozrejme.

REINSTALACE WOKEN

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 26.2.1999 09:42:48

UPLNE NEJJEDNODUSSI ZPUSOB, ktery pouzivam ja je mit zazalohovany cely
partition i se vsemi instalacemi (napr. pomoci programu DriveImage) a
kdyz se neco pokazi, tak se cely partition obnovi ze zalohy. Nemusi se
nic instalovat a cela operace trva tak 2 - 5 minut. Instalovat znovu
Delphi a do neho vsechny balicky, komponenty tak aby pak souhlasily
vsechny cesty treba s rok starymi projekty, kde si clovek uz neni jisty,
ktere komponenty pouzival (zvlast kdyz jich ma nekolik stovek nebo i
vic) je sebevrazda.

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic=20
____________________________
tel./fax.: +420-(0)69-6912961=20
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz

> > -----Original Message-----
> > From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> > To: Delphi cz <delphi-l(zv)fwd(tec)cz>
> > Date: 24. =FAnora 1999 23:57
> > Subject: REINSTALACE WOKEN
> >=20
> > >Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam
> drobny
> > >problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych
> spoustu
> > >komponent, expertu, atd. No a jak to tak byva, me se to nechce
> posleze
> > >priinstalovavat jedno po druhem.
> > >
> > >Ty wokna musim nejdrive SMAZAT!
> > >
> > >Napadlo me, ze bych exportoval registry, kde je delphi a po
> instalaci
> > >importoval
> > >Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva,
> ale
> > >nevim jake....:((
> > >
> > >Pokud bych tedy vse zalohoval a po instalaci znovu vratil na
> puvodni misto,
> > >fungovaol by Delphi korektne???
> > >
> > >dik za jakoukoliv radu
> > >
> > >Serbajlo Pavel
> > >ICQ: 20849973
> > >email: serb(zv)mikulov.sol(tec)cz
> > >www: www.nemamstranky(tec)cz
> > >
> > >

Ukryti programu - jak na to

[*] Novak Josef <jnovak(zv)anect(tec)cz> - 26.2.1999 09:45:23

Zde se v registrech nachazi aplikace, ktere se maji spoustet po spusteni =
PC.
Napr.:=20
[HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
"Popis aplikace"=3D"c:\aplikaceadresar\..\spustitelny command.exe"

> -----P=F9vodn=ED zpr=E1va-----
> Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 7:40
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Ukryti programu - jak na to
>=20
> Reseni je, jak jsem vcera overil, zcela trivialni:
>=20
> (C++)
> AfxGetMainWnd()->ShowWindow (SW_HIDE);
>=20
> V tom okamziku aplikace zmizi z plochy, taskbaru i seznamu aplikaci
> v task manageru. I nadale vsak zustava viditelny proces v seznamu proce=
su.
> Obavam se, ze s tim tezko pujde co udelat, ale kdyz se vhodne pojmenuje
> (CSYSMOD.EXE apod.), nikdo nebude mit tuchy o co jde.
>=20
> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby nebyla
> videt v menu "Po spusteni", co?
>=20
> To bych taky rad vedel...
>=20
> Viktor Cistic
>=20
>=20
> Ahoj vsichni...
> ...chtel bych totalne ukryt bezici program, tj. nejen schovat ikonu
> s tasbaru,
> ale aby program nebyl ani v TaskMangeru (po Ctrl-Alt-Del).
> Vite jak na to...
> ...nekdo to vi urcite, protoze se tu o tom uz psalo, v archivu
> konference
> jsem bohuzel uspesny nebyl a ani ve sve poste jsem to nenasel.
>=20
> Diky...
> ...Dobra
>=20
> (ShowWindow(Handle, SW_SHOW) necha zaznam v TaskListu a taky, pokud
> se objevi
> MessageDlg tak i behem toho, co je tento dialog na obrazovce se
> objevi ikona
> aplikace na taskbaru)=20

Dialog

[*] Miroslav Fiala <mr.fik(zv)seznam(tec)cz> - 26.2.1999 09:45:08

Help!!

potreboval bych vedet jak se udela, aby procedura nakreslila dialogove okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila ve svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud se nezavre. Nejak mi to nejede (predavani parametru) a nevim cim to je. Neni to treba tim, ze to okno zaviram pomoci CLOSE?

Nejlepsi by byl nejakej priklad.

Dik, Fik.

-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


Dialog

[*] Miroslav Fiala <mr.fik(zv)seznam(tec)cz> - 26.2.1999 09:48:16

Help!!

potreboval bych vedet jak se udela, aby procedura nakreslila dialogove okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila ve svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud se nezavre. Nejak mi to nejede (predavani parametru) a nevim cim to je. Neni to treba tim, ze to okno zaviram pomoci CLOSE?

Nejlepsi by byl nejakej priklad.

-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


Problem s corupt table header

[*] ing. Martin Lasevie <vyvoj(zv)atlascon(tec)cz> - 26.2.1999 09:51:32

Ahojte,

mam ve sv aplikaci velky problem. Je delana v D3 a databaze je Paradox. Casto ( zejmena
na peer-to-peer siti) se stava, ze libovolne tabulky pri pokusu o zapis padaji do chyby
Corupt table header.

Otazka zni, nevite nekdo, proc tomu tak je a jak tomu lze predejit?

Diky za kazdy kopanec.
Ahojte

===============================
ML Software - Martin Lasevic
tvorba zakazkoveho software
Budovatelska 459
708 00 Ostrava - Poruba
Czech republic
tel.: + 420 (69) 691 85 11, 0603 338 765
--------------------------------------------------------------
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.mujweb(tec)cz/www/ml_software
===============================


begin 600 WINMAIL.DAT
M>)\^(B((`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`N $```$````1`````P``, (````+``\.``````(!_P\!````/P``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````$1%3%!(22!K;VYF97)E;F-E`%--5% `
M9&5L<&AI+6Q 9G=D+F-Z```>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````4
M````)T1%3%!(22!K;VYF97)E;F-E)P`"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!`````P!Q.(zv)`````>`/9?`0``
M`!(```!$14Q02$D(zv):V]N9F5R96YC90````(!]U\!````:P````````"U.\+
M+'<0&J&\" `K*E;"%0```*S$V+$SG<\1N>T`(*]-(zv)[?$B(zv)```````($K'Z2^
MHQ 9G6X`W0$/5 (`````1$5,4$A)(&MO;F9E<F5N8V4`4TU44 !D96QP:&DM
M;$!F=V0N8WH```,`_5\!`````P#_7P`````"`?8/`0````0````````"^5D!
M!( !`!X```!0<F]B;&5M(',(zv)8V]R=7!T('1A8FQE(&AE861E<(zv)#2"(zv)$%(zv) ,`
M#(zv)```,\'`(zv)`:``D`,P`(zv)``4`4P$!(( #``X```#/!P(`&(zv)`)`# `$P`%`$,!
M`0F `0`A````1C(zv)T,$$X03$T1$-$1#(Q,3E#-40P,#(zv)P0S<T.#,V1#<`*P<!
M`Y &`!P&```(zv)````"P`"``$````+`",```````,`)(zv)``````"P`I```````#
M`#8``````$ `.0!(zv)HT4U96&^`1X`< `!````'(zv)```%!R;V)L96T(zv)<R!C;W)U
M<'0(zv)=&%B;&4(zv):&5A9&5R`````(zv)%Q``$````6`````;YA934KH:A!&,U-$=*<
M70" QT(zv)VUP``'(zv)`># $````%````4TU44 `````>`!\,`0```!4```!M;%]S
M;V9T=V%R94!E;6%I;"YC>(zv)`````#``80Y41:\0,`!Q M`(zv)``'(zv)`($ $```!E
M````04A/2E1%+$U!359%4U9!4$Q)2T%#259%3$M94%)/0DQ%34I%1$5,04Y!
M5D0S041!5$%"05I%2D5005)!1$]80T%35$\H6D5*345.04Y!4$5%4BU43RU0
M14524TE422E315-400`````"`0D0`0```/X"``#Z`(zv)``D00``$Q:1G6"2T$2
M`P`*`')C<&<Q,C47`4,!- M(zv);(zv)X0,#(Y'0'W( *D`^,"`'!R<1(W`(zv)!C: K
M<V5T?# (zv)!Q,"(zv)P!0$'8153+4,S(zv)``"H"X6$'(zv)!'6T0<3($-%`H,R`N,3"K (zv)
M5&%H`W$"(zv)'T*(zv)-D(R" ["6\.,#4"(zv) J!G'5C`% +`P\$,S,+IL,1T!;P:G1E
M+ JB"H0C"H `P&T(zv)=A1 <W:D(&$+4&EK`-!I'-$X;&MY&E4/8!)A(" %$/!O
M`F!E;2X(zv)2A<40 $`#P%A'- (zv)1#-+'3 ?L&$!D6%Z%$!JA11 4 K 861O>!]P
M`$-A<W1O("(zv)(zv)O2$`:(zv)> %! ;Y" !< G(zv)-'(M(B M(W(=`&ET'&DI'0`<\0&0
M=F$LK2)A(!U(zv)!N!V!O!N%$ =`9%U'?$>\1VP<&]KT'5S=2 B,'H=0 0`LQ[P
M(9!A:AVP(: (zv)$5"<>6(F<!OD"%!R=04QXP&1'T (zv):&4AD 20'W#U&^I/`9!Z
M'8 B8 ,`)2#=)>!V)% 40"7(zv):R&(zv))2"]'P%C)(zv)`#<"<(zv)`9!K(2+M(!!J+8$M
M(VPA`1#P"8#K(H D4#\;ZD0=<"9P)V"2(!V >F0F<&MO"K#Y)>!C+AOE#),R
M"!ME&^J#"O05DG,Q-R ]-/^G-=L:6QOS34P&`&\!(zv)(YW"L 40!XI,B M&EJ]
M'N!-"L D8 .A.-I,((zv)#7+ $`X!OS="6P<B#(zv))U%_,*$Q`!S(zv)%O =`#A%&^1"
M3G4AH"4`&[!L<RMQ-*8U'J ;\S<P%K P$<#^3R(0(8 E`#F (5 I,2#(zv)URC%
M(0`14" )<'!!0!U(zv)PSPF'> N.B K/V ;03(zv)H-CDD(zv)$/(zv)'M X-4(zv)(zv),3$E(# V
M&K (zv)HQK %K W-C4;Y"U%_\]'#T(zv)?2,(zv);Y$4M`, #$;%#4&UL7SW'.;I 'U"Q
M2F$N8WHXRAOD5TWP/T-0"- `029 *> "0' Z*"\O=T\P+BU :G?L96),H4\B
M+TK*3E !0/\F0#>5-=\V#3-O$G,,`1OS!1=1`%8````#`! 0``````,`$1 `
M`````P" $/____] ``<P8-TIPF1AO(zv)% ``(zv)P8-TIPF1AO(zv)$+``" "" &````
M``# ````````1(zv)`````#A0````````,``H (( 8``````, ```````!&````
M`!"%`````````P`%(zv) (zv)(zv)!(zv)``````P ```````$8`````4H4``'L0```>``F
M"" &``````# ````````1(zv)````!4A0```0````4````X+C R``````,`"H (
M( 8``````, ```````!&``````&%````````"P`3(zv) (zv)(zv)!(zv)``````P ``````
M`$8`````#H4````````#`!2 "" &``````# ````````1(zv)`````1A0``````
M``,`%H (( 8``````, ```````!&`````!B%````````'(zv)`E(zv) (zv)(zv)!(zv)``````
MP ```````$8`````-H4```$````!`````````!X`)H (( 8``````, `````
M``!&`````#>%```!`````0`````````>`"> "" &``````# ````````1(zv)``
L```XA0```0````$`````````'(zv)`]``$````!``````````,`#33]-P``BF `
`
end

Retezce

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 26.2.1999 09:54:43

> > daji se nejakym zpusobem (bez pouziti LOKALIZATORU)
> vytahnout z aplikace
> > vsechny pouzite retezce?
>
> Vsechny standardni retezce ano - viz Resource Explorer, ktery
> najdes v DEMOS. Ale ne uz treba retezce TurboPoweru, ktere
> maji svuj vlastni format.

Predstavoval bych si spise neco takoveho:

MainForm.Caption = 'Resource Explorer'
Panel1.Caption = ' Resources'
Button.Hint = 'Tlacitko'

atd.

Ukryti programu - jak na to

[*] Jirka Virt <virt(zv)pepa(tec)cz> - 26.2.1999 09:55:59

Ahoj,
v registru ulozit informaci na adresu:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
textovou hodnotu napr:
nazev textove hodnoty : Program1
a hodnotu :c:\Mujprogram\program1.exe

Jirka Virt

email: virt(zv)pepa(tec)cz

-----P=F9vodn=ED zpr=E1va-----
Od: Viktor Lostak <Viktor.Lostak(zv)chmi(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 26. =FAnora 1999 8:38
P=F8edm=ECt: RE: Ukryti programu - jak na to


>Reseni je, jak jsem vcera overil, zcela trivialni:
>
>(C++)
>AfxGetMainWnd()->ShowWindow (SW_HIDE);
>
>V tom okamziku aplikace zmizi z plochy, taskbaru i seznamu aplikaci v ta=
sk
>manageru. I nadale vsak zustava viditelny proces v seznamu procesu. Obav=
am
>se, ze s tim tezko pujde co udelat, ale kdyz se vhodne pojmenuje
>(CSYSMOD.EXE apod.), nikdo nebude mit tuchy o co jde.
>
>Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby nebyla videt =
v
>menu "Po spusteni", co?
>
>To bych taky rad vedel...
>
>Viktor Cistic
>
>
>Ahoj vsichni...
>...chtel bych totalne ukryt bezici program, tj. nejen schovat ikonu s
>tasbaru,
>ale aby program nebyl ani v TaskMangeru (po Ctrl-Alt-Del).
>Vite jak na to...
>...nekdo to vi urcite, protoze se tu o tom uz psalo, v archivu konferenc=
e
>jsem bohuzel uspesny nebyl a ani ve sve poste jsem to nenasel.
>
>Diky...
>...Dobra
>
>(ShowWindow(Handle, SW_SHOW) necha zaznam v TaskListu a taky, pokud se
>objevi
>MessageDlg tak i behem toho, co je tento dialog na obrazovce se objevi
>ikona
>aplikace na taskbaru)
>
>

Ukryti programu - jak na to

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 09:57:06

No a je to, ne? Ted muzes (muzeme) psat viry ruzne bomby o sto pero, hi. Viktor

>
>Ted jeste jak tu aplikaci spustit pri stratu pocitace,
aby nebyla videt v menu "Po spusteni", co?
>
>To bych taky rad vedel...


Jde to vlozit do registry :
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
nebo, dle standardu Win 3.11 dat do Win.ini sekce [Windows] radek run=
a load=

D.

begin 600 WINMAIL.DAT
M>)\^((zv)<(`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`(zv)````4D4Z
M(%5K<GET:2!P<F]G<F%M=2 M(&IA:R!N82!T;P";"(zv)$%(zv) ,`#(zv)```,\'`(zv)`:
M``D`.0`&``4`/P$!(( #``X```#/!P(`&(zv)`)`#(zv)`((zv)`%`%H!`0F `0`A````
M-3)!-T)&030T-4-$1#(Q,3DS.3DP,#(P048S0D0Y,4,`,0<!`Y &`% %```A
M````"P`"``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`
M-(zv)``````0 `Y`&!F'_QE8;X!'(zv)!P``$````(zv)````4D4Z(%5K<GET:2!P<F]G
M<F%M=2 M(&IA:R!N82!T;P`"`7$``0```!8````!OF%E_!JDOZ=3S441TI.9
M`""O.]D<```>`!X,`0````4```!33510`````!X`'PP!````%(zv)```'9I:W1O
M<BYL;W-T86M 8VAM:2YC>(zv)````,`!A"+G=K%`P`'$"X!```>``(zv)0`0```&4`
M``!.3T%*151/+$Y%/U1%1$U56D53*$U56D5-12E04T%45DE265)56DY%0D]-
M0EE/4U1/4$523RQ(259)2U1/4E1%1$I%4U1%2D%+5%5!4$Q)2T%#25-055-4
M25104DE35%)!5%50``````(!"1 !````+ (``"(zv)"``#+`(zv)``3%I&=:&_Z;XW
M``H!`P'W( *G`(zv)!C: $*P'-E=# (zv)5&$^: -Q`H,`4 /4#S<R,ZHX```J`N%A
M!X (zv)!Q.C`H '$R!#10* ?0J B0C((#L);S(U-0* &0J!=6,`4 L#;&DS&C8!
M0&,`00M(zv);F<Q&# S,PNF![!O(&$$(&H24'1O+"!N#&4_#] )(zv)"!M=7H-!Y$H
M&8('(zv)"D(zv)<',"805 =FER>2!R>QF0&0`(zv)!N &T!KP&%!S#QC &F $D!C1:&DN
M("A6:6L8P'(7)3(Y7Q!R"K$*(zv)1;P`4!P`V!TG060=!WU#),!H" ^'QZ/&4(8
MD!OP$E!J86L8L%YU&& +4!S(zv)`-!I&^!P.G4;\&D%0!Z(zv)(I%T<C,:D"(`<&\B
M(zv) &08V7^+!WT`: :\!D`&Z +8!JQGP$`&J$9< GP((zv)`B4!O1LR+""?!I(AC(zv)
M!: _'Q]_("X84!N(zv)#U 8L"' &O%AQ1E(zv)=(zv)F 96PN*M =];TK&4H!`!BQ&K )
M`'HC`79D&% )<&<$`". &O Z`PKC"H!(2T597TP`3T-!3%]-04,`2$E.15Q<
M4T\(zv)1E1705(O44UIL04`;W-O`8 O8%<+(zv).4M`'<1`%Q#"' )< (PGE8$D "0
M`B O8%)U"Y#G'(zv),E$1C19&P24!OP`' .9 L1((zv)`PT2 S+C'>,2SP&I$M`3#1
M+(zv)N (I&D96LD0"!;,-5=*C+3-< ;`6X])'4(zv)"0`J4%LW11WT1"KU$X$`.: #
M`! 0``````,`$1 !`````P" $/____] ``<PD&SHZ&5AO(zv)% ``(zv)PD&SHZ&5A
MO(zv)$+``" "" &``````# ````````1(zv)`````#A0````````,``H (( 8`````
M`, ```````!&`````!"%`````````P`%(zv) (zv)(zv)!(zv)``````P ```````$8`````
M4H4``/ .```>`"6 "" &``````# ````````1(zv)````!4A0```0````0````X
M+C ``P`F(zv) (zv)(zv)!(zv)``````P ```````$8``````84````````+`"^ "" &````
M``# ````````1(zv)`````.A0````````,`,( (( 8``````, ```````!&````
M`!&%`````````P`R(zv) (zv)(zv)!(zv)``````P ```````$8`````&(4````````>`$&
M"" &``````# ````````1(zv)`````VA0```0````$`````````'(zv)!"(zv) (zv)(zv)!(zv)``
M````P ```````$8`````-X4```$````!`````````!X`0X (( 8``````, `
M``````!&`````#B%```!`````0`````````>`#T``0````4```!213H(zv)````
+``,`#33]-P``1!V%
`
end


Retezce

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.2.1999 09:59:49

Puvodni zprava, kterou napsal Krayzel Libor dne 26 Feb 99,:

> Predstavoval bych si spise neco takoveho:
>
> MainForm.Caption = 'Resource Explorer'
> Panel1.Caption = ' Resources'
> Button.Hint = 'Tlacitko'

Tak to musis precist DFM format...


S pozdravem
Petr Zahradnik, pocitacovy expert

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


databaze bez BDE

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.2.1999 10:10:43

To ale prave pouzivas BDE. Skus ten program spustit na pocitaci na
kterem neni nainstalovano BDE(Delphi nebo PBuilder) a uvidis ( resp.
neuvidis). Ale to nic.
PS : Raci pokud nekdo vite o nejake komponente pro DBF, ktera ale
nepouziva nic jineho (ODBC,ADO apod ... pro velmi jednoduche aplikace) a
umi filtraci dat tak dejte vedet.

> -----P=F9vodn=ED zpr=E1va-----
> Od: Lukes V=E1clav [SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 9:10
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: databaze bez BDE
>=20
>=20
> Ahoj,
>=20
> mo=BEn=E1, =BEe te=EF nap=ED=B9u n=ECjakej bl=E1bol, Delphi obdivuju, a=
le nejsem v n=ECm
> =BE=E1dn=E1
> jedni=E8ka. J=E1 si d=EClal jednoduchou aplikaci a cht=ECl jsem pou=BE=ED=
vat
> tabulky DBF
> v adres=E1=F8i, kde ona aplikace byla. Jednodu=B9e jsem do
> Table.DatabaseName
> napsal cestu, kde je ona DBF, napr.: C:\Pokus a d=E1le jsem
> Table.TableType
> nastavil na ttFoxPro. Je=B9t=EC jsem doplnil Table.FieldDefs a funguje =
to.
> Mo=BEn=E1
> tady popisuju pou=BEit=ED BDE, nev=EDm.
>=20
> Va=B9ek
>=20
>=20
>=20
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 8:42
> Komu: 'DELPHI Distribution List (el. adresa 2)'
> P=F8edm=ECt: databaze bez BDE
>=20
>=20
> Panove a damy nebijte mne,
> vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv konference a
> diky=20
> Velkemu Billovi jsem prisel o svuj archiv v Outlooku
>=20
> Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez
> pouziti=20
> BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je nekde
> jinde a=20
> pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by mel=20
> fungovat bez nutnosti instalace)
>=20
> Diky
>=20
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
>=20
> ... Wndows nemohou byti virem, nebot virus je napsan inteligentne a
> neco=20
> dela

databaze bez BDE

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

[P��loha v souboru: MDBFTable.int]
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.

Presne tak...tim, ze jsi na formular dal TTable, tak tim jsi se odsoudil
k pouzivani BDE. Pokud budes chtit tento prg. pouzivat i na jinem PC,
kde
BDE neni, nebude Ti fungovat.
Na DBF mam z nejake site free komponentu, ale ta vykazuje chyby, ktere
nejsem s to opravit - pokud naplnis cele pole v tabulce a pro
zobrazovani
dat pouzijes DBGrid a roztahnes sloupec, tak Ti to tam naflaka vselijake
klikyhaky :-(
Musu poslat...

Potom mam jeste tohle, ale to je bez source...
<<MDBFTable.int>>

Dobra.
> ----------
> Od: Lukes V�clav[SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
> Odesl�no: 26. �nora 1999 9:09
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: databaze bez BDE
>
>
> Ahoj,
>
> mo�n�, �e te� nap�u n�jakej bl�bol, Delphi obdivuju, ale nejsem v n�m
> ��dn�
> jedni�ka. J� si d�lal jednoduchou aplikaci a cht�l jsem pou��vat
> tabulky DBF
> v adres��i, kde ona aplikace byla. Jednodu�e jsem do
> Table.DatabaseName
> napsal cestu, kde je ona DBF, napr.: C:\Pokus a d�le jsem
> Table.TableType
> nastavil na ttFoxPro. Je�t� jsem doplnil Table.FieldDefs a funguje to.
> Mo�n�
> tady popisuju pou�it� BDE, nev�m.
>
> Va�ek
>
>
>
>
> -----P�vodn� zpr�va-----
> Od: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
> Odesl�no: 26. �nora 1999 8:42
> Komu: 'DELPHI Distribution List (el. adresa 2)'
> P�edm�t: databaze bez BDE
>
>
> Panove a damy nebijte mne,
> vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv konference a
> diky
> Velkemu Billovi jsem prisel o svuj archiv v Outlooku
>
> Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez
> pouziti
> BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je nekde
> jinde a
> pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by mel
> fungovat bez nutnosti instalace)
>
> Diky
>
> ===========mozno pouzit PGP==============
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> ===========mozno pouzit PGP==============
>
> ... Wndows nemohou byti virem, nebot virus je napsan inteligentne a
> neco
> dela
>

rucne cucanie dat z TQuery

[*] Lubo Fule <fule(zv)sct.sk> - 26.2.1999 10:24:37

Robi sa to presne tak ako si napisal, iba na koniec toho cyklu musis dat
DataSet->Next teda:

while (!DataSet->Eof)
{
//tvoj kod... DataSet->Next;
}
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Lubos
Sent: Friday, February 26, 1999 8:42 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: rucne cucanie dat z TQuery


> Kdyz nad TTable vykonas Query, muzes pouzit metody pro pohyb v tabulce
> (myslim MoveNext apod.) a z aktualniho recordu vzit cokoli a placnout do
> souboru.
>

ano, to ma napadlo tiez, ale musi predsa existovat sposob, ako
vyberat data priamo z kurzoru. Mam na mysli nieco ako

while (!DataSet->Eof)
{
}

ale ja pouzivam TDataSource a TQuery a neviem ako to aplikovat
na ne.

vopred vdaka za kazdu radu.

/LH

Ukryti programu - jak na to

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.2.1999 10:50:34

>A jede to i na 95/98, nebo jenom na NT?>

samozrejme. Na Win9x lze dokonce pouzit klic RunServices, ktery spusti dany
program jeste _PRED_ prihlasenim uzivatele - tj i tehdy kdyz na Win9x je
zobrazen dialog pro prihlaseni do systemu/site !>>[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
>>"Nazev"="C:\\ADRESAR\\APLIKACE.EXE"

Dialog

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 26.2.1999 10:55:05

Tak treba takhle:

class TMyWin =3D class(TForm)
...blablabla...
public:
Parametr:string;
...blablabla...

end;

var MojeOkno:TMyWin;
param:string;

procedure ShowMyWin(MyWin:TMyWin; var par:String); //pripadne vice
parametru
begin
//zde pripadne dynamicke vytvoreni...
MyWin.Parametr:=3Dpar; //pocatecni hodnota
MyWin.ShowModal; //okno se objevi a s parametrem lze delat cokoli
par:=3DMyWin.Parametr; //a to je hodnota, ktera leze z okna
//zde pripadne zruseni, pokud se tvorilo dynamicky
end;

Volani:

param:=3D'blablabla';
ShowMyWin(MojeOkno,par);
//a zde je v param to, co z okna vylezlo

Pisu to rovnou do mailu, takze sorry for pripadne errors.

Pripadne napis na soukr mail, rad poradim, kdyz budu vedet.

********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************> -----P=F9vodn=ED zpr=E1va-----
> Od: Miroslav Fiala [SMTP:mr.fik(zv)seznam(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 8:48
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Dialog
>=20
> Help!!
>=20
> potreboval bych vedet jak se udela, aby procedura nakreslila dialogove
> okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila
> ve svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud
> se nezavre. Nejak mi to nejede (predavani parametru) a nevim cim to
> je. Neni to treba tim, ze to okno zaviram pomoci CLOSE?=20
>=20
> Nejlepsi by byl nejakej priklad.
>=20
> -- http://email.seznam(tec)cz=20
> -- email zdarma na cely zivot

databaze bez BDE

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 26.2.1999 11:06:34

> -----P=F9vodn=ED zpr=E1va-----
> Od: Mal=FD Dobromil [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 10:19
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: RE: databaze bez BDE
>=20
> Presne tak...tim, ze jsi na formular dal TTable, tak tim jsi se odsoudi=
l
> k pouzivani BDE. Pokud budes chtit tento prg. pouzivat i na jinem PC,
> kde
> BDE neni, nebude Ti fungovat.
> Na DBF mam z nejake site free komponentu, ale ta vykazuje chyby, ktere
> nejsem s to opravit - pokud naplnis cele pole v tabulce a pro
> zobrazovani
> dat pouzijes DBGrid a roztahnes sloupec, tak Ti to tam naflaka vselijak=
e
> klikyhaky :-(
> Musu poslat...
>=20
Nyni jsem na DSP (http://sunsite.icm.edu.pl/delphi/) objevil dbf.zip. (je=
to v sekci Delphi3 - Freeware - Data Base Programming)
Zatim to vypada, ze je to to, co jsem hledal.=20
Jen doufam, ze to neni ta stejna komponenta co ma vykazovat tu chybu :-((
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco =
dela


databaze bez BDE

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 26.2.1999 11:22:40

Ahoj,

mam takovou velmi jednoduchou komp. pro DBF, umi i create, ale porad ji
upravuju a pridelavam veci ktere bud neumi nebo jsou chybne. Muzu ti ji
poskytnout.

Jaro B.

> -----P=F9vodn=ED zpr=E1va-----
> Od: Mor=BEol Marian [SMTP:Marian.Morzol(zv)ostrava.aksignal(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 10:11
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: databaze bez BDE
>=20
> To ale prave pouzivas BDE. Skus ten program spustit na pocitaci na
> kterem neni nainstalovano BDE(Delphi nebo PBuilder) a uvidis ( resp.
> neuvidis). Ale to nic.
> PS : Raci pokud nekdo vite o nejake komponente pro DBF, ktera ale
> nepouziva nic jineho (ODBC,ADO apod ... pro velmi jednoduche aplikace) =
a
> umi filtraci dat tak dejte vedet.
>=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Lukes V=E1clav [SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 9:10
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > P=F8edm=ECt: RE: databaze bez BDE
> >=20
> >=20
> > Ahoj,
> >=20
> > mo=BEn=E1, =BEe te=EF nap=ED=B9u n=ECjakej bl=E1bol, Delphi obdivuju,=
ale nejsem v n=ECm
> > =BE=E1dn=E1
> > jedni=E8ka. J=E1 si d=EClal jednoduchou aplikaci a cht=ECl jsem pou=BE=
=EDvat
> > tabulky DBF
> > v adres=E1=F8i, kde ona aplikace byla. Jednodu=B9e jsem do
> > Table.DatabaseName
> > napsal cestu, kde je ona DBF, napr.: C:\Pokus a d=E1le jsem
> > Table.TableType
> > nastavil na ttFoxPro. Je=B9t=EC jsem doplnil Table.FieldDefs a funguj=
e to.
> > Mo=BEn=E1
> > tady popisuju pou=BEit=ED BDE, nev=EDm.
> >=20
> > Va=B9ek
> >=20
> >=20
> >=20
> >=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 8:42
> > Komu: 'DELPHI Distribution List (el. adresa 2)'
> > P=F8edm=ECt: databaze bez BDE
> >=20
> >=20
> > Panove a damy nebijte mne,
> > vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv konference =
a
> > diky=20
> > Velkemu Billovi jsem prisel o svuj archiv v Outlooku
> >=20
> > Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez
> > pouziti=20
> > BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je nekde
> > jinde a=20
> > pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by mel=20
> > fungovat bez nutnosti instalace)
> >=20
> > Diky
> >=20
> > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D
> > Richard Valny richard.valny(zv)oku-st(tec)cz
> > Okresni urad Strakonice tel. 0342-441 l. 216
> > Smetanova 533 fax. 0342-21208
> > 386 22 STRAKONICE FiDoNet 2:423/35
> > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D
> >=20
> > ... Wndows nemohou byti virem, nebot virus je napsan inteligentne a
> > neco=20
> > dela

Problem s corupt table header

[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 26.2.1999 11:25:38

ing. Martin Lasevie p=ED=9Ae:
>=20
> mam ve sv aplikaci velky problem. Je delana v D3 a databaze je Paradox.=
Casto ( zejmena
> na peer-to-peer siti) se stava, ze libovolne tabulky pri pokusu o zapis=
padaji do chyby
> Corupt table header.
>=20
> Otazka zni, nevite nekdo, proc tomu tak je a jak tomu lze predejit?
>=20

Ahoj.

Jedna se o porusenou hlavicku tabulky. V Pdox tabulkach ponerne casty
jev. Tyto tabulky se daji opravit programem TUTILITY. Vetsinou k tomu
dochazi pokud nejaky uzivatel radne neukonci aplikaci a pocitac natvrdo
vypne. Da se taky neco doladit vlastnim nastavenim pocitace, nebo ve W95
se da vypnout zpozdeny zapis pro jednotky. Problem je v tom, ze kdyz
zapisuje do cache a pak program nekdo na tvdo shodi velmi casto je=20
porusena hlavicka. Taky si myslim, ze je dobre otvirat tabulky k zapisu
jen na kratkou dobu.
Cau Jirka

Dialog

[*] Greissler Ronald <greissler(zv)cbnet(tec)cz> - 26.2.1999 11:30:07

Myslis treba takhle?

procedure Zadej (var Vrat:string);
var lMujForm:tMujForm;
begin
lMujForm:=3DtMujForm.Create(Application); //vytvorim
If lMujForm.ShoModal=3DmrOK then //zobrazim a cekam na OK
begin
Vrat:=3DlMujForm.VratEdit; //treba property, ktere ti sahne do=20
prislusneho editu
end;
lMujForm.free;
end;

Samozrejme ceka, nez zavres modalni okno.

Rony
/*********************/
GREISSLER(zv)CBNET.CZ
Prerov
/*********************/

> -----P=F9vodn=ED zpr=E1va-----
> Od: Miroslav Fiala [SMTP:mr.fik(zv)seznam(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 8:45
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Dialog
>
> Help!!
>
> potreboval bych vedet jak se udela, aby procedura nakreslila dialogove
> okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila =
ve
> svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud se ne=
zavre.
> Nejak mi to nejede (predavani parametru) a nevim cim to je. Neni to tre=
ba
> tim, ze to okno zaviram pomoci CLOSE?
>
> Nejlepsi by byl nejakej priklad.
>
> Dik, Fik.
>
> -- http://email.seznam(tec)cz
> -- email zdarma na cely zivot

TRxDbGrid a TDbCtrlGrid

[*] Tom� R��i�ka - 26.2.1999 11:31:11

1)
Mel bych dotaz na komponentu TRxDbGrid. Potrebuju v ni zobrazit tabulku, ale ne vsechny "sloupce". To udelam pomoci editoru, to neni problem. Problem je v tom, ze si takto nepamatuje nastaveni (sirka a pozice), coz delam pomoci SaveLayoutReg a RestoreLayoutReg. Pokud Grid nijak neupravim (tedy ty sloupce), tak to funguje.
Diky za kazdou radu
2)
Dalsi dotaz bych mel na komponentu TDbCtrlGrid. Mohl by mi nekdo popsat, jak a na co se da pouzit ?

Diky

Tomas Ruzicka

------------------------------------------------------
ruzicka(zv)com-tech(tec)cz

HDD seriove cislo

[*] David Adamec <ADAMECD(zv)vs.xion(tec)cz> - 26.2.1999 11:32:26

Muzete mi to taky poslat ?
Diky
David Adamec

> -----P vodn<= zpr_va-----
> Od: Petr Fejfar [SMTP:callnet(zv)telecom(tec)cz]
> Odesl_no: 25. yennora 1999 14:13
> Komu: delphi-l(zv)fwd(tec)cz
> P edm t: Re: HDD seriove cislo ...
>
> Hi,
>
> >Bohuzial, nie je to ono ... potrebujem VYROBNE cislo disku...
> >Ono to tam naozaj je a niektore test-programy v dose ho pekne
> detekuju....
> >Chcel by som to pouzit ako ochranu proti kopirovaniu :-)
>
>
> Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala
> tusim
> IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z
> radice
> disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to
> k
> necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to
> emajlem.
>
> bye, pf
>

databaze bez BDE

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 26.2.1999 11:33:14

> >
> Nyni jsem na DSP (http://sunsite.icm.edu.pl/delphi/) objevil dbf.zip. (je to v sekci Delphi3 - Freeware - Data Base Programming)
> Zatim to vypada, ze je to to, co jsem hledal.
> Jen doufam, ze to neni ta stejna komponenta co ma vykazovat tu chybu :-((
>

Neni to ono. Neumi Memo polozky :-((===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP==============

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco dela


Chyba DBGridu v MDI aplikaci

[*] Greissler Ronald <greissler(zv)cbnet(tec)cz> - 26.2.1999 11:34:08

Prisel jsem na zajimavou chybu. Kdyz vlozim na MDI okno TDBGrid a spustim
a MDIOkno ztrati focus (TDBGrid ztrati focus) - tj. focus se presune na nejaky
prvek formulare MDIForm (tedy hlavniho), tak se zpet do gridu jiz nedostanu,
dokud nepreskocim do jineho MDIOkna nebo neudelam minimize a restore daneho MDI
okna.

Mate nekdo podobne zkusenosti?

Pozn.: V D3. StringGrid to nedela.

Rony
/*********************/
GREISSLER(zv)CBNET.CZ
Prerov
/*********************/

Ukryti programu - jak na to

[*] David Adamec <ADAMECD(zv)vs.xion(tec)cz> - 26.2.1999 11:34:11


> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby
> nebyla videt v menu "Po spusteni", co?
>
> To bych taky rad vedel...

Treba takhle:

>REGEDIT4
>
>[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
>"Nazev"="C:\\ADRESAR\\APLIKACE.EXE"

A neslo by to taky dat do sekce RUN ve win.ini ?

Jak se odhlasit z klubu?

[*] Plisek Jan Ing. <Plisek(zv)spse(tec)cz> - 26.2.1999 11:37:05

Vazeni,

prosim o sdeleni, jak se mam v soucasnosti odhlasit z klubu.

Dekuji za laskavost
===================================================
ing. Jan Plisek e-mail:plisek(zv)spse(tec)cz
SPSE a VOS tel. 040/51 68 21
Karla IV. 13 fax. 040/51 70 37
531 69 PARDUBICE WEB: http://www.spse(tec)cz
Czech Republic
===================================================

HDD seriove cislo ...

[*] Radoslav Jalc, ProNet <pronet(zv)ke.telecom.sk> - 26.2.1999 11:39:55



>Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala tusim
>IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z radice
>disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to k
>necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to emajlem.


No presne, je to ono ... ale ako to pouzit v Delphi...Stale to padaaaa...ze
vraj treba urobit nejaky VXD ovladac pomocou ktoreho sa to vycitava z
radica...Videl som nejake komercne komponenty, ktore to robia a naozaj tam
je ten VXD ...Da sa VXD ovladac vytvorit v Delphi ???
Ono to vraj v Cecku ide spravit ...Pomozte ....>
>bye, pf


Bye
>
>
>

Klavesnice a Prostredi

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

> O tom sice nic nevim, ale existuji ruzne programatorske
> klavesnice, podobne jako v dosu a ty tento problem celkem
> elegantne resi.
****Ze se tak ptam, kde nejakou najdu?

Slavek

> S pozdravem Radek KALA


----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------

Formular v HIDE

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

> S pripadnou viditelnosti na liste souvisi i problemek, ktery mi
> nekdy nastane po dobehnuti nejakeho programu (Instalacni, screensaver
> atp.), ze zustane viset na liste prazdne tlacitko (po odklepnuti zmizi) -
> je mozne tomu nejak zabranit ?
****Obavam se, ze toto je chyba Windowsu.

Slavek

> Jaro B.


----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------

BringToFront?

[*] Greissler Ronald <greissler(zv)cbnet(tec)cz> - 26.2.1999 11:43:33

Ja bych asi umel projit vsechny tabsheety a zjistit, kde se ten prazdny f=
ield=20
nachazi
a pak se tam prepnout.
Nebo mozna by slo zjistit si ten prazdny field a pak nastavit vsechny jeh=
o=20
parenty
(to by asi bylo zrejme obecnejsi).
Mozna existuje jeste nejake elegantnejsi reseni.

Rony
/*********************/
GREISSLER(zv)CBNET.CZ
Prerov
/*********************/

> -----P=F9vodn=ED zpr=E1va-----
> Od: Lubos Dusanic [SMTP:lubos(zv)iname.com]
> Odesl=E1no: 26. =FAnora 1999 7:43
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: BringToFront?
>
> caves,
>
> mam komponentu typu tpagecontrol a na nej niekolko stranok. na kazdej z
> nich sa nachadza n komponent (tfield, tcombobox). ak nevyhovuje nejaka
> zaverecna podmienka (napr. field1.text=3D'') potrebujem nastavit focus =
na ten
> field, ktoreho podmienka nebola splnena. problem je v tom, ze ked sa fi=
eld
> nachadza na inej, ako aktivnej page, musi sa zaroven nastavit tato page=
ako
> aktivna. viete niekto poradit?
>
> ps: dolezite je urobit to tak, aby to fungovalo vseobecne, t.j. pre
> lubovolnu komponentu (nielen pre tpagecontrol) - nieco v zmysle:
>
> for i:=3D0 to componentscount-1 do begin
> if ( trim(components[i] as tfield).text)=3D'' ) then
> nastav_ako_aktivny ???
> end;
>
> vdaka
>
> --
> lubos dusanic
>
> mailto:lubos(zv)iname.com
> http://www.geocities.com/SiliconValley/Haven/7613


Ukryti programu - jak na to

[*] IKO <iko(zv)kamarad(tec)cz> - 26.2.1999 11:51:23

> Ted jeste jak tu aplikaci spustit pri stratu pocitace, aby nebyla videt v
> menu "Po spusteni", co?
>
Staci umiestnit na tvoj exac odkaz do registrov. Mas niekolko
moznosti:
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\Current
Version\Run

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVers
ion\Run

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVers
ion\RunServices

IKO
ikino(zv)pobox.sk
http://freeweb.coco(tec)cz/IKO

TButton - dynamicky prirazena udalost OnClick

[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 26.2.1999 11:59:51

Ahoj vsichni vespolek.

Chtel jsem se zeptat na jeden problem tykajici se dynamicky vytvoreneho
tlacitka v programu.

programove vytvorim tlacitko takto:

.....
Button2 := TButton.Create(Self);
Button2.Parent := Form1;
.....

Nevim, ale jak mohu k tomuto tl. dynamicky priradit udalost OnClick
s vlastni procedurou ?
Zda musim proceduru predem v deklarovat v sekci Type u formulare.
napsat: Type
TForm1 = class(TForm)
procedure TForm1.Button2.Click(sender:TObject);

Button2, ale jeste neexistuje a tak musim nejak ric kompilatoru, ze
bude vytvoren pozdeji. Nebo je to vsechno uplne jinak???

Dekuji za kazdou radu.
Jirka T.

Dialog

[*] Ing. Jaroslav K�e�ek - 26.2.1999 12:02:37


>Help!!
>
>potreboval bych vedet jak se udela, aby procedura nakreslila dialogove
okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila ve
svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud se
nezavre. Nejak mi to nejede (predavani parametru) a nevim cim to je. Neni=
to
treba tim, ze to okno zaviram pomoci CLOSE?
>


Je to tim, ze ho zaviras pomoci CLOSE.
Zrejme tam mas buton na potvrzeni, tak misto
MyForm.close

udelej
MyForm.modalResul :=3D mrOk

A MyForm potom volej pomoci
if MyForm.ShowModal =3D mrOk then ......
else ......

V tomhle pripade muzes po uzavreni dialogu pristupovat ke vsem public
polozkam. (Jsou alokovane.)


Jaroslav K=F8e=E8ek

**********************************************
Ing. Jaroslav K=F8e=E8ek
-------------------------------------------------------------
GRAFEX - software =B9it=FD na m=EDru
- harware pro Va=B9e pot=F8eby
-------------------------------------------------------------
http://web.iol(tec)cz/grafex
mailto:grafex(zv)iol(tec)cz
-------------------------------------------------------------
tel + SMS: +420.603.226103
tel + fax: +420.327.761992
**********************************************

FPiette - TSmtpClient

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.2.1999 12:17:55

S to znakovou sadou to funguje az na pismeno =BE(z s hackem). Ostatni jse=
m
neskousel. Je to pro takovy jednoduchy program na automaticke davkove
odesilani souboru. Ke kazdemu se vygeneruje doprovodny text ... to jenom
tak pro informaci. Prozatim to testuji tak, ze si to posilam do MS
OutLooku ( kvuli tomu ze ty soubory se musi bezpecne prenest a nesmi to
zhavarovat na napr. : "554 receive timeout" nebo " 554 not connected").
To jenom na okraj.=20
Misto =BE to vypisuje ctverec. Tak kdybyste vedeli jak na to a dali vedet
byl bych velmi potesen. Diky.

databaze bez BDE

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.2.1999 12:17:58

Nechci Te strasit, ale myslim, ze jo...eh...mozna je to uz opraveny.
Ta moje, resp. ta, co mam ja, je od :
* dbf.dcu - tDBF : A custom data set which uses a flat binary
* structured datafile for single client usage only.
*
* Author: Horacio Jamilis
* Copyright (C) 1998, Terabyte Computacion
*
* v 0.91

Dobra.

> ----------
> Od: Richard Valny[SMTP:richard.valny(zv)oku-st(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 11:06
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: databaze bez BDE
>=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Mal=FD Dobromil [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 10:19
> > Komu: delphi-l(zv)fwd(tec)cz
> > P=F8edm=ECt: RE: databaze bez BDE
> >=20
> > Presne tak...tim, ze jsi na formular dal TTable, tak tim jsi se
> odsoudil
> > k pouzivani BDE. Pokud budes chtit tento prg. pouzivat i na jinem
> PC,
> > kde
> > BDE neni, nebude Ti fungovat.
> > Na DBF mam z nejake site free komponentu, ale ta vykazuje chyby,
> ktere
> > nejsem s to opravit - pokud naplnis cele pole v tabulce a pro
> > zobrazovani
> > dat pouzijes DBGrid a roztahnes sloupec, tak Ti to tam naflaka
> vselijake
> > klikyhaky :-(
> > Musu poslat...
> >=20
> Nyni jsem na DSP (http://sunsite.icm.edu.pl/delphi/) objevil dbf.zip.
> (je to v sekci Delphi3 - Freeware - Data Base Programming)
> Zatim to vypada, ze je to to, co jsem hledal.=20
> Jen doufam, ze to neni ta stejna komponenta co ma vykazovat tu chybu
> :-((
>=20
>=20
>=20
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
>=20
> ... Wndows nemohou byti virem, nebot virus je napsan inteligentne a
> neco dela
>=20

Dialog

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.2.1999 12:30:29

To, ze formular zaviras pomoci Close podle me nevadi,
protoze i po uzavreni formulare jsou jeho vlastnsti a
stejne tak tedy vlastnosti komponent na nem umistenych
normalne k dispozici, ale zalezi na Action, pokud das
caFree tak pak asi jo, ale jinak ne. Ale asi bych to
udelal tak, jak Ti uz radili udelej si Fci, ktera=20

a) pripadne formular vytvori
(pak musi byt zbytek v bloku try...finally)
b) formular zobrazi (modalne)
c) Result te Fce se nastavi dle nejake vlastnosti
formu tzn. napr. Result:=3DDlgForm.Edit1.Text
a to jedine je-li ShowModal=3DmrOK
d) Jestlize jsi udelal a) tak v sekci finally
zrus formular a je to.
=20

> ----------
> Od: Ing. Jaroslav K=F8e=E8ek[SMTP:grafex(zv)iol(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 12:02
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: Dialog
>=20
>=20
> >Help!!
> >
> >potreboval bych vedet jak se udela, aby procedura nakreslila
> dialogove
> okenecko (muj formular) a nechla si zadat nejaky veci a ty pak vratila
> ve
> svych parametrech. Potrebuju aby to okno bylo porat nahore, dokud se
> nezavre. Nejak mi to nejede (predavani parametru) a nevim cim to je.
> Neni to
> treba tim, ze to okno zaviram pomoci CLOSE?
> >
>=20
>=20
> Je to tim, ze ho zaviras pomoci CLOSE.
> Zrejme tam mas buton na potvrzeni, tak misto
> MyForm.close
>=20
> udelej
> MyForm.modalResul :=3D mrOk
>=20
> A MyForm potom volej pomoci
> if MyForm.ShowModal =3D mrOk then ......
> else ......
>=20
> V tomhle pripade muzes po uzavreni dialogu pristupovat ke vsem public
> polozkam. (Jsou alokovane.)
>=20
>=20
> Jaroslav K=F8e=E8ek
>=20
> **********************************************
> Ing. Jaroslav K=F8e=E8ek
> -------------------------------------------------------------
> GRAFEX - software =B9it=FD na m=EDru
> - harware pro Va=B9e pot=F8eby
> -------------------------------------------------------------
> http://web.iol(tec)cz/grafex
> mailto:grafex(zv)iol(tec)cz
> -------------------------------------------------------------
> tel + SMS: +420.603.226103
> tel + fax: +420.327.761992
> **********************************************
>=20
>=20
>=20
>=20
>=20

databaze bez BDE

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.2.1999 12:31:21

Jake tam jsou chyby ? Ale i tak bych se na ni podival. Diky.

> -----P=F9vodn=ED zpr=E1va-----
> Od: Bene=B9 Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 11:23
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: RE: databaze bez BDE
>=20
> Ahoj,
>=20
> mam takovou velmi jednoduchou komp. pro DBF, umi i create, ale porad
> ji
> upravuju a pridelavam veci ktere bud neumi nebo jsou chybne. Muzu ti
> ji
> poskytnout.
>=20
> Jaro B.
>=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Mor=BEol Marian [SMTP:Marian.Morzol(zv)ostrava.aksignal(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 10:11
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > P=F8edm=ECt: RE: databaze bez BDE
> >=20
> > To ale prave pouzivas BDE. Skus ten program spustit na pocitaci na
> > kterem neni nainstalovano BDE(Delphi nebo PBuilder) a uvidis ( resp.
> > neuvidis). Ale to nic.
> > PS : Raci pokud nekdo vite o nejake komponente pro DBF, ktera ale
> > nepouziva nic jineho (ODBC,ADO apod ... pro velmi jednoduche
> aplikace) a
> > umi filtraci dat tak dejte vedet.
> >=20
> > > -----P=F9vodn=ED zpr=E1va-----
> > > Od: Lukes V=E1clav [SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
> > > Odesl=E1no: 26. =FAnora 1999 9:10
> > > Komu: 'delphi-l(zv)fwd(tec)cz'
> > > P=F8edm=ECt: RE: databaze bez BDE
> > >=20
> > >=20
> > > Ahoj,
> > >=20
> > > mo=BEn=E1, =BEe te=EF nap=ED=B9u n=ECjakej bl=E1bol, Delphi obdivuj=
u, ale nejsem v
> n=ECm
> > > =BE=E1dn=E1
> > > jedni=E8ka. J=E1 si d=EClal jednoduchou aplikaci a cht=ECl jsem pou=
=BE=EDvat
> > > tabulky DBF
> > > v adres=E1=F8i, kde ona aplikace byla. Jednodu=B9e jsem do
> > > Table.DatabaseName
> > > napsal cestu, kde je ona DBF, napr.: C:\Pokus a d=E1le jsem
> > > Table.TableType
> > > nastavil na ttFoxPro. Je=B9t=EC jsem doplnil Table.FieldDefs a fung=
uje
> to.
> > > Mo=BEn=E1
> > > tady popisuju pou=BEit=ED BDE, nev=EDm.
> > >=20
> > > Va=B9ek
> > >=20
> > >=20
> > >=20
> > >=20
> > > -----P=F9vodn=ED zpr=E1va-----
> > > Od: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
> > > Odesl=E1no: 26. =FAnora 1999 8:42
> > > Komu: 'DELPHI Distribution List (el. adresa 2)'
> > > P=F8edm=ECt: databaze bez BDE
> > >=20
> > >=20
> > > Panove a damy nebijte mne,
> > > vim, ze to zde jiz bylo, ale nemohu se pripojit na archiv
> konference a
> > > diky=20
> > > Velkemu Billovi jsem prisel o svuj archiv v Outlooku
> > >=20
> > > Kde se toula komponenta, pomoci ktere slo pripojit DBF soubor bez
> > > pouziti=20
> > > BDE. Jedna se o velice jednoduchou aplikaci, jejiz teziste je
> nekde
> > > jinde a=20
> > > pro jednu tabulku nechci zavadet BDE (nehlede na to, ze soft by
> mel=20
> > > fungovat bez nutnosti instalace)
> > >=20
> > > Diky
> > >=20
> > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
> > > Richard Valny richard.valny(zv)oku-st(tec)cz
> > > Okresni urad Strakonice tel. 0342-441 l. 216
> > > Smetanova 533 fax. 0342-21208
> > > 386 22 STRAKONICE FiDoNet 2:423/35
> > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D
> > >=20
> > > ... Wndows nemohou byti virem, nebot virus je napsan inteligentne
> a
> > > neco=20
> > > dela

databaze bez BDE

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 26.2.1999 12:42:10

> -----P=F9vodn=ED zpr=E1va-----
> Od: Bene=B9 Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 11:23
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: RE: databaze bez BDE
>
> Ahoj,
>
> mam takovou velmi jednoduchou komp. pro DBF, umi i create, ale porad j=
i
> upravuju a pridelavam veci ktere bud neumi nebo jsou chybne. Muzu ti ji
> poskytnout.
>
> Jaro B.
>
Ja jsem nyni nalezl jeste XBase, ale to se netvari jako potomek TTable=20
(nebo neco podobneho, takze se k tomu neda pripoji TDataSource (ani se to=
=20
nechova jako jeho potomek) a proto se neda pouzit ani komponent z palety=20
DataAcces a DataControls)

Moh-li bych zadat o Tvou komponentu, byl bych rad.

Dekuji

=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco=20
dela


BringToFront?

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.2.1999 12:47:16

Delal jsem to pres Tag-y.
U TabbedNotebook-u jsem dal komponentam na strance nula tagy
nula, tem na strance jedna jsem dal tagy =3D1 atd, potom v pripade
chyby (napr. pri nevyplneni povinne polozky) jsem nastavil PageIndex
TTabedNotebooku podle Tagu te ktere polozky; napr. :=20

procedure CheckTEdit(WEdit :TEdit, WMsg : string);
begin
if WEdit.Text=3D'' then // nebo jina podminky
begin
MessageDlg('Polozka '+WMsg+' je povinna !', mtWarning ...
TabbedNotebook.PageIndex:=3DWEdit.Tag;
WEdit.SelectAll;
WEdit.SefFocus; //tady lze jeste pro jistotu volat if CanFocus
then
Abort;
end;
end;

A pri kontrole jsem potom volal tu proceduru pro
kazdy TEdit na celem TabbedNotebook-u.

U TPageControl to bude urcite podobny
Doufam, ze tohle jsi myslel.=20

Dobra.
> ----------
> Od: Greissler Ronald[SMTP:greissler(zv)cbnet(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 11:43
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: BringToFront?
>=20
> Ja bych asi umel projit vsechny tabsheety a zjistit, kde se ten
> prazdny field=20
> nachazi
> a pak se tam prepnout.
> Nebo mozna by slo zjistit si ten prazdny field a pak nastavit vsechny
> jeho=20
> parenty
> (to by asi bylo zrejme obecnejsi).
> Mozna existuje jeste nejake elegantnejsi reseni.
>=20
> Rony
> /*********************/
> GREISSLER(zv)CBNET.CZ
> Prerov
> /*********************/
>=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Lubos Dusanic [SMTP:lubos(zv)iname.com]
> > Odesl=E1no: 26. =FAnora 1999 7:43
> > Komu: delphi-l(zv)fwd(tec)cz
> > P=F8edm=ECt: BringToFront?
> >
> > caves,
> >
> > mam komponentu typu tpagecontrol a na nej niekolko stranok. na
> kazdej z
> > nich sa nachadza n komponent (tfield, tcombobox). ak nevyhovuje
> nejaka
> > zaverecna podmienka (napr. field1.text=3D'') potrebujem nastavit focu=
s
> na ten
> > field, ktoreho podmienka nebola splnena. problem je v tom, ze ked sa
> field
> > nachadza na inej, ako aktivnej page, musi sa zaroven nastavit tato
> page ako
> > aktivna. viete niekto poradit?
> >
> > ps: dolezite je urobit to tak, aby to fungovalo vseobecne, t.j. pre
> > lubovolnu komponentu (nielen pre tpagecontrol) - nieco v zmysle:
> >
> > for i:=3D0 to componentscount-1 do begin
> > if ( trim(components[i] as tfield).text)=3D'' ) then
> > nastav_ako_aktivny ???
> > end;
> >
> > vdaka
> >
> > --
> > lubos dusanic
> >
> > mailto:lubos(zv)iname.com
> > http://www.geocities.com/SiliconValley/Haven/7613
>=20

TButton - dynamicky prirazena udalost OnClick

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 26.2.1999 12:48:07

Musis deklarovat svou proceduru (Napr. procedure
MojeReakceNaClick(Sender: TObject)) ktera musi byt stejneho typu jako
prislusna property ( v tomto pripade musi byt typu TNotifyEvent, protoze
property OnClick je tohoto typu) a po vytvoreni tlacitka priradit
Button2.OnClick:=3DMojeReakceNaClick

S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic=20
____________________________
tel./fax.: +420-(0)69-6912961=20
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz


> -----P=F9vodn=ED zpr=E1va-----
> Od: Jio=ED Toman [SMTP:jiri.toman(zv)seznam(tec)cz]
> Odesl=E1no: 26. Februar 1999 12:00
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: TButton - dynamicky prirazena udalost OnClick
>=20
> Ahoj vsichni vespolek.
>=20
> Chtel jsem se zeptat na jeden problem tykajici se dynamicky
> vytvoreneho
> tlacitka v programu.
>=20
> programove vytvorim tlacitko takto:
>=20
> .....
> Button2 :=3D TButton.Create(Self);
> Button2.Parent :=3D Form1;
> .....
>=20
> Nevim, ale jak mohu k tomuto tl. dynamicky priradit udalost OnClick
> s vlastni procedurou ?=20
> Zda musim proceduru predem v deklarovat v sekci Type u formulare.
> napsat: Type
> TForm1 =3D class(TForm)
> procedure TForm1.Button2.Click(sender:TObject);
> =20
> Button2, ale jeste neexistuje a tak musim nejak ric kompilatoru, ze
> bude vytvoren pozdeji. Nebo je to vsechno uplne jinak???
>=20
> Dekuji za kazdou radu.=20
> Jirka T.

MS SQL 7 + ulozene procedury

[*] Robert Kindl <rob(zv)optimal(tec)cz> - 26.2.1999 12:56:36

> Jenze to by muselo byt odvozene od TDataSet, a to zase povazuji
> za nepruchozi ja. Edity a Gridy by nemel byt zas az takovy
> problem dodelat, nejvetsi problemy vidim s tiskovymi sestavami.

Coz o to problem predelat uplne vse neni zas tak velky (asi tak
dvaclovekoroky)
a je to jiste odvazne a my se prece nebojime, ale:
- v necem tak rozsahlem bude zpocatku tak ohromne mnozstvi chyb,
ze to nikdo nebude schopen nasadit a tudiz ladit
- nekompatibilita (alespon zdanliva) hodne lidi odradi
- spolupracovat s novym rozhranim databazovych komponent bude jen to co
bude v ramci teto nove knihovny.
- nebude fungovat nic od tretich stran...
- bude treba kompletne predelat stavajici aplikace a to nejen z databazoveho
hlediska, kde se to pri nasazeni novych komponent a technologii jaksi
predpoklada,
ale i user interface nebot budou vsechny komponenty nove
- nebude fungovat nic z toho co jiz maji programatori sami hotove a
upravene...
ja sam mam prakticky vsechny databazove komponenty zdedene a ruzne
vylepsene
(nekdy jde o opravu chyb coz by samozrejme odpadlo, ale casto jde o ruzna
vylepseni
a tech bych se nerad vzdaval - takze budto tyto funkce budou v novych
komponentach
nebo je budu muset znovu dodelavat do neceho noveho navic nove
koncipovaneho)
- jen malokdo se bude chtit pustit do tak rozsahleho prepracovani toho co
jiz ma hotove
nebo castecne rozpracovane
- bude zase neco zcela noveho co se bude clovek muset naucit pouzivat uplne
od zacatku
- nebude zadna moznost volby (napriklad podle mne Sinea ani QuickReport
a spousta dalsich nemaji s WYSIWYG nic spolecneho a my treba pouzivame
neco
uplne jineho, coz samozrejme jede nad TDataSet, pravdou je ze lze
doprogramovat
rozhrani k cemukoliv dalsimu, ale i to bude muset nekdo udelat)...

Jak to bude s koncepci novych komponent?
- bude to vse od nuly?
- pak bude trvat velmi dlouho nez to bude umet tolik veci aby to bylo
opravdu nasaditelne
a asi hodne lidi by jen cekalo a cekalo, az to vse budeme umet a ani by
se to nepokouselo
nasadit
- nebo se to bude koncipovat tak, ze "vykrademe to tak jak to je v soucasnem
VCL
a postupne si to upravime k obrazu svemu"?
- neni pak prece jen lepsi vyjit z TDataSet?
- je to legalni? (licence od Inprise to dovoluje? - vzit kod z VCL dodelat
tam par zmen
a pak to free sirit).
- je to eticke? (viz diskuse v Delphireecs-l, jisty pan Cisar zde
prohlasuje ze to neni mozno
prinejmensim bez uzardeni :-))

Rob

COOL?

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 12:59:08

Trochu mimo, ale ne moc:

Microsoft udajne prepracovava C++ do nejake nove "plne objektove" podoby,
ma se to jmenovat COOL (viz novy CW). Nevite o tom neco? Nejake linky?
Nazory?

Dik, Viktor

begin 600 WINMAIL.DAT
M>)\^((zv)H+`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`&````0T]/
M3#\`; $!!8 #``X```#/!P(`&(zv)`,`#L`" `%`$8!`2" `P`.````SP<"`!H`
M# `Y`"L`!0!G`0$)(zv) $`(0```$8S03="1D$T-#5#1$0R,3$Y,SDY,# R,$%&
M,T)$.3%#`$,'`0.0!(zv)!0! ``(0````L``(zv)`!````"P`C```````#`"8`````
M``L`*0```````P`N```````#`#8``````$ `.0"0(zv)EIJ?V&^`1X`< `!````
M!(zv)```$-/3TP_`````(zv)%Q``$````6`````;YA?VGQI+^G],U%$=*3F0`(zv)KSO9
M' ``'(zv)`># $````%````4TU44 `````>`!\,`0```!8```!V:6MT;W(N;&]S
M=&%K0&-H;6DN8WH````#``80B!O$>P,`!Q"=````'(zv)`($ $```!E````5%)/
M0TA534E-3RQ!3$5.14U/0SI-24-23U-/1E151$%*3D504D504D%#3U9!5D%#
M*RM$3TY%2D%+14Y/5D4B4$Q.14]"2D5+5$]612)03T1/0EDL34%3151/2DU%
M3D]6051#3P`````"`0D0`0```$(zv)!``!$`0``G $``$Q:1G7/VW(zv);-P`*`0,!
M]R "IP(`8V(zv)!"L!S970P(%1A/F(zv)#<0*#`% #U \W,C.J. ``*(zv)+A80> ( <3
MHP* !Q,(zv)0T4"(zv)'T*(zv)(D(R" ["6\R-34"(zv)-D*(zv)75C`% +`V,`00M(zv)P&YG,3 S
M,PNF#] C`V /4'4(zv);0=P;RPV( = $E!N$E $8&,Z)PJB"H0*(zv)$UI!0!O<X)O
M`8 (zv)=61A:ACQCG )<!LP`-!O=F$;L$$3,"LK(&1O&.%JW&%K&-$;H!)0((zv)M0
M&/% ;V)J96MT'/$BMQL(zv)!' =D'D8D # ( ^0LB =X"!J!X <X6$%0 !#3T],
M("AV:8IZ'-)Y$S!7*2X'L6T(zv)0'0=<1\1;1CA!: _2P>Q')-L"X!K>2(Q88YZ
M!; C`!EJ1&EK&)!V5B1P'>!R%H$!0!;4,BXY$'(9<Q.!`":P`P`0$ `````#
M`!$0``````,`(zv)!#_____0 `',&#EZS=_8;X!0 `(,&#EZS=_8;X!"P``(zv) (zv)(zv)
M!(zv)``````P ```````$8``````X4````````#``* "" &``````# ````````
M1(zv)`````0A0````````,`!8 (( 8``````, ```````!&`````%*%``#P#(zv)``
M'(zv)`E(zv) (zv)(zv)!(zv)``````P ```````$8`````5(4```$````$````."XP``,`)H (
M( 8``````, ```````!&``````&%````````"P`O(zv) (zv)(zv)!(zv)``````P ``````
M`$8`````#H4````````#`#" "" &``````# ````````1(zv)`````1A0``````
M``,`,H (( 8``````, ```````!&`````!B%````````'(zv)!!(zv) (zv)(zv)!(zv)``````
MP ```````$8`````-H4```$````!`````````!X`0H (( 8``````, `````
M``!&`````#>%```!`````0`````````>`$. "" &``````# ````````1(zv)``
L```XA0```0````$`````````'(zv)`]``$````!``````````,`#33]-P``=LP`
`
end


Jak se odhlasit z klubu?

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 26.2.1999 12:59:13

Dne Fri, 26 Feb 1999 11:37:05 +0100 Plisek Jan Ing. napsal:

> Vazeni,
>
> prosim o sdeleni, jak se mam v soucasnosti odhlasit z klubu.
Jeee, klub! Jak se tam dostanu? Kde? Za kolik? Jaky to v tom klubu bylo?
:-)))

Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772

TButton - dynamicky prirazena udalost OnClick

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.2.1999 13:07:47

1) Staci nekde do oblasti deklarace napr. folmulare (TForm1) ...
nejcasteji do private nebo public zadeklarovat proceduru napr.
procedure MujButtonClick(Sender : TObject); .... je stejneho typu jako
obsluha udalosti

nebo

mimo deklaraci jakekoli tridy=20
=20
procedure MujButtonClick(Sender : TObject) of object;

a pak napr po MujButton :=3D TButton.Create(Application);
dat MujButton.OnClick :=3D Form1.MujButtonClick;

> -----P=F9vodn=ED zpr=E1va-----
> Od: Jio=ED Toman [SMTP:jiri.toman(zv)seznam(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 12:00
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: TButton - dynamicky prirazena udalost OnClick
>=20
> Ahoj vsichni vespolek.
>=20
> Chtel jsem se zeptat na jeden problem tykajici se dynamicky
> vytvoreneho
> tlacitka v programu.
>=20
> programove vytvorim tlacitko takto:
>=20
> .....
> Button2 :=3D TButton.Create(Self);
> Button2.Parent :=3D Form1;
> .....
>=20
> Nevim, ale jak mohu k tomuto tl. dynamicky priradit udalost OnClick
> s vlastni procedurou ?=20
> Zda musim proceduru predem v deklarovat v sekci Type u formulare.
> napsat: Type
> TForm1 =3D class(TForm)
> procedure TForm1.Button2.Click(sender:TObject);
> =20
> Button2, ale jeste neexistuje a tak musim nejak ric kompilatoru, ze
> bude vytvoren pozdeji. Nebo je to vsechno uplne jinak???
>=20
> Dekuji za kazdou radu.=20
> Jirka T.

databaze bez BDE

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 26.2.1999 13:12:37

> -----P=F9vodn=ED zpr=E1va-----
> Od: Mal=FD Dobromil [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 12:18
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: RE: databaze bez BDE
>
> Nechci Te strasit, ale myslim, ze jo...eh...mozna je to uz opraveny.
> Ta moje, resp. ta, co mam ja, je od :
> * dbf.dcu - tDBF : A custom data set which uses a flat binary
> * structured datafile for single client usage only.
> *
> * Author: Horacio Jamilis
> * Copyright (C) 1998, Terabyte Computacion
> *
> * v 0.91
>
Hm je to ona. A chyba opravena neni.

Ale jeste jsem objevil XBase (v temze zdroji)
Na ni se bohuzel neda konektnout jednoduse TDataSourcem nebo dokonce prim=
o=20
T DBGridem. Je zde priklad, kde se na i leze primo z TEdit a dokonce i z=20
TMemo. To ale stejne nefunguje a pari to DBT soubor. (vlezou tam nesmysly=
)=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3Dmozno pouzit PGP=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D

... Wndows nemohou byti virem, nebot virus je napsan inteligentne a neco=20
dela


Jak se odhlasit z klubu?

[*] David Adamec <adamecd(zv)vs.xion(tec)cz> - 26.2.1999 13:12:07

Vazeni,

prosim o sdeleni, jak se mam v soucasnosti odhlasit z klubu.


Pokud se budete chtit z konference odhlasit,
poslete e-mail na adresu <Majordomo(zv)fwd(tec)cz> s nasledujicim
prikazem v tele vaseho e-mailu:

unsubscribe delphi-l

nebo z jineho konta nez je Plisek(zv)spse(tec)cz:

unsubscribe delphi-l Plisek(zv)spse(tec)cz


David Adamec


BringToFront?

[*] Lubos Dusanic <lubos(zv)iname(tec)com> - 26.2.1999 13:16:31

Mal=FD Dobromil wrote:

> Delal jsem to pres Tag-y.
> U TabbedNotebook-u jsem dal komponentam na strance nula tagy
> nula, tem na strance jedna jsem dal tagy =3D1 atd, potom v pripade
> chyby (napr. pri nevyplneni povinne polozky) jsem nastavil PageIndex
> TTabedNotebooku podle Tagu te ktere polozky; napr. :

hm,

to je pekne, ale nie je to ono. skor by som si predstavoval riesenie typu=
-
poslem do okna (tedit) nejaku message, ktora sposobi, ze sa rodic tohto o=
kna
dostane "hore". to co navrhujes ty by som musel upravovat pre kazdu
komponenty typu tpagecontrol, ttabednotebook (a podobne) zvlast.

--
lubos dusanic

mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613

DDE po siti?

[*] David Adamec <adamecd(zv)vs.xion(tec)cz> - 26.2.1999 13:16:57

Nevite jestli jde pouyivat DDE po siti (LAN) ?
David


TButton - dynamicky prirazena udalost OnClick

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 26.2.1999 13:34:19

A nebylo by jednodussi to tlacitko vytvorit klasicky na Formu s tim, ze b=
ude po potrebnou dobu invisible, bude mit prislusne fce jiz udelane, a pa=
k ve vhodnou chvili (jak bys ho tvoril) udelat visible, stejne ten formul=
ar je jiz hotovy, nebo ho take delas dynamicky pres Create? Tomu se mi ne=
chce verit. A take mu nemusis nastavovat pozici na formu! :-)))

> -----P=F9vodn=ED zpr=E1va-----
> Od: Jio=ED Toman [SMTP:jiri.toman(zv)seznam(tec)cz]=20
> Odesl=E1no: 26. Februar 1999 12:00
> Komu: delphi-l(zv)fwd(tec)cz=20
> P=F8edm=ECt: TButton - dynamicky prirazena udalost OnClick
>=20
> Ahoj vsichni vespolek.
>=20
> Chtel jsem se zeptat na jeden problem tykajici se dynamicky
> vytvoreneho
> tlacitka v programu.
>=20
> programove vytvorim tlacitko takto:
>=20
> .....
> Button2 :=3D TButton.Create(Self);
> Button2.Parent :=3D Form1;
> .....
>=20
> Nevim, ale jak mohu k tomuto tl. dynamicky priradit udalost OnClick
> s vlastni procedurou ?=20
> Zda musim proceduru predem v deklarovat v sekci Type u formulare.
> napsat: Type
> TForm1 =3D class(TForm)
> procedure TForm1.Button2.Click(sender:TObject);
> =20
> Button2, ale jeste neexistuje a tak musim nejak ric kompilatoru, ze
> bude vytvoren pozdeji. Nebo je to vsechno uplne jinak???
>=20
> Dekuji za kazdou radu.=20
> Jirka T. M&B


Jak se odhlasit z klubu? :-)

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 26.2.1999 13:35:33


>> prosim o sdeleni, jak se mam v soucasnosti odhlasit z klubu.
>Jeee, klub! Jak se tam dostanu? Kde? Za kolik? Jaky to v tom klubu
bylo?
>:-)))


No v Otrokovicach na krizovatce (u zeleznicniho prejezdu). Ale
Pondeli - Streda je vyhrazen "jen" pro pany :-)))
Podrobnosti nevim - videl jsem pouze reklamy :-)
Plan cesty do Torok. zvladnu :-))))

Mti.

LOOP VARIABLE

[*] Petr Kro�a ml. <pkroca(zv)compact(tec)cz> - 26.2.1999 13:37:17

Ahoj,
zajimalo by me, proc delphi pise warning >> For loop control variable must
be simple local variable <<.

Je to v pripade, ze napisu cyklus a promenna tohoto cyklu je deklarovana
mimo funkci. Nechapu, co se mu na tom nelibi a proc me teda varuje, kdyz to
ve vysledku funguje. Muze mi to nekdo vysvetlit ?

implementation

Var pCycl : Integer;

Function ParamValue(paramName : String) : String;
begin
For pCycl:=1 to ParamCount do

end;

Diky
PK


COOL?

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.2.1999 13:37:46

Nikoliv C++ ale J++, soud MS povolil "vlastni JAVU" a tak si ji MS
udela. Doufam, ze to k necemu bude. (tj. ze bude lepsi nez ten zmetek od
SUN)


Martin Fron=ECk
ZZN Slan=FD a.s.
Pra=BEsk=E1 1579, 274 49, Slan=FD
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz


WARNING - BigBrother inside !!!

> -----P=F9vodn=ED zpr=E1va-----
> Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 12:59
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: COOL?
>=20
> Trochu mimo, ale ne moc:
>=20
> Microsoft udajne prepracovava C++ do nejake nove "plne objektove"
> podoby, ma se to jmenovat COOL (viz novy CW). Nevite o tom neco?
> Nejake linky? Nazory?
>=20
> Dik, Viktor

COOL?

[*] Marek Soukup <marek(zv)comberg(tec)com> - 26.2.1999 13:48:22

Hura, dalsi STANDARD od Microsoftu po dvaceti letech pouzivani toho stare=
ho.
To se mame na co tesit. Ukradnout a znicit tot heslo Mrkvosoftu.

Marek Soukup

Martin Fron=ECk wrote:

> Nikoliv C++ ale J++, soud MS povolil "vlastni JAVU" a tak si ji MS
> udela. Doufam, ze to k necemu bude. (tj. ze bude lepsi nez ten zmetek o=
d
> SUN)
>
> Martin Fron=ECk
> ZZN Slan=FD a.s.
> Pra=BEsk=E1 1579, 274 49, Slan=FD
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> WARNING - BigBrother inside !!!
>
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 12:59
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > P=F8edm=ECt: COOL?
> >
> > Trochu mimo, ale ne moc:
> >
> > Microsoft udajne prepracovava C++ do nejake nove "plne objektove"
> > podoby, ma se to jmenovat COOL (viz novy CW). Nevite o tom neco?
> > Nejake linky? Nazory?
> >
> > Dik, Viktor


pomoc

[*] Marek Soukup <marek(zv)comberg(tec)com> - 26.2.1999 13:53:20

Asi jsem to spatne pochopil, ale k cemu QReport ? Asi tam toho bude vi ze ?

Marek Soukup

Martin wrote:

> Zdravim,
>
> prosim pomozte mi niekto vyriesit nasled. problem. Uz si neviem rady.
> Ale ni pouzitim komponenty QRCompositeRepor, pretoze Delphi 2 ju
> neobsahuju, ani pouzitim komercnych komponent, pretoze program ktory robim
> je iba na moju potrebu prip. sa bude pouzivat iba vo vnutry firmy.
>
> Mam napr. tabulku :
> CZ HODINY
> 12/99 2
> 13/99 3
> 14/99 1
> 12/99 5
> 14/99 7
>
> potrebujem z toho urobit zostavu, najlepsie pomocou Qreport aby najskor isli
> vsetky riadky ako su v tabulke a potom aby urobil pre kazdu zakazku sucet
> hodin, takze zostava by mala vyzerat asi takto :
>
> 12/99 2
> 13/99 3
> 14/99 1
> 12/99 5
> 14/99 7
>
> sucty :
>
> 12/99 7
> 13/99 3
> 14/99 8
>
> Potrebujem to na jednej zostave, prip. na jednom papiery.
>
> dakujem za kazdu radu
>
> Martin


HDD seriove cislo

[*] SunSoft - Mr�z �ubom�r <sunsoft(zv)sunsoft.sk> - 26.2.1999 13:57:00

Tuna je kusok z zdrojaku fungovalo to v Delphi 1
na d4 som to zatial neskusal.

type Zaznam = record
ID:Word;
SerialNumberHi:Word;
SerialNumberLo:Word;
DiskName:Array [1..11] of Char;
DiskFATInfo:Array [1..8] of Char;
end;
var
ActualSegment, ActualOffset, CurrentSegment,Out:Word;
RetDiskId :string
Z:Zaznam;
begin
{ zistenie serioveho cisla HD }
CurrentSegment := DSeg;
ActualSegment := Seg(Z);
ActualOffset := Ofs(Z);
asm
MOV AH,69H;
MOV AL,00H;
MOV BL,00H;
MOV DS,ActualSegment;
MOV DX,ActualOffset;
INT 21H;
MOV Out,AX;
MOV DS,CurrentSegment;
end;
RetDiskId := 'Citizen'+IntToHex(Z.SerialNumberLo,4)+IntToHex(Z.SerialNumberHi,4)+'Minolta';
end;


Dufam ze to trocha pomoze Je to vynatok z zdroja myslim ze postacujuci.
S pozdravom LUBO TSC

************************************************

> Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala
> tusim
> IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z
> radice
> disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to
> k
> necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to
> emajlem.

REINSTALACE WOKEN

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 26.2.1999 14:11:54

A urcite mluvime vsichni o stejnych Windows a o stejnem Microsoftu ?
Ondrej Krajicek

Martin Fron=ECk wrote:
>=20
> Neresil, windows mam od v3.1 pres v95 az k v98 BEZ JEDINE PREINSTALACE =
a
> to i pri zmenach zakladni desky, videokarty a uz na ctvrtem disku. Stal=
e
> je to ovsem ta puvodni instalace, jen upgradovana. Ze by to s MS nebylo
> az tak spatne?
>=20
> Martin Fron=ECk
> ZZN Slan=FD a.s.
> Pra=BEsk=E1 1579, 274 49, Slan=FD
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>=20
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Pavel Serbajlo [SMTP:serb(zv)mikulov.sol(tec)cz]
> > Odesl=E1no: 25. =FAnora 1999 19:35
> > Komu: delphi-l(zv)fwd(tec)cz
> > P=F8edm=ECt: Re: REINSTALACE WOKEN
> >
> > Nerikejte, ze nevite: To jste nikdo neresil podobny problem??
> >
> > -----Original Message-----
> > From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> > To: Delphi cz <delphi-l(zv)fwd(tec)cz>
> > Date: 24. =FAnora 1999 23:57
> > Subject: REINSTALACE WOKEN
> >
> >
> > >Tohle NENI offtopic. Potrebuju preinstalovat Windows98, ale mam
> > drobny
> > >problem, ktery me brzdi. To je Delphi4. Mam tam nainstalovanych
> > spoustu
> > >komponent, expertu, atd. No a jak to tak byva, me se to nechce
> > posleze
> > >priinstalovavat jedno po druhem.
> > >
> > >Ty wokna musim nejdrive SMAZAT!
> > >
> > >Napadlo me, ze bych exportoval registry, kde je delphi a po instalac=
i
> > >importoval
> > >Potom je v adresari system asi spousta *.dll, ktere Delphi pouziva,
> > ale
> > >nevim jake....:((
> > >
> > >Pokud bych tedy vse zalohoval a po instalaci znovu vratil na puvodni
> > misto,
> > >fungovaol by Delphi korektne???
> > >
> > >dik za jakoukoliv radu
> > >
> > >Serbajlo Pavel
> > >ICQ: 20849973
> > >email: serb(zv)mikulov.sol(tec)cz
> > >www: www.nemamstranky(tec)cz
> > >
> > >

Formular v HIDE

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 26.2.1999 14:13:24

respektive Active Desktopu, me to ve starem shellu nedelalo,
ale pod AD mam tech tlacitek i osum.

Ondrej Krajicek

Slavek Rydval wrote:
>
> > S pripadnou viditelnosti na liste souvisi i problemek, ktery mi
> > nekdy nastane po dobehnuti nejakeho programu (Instalacni, screensaver
> > atp.), ze zustane viset na liste prazdne tlacitko (po odklepnuti zmizi) -
> > je mozne tomu nejak zabranit ?
> ****Obavam se, ze toto je chyba Windowsu.
>
> Slavek
>
> > Jaro B.
>
> ----------------------------------------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------------------------------------

Jak se odhlasit z klubu?

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 14:14:18

Dne Fri, 26 Feb 1999 11:37:05 +0100 Plisek Jan Ing. napsal:

> Vazeni,
>
> prosim o sdeleni, jak se mam v soucasnosti odhlasit z klubu.
Jeee, klub! Jak se tam dostanu? Kde? Za kolik? Jaky to v tom klubu bylo?
:-)))

Ja chci taky do nejakeho klubu! Co se tam pije? Ja mam rad rum...
Tak kde to je, ten klub?
Viktor Cistic

begin 600 WINMAIL.DAT
M>)\^(A0-`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`=````4D4Z
M($IA:R!S92!O9&AL87-I="!Z(&ML=6)U/P"3"0$%(zv) ,`#(zv)```,\'`(zv)`:``X`
M#(zv)`2``4`)0$!(( #``X```#/!P(`&(zv)`.``T`((zv)`%`#0!`0F `0`A````,41!
M.$)&030T-4-$1#(Q,3DS.3DP,#(P048S0D0Y,4,`0 <!`Y &```%```A````
M"P`"``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``
M````0 `Y`%#HJ>J)8;X!'(zv)!P``$````=````4D4Z($IA:R!S92!O9&AL87-I
M="!Z(&ML=6)U/P`````"`7$``0```!8````!OF&)ZJ6DOZ(zv)>S441TI.9`""O
M.]D<```>`!X,`0````4```!33510`````!X`'PP!````%(zv)```'9I:W1O<BYL
M;W-T86M 8VAM:2YC>(zv)````,`!A!!K0#"`P`'$/4````>``(zv)0`0```&4```!$
M3D5&4DDL,C9&14(Q.3DY,3$Z,S<Z,#4K,#$P,%!,25-%2TI!3DE.1TY!4%-!
M3#I605I%3DDL4%)/4TE-3U-$14Q%3DDL2D%+4T5-04U64T]50T%33D]35$E/
M1$A,05-)5%I+``````(!"1 !````VP$``-<!``!H`(zv)``3%I&=7-<"7!W``H!
M`P'W( *D`^,"`&,": K <V5T,C,XU0``*(zv)+A80> ( <3`H#Q!Q,(zv)0T4"(zv)P!0
M`O(/5V P(%1A: -Q`H!]$PJ ",(zv)(zv).PEO,C4U,P* "H%U8P!0"P-L:0PS-(zv)%
M"V!N9S$PK#(Y"J #8'0%D'0+IB(zv)(zv)1&X0D$8%$"P(zv)!#(V&+!E8B Q.0,9D!EP
M,3HS-SHPL#4(zv)*S 7,!+(zv)4!:040^P:R!*`Y%)%Q NTB 08'!S!T Z"J(*A,$*
M(zv)#X(zv)5F%Z"? 8X \<EAR6%X$`D&T(zv);R"*<P$`;!U"(&IA&Q!M#[ (zv)`, >T'8?
M``A(zv)8TAA<VX>H'1I'N!DCF(zv)+8 "0!4!Z(&L*0*AB=2X<-$H)X&48\+TAXB$;
M(1_#`9 >T&0(zv)X6$`<'4_($L!`"2 6F9A(= &\&EK)( C87D_(\ >\"!0)> >
MT"'C(&**>0D`/QPT.BTI)Z#/'#H(T !!%O0S,Q=V`M'J,1LA( ]P8R$0`9 E
ML>LD$!NP91^A91,(zv)(=0C0.,(4".6<&EJ),$J,2 2B')A9"V0=6TN+A#W'#03
M`!L0:P$`)=(L\!CP[Q>P`Z AXB<55B50)> %P/Y#! `A``#(zv)** 6WQ?C'$,%
M$X$`,W ``P`0$ `````#`!$0``````,`(zv)!#_____0 `',)#(zv)$]")8;X!0 `(
M,)#(zv)$]")8;X!"P``(zv) (zv)(zv)!(zv)``````P ```````$8``````X4````````#``*
M"" &``````# ````````1(zv)`````0A0````````,`!8 (( 8``````, `````
M``!&`````%*%``#P#(zv)``'(zv)`E(zv) (zv)(zv)!(zv)``````P ```````$8`````5(4```$`
M```$````."XP``,`)H (( 8``````, ```````!&``````&%````````"P`O
M(zv) (zv)(zv)!(zv)``````P ```````$8`````#H4````````#`#" "" &``````# ````
M````1(zv)`````1A0````````,`,H (( 8``````, ```````!&`````!B%````
M````'(zv)!!(zv) (zv)(zv)!(zv)``````P ```````$8`````-H4```$````!`````````!X`
M0H (( 8``````, ```````!&`````#>%```!`````0`````````>`$. "" &
M``````# ````````1(zv)`````XA0```0````$`````````'(zv)`]``$````%````
24D4Z( `````#``TT_3<``%(#
`
end


REINSTALACE WOKEN

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.2.1999 14:17:14

Muze se to zdat neuveritelne, ale je to ten stejny MS a Windows.....jen
si je clovek nesmi zaspinit takovym svinstvem jako hry a pod... Budto je
mam na praci, nebo mam herni konzolu.


Martin Fron=ECk
ZZN Slan=FD a.s.
Pra=BEsk=E1 1579, 274 49, Slan=FD
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz


WARNING - BigBrother inside !!!

> -----P=F9vodn=ED zpr=E1va-----
> Od: Ondrej Krajicek [SMTP:krajicek(zv)promedia(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 14:12
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: REINSTALACE WOKEN
>=20
> A urcite mluvime vsichni o stejnych Windows a o stejnem Microsoftu ?
> Ondrej Krajicek
>=20
> Martin Fronik wrote:
> >=20
> > Neresil, windows mam od v3.1 pres v95 az k v98 BEZ JEDINE
> PREINSTALACE a
> > to i pri zmenach zakladni desky, videokarty a uz na ctvrtem disku.
> Stale
> > je to ovsem ta puvodni instalace, jen upgradovana. Ze by to s MS
> nebylo
> > az tak spatne?
> >=20
>=20

REINSTALACE WOKEN

[*] Marek Soukup <marek(zv)comberg(tec)com> - 26.2.1999 14:24:33

Martine,
normalne me tyhle offtopicy moc nezajimaji, ale tvuj posledni mejl me doc=
ela
rozesmal. Hlavne slovo zaspinit me dost pobavilo. Mrkvosoft by mel zacit
vydavat seznam povolenejch aplikaci, stejne jako maj seznam povolenyho
hardwaru pro NT :-)))))))).


Marek Soukup

P.S. myslim ze Delphi jsou na praci a dokazou Woknous sejmout rychlejs ne=
z
hry :-((((

Martin Fron=ECk wrote:

> Muze se to zdat neuveritelne, ale je to ten stejny MS a Windows.....jen
> si je clovek nesmi zaspinit takovym svinstvem jako hry a pod... Budto j=
e
> mam na praci, nebo mam herni konzolu.
>
> Martin Fron=ECk
> ZZN Slan=FD a.s.
> Pra=BEsk=E1 1579, 274 49, Slan=FD
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> WARNING - BigBrother inside !!!
>
> > -----P=F9vodn=ED zpr=E1va-----
> > Od: Ondrej Krajicek [SMTP:krajicek(zv)promedia(tec)cz]
> > Odesl=E1no: 26. =FAnora 1999 14:12
> > Komu: delphi-l(zv)fwd(tec)cz
> > P=F8edm=ECt: Re: REINSTALACE WOKEN
> >
> > A urcite mluvime vsichni o stejnych Windows a o stejnem Microsoftu ?
> > Ondrej Krajicek
> >
> > Martin Fronik wrote:
> > >
> > > Neresil, windows mam od v3.1 pres v95 az k v98 BEZ JEDINE
> > PREINSTALACE a
> > > to i pri zmenach zakladni desky, videokarty a uz na ctvrtem disku.
> > Stale
> > > je to ovsem ta puvodni instalace, jen upgradovana. Ze by to s MS
> > nebylo
> > > az tak spatne?
> > >
> >

Formular v HIDE

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.2.1999 14:31:48

> respektive Active Desktopu, me to ve starem shellu nedelalo,
> ale pod AD mam tech tlacitek i osum.
****Dovolim si protestovat. Mam prvni disketovou verzi Windows95
a dela mi to taktez.

> Ondrej Krajicek
>
> Slavek Rydval wrote:
> >
> > > S pripadnou viditelnosti na liste souvisi i problemek, ktery mi
> > > nekdy nastane po dobehnuti nejakeho programu (Instalacni, screensaver
> > > atp.), ze zustane viset na liste prazdne tlacitko (po odklepnuti
> > > zmizi) - je mozne tomu nejak zabranit ?
> > ****Obavam se, ze toto je chyba Windowsu.
> >
> > Slavek
> >
> > > Jaro B.
> >
> > ------------------------------------------------------------------------
> > ---- http://atrey.karlin.mff.cuni(tec)cz/~rk
> > ------------------------------------------------------------------------
> > ----
>
----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------

MS SQL 7 + ulozene procedury

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 14:36:04

- je to eticke? (viz diskuse v Delphireecs-l, jisty pan Cisar zde
prohlasuje ze to neni mozno
prinejmensim bez uzardeni :-))

Rob

PCHACHACHACHA ! Viktor Cistic

begin 600 WINMAIL.DAT
M>)\^((zv)X-`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`A````4D4Z
M($U3(%-13" W("L(zv)=6QO>F5N92!P<F]C961U<GD`8(zv)H!!8 #``X```#/!P(`
M&(zv)`.`"0`! `%`"T!`2" `P`.````SP<"`!H`#(zv)`C`"(`!0!*`0$)(zv) $`(0``
M`#0R.40P,C8Y-T9#1$0R,3$Y,SDY,# R,$%&,T)$.3%#`!T'`0.0!(zv)!X! ``
M(0````L``(zv)`!````"P`C```````#`"8```````L`*0```````P`N```````#
M`#8``````$ `.0# Y:STC&&^`1X`< `!````(0```%)%.B!-4R!344P(zv)-R K
M('5L;WIE;F4(zv)<')O8V5D=7)Y``````(!<0`!````%(zv)````&^88STDFD"G4/-
M?Q'2DYD`(*\[V1P``!X`'(zv)P!````!0```%--5% `````'(zv)`?# $````6````
M=FEK=&]R+FQO<W1A:T!C:&UI+F-Z`````P`&$&B^SY(#``<0A ```!X`"! !
M````90```"U*151/151)0TM%/RA625I$25-+55-%5D1%3%!(25)%14-3+4PL
M2DE35%E004Y#25-!4EI$15!23TA,05-52D5:151/3D5.24U/6DY/4%))3D5*
M345.4TE-0D5:55I!4D1%3DD``````(zv)$)$ $```!/`0``2P$``-4!``!,6D9U
M\%88I ,`"(zv)!R8W!G,3(U%P%#`30+8&X.$# R.9T!]R "I /C`(zv)!C: K 0'-E
M=#(S. ``*G4"X6$'(zv)" '$P* !Q,(zv)'$-%`H,`4!!V<')Q:C<0US 2)GT*(zv) C(
M(#8["6\.,#4"(zv) J!=6/#`% +`VQI,S8!0!005&]T!9!T"Z8(zv)&= MQ"!J$A!T
M;R 10 W(zv)`&ME/R H=FEZ)"!D! !K=1$P(': ($1E;'!H:0G18&-S+6PL&A $
M`'1L>2 *L .(zv)0P0`"L%Z+P$`"J(*(zv)!CA: M(zv)<W65&B%Z&C-N"?!I( 1(zv)^'IN
M;QX4&=$=, 40'X"&:(zv)> `(%M(&)E&S ,=7H+$1^2.BTI*?\>%!X4" `,,"*Y
M"- `00\$##,S&-8"T3$(zv)4$,$2$$F!R A(%9I_FL:4 7 '8$:D211`4 /!A<8
MVB*Y%7$`*D ``P`0$ `````#`!$0``````,`(zv)!#_____0 `',/#E[>*,8;X!
M0 `(,/#E[>*,8;X!"P``(zv) (zv)(zv)!(zv)``````P ```````$8``````X4````````#
M``* "" &``````# ````````1(zv)`````0A0````````,`!8 (( 8``````, `
M``````!&`````%*%``#P#(zv)``'(zv)`E(zv) (zv)(zv)!(zv)``````P ```````$8`````5(4`
M``$````$````."XP``,`)H (( 8``````, ```````!&``````&%````````
M"P`O(zv) (zv)(zv)!(zv)``````P ```````$8`````#H4````````#`#" "" &``````#
M````````1(zv)`````1A0````````,`,H (( 8``````, ```````!&`````!B%
M````````'(zv)!!(zv) (zv)(zv)!(zv)``````P ```````$8`````-H4```$````!````````
M`!X`0H (( 8``````, ```````!&`````#>%```!`````0`````````>`$.
M"" &``````# ````````1(zv)`````XA0```0````$`````````'(zv)`]``$````%
5````4D4Z( `````#``TT_3<``&K3
`
end


TButton - dynamicky prirazena udalost OnClick

[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 26.2.1999 14:42:45

Diky za radu.

S tou teckou jsem se utuk, ale v kodu jsem to mel dobre a takhle jsem to
uz zkousel a nejak mi to nechodilo.
Jeste to proverim.=20
=20
Jeste jednou diky Jirka T.
Vaclav Sazima p=ED=9Ae:
>=20
> Ahoj,
> ta tecka za Button2 tam nepatri, metoda se muze samozrejme jmenovat
> jak chces.
>=20
> TForm1 =3D class(TForm)
> procedure TForm1.Moje (sender:TObject);
> begin
> ...
> Button2 :=3D TButton.Create(Self);
> Button2.Parent :=3D Form1; {nebo hezcejc :=3D Self}
> Button2.OnClick :=3D Moje;
> ...
> Vaclav Sazima
>=20
> Ji=F8=ED Toman wrote:
> >
> > Ahoj vsichni vespolek.
> >
> > Chtel jsem se zeptat na jeden problem tykajici se dynamicky vytvorene=
ho
> > tlacitka v programu.
> >
> > programove vytvorim tlacitko takto:
> >
> > .....
> > Button2 :=3D TButton.Create(Self);
> > Button2.Parent :=3D Form1;
> > .....
> >
> > Nevim, ale jak mohu k tomuto tl. dynamicky priradit udalost OnClick
> > s vlastni procedurou ?
> > Zda musim proceduru predem v deklarovat v sekci Type u formulare.
> > napsat: Type
> > TForm1 =3D class(TForm)
> > procedure TForm1.Button2.Click(sender:TObject);
> >
> > Button2, ale jeste neexistuje a tak musim nejak ric kompilatoru, ze
> > bude vytvoren pozdeji. Nebo je to vsechno uplne jinak???
> >
> > Dekuji za kazdou radu.
> > Jirka T.

Menu

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 26.2.1999 14:53:51

V Delphi1 mam formular z menu Input, Print, ...
v menu Input mam zadefinovane:
jedna -> 1.1
1.2
1.3
dva -> 2.1
2.2
a chtel bych toto zkopirovat do menu Print.

Zkusil jsem to napsat do Create formulare
a vypada to nejak takhle:

procedure TfrmMain.FormCreate(Sender: TObject);
{---------------------------------------------------------}
var
i, j: integer;
NewItem: TMenuItem;
begin
for i := 0 to miInput.Count-1 do begin
{prvni uroven}
NewItem := TMenuItem.Create(miReport);
NewItem.Caption := miInput.Items[i].Caption;
miReport.Add(NewItem);
miReport.Items[i].OnClick := miInput.Items[i].OnClick;
for j := 0 to miInput.Items[i].Count -1 do begin
{druha uroven}
NewItem := TMenuItem.Create(miReport);
NewItem.Caption := miInput.Items[i].Items[j].Caption;
miReport.Items[i].Add(NewItem);
miReport.Items[i].Items[j].OnClick :=
miInput.Items[i].Items[j].OnClick;
end;
end;
end;


Je to v poradku?
V Destroy formu ty vytvorene menuItem musim Destrynout nebo se
to udela automaticky?+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+

REINSTALACE WOKEN

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.2.1999 15:03:04

>Muze se to zdat neuveritelne, ale je to ten stejny MS a
Windows.....jen
>si je clovek nesmi zaspinit takovym svinstvem jako hry a pod...
Budto je
>mam na praci, nebo mam herni konzolu.

Nechapu, jaxi vyrobce softu muze klast takoveto podminky...
bud budes pracovat nebo hrat...nekdo si moupi pocitac
i na praci i nahry. JE TO JEHO VEC !
Navic nechapu, jaxi muzes dovolit napsat, ze hry jsou svinstvo,
protoze za tak rychly vyvoj HardWare vdeci pocitace zejmena hram
Nekdo chodi do kina, jiny si rad cte, dalsi hraje pocitacove hry,
je to lepsi, nez kdyz fetuje nebo chalsta.

Puvodne jsem se teto debaty nechtel vubec zucastnit, ale
ze Tobe se Wokna nezhroutila ani jednou, tak mas stesti.
Ja sice moc her nemam, protoze jsou porad jeste moc drahy,
ale jednou za cas preinstalovavat stejne musim !

Mozna jsi necetl clanky o tom, ze OS, zalozeny na ovladacich a
DLLkach ma jednu velokou nevyhodu a tou je zahnivani, protoze za
cas uz nikdo nevi, jaka verze te ktere knihovny je v systemu prave
ted. Nakonec nektery program zavola fci, ktera je davno jinak,
system se zhrouti a Ty musis preistalovavat, protoze casto ani
nejsi schopen zjistit, ktera knihovna to je. Cim vice aplikaci
instalujes a odinstalovavas, tim hur.

Navic, Windows jsem instaloval tak 150-200 krat (na ruzna PC)
a stalo se mi castokrat, ze pri uplne stejnem postupu, na
STEJNYCH pocitacich se na jednom Windows uplne sesypaly :-(((
A jeste nikde zadna aplikace ani zadna "svinska" hra.

Pokud pouzivas jen CBuilder a nic jineho, paxe ti to stat treba
nemusi. Ale obhajovat MS tim, ze pocitace jsou bud JEN na praci,
nebo JEN na hrani je blbost.


Howg...
...Dobra.

HDD seriove cislo

[*] Radoslav Jalc, ProNet <pronet(zv)ke.telecom.sk> - 26.2.1999 15:17:31

Nejak z toho nemozem vyjst...skus poslat celu unitu, alebo nejaku hotovu
function ....>Tuna je kusok z zdrojaku fungovalo to v Delphi 1
>na d4 som to zatial neskusal.
>
>type Zaznam = record
> ID:Word;
> SerialNumberHi:Word;

^^^^^^^^^^^^^^^^^^^^^^^^^^
> SerialNumberLo:Word;

^^^^^^^^^^^^^^^^^^^^^^^^^^
> DiskName:Array [1..11] of Char;
> DiskFATInfo:Array [1..8] of Char;
>end;
>var
> ActualSegment, ActualOffset, CurrentSegment,Out:Word;

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
> RetDiskId :string
> Z:Zaznam;
>begin
> { zistenie serioveho cisla HD }
> CurrentSegment := DSeg;

^^^^^^^^
> ActualSegment := Seg(Z);
> ActualOffset := Ofs(Z);
> asm
> MOV AH,69H;
> MOV AL,00H;
> MOV BL,00H;
> MOV DS,ActualSegment;
> MOV DX,ActualOffset;
> INT 21H;
> MOV Out,AX;
> MOV DS,CurrentSegment;
> end;
> RetDiskId :=
'Citizen'+IntToHex(Z.SerialNumberLo,4)+IntToHex(Z.SerialNumberHi,4)+'Minolta
';>end;
>
>
>Dufam ze to trocha pomoze Je to vynatok z zdroja myslim ze postacujuci.
> S pozdravom LUBO TSC
>
> ************************************************
>
>> Pred mnoha lety jsem videl DOSovskou utilitku, ktera se jmenovala
>> tusim
>> IDEINFO, byl k tomu zdroj v pascalu a cetlo to informace primo z
>> radice
>> disku mj. i 20 znakove seriove cislo disku. Pokud myslis, ze by ti to
>> k
>> necemu mohlo byt, tak bych zahrabal nekde v archivu a poslal ti to
>> emajlem.
>
>

COOL, not JAVA

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 15:25:32

V clanku se pravi, ze MS hodla omezit produkci vyvojovych nastroju pro Javu
a chce se soustredit na "plne objektove C++", zname zatim pod nazvem COOL.
Takze COOL neni Java a tim me vedomosti o tom, co to je, konci. Ze soud
povolil MS "vlastni Javu" vim, ale tady jde o neco jineho.

BTW, jaky ZMETEK ?!

Viktor

Nikoliv C++ ale J++, soud MS povolil "vlastni JAVU" a tak si ji MS
udela. Doufam, ze to k necemu bude. (tj. ze bude lepsi nez ten zmetek od
SUN)


Martin Fron�k
ZZN Slan� a.s.
Pra?sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz


WARNING - BigBrother inside !!!

> -----P�vodn� zpr�va-----
> Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl�no: 26. �nora 1999 12:59
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: COOL?
>
> Trochu mimo, ale ne moc:
>
> Microsoft udajne prepracovava C++ do nejake nove "plne objektove"
> podoby, ma se to jmenovat COOL (viz novy CW). Nevite o tom neco?
> Nejake linky? Nazory?
>
> Dik, Viktor

begin 600 WINMAIL.DAT
M>)\^(B(.`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`6 (```(````-`````P``, ,````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,````$ ,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````(!$CH!````/0````````"!*Q^DOJ,0
M&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W
M9"YC>(zv)`````+`$ Z`0````(!](zv)\!````! ````````,,`````P``, 0````+
M``\.`0````(!_P\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"`````&1E
M;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````>``(P`0``
M``4```!33510`````!X``S !````$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,
M`0````,`_(zv)\&````'(zv)`!, $````2````)V1E;'!H:2UL0&9W9"YC>B<````"
M`0LP`0```!4```!33510.D1%3%!(22U,0$971"Y#6(zv)`````#```Y``````L`
M0#H!`````(zv)'V#P$````$````````! ]G`02 `0`0````0T]/3"P(zv);F]T("!*
M059!`"P$`06 `P`.````SP<"`!H`#P`9`" `!0`_`0$&``<``0````````$(zv)
M(zv) ,`#(zv)```,\'`(zv)`:``X`.(zv)`*``4`20$!"8 !`"$````T1#1$,T$S.#(zv)T0T1$
M,C$Q.3,Y.3 P,C!!1C-"1#DQ0P`G!P$#D 8`8 <``"(````+``(``0````L`
M(P```````P`F```````+`"D```````,`+(zv)```````(zv)$Q``$````8````````
M``K53(U6?=(1DS4`(*\[V1R$'B$``P`V``````! `#D`4(O7W9-AO(zv)$>`' `
M`0```! ```!#3T],+"!N;W0(zv)($I!5D$``(zv)%Q``$````6`````;YAD$QV:0*=
M5\U_$=*3F0`(zv)KSO9' ``'(zv)`># $````%````4TU44 `````>`!\,`0```!8`
M``!V:6MT;W(N;&]S=&%K0&-H;6DN8WH````#``803-HZT(zv),`!Q#Q`(zv)``'(zv)`(
M$ $```!E````5D-,04Y+55-%4%)!5DDL6D5-4TA/1$Q!3TU%6DE44%)/1%5+
M0TE6659/2D]664-(3D%35%)/2E504D]*059504-(0T5315-/55-44D5$251.
M02)03$Y%3T)*14M43U9%0RLK((zv)`````"`0D0`0```!(zv)$```4! ``>(zv)4``$Q:
M1G7")]2T=P`*`0,!]R "I /C`(zv)!P2')Q-P(`8V(zv)*P'/P970P( <3`H,`4 [V
M40_5,C,X```J`N%A1P> $%8'$R!#10* ?1,*(zv) C((#L);S(U-3,"(zv) J!=6,`
M4 L#;&DT,S8!0&,`00M(zv);F<0,3 S,PNF(%8(zv)HF,7H6MU(! 0( ]PP&%V:2P(zv)
M>A+ !>$6: 1P"V (zv)`W!E>FD'!4 /< 1P=6MC:2# =GEV;VIO&Z /T-((zv)$I!S
M= -(zv):AD(zv)&Q&\($H9D!D(zv)&H /T&,2P'T907,(8!QQ"8 :X1*0( HB"U!N$L!O
M8FIE#&MT&_ 2P$,K*R+C&<$2DWIA= =P&6 $< T<07H?P"#P0T]/3. N(%1A
M:QGA(<(<0/\)\!N '2$:(zv)!J (-(2L1_ >F0#<&\<<!N '0`?H&VW&< %H"2Q
M(!]P&<!K`B#[&W B`%H=\R$P(1 ;P!<`<P,(zv)!>$B=(zv)M(zv)'' B]'5^(AN0!W 9
MP = $L !D&2^>25(zv)`0`DD1\(zv))1%J"X Z91I +(zv)JB"H0*(zv)$)4&E<9P&HB,"D`
M6DU%0%1%2R _(2I*5LII'Y%R%Y4R.1#B*E17%V !0!L1= 60="I$3MLM`";1
M=A_B*(-*( `9P(\F4P7A)J8G6$%652(zv)(zv)_R-Q(C 9,!N *= %T2I$)G#690M(zv)
M((zv)!$"&!F$J 9P]\E03,0*8$AD!D(zv)8C01((zv)"X*'1J((zv)`9X37R("B(zv)]G S,1\(zv)
M>B. "? 9T > #R[P,Q $<"I$4U5.*;LJ2BI$30K (- #H$8#8!4+D"<%D&LJ
M1%I:3I\&`!>A.P`%<!U(zv)+G,J-790&8 [`#D'D#M .Q Q(" Q-3<Y&< R-W(zv)T
M(#0^,3OV*D0N\&P)((zv)`K- '0+3,Q-$(zv)M-3(MP#(zv)V*D1EQBT`P ,0.B (zv)`U$?
M("AK0'H(zv)4',7H7DN!&-Z.3\*5T%23(zv)!)3D<(zv)+2!":=1G0B[1: 20( N `)!M
M*3$A1? J2CY$H$<"4+4\,3D;P&0Z\B$P>(zv)]PCSVR(T!'`T:&3V0Z#(*[*#$M
M$BX)`!QP(C! #] &;27P0O (zv)6U--5.Q0.DH?2R)=21(zv)'D E0R3W!;F])M#(V
M((zv)`\,6<`< 6P&H Q.4^(zv)/? RK#HU+=!&E4L#<'5)M (G-"%P:&DM;$!H9G=D
M0N$G1H9'4CBU"8!M.P)T2;0APC]&AOU&AE0#8 _0&2!+$ 1(zv)*'2;'R$$8&-)
ML%1]36D%`)4D4&\!(zv)" F<&%J'R'_#W W,!F !: C0"-!,!(D(-\BP2M15E$?
MLA[](D:&(1']'U!Y&< `P!DR)4('(zv)%JA>R# (G0H&: WH%JA*0!#_%<I((zv)`'
MP!F(zv)+O DE"ESGU17!\!:4Q<`&0!Y/P>P[R%(zv)!;!AH%1N1"T`&< L]0LJ4Q/Q
M`&20`P`0$ `````#`!$0`````$ `!S"(zv)0 ,+D&&^`4 `"#"(zv)0 ,+D&&^`0(!
M%#H!````$ ```$U-.CB$S=(1DYD`(*\[V1P+``" "" &``````# ````````
M1(zv)`````#A0````````,``H (( 8``````, ```````!&`````!"%````````
M`P`%(zv) (zv)(zv)!(zv)``````P ```````$8`````4H4``/ .```>`"6 "" &``````#
M````````1(zv)````!4A0```0````0````X+C ``P`F(zv) (zv)(zv)!(zv)``````P ``````
M`$8``````84````````+`"^ "" &``````# ````````1(zv)`````.A0``````
M``,`,( (( 8``````, ```````!&`````!&%`````````P`R(zv) (zv)(zv)!(zv)``````
MP ```````$8`````&(4````````>`$& "" &``````# ````````1(zv)`````V
MA0```0````$`````````'(zv)!"(zv) (zv)(zv)!(zv)``````P ```````$8`````-X4```$`
M```!`````````!X`0X (( 8``````, ```````!&`````#B%```!`````0``
?```````>`#T``0````$``````````P`--/TW``!;M(zv)``
`
end


Java? Zmetek?

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 26.2.1999 15:33:34

...tj. ze bude lepsi nez ten zmetek od SUN

Martin Fron�k

Proc myslis, ze Java je zmetek. Ja jsem psal par prekladacu (ne pro Javu) a
trochu jsem se zabyval designem jazyku a zda se mi, ze Java je navrzena
velmi dobre. Popravde se mi zda snad vubec nejlepsi ve srovnani s bezne
pouzivanymi jazyky (C++, C, Pascal, Smalltalk, VB atd.). A ty reknes
zmetek... Proc? Myslis, ze tam jsou nejake zavazne diry? Nebo quli
vykonnosti? Herdek, proc? Me to fakt zajima, protoze tady uvazujeme nad
hyper super ultra mega optimalizujicim kompilatorem Javy a jestli existuje
nejaky vazny problem, ktery jsme prehledli, pro ktery vyvojari Javu nebudou
pouzivat, tak to mozna stopnem.

Dik za kazdy nazor.
Viktor

begin 600 WINMAIL.DAT
M>)\^(B0.`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L
M<&AI+6Q 9G=D+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"
M`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#
M`/U?`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`.````2F%V
M83\(zv)6FUE=&5K/P"0! $%(zv) ,`#(zv)```,\'`(zv)`:``\`(0`B``4`20$!(( #``X`
M``#/!P(`&(zv)`/`!P`)0`%`$<!`0F `0`A````,4$U.#4P1#8X-D-$1#(Q,3DS
M.4$P,#(P048S0D0Y,4,`( <!`Y &`#0&```A````"P`"``$````+`",`````
M``,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````0 `Y`&!2`_V48;X!
M'(zv)!P``$````.````2F%V83\(zv)6FUE=&5K/P````(!<0`!````%(zv)````&^893]
M`-906!S-AA'2DYH`(*\[V1P``!X`'(zv)P!````!0```%--5% `````'(zv)`?# $`
M```6````=FEK=&]R+FQO<W1A:T!C:&UI+F-Z`````P`&$,WE&CP#``<0-0(`
M`!X`"! !````90```%1*6D5"541%3$504TE.15I414Y:345414M/1%-53DU!
M4E1)3D923T[L2U!23T--65-,25,L6D5*059!2D5:345414M*04I314U04T%,
M4$%24%)%2TQ!1$%#52A.15!23TI!5E4``````(zv)$)$ $````B`P``'(zv),``",$
M``!,6D9UGXN"_'<`"(zv)$#`?<(zv)`J0#XP(`<$AR<3<"`&-H"L!S\&5T," '$P*#
M`% .]E$/U3(S. ``*(zv)+A84<'(zv)!!6!Q,(zv)0T4"(zv)'T3"H (R" ["6\R-34S`H *
M(zv)75C`% +`VQI-#,V`4!C`$$+8&YGD#$P,S,+IB N&+!G%U$!0!>D,CD*H -(zv)
M= 4%D'00X2!T:BX(zv)$GH2P&)U`0`(zv);&7"< "0(&YE>AI(zv)"?#G&J '(zv)!GP:R $
M<!=<&<4?`M$00 ,P&/\:!5-53E<*H(zv)J$"H!-"L!T"X (zv)UD8#8 N0)P60:R 5
M%V(G'8<(zv))!>I(% #8&,(zv)2&UY<Q<`<RP:HDK(zv)879A(&H2P!P4&I#G)3 E<! 0
M;2 ;4!.!"K(7#W <4 M(zv)9 #0=2 HBQN0)S%O)2)U*2 E8/IT)$%H)] F8Q 0
M&J !H-YY)5 #( $``)!G&Y FD&!J87IY:R?0)6!Z,R>(zv)*:)M:23K$I!V<L,:
ML!*0('9E;"OP*E#,;V()<!J04&\/<"5 +QL!*\,K=!*09"U(zv)=6)[!9 ;(zv)6H;
M-"UP*: #8'9_$I #`"F(zv)&M ;H"(zv)""&!ZNFDE4&X&P!MP*O-Y)^ H0RLK).!#
M).!089<$\ = ).!3`,!L; &0)&QK).!60BC =&3T+BD:D$$:8#,`)U$;D.\$
M("6U&+ D(S\%T"28`9#-*M%S"& P$F%K*<(E4.$QLF1I<GDW( ? !N!X('%U
M%P`M8"L(zv)`B!N[&]S(0`W($(zv)$D $`-+'O&<$W$C?1*%!F.+ %0"G(zv)NFH'<&$[
MDSQ -\-D,P`Z=3D1=26 $K$O(zv)FAY]G $D"F(zv)=3\2.C H\"5(zv)O0> 9R5(zv)+E A
M`#1!:3Y!E&EC!W (zv).I!M< ,0_S40!; F(zv)24Q,P`E8CK(zv).D'T97(zv)$`'0^43AT
M,P`Y$O\S`!G!`F F(zv)"3(zv)/) $D#,`UR9(zv)$K$G06(zv);,&07`#N3\T3U.G!V;RKP
M!1 H8QN!]QKA.%$Q]70DX &0'& \0>\$8#&P*Z$\0' JL1C0("G\1&D<8"G(zv)
M05 K`#WA$I#V>(zv)6P2D562R!!T1Y?&?4+(!03\0!/( ```P`0$ ,````#`!$0
M``````,`(zv)!#_____0 `',&"?24R48;X!0 `(,&"?24R48;X!"P``(zv) (zv)(zv)!(zv)``
M````P ```````$8``````X4````````#``* "" &``````# ````````1(zv)``
M```0A0````````,`!8 (( 8``````, ```````!&`````%*%``#P#(zv)``'(zv)`E
M(zv) (zv)(zv)!(zv)``````P ```````$8`````5(4```$````$````."XP``,`)H (( 8`
M`````, ```````!&``````&%````````"P`O(zv) (zv)(zv)!(zv)``````P ```````$8`
M````#H4````````#`#" "" &``````# ````````1(zv)`````1A0````````,`
M,H (( 8``````, ```````!&`````!B%````````'(zv)!!(zv) (zv)(zv)!(zv)``````P ``
M`````$8`````-H4```$````!`````````!X`0H (( 8``````, ```````!&
M`````#>%```!`````0`````````>`$. "" &``````# ````````1(zv)`````X
IA0```0````$`````````'(zv)`]``$````!``````````,`#33]-P``\6P`
`
end


MS SQL 7 + ulozene procedury

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.2.1999 15:33:33

Zcela jiste je ti -nact, software nedelas ani nekupujes a na hw ti dava
tatinek.....tak to sis ale spletl konferenci.


Martin Fron=ECk
ZZN Slan=FD a.s.
Pra=BEsk=E1 1579, 274 49, Slan=FD
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz


WARNING - BigBrother inside !!!

> -----P=F9vodn=ED zpr=E1va-----
> Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl=E1no: 26. =FAnora 1999 14:36
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: MS SQL 7 + ulozene procedury
>=20
> - je to eticke? (viz diskuse v Delphireecs-l, jisty pan Cisar
> zde
> prohlasuje ze to neni mozno
> prinejmensim bez uzardeni :-))
>=20
> Rob
>=20
> PCHACHACHACHA ! Viktor Cistic
>=20

TButton - dynamicky prirazena udalost OnClick - po

[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 26.2.1999 15:43:28

Dekuji Vsem za rady - jdu to vyzkouset !!!!!!

Jirka T.
PS:
Preji hezkou sobotu a nedeli.

Martine Babiku.

Ja vim ze by bylo lepsi dat Button na Form, ale bohuzel to potrebuji
vytvorit takto.

LOOP VARIABLE

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.2.1999 16:54:25

> Ahoj,
> zajimalo by me, proc delphi pise warning >> For loop control variable must
> be simple local variable <<.
>
> Je to v pripade, ze napisu cyklus a promenna tohoto cyklu je deklarovana
> mimo funkci. Nechapu, co se mu na tom nelibi a proc me teda varuje, kdyz
> to ve vysledku funguje. Muze mi to nekdo vysvetlit ?
****Podle meho nazoru je to pro bezpecnost a blaho programatora. Pokud
napriklad volas ve forcyklu nejakou metodu, kde mas taktez
forcyklus s tou samou globalni promennou (protoze je zvykem
pojmenovat tuto promennou i), pak to muze trvat i trochu dele, nez
najdes, kde je chyba. Pravda ovsem muze byt jina. Taky me
napada: kdyz pouzijes lokalni promennou, je to na zasobniku
hodne blizko, kdezto globalni muze byt klidne i odswapovana na
disku (takze mozna i kvuli rychlosti).


Slavek


----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------

Exception

[*] Karel Pechanec <ka.pecha(zv)pvtnet(tec)cz> - 26.2.1999 16:56:57

Myslim si, vzheledem k tomu, ze kazdy fomular predstavuje
vlaakno (tudis vsechny objekty jsou s timto vlaaknem spojeny take =3D>
vklaakna pouzivas aniz bys o tom vedel), tak to vidim na neuvolneny objek=
t,
nebo spise ulohu, provadenou k uz uvolnenemu objektu (spatna synchonizac=
e -
tento problem se objevuje u free komponent).
Nebo jsi take zapomel uvolnit nejakej ten objekt sam (pokud je vytvaris
dynamicky).
Viic ti nepovim...

-----P=F9vodn=ED zpr=E1va-----
Od: Ing. Miroslav Ondrisek, Bonnel Technologie, s.r.o. <bonnel(zv)telecom(tec)cz=
>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 26. =FAnora 1999 6:21
P=F8edm=ECt: Exception


>
>Pri uzavirani me aplikace dostanu vzdy hlasku Exception class C0000005
>with message: access violation at address xxx: read of address
>0xffffffff.
>
>Kdyz si necham najit tu adresu xxx, kde nastala chyba, zjistim, ze je to
>to TThread.Suspend rutina. Vzhledem k tomu, ze ja thready nepouzivam (v
>teto aplikaci), potreboval bych zjistit, co je zdrojem teto chyby. Jak ?
>
>Diky za pripadne popostrceni.
>
>Mira
>
>
>
>

Retezce

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.2.1999 17:02:07

> Puvodni zprava, kterou napsal Krayzel Libor dne 26 Feb 99,:
>
> > Predstavoval bych si spise neco takoveho:
> >
> > MainForm.Caption = 'Resource Explorer'
> > Panel1.Caption = ' Resources'
> > Button.Hint = 'Tlacitko'
>
> Tak to musis precist DFM format...

... ktery je ulozen v RCData. Odtamtud se to musi vytahnout,
prilepit k tomu hlavicka, a prohnat napriklad programem
Convert.exe a pak z toho vytahat ty texty. Opravdu na tom nic
neni. :-)))


S pozdravem

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


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