Archív konference Delphi

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

Re[3]: Cestina do delphi

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 19.2.1999 23:40:20

Puvodni zprava, kterou napsal Zbysek Hlinka dne 19 Feb 99,:

> > pomalu na D1/2 zapomenout... Mimochodem sis take vsiml, ze ted
> > odstranili centralni SRMGR a davaji do kazdeho produktu svuj
> > zvlastni, nevim proc. Mohl bych se na to klidne podivat a asi
> > bych mel byt schopen udelat programek, ktery by to modifikoval
> > na praci s resourcestring...
> >
> Vsimnul, a divil jsem se, az mi bylo divno. Ono tech zmen je zda
> se vic - zrejme prestali pouzivat i spolecnou knihovnu StDate. Ani
> neni divu, protoze to vzdy znamenalo delat hromadny update na
> temer vsechno. :-)

Ano, to udelali jedine dobre, protoze byly problemy s konflikty
verzi, zvlaste trial verzi... Ja mam napriklad vsechno, ale co
ti, kteri maji jeden ostry a chteli zkouset trial verzi - tam
byl trosku problem. No, aspon ted na to uz nemuzes nadavat
v recenzich :-)))

> Ted je jeste dotlacit k tomu, aby zakonzervovali nejaky stav pro D1
> a D2 a vyvijeli uz jen pro D3 a vyse.

To bych take hrozne rad, ale problem bude v tom, ze jeste stale
velke mnozstvi lidi opravdu tyhle vykopavky pouziva, takze
TurboPower tezko bude chtit o tyhle zakazniky prijit.


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


Setup

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 19.2.1999 23:58:01

Puvodni zprava, kterou napsal Peter =C8IRIP dne 19 Feb 99,:

> ja problem s registrami nevidim, su vyborne, ale vadi mi na nich jedna =
ve=3D
> c : casto sa mi stane, ze si zababrem Windows kadejakymi demami, ktore =
ale
> nechaju po odinstalacii vela humusu v registroch. Windows sa mi potom
> velmi-velmi spomaluje a preto ho jednoducho zmazem, a tym zmazem aj

Existuje nekolik programu, ktere delaji v registru poradek.
Pokud se v nem vyznas, muzes si hodne veci vymazat sam, ale
samozrejme je to pakarna to vsechno prochazet a premyslet, co
uz vymazat a co jeste ne...

> registre. Mam ale nejakz SW ktory ma nastavenia velmi siroke, preto by
> strasne bodlo, keby sa to predsa len dalo do nejakeho externeho suboru.=
A
> tiez pri praci v sieti ten subor mohol byt zdielany ...

Mozna by pro takove konfigurace bylo lepsi mit to v databazi,
protoze pak nemusis sdilet soubor jako takovy, ale jednoduse
pouzijes SQL Server - bezpecnost, integrita apod. Nemusis pak
nastavovat ruzne cesty na sitovy server, ale vyuzijes stavajici
napojeni na SQL Server, ktere tak jako tak musis mit pro
databazi.


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


TurboPower

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 20.2.1999 11:11:27

Petr Zahradnik wrote:

> > Vsimnul, a divil jsem se, az mi bylo divno. Ono tech zmen je zda
> > se vic - zrejme prestali pouzivat i spolecnou knihovnu StDate. Ani neni
> > divu, protoze to vzdy znamenalo delat hromadny update na temer vsechno.
> > :-)
>
> Ano, to udelali jedine dobre, protoze byly problemy s konflikty
> verzi, zvlaste trial verzi... Ja mam napriklad vsechno, ale co
> ti, kteri maji jeden ostry a chteli zkouset trial verzi - tam
> byl trosku problem. No, aspon ted na to uz nemuzes nadavat
> v recenzich :-)))

Jenze supaci porad nechali v resourcech takove texty, jako "Grid"
a podobne, ktere po prelozeni delaji neplechu. Sice jsem je na to
vcas upozornoval, ale marne, zda se.

> > Ted je jeste dotlacit k tomu, aby zakonzervovali nejaky stav pro D1 a D2
> > a vyvijeli uz jen pro D3 a vyse.
>
> To bych take hrozne rad, ale problem bude v tom, ze jeste stale
> velke mnozstvi lidi opravdu tyhle vykopavky pouziva, takze
> TurboPower tezko bude chtit o tyhle zakazniky prijit.

D1 bych jeste trochu chapal (i kdyz ja takove zakazniky milerad
prenecham konkurenci, at si natluce hubu nekdo jiny :), ale
nechapu D2.


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

Large fonts - small fonts

[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 20.2.1999 13:04:13

Ja jsem to resil pomoci=20

FormMain.scaled:=3Dfalse;


S pozdravem Zdenek

--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------

----------
> Odes=EDlatel: Martin O=E8en=E1=B9 <ocenas(zv)proces.sk>
> Komu: Konferencia DELPHI <delphi-l(zv)fwd(tec)cz>
> P=F8edm=ECt: Large fonts - small fonts
> Datum: 19. =FAnora 1999 9:51
>=20
> Nevie niekto ako jednoducho eliminovat rozdiely medzi
> nastaveniami u zakaznika a vyvojara typu Large fonts - small
> fonts.(zvacsene formulare, vytekajuce komponenty atd).
> Pomohol by nejaky sample.
>=20
> D.
> Martin.

Konverze pointeru z flat modelu na seg:ofs

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 20.2.1999 16:18:16

Hi all,

nemuzu prijit na to, jak predat globalni pamet z 32-bitove aplikace aplikaci
16-bitove.

1. V 32-bitove aplikaci delam nasledujici:

FGMemHandle := GlobalAlloc(GMEM_SHARE,FGMemSize);
...
...
FGMemBuffer := GlobalLock(FGMemHandle);
try
...
SendMessage(Win16handle,WM_xxxxx,wParam,dword(FGMemBuffer));
finally
GlobalUnlock(FGMemHandle);
end;

2. WndProc() v 16-bitove aplikaci obdrzi spravnou hodnotu lParam, coz je
pointer ve flat modelu, ale jeho dereference vede samozrejme ke GPF. Urcite
nadeje jsem vkladal do funkce UTLinearToSelectorOffset() z WIN32S16.DLL ,
ale ta vraci NIL.


Nedokazal by mi, pls, nekdo poradit, jak se to dela?


Thanx, pf


Zjisteni modalniho okna

[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 20.2.1999 16:58:56

Cau,
v Delphi 4 to jde :
fsModal in FormState
v Delphi 3 je bohuzel FormState privatni.

Tomas
tomas(zv)cobra(tec)cz


-----P=F9vodn=ED zpr=E1va-----
Od: Greissler Ronald <greissler(zv)cbnet(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 19. =FAnora 1999 12:58
P=F8edm=ECt: Zjisteni modalniho okna


>Jak se da, prosim, zjistit, zda je prave otevrene okno modalni?
>(tedy zobrazene pomoci ShowModal?). Jsem schopen zjistit o tom okne
>(formulari) kde co, ale toto prosim ne.
>
>Rony
>/*********************/
>GREISSLER(zv)CBNET.CZ
>Prerov
>/*********************/

DBF DELETE 2

[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 20.2.1999 17:09:48

Cau,
problem smazanych recordu je vetsi u sitovych aplikaci - Pack vyzaduje
exkluzivni pristup. Reseni, ktere pouzivam: pridat sloupecek(boolean), kt=
ery
indikuje record, ktery je jako smazany - ve skutecnosti se nic nemaze. No=
ve
recordy se pridavaji misto techto "smazanych", pouze se prepisi data novy=
mi
hodnotami. Samozrejme potom program musi pracovat pouze s vetami, ktere
nemaji nastaven priznak smazani - je to narocnejsi na praci, musi byt
prislusne indexy, filtry apod.

Ma to ale jednu vyhodu - system muze pracovat nepretrzite bez naroku na
"Packovani" zvlaste v pripadech, kde je velky pocet pridavani a mazani
recordu.

Tomas
tomas(zv)cobra(tec)cz



-----P=F9vodn=ED zpr=E1va-----
Od: Roman <roman.banar.fei(zv)vsb(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 17. =FAnora 1999 12:23
P=F8edm=ECt: Re: DBF DELETE 2


>Dne 16 Feb 99 v 7:58, profia(zv)atlas(tec)cz napsal(a):
>
>> Pri uplatnovani rady jsem ale ucinil DOSTI ZNEPOKOJUJICI POZNATEK.
>>
>> Dle mnou prozkoumanych situaci jsem zjistil ze v pripade smazani JEDNO=
HO
=3D
>> zaznamu databaze pouzitim Table1.Delete je zaznam jakoby smazan ale =3D
>> velikost souboru zustava nadale STEJNA. Plati to jak na tabulky dbf ta=
k =3D
>> i na Paradoxove.Pouze u Paradoxovych se zmeni poradove cislo zaznamu a=
le
=3D
>> to jaksi nepomuze. Jestlize Table1.Delete je pouzivano dosti casto, =3D
>> narusta databaze do zajimavych rozmeru :)
>>
>> Je tohle opravdu "normalni a znama" vec nebo delam neco spatne?
>
>
>no treba pro dbf me to funguje takhle:
>
>TableXXX.EmptyTable;
>Check(DbiPackTable(TableXXX.DbHandle, TableXXX.Handle, Nil, szDBASE,
>TRUE));
>
>cau
>roman


Setup

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 20.2.1999 21:58:20

Musim se pripojit k tomu, ze velky objem dat nema v registrech nic delat.=
Ostatne to ve svych guidelines tvrdi i Microsoft, na druhou stranu Micro=
soft Developer Studio dokaze registry zvetsit i o pouhych 8 MB, tolik k d=
odrzovani konveci Microsoftu Microsoftem.

Ondrej Krajicek

-----P=F9vodn=ED zpr=E1va-----
Od: Peter =C8IRIP <psoft(zv)ke.telecom.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 19. =FAnora 1999 23:25
P=F8edm=ECt: RE: Setup


Zdravim,

ja problem s registrami nevidim, su vyborne, ale vadi mi na nich jedna ve=
c :
casto sa mi stane, ze si zababrem Windows kadejakymi demami, ktore ale
nechaju po odinstalacii vela humusu v registroch. Windows sa mi potom
velmi-velmi spomaluje a preto ho jednoducho zmazem, a tym zmazem aj
registre. Mam ale nejakz SW ktory ma nastavenia velmi siroke, preto by
strasne bodlo, keby sa to predsa len dalo do nejakeho externeho suboru. A
tiez pri praci v sieti ten subor mohol byt zdielany ...

Peter.

PETER CIRIP - PSOFT
Delphi components, barcode
psoft(zv)ke.telecom.sk
http://www.ke.telecom.sk/psoft
-----P=F4vodn=E1 spr=E1va-----
Od: Ing. Miroslav Ondrisek, Bonnel Technologie, s.r.o. <bonnel(zv)telecom(tec)cz=
>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D=E1tum: 19. febru=E1r 1999 13:45
Predmet: Re: Setup


>To, ze jsou registry uzitecne neni predmetem sporu. Zvlaste pokud jde o
>uzivatelska nastaveni. To neni ten problem. Jenze obcas by se hodilo
>(zvlast pro nastaveni vetsiho mnozstvi vice strukturovanych parametru
>mit k dispozici neco jako INI soubor se strukturou registru. Uzivatelsky
>citlive parametry se do tech registru daji nadrapat vzdycky, to prece
>neni to tema.
>
>Mira
>
>-----P=F9vodn=ED zpr=E1va-----
>Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 19. =FAnora 1999 9:48
>P=F8edm=ECt: Re: Setup
>
>
>Puvodni zprava, kterou napsal Ing. Miroslav Ondrisek, Bonne dne 19 Feb
>99,:
>
>> Nerad pouzivam Registry, protoze vim, jak me to rozciluje pri
>instalaci
>> jinych programu, ktere behem casu zaneradi registry hroznym balastem,
>o
>> kterem jiz casto instalacni progam nevi. Pokud by nekdo vedel o
>
>Registr je moc dobra a dulezita vec...
>
>> komponente, ktera umi pracovat se soubory stejneho typu jako jsou
>> registry, ale samostatnym, libovolne umistenym, mazatelnym atd. Proste
>> takovy INI soubor se strukturou Registru. Nebyl by to namet pro
>Delphree ?
>
>A jak udelas sekci uzivatelu? Pro to uz je podpora primo v registru
>a to je velke ulehceni.
>
>
>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
>
>
>

Generate Run-time Error

[*] Peter Arbet <arbet(zv)fred.utc.sk> - 21.2.1999 00:37:00

Hi.

Existuje nejaky sposob ako vygenerovat %subj%? Na type nezalezi. Hlavne,
nech je to Error, nie Exception.

Bye.

RAZIIARS

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

Microsoft Outlook guarantees complete sending of this messa


Generate Run-time Error

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 21.2.1999 09:03:29

procedura runError
ok

-----P=F9vodn=ED zpr=E1va-----
Od: Peter Arbet <arbet(zv)fred.utc.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 21. =FAnora 1999 1:07
P=F8edm=ECt: Generate Run-time Error


>Hi.
>
> Existuje nejaky sposob ako vygenerovat %subj%? Na type nezalezi. Hla=
vne,
>nech je to Error, nie Exception.
>
> Bye.
>
>RAZIIARS
>
>e-mail: arbet(zv)px.psg.sk
>ICQ: 29272626
>
>Microsoft Outlook guarantees complete sending of this messa
>

VER

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 21.2.1999 09:04:55

Nemate nekdo seznam defines pro jednotlive verze Delphi a Builderu ? Nemuzu prijit na to, ktera VERXXX je definovana v Delphi 4. Vim akorat, ze v Delphi 2 byla VER90, V D3 VER100, ale co je v D4 nevim. VER110 mi nejunguje.

Ondrej Krajicek

Formaty souboru

[*] Tomas Skopik <skopik(zv)vtv(tec)czn(tec)cz> - 21.2.1999 09:46:56

Zdravim,

nevite prosim kde bych nasel popisy formatu souboru ARJ, ZIP, RAR...

Dik,
-----
Tomas Skopik
( skopik(zv)vtv(tec)czn(tec)cz , www.sarai(tec)cz/~skopik )

BMP -> ICO

[*] Tomas Skopik <skopik(zv)vtv(tec)czn(tec)cz> - 21.2.1999 09:47:57

Diky vsem za rady.

Tomas Skopik
( skopik(zv)vtv(tec)czn(tec)cz , www.sarai(tec)cz/~skopik )

analyticka geometrie

[*] vlada <VCadsky(zv)seznam(tec)cz> - 21.2.1999 12:11:51

Fuj, brrrr
Vytvarim program kde potrebuju nezbytne nutne aby uzivatel oznacoval
"komponenty TPanel" mysi.
Komponenty TPanel mam umistene v TScrollBaxu.
Problem mam v miste kde neumim zjistit jestli pri oznacovani mysi jsem
prekryl nektery TPanel.
Zavzpominal jsem si na skolu a mam pocit, ze kdyz vytvarim pri oznacovani
mysi obdelnik, znam jeho polohu i velikost a znam i polohu a velikost
TPanelu umistenem na formu potom musi existovat postup jak zjistit jestli
dva dane obdelniky v rovine maji spolecny alespon jeden bod.

Umi nekdo navrhnout jak na to ?
Diky Vlada
D3, WINNT


Import DLL pri prenosu projektu Delphi pod C++ Bui

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 21.2.1999 12:31:08

Hi,

zkousim prenest existujici projekt v Delphi pod C++ Builder a narazil jsem
na problem pri linkovani funkci, ktere jsou v DLL a ke kterym pouzivam
puvodni pascalsky interface, tj. napr:

unit XXXXX;

INTERFACE

const : SSSS: set of char = ['A'..'Z'];

function STBitem(aSTBX:word): string; far;

IMPLEMENTATION

const DDDDD = 'dddddd.dll';

function STBitem; external DDDDD name 'STBITEM';

end.

Linker hlasi "Unresolved external 'STBITEM' referenced from ....." a zmena
STBitem na upper case nepomaha. Navic, kdyz si necham generovat detailed
map, tak konstanta SSSS se mi v nem objevi, ale STBitem tam mezi public
symboly neni.

Mohl by mi nekdo pls poradit, jak se takova DLL prenasi? Musim k ni napsat
interface v C++, nebo existuje zpusob, jak BPB prinutit, aby pouzil
pascalsky?


Thanx, pf

Generate Run-time Error

[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 21.2.1999 12:37:48

Cau,
zkus proceduru RunError, nemam ale vyzkouseno.
Viz. Delphi Help:

procedure RunError [ ( Errorcode: Byte ) ];

Tomas
tomas(zv)cobra(tec)cz



-----P=F9vodn=ED zpr=E1va-----
Od: Peter Arbet <arbet(zv)fred.utc.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 21. =FAnora 1999 1:20
P=F8edm=ECt: Generate Run-time Error


>Hi.
>
> Existuje nejaky sposob ako vygenerovat %subj%? Na type nezalezi.
Hlavne,
>nech je to Error, nie Exception.
>
> Bye.
>
>RAZIIARS
>
>e-mail: arbet(zv)px.psg.sk
>ICQ: 29272626
>
>Microsoft Outlook guarantees complete sending of this messa


Chyba v compileru D3 ?

[*] Lubomir Bulej <pallas(zv)kadan(tec)cz> - 21.2.1999 12:49:20 -0100

Hi,

predstavte si nasledujici:

awHeap : array [0 .. 510] of word;
.
tady nasleduji dalsi pole, celkova velikost je 4096 bajtu.
.
awCodeTable : array [0 .. 4095] of word absolute awHeap;

A ted ten problem - ma nekdo predstavu, proc jsou v nasledujicim kodu:

asm
lea edx,[awHeap]
lea ebx,[awCodeTable]
end;

hodnoty edx a ebx ruzne ??? Ma to nejaky duvod, nebo s tim mam pocitat
jako s chybou kompilatoru ?

Lubos

Test vysunuti CD-ROM mechaniky

[*] Patrik Sladecek <pasla(zv)iname(tec)com> - 21.2.1999 13:26:03

Ahoj,
nev=EDte n=ECkdo, jak otestovat, zda je cd-rom mechanika VYSUNUT=C1?

P a t r i k S l a d e c e k
e-mail: pasla(zv)iname.com
PGP Fingerprint: D746 261E 6A84 D33E 1D8F 4C4A 8475 5008 D33F C92B

TreeView- barvy

[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 21.2.1999 14:46:56


-----P=F9vodn=ED zpr=E1va-----
Od: Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. =FAnora 1999 21:20
P=F8edm=ECt: Re: treeView- color


>Nepochopil jsem, co presne chces, ale s barvami v TreeView
>si muzes hrat treba takhle:
>
>procedure TFormStrom.TreeView1CustomDrawItem(Sender: TCustomTreeView;
> Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
Ahoj
pochopeno vyborne, bohuzel se asi bavime kazdy o jine verzi Delphi.
Mam D3 a o teto udalosti tam neni ani vidu.


Diky

Jiri Heinisch

Kdo si stahne; potesi mne i sebe
http://www.mujweb(tec)cz/www/heinisch/download

H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec

Zmena fontu

[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 21.2.1999 14:49:10

>> > Ahoj
>> >
>> > Jde programove zmenit font u komponenty TListView pro vlastnost

Petr Vones wrote
>Nepises jakou mas verzi Delphi, v D4 mas primo udalosti
TListView.OnCustomDrawXXX.
>Pro starsi verze muzes pouzit komponentu TEnhListView ktera je tady:
>http://www.tda(tec)cz/vita/delkom.htm


Ahoj

Mam D3 , komponentu jsem stahnul, je to dobry, ale
ja bych potreboval font pro Caption a dalsi pro SubItems
tj. 2 fonty v jednom radku

a komponenta podporuje pouze jeden


S pozdravem a diky


Jiri Heinisch

Kdo si stahne; potesi mne i sebe
http://www.mujweb(tec)cz/www/heinisch/download

H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec

Java? Zmetek?

[*] Richard Willmann <sales(zv)nocomment.sk> - 21.2.1999 21:40:46

>Ano, aj ja si myslim, ze sa jasne ukazalo, ze Java je absolutne
>nevhodna pre napisanie akejkolvek rozumnej aplikacie, tak sa
>pre nu snazia najst este ine uplatnenie. Pochybujem vsak, ze sa
>to podari.


Mily Erik,

snazia sa najst per nu ine uplatnenie?!? Doporucujem, aby si si precital
nieco o histori Javy ako takej... Java nebola navrhnuta ako programovaci
jazyk pre Windows. java nebola navrhnuta pre pisanie obchodnych aplikacii -
teda uctovnicke programy atd.

Ked sme uz pri tej Jave, nemyslis ze princip Write Once Run Anywhere nie je
az taky zly? Tazko presvedcis ludi aby pouzivali rovnaky typ pocitaca,
rovnaku platformu, rovnaku operacny system. Mozes ich ale prinutit
nainstalovat si NIECO, a to nieco je JVM, co ich zjednoti.

Jedinym problemom Javy ako takej je v sucastnosti nejednotnost JVM na
roznych OS. Narazam hlavne na problem MS.

BTW: Myslis, ze by napriklad Oracle investoval do niecoho co nema buducnost?
Ti ludia maju rozum a chapu, ze nieco ako Java resp. nieco podobne je to, o
com je buducnost.

A este nieco k Jave ako programovaciemu jazyku. Java je syntaxovo VELMI
kvalitne navrhnuta a implementuje prvky podstatne zjednodusujuce vyvoj
aplikaci ako takych. Vyvojari sa zamerali na zlepsenie tej casti jazyka,
ktora sposobuje vacsinu havarii (napr. sprava pamate).

A co sa tyka absencie akehokolvek rozumneho softveru v Jave ... Java je este
priliz mlada na to, a mozno ani nie Java ako ti ostatny (pouzivatelia,
vyvojari) aby sa v jave dalo naprogramovat napr. uctovnictvo. Ale ver mi, ze
to je len otazkou casu. Na druhej strane terba podotknut, ze ja osobne by
som dnes enbol ochotny zacat vyvoj cohokolvek v Jave z jedneho prozaickeho
dovodu. pamatam as na rozdiely v specifikaci JVM 1.0 a 1.1. Ten krok bol od
Sunu velmi neuvazeny.

rw


Enter klavesa + Paradox

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

> V Delphi 1:
>
> 1) Potreboval bych premapovat ENTER klavesu na TAB.
****Nevim, zda to v D1 pujde, ale za pokus to stoji.
Z klavesy Enter delam Tab nasledovne (jen pro ,,vhodne``
komponenty):

FormKeyPress(TObject Sender, var Key: char);
begin
if not ((Sender is TButton) or (Sender is TBitBtn) or (Sender is
TMeno) or (Sender is TRichEdit)) then
if (Key = VK_RETURN)
begin
Key := 0;
SelectNext(ActiveControl, TRUE, TRUE);
end;
end;

Prepisoval jsem to z Cecka, tak je tam mozna drobna chybicka.

Slavek

> | Ing. Petr Jezek |


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

Generate Run-time Error

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 21.2.1999 22:14:16

Preji pekneho dne,

Posilam, co pise help.

Slavek


Unit

System

Category

Flow Control Routines
RunError stops execution and generates a run-time error.

procedure RunError [ ( Errorcode: Byte ) ];

Description

The RunError procedure stops program execution by generating a
run-time error with the given number at the current statement.
Errorcode is the run-time error number (0 if omitted).

Example

begin

{$IFDEF Debug}
if P = nil then
RunError(204);
{$ENDIF}
end;


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

Import DLL pri prenosu projektu Delphi pod C++ Bui

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 21.2.1999 23:58:05

Hi,

zkousim prenest existujici projekt v Delphi pod C++ Builder a narazil jsem
na problem pri linkovani funkci, ktere jsou v DLL a ke kterym pouzivam
puvodni pascalsky interface, tj. napr:

unit XXXXX;

INTERFACE

const : SSSS: set of char = ['A'..'Z'];

function STBitem(aSTBX:word): string; far;

IMPLEMENTATION

const DDDDD = 'dddddd.dll';

function STBitem; external DDDDD name 'STBITEM';

end.

Linker hlasi "Unresolved external 'STBITEM' referenced from ....." a zmena
STBitem na upper case nepomaha. Navic, kdyz si necham generovat detailed
map, tak konstanta SSSS se mi v nem objevi, ale STBitem tam mezi public
symboly neni.

Mohl by mi nekdo pls poradit, jak se takova DLL prenasi? Musim k ni napsat
interface v C++, nebo existuje zpusob, jak BPB prinutit, aby pouzil
pascalsky?


Thanx, pf


Import DLL pri prenosu projektu Delphi pod C++ Bui

[*] Medusa <medusa(zv)brajan(tec)cz> - 21.2.1999 23:58:24

Ahoj,

Opet jeden dotazik...

Poreboval bych poradit a nebo priklad, kterej resi pretahnuti souboru
(ikony, ...) z jine aplikace
nebo exploreru na muj form...

Trebas: Mam tMemo a chci abych mohl chytit soubor z plochy a pustit ho do
do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to bude
stacit...

Dekuji
Medusa

Chyba v compileru D3 ?

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 22.2.1999 00:02:04

Hi,

>awCodeTable : array [0 .. 4095] of word absolute awHeap;


Mel jsem s direktivou absolute take nejake problemy, sice ne v ASM, ale
delalo to na me dojem, ze se autori prekladace nechali unest nadsenim z flat
memory modelu a na tuhle direktivu se vybodli. Obchazel jsem pomoci type
castingu.

Bye, pf


Datum a nazev BIOSu ....

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 22.2.1999 07:20:46

ahoj

nevi nahodou nekdo jak zjistit datum a nazev BIOSu, ovsem ne z registru ...

diky

Zdenek Fryz

VER

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

Skoro jsi se trefil. Pokud je mi znamo, tak:

{$IFDEF VER80}
................................... {For Delphi 1}
{$ENDIF}

{$IFDEF VER90}
................................... {For Delphi 2}
{$ENDIF}

{$IFDEF VER100}
................................... {For Delphi 3}
{$ENDIF}

{$IFDEF VER120}
................................... {For Delphi 4}
{$ENDIF}

Cau Mira


-----P=F9vodn=ED zpr=E1va-----
Od: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
Komu: Delphi-l ceska konference <delphi-l(zv)fwd(tec)cz>
Datum: 21. =FAnora 1999 23:36
P=F8edm=ECt: VER


|Nemate nekdo seznam defines pro jednotlive verze Delphi a Builderu ?
Nemuzu prijit na to, ktera VERXXX je definovana v Delphi 4. Vim akorat,
ze v Delphi 2 byla VER90, V D3 VER100, ale co je v D4 nevim. VER110 mi
nejunguje.
|
|Ondrej Krajicek
|

Chyba v compileru D3 ?

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 22.2.1999 07:46:37

Ja se v assembleru moc nevyznam, ale co vim to je, ze to druhe
pole nema velikost 4096 byte ale 8192 byte (word = 16bit).
Ondrej Krajicek


Lubomir Bulej wrote:
>
> Hi,
>
> predstavte si nasledujici:
>
> awHeap : array [0 .. 510] of word;
> .
> tady nasleduji dalsi pole, celkova velikost je 4096 bajtu.
> .
> awCodeTable : array [0 .. 4095] of word absolute awHeap;
>
> A ted ten problem - ma nekdo predstavu, proc jsou v nasledujicim kodu:
>
> asm
> lea edx,[awHeap]
> lea ebx,[awCodeTable]
> end;
>
> hodnoty edx a ebx ruzne ??? Ma to nejaky duvod, nebo s tim mam pocitat
> jako s chybou kompilatoru ?
>
> Lubos

analyticka geometrie

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 22.2.1999 07:53:17


Ahoj,=20

protoze mam analytickou geometrii rad, mam ve svem archivu tuto funkci:

function PtInRect(pt:TPoint; Rect:TRect):boolean; //jestli le=BE=ED obraz
bodu v obd=E9ln=EDku
begin
Result:=3D (pt.x >=3D Rect.Left) and
(pt.x <=3D Rect.Right) and
(pt.y >=3D Rect.Top) and
(pt.y <=3D Rect.Bottom);
end;

Pak staci vzit postupne vsechny body obdelniku a testovat, zda lezi
uvnitr toho druheho:

var Pnt:TPoint;
Pnt.x:=3DRect1.Left;
Pnt.t:=3DRecti.Top;
if PtInRect(Pnt, TvujRect) then ..... atd.********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]

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

> -----P=F9vodn=ED zpr=E1va-----
> Od: vlada [SMTP:VCadsky(zv)seznam(tec)cz]
> Odesl=E1no: 21. =FAnora 1999 12:12
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: analyticka geometrie
>=20
> Fuj, brrrr
> Vytvarim program kde potrebuju nezbytne nutne aby uzivatel oznacoval
> "komponenty TPanel" mysi.
> Komponenty TPanel mam umistene v TScrollBaxu.
> Problem mam v miste kde neumim zjistit jestli pri oznacovani mysi jsem
> prekryl nektery TPanel.
> Zavzpominal jsem si na skolu a mam pocit, ze kdyz vytvarim pri
> oznacovani
> mysi obdelnik, znam jeho polohu i velikost a znam i polohu a velikost
> TPanelu umistenem na formu potom musi existovat postup jak zjistit
> jestli
> dva dane obdelniky v rovine maji spolecny alespon jeden bod.
>=20
> Umi nekdo navrhnout jak na to ?
> Diky Vlada
> D3, WINNT
>=20
>=20
>=20

analyticka geometrie

[*] roman.palarcik(zv)spt(tec)cz - 22.2.1999 07:58:10

To by snad nemel byt takovy problem:

Mam dve promenne R, S: TRect

if ((R.Left>S.Left) or (R.Right>S.Left)) and ((R.Left<S.Right) or
(R.Right<S.Right)) and
((R.Top>S.Top) or (R.Bottom>S.Top)) and ((R.Top<S.Bottom) or
(R.Bottom<S.Bottom))
then { R a S se prekryvaji }

Roman Palarcik

----------------------------------
Fuj, brrrr
Vytvarim program kde potrebuju nezbytne nutne aby uzivatel oznacoval
"komponenty TPanel" mysi.
Komponenty TPanel mam umistene v TScrollBaxu.
Problem mam v miste kde neumim zjistit jestli pri oznacovani mysi jsem
prekryl nektery TPanel.
Zavzpominal jsem si na skolu a mam pocit, ze kdyz vytvarim pri oznacovani
mysi obdelnik, znam jeho polohu i velikost a znam i polohu a velikost
TPanelu umistenem na formu potom musi existovat postup jak zjistit jestli
dva dane obdelniky v rovine maji spolecny alespon jeden bod.

Umi nekdo navrhnout jak na to ?
Diky Vlada
D3, WINNT


Test vysunuti CD-ROM mechaniky

[*] Jirka <virt(zv)pepa(tec)cz> - 22.2.1999 08:07:52

Ahoj,
zkus tohle.Je to sice pro 'C',ale snad by se to dalo prepsat.Kdyz by Ti =
to
neslo,tak
napis a ja se na to podivam.
Takze kod.... {
unsigned long status =3D getDriveStatus(drive, subunit);
if (status =3D=3D 0xFFFFFFFFL)
{
return -1;
}
else
{
return (status & 0x00000001) ? 1 : 0;
}
}

int isDoorClosed(char drive, unsigned char subunit)
{
int status =3D isDoorOpen(drive, subunit);
if (status >=3D 0)
{
status =3D 1 - status;
}
return status;
}
Cau

Jirka Virt

email: virt(zv)pepa(tec)cz



-----P=F9vodn=ED zpr=E1va-----
Od: Patrik Sladecek <pasla(zv)iname.com>
Komu: Diskusn=ED konference Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 2:22
P=F8edm=ECt: Test vysunuti CD-ROM mechaniky


Ahoj,
nev=EDte n=ECkdo, jak otestovat, zda je cd-rom mechanika VYSUNUT=C1?

P a t r i k S l a d e c e k
e-mail: pasla(zv)iname.com
PGP Fingerprint: D746 261E 6A84 D33E 1D8F 4C4A 8475 5008 D33F C92B

Enter klavesa + Paradox

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 08:18:18


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

> if (Key =3D VK_RETURN)
> begin
> Key :=3D 0;
[Martin Fron=ECk] A proc do te Key nepriradis rovnou hodnotu
VK_TAB ?
> SelectNext(ActiveControl, TRUE, TRUE);
> end;
> end;
>=20
> Prepisoval jsem to z Cecka, tak je tam mozna drobna chybicka.
>=20

Import DLL pri prenosu projektu Delphi pod C++ Bui

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 08:28:22


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: Petr Fejfar [SMTP:callnet(zv)telecom(tec)cz]
> Odesl=E1no: 21. =FAnora 1999 12:31
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Import DLL pri prenosu projektu Delphi pod C++ Builder
>=20
> IMPLEMENTATION
>=20
> const DDDDD =3D 'dddddd.dll';
>=20
> function STBitem; external DDDDD name 'STBITEM';
>=20
> end.
>=20
> Linker hlasi "Unresolved external 'STBITEM' referenced from ....." a
> zmena
> STBitem na upper case nepomaha. Navic, kdyz si necham generovat
> detailed
> map, tak konstanta SSSS se mi v nem objevi, ale STBitem tam mezi
> public
> symboly neni.
>=20
> Mohl by mi nekdo pls poradit, jak se takova DLL prenasi? Musim k ni
> napsat
> interface v C++, nebo existuje zpusob, jak BPB prinutit, aby pouzil
> pascalsky?
>=20
[Martin Fron=ECk] Nutit nikoho nemuzes (ani prekladac), ale v C++
Builderu to musis udelat sam, tady ti zadny prekladac nic nevnucuje (ale
taky za tebe neudela zadnou blbost - i kdyz to mysli dobre :-)

Takze zkracene:

=09
//----------------------------------------------------------------------
-----
#include <vcl\vcl.h>
#pragma hdrstop
(char*) (__stdcall *STBitem)(WORD aSTBX);
=09
//----------------------------------------------------------------------
-----
void __fastcall TForm1::FormCreate(TObject *Sender)
{
hDll=3DLoadLibrary("tvoje.dll");
STBitem =3D ((char*)(__stdcall*)(WORD aSTBX)) GetProcAddress(hDll,
"STBitem");
}
=09
//----------------------------------------------------------------------
-----
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(STBitem) STBitem(parametr);
}
=09
//----------------------------------------------------------------------
-----
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
FreeLibrary(hDll);=09
}
=09
//----------------------------------------------------------------------
-----

Konverze pointeru z flat modelu na seg:ofs

[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 22.2.1999 08:39:52

>
> nemuzu prijit na to, jak predat globalni pamet z 32-bitove aplikace aplikaci
> 16-bitove.
>
Zasadni problem je v tomto pozadavku. Takto proste pamet sdilet nelze.

Da se to udelat jinak - pametove mapovane soubory nebo WM_COPYDATA jsou
nejcasteji pouzivane zpusoby. Pro sdileni dat mezi 32 a 16 bitovou
aplikaci lze pouzit pouze WM_COPYDATA.

--
Hezky den!
______________________________________________
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, vyvoj(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)

VER

[*] L.Svoboda <sm(zv)sct(tec)cz> - 22.2.1999 08:50:34

VER80 - Delphi 1
VER90 - Delphi 2
VER100 - Delphi 3
VER120 - Delphi 4
VER93 - BCB 1
VER110 - BCB 3

Ing. Ludek Svoboda
svoboda(zv)sct(tec)cz


-----P=F9vodn=ED zpr=E1va-----
Od: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
Komu: Delphi-l ceska konference <delphi-l(zv)fwd(tec)cz>
Datum: 21. =FAnora 1999 23:48
P=F8edm=ECt: VER


>Nemate nekdo seznam defines pro jednotlive verze Delphi a Builderu ? Nem=
uzu
prijit na to, ktera VERXXX je definovana v Delphi 4. Vim akorat, ze v Del=
phi
2 byla VER90, V D3 VER100, ale co je v D4 nevim. VER110 mi nejunguje.
>
>Ondrej Krajicek


Disky v�t�� ne� 8,4GB

[*] Filous Ji�� <JFilous(zv)cpoj(tec)cz> - 22.2.1999 08:52:33



Ahoj,

m=E1m takov=FD dotaz kter=FD sem asi nepat=F8=ED, ale mysl=EDm, =BEe je =
dost
aktu=E1ln=ED a bude
zaj=EDmat v=ECt=B9inu z v=E1s.
M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE 8,4GB =
?
J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce jak 8,4GB=
i
kdy=BE jsem pou=BEil
doporu=E8ovanou utilitu EZ-drive 9.09W
Disk jsem rozd=EClil na dv=EC partitions, 2GB 16bit FAT DOS a zbytek
32bit FAT pod Windows.

D=EDky za ka=BEdou radu.

Jirka Filous

Result set from Oracle stored procedure

[*] suvak(zv)pbko.sk - 22.2.1999 08:57:32

> Nevim jak na Oraclu, ale na Informixu by to bylo takhle:
>
> FOREACH
> SELECT a,b,c INTO nA, nB, nC FROM table
> If <nejaka podmika> Then
> RETURN nA, nB, nC WITH RESUME;
> End If;
> END FOREACH;
>
> Procedura by vratila pomnozinu dat z table, ktere
> vyhovuji pominkam <nejaka pominka>.

Souhlasim s Informixem a prilozim polinko pro MS SQL.
Tam lze fetchovane radky ukladat do docasne tabulky
a na konci procedury provest prikaz

SELECT * FROM TempTable

ktery to vrati

==============================================================

[Peter Suvak]

Dakujem, potrebujem to vsak pre Oracle. Vo vsetkych priruckach,
ktore mam k dispozicii som sa docital iba o tom, ako vkladat
ci menit zaznamy pomocou ulozenych procedur, pripadne ine veci,
iba nie to, co potrebujem :), ale to uz tak byva.

Peter Suvak

=============================================================
Ing. Peter Suvak, veduci oddelenia spravy systemov
Priemyselna banka, a.s. Kosice
Sturova 27
040 01 Kosice

tel.: 095 / 6804 282
fax: 095 / 6804 510
mobil: 0903 610 901
=============================================================

analyticka geometrie

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 22.2.1999 09:04:29

Haj hou!

From: vlada <VCadsky(zv)seznam(tec)cz>
>Vytvarim program kde potrebuju nezbytne nutne aby uzivatel
oznacoval
>"komponenty TPanel" mysi.
>Komponenty TPanel mam umistene v TScrollBaxu.
>Problem mam v miste kde neumim zjistit jestli pri oznacovani
mysi jsem
>prekryl nektery TPanel.


1.) Potrebujes mit TRect panelu (metado BoundsRect) a TRect
oblasti kterou oznacujes. Oboje ve stejnem souradnem systemu
(muzes pouzit metody ClientToScreen).
2.) Porovnani dvou TRect struktur na prekryv je uz trivialni
porovnavani souradnic.

HTH

TDBLookupComboBox

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 22.2.1999 09:07:11

Ahojky programator(k)i(y)
Potrebuji nastavit v TDBLookupComboBox prazdnou polozku, tak jako je tam pri jejim vytvoreni.
(aby TDBLookupComboBox.Text = ' ')
Pripadne poradit nejakou jinou komponentu, kde by se dalo dobre vybirat z polozek z SQL dotazu.===========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


analyticka geometrie

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 22.2.1999 09:12:33

A proc jednoduse nepouzijes api funkce pro obdelniky:

Following are the functions used with rectangles.=20

CopyRect
EqualRect
InflateRect
IntersectRect
IsRectEmpty
OffsetRect
PtInRect
SetRect
SetRectEmpty
SubtractRect
UnionRect=20

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: vlada [SMTP:VCadsky(zv)seznam(tec)cz]
> Odesl=E1no: 21. Februar 1999 12:12
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: analyticka geometrie
>=20
> Fuj, brrrr
> Vytvarim program kde potrebuju nezbytne nutne aby uzivatel oznacoval
> "komponenty TPanel" mysi.
> Komponenty TPanel mam umistene v TScrollBaxu.
> Problem mam v miste kde neumim zjistit jestli pri oznacovani mysi jsem
> prekryl nektery TPanel.
> Zavzpominal jsem si na skolu a mam pocit, ze kdyz vytvarim pri
> oznacovani
> mysi obdelnik, znam jeho polohu i velikost a znam i polohu a velikost
> TPanelu umistenem na formu potom musi existovat postup jak zjistit
> jestli
> dva dane obdelniky v rovine maji spolecny alespon jeden bod.
>=20
> Umi nekdo navrhnout jak na to ?
> Diky Vlada
> D3, WINNT
>=20
>=20
>=20

Enter klavesa + Paradox

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 22.2.1999 09:16:03

> [Martin Fron k] A proc do te Key nepriradis rovnou hodnotu
> VK_TAB ?
****Protoze mi to s tim nefungovalo. ;-)

Slavek


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

DDE

[*] David Adamec <adamecd(zv)vs.xion(tec)cz> - 22.2.1999 09:24:05

Ahoj
mam problem ohledne dde.
Vim, ze muzu prenaset nejaky text z DDE clienta na DDE servr pomoci
pokedata, popripade execmacro,... , ale nevim jak dostat nejaky text
ze serveru na clienta?

Disky v�t�� ne� 8,4GB

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 09:25:34


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: Filous Ji=F8=ED [SMTP:JFilous(zv)cpoj(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 8:53
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: Disky v=ECt=B9=ED ne=BE 8,4GB
>=20
> Ahoj,
>=20
> m=E1m takov=FD dotaz kter=FD sem asi nepat=F8=ED, ale mysl=EDm, =BEe j=
e dost
> aktu=E1ln=ED a bude
> zaj=EDmat v=ECt=B9inu z v=E1s.
> M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE 8,4G=
B ?
> J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce jak 8,4=
GB
> i
> kdy=BE jsem pou=BEil
> doporu=E8ovanou utilitu EZ-drive 9.09W
>=20
[Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....

Formaty souboru

[*] David Adamec <adamecd(zv)vs.xion(tec)cz> - 22.2.1999 09:25:22

> Zdravim,
>
> nevite prosim kde bych nasel popisy formatu souboru ARJ, ZIP, RAR...
>
> Dik,
> -----
> Tomas Skopik
> ( skopik(zv)vtv(tec)czn(tec)cz , www.sarai(tec)cz/~skopik )

Myslim, ze ja mam doma popis RAR (, ale ostatni nevim)
David Adamec


Disky v�t�� ne� 8,4GB

[*] roman.palarcik(zv)spt(tec)cz - 22.2.1999 09:29:55

Ahoj,
kamos instaloval Seagate 8.4GB a mel stejny problem. Nakonec tam na =20
disku nasel switch (vedle ostatnich master/slave/sel), ktery je =20
oznaceny jako "Limit capacity to 2.1 GB", ten nastavil, nainstaloval =20
EZ-drive a uz to naslo celou velikost disku. Trochu zajimave, ale fungova=
lo to.

Roman Palarcik

-------------------------
Ahoj,

m=E1m takov=FD dotaz kter=FD sem asi nepat=F8=ED, ale mysl=EDm, =BEe je =
dost
aktu=E1ln=ED a bude
zaj=EDmat v=ECt=B9inu z v=E1s.
M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE 8,4GB =
?
J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce jak 8,4GB=
i
kdy=BE jsem pou=BEil
doporu=E8ovanou utilitu EZ-drive 9.09W
Disk jsem rozd=EClil na dv=EC partitions, 2GB 16bit FAT DOS a zbytek
32bit FAT pod Windows.

D=EDky za ka=BEdou radu.

Jirka Filous


Enter klavesa + Paradox

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 09:43:31


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: Slavek Rydval [SMTP:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 9:16
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: RE: Enter klavesa + Paradox=20
>=20
> > [Martin Fron k] A proc do te Key nepriradis rovnou hodnotu
> > VK_TAB ?
> ****Protoze mi to s tim nefungovalo. ;-)
>=20
[Martin Fron=ECk] To me to funguje skvele.........

konverze a tisk

[*] Roman <roman.banar.fei(zv)vsb(tec)cz> - 22.2.1999 09:50:31

cau
mam problemek: tisknu textovy soubor primo na jehlickovou tiskarnu
/pouzivam nejakou faq fintu, aby se to tisklo primo na tiskarnu a
nevyjizdela cela stranka, proste dycky jenom po radcich.../ no a
problem nastava, kdyz ten soubor obsahuje znaky jako jsou ramecky a
jim podobne... na tiskarne se potom objevuji uplne jine znaky /a
taktez v *.prn souboru, pokud nastavim tisk do souboru/
divne je, ze pokud tisknu primo, aniz bych to pred tim nacital z toho
txt souboru tak se vsechno tiskne v poradku /ramecky a jine spec
znaky/, takze problem bude nekde v tom nacitani.
slysel sem neco o tom, ze by mohlo pomoci AnsiToNative, ale moc
chytrej z toho nejsu...
dik za kazdy nakopnuti!

roman

CreateTable v D4

[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 22.2.1999 09:58:52

Ahojte.

Potrebuji za behu prg. vytvorit DBase tabulku.
Delam to v D4 SP2.
V BDE Databases mam MY STANDARD DBF :
Type STANDARD
Default driver DBASE
Enable BCD TRUE
Path C:\Programy\NECO

Na formu Table1 Active=False, TableName nevyplnene, TableType ttDBase,
DatabaseName MY STANDARD DBF.

Pri aktivaci formu:
with Table1 do
begin
TableType:=ttDBase;
TableName:='Data1993.DBF';
with FieldDefs do
begin
Clear;
Add('F1',ftString, 50,False);
Add('F2',ftDate, 0,True);
Add('F3',ftSmallInt, 0,False);
end;
CreateTable;
Open;
end;

Problem je v tom, ze mi nechce vytvorit tabulku DBase, ale neustale mi cpe
Paradox, nebo Acces, nebo co to je.Zkousel jsem to jeste na D2 a tam to jelo
v pohode. I s TableType ttDefault si pekne precetl extenzi z TableName a
vytvoril Dbase tabulku, ale D4 se nechce kamaradit :-((
Nevite v cem delam chybu?

Diky.

Petr
p.sadovsky(zv)atlas(tec)cz

Chyba v compileru D3 ?

[*] pallas(zv)kadan(tec)cz - 22.2.1999 10:42:27

Hi,

> Ja se v assembleru moc nevyznam, ale co vim to je, ze to druhe
> pole nema velikost 4096 byte ale 8192 byte (word = 16bit).

Err, to je pouze chyba v tom prikladu :) Melo tam byt, ze ma velikost
4096 wordu. Ale to by byl detail ve srovnani s tim, ze kdyz si v
assembleru natahnu adresu awHeap do registru, a pak natahnu adresu
awCodeTable do registru, tak jsou ruzne a ta adresa toho pole s direktivou
absolute je spatne.

Lubos


Zastavit SQL dotaz

[*] Greissler Ronald <greissler(zv)cbnet(tec)cz> - 22.2.1999 10:49:23

Zkusim to jeste jednou.
Nevite prosim nekdo, jak zastavit probihajici SQL dotaz (pres TQuery.Open).
Predstava je takova, ze mam dialog s tlacitkem (treba STOP) a po clicku
se mi posle nejaka zprava (do BDE?) neco jako "halt" nebo neco takoveho.

Mam D3, MS SQL pres BDE a dost slozity dotaz (dynamicky vytvareny) pres nekolik
(mnoho) casto dost velkych tabulek.

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

Datum a nazev BIOSu ....

[*] Jirka <virt(zv)pepa(tec)cz> - 22.2.1999 10:54:59

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

-----P=F9vodn=ED zpr=E1va-----
Od: Fryz, Zdenek <fryz(zv)dcb(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 8:07
P=F8edm=ECt: Datum a nazev BIOSu ....>ahoj
>
>nevi nahodou nekdo jak zjistit datum a nazev BIOSu, ovsem ne z registru =
...
>
>diky
>
>Zdenek Fryz


None

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.2.1999 11:06:16

Medusa wrote:

> 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 ho =
do
> do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to bu=
de
> stacit...

// Project: Drag and Drop Source Components
// Component Names: TDropTextSource, TDropFileSource,
// Module: DropSource
// Description: Implements Dragging & Dropping of text, files
// FROM your application to another.
// Version: 3.2
// Date: 22-OCT-1998
// Target: Win32, Delphi 3 & 4
// Authors: Angus Johnson, ajohnson(zv)rpi.net.au
// Anders Melander, anders(zv)melander.dk
// http://www.melander.dk
// Graham Wideman, graham(zv)sdsu.edu
// http://www.wideman-one.com
// Copyright =A91998 Angus Johnson, Anders Melander &=20
Graham Wideman


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

Nastavenie fontu

[*] Lubos <bruce(zv)pobox.sk> - 22.2.1999 11:07:32

> Caute All !
> Da sa nejako nastavit konkretny font pre celu aplikaciu ?

no , nikto sa nechytil , tak to skusim inak.
Napadlo ze by to slo tak ze pri starte aplikacie zmenim
default systemove fonty a potom ich dam spat.
Len neviem ako na to .

vdaka za kazdy napad.

/LH


Nemodalni formular v DLL, 2. pokus

[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 22.2.1999 11:14:23

Caute,

(Mozna se podruhe nekdo chyti... To je naposled, slibuju - fakt bych to
potreboval :))

mam velky problem. V modularnim programu jsou jednotlive moduly
realizovany jako nemodalni formulare v DLL knihovnach. Pro vsechny
moduly mam nadefinovaneho predka odvozeneho z TForm. Prepsal jsem jeho
Create:

constructor TBaseForm.Create(AOwner: TComponent);
begin
AppForm := TForm(AOwner); // interni promenne
RunParams := AppForm.Tag; // -||-
AppHandle := AppForm.Handle; // -||-
BorderSize := GetSystemMetrics(SM_CYSIZEFRAME); // -||-
inherited Create(nil);
end {TBaseForm.Create};

Z tohoto predka mame momentalne odvozene dva moduly.
Jeden z nich funguje vzdy a vsude korektne.
Ten druhy ale na nekterych noteboocich nefunguje (zatim vim jen o Texas
Instruments Extensa 510, nejmene 2ks). Vyhuci to na exception nekde
uvnitr inherited Create.

Zkousel jsem inherited Create predavat nejen nil, ale i formular
hlavniho programu, stav se nezmenil.

Nevite nekdo, cim to muze byt zpusobeno?

Podotykam, ze at delam co delam, jeden modul funguje vsude, druhy
nefunguje na TI Extensa 510.

Pokud jde o slozitost modulu, jsou si tak asi fifty-fifty. TabNotebook,
neco pres 10 TabSheetu, kolem 15-20 stringgridu, nejake dalsi controls.
Ten modul, ktery ma problemy, mi nicmene pripada slozitejsi, ma tech
controls o neco vic. Databaze nepouzivam.

--
Hezky den!
______________________________________________
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, vyvoj(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)

!!!!!!!! RE: Kompresia *.exe

[*] Jan Pukovec <pukovecj(zv)edunet(tec)cz> - 22.2.1999 11:21:45

Ale na tomhle prece neni nic zvlastniho. Program pouzivam take a mysmim z=
e
se zadny virus neobsahuje. Predpokladam, ze hlasku o pritomnosti viru
vyprodukoval antivirak F-PROT, ktery ma velice ucinnou heuristickou analy=
zu,
podle mne je jednim z nejdokonalejsich. Hodne viru pouziva nasledujici
techniku: ulozi nekolik pocatecnich bytu napadeneho programu a umisti tam
skok za konec souboru. Na tento konec se potom pripoji a po vykonani sve
funkce obnovi ty pocatecni byty a vrati rizeni napadenemu programu. Na
stejnem principu mozna pracuje i jiz zmyneny kompresni program. Hodne
antiviraku taky pouziva odhaleni kodovani(maskovani viru), tzn. kompresni
algoritmus taky spada do oblasti podezreni :-)

preji hodne stesti pri odstranovani viru :-)

(aby potom nezustala jenom hlavicka exe komprimatoru...)

wlk
-----P=F9vodn=ED zpr=E1va-----
Od: Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 19. =FAnora 1999 9:52
P=F8edm=ECt: Re: !!!!!!!! RE: Kompresia *.exe


>Ktery antivir to byl? Ja ASPack i jim kompresovane EXE
>spoustel na pocitaci, kde mi bezi rezidentne Avast! a ten
>nic nehlasi. Ted jsem nechal oskenovat cely pocitac a zese cisto.
>
>--
>Ing. Jindrich Danihelka
>E-Mail jidas(zv)mbox.vol(tec)cz
>Tel. 038/7755345
> 038/7512861
>
>
>IKO wrote:
>>
>> Nazdar ludia,
>>
>> chcem vam povedat nejake poznatky ohladom programu ASPack z
>> adresy www.alenka.spb.ru/aspack.
>> Neviem, ci je to vzdy pravidlo, alebo nahoda to co sa mi stalo, ale
>> stalo sa takto. Jeden soft, co som spravil som s tym spakoval. Islo
>> to pekne. Zo 650 to dalo na 250 kilov. Len "problem" je v tom, ze
>> ho antivirak oznacil, ze obsahuje neznamy virus pre Win95.
>>
>> Teraz neviem, ci tam ten virus naozaj je (rusi robia dobre virusy...),
>> alebo je to len nahoda.
>>
>> IKO
>> ikino(zv)pobox.sk
>> http://freeweb.coco(tec)cz/IKO


qreport

[*] Martin <geoplan(zv)pp.sinet.sk> - 22.2.1999 11:27:09

zdravim,

chcel by so do jednej zostavy pomocou Qreport vytlacit dve tabulky z dvoch
sql vyrazov. Potrebujem aby to bolo na jednom papiery, takze aby to bola
jedna zostava. Ako by sa to dalo urobit ? Uz sa nad tym trapim 2 dni ale
nejak to nemozem rozchodit. Je to v Delphi 2.

Martin


Vybaleni primo do pameti

[*] Jan Pukovec <pukovecj(zv)edunet(tec)cz> - 22.2.1999 11:45:40

mozna to moc nepomuze, ale pod starym dobrym dosem byla fce 4bH, 4cH
preruseni 21h prave pro tyto ucely. Ted uz zbyva dohledat neco obdobneho =
pro
windows
-----P=F9vodn=ED zpr=E1va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 18. =FAnora 1999 16:37
P=F8edm=ECt: Vybaleni primo do pameti


Mimochodem, kdyz jsme u toho ASPacku, umite nekdo udelat
vybaleni neceho do pameti kodu a spusteni - presne to, co
dela tento program - nekde neco nacte, soupne to do
pameti, spusti a sebe ukonci...?


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


RX 2.60

[*] Milan Nemec <nemec(zv)goldcard(tec)cz> - 22.2.1999 11:46:48

V Win NT mi nejde spustit RxDemo (v predeslych verzich to
fungovalo bez problemu). Zkompiluje a pri spusteni hlasi access
violation uz pred funkci WinMain (v C++ Builderu 3). V 95 to ale
funguje :-((.

Jak vam to funguje v NT?

Cau Milan

-----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: 19. =FAnora 1999 12:54
P=F8edm=ECt: RX 2.60


>Mate uz nekdo zkusenosti s RX lib 2.60 pod D4 ? Zajimaji me hlavne
>negativni.
>
>Diky Mira
>
>

begin 600 WINMAIL.DAT
M>)\^(C0*`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0N `0`?````1D9".#8T
M-C T,4(X,#$P.# P,D(R0CA!,CDP,# P`&H&`0V ! `"`````(zv)`"``$$D 8`
M(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0````````"!
M*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H
M: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%!(22U,
M0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L<&AI
M+6Q 9G=3DD+F-Z``(!]U\!````/0````````"!*Q^DOJ,0&9UN`-T!#U0"````
M`&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H:2UL0&9W9"YC>(zv)`````#`/U?
M`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`,````4D4Z(%)8
M(#(N-C `(zv)0(!!8 #``X```#/!P(`%(zv)`+`"X`, `!`%(zv)!`2" `P`.````SP<"
M`!8`"P`E`!X``0`]`0$)(zv) $`(0```#5%0C1&1C(Y-#)#040R,3%"0S$R,# V
M,# X,3(zv)X-4,T``P'`0.0!(zv)"$!0``(0````L``(zv)`!````"P`C```````#`"8`
M``````L`*0```````P`N```````#`#8``````$ `.0`0'0ZF4%Z^`1X`< `!
M````# ```%)%.B!26" R+C8P``(!<0`!````%(zv)````&^7E"EQBG_M&'*0A'2
MO!(`8 (zv)8A<0``!X`'(zv)P!`````P```$U3```>`!\,`0```!0```!7:6YD;W=3DS
M+V%D;6EN+VYE;65C``,`!A"=3D6QG:`P`'$)X!```>``(zv)0`0```&4```!65TE.
M3E1-24Y%2D1%4U!54U1)5%)81$5-3RA64%)%1$533%E#2%9%4EI)0TA43T95
M3D=3D/5D%,3T)%6E!23T),14U5*5I+3TU024Q52D5!4%))4U!54U1%3DE(3$%3
M24%#0T53``````(!"1 !````>(zv)(``'8"```<`P``3%I&=3D>YDXL4_``H!`P'W
M`J0#XP(`8VB!"L!S970R,S(zv)``.HJ`N%A!X (zv)!Q,"(zv) <3:"!#10* ?0J ",(zv)[
MW0EO, * "H0+,&,`00M(zv)0&YG,3 R.0NF(!A6(%<+(zv) >P5"!M(&D(zv);F5J`0`(zv)
M<R!P=3D7-T:05 4G(zv)$1&4$8" H=3DB!PDQ*A!Y!L>0](zv)('8$D&1Z:1AA=3D&\*H(zv)J=20
M9C)U%+!O=3D(zv)=3D %Y!B91IZ%]%O`F 7<'4I+B(zv)(zv)6FL#<' #$'5J?1" 81?1%D 6
MPPGP%D!HYPM(zv)`) ;P&-C!Y /,!E#-'9I!O!A%P`"("!URQI2"8 (zv)&9%K8Q9=20
M%<$&30MQ%Z)#*RL(zv)0L9U`Q $(zv)74(zv),QKQ%:!\.349`1O &K 9.!N2.C M*"(zv)N
M&309-$IA?FL8(zv)!!(zv)(7(B1A? %(zv)`_Z2,:0V$(zv)T$T#$ !P(QH"+2=3DB4%PG9CEV
M:P1P"Y G'M%Z%^ H03$'&> G8QDT3V0Z($E?%+ ;`"90`V 8,&$7P$_,;F0%
M$ ^(zv):RP(zv)4 ((zv)2Q9(zv)`R!4!9!H;(zv)CQ9X,(D"MP<RYR+F\;`'8\!N KLD <<!JP
M!:!M4"YC>CX9-$L#<'5C*? 78&QP:!9 &S!N?F8$D GP'4 M, $`+U(M42V(zv)
M9G=3DD+CA$'B!U\FTI\#$Y&P`GP0!P!; /&] R,#,0,B R.C4T*QDT)[(X"8!M
M*$%C=3D($I\%)8(#(N-(zv)% >R,I&30^'Z <<!YR%F!K\F07D'IK%N )\"J0%P#C
M%K TXFQI8C43%] $<)$O(#0(zv)/QL086H'<.\YH18(zv)$( <P7868#8E%F V9QXA
M.H!I(P4N93Y$Z&EK>2I283O,&301L0(`/K ```,`$! ``````P`1$ (````#
M`( 0_____T `!S!(zv)</583UZ^`4 `"#!(zv)</583UZ^`0L``8 (( 8``````, `
M``````!&``````.%`````````P`#(zv) (zv)(zv)!(zv)``````P ```````$8`````$(4`
M```````#``: "" &``````# ````````1(zv)````!2A0``\ X``!X`)H (( 8`
M`````, ```````!&`````%2%```!````! ```#(zv)N, `#`"> "" &``````#=20
M````````1(zv)`````!A0````````L`,( (( 8``````, ```````!&``````Z%
M`````````P`Q(zv) (zv)(zv)!(zv)``````P ```````$8`````$84````````#`#. "" &
M``````# ````````1(zv)`````8A0```````!X`0H (( 8``````, ```````!&
M`````#:%```!`````0`````````>`$. "" &``````# ````````1(zv)`````W
MA0```0````$`````````'(zv)!$(zv) (zv)(zv)!(zv)``````P ```````$8`````.(4```$`
H```!`````````!X`/0`!````!0```%)%.B ``````P`--/TW``!Z)(4`
`
end

Formaty souboru

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 22.2.1999 12:07:53

Zkus www.wotsit.demon.co.uk, je tam hromada formatu (je to stara URL, ale=
je
tam odkaz na novou

Mirek

-----P=F9vodn=ED zpr=E1va-----
Od: David Adamec <adamecd(zv)vs.xion(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 9:57
P=F8edm=ECt: Re: Formaty souboru


|> Zdravim,
|>
|> nevite prosim kde bych nasel popisy formatu souboru ARJ, ZIP, RAR...
|>
|> Dik,
|> -----
|> Tomas Skopik
|> ( skopik(zv)vtv(tec)czn(tec)cz , www.sarai(tec)cz/~skopik )
|
|Myslim, ze ja mam doma popis RAR (, ale ostatni nevim)
|David Adamec
|
|

Nastavenie fontu

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 22.2.1999 12:11:24

Nejsem si jisty, zda ti dobre rozumim. Ale pokud si nastavis font hlavnih=
o
formulare a vsem komponentam nastavis ParentFont =3D true, tak mas u vseh=
o
stejny font. Pokud se ptas na tohle :-)
Mirek

-----P=F9vodn=ED zpr=E1va-----
Od: Lubos <bruce(zv)pobox.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 11:16
P=F8edm=ECt: Re: Nastavenie fontu


|> Caute All !
|> Da sa nejako nastavit konkretny font pre celu aplikaciu ?
|
|no , nikto sa nechytil , tak to skusim inak.
|Napadlo ze by to slo tak ze pri starte aplikacie zmenim
|default systemove fonty a potom ich dam spat.
|Len neviem ako na to .
|
|vdaka za kazdy napad.
|
|/LH
|

Datum a nazev BIOSu 2

[*] Petr Ham�k - 22.2.1999 12:15:09

Videl sem tu, jak se tu doluje nazev biosu a cas. Ale v TP7. Jak to ale udelat v Delphi 4?
Dekuji
Petr Hamak


Disky v�t�� ne� 8,4GB

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 22.2.1999 12:16:58

Ahoj, ja jsem taky cetl, ze to nejde. Ale tuhle se u mne stavil kamarad s
diskem 14 GB (IBM), strcil jsem ho do supliku (ten disk), nechal BIOS, ab=
y
si ho ocuchal (Autodetect disk) a bez problemu to pod W95 jelo, a to s
jednou partition 14 GB, FAT32, jako slave na primarnim kanale. Master tam
mam IBM 3G2
Nezkousel jsem ale z toho bootovat.
V BIOSu mam nastaven disk jako Auto, size auto, I/O mode auto a pod W95 j=
e
to jako vymenny disk.

Mirek



-----P=F9vodn=ED zpr=E1va-----
Od: Filous Ji=F8=ED <JFilous(zv)cpoj(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 9:05
P=F8edm=ECt: Disky v=ECt=B9=ED ne=BE 8,4GB

Ahoj,

m=E1m takov=FD dotaz kter=FD sem asi nepat=F8=ED, ale mysl=EDm, =BEe je d=
ost
aktu=E1ln=ED a bude
zaj=EDmat v=ECt=B9inu z v=E1s.
M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE 8,4GB ?
J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce jak 8,4GB =
i
kdy=BE jsem pou=BEil
doporu=E8ovanou utilitu EZ-drive 9.09W
Disk jsem rozd=EClil na dv=EC partitions, 2GB 16bit FAT DOS a zbytek
32bit FAT pod Windows.

D=EDky za ka=BEdou radu.

Jirka Filous

Vybaleni primo do pameti

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 22.2.1999 12:16:00

Pakovat kus pameti do ZIPu a zase zpet do pameti umi Dynazip od firmy Inn=
er
Media inc od verze 3.0 vyse

Mirek
-----P=F9vodn=ED zpr=E1va-----
Od: Jan Pukovec <pukovecj(zv)edunet(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 11:51
P=F8edm=ECt: Re: Vybaleni primo do pameti


mozna to moc nepomuze, ale pod starym dobrym dosem byla fce 4bH, 4cH
preruseni 21h prave pro tyto ucely. Ted uz zbyva dohledat neco obdobneho =
pro
windows
-----P=F9vodn=ED zpr=E1va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 18. =FAnora 1999 16:37
P=F8edm=ECt: Vybaleni primo do pameti


Mimochodem, kdyz jsme u toho ASPacku, umite nekdo udelat
vybaleni neceho do pameti kodu a spusteni - presne to, co
dela tento program - nekde neco nacte, soupne to do
pameti, spusti a sebe ukonci...?


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

Editace textu > 64 KB

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 22.2.1999 12:30:05

ahoj,

nevi nekdo jestli existuje moznost editace textu vetsiho nez 64KB bez
pouziti RichEditu ?
nejvic by mi vyhovovalo Memo, ktere by nacetlo text > 64KB
neexistuje nejaka free komponenta, ktera toto dokaze ?


za pripadne odpovedi dekuji

Zdenek Fryz

Toolbar - autohide

[*] David Maly <david(zv)archa(tec)com> - 22.2.1999 13:01:51

Ahoj,

nevite nekdo nahodou jak programove nastavit vlastnost "automaticky
schovavat" (autohide) u hlavniho panelu? Chtel bych, aby se opravdu
provedla akce ekvivalentni zaskrtnuti checkboxu "autohide" ve
vlastnostech a naslednem stisku "pouzit"


S pozdravem
David mailto:david(zv)archa.com

Pouzivate Decision cube?

[*] Milan Nemec <nemec(zv)goldcard(tec)cz> - 22.2.1999 13:06:03

Ahojte vseci,

chtel jsem se zeptat, jestli pouzivate Decision cube
a jestli mate s temito komponentami nejake zaporne
zkusenosti.
Jestli tam neni nejakej zadrhel.
Jak se chovaji pri vetsich databazich (cca desetitisice
zaznamu), jsou dostatecne rychle i pri techto databazich?
(Dostatecne rychle = aby nejaka akce NETRVALA 10 minut.)

Dik Milan

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`#$(`0N `0`?````1D9".#8T
M-C T,4(X,#$P.# P,D(R0CA!,CDP,# P`&H&`0V ! `"`````(zv)`"``$$D 8`
M(zv) $```$````0`````P``, (````+``\.``````(!_P\!````/0````````"!
M*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E;'!H
M: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%!(22U,
M0$971"Y#6(zv)`````#```Y``````L`0#H!````'(zv)#V7P$````0````9&5L<&AI
M+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)`````#`/U?
M`0````,`_U\``````(zv)'V#P$````$`````````I%'`02 `0`9````4&]U>FEV
M871E($1E8VES:6]N(&-U8F4_`!,)`06 `P`.````SP<"`!8`#0`&``,``0`%
M`0$(zv)(zv) ,`#(zv)```,\'`(zv)`6``P`.P`$``$`.(zv)$!"8 !`"$````V.$(T1D8R.30R
M0T%$,C$Q0D,Q,C P-C P.#$X.#5#- ``!P$#D 8`O 0``"$````+``(``0``
M``L`(P```````P`F```````+`"D```````,`+(zv)```````P`V``````! `#D`
M< 4UN%M>O(zv)$>`' ``0```!D```!0;W5Z:79A=&4(zv)1&5C:7-I;VX(zv)8W5B93\`
M`````(zv)%Q``$````6`````;Y>6[>7*?^T:LI"$=*\$(zv)!(zv)"!B%Q ``'(zv)`># $`
M```#````35,``!X`'PP!````% ```%=I;F1O=W,O861M:6XO;F5M96,``P`&
M$'Z(QC8#``<0((zv)$``!X`"! !````90```$%(3TI4159314-)+$-(5$5,2E-%
M35-%6D505$%4+$I%4U1,25!/55I)5D%4141%0TE324].0U5"14%*15-43$E-
M051%4U1%34E43TM/35!/3D5.5$%-24Y%2D%+15I!4$]23D4``````(zv)$)$ $`
M``"H`0``I $``"P"``!,6D9UEWG[XS\`"(zv)$#`?<"I /C`(zv)!C:($*P'-E=#(S
M. ``ZBH"X6$'(zv)" '$P* !Q-H($-%`H!]"H (R#O="6\P`H *A LP8P!!"V#
M;F<Q,#(Y"Z80D%!H;VIT$(!V#Z!C_&DL"J(*A J!%% !0!22+Q6 #V 5X ,(zv)
M:(zv)^(zv);2 1#Z (zv)>F4%,&%T+(,8, >0=&QI(' (8-AZ:789`!" 1!8Q`)"C`B 7
MT'5B919T81DV#P# %>$$(!7(zv);6ET;^P(zv):P-P&;!N"? !D!R(zv)HB =0&IA:QBA
M81FP(P2(zv)&Q5Z:W4/H&YOZ1E(zv):2X6=$H95!UQ';&+`P`=M6H>(61R:!(zv)0KQ^F
M'? 8(zv)(zv)](zv);QH`:AF1GP40%(zv)`/L "0#V (zv)9!D`C0&(zv)81G(zv)(_$H8V,;(zv).\!``^A
M'+ :(zv)6,>EB1P$%'T=2D9(7,(8"00'V$:$:)C'4 (zv)<GD/8&P0(zv)%\C1">!%_ <
MT"0H/Q9T*-)$)T\]( &(zv)>1VT&X ''? EP >P15125D$X3$$(zv)%- <``N =72<
M+BD6= KC"H!$:2*07DT#$ !P%G01L0`OL ,`$! ``````P`1$ `````#`( 0
M_____T `!S"(zv)_$F^6EZ^`4 `"#"(zv)_$F^6EZ^`0L``8 (( 8``````, `````
M``!&``````.%`````````P`#(zv) (zv)(zv)!(zv)``````P ```````$8`````$(4`````
M```#``: "" &``````# ````````1(zv)````!2A0``\ X``!X`)H (( 8`````
M`, ```````!&`````%2%```!````! ```#(zv)N, `#`"> "" &``````# ````
M````1(zv)`````!A0````````L`,( (( 8``````, ```````!&``````Z%````
M`````P`Q(zv) (zv)(zv)!(zv)``````P ```````$8`````$84````````#`#. "" &````
M``# ````````1(zv)`````8A0```````!X`0H (( 8``````, ```````!&````
M`#:%```!`````0`````````>`$. "" &``````# ````````1(zv)`````WA0``
M`0````$`````````'(zv)!$(zv) (zv)(zv)!(zv)``````P ```````$8`````.(4```$````!
A`````````!X`/0`!`````0`````````#``TT_3<``$#R
`
end

Editace textu > 64 KB

[*] Rudolf Balada <rudolf.balada(zv)parlament(tec)cz> - 22.2.1999 13:17:18

Obavam se ze tou "komponentou" budou pouze Windows NT ...

Rudolf Balada
kancler(zv)parlament(tec)cz

-----Original Message-----
From: Fryz, Zdenek <fryz(zv)dcb(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 22. =FAnora 2001 12:56
Subject: Editace textu > 64 KB


>ahoj,
>
>nevi nekdo jestli existuje moznost editace textu vetsiho nez 64KB bez
>pouziti RichEditu ?
>nejvic by mi vyhovovalo Memo, ktere by nacetlo text > 64KB
>neexistuje nejaka free komponenta, ktera toto dokaze ?
>
>
>za pripadne odpovedi dekuji
>
>Zdenek Fryz


Nemodalni formular v DLL, 2. pokus

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 22.2.1999 13:19:11

> constructor TBaseForm.Create(AOwner: TComponent);
> begin
> AppForm := TForm(AOwner); // interni promenne
> RunParams := AppForm.Tag; // -||-
> AppHandle := AppForm.Handle; // -||-
> BorderSize := GetSystemMetrics(SM_CYSIZEFRAME); // -||-
> inherited Create(nil);
> end {TBaseForm.Create};

Nevim, jakym zpusobem mas podedeny formy
z TBaseForm. Jestli v nich prepisujes Create stejnym
zpusobem, tak je jasne, ze ti to pada uz tady.

doporucuji Ti predevsim misto:
inherited Create(nil);

pouzit
inherited Create(AOwner);

Dal nevim, co znamena pretypovani TForm(AOwner).
Odkud se ta Create vola? Volas ji sam, nebo pouzivas
TApplication.CreateForm (to je mj. implicitni otevirani formu
v projektu).
Pokud volas TApplication.CreateForm, tak je parametr
AOwner typu TApplication a spadne to pri pretypovani.
Pokud volas primo Create, co ji davas jako parametr,
ktery tady pretypovavas na TForm? Myslim, ze zrada muze
byt prave ve volani toho konstruktoru.

HTH

Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

Parametr

[*] Petr Ham�k - 22.2.1999 13:20:12

Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
Dekuji
Petr Hamak

Uvolneni bitmapy

[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 22.2.1999 13:21:31

mam maly dotaz ohledne uvolnovani pameti z bitmapy. Jestlize mam Bitmap
coz je class TBitmap a nactu do ni z resourcu
Bitmap.Handle:=LoadBitmap(Hinstance,'Bitmapa1') a za nejaky cas chci
nacist
Bitmap.Handle:=LoadBitmap(Hinstance,'Bitmapa2') tak jakym zpusobem
odstranim predchozi bitmapu z pameti?
nejak jsem z Helpu nepochopil jestli kombinace

Bitmap.Dormant;
Bitmap.FreeImage;
Bitmap.ReleaseHandle;

uvolni pameti na kterou ukazuje Bitmap.Handle uplne a nebo jenom
odstrani pripojeni Bitmap na ten handle a pamet zustane alokovana. S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz

Nastavenie fontu

[*] Libor Valka <valka(zv)brno.cas(tec)cz> - 22.2.1999 13:21:13

Ahoj,

jestli jsem to dobre pochopil, tak by melo stacit v HLAVNIM formulari
nastavit tebou pozadovany font a ve vsech ostatnich nastavit Parent-font
formulare na TRUE.

Libor
valka(zv)brno.cas(tec)cz
valka(zv)ipm(tec)cz
> -----P=F9vodn=ED zpr=E1va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u=BEivatele
> Lubos
> Odesl=E1no: 22. =FAnora 1999 11:08
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: Nastavenie fontu
>
>
> > Caute All !
> > Da sa nejako nastavit konkretny font pre celu aplikaciu ?
>
> no , nikto sa nechytil , tak to skusim inak.
> Napadlo ze by to slo tak ze pri starte aplikacie zmenim
> default systemove fonty a potom ich dam spat.
> Len neviem ako na to .
>
> vdaka za kazdy napad.
>
> /LH
>
>

Nemodalni formular v DLL, 2. pokus

[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 22.2.1999 13:39:35

Polak Jiri wrote:
>
> > constructor TBaseForm.Create(AOwner: TComponent);
> > begin
> > AppForm := TForm(AOwner); // interni promenne
> > RunParams := AppForm.Tag; // -||-
> > AppHandle := AppForm.Handle; // -||-
> > BorderSize := GetSystemMetrics(SM_CYSIZEFRAME); // -||-
> > inherited Create(nil);
> > end {TBaseForm.Create};
>
> Nevim, jakym zpusobem mas podedeny formy
> z TBaseForm. Jestli v nich prepisujes Create stejnym
> zpusobem, tak je jasne, ze ti to pada uz tady.

Neprepisuju, ani takto, ani nijak jinak. Create je prepsany pouze u
TBaseForm. Nadale se dedi jednotlive hlavni formulare primo z TBaseForm.

Navic do toho zdedeneho konstruktoru to jeste vleze. Az nekde uvnitr to
vyhuci.

> doporucuji Ti predevsim misto:
> inherited Create(nil);
> pouzit
> inherited Create(AOwner);

S problemem to neudela vubec nic, uz jsem to zkousel. To co funguje,
funguje v obou variantach, co nefunguje, nefunguje v obou variantach.

> Dal nevim, co znamena pretypovani TForm(AOwner).
> Odkud se ta Create vola? Volas ji sam, nebo pouzivas
> TApplication.CreateForm (to je mj. implicitni otevirani formu
> v projektu).

Create volam sam v teto funkci v DLL:

function FK_RunForm(AForm: TForm; AEkData: PEkDataList; AOptions:
PFKOptions): TForm; stdcall; export;
begin
Opt := AOptions; // globalni promenne
EkData := AEkData; // -||-
FrmMain := TFrmMain.Create(AForm);
Result := FrmMain;
end {FK_RunForm};

pricemz TFrmMain je primo odvozeny z TBaseForm.

> Pokud volas TApplication.CreateForm, tak je parametr
> AOwner typu TApplication a spadne to pri pretypovani.
Ne, parametr je typu TForm. Uz nevim, proc to tam mam, ale tam to
nepada, to vim.

> Pokud volas primo Create, co ji davas jako parametr,
> ktery tady pretypovavas na TForm?
Viz vyse FK_RunForm.

> Myslim, ze zrada muze
> byt prave ve volani toho konstruktoru.

Podotykam, ze to vsude krome toho jednoho typu notebooku funguje, a
druhy odvozeny modul (uplne stejne) funguje i tam. Ale nez reknu, ze to
na tom jednom typu notebooku proste fungovat nebude, chci si tim byt
jisty.

Diky.

--
Hezky den!
______________________________________________
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, vyvoj(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)

TDataSet + OnFilteredRecord

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 22.2.1999 13:46:24

Uz jsem tu skoro dva tydny nebyl ...chripka, tak nevim jestli uz to neni
out of date, ale pred kazdou filtrci zavri a znovu odevri TDataset (
Active nebo Close ... Open)

> -----P=F9vodn=ED zpr=E1va-----
> Od: Petr S [SMTP:p.sadovsky(zv)atlas(tec)cz]
> Odesl=E1no: 12. =FAnora 1999 12:31
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: TDataSet + OnFilteredRecord
>=20
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Radek KALA <delphi(zv)betacontrol(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 12. =FAnora 1999 11:56
> P=F8edm=ECt: Re: TDataSet + OnFilteredRecord
>=20
>=20
> >Udalost OnFilteredRecord se provadi v pripade, ze je nastaveno
> >Filtered na True. A provede se pro kazdy record tabulky.
>=20
>=20
> Ale kterym prikazem se spusti?
>=20
> Me to jednou do OnFilteredRecord vjede a trikrat ne.
> Na cem zalezi, aby to projelo vzdy ?
>=20
> Petr

Disky v�t�� ne� 8,4GB

[*] Filous Ji�� <JFilous(zv)cpoj(tec)cz> - 22.2.1999 13:46:34

> [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
> musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....
>=20
V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si nain=
stalovat
jakoukoli novou
verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.

Jirka Filous

analyticka geometrie

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 22.2.1999 13:50:36

Hi,> dva dane obdelniky v rovine maji spolecny alespon jeden bod.

na wokennim API existuje funkce IntersectRect(var DstRect, Src1Rect,
Src2Rect: tRect): integer, ktera vraci 0 v pripade, ze se Src1 a Src2
neprekryvaji, jinak je prusecik v DstRect.

Bye, pf

Parametr

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 22.2.1999 13:51:39

Funkce ParamStr a ParamCount
From: Petr Ham�k <hamak(zv)ssakhk(tec)cz>

Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
Dekuji
Petr Hamak

Parametr

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 22.2.1999 13:52:49


> Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
****Podivej se na ParamCount a ParamStr.

Slavek

> Dekuji Petr Hamak


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

Parametr

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 22.2.1999 13:52:36

ParamCount =3D pocet parametru
ParamStr(0) =3D jmeno spusteneho programu (vc. path)
ParamStr(1) =3D prvni parametr atd...

> ----------
> Od: Petr Ham=E1k[SMTP:hamak(zv)ssakhk(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 13:20
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Parametr
>=20
> Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
> Dekuji
> Petr Hamak
> =A0
>=20

Parametr

[*] Vavro Vladimir Ing. <Vlado(zv)tento.sk> - 22.2.1999 14:30:48



>Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove
radky?
>Dekuji
>Petr Hamak

Myslis toto ?=A0

function ParamStr(Index: Integer): string;
function ParamCount: Integer; Vlado Vavro

Disky v�t�� ne� 8,4GB :-)

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 22.2.1999 14:30:40

Uaaaah ... no nic no. Delate si srandu? :-)))
(sorry - ja uz nemohl mlcet)

Verze BIOSu MUSI BYT URCENY PRO KONKRETNI DESKU !

Treba Microstar delal Ami i Award verzi, ale musi byt konkretne pro
dany typ desky.
(to aby to bylo univerzalni, by sezralo podstatne vic nez "jen"
nejake 2MBit. )

Akorat zalezi na vyrobci, jestli se chce rozcilovat s BIOSy pro starsi
desky (ale vetsinou ano).

Pokud minis pouzit update BIOSu od jine desky, tak se prvni podivej,
jestli se da Flash pamet na Tve desce nenasilne vytahnout a opatri si
programatorek (budes ho potrebovat na opravy :-)))

Mti.

(a k tomu disku >8.4G .... ano tyto problemy jsou u starsich bordu. Co
vim - novejsi Microstary to maji vyresene slusne, Abit taky :-) ....
teda - neprodavam HW, ale vrele doporucuji)

-----P=F9vodn=ED zpr=E1va-----

> [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
> musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....
>
V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si nains=
talovat
jakoukoli novou
verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.

Jirka Filous


Disky v�t�� ne� 8,4GB

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 14:33:23

!!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU !!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Ty bys me privodil infarkt clovece.............fuj.


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: Filous Ji=F8=ED [SMTP:JFilous(zv)cpoj(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 13:47
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Disky v=ECt=B9=ED ne=BE 8,4GB
>=20
> > [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
> > musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....
> >=20
> V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si na=
instalovat
> jakoukoli novou
> verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.
>=20
> Jirka Filous

None

[*] Medusa <medusa(zv)brajan(tec)cz> - 22.2.1999 14:34:32

Ahoj,

Diky, prostuduju a omlouvam se za Subjekt, - naprosto jsem ho prehledl...
:-)) Polepsim se...

Medusa

-----P=F9vodn=ED zpr=E1va-----
Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 12:40
P=F8edm=ECt: Re:


Medusa wrote:

> Poreboval bych poradit a nebo priklad, kterej resi pretahnuti souboru
> (ikony, ...) z jine aplikace nebo exploreru na muj form...
>
> Trebas: Mam tMemo a chci abych mohl chytit soubor z plochy a pustit ho =
do
> do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to bu=
de
> stacit...

// Project: Drag and Drop Source Components
// Component Names: TDropTextSource, TDropFileSource,
// Module: DropSource
// Description: Implements Dragging & Dropping of text, files
// FROM your application to another.
// Version: 3.2
// Date: 22-OCT-1998
// Target: Win32, Delphi 3 & 4
// Authors: Angus Johnson, ajohnson(zv)rpi.net.au
// Anders Melander, anders(zv)melander.dk
// http://www.melander.dk
// Graham Wideman, graham(zv)sdsu.edu
// http://www.wideman-one.com
// Copyright =A91998 Angus Johnson, Anders Melander &
Graham Wideman


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


Parametr

[*] Karel Chmel <kchmel(zv)csob(tec)cz> - 22.2.1999 14:50:13

ParamStr


Karel Chmel

----------
Odes=EDlatel: Petr Ham=E1k <hamak(zv)ssakhk(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz
P=F8edm=ECt: Parametr
Datum: 22. =FAnora 1999 13:20

Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
Dekuji
Petr Hamak
=20


Disky v�t�� ne� 8,4GB

[*] Lubos <bruce(zv)pobox.sk> - 22.2.1999 14:51:20

> V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BE=
u si nainstalovat
> jakoukoli novou
> verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desk=
u.
>

musi byt pre konkretnu dosku.

/LH


Parametr

[*] Lubos <bruce(zv)pobox.sk> - 22.2.1999 14:52:12

> Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?

v com robis ?

/LH


Parametr

[*] Ale� Kle�ka - 22.2.1999 14:55:02

Nev=EDm, jestli jsem T=EC spr=E1vn=EC pochopil,
ale jestli jsi m=ECl namysli spou=B9t=ECn=ED aplikace s parametry, ta=
k
ParamCount Ti 'd=E1', kolik je tam parametr=F9 a ne jednotliv=E9 parametr=
y se
m=F9=BEe=B9 odkazovat p=F8es Paramstr(I).

P=F8.:
for I :=3D 1 to ParamCount do begin
if Copy(ParamStr(I),1,2) =3D '-f' then
v_FromFile :=3D Copy(ParamStr(I),3,Length(ParamStr(I)));
if Copy(ParamStr(I),1,2) =3D '-t' then
v_ToFile :=3D Copy(ParamStr(I),3,Length(ParamStr(I)));
if Copy(ParamStr(I),1,2) =3D '-g' then
v_debug :=3D Copy(ParamStr(I),3,Length(ParamStr(I)));
end;


-----P=F9vodn=ED zpr=E1va-----
Od: Petr Ham=E1k <hamak(zv)ssakhk(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 14:45
P=F8edm=ECt: Parametr


Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
Dekuji
Petr Hamak

Editace textu > 64 KB

[*] Lubos <bruce(zv)pobox.sk> - 22.2.1999 14:56:05

> ahoj,
>
> nevi nekdo jestli existuje moznost editace textu vetsiho nez 64KB bez
> pouziti RichEditu ?
> nejvic by mi vyhovovalo Memo, ktere by nacetlo text > 64KB
> neexistuje nejaka free komponenta, ktera toto dokaze ?

no, neviem preco ti vadi RichEdit.
Ak nechces pouzit komponentu, tak mozes pouzit Riched32.dll.
Mas tam vsetko co dokaze TRichEdit + nieco navyse.
/LH


Vypocet veku z data narozeni v SQL

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 22.2.1999 15:04:26

Jen lehke posunuti spravnym smerem......

TDateTimeField->Value() //je kompatibilni s System::TDateTime
TDateTime->DecodeDate(.......)


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: Windows/sosna/Petr za u=BEivatele Petr Hartman
> Odesl=E1no: 19. =FAnora 1999 15:37
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Vypocet veku z data narozeni v SQL
>=20
> Ahoj,
> pokud bys chtel dnesni datum dostat do SQL prikazu pomoci
> parametru, muselo by to vypadat asi takto:
>=20
> SELECT Jmeno, Prijmeni, Narozen,(:Datum-Narozen)/365 as Vek from
> ZACI
>=20
> Pred provedenim prikazu bys musel naplnit parametr Datum
>=20
> Query1.ParamByName('Datum').asDateTime :=3D Date;
> Query1.Open;
>=20
> Nesmele ovsem podotykam, ze zjistovat vek vydelenim poctu dnu 365 neni
> asi nejvhodnejsi metoda (co prestupne roky ?). Navic jako vysledek
> dostanes realne cislo, takze bys ho stejne musel jeste nejak upravit.
>=20
> S pozdravem
> Petr Hartman
>=20
> ----------
> Od: Plisek Jan Ing.[SMTP:Plisek(zv)spse(tec)cz]
> Odesl=E1no: 19. =FAnora 1999 14:25
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Vypocet veku z data narozeni v SQL
>=20
> Vazeni kolegove,
>=20
> mam zacatecnicky problem. Pristupuji k dBase tabulce ZACI pomoci
>=20
> komponenty Query a potrebuji z datumove polozky Narozen
> vypocitat vek=20
> osoby. Zkousel jsem prikaz ve tvaru:
> SELECT Jmeno, Prijmeni, Narozen,(Date()-Narozen)/365 as Vek from
> ZACI
> ale bez uspechu. Proste nevim, jak dostat do SQL dnesni datum=20
> - zkousel jsem SysDate, CurrentDate, ToDay(),_DiaryDate -
> vsechno=20
> marne. Pokusy jsou neuspesne i v Database Exploreru.
>=20
> Problem jsem se snazil resit i pomoci parametru takto:
> Select Jmeno,Prijmeni,Narozen,:Vek as Vek from Zaci
>=20
> procedure TForm1.Query1CalcFields(DataSet: TDataSet);
> var Dnesek:TDateTime;
> begin
> Dnesek:=3DDate;
> =09
> Query1.FieldByName('Vek').AsFloat:=3D(Dnesek-Query1.FieldByName('Naro
> zen').AsDateTime)/365 =20
> end;
>=20
> Ani to vsak nevedlo k uspechu. Pouzivam Delphi 2.0 Developer.=20
>=20
> Prosim, poradte, co mam jeste zkusit.
>=20
> Dekuji J.P
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=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. 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
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D
>=20

Nastavenie fontu

[*] Lubos <bruce(zv)pobox.sk> - 22.2.1999 15:06:33

> Nejsem si jisty, zda ti dobre rozumim. Ale pokud si nastavis font hlavniho
> formulare a vsem komponentam nastavis ParentFont = true, tak mas u vseho
> stejny font. Pokud se ptas na tohle :-)
> Mirek

sorry, moja chyba. upresnim.
Ja potrebujem konkretny font aj pri pouziti
FindDialog.
hmhm, ako sa tak na to pozeram tak to asi nebude mat s fontom nic spolocneho.
Problem je ak chcem vyhladat nejake pismeno alebo slovo s diakritikou.
Nevie niekto o tom nieco ?

vdaka./LH


Disky v�t�� ne� 8,4GB

[*] Martin <geoplan(zv)pp.sinet.sk> - 22.2.1999 15:11:29

Bios musi byt urceny pre tvoju dosku. Musis vediet vyrobcu a presny typ. =
Na
www.windows95 ikona drivers a potom bios update ti ponukne zoznam www
vsetkych vyrobcou zakladnych dosiek. Na ich www si stiahni update biosu a=
ak
nemas ku doske ovladaci program pre update aj ten, niekedy je uz aj sucas=
tou
update, zavisi od vyrobcu. Pred update si uloz stary bios , program pre
update to vacsinou umoznuje. ak by novy bios blbol, da sa potom naspet
nahrat stary .

Martin

-----P=F4vodn=E1 spr=E1va-----
Od: Filous Ji=F8=ED <JFilous(zv)cpoj(tec)cz>
Pre: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
D=E1tum: 22. febru=E1r 1999 15:11
Predmet: RE: Disky v=ECt=B9=ED ne=BE 8,4GB


>> [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
>> musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....
>>
> V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si nai=
nstalovat
>jakoukoli novou
> verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.
>
> Jirka Filous


Parametr

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 22.2.1999 15:12:47

V TP 6.0 na to byla funkce ParamStr(i:integer). To zrejme zustalo
zachovano.

Mimochodem - ve VisualBasicu je to Command$, kdyby to nekdo potreboval.

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

programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P=F9vodn=ED zpr=E1va-----
> Od: Petr Ham=E1k [SMTP:hamak(zv)ssakhk(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 13:20
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Parametr
>=20
> Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
> Dekuji
> Petr Hamak
> =A0

Parametr

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 22.2.1999 15:15:34

vraci ho fce paramstr(n), kde n je cislo parametru
fce paramcount vraci pocet parametru prikazove radky

> -----P=F9vodn=ED zpr=E1va-----
> Od: Petr Ham=E1k [SMTP:hamak(zv)ssakhk(tec)cz]
> Odesl=E1no: 22.02.1999 13:20
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Parametr
>=20
> Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
> Dekuji
> Petr Hamak
> =20

Parametr

[*] suvak(zv)pbko.sk - 22.2.1999 15:27:32



Lidi, lidi, jsem v koncich. Jak se dostane parametr z prikazove radky?
Dekuji
Petr Hamak


[Peter Suvak]

Napr. takto:


procedure TfrmMain.FormCreate(Sender: TObject);
var
i: Integer;
begin
for i := 0 to ParamCount() do
writeln(ParamStr(i));
end;
=============================================================
Ing. Peter Suvak, veduci oddelenia spravy systemov
Priemyselna banka, a.s. Kosice
Sturova 27
040 01 Kosice

tel.: 095 / 6804 282
fax: 095 / 6804 510
mobil: 0903 610 901
=============================================================

Disky v�t�� ne� 8,4GB

[*] Filous Ji�� <JFilous(zv)cpoj(tec)cz> - 22.2.1999 15:31:38



> -----P=F9vodn=ED zpr=E1va-----
> Od: Martin Fron=ECk [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl=E1no: 22. =FAnora 1999 14:33
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Disky v=ECt=B9=ED ne=BE 8,4GB
> D=F9le=BEitost: Velk=E1
>=20
> !!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU !!!!!!!!!!!!!!!!!!!=
!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!=
!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>=20
> Ty bys me privodil infarkt clovece.............fuj.
>=20
>=20
Sorry, ale rad=B9i polo=BE=EDm "blb=FD" dotaz ne=BE abych ten infarkt
dostal j=E1 kdybych
tam vrznul prvn=ED BIOS kter=FD mi p=F8ijde pod ruku a ma=B9ina by
byla K.O.

Bohu=BEel pro desku co m=E1m se m=EC nov=FD BIOS sehnat neda=F8=ED.
M=E1m desku PT-2003 s =E8ipsetem "Intel Triton VX" a bios Award
verze 1.0
V=EDm =BEe je to u=BE muzeum, ale n=ECjak=FD =E8as to je=B9t=EC vyd=BEe=
t mus=ED.

Jirka Filous

SINEA a BLOB

[*] sup(zv)svitap(tec)cz - 22.2.1999 15:36:54

Mam demo SINEA tiskoveho generatoru pro DELPHI3 a nedari se mi zobrazit=20
obsah BLOBu z pdx tabulky. Misto obsahu se mi stale zobrazuje (BLOB). V=20
helpu je:

V t=E9to verzi knihovny je mo=BEn=E9 tisknout n=E1sleduj=EDc=ED typy polo=
=BEek:

polo=BEky jejich=BE hodnotu lze zobrazit jako jednoduchou textovou polo=BE=
ku

v=EDce=F8=E1dkov=E9 Memo polo=BEky=20

objekty typu BLOB

Je to tim, ze je to demo?

Jaroslav Weiss
odd. informatiky

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

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

Zastavit SQL dotaz

[*] Hynek svatos <svatos(zv)af(tec)czu(tec)cz> - 22.2.1999 16:24:24 met

> Nevite prosim nekdo, jak zastavit probihajici SQL dotaz (pres TQuery.Open).
> Predstava je takova, ze mam dialog s tlacitkem (treba STOP) a po clicku
> se mi posle nejaka zprava (do BDE?) neco jako "halt" nebo neco takoveho.

Ja nevim, ale zkusil bych si treba otevrit SQL Trace, v Query
Analyzeru (ISQL) ten dotaz pustit a zastavit, treba se objevi
nejaky storno prikaz ...

Svatos
svatos(zv)af(tec)czu(tec)cz

Disky v�t?� ne? 8,4GB

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 22.2.1999 16:25:19

Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor



-----P�vodn� zpr�va-----
Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
Odesl�no: 22. �nora 1999 14:33
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Disky v�t?� ne? 8,4GB

!!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU !!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Ty bys me privodil infarkt clovece.............fuj.


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

> -----P�vodn� zpr�va-----
> Od: Filous Ji�� [SMTP:JFilous(zv)cpoj(tec)cz]
> Odesl�no: 22. �nora 1999 13:47
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Disky v�t�� ne� 8,4GB
>
> > [Martin Fron�k] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
> > musel jsem si stahnout novou verzi BIOSu. Takze to taky udelej.....
> >
> V tom p��pad� m�m je�t� jeden mal� dotaz. M��u si nainstalovat
> jakoukoli novou
> verzi BIOSu Award, nebo mus� b�t ur�en� pro moj� desku.
>
> Jirka Filous

begin 600 WINMAIL.DAT
M>)\^(A8/`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($1I<VMY(';L=#_M(&YE/R X+#1'0(zv)"*" $%(zv) ,`#(zv)```,\'`(zv)`6`! `&0`3
M``$`*P$!(( #``X```#/!P(`%(zv)`0`!(zv)`+(zv)`!`$4!`0F `0`A````1C U-C$Y
M,3 V,D-!1#(Q,3DS.34P,#(P048S0D0Y,4,`^08!`Y &`)P'```A````"P`"
M``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````
M0 `Y`&!K5HYW7KX!'(zv)!P``$````:````4D4Z($1I<VMY(';L=#_M(&YE/R X
M+#1'0(zv)````(!<0`!````%(zv)````&^7G>.2A 95O'*8A'2DY4`(*\[V1P``!X`
M'(zv)P!````!0```%--5% `````'(zv)`?# $````6````=FEK=&]R+FQO<W1A:T!C
M:&UI+F-Z`````P`&$*[&>/L#``<0W(zv)(``!X`"! !````90```$%,151/5E5"
M14-.14Y)4%)!5D1!+%1/2D5*14Y404M/5D%03U9%4D%/3D]43T-(3T1)4T53
M4$]54U1/55)56DY90TA$15-%2RQ43T].251)5EE23T)#24I%3E1!2U-44D%3
M258``````(zv)$)$ $```!Y! ``=00``($'``!,6D9U)OK4Y ,`"(zv)!R8W!G,3(U
M%P%#`30+8&X.$# R.4T!]R "IP(`8V(zv)*P'. 970P(%1A: -QCP*#`% #U!"W
M,C,X``#J*(zv)+A80> ( <3`H '$R(zv)(zv)0T4"(zv)S(2)W!RWG$5,1*_$\\4T7T*(zv) C(
M;" ["6\.,#4"(zv) J!=39C`% +`V,`00\$,S,+"Z878&P74'1O('8D=6(%D"!N
M"?!I($$5T&%V9&$L'1)J#Q=0'K #H &0:V]V80<=\!]0!)!A+B!/;O\=,!TA
M$- $<!W(zv)$1 (zv)T!^0!'5S'2!U(')U>K1N>1#0( $`$1!K'F-+`B =X'0=X'9Y
M`V!B[F,=X![E(-!T'A `D!_PZ%9I:QT(zv)<AO%#V 1\C\*L0J$"H0;<(zv)+1"\(Q
M-Q,F.A4C,38F.FQI,V8V`4 5T&]T!9 %0"V!*G)07"=F.78$<&4+D"<)(zv)"!Z
M%= K43'_'V J<R76*(zv)0IT0L3*(zv)0"`&!I+3$T- % *9 Q7#(zv)P`4 ,T"Z#8B `
M9.HZ#(-B$4!-"L C``.(zv)%D8#8"M"8R006U--`%10.D923TY%`$M 6EI.4TQ!
MP$Y9+D-:7275+[*?!Y )4"OA(" O]S(R'_#/*M$`< 6P'W Q.370-;"L-#H<
M,3,V2P-P=2_W(B<!`&QP:"Y(zv);$" 9G=D+F-Z)S,G52K". F ;3$R="_W4I!%
M.B!$! !K>1U #3GC/RM3'; _(#(zv)L^#1'0BR/+9HIE!(## $-)>,A/[P%T%53
M22! 0EE4(%52%,!.7D$Y4#(`-N R$$LZP%0"3D#(zv)1$532U4(zv)_S^]/[,_7T4_
M1D]'7T.?27\O2H]+GTBZ)=14.T!B>?<$(!=!%=!I*Q$#$0N -5 ><B30(' )
M`!^P8V4NX4_Z9G5J+B7>"H PCG\EU#)A!(zv)`/`2K1*X ?X'/M4/50'A JT#D'
MD%,0*^$1-; U-SD>8#(W-+P(zv)-%8!4\8EU"H(zv);!_P)"LT`= M,RZ +37)-/ Y
M."C%92T`P ,0C3K(zv)( -1';!K0'HAP-LSX !P>3B1)=H^*F\K?Y];1B_5,. #
M$"$Q($H`H%<Y(zv)5RC,91*7M1 #?!O?U#(zv).* S%5XR,]PT[S7Q,_PZ-">56Z V
M]S>_.,5;H/\Y;R^P.LY5(541._-5(CQ:KUN(zv)6T9JX5Z26S".75F(zv)FU3P(V!O
M$. >8$5:':'U(2%Z3I!E4.!?,!]P`,#Z;36P,#R0(A [$1Y(zv)51#O:Q<W$!$0
M`R!J$1!O``"0]R0A$7 (zv)('4%0" (zv)7& A(zv)(<?L6Y 0/!)3U-U'_"Y$6!K>AT#
M'R$[0'5E(zv)=]N<4_R:PEJEEZ25AT1;P#^<%]F"K +,#%!3C!=(F\`_QZP:3)I
M(1V!'K !``.(zv)`,!+,_%4(60J$&%Z'_!-_UPB52(A(zv)'$Q%R +(zv)'%A3Y'K>%%;
M56H?,74?0"F0<>3W=5MR61=(zv)=PL1'F =L ;(zv)_W!R7*,,,%01!4 (<%RA.:!_
M7))5L"GQ3C!(zv)\%RC(B%K_W+P:HY>(zv)U] 3T ?<%[4)=0%&($`A0`````#`! 0
M``````,`$1 ``````P" $/____] ``<P$*^W>G=>O(zv)% ``(zv)P$*^W>G=>O(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``U^V%
`
end


Komponenty pro CDX

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 22.2.1999 16:37:36

Koukni na
http://www.kylecordes.com/bag/listbycategory.html
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+> -----Original Message-----
> From: Marek Soukup [mailto:marek(zv)comberg.com]
> Sent: Sunday, February 22, 1998 3:49 PM
> To: Delphi konference
> Subject: Komponenty pro CDX
>
>
> Ahoj,
> mam stale problem s CDX indexem a Delphi1 s BDE. Ptal
> jsem se ruzne
> po svete a nejakej Marco Cantu mi psal, ze existujou nejaky
> komponenty,
> ktery to umeji. Bohuzel nenapsal jaky a kde je najit. Hledal jsem, ale
> nic jsem nenasel. Nevite nahodou nekdo o necem ?
>
>
> Marek Soukup
>

Disky v�t?� ne? 8,4GB

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 22.2.1999 16:52:24

Ale kdeze K.O., to se nemuze stat. Ja jsem rval BIOSy do ruznych desek a nikdy se nic nestalo. V.
-----P�vodn� zpr�va-----
Od: Filous Ji�� [SMTP:JFilous(zv)cpoj(tec)cz]
Odesl�no: 22. �nora 1999 15:32
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Disky v�t?� ne? 8,4GB
> -----P�vodn� zpr�va-----
> Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl�no: 22. �nora 1999 14:33
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Disky v�t�� ne� 8,4GB
> D�le�itost: Velk�
>
> !!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU !!!!!!!!!!!!!!!!!!!!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>
> Ty bys me privodil infarkt clovece.............fuj.
>
>
Sorry, ale rad�i polo��m "blb�" dotaz ne� abych ten infarkt
dostal j� kdybych
tam vrznul prvn� BIOS kter� mi p�ijde pod ruku a ma�ina by
byla K.O.

Bohu�el pro desku co m�m se m� nov� BIOS sehnat neda��.
M�m desku PT-2003 s �ipsetem "Intel Triton VX" a bios Award
verze 1.0
V�m �e je to u� muzeum, ale n�jak� �as to je�t� vyd�et mus�.

Jirka Filous

begin 600 WINMAIL.DAT
M>)\^(AH/`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($1I<VMY(';L=#_M(&YE/R X+#1'0(zv)"*" $%(zv) ,`#(zv)```,\'`(zv)`6`! `- `8
M``$`2P$!(( #``X```#/!P(`%(zv)`0`#,`, `!`&(!`0F `0`A````,#<U-S$Y
M,3 V,D-!1#(Q,3DS.34P,#(P048S0D0Y,4,`ZP8!`Y &`'0'```A````"P`"
M``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````
M0 `Y`! L`%=[7KX!'(zv)!P``$````:````4D4Z($1I<VMY(';L=#_M(&YE/R X
M+#1'0(zv)````(!<0`!````%(zv)````&^7GM6^Q 95PC*8A'2DY4`(*\[V1P``!X`
M'(zv)P!````!0```%--5% `````'(zv)`?# $````6````=FEK=&]R+FQO<W1A:T!C
M:&UI+F-Z`````P`&$,/5]H$#``<0L (``!X`"! !````90```$%,14M$15I%
M2T\L5$]314Y%355:15-4051*04I314U25D%,0DE/4UE$3U)56DY90TA$15-%
M2T%.24M$65-%3DE#3D535$%,3U8M+2TM+5#Y5D]$3NU:4%+A5D$M+2TM+4]$
M.D8``````(zv)$)$ $```!1! ``300``'<'``!,6D9U)F87B3<`"(zv)$#`?<(zv)`J<"
M`&-H`0K <V5T,"!483YH`W$"(zv)P!0`]0/-S(SJC(zv)``"H"X6$'(zv)" '$Z,"(zv) <3
M($-%`H,R$*=X<')Q$[$1/Q)/$U%]$PJ ",(zv)(zv).PEO,C4ULP* "H%U8P!0"P-C
M`$&!"V!N9S$P,S,+IE45X&P5T&L!`'H5T$L`+D\N+"!T;R!!#Y (zv);F5M=1O1
M<P$!D'0N($IA(&HA#Y!M(')V$Q%"25)/!K (zv)9!QP<ASP;HYY#U >L >096L(zv)
M':#/`P`;H!Z(zv)'))I8QRQ'3&3"0`=<%8N&D4R.1!R/PJQ"H0*A!GR`M$+PC$W
M$R*:$Z,Q-B*:;&DS9C8!0!10;W0%D 5 +8$FTE!<)V8Y=(zv)1P90N0)PF ('H4
M4">Q,?\>(";3(C8F9"8Q"Q,F9 (`8&DM,30T`4 E\#$<.# !0 S0*N-B($_4
M9#H,(zv)V(/P$8#$ A(zv)+00(zv)2(zv)"(zv))T X)[-;4R!-5% Z2BSD0&. <&]J+F-Z72(U
M3RP2!Y )4"A!;F\L5S(^,AUP)S$`< 6P': Q.6,R$#'P-3HS$[ O=DL5`W!U
M+%<G`0!L<&A!*L!L0&9W9"\A)^LO9R<B. F ;2>Q)J L5Z!213H(zv)1 0`:QZ(zv)
M&G8V(S\GLQS /R X\"PT1T(H[RGZ)?00(zv)_<,`2)-"H ^)L\GWSQ6+#5[!= *
MP'0+(zv)"S0`V ]HF,#'[ N!$923TY%2P! 6EI.4TQ!3O!9+D-:+U4_0C <,2_]
M,C$T,G :P#QE,S<S_S4%GSRP-:\L$#<./3 Y83(zv)5[TIA%= XJ3RP1#TR&W!+
M$JYI'& =,#^$5D; :SXR&SQ6/%8A3QP%T%5324$>4%E4(%52$T!.7D%(($%(zv)
M&_!!<$LW`%2"3E! 1$532U5/#O]/$TZ?5)]5KU:_4M]3[UGOEUK_5_].AU0>
MH&)Y!"![%<$44&D]<0,1"X QD'(J:P5 8PD`=(zv)6092[Y7]IF=2\03AXB-0R3
M/['R4P6P<GD<0 = %= QT/L+,$IQ:5Y "/%+$CVR'?#.((zv))(zv)## ]0&0B'K$!
MD/YZ2N8!H!\R)H #H%[E(C3?'L (zv)XAVP/C(;D7EF<F'MTP&0'?!V<A\0=0,(zv)
M%%#^=CVD'F(;D": /B$%<%X0\V/Q+7)I:(zv)$`9 $]X![P_&MU'\$`P&.S%:!=
MT2(T'UW(zv)"V ;\R([8E9";VC_#'!+(4; 7D$<<!]Q;5$%H/]>$#XR'? <D383
M'+!?(zv)&O3NVM##Y!H%: %0!S 9$J1-RV4;T9B5DUR-'&44%1>+0'0&J <(zv)#%A
M96R0<+,/D1WA(DD",'$A5 40LQQ(zv)`Z!66&5P;B%I30!]%>!W"Q,B4E^0:E 5
MT#'V+CN&8E969)1PXQVP%=#/'&%PTUX0'/%U;6,D0(/<:F%-P6OQ=Y)A!" <
M8<]\X$IB2E%R\79Y8Z()X/\%0!S(zv)$0!T^6'\+5!?(!V(zv)%RSD(C07`0"$8 ``
M``,`$! ``````P`1$ `````#`( 0_____T `!S 0ZWE!>UZ^`4 `"# 0ZWE!
M>UZ^`0L``( (( 8``````, ```````!&``````.%`````````P`"(zv) (zv)(zv)!(zv)``
M````P ```````$8`````$(4````````#``6 "" &``````# ````````1(zv)``
M``!2A0``\ X``!X`)8 (( 8``````, ```````!&`````%2%```!````! ``
M`#(zv)N, `#`": "" &``````# ````````1(zv)`````!A0````````L`+X (( 8`
M`````, ```````!&``````Z%`````````P`P(zv) (zv)(zv)!(zv)``````P ```````$8`
M````$84````````#`#* "" &``````# ````````1(zv)`````8A0```````!X`
M08 (( 8``````, ```````!&`````#:%```!`````0`````````>`$* "" &
M``````# ````````1(zv)`````WA0```0````$`````````'(zv)!#(zv) (zv)(zv)!(zv)``````
MP ```````$8`````.(4```$````!`````````!X`/0`!````!0```%)%.B `
-`````P`--/TW``!FW(4`
`
end


Disky v�t�� ne� 8,4GB

[*] Tu�ek Roman <TucekR(zv)p15.mepnet(tec)cz> - 22.2.1999 17:00:00

disky vetsi nez 8GB musi podporovat BIOS
Mimochodem nekdo tady rikal ze pripojil 14GB diska pod Win95 to jelo
to klidne pojede ale je otazka zda muzes do tech oblasti nad 14GB zapisov=
at
:-D

tusim ze ta podpora je neco jako MOD INT13

Je zvlastni ze nekomu to neslo ani s EZDRIVEm...
TRT

----------
Od: Filous Ji=F8=ED
Komu: 'delphi-l(zv)fwd(tec)cz'
P=F8edm=ECt: Disky v=ECt=B9=ED ne=BE 8,4GB
Datum: 22. =FAnor 1999 8:52
Ahoj,

m=E1m takov=FD dotaz kter=FD sem asi nepat=F8=ED, ale mysl=EDm, =BEe je =
dost
aktu=E1ln=ED a bude
zaj=EDmat v=ECt=B9inu z v=E1s.
M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE 8,4GB =
?
J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce jak 8,4GB=
i
kdy=BE jsem pou=BEil
doporu=E8ovanou utilitu EZ-drive 9.09W
Disk jsem rozd=EClil na dv=EC partitions, 2GB 16bit FAT DOS a zbytek
32bit FAT pod Windows.

D=EDky za ka=BEdou radu.

Jirka Filous

Disky v�t?� ne? 8,4GB

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 22.2.1999 17:20:50

:-))
a ty pak vykupujes ty "funkcni" desky :-)))))

Mti.


-----P=F9vodn=ED zpr=E1va-----

>Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se
spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor
>!!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU
!!!!!!!!!!!!!!!!!!!!
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>
>Ty bys me privodil infarkt clovece.............fuj.
>
>
>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: Filous Ji=F8=ED [SMTP:JFilous(zv)cpoj(tec)cz]
>> Odesl=E1no: 22. =FAnora 1999 13:47
>> Komu: 'delphi-l(zv)fwd(tec)cz'
>> P=F8edm=ECt: RE: Disky v=ECt=B9=ED ne=BE 8,4GB
>>
>> > [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
>> > musel jsem si stahnout novou verzi BIOSu. Takze to taky
udelej.....
>> >
>> V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si na=
instalovat
>> jakoukoli novou
>> verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.
>>
>> Jirka Filous
>
>

DDE

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 22.2.1999 17:36:03

Omlouvam se, ze moje odpoved neni odpovedi,
ale neni jednodussi pouzit misto prekonane technologie DDE technologii CO=
M?

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: David Adamec <adamecd(zv)vs.xion(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: DDE
> Datum: 22. =FAnora 1999 9:24
>=20
> Ahoj
> mam problem ohledne dde.
> Vim, ze muzu prenaset nejaky text z DDE clienta na DDE servr pomoci
> pokedata, popripade execmacro,... , ale nevim jak dostat nejaky text=20
> ze serveru na clienta?

Vlastnost

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 22.2.1999 17:48:03

Da se nejak zjistit, zda dany object ma urcitou vlasnost?
(Delphi 1)

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

Konverze pointeru z flat modelu na seg:ofs

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 22.2.1999 17:50:53

Takto se to proste delat neda, pamet je ve Win32 organizovana jinak.
K datove komunikaci lze pouzit WM_COPYDATA, mapovane soubory, ...
(viz tez kurz Win32 API)

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: Petr Fejfar <callnet(zv)telecom(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Konverze pointeru z flat modelu na seg:ofs
> Datum: 20. =FAnora 1999 16:18
>=20
> Hi all,
>=20
> nemuzu prijit na to, jak predat globalni pamet z 32-bitove aplikace apl=
ikaci
> 16-bitove.
>=20
> 1. V 32-bitove aplikaci delam nasledujici:
>=20
> FGMemHandle :=3D GlobalAlloc(GMEM_SHARE,FGMemSize);
> ...
> ...
> FGMemBuffer :=3D GlobalLock(FGMemHandle);
> try
> ...
> SendMessage(Win16handle,WM_xxxxx,wParam,dword(FGMemBuffer));
> finally
> GlobalUnlock(FGMemHandle);
> end;
>=20
> 2. WndProc() v 16-bitove aplikaci obdrzi spravnou hodnotu lParam, coz j=
e
> pointer ve flat modelu, ale jeho dereference vede samozrejme ke GPF. Ur=
cite
> nadeje jsem vkladal do funkce UTLinearToSelectorOffset() z WIN32S16.DLL=
,
> ale ta vraci NIL.
>=20
>=20
> Nedokazal by mi, pls, nekdo poradit, jak se to dela?
>=20
>=20
> Thanx, pf
>=20
>=20

Vlastnost

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 22.2.1999 17:56:07


Lze zjistit published property (seznam, typ i hodnoty) pres RTTI.
Najdes v helpu pod run-time type information a $M direktivou
prekladace.

From: Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk>

>Da se nejak zjistit, zda dany object ma urcitou vlasnost?
>(Delphi 1)

Zakazani pohybu okna

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

Tuto zpravu osetruje i komponenta FormStorage z RX, kde to lze jednoduse
nastavit a i zakazat pohyb okna. Jinak lze pohyb okna zakazat i tim, ze
se
ze systemmenu odstrani polozka Presunout. Je to divny ale funguje to...
D.
> ----------
> Od: Standa Cerny[SMTP:s.cerny(zv)mod(tec)cz]
> Odesl=E1no: 16. =FAnora 1999 22:20
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: Zakazani pohybu okna
>=20
> Hi
> ja to resil touto procedurou.
> Okno nejde vice zmensit a zvetsit na vysku.
> Jde to pouzit ruzne.
>=20
> public
>=20
> procedure GetMinMax (var MinMaxMessage: TWMGetMinMaxInfo);
> message wm_GetMinMaxInfo;
>=20
>=20
>=20
> procedure TForm1.GetMinMax (var MinMaxMessage:TWMGetMinMaxInfo);
> Begin
> with MinMaxMessage.MinMaxInfo^ do
> Begin
> ptMinTrackSize.x :=3D 640;
> ptMinTrackSize.y :=3D 100;
> ptMaxTrackSize.x :=3D GetSystemMetrics(SM_CXFULLSCREEN);
> ptMaxTrackSize.y :=3D 100;
>=20
> end;
>=20
> end;
>=20
> Standa Cerny
>=20
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 15. =FAnora 1999 9:11
> P=F8edm=ECt: Zakazani pohybu okna
>=20
>=20
> Preji vsem pekneho dne,
>=20
> lze nejakym (pokud ano, pak jakym) zpusobem zakazat hejbat s oknem?
>=20
> Diky
>=20
> Slavek
>=20
> ----------------------------------------------------------------------
> ------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------------------------------
> ------
>=20
>=20

Clipboard

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 22.2.1999 18:22:53

Delphi 1:
Jak se implementuje menu Edit (Cut-Copy-Paste)?
Vim, ze existujou fce CutToClipboard, ....
Ale vezmeme pripad, kdy user vybere z menu
prikaz CUT a na click dostanu
parametr Sender. Co je to za parametr?
A ActiveControl je tehdy co (myslel jsem ,
ze prvek, ktery mel focus pred vstupem do menu,
ale zkousel jsem to pretypovat a neni to tak)?

A jak se da vubec nejak ze Sendera zjistit
co je to za objekt, kdyz nema ani name vlastnost.

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

Import DLL pri prenosu projektu Delphi pod C++ Bui

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 22.2.1999 18:28:46

Nevim, jestli bude moje odpoved dostacujici, ale v uvedenem prikladu rozh=
odne chybi klauzule "stdcall" a "export" a za deklalaci funkce a "exports=
" na zaver (viz)

library XXXXX;

function STBitem(aSTBX:word): string; stdcall export;=20

exports STBitem;

end.

unit uXXXXX;

function STBitem(aSTBX:word): string; stdcall;=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: Petr Fejfar <callnet(zv)telecom(tec)cz>
> Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
> P=F8edm=ECt: Import DLL pri prenosu projektu Delphi pod C++ Builder
> Datum: 21. =FAnora 1999 23:58
>=20
> Hi,
>=20
> zkousim prenest existujici projekt v Delphi pod C++ Builder a narazil j=
sem
> na problem pri linkovani funkci, ktere jsou v DLL a ke kterym pouzivam
> puvodni pascalsky interface, tj. napr:
>=20
> unit XXXXX;
>=20
> INTERFACE
>=20
> const : SSSS: set of char =3D ['A'..'Z'];
>=20
> function STBitem(aSTBX:word): string; far;
>=20
> IMPLEMENTATION
>=20
> const DDDDD =3D 'dddddd.dll';
>=20
> function STBitem; external DDDDD name 'STBITEM';
>=20
> end.
>=20
> Linker hlasi "Unresolved external 'STBITEM' referenced from ....." a zm=
ena
> STBitem na upper case nepomaha. Navic, kdyz si necham generovat detaile=
d
> map, tak konstanta SSSS se mi v nem objevi, ale STBitem tam mezi public
> symboly neni.
>=20
> Mohl by mi nekdo pls poradit, jak se takova DLL prenasi? Musim k ni nap=
sat
> interface v C++, nebo existuje zpusob, jak BPB prinutit, aby pouzil
> pascalsky?
>=20
>=20
> Thanx, pf
>=20
>

Pretahnuti souboru z jine aplikace

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 22.2.1999 18:30:12

Dela se to cele pres COM.
Pokud se nemylim, predvadi Vlada Bodecek neco podobneho na kurzu "COM/DCO=
M" resp. "Win32API".
Neni to jednoduche.

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 ho =
do
> do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to bu=
de
> stacit...
>=20
> Dekuji
> Medusa

Disky =?iso-8859-2?Q?v=ECt=B9=ED=20ne=BE?= 8,4GB

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 22.2.1999 18:35:30

Mam tu 13GB WD :

1GB FAT
4GB NTFS
5GB NTFS
2GB FAT

Prvni partition vytvorena pomoci EZ-drive 9.09W a na te mam nainstalovane=
W9x
a ty zbyvajici partition jsem udelal pomoci NT, ale tusim to umel i EZ-Dr=
ive.

Pokud ti to nejde, tak to mozna nepodporuje BIOS tve desky - castecne se =
to da
resit zapnutim EZ-BIOS (nebo jak se to jmenuje v tom EzDrive - tusim v me=
nu
Advance.

Mac

Filous Ji=F8=ED wrote:

> M=E1 n=ECkdo zku=B9enosti s instalac=ED disku v=ECt=B9=EDho ne=BE=
8,4GB ?
> J=E1 jsem to zkou=B9el, ale nedostal jsem z po=E8itadla v=EDce =
jak 8,4GB i
> kdy=BE jsem pou=BEil
> doporu=E8ovanou utilitu EZ-drive 9.09W

--
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=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

MS SQL 7 + ulozene procedury

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 22.2.1999 18:37:34

Ahoj vsichni

Pokud v MS SQL7 spoustim ulozenou procedure sp_tables , tak vidim
jen 2 sloupce, ale melo by jich tam byt kolem 6.
To se tyka vetsiny systemovych ulozenych procedur.

dalsi podivnost:

Pokud udelam

select * from sysobjects,

tak mi to taky neukaze nejake sloupce, nap. nevidim Name, ale
pokud udelam

select convert(varchar(30),name) as name,* from sysobjects

tak uz to jede. Neexistuje nejaky podobny postup i pro sp_tables apod ?

Jsem pripojeny pres BDE->ODBC
V MS SQL 6.5 vsechno fungovalo.

Radim Kunz

Generate Run-time Error

[*] RAZIIARS <arbet(zv)fred.utc.sk> - 22.2.1999 19:14:55

On Sun, 21 Feb 1999, Slavek Rydval okrem ineho wrote:

> procedure RunError [ ( Errorcode: Byte ) ];
>

Hi.

Vdaka za info. Uz to pada jedna basen.

Bye. RAZIIARS of Aqabin
(also known as Peter Arbet)

e-mail:
arbet(zv)fred.utc.sk
arbet(zv)px.psg.sk

ping. This message is using Microsoft Outlook inteligent text wrap


Vybaleni primo do pameti

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 22.2.1999 19:23:44

Puvodni zprava, kterou napsal Mirek Junek dne 22 Feb 99,:

> Pakovat kus pameti do ZIPu a zase zpet do pameti umi Dynazip od firmy
> Inner Media inc od verze 3.0 vyse

No, ja umim take pakovat pamet a zase do pameti, ale do normalni
pameti. Neumim ale to, co bych chtel - zapakovat EXE a pak ho
vyndat primo do pameti a SPUSTIT primo v te pameti.


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


qreport

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 22.2.1999 20:07:28

Puvodni zprava, kterou napsal Martin dne 22 Feb 99,:

> chcel by so do jednej zostavy pomocou Qreport vytlacit dve tabulky z dvoch
> sql vyrazov. Potrebujem aby to bolo na jednom papiery, takze aby to bola
> jedna zostava. Ako by sa to dalo urobit ? Uz sa nad tym trapim 2 dni ale
> nejak to nemozem rozchodit. Je to v Delphi 2.

Zkousel jsi Composite Report?


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


DDE

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 22.2.1999 21:13:29

Tak si zkus srovnat rychlost.

-----P�vodn� zpr�va-----
Od: Jan �ebel�k <honza(zv)haes(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. �nora 1999 20:25
P�edm�t: Re: DDE


Omlouvam se, ze moje odpoved neni odpovedi,
ale neni jednodussi pouzit misto prekonane technologie DDE technologii
COM?

Honza
==============================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
==============================
----------
> Odes�latel: David Adamec <adamecd(zv)vs.xion(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: DDE
> Datum: 22. �nora 1999 9:24
>
> Ahoj
> mam problem ohledne dde.
> Vim, ze muzu prenaset nejaky text z DDE clienta na DDE servr pomoci
> pokedata, popripade execmacro,... , ale nevim jak dostat nejaky text
> ze serveru na clienta?

Pretahnuti souboru z jine aplikace

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 22.2.1999 21:18:03

Staci napsat objekt, ktery implementuje rozhrani IDropTarget (viz. OLE
Programmer's reference) a pak zavolat funkci registerDragDrop
(handeOkna, lpIDropTarget). Doporucuji pred uzavrenim okna zavolat
revokeDragDrop. Docela jednoduche; o cosi slozitejsi je napsat
drag-source (tedy daleko slozitejsi).

Ondrej Krajicek

-----P�vodn� zpr�va-----
Od: Jan �ebel�k <honza(zv)haes(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Kopie: David Arthur Mu��tko <Arthur(zv)helpsoft(tec)cz>
Datum: 22. �nora 1999 20:41
P�edm�t: Re: Pretahnuti souboru z jine aplikace


Dela se to cele pres COM.
Pokud se nemylim, predvadi Vlada Bodecek neco podobneho na kurzu
"COM/DCOM" resp. "Win32API".
Neni to jednoduche.

Honza
==============================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
==============================
----------
> Odes�latel: Medusa <medusa(zv)brajan(tec)cz>
> Komu: Konference DELPHI <delphi-l(zv)fwd(tec)cz>
> P�edm�t:
> Datum: 21. �nora 1999 23:58
>
> Ahoj,
>
> Opet jeden dotazik...
>
> Poreboval bych poradit a nebo priklad, kterej resi pretahnuti
souboru
> (ikony, ...) z jine aplikace
> nebo exploreru na muj form...
>
> Trebas: Mam tMemo a chci abych mohl chytit soubor z plochy a pustit
ho do
> do Memo a on se nacte.... Ze jednoduche? :-(( Ale jako priklad mi to
bude
> stacit...
>
> Dekuji
> Medusa

Vybaleni primo do pameti

[*] Jaro <jaro(zv)sinea(tec)cz> - 22.2.1999 22:23:29

Jo to by se mi take moc libilo - stahovat male "exacky" po internetu a ih=
ned
je spoustet rozbalen=EDm do pameti.
Jaro

Puvodni zprava, kterou napsal Mirek Junek dne 22 Feb 99,:

> Pakovat kus pameti do ZIPu a zase zpet do pameti umi Dynazip od firmy
> Inner Media inc od verze 3.0 vyse

No, ja umim take pakovat pamet a zase do pameti, ale do normalni
pameti. Neumim ale to, co bych chtel - zapakovat EXE a pak ho
vyndat primo do pameti a SPUSTIT primo v te pameti.


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

SINEA a BLOB

[*] Jaro <jaro(zv)sinea(tec)cz> - 22.2.1999 22:35:39

S Demo verzi to nesouvisi. Demo pracuje jako ostra verze,
pouze pri vystupu na tiskarnu "pokazi" vystup napisem DEMO .....
(mimo jine toho lze elegantne vyuzit pro vyrobu vlastnich demicek)

Problem asi bude s natypovanim toho blobu.
Zalezi na tom, co je zdrojem dat a jek je definovano pole.
Presne stejny problem se vyskytne napr. kdyz na Interbazi zadam
Text1 BLOB SUB_TYPE 1 namisto SUB_TYPE 0
Pole musi byt definovano jako Binary nebo Graphic, jinak se generator
domniva, ze se jedna o textovou polozku.
Toto ovsem neni chyba generatoru. Generator si nejdrive otestuje o jake
pole se jedna a podle toho s nim pak zachazi.
Pritom do pole SUB_TYPE 1 lze obrazek take ulozit (jen do urcite velikost=
i)
a normalne se zobrazi v DBImage, ele generator si na tom vylame zuby.
Jaro

-----P=F9vodn=ED zpr=E1va-----
Od: sup(zv)svitap(tec)cz <sup(zv)svitap(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. =FAnora 1999 16:32
P=F8edm=ECt: SINEA a BLOB


>Mam demo SINEA tiskoveho generatoru pro DELPHI3 a nedari se mi zobrazit
>obsah BLOBu z pdx tabulky. Misto obsahu se mi stale zobrazuje (BLOB). V
>helpu je:
>
>V t=E9to verzi knihovny je mo=BEn=E9 tisknout n=E1sleduj=EDc=ED typy pol=
o=BEek:
>
>polo=BEky jejich=BE hodnotu lze zobrazit jako jednoduchou textovou polo=BE=
ku
>
>v=EDce=F8=E1dkov=E9 Memo polo=BEky
>
>objekty typu BLOB
>
>Je to tim, ze je to demo?
>
>Jaroslav Weiss
>odd. informatiky
>
>SVITAP J.H.J. s.r.o.
>Kijevska 6-8
>SVITAVY
>568 02
>
>tel: ++420-461-568 202
>fax: ++420-461-568 300
>E-mail: sup(zv)svitap(tec)cz
>URL: www.svitap(tec)cz
>FTP: ftp.svitap(tec)cz
>

Off topic:IS 211

[*] Honza Fiala <fala(zv)imc(tec)cz> - 22.2.1999 22:59:09

Zdarte,
me marne pokusy s Install shieldem dodavanym s delphi se dostaly do faze
nepouzitelnosti. Tedka zkousim IS211 a mam porad stejne problemy s BDE.
Muzete mi prosim poslat vsechny soubory, ktere by mohly mit neco spolecneho
s korektnim vytvorenim instalacni diskety vcetne BDE a pripadnych aliasu?
Ja uz fakt neverim, ze bych dosel k PC, strcil tam diskety a muj progam by
fungoval.
Marne zkousim vytvorit instalacni disketu s pouhym FUNKCNIM BDE.
Velice by mi pomohlo URL s instalacnimi disketami BDE.

Za jakoukoliv zpravu predem dekuji

Honza Fiala


chyba pri instalaci RX 2.6

[*] Standa Cerny <s.cerny(zv)mod(tec)cz> - 22.2.1999 23:36:27

Ahojte,
pri instalaci komponent RX 2.6 (balicek Rxdb.dpk)
mi Delphi 3 hlasi v souboru DBUtils.pas internal error
URW376. U ostatnich balicku je to v pohode.
Nevite cim to je?

Standa Cerny.

COM - p�enos dat

[*] Jan P�ni�ka PENDAsoft <PENDAsoft(zv)usa(tec)net> - 23.2.1999 01:18:35

Poradi mi nekdo jak u COM objektu vyresit prenos bytoveho pole ruzne
velikosti? Pro normalni t=F8=EDdy lze pouzit system: netypovy pointer a v=
elikost
pole na ktere ukazuje. Jenze to to reseni u COM objektu nelze pouzit,
existuje nejaky jednoduchy zpusob jak prenest vetsi mnozstvi dat z COM
objektu do aplikace, ktera ma Interface na dany objekt.
---
JAN PENICKA student of Technical University of Liberec
Jan.Penicka(zv)usa.net
PENDAsoft(zv)usa.net


Dobra rada nad zlato !!

[*] Ing. Karel Chramosil <Karel.Chramosil(zv)iol(tec)cz> - 23.2.1999 03:22:54

Dobr� den

Nev�te n�kdo jak se opojit(p�ipojit) z diskusn� skupiny. Nev�m pro�, ale nemohu se p�ipojit na str�nku www.delphi(tec)cz.

D�ky
Karel Chramosil

CreateTable v D4

[*] Jan Fiala <fiala(zv)infos(tec)cz> - 23.2.1999 06:02:59

> Potrebuji za behu prg. vytvorit DBase tabulku.
>Delam to v D4 SP2.
>V BDE Databases mam MY STANDARD DBF :
> Type STANDARD
> Default driver DBASE
> Enable BCD TRUE
> Path C:\Programy\NECO
>
>Na formu Table1 Active=3DFalse, TableName nevyplnene, TableType ttDBas=
e,
>DatabaseName MY STANDARD DBF.
>
>Pri aktivaci formu:
>with Table1 do
> begin
> TableType:=3DttDBase;
> TableName:=3D'Data1993.DBF';
> with FieldDefs do
> begin
> Clear;
> Add('F1',ftString, 50,False);
> Add('F2',ftDate, 0,True);
> Add('F3',ftSmallInt, 0,False);
> end;
> CreateTable;
> Open;
> end;
>
>Problem je v tom, ze mi nechce vytvorit tabulku DBase, ale neustale mi c=
pe
>Paradox, nebo Acces, nebo co to je.Zkousel jsem to jeste na D2 a tam to
jelo
>v pohode. I s TableType ttDefault si pekne precetl extenzi z TableName a
>vytvoril Dbase tabulku, ale D4 se nechce kamaradit :-((
>Nevite v cem delam chybu?
>


Chybu delas zrejme ve verzi dBase nastavene v BDE v nativnim ovladaci.
Podivej se, jestli tam mas skutecne 4 a ne 7. On format dBase 7 je uplne =
o
necem jinem.

-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa=E8n=ED system pro n=E1poj=E1=F8e
-----------------------------------------------------------------

qreport

[*] Martin <geoplan(zv)pp.sinet.sk> - 23.2.1999 06:37:50

V delphi 2 sa mi to nepodarilo najst.


-----P=F4vodn=E1 spr=E1va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D=E1tum: 22. febru=E1r 1999 20:45
Predmet: Re: qreport


Puvodni zprava, kterou napsal Martin dne 22 Feb 99,:

> chcel by so do jednej zostavy pomocou Qreport vytlacit dve tabulky z dv=
och
> sql vyrazov. Potrebujem aby to bolo na jednom papiery, takze aby to bol=
a
> jedna zostava. Ako by sa to dalo urobit ? Uz sa nad tym trapim 2 dni al=
e
> nejak to nemozem rozchodit. Je to v Delphi 2.

Zkousel jsi Composite Report?


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


Pouzivate Decision cube?

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.2.1999 07:10:39

Milan Nemec wrote:

> chtel jsem se zeptat, jestli pouzivate Decision cube
> a jestli mate s temito komponentami nejake zaporne
> zkusenosti.
> Jestli tam neni nejakej zadrhel.
> Jak se chovaji pri vetsich databazich (cca desetitisice
> zaznamu), jsou dostatecne rychle i pri techto databazich?
> (Dostatecne rychle = aby nejaka akce NETRVALA 10 minut.)

S oblibou predvadim na skoleni D4 tento kousek: naskladam do
formulare komponenty, vlozim nejaky select, otevru DCube,
vychvalim pekny napad a provedeni, zavru DCube, pak zavru Delphi
- a - bouch bac, leti do kouta. :-)))


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

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 23.2.1999 07:19:47

> Ahoj vsichni
>
> Pokud v MS SQL7 spoustim ulozenou procedure sp_tables , tak vidim
> jen 2 sloupce, ale melo by jich tam byt kolem 6.
> To se tyka vetsiny systemovych ulozenych procedur.
>
> dalsi podivnost:
>
> Pokud udelam
>
> select * from sysobjects,
>
> tak mi to taky neukaze nejake sloupce, nap. nevidim Name, ale
> pokud udelam
>
> select convert(varchar(30),name) as name,* from sysobjects
>
> tak uz to jede. Neexistuje nejaky podobny postup i pro
> sp_tables apod ?
>
> Jsem pripojeny pres BDE->ODBC
> V MS SQL 6.5 vsechno fungovalo.

Mas ostrou verzi SQL Serveru? 7.0 Beta se chovala v urcitych
smerech jako verze 6.5 a po prechodu na ostrou mi
zacaly problemy.
To jsem mel nativni driver a presel jsem na ODBC.
Soucasna konfigurace mi funguje:
ODBC SQL Server - verze 3.70.06.23
BDE - verze 5.01

Systemove procedury jsem nezkousel, ale moje procedura,
ktera vraci dataset, funguje dobre. Problemy jsem mel
s predchozim driverem ODBC (asi byl z Bety),
ten nedokazal spustit proceduru jineho vlastnika
nez prihlaseny uzivatel. Rikal, ze takova procedura neexistuje.
To ti jede?
Taky neumel "SELECT USER"
To ti jede?

Problemy mam ale taky, rad bych je konzultoval

aplikaci jsem zatim testoval na trech pocitacich,
dva maji WinNT a jeden W95.
Vsechny tri pocitace maji vyse popsane verze driveru
a BDE, na jednom z tech WinNT mam problem. (Ted nevim
presne jaky, protoze jsem problemy resil vcera a nevim,
ktery z nich se mi nepodarilo odstranit. Mam pocit, ze to je
predavani parametru typu datetime v TQuery -
MS SQL rve, ze se spatne kovertuje z typu string).

Tohle posilam do konference, aby se mohl pridat taky
nekdo, kdo ma podobne problemy a snazi se rozchodit
spojeni Delphi 4 - MS SQL 7.0. Navrhuji vsak
psat si primo, protoze problemu je mnoho a provoz bude
asi frekventovany.
Budeme spolupracovat?

Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

Pouzivate Decision cube?

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 23.2.1999 07:46:26

> Ahojte vseci,
>
> chtel jsem se zeptat, jestli pouzivate Decision cube
> a jestli mate s temito komponentami nejake zaporne
> zkusenosti.
> Jestli tam neni nejakej zadrhel.
> Jak se chovaji pri vetsich databazich (cca desetitisice
> zaznamu), jsou dostatecne rychle i pri techto databazich?
> (Dostatecne rychle = aby nejaka akce NETRVALA 10 minut.)

Zkusenosti spatne.
Potreboval jsem ji jen jednou a neuspel. Nechtela
mi vzit select, ktery TQuery normalne brala a zobrazila.

K te rychlosti - Decision cube nemuze zobrazovat
nacitana data postupne - musi nejprve nacist
VSECHNY zaznamy, ze kterych ma pocitat prehledy.
Nezalezi na velikosti databaze, ale na poctu
vybranych zaznamu, na rychlosti DB serveru a site.

Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

PVCS a spol

[*] Leos Urban <Leos.Urban(zv)aitix(tec)cz> - 23.2.1999 07:52:02

Mate nekdo zkusenosti s pouzitim systemu pro rizeni verzi a projektu (napr.
PVCS) ve spolupraci s Delphi?
Leos

CreateTable v D4

[*] Petr S <p.sadovsky(zv)atlas(tec)cz> - 23.2.1999 07:58:48


Petr
p.sadovsky(zv)atlas(tec)cz
-----P=F9vodn=ED zpr=E1va-----
Od: Jan Fiala <fiala(zv)infos(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. =FAnora 1999 6:13
P=F8edm=ECt: Re: CreateTable v D4


>> Potrebuji za behu prg. vytvorit DBase tabulku.
>>Delam to v D4 SP2.
>>V BDE Databases mam MY STANDARD DBF :
>> Type STANDARD
>> Default driver DBASE
>> Enable BCD TRUE
>> Path C:\Programy\NECO
>>
>>Na formu Table1 Active=3DFalse, TableName nevyplnene, TableType ttDBa=
se,
>>DatabaseName MY STANDARD DBF.
>>
>>Pri aktivaci formu:
>>with Table1 do
>> begin
>> TableType:=3DttDBase;
>> TableName:=3D'Data1993.DBF';
>> with FieldDefs do
>> begin
>> Clear;
>> Add('F1',ftString, 50,False);
>> Add('F2',ftDate, 0,True); Tady jsem hodil Add('F2',ftDate, 0,False); a mam tabulku DBase. Mol by =
mi
prosim, nekdo vysvetlit, k cemu ten parametr Required:Boolean je, kdyz de=
la
takovy veci ?

>> Add('F3',ftSmallInt, 0,False);
>> end;
>> CreateTable;
>> Open;
>> end;
>>
>>Problem je v tom, ze mi nechce vytvorit tabulku DBase, ale neustale mi =
cpe
>>Paradox, nebo Acces, nebo co to je.Zkousel jsem to jeste na D2 a tam to
>jelo
>>v pohode. I s TableType ttDefault si pekne precetl extenzi z TableName =
a
>>vytvoril Dbase tabulku, ale D4 se nechce kamaradit :-((
>>Nevite v cem delam chybu?
>>
>
>
>Chybu delas zrejme ve verzi dBase nastavene v BDE v nativnim ovladaci.
>Podivej se, jestli tam mas skutecne 4 a ne 7. On format dBase 7 je uplne=
o
>necem jinem.


Diky.
Na to se jeste podivam, i kdyz se mi to uz povedlo.

>-----------------------------------------------------------------
>ing. Jan Fiala jan.fiala(zv)iname.com
>Prog-Soft s.r.o.
>INFOS - informa=E8n=ED system pro n=E1poj=E1=F8e
>-----------------------------------------------------------------
>
>

Clipboard

[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 23.2.1999 08:02:26


vetsinou to takhle nejak pouzivam: (Delphi 3 & MDI Application)

procedure TEV.CutItemClick(Sender: TObject);
begin
{cut selection to clipboard}

if ActiveMDIChild.ActiveControl is TCustomEdit then
begin
TCustomEdit(ActiveMDIChild.ActiveControl).CutToClipboard;
end;

end;


M.

-----P=F9vodn=ED zpr=E1va-----
Od: Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 23. =FAnora 1999 7:13
P=F8edm=ECt: Clipboard


>Delphi 1:
>Jak se implementuje menu Edit (Cut-Copy-Paste)?
>Vim, ze existujou fce CutToClipboard, ....
>Ale vezmeme pripad, kdy user vybere z menu
>prikaz CUT a na click dostanu
>parametr Sender. Co je to za parametr?
>A ActiveControl je tehdy co (myslel jsem ,
=2E
=2E
=2E

chyba pri instalaci RX 2.6

[*] SICHTA Daniel <Sichta(zv)asset.sk> - 23.2.1999 08:05:24

Toto nemam z vlastnej hlavy. Mal som rovnaky problem a pomohlo to !!!!

V unite DB nahrad riadok
ftBlobTypes =3D [Low(TBlobType)..High(TBlobType)]
riadkom
ftBlobTypes =3D [ftBlob..ftGraphic]

Ing. Daniel =8Aichta
) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk>=20


-----Original Message-----
From: Standa Cerny [SMTP:s.cerny(zv)mod(tec)cz]
Sent: 22. febru=E1r 1999 23:36
To: konference
Subject: chyba pri instalaci RX 2.6

Ahojte,
pri instalaci komponent RX 2.6 (balicek Rxdb.dpk)=20
mi Delphi 3 hlasi v souboru DBUtils.pas internal error=20
URW376. U ostatnich balicku je to v pohode.
Nevite cim to je?

Standa Cerny.
=20

Dlouha jmena souboru a BP7

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 23.2.1999 08:05:37

> nevite nekdo, jak na subj. ?
> Vaclav Sazima

Windows95 sa u aplikacii v realnom mode tvaria ako DOS verzia 7.
Podpora dlhych mien je zabezpecena volanim int 21h - sluzba 71h.
Pri vstupe je AH=71h, AL udava prislusnu funkciu:
AH = 71h
AL = function
0Dh reset drive
39h create directory
3Ah remove directory
3Bh set current directory
41h delete file
43h get/set file attributes
47h get current directory
4Eh find first file
4Fh find next file
56h move (rename) file
60h truename
6Ch create/open file
A0h get volume information
A1h terminate FindFirst/FindNext
A6h get file information
A7h time conversion
A8h generate short filename
A9h server create/open file
AAh create/terminate

Return: CF set on error
AX = error code
7100h if function not supported
CF clear if successful
other registers as for corresponding "old" DOS function

---------------------------------------------------------------
Ak by si o tom chcel vediet nieco viac, mozem ti poslat
prislusnu pasaz z Interrupt Listu Ralfa Browna, pripadne
si pozri http://www.cs.cmu.edu/afs/cs/user/ralf/pub/WWW/

Peter Vlkovic
---------------------------------------------------------------

Disky v�t?� ne? 8,4GB

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

Ale co by, co tu porad toho ubozaka tak strasis. At tam napere BIOS jaky se
mu libi, ja to delam zrovna tak. Asi tak ve dvou pripadech ze tri to jede
at uz je to jakykoli BIOS do jakekoli desky. A kdyz ne, tak tam das zpatky
ten stary a jsi tam, kdes byl. Ale ze bych neco znicil... Viktor



-----P�vodn� zpr�va-----
Od: Martin Tichacek [SMTP:martin_t(zv)mrp(tec)cz]
Odesl�no: 22. �nora 1999 17:21
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Disky v�t?� ne? 8,4GB

:-))
a ty pak vykupujes ty "funkcni" desky :-)))))

Mti.


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

>Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se
spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor
>!!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU
!!!!!!!!!!!!!!!!!!!!
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>
>Ty bys me privodil infarkt clovece.............fuj.
>
>
>Martin Fron�k
>ZZN Slan� a.s.
>Pra�sk� 1579, 274 49, Slan�
>tel. +420-314-522986
>e-mail: fronek(zv)zznslany(tec)cz
>
>> -----P�vodn� zpr�va-----
>> Od: Filous Ji�� [SMTP:JFilous(zv)cpoj(tec)cz]
>> Odesl�no: 22. �nora 1999 13:47
>> Komu: 'delphi-l(zv)fwd(tec)cz'
>> P�edm�t: RE: Disky v�t�� ne� 8,4GB
>>
>> > [Martin Fron�k] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
>> > musel jsem si stahnout novou verzi BIOSu. Takze to taky
udelej.....
>> >
>> V tom p��pad� m�m je�t� jeden mal� dotaz. M��u si nainstalovat
>> jakoukoli novou
>> verzi BIOSu Award, nebo mus� b�t ur�en� pro moj� desku.
>>
>> Jirka Filous
>
>

begin 600 WINMAIL.DAT
M>)\^(CL'`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($1I<VMY(';L=#_M(&YE/R X+#1'0(zv)"*" $%(zv) ,`#(zv)```,\'`(zv)`7``(zv)`!(zv)`Y
M``(`. $!(( #``X```#/!P(`%P`(``4`)0`"`",!`0F `0`A````,3)&0S<R
M035%1$-!1#(Q,3DS.38P,#(P048S0D0Y,4,`.(zv)<!`Y &`+P(```A````"P`"
M``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````
M0 `Y`* F!1K[7KX!'(zv)!P``$````:````4D4Z($1I<VMY(';L=#_M(&YE/R X
M+#1'0(zv)````(!<0`!````%(zv)````&^7OL9_Z5R_!/*[1'2DY8`(*\[V1P``!X`
M'(zv)P!````!0```%--5% `````'(zv)`?# $````6````=FEK=&]R+FQO<W1A:T!C
M:&UI+F-Z`````P`&$&)%C!P#``<0_(zv),``!X`"! !````90```$%,14-/0EDL
M0T]455!/4D%$5$](3U5"3UI!2T%404M35%)!4TE3051404U.05!%4D5"24]3
M2D%+65-%355,24))+$I!5$]$14Q!35I23U9.051!2T%3251!2U9%1%9/55!2
M25 ``````(zv)$)$ $```"<!0``F 4``$L)``!,6D9U>:JQ3 ,`"(zv)!R8W!G,3(U
M%P%#`30+8&X.$# R.4T!]R "IP(`8V(zv)*P'. 970P(%1A: -QCP*#`% #U!"W
M,C,X``#J*(zv)+A80> ( <3`H '$R(zv)(zv)0T4"(zv)S(2)W!RWG$5,1*_$\\4T7T*(zv) C(
M;" ["6\.,#4"(zv) J!=39C`% +`V,`00\$,S,;"Z878&P74 6(zv)(&)Y0BP=$G1U
M(' %L&%*9!VP;Q& ('4&X'H886MA'; >X"!S=',>$ "0<RX78 5 `9!M&B 7
M(' $D!=00DE/M07P:A[(zv)>1]0%U!M'=!P;&EB:1UP(2 >02#7`0`+8"! >(zv)-(zv)
M=A<(zv)'Q*7']$`D!\3=A=09'8(8.\=X 41'B %D&(zv)BX!=0'W!;(]$=,&H)(zv)!=0
M805 =>YZ)>$ELR$Q:P;P(] (zv)T]ID)N-E)T,!`',A0!_1D"!K9'DF(zv)&YE'7"[
M'R((zv)(F0?D"+(zv)"K!T(4&^= GP'U$*P"%0'P!J(\/>;1UP*3 'D1U0;!_1'/%?
M)5$=4"4A*8 =(7H#`&.%`Q N+E (zv)5FEK'E#^<AO%#V 1\(zv)JQ"H0*A!MR,P+1
M"\(Q-S :%2,Q-K,P&B'0,S8!0!70;RKP"F,%0"TT4E!<)V;J.21P9 N0)PF
M*G$NX/$U0#%V8313+[8SY#.Q!PL3,^0"`&DM,30TXP% (= Q.# !0 S0.&.(zv)
M8B!/9#H,(zv)V(10'I-"L!T"X 14 W(zv)$.!C`2A (%M33510.(zv),`P#J"7W1 ;7)P
M\"YC>ETOM3F2!Y )4,DUP6YO.=<R,A_0-+%C`' >`2 Q.3]P/U WK#HR+Z8Y
MD$L#<'4YUPDBD7!H.$!L0&9WKF0\(zv)3S'-*(X"8!M-3&#-" YUU)E.B!$! `U
M(4%V0V,_-3,I(zv)#\(zv)X#(zv)L-$="-F\W>C-TAQ(## $OPSHM*2DOM#TK(zv)70A4 JP
M)!$G,'5P#G4E\ 0(zv)2(zv)$B9G5NU&MC`P`B*)0(zv)23),8=4ONB!-<4TZD"XOO(zv)J
MMS1?-6\OR3X<XB)A=AZ(zv)SP60*7$#`"2A878J0"FA_R72)>$#H!\A(Q ?`!WP
M)##['A ?T$\]X")2$- $<"/0:Q$0+[1S'?!U'V D(zv)7+])G!N+6(HH2A 4W,"
M("/1]R/02G #8&(N(%/F'U4N=XU1E"%:[ 7055-)(,"(zv)650(zv)55(4P$XI$ A0
M4D] (zv)$].2U((151.7!!$15-+_E4OM%KM6N-:?V"_8<]BWW]?/%^/9=]F[V?_
M4851A53_(5 =4 0(zv)%T$DL4^Q`Q$+(zv)/T^\'(NL!T0"0`D,#L(zv)+E%[;!A+4&I-
MY6EV484Z9483`V!/XF-K485:6DY_!(zv)`/`4]Q'C!4\!_ 4850.QX03W Y*+%0
M<C]0-3>".1UP,C<T(#1R<4]P)E&%*O LL2LT`= MDC,X8"TU/I Y.#*EN#YE
M+0# `Q!$8" #4?$I(zv)&M >BWP/8 `<"C(zv)^T(V:78^-$]0'W?G.;%NT/,#$%:1
M($H`H$,!>5,[9.I*>U1 #?!O;0`\EWKCQSUX/H\_D3,Z-#%U>$'I0),(zv))T%M
M)W?G0NP'\/Y%1&QQD7&!17-QDD7:>$#K=^=X4%MN?EU-<'%(zv)6,"S'F!3845:
M*7%6(zv)7IJL/YE;0![L!\``, (zv)0 ] 1A#_(H!$D1UP<8"'""&(zv)$1 #(%TKL&4(zv)
M0"/!*S%H/>!UOP5 /> D<E3!B? (zv)PW4?T+T18&LE4AVA(3$OM'4BD6^*(6P2
MAOAWYU8>02! </][YB3A0V(AD'G2($ E\(4B_X414I$E\(zv).(zv)`, ]D7"!)^#U
M`9!Z']!->-)QDAW0(\'_%R +(zv)"LQ:[&4(7?V(2$(8-\G0XVS=^>.&1=(zv)=PL1
M'7#_*8 &X(PR>5,,,'!Q)E%YPO]#('E"<B ST2&0?7!Y4RBB_XZPAG][P&M(zv)
M'P![5&TO+^<%&($`H: #`! 0``````,`$1 "`````P" $/____] ``<P,+I-
MZOI>O(zv)% ``(zv)P,+I-ZOI>O(zv)$+``" "" &``````# ````````1(zv)`````#A0``
M``````,``H (( 8``````, ```````!&`````!"%`````````P`%(zv) (zv)(zv)!(zv)``
M````P ```````$8`````4H4``/ .```>`"6 "" &``````# ````````1(zv)``
M``!4A0```0````0````X+C ``P`F(zv) (zv)(zv)!(zv)``````P ```````$8``````84`
M```````+`"^ "" &``````# ````````1(zv)`````.A0````````,`,( (( 8`
M`````, ```````!&`````!&%`````````P`R(zv) (zv)(zv)!(zv)``````P ```````$8`
M````&(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``,F*%
`
end


Disky v�t?� ne? 8,4GB

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 23.2.1999 08:10:39

Ze by Viktor Cistic (BIOSu)???


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: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl=E1no: 22. =FAnora 1999 16:25
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Disky v=ECt?=ED ne? 8,4GB
>=20
> Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se
> spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor
>=20
>=20
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Martin Fron=ECk [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl=E1no: 22. =FAnora 1999 14:33
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P=F8edm=ECt: RE: Disky v=ECt?=ED ne? 8,4GB
>=20
> !!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU
> !!!!!!!!!!!!!!!!!!!!
> =09
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
> !!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>=20

COM - p�enos dat

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.2.1999 08:26:38

Haj hou!

Lze to udelat napr. pres Variant definovany jako pole bytu.
Podrobnosti najdes v helpu u variantu, varArrayLock,
varArrayCreate atd.

From: Jan P�ni�ka PENDAsoft <PENDAsoft(zv)usa.net>

Poradi mi nekdo jak u COM objektu vyresit prenos bytoveho pole
ruzne
velikosti? Pro normalni t��dy lze pouzit system: netypovy pointer
a velikost
pole na ktere ukazuje. Jenze to to reseni u COM objektu nelze
pouzit,
existuje nejaky jednoduchy zpusob jak prenest vetsi mnozstvi dat
z COM
objektu do aplikace, ktera ma Interface na dany objekt.

Pobosorovany ALT

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 23.2.1999 08:29:30

Ahojte !

Slak ma ide trafit, ako hovorieva Satinsky.
Ale najsamprv sorry za problem mierne OFF.
Pred casom som mal problem na W95-kach s klavesou ALT.
U niektorych aplikacii (MSVC, WinCommander, AmiPro...)
sposobovalo jej pouzitie kratkodobo znacne predlzenie
odozvy na prislusnu klavesu.
Toto oneskorenie bolo rozne od 1 do 5 i viac sekund,
v zavislosti od toho, ako dlho bol pred prislusnou klavesou
stlaceny samotny ALT.
Nepodarilo sa mi to odstranit (skusal som i preinstalovat
Windows), musel som maximalne skracovat drzanie samotneho
ALT-u, aby odozva bola co najmensia.
Po istej dobe to vsak samovolne prestalo (mozno v suvislosti
s instalovanim/deinstalovanim nejakeho programu).
Po polroku sa mi to ale objavilo znovu (a mam taky pocit,
ze v intenzivnejsej podobe), takze slak ma ide trafit...

Neviete mi prosim vas niekto poradit? Mam slabe srdce.
Diky.

Peter Vlkovic

COM - p�enos dat

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 23.2.1999 08:38:39

Funkce na strane COM serveru:

function GetBuffer(Buffer: Pointer; Size:Integer): OleVariant; safecall;
begin
Result:=3DVarArrayCreate([0,Size-1],varByte);
move(Buffer^,TVarData(Result).VArray.Data^,Size);
end;

Na klientovi to bude opacne.

Pozor:
Jde o jeden z mnoha praktickych prikladu z kurzu "Vicevrstve aplikace", u=
praveny jako odpoved na Tvuj dotaz.
V teto podobe jsem ho netestoval.

Honza Sebelik
=3D=3D=3D=3D=3D=3D=3D=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: Jan P=ECni=E8ka PENDAsoft <PENDAsoft(zv)usa.net>
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: COM - p=F8enos dat
> Datum: 23. =FAnora 1999 1:18
>=20
> Poradi mi nekdo jak u COM objektu vyresit prenos bytoveho pole ruzne
> velikosti? Pro normalni t=F8=EDdy lze pouzit system: netypovy pointer a=
velikost
> pole na ktere ukazuje. Jenze to to reseni u COM objektu nelze pouzit,
> existuje nejaky jednoduchy zpusob jak prenest vetsi mnozstvi dat z COM
> objektu do aplikace, ktera ma Interface na dany objekt.
> ---
> JAN PENICKA student of Technical University of Liberec
> Jan.Penicka(zv)usa.net
> PENDAsoft(zv)usa.net

COM - prenos dat

[*] Hynek svatos <svatos(zv)af(tec)czu(tec)cz> - 23.2.1999 08:48:20 met

> Poradi mi nekdo jak u COM objektu vyresit prenos bytoveho pole ruzne
> velikosti? Pro normalni tr=EDdy lze pouzit system: netypovy pointer a v=
elikost
> pole na ktere ukazuje. Jenze to to reseni u COM objektu nelze pouzit,
> existuje nejaky jednoduchy zpusob jak prenest vetsi mnozstvi dat z COM
> objektu do aplikace, ktera ma Interface na dany objekt.

Tipnu si: variantni pole ?

svatos(zv)af(tec)czu(tec)cz=20

DDE

[*] David Adamec <ADAMECD(zv)vs.xion(tec)cz> - 23.2.1999 08:48:46

Obavam se, ze o technologii COM nic nevim.

> Omlouvam se, ze moje odpoved neni odpovedi,
> ale neni jednodussi pouzit misto prekonane technologie DDE technologii COM?
>
> Honza
> ==============================
> = HAES - RNDr. Jan Sebelik
> = http://www.haes(tec)cz
> = Skolici stredisko pro Delphi a Win32
> = Vojtiskova 206
> = 507 81 Lazne Belohrad
> = tel. 0434 692 931
> ==============================
> ----------
> > Odesilatel: David Adamec <adamecd(zv)vs.xion(tec)cz>
> > Komu: delphi-l(zv)fwd(tec)cz
> > P^2edm+t: DDE
> > Datum: 22. unora 1999 9:24
> >
> > Ahoj
> > mam problem ohledne dde.
> > Vim, ze muzu prenaset nejaky text z DDE clienta na DDE servr pomoci
> > pokedata, popripade execmacro,... , ale nevim jak dostat nejaky text
> > ze serveru na clienta?
>

Jak ulozit dokument OLE

[*] roman.palarcik(zv)spt(tec)cz - 23.2.1999 08:56:24


Napsal jsem si takovy priklad:

procedure TForm1.Button1Click(Sender: TObject);
var
V: variant;
begin
V:=CreateOLEObject('InternetExplorer.Application');
V.Visible:=true;
V.Navigate('www.seznam(tec)cz');
end;

Explorer se pekne otevrel, nacetla se prislusna stranka. Ted ale
potrebuju, nactenou stranku ulozit a nevim jak. Na internetu jsem sice
neco nasel, ale ulozeni tam nebylo. Nevite nekdo jak na to? Kdyz si
takhle otevru treba Word, tak ulozeni neni problem, staci dat
V.SaveFile('aaa.doc'), ale u toho explorer nevim.

Roman Palarcik


Disky v�t?� ne? 8,4GB

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 23.2.1999 09:05:56

No dobra. Ok. Jsem najivka, ktery si mysli, ze do 2MBit se neda dostat
univerzalni BIOS pro jakekoliv pentium :-)))
V tom pripade se ale divim Abitakom, kteri maji pocmaranou stranku
seznamem biosu, kdyz vlastne staci jeden. Dobra. Delejte si kdo co
chcete. Ja si budu shanet BIOSy urcene ke konkretni desce, kdo chce,
at to nedela. :-)

Jenom vim, ze nekteri vyrobci to maji (alespon trochu) chranene.

Ano - zase na druhou stranu uz znam lidi, kteri si takhle stopli
desku. A protoze na to, aby se dal patchnout bios softwarove, musi jet
minimalne dotycna deska s flopacem (+monitor a par zbytecnosti :-),
museli jsme vyhledat nekoho, kdo je/byl schopen programovat flashky.

Mti.

-----P=F9vodn=ED zpr=E1va-----

>Ale co by, co tu porad toho ubozaka tak strasis. At tam napere BIOS
jaky se
>mu libi, ja to delam zrovna tak. Asi tak ve dvou pripadech ze tri to
jede
>at uz je to jakykoli BIOS do jakekoli desky. A kdyz ne, tak tam das
zpatky
>ten stary a jsi tam, kdes byl. Ale ze bych neco znicil... Viktor
>
>
>
>-----P=F9vodn=ED zpr=E1va-----
>Od: Martin Tichacek [SMTP:martin_t(zv)mrp(tec)cz]
>Odesl=E1no: 22. =FAnora 1999 17:21
>Komu: delphi-l(zv)fwd(tec)cz
>P=F8edm=ECt: Re: Disky v=ECt?=ED ne? 8,4GB
>
>:-))
> a ty pak vykupujes ty "funkcni" desky :-)))))
>
> Mti.
>
>
>-----P=F9vodn=ED zpr=E1va-----
>
>>Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se
>spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor
>>!!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU
>!!!!!!!!!!!!!!!!!!!!
>>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
>!!!
>>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>>
>>Ty bys me privodil infarkt clovece.............fuj.
>>
>>
>>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: Filous Ji=F8=ED [SMTP:JFilous(zv)cpoj(tec)cz]
>>> Odesl=E1no: 22. =FAnora 1999 13:47
>>> Komu: 'delphi-l(zv)fwd(tec)cz'
>>> P=F8edm=ECt: RE: Disky v=ECt=B9=ED ne=BE 8,4GB
>>>
>>> > [Martin Fron=ECk] Proboha, EZ nepouzivej. Ja mam 10GB disk, a
>>> > musel jsem si stahnout novou verzi BIOSu. Takze to taky
>udelej.....
>>> >
>>> V tom p=F8=EDpad=EC m=E1m je=B9t=EC jeden mal=FD dotaz. M=F9=BEu si n=
ainstalovat
>>> jakoukoli novou
>>> verzi BIOSu Award, nebo mus=ED b=FDt ur=E8en=E1 pro moj=ED desku.
>>>
>>> Jirka Filous
>>
>>
>
>

Nastavenie fontu

[*] Lubos <bruce(zv)pobox.sk> - 23.2.1999 09:18:47

> ... a kdyz ta aplikace spadne, tak bude mit uzivatel binec v rozhrani.
> Ondrej Krajicek

hm. to je fakt.
co teda robit ?

/LH

DDE

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 23.2.1999 09:23:50

Navrhni a posli testovaci priklad v DDE a muzeme to porovnat.

Obavam se, ze kdyz jsou COMu plne cele Windows (podivej se jenom do HKEY_=
CLASSES_ROOT\CLSID), my uz to nezachranime, budeme-li se tomu vyhybat.

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: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P=F8edm=ECt: Re: DDE
> Datum: 22. =FAnora 1999 21:13
>=20
> Tak si zkus srovnat rychlost.
>=20
> -----P=F9vodn=ED zpr=E1va-----
> Od: Jan =8Aebel=EDk <honza(zv)haes(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 22. =FAnora 1999 20:25
> P=F8edm=ECt: Re: DDE
>=20
>=20
> Omlouvam se, ze moje odpoved neni odpovedi,
> ale neni jednodussi pouzit misto prekonane technologie DDE technologii
> COM?
>=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: David Adamec <adamecd(zv)vs.xion(tec)cz>
> > Komu: delphi-l(zv)fwd(tec)cz
> > P=F8edm=ECt: DDE
> > Datum: 22. =FAnora 1999 9:24
> >
> > Ahoj
> > mam problem ohledne dde.
> > Vim, ze muzu prenaset nejaky text z DDE clienta na DDE servr pomoci
> > pokedata, popripade execmacro,... , ale nevim jak dostat nejaky text
> > ze serveru na clienta?

Disky v�t?� ne? 8,4GB

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 23.2.1999 09:25:03

Vy jste tu vsichni takovi strachapoudi. Tak to zkuste a uvidite! Viktor



-----P�vodn� zpr�va-----
Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
Odesl�no: 23. �nora 1999 8:11
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Disky v�t?� ne? 8,4GB

Ze by Viktor Cistic (BIOSu)???


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

> -----P�vodn� zpr�va-----
> Od: viktor.lostak(zv)chmi(tec)cz [SMTP:viktor.lostak(zv)chmi(tec)cz]
> Odesl�no: 22. �nora 1999 16:25
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Disky v�t?� ne? 8,4GB
>
> Ale to vubec neni pravda, to je jen takova povera. Ono to chodi se
> spoustou ruznych desek, to oni ti vyrobci jen tak strasi. Viktor
>
>
>
> -----P�vodn� zpr�va-----
> Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl�no: 22. �nora 1999 14:33
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Disky v�t?� ne? 8,4GB
>
> !!!!!!!!!!!!!!! MUSI BYT URCENA PRO KONKRETNI DESKU
> !!!!!!!!!!!!!!!!!!!!
>
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
> !!
> !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>

begin 600 WINMAIL.DAT
M>)\^((zv)4(`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($1I<VMY(';L=#_M(&YE/R X+#1'0(zv)"*" $%(zv) ,`#(zv)```,\'`(zv)`7``D`&0`#
M``(`%(zv)$!(( #``X```#/!P(`%P`)`!(zv)`* `"`#H!`0F `0`A````03A&0S<R
M035%1$-!1#(Q,3DS.38P,#(P048S0D0Y,4,`4 <!`Y &`-0&```A````"P`"
M``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````
M0 `Y`/ SR (&7[X!'(zv)!P``$````:````4D4Z($1I<VMY(';L=#_M(&YE/R X
M+#1'0(zv)````(!<0`!````%(zv)````&^7P8"M:5R_*G*[1'2DY8`(*\[V1P``!X`
M'(zv)P!````!0```%--5% `````'(zv)`?# $````6````=FEK=&]R+FQO<W1A:T!C
M:&UI+F-Z`````P`&$&3"51X#``<0R0(``!X`"! !````90```%992E-41515
M5E-)0TA.251!2T]625-44D%#2$%03U5$251!2U1/6DM54U1%0556241)5$56
M24M43U(M+2TM+5#Y5D]$3NU:4%+A5D$M+2TM+4]$.DU!4E1)3D923T[L2U--
M5% ``````(zv)$)$ $```"T`P``L ,``&T'``!,6D9UM1N=C3<`"(zv)$#`?<(zv)`J<"
M`&-H`0K <V5T,"!483YH`W$"(zv)P!0`]0/-S(SJC(zv)``"H"X6$'(zv)" '$Z,"(zv) <3
M($-%`H,R$*=X<')Q$[$1/Q)/$U%]$PJ ",(zv)(zv).PEO,C4ULP* "H%U8P!0"P-C
M`$&!"V!N9S$P,S,+IH (zv)5GD(zv):G-T%=#P='4(zv)=(zv)"0#U #`!O0L&%K;W8<<!N(zv)
M<(zv)#010](zv)< A(zv)9&DN#]%K01O0;R!Z:W4;HF%<('4<T!V(zv)&[ A&U!IRFL>('(:
M13(Y$'(*L9\*A J$&?("T0O",3<(zv)^(zv)D3HS$V(/IL:3,VJP% %%!O&[!C!4 M
M)3+ 4%PG9CEV!' +D!XG"8 >0!10)A$Q=F%_)3,(zv)EB3$))$+$R3$`(zv)!I,"TQ
M-#0!0"10,3(zv)., % #- I0V((zv)3V2J.(zv)R#8(zv)_ 30K = N +"!&`V F`F,>`%M3
M`$U44#I&4D].`$5+0%I:3E-,(zv)$%.62Y#6ET(zv)E<\J<(zv)>0"5 FH6YO*K<5()\=
MP"61`' %L![ ,3DPD+ (zv).#HQ((8J<$L#<(IU*K<G`0!L<&(zv)I( !L0&9W9"YC
M>E8G+><E(zv)C(zv))(zv)&TK\G1!*K=213H(zv)1 0`:Q4;<'8TDS\F$VYE/^$PP"PT1T(G
M3RA:)%37$(,,`2"C6A708AMP'W0'$S $`"MP8R H0DG(zv)3U-U*3\\$"">"H!_
M*TXZ!2TP!(zv)`:4261)D!A:"YS+B"44!T(zv))9 Y#P>0/E FH3!P-3<Y+.$OH#<T
M(#1!03\&()0E&[!L'< K- '0+3-1*4 M-3((zv)0#(zv)CA65N+0# `Q UD" #43;0
M:]A >GH`(zv)!I1>3-!()I^/B4O)C]&ABJ5' `?(zv)R[7"0`;H!R(zv)0 ]0;1VP,U!_
M+$5*'TLB+=5)<BZ<+Z R^R_>(W Z&0!&AC&G,F\S=7]&X#0?*G U?S:/1K-&
MAD'&;!O!'C!V=6(%D#;!PQQA%%!A=F1A05 >(7YJ%=!8T .(zv)'),>P!UP=O\$
MD#^0*H O`!X2#U $<!SA.F5&AG,=<1N(zv)"& (zv)<NIU18!Y#U (zv)+H%%0%B#)P((zv)
M''$<<'9Y`V!B8_\<<%D%'/,`D!W 'W56'6 O_TG21P]('V$Z298K3RQ?+6SG
M9&=-WT[O-#H:L6$Z4+]_4<]AE%+O4_]5#V"_2>$A`W,,!=!54TD(zv)0EF05"!5
M4A- 3D%N(zv))=FT#&09N!+;\!43G0PX$1%4TM51H9S#7,#_V$J=C]YOWK/>]]W
M7W+Q<C^_?S^ 3X%?=\H(zv)HQ<!`(/ `P`0$ `````#`!$0G ````,`(zv)!#_____
M0 `',,!3&/4%7[X!0 `(,,!3&/4%7[X!"P``(zv) (zv)(zv)!(zv)``````P ```````$8`
M`````X4````````#``* "" &``````# ````````1(zv)`````0A0````````,`
M!8 (( 8``````, ```````!&`````%*%``#P#(zv)``'(zv)`E(zv) (zv)(zv)!(zv)``````P ``
M`````$8`````5(4```$````$````."XP``,`)H (( 8``````, ```````!&
M``````&%````````"P`O(zv) (zv)(zv)!(zv)``````P ```````$8`````#H4````````#
M`#" "" &``````# ````````1(zv)`````1A0````````,`,H (( 8``````, `
M``````!&`````!B%````````'(zv)!!(zv) (zv)(zv)!(zv)``````P ```````$8`````-H4`
M``$````!`````````!X`0H (( 8``````, ```````!&`````#>%```!````
M`0`````````>`$. "" &``````# ````````1(zv)`````XA0```0````$`````
A````'(zv)`]``$````%````4D4Z( `````#``TT_3<``$VC
`
end


Disky v�t?� ne? 8,4GB

[*] Lubos <bruce(zv)pobox.sk> - 23.2.1999 09:29:04

> Ale co by, co tu porad toho ubozaka tak strasis. At tam napere BIOS jaky se
> mu libi, ja to delam zrovna tak. Asi tak ve dvou pripadech ze tri to jede
> at uz je to jakykoli BIOS do jakekoli desky. A kdyz ne, tak tam das zpatky
> ten stary a jsi tam, kdes byl. Ale ze bych neco znicil... Viktor
>

Tak to sa velmi mylis.
Ono to totiz nejde vzdy vratit spat.
Mne sa stalo, ze po upgrade BIOSu moj PC uz ani necekol, proste skapal.
Pomohla az fyzicka vymena BIOSu. A to mi kolega tiez tvrdil, ze sa nemoze nic
stat, lebo
ak to nepojde tak to jednoducho nabootujeme a dame spat.

/LH


Dobra rada nad zlato !!

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 23.2.1999 09:44:51

> Nev=FDte n=ECkdo jak se opojit(p=F8ipojit) z diskusn=ED skupiny. Nev=FD=
m pro=E8, ale nemohu se p=F8ipojit na str=E1nku www.delphi(tec)cz.=20
^^^^^^ ^^^^^
Teda pane ynzenire, to je cestyna, co?
Lubor bIRDIE Kolar
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
GSM Phone: +420-603-410019
ICQ: 18587772

RX 2.60

[*] Libor Valka <valka(zv)brno.cas(tec)cz> - 23.2.1999 09:53:14

[P��loha v souboru: winmail.dat]
Ahoj,

ve WinNT i Win9x bez problemu.

Libor
valka(zv)brno.cas(tec)cz
valka(zv)ipm(tec)cz

-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz za u�ivatele Milan Nemec
Odesl�no: 22. �nora 1999 11:47
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: RX 2.60

V Win NT mi nejde spustit RxDemo (v predeslych verzich to
fungovalo bez problemu). Zkompiluje a pri spusteni hlasi access
violation uz pred funkci WinMain (v C++ Builderu 3). V 95 to ale
funguje :-((.

Jak vam to funguje v NT?

Cau Milan

PVCS a spol

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 23.2.1999 09:59:34

Jo. Co chces vedet? Viktor



-----P�vodn� zpr�va-----
Od: Leos Urban [SMTP:Leos.Urban(zv)aitix(tec)cz]
Odesl�no: 23. �nora 1999 7:52
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: PVCS a spol

Mate nekdo zkusenosti s pouzitim systemu pro rizeni verzi a projektu (napr.
PVCS) ve spolupraci s Delphi?
Leos


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`(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`0````4D4Z
M(%!60U,(zv)82!S<&]L`(P$`06 `P`.````SP<"`!<`"0`[`"(``(zv)!7`0$(zv)(zv) ,`
M#(zv)```,\'`(zv)`7``D`.P`-``(`0(zv)$!"8 !`"$```!",T9#-S)!-45$0T%$,C$Q
M.3,Y-C P,C!!1C-"1#DQ0P!,!P$#D 8`) 4``"$````+``(``0````L`(P``
M`````P`F```````+`"D```````,`+(zv)```````P`V``````! `#D`4&LQU0I?
MO(zv)$>`' ``0```! ```!213H(zv)4%9#4R!A('-P;VP``(zv)%Q``$````6`````;Y?
M"M2WI7+\M,KM$=*3E(zv)`(zv)KSO9' ``'(zv)`># $````%````4TU44 `````>`!\,
M`0```!8```!V:6MT;W(N;&]S=&%K0&-H;6DN8WH````#``80<T:-V ,`!Q#F
M````'(zv)`($ $```!E````2D]#3T-(0T535D5$150_5DE+5$]2+2TM+2U0^59/
M1$[M6E!2X59!+2TM+2U/1#I,14]355)"04Y33510.DQ%3U-54D)!3D!!251)
M6$-:3T1%4TSA3D\Z,C/Z3D]203$Y.3DW.(zv)`````"`0D0`0````\"```+`(zv)``
M'0,``$Q:1G7>JH\/-P`*`0,!]R "IP(`8V(zv)!"L!S970P(%1A/F(zv)#<0*#`% #
MU \W,C.J. ``*(zv)+A80> ( <3HP* !Q,(zv)0T4"(zv)S(0IWAP<G$3L1$_$D\347T3
M"H (R" ["6\R-36S`H *(zv)75C`% +`V,`08$+8&YG,3 S,PNFD"!*;RX3,&\(zv)
M#U :8P>1=(zv)F #Z _(%:8:6MT!; :13(Y$'(_"K$*A J$&?("T0O",3<3'BH3
MHS$V'BIL:3-F-(zv)% %%!O= 60!4 M(zv)2)B4%PG9CEV!'!E"Y G"8 (zv)>A10(T$Q
M_'9A(F,=QB'T(<$+$R'TP0(`:2TQ-#0!0"& .#$X, % #- F<V((zv)*$]D.(zv)R#
M8(zv)_ 3&4B;P0(zv)57)B`Y%;4U!-5% Z*'(N*,- `0MP=&EX+F-Z79\=Q2>B!Y )
M4"/1;F\GYQ\5(!N (L$`< 6P82 QPCDM<" W.C43L"K6&DL#<'4GYP$`;'!H
MP290;$!F=V0J(zv)2K'=2*R. F ;2-!(C GYU#,5D,%\"U <W &\"1_GR6*(800
M(zv)PP!'=--82(0("!N96MD&[!Z:[9U#Y KX',J4#*0(#*P5'5Z*D%M,I!Y-P!E
MURZ(zv)-U #8" %$'H)\#<(zv)71PP<C>0,G$AX6HV0'1M.% H%: 44"X=Q#(R*;L<
M(3*3=110`- W(D0O8[X_'<0H<AW."H 7`0`^P `#`! 0``````,`$1 `````
M`P" $/____] ``<P0/UUR I?O(zv)% ``(zv)P0/UUR I?O(zv)$+``" "" &``````#
M````````1(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)``````
MP ```````$8``````84````````+`"^ "" &``````# ````````1(zv)`````.
MA0````````,`,( (( 8``````, ```````!&`````!&%`````````P`R(zv) (zv)(zv)
M!(zv)``````P ```````$8`````&(4````````>`$& "" &``````# ````````
M1(zv)`````VA0```0````$`````````'(zv)!"(zv) (zv)(zv)!(zv)``````P ```````$8`````
M-X4```$````!`````````!X`0X (( 8``````, ```````!&`````#B%```!
I`````0`````````>`#T``0````4```!213H(zv)``````,`#33]-P``4 ^%
`
end


Re[2]: Disky v=?ISO-8859-2?Q?=ect=3f=ed_ne=3f_8?=,

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 23.2.1999 10:00:53

Dne Tue, 23 Feb 1999 09:25:03 +0100 Viktor Lostak napsal:

> Vy jste tu vsichni takovi strachapoudi. Tak to zkuste a uvidite! Viktor
Kdyz nam pujcis svuj comp s deskou FIC a BIOSem Ami, rad se ti tam pokusim
nacpat Award pro Gigabyte :-)
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772


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