Archív konference Delphi

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

TCustomDataSet and ftMemo field type

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 11.1.2002 15:05:02

----- Original Message -----
From: "Roman Pagac" <PagacR(zv)servonic.de>> Diki moc za radu. Aj som overridol metodu TDataSet.CreateBlobStream ale
> nepomohlo. Nastavil som si tu aj breakpoint vo vnutri
> TDataSet.CreateBlobStream ale program sa tam nedostane. Prosim Ta nevies
mi
> poradit odkial a kedy sa vola tato metoda?
>

Koukni se na TBlobField v db.pas, resp. na implementaci GetAsString,
SetAsString apod. Tam uvidis ze blob/memo fieldy se na rozdil od
ostatnich fieldu nectou pomoci TDataSet.GetFieldData, ale ctou se
ze streamu, vyrobeneho prave pomoci metody TDataSet.CreateBlobStream.

Musis si pro svoje potreby podedit nejakeho potomka TStreamu, napr.
TMyBlobStream, ktereho budes vyrabet v TDataSet.CreateBlobStream
a ktery bude spravne cist a zapisovat data fieldu. Neni to sice jednoduche,
ale ani ne prilis slozite. Mohl bych ti poslat jak vypada muj potomek, ale
bylo by to zbytecne, protoze zdroj tech dat bude uplne jiny nez tvuj.

To ze se ti nevola CreateBlobStream je asi nejaka jina chyba.
Mas skutecne v datasetu field typu TBlobField?

HTH

Martin Schayna
Aktis a.s.

> > -----Original Message-----
> > From: Martin Schayna [mailto:mschayna(zv)aktis(tec)cz]
> > ----- Original Message -----
> > From: "Roman Pagac" <PagacR(zv)servonic.de>
> >
> >
> > > Mam problem s CustomDataSet. Ak pridam dalsi field typu ftMemo alebo
> > ftBlob,
> > > tak potom v metode
> > >
> > > function TMyDataset.GetFieldData(Field: TField; Buffer: Pointer):
> > > Boolean;
> > >
> > > ak idem naplnit field typu ftMemo alebo ftBlob prislusnou
> > hodnotou tak
> > > parameter Buffer mi pride nastaveny na NIL a ak idem
> > skopirovat do Buffer
> > > prislusnu hodnotu, tak samozrejme => exception. Ale stava
> > sa to len ak
> > > naplnam field typu ftMemo resp. ftBlob
> >

TCP spojeni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 15:10:04

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> To mas snadne... kod od Borlandu je casto pekne chybovy. Tuhle jsem
> trebas u tech Borlandich socketovych komponent narazil na roztomily
> preklep v kodu. Problem je v tom, ze ty ani nemas pravo na to, aby
> sis tu chybu sam opravil.

Ahoj,

tohle uz je trochu (ucelove ?) extremni nazor, chybu si sam opravit muzes,
dokonce muzes zverejnit i patch, ale nemel by si v nem distribuovat puvodni
kod (napriklad cely opraveny unit). Opravit chybu je mozne v pripade, ze se
o ni vi, takze kdyz neco takoveho najdes, je myslim vhodne to bud poslat do
prislusnych borland.public.delphi.* newsu nebo nahlasit jako bug report:
http://pso.inprise.com/webcustomer/clearexx_cgi/x_Site_Open_Bug.htm

Petr Vones


MemoryStream.Find

[*] Jaroslav Weiss <jaxx(zv)seznam(tec)cz> - 11.1.2002 15:10:10

Neexistuje neco takoveho jako %subj%? Potreboval bych utilitu nebo
napad na rychle vyhledani daneho substringu bez rozliseni velke/male
pismena. Zatim ctu bajtik po bajtiku a hledam. Tohle je dost pomaly.
Poradte, prosim...

Jaroslav Weiss
WinNT,
D3Ent

______________________________________________________________________
Seznam Prace - Hledate praci nebo menite zamestnani? http://prace.seznam(tec)cz


registry

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 11.1.2002 15:21:06

From: "Nagy Dusan" <Dusan.Nagy(zv)alcatel.sk>
> Je mozne ulozit komponentu do regitry.
> Ak ano ako?

A co tam chces zapisat?

Drobna rada: Ak planujes aspon v kutku duse ze by Tvoja aplikacia casom
mohla byt multiplatformna tak sa vyhni registrom. (Nevies ako to nase__ ked
to musis prepisovat :-) )

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Zarovnani TEdit doprava nefunguje pod Win95?

[*] JSDelphi <jsdelphi(zv)atlas(tec)cz> - 11.1.2002 15:24:42

Mam tutez smutnou zkusenost. Je to bohuzel dane nejakym DLL ve Windows (uz
si nepamatuji jakym), me to delalo i v ranejsi verzi Windows 98. Takze s tim
asi nic nenadelas, pokud sam neprepises zobrazovani. Sorry.

Jan Skopovy

From: "Ing. Petr �vejda" <lingvista(zv)lingvista(tec)cz>
Subject: Zarovnani TEdit doprava nefunguje pod Win95?> Pod Win 98 a Win2000 mi dobre funguje moje komponenta TEdit, ktera
zarovnava
> text doprava. Zarovnani vsak nefunguje pod Win95. Nevite nekdo, ktery z
> prikazu ma toto omezeni a popr. jak komponentu prepsat, aby to fungovalo i
> pod Windows 95?

IB6 a zakladni nastaveni

[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 11.1.2002 15:34:02

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Jan Sebel�k

Ahoj,

> Treba nejak takto:
[...]
> create database 'g:\aplikace\amex\data\amex.gdb'
> user 'SYSDBA'
> password 'm'
> page_size 4096
> default character set WIN1250

Jinak taky pamatuj na definici znakov� sady
u polo�ek pro spr�vn� t��d�n� apod.

Nap�.:

Create table Skupiny (
ID Integer NOT NULL,
Nazev Varchar(50) CHARACTER SET WIN1250 COLLATE PXW_CSY,
Popis VARCHAR(100) CHARACTER SET WIN1250 COLLATE PXW_CSY,
Primary Key (ID)
);

S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203

Varian Skin Factory - KRACH?

[*] Pavel Malinsky <spiderland(zv)iol(tec)cz> - 11.1.2002 15:34:01

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Gebauer Lukas
[...]
> dovyvinout. U komercniho ti nikdo nikdy zdrojaky neda a jsi nahranej!

Samozrejme, ze neda, ale proda. Nekoupil bych treba TeeChart nebo
FlashFiler, kdyby k nim nebylo mozne koupit i zdrojaky.

S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203


jak na navratovou hodnotu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 15:35:08

From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> Ackoli Object Pascal hajim, jednu vaznou vytku bych preci jenom mel:
> "private" metody jsou viditelne v ramci unity, jako by byly "public".
> Borland toho ve VCL casto zneuziva.

Dobre, tady ale neni chyba v OP ale spise v technikach ktere toto zneuzivaji.
Koneckoncu je mi to porad sympatictejsi nez treba zmatek s friends v C++

Petr Vones


Zarovnani TEdit doprava nefunguje pod Win95?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 15:37:07

From: "Ing. Petr �vejda" <lingvista(zv)lingvista(tec)cz>
> Pod Win 98 a Win2000 mi dobre funguje moje komponenta TEdit, ktera zarovnava
> text doprava. Zarovnani vsak nefunguje pod Win95. Nevite nekdo, ktery z

Ahoj,

tohle je presne ten duvod proc to neni primo ve VCL, jelikoz se jedna o
nedokumentovanou funkcnost (ktera nefunguje vsude).

Petr Vones


Kouslej program - doplneni

[*] Jan N�mec�����݊G^��b�dz�� - 11.1.2002 15:38:52

No, jestli se nepletu, tak je to spojeno s resourcama (nevim to ted uplne
jiste, ale mozna je to jenom tehdy, kdyz dojdou...) spis nez s chybou
programu...
Pak se mi povede shodit Delphi, tim se resourcy uvolnej a Win98 jedou dal,
ale program nekde visi...

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Ben, Martin (CAP, GCF)
Sent: Friday, January 11, 2002 2:53 PM
To: 'delphi-l(zv)clexpert(tec)cz'
Subject: RE: Kouslej program


Chtelo by to nejprve zjistit, proc ten program pada - cislo chyby apod. A
pada vubec ? Neni tam nekde nekonecny cyklus nebo neco podobneho ? Neceka na
nejaka data ?

Martin Ben

PS: Jednou mi taky pri ladeni "zatuhnul" program i s Delphi. Ale vzapeti
jsem zjistil, ze se z DB snazim nacist pres 10 milionu zaznamu. Proste jsem
blbe sestavil dotaz. :))

> -----Puvodni zprava-----
> Od: Jan N�mec [mailto:yendikdelphi(zv)seznam(tec)cz]
>
> "obcas" se stane, ze mi muj program spadne, od programu i Delph "neni
> odpoved"... Pokud odprasknu Delphi, pak se nekdy stane, ze
> Windowsy nejak
> drzi ten muj program a nepomuze nez restart compu. Projevuje
> se to tim, ze
> pri naslednem spusteni Delph a snaze kompilovat, Delphi
> nahlasi ze nelze
> vytvorit output file program.exe... To execko se v takovem
> pripade neda
> smazat zadnym me dostupnym zpusobem (Win nahlasi, ze se
> soubor pouziva...}.
> Nevite nekdo jak donutit windowsy aby muj program pustily a ja nemusel
> restartovat???
> Diky
> Honzik
>

TCP spojeni

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.1.2002 15:47:52

> Vim, ze ty rad primo API, ale pro lidi, kteri o tom mnoho nevi je
> volani primo WinsokAPi pomerne zmatecne.
>

to je vec nazoru. Samozrejme nejakou dobu trva nez se novackovi slozi
souvislosti dohromady, takze zacatek nebude bez problemu. Jenze pri
tom
programator zjisti jak to vlastne funguje. Tim padem zjisti lepe jake
pozadavky jsou
realne a jake ne.

> Synapse je z funkcniho hlediska velmi tenka mezivrstva mezi
> WinsockAPI a tvoji aplikaci. Duvod vzniku Synaopse bylo vlastne jen
> to, ze jsem pri psani aplikaci jdouci primo na WinsockAPI neustale
> opakoval stejny kod... a tak jsem si rekl, ze to zabalim do tridy a
> usetrim si spousty prace.
>
> Napriklad kdyz pri volani WinsockAPI chces volat Connect, tak musis
> slozite nakrmit SIN struktury, resolvovat si jmena pocitacu, jmena
> protokolu i jmena portu, a pak vysledek dat jako parametr tomu
> Connectu.

jednou napsany kod proste pouziju znovu (s mirnou modifikaci). Casem
si kazdy
samozrejme udela svou vlastni nadstavbu nad nekterymi funkcemi. Ovsem
vi presne co
ktery kus kodu dela.

> Ano, Synapse vznikla jen a jen proto, abych si usetril praci pri
> volani WosockAPI, protoze vsechny ostatni komponenty mi nejak
> nevyhovovaly... A narozil od tebe jsem byl natolik liny, ze jsem si
> na to napsal 'udelatko' ;-)

kazdy pouzivame nejake udelatko.
Jde take o to, ze knihovny (nebo komponenty) aby byly
pouzitelne pro vice lidi musi implementovat spoustu veci, ktere
zdaleka ne vsechny
aplikace pouziji. Tim padem jsou komplikovanejsi nez by nutne musely
byt ...


D. Toman

hrisnikem je podle meho soudu Delphi jako "builder

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 15:50:25

From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> IDE ("builder") je hodne poplatne zacatecnikum. Svadi to k tomu, ze aplikace
> se "naklika", nikoli naprogramuje.

To bych takhle netvrdil, protoze by z toho slo usuzovat ze 'profesional'
programuje pouze z prikazove radky, coz je samozrejme blbost. Urcitou snadnost
kterou IDE nabizi muze vyuzit kazdy aniz by to vedlo k necemu hruzostrasnemu
pokud si *predtim* o veci neco precte. A to je ten zakladni problem, protoze
modni styl "rychlokvasenych odborniku" dnes vladne svetem temer ve vsech
oborech (typicky pristup managmentu vyskoleneho stejnym zpusobem: nabereme
lidi z ulice -> posleme na tydenni skoleni -> mame kvalifikovane odborniky).

> Bohuzel, zkusenosti ukazuji, ze ne kazdy programator (zde spice "klikac")
> tuto ochotu ma.

To ale prece neni o ochote, bez hlubsich znalosti stejne nic vetsiho dohromady
neda.

Petr Vones


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 11.1.2002 15:51:15

> > > Object Pascal, hoci to nie je zly jazyk, urcie medzi
> > > dobre navrhnute OO jazyky nepatri.
> > > Ja by som ho zaradil k jazykom s OO rozsirenim a nie
> > > k jazykom navrhnutym na OOP. Jeho podpora pre OOP
> > > je celkovo velmi slaba a obmedzena.
> >
> > Prosim, mohol by si byt konkretnejsi?
> > Dik.
> > TOndrej
>
> Hmm asi tu bude zaujimava debata :)) mna by to zaujimalo tiez a hlavne s
> jakym jazykom to zrovnavas.

Predovsetkym s Eiffelom, to je jazyk zalozeny na OOP s vlastnostami,
ktore Object Pascal nikdy nebude mat a jazyky ako C# alebo Java
mozno budu mat za 5 rokov polovicu z toho, co Eiffel mal pred 10
rokmi. Object Pascal je sice sikovny a ako tak OOP podporuje
a s Delphi a komponentami umoznuje RAD beznych aplikacii,
ale vdaka svojim vlastnostiam a obmedzeniam nie je vhodny
na serioznejsie OOP programovanie.

Erik


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 11.1.2002 15:58:26

> - genericke typy
>
> Neviem, o co ide, aj ked sa mi podarilo najst nejake odkazy na nete
> (vecsinou suvisiace s Javou).

Java ani C# to nema. Ide o moznost definovat triedu (povedzme STACK)
pre lubovolny typ. Konkretny typ potom zadas, az ked triedu pouzijes
v deklaracii. Teda takto to naprogramujes:

class STACK[T]
...
end

a takto pouzijes:

s1: STACK[INTEGER];
s2: STACK[BOOLEAN];
s3: STACK[STACK[INTEGER]];

podporuje to reusability, vyborne sa s tym pisu kniznice.

> - automaticka sprava pameti
>
> Nuz, dobre, ak myslis. Ja by som to nezaradil do "OOP vlastnosti".

OOP systemy sa vyznacuju tym, ze v case behu programu dynamicky
vznika a zanika velke mnoznostvo objektov, tieto objekty medzi
sebou komunikuju (teda existuju vezby medzi nimi) a tieto objekty
sa zoskupuju do roznych zoznamov, kolekcii, atd. Vyriesit potom
efektivne spravu pamete "rucne" je v zlozitejsich pripadoch podla
mojho nazoru prakticky nemozne. Predstav si, ze mas nejaky
objekt, ten je ulozeny v 3 zasobnikoch, okrem toho existuje nan
dalsich 10 odkazov z inych objektov, atd. a teraz mi povedz kedy
a kto ma tento objekt zrusit?

Automaticka sprava pameti tento problem riesi velmi jednoduchym
sposobom: objekt sa zrusi (automaticky), ked system zisti, ze sa uz
nepouziva (t.j. neexistuje moznost, aby sa program k tomuto objektu
dostal). Tento system zaroven garantuje dve dalsie obrovske vyhody
oproti klasickemu alokovaniu/ruseniu objektov z heapu:

1. pametove chyby su uplne vylucene (nemoze sa stat, ze nejaky
objekt "zostane visiet" alebo, ze by sa omylom uvolnil dvakrat
a mohlo dojst k poskodeniu datovych struktur heapu).

2. riesi problem fragmentacie pameti. Dobry GC algoritmus,
nielenze automaticky uvolnuje nepotrebnu pamet, ale dokaze
aj presunut (kompaktovat) pouzite objekty do suvislej casti
pameti aby zostal dostatocne velky SUVISLY priestor pre dalsiu
alokaciu. Suvisla pamet sa okrem toho aj lepsie kesuje, takze
to moze mat aj priaznivy vplyv na vykon. Inac fragmentacia
pameti je obrovsky, obrovsky a obrovsky problem u serverov,
ktore maju byt v nepretrzitej prevadzke.

Vyuzivanie GC moze byt aj velmi efektivne: zoberie sa kus
suvislej pameti a jeden smernik, ktory ukazuje na zaciatok.
Pri alokaci sa ten smernik posunie dalej (plus skontroluje
sa, ci je dost pameti, teda ci nie je potrebne vykonat
"upratovanie pameti") - teda velmi jednoducha a efektivna
operacia (zopar instrukcii). Urcite je to rychlejsie
ako klasicke alokovanie z heapu, kde treba najst v zozname
volnych blokov dostatocne velky blok, z neho potom
naalokovat pamet a upravit vysledny zoznam blokov
Uvolnovanie objektov je este efektivnejsie - aplikacia
objekty vobec neuvolnuje (ziade Free/Destroy), tato
operacia uplne odpada (0 instrukcii), kdezto v pripade
klasickej dealokacie je potrebne vratit alokovanu pamet
do zoznamu volnych blokov.

U jednoduchsich (kratsie trvajucich) programov a v pripade
dostatocne velkej pameti (t.j. ak pocas behu programu nie je
potrebne ani raz "upratovat pamet") je preto tento system
este vykonnejsi nez klasicke Alloc/Free. Plus program je aj
kratsi a jednoduchsi, pretoze nema ziadne Free a potrebuje
ani ziadnu vlastnu spravu pameti (heap manager).

Dalej cim viac pameti a alokovanych objektov, tak alokacia
z heap managera trva dlhsie a dlhsie, kdezto alokacia pomocou
jednoducheho smernika trva vzdy rovnako, takze je to aj vyborne
skalovatelne.

Problemom GC je efektivne "upratovanie pamete", pretoze
najprv treba vyhladat vsetky pouzivane objekty a potom
ich presunut (skompaktovat). Existuju sikovne inkrementalne
algoritmy, ktore mozu vyuzit cas, ked aplikacia caka
na vstup od uzivatela, resp. ked procesor nie je vytazeny
na priebezne upratovanie pameti. Plus niekedy sa GC
realizuje pomocou zvlastneho threadu, co umoznuje vyuzit
dalsi procesor v pripade viacprocesoroveho systemu.
Reziu spojenu s presuvanim objektov je mozne redukovat
jednoduchym premapovanim pameti (namiesto presuvania
jej obsahu), je to podporovane hardwarom a teda velmi
rychle.

Z tychto informacii myslim jednoznacne vyplyva, ze
u zlozitejsich a vykonnejsich OOP systemov je automaticka
sprava pameti nielen nutnostou ale, ze moze byt aj
velmi efektivna a vyhodna. Dolezite len je, aby bola
GC naozaj dobre urobena.

> - automaticke zistovanie zavislosti medzi triedami
>
> To sa mi nezda mat s jazykom nic spolocne.
> Zavislosti medzi triedami v zmysle dedicnosti su myslim jasne. Tiez su
velmi
> jasne zavislosti na urovni unit.
> Priznam sa, nechapem, o co Ti ide.

mam dve triedy, ktore vzajomne na seba odkazuju. Nechcem ich mat
v rovnakom unite (pretoze ide o komplikovane triedy), ako to urobis?

V Eiffely netreba ziadne uses, ziadne unity, ziadne extra interface
a implementation casti. Jednoducho napises triedy ako chces
(vecsinou sa kazda trieda napise do zvlastneho suboru, ale mozes
si ich vsetky a to v lubovolnom poradi dat hoci do jedineho
suboru). Kompilator sam AUTOMATICKY zisti vzajomne zavislosti
medzi triedami a interne si ich preusporiada a skontroluje. Nemusim
sa vobec starat o to, ze najprv musim napisat triedu A a az potom
triedu B, lebo trieda B pouziva triedu A a pod. No nie je to
perfektne vymyslene a uzitocne? Podla mna ano a zrejme
bude to aj dovodom, preco rovnaky system je pouzity aj v Jave
a C#.

> - viacnasobna dedicnost
>
> To je pravda. Niektori tvrdia, ze viacnasobna dedicnost prinasa viac
> problemov ako uzitku, ale dokazem pochopit, ze Ti prave tato "ficura" v OP
> chyba.
> V OP mas moznost pouzit interfacy a emulovat akusi "poor man's Multiple
> Inheritance": jedna trieda moze implementovat viacero interfacov.

v realnom svete existuje viacnasobna dedicnost, tak nevidim dovod,
preco by OOP jazyk mal programatora v OOP modelovani obmedzovat.
Eiffel to ma opet perfektne vyriesene, bez nejakych problemov
alebo nejednoznacnosti (konfliktne metody je mozno jednoducho
premenovat).

> - virtualne metody treba explicitne deklarovat
>
> Ved hej, to je fakt. Programy treba pisat. Bol by si radsej, keby boli
> vsetky metody virtualne by default?

ano, Eiffel tieto otazky opet riesi automaticky, programator sa nestara,
kompilator s optimalizatorom automaticky zistuje, kedy ma byt ktora
metoda virtualna alebo nie.

> - pristupove prava k clenom su obmedzene
>
> To som asi tiez nepochopil, jednym z pilierov OOP je encapsulation, takze
to
> je snad dobre, ci nie?

myslel som moznost detailnejsie specifikovat (presnejsie povedane obmedzit)
pristupove prava, nie iba private, protected, public, published. Napr.
ze niektore metody budu dostupne iba niektorej triede a inym triedam nie.

> - a v ramci unitu uplne zrusene
>
> Viem prijat tuto vycitku, ale da sa obist jednoducho separovanim
> jednotlivych tried do samostatnych unit.

nie vzdy, prave koli roznych vzajomnym zavislostiam a obmedzenej
moznosti specifikovat pristupove prava

> 3. podporuje neobjektove vlastnosti napr. globalne premenne,
> smerniky, unity, neobjektove typy
> To je myslim vyhoda. Navyse, nasa tema tu nie je, co vsetko OP podporuje,
> ale Tvoje tvrdenie:
> "Jeho podpora pre OOP je celkovo velmi slaba a obmedzena."

to nie je vyhoda, pretoze jednak jazyk sa zbytocne komplikuje,
jednak potom nie je konsistentny a dalej tieto neobjektove vlastnosti
mozu branit pouzitiu inych, objektovych vlastnosti.
Myslis, ze keby teraz domixovali do Object Pascalu povedzme
vsetky prikazy z Visual Basicu, C+, Eiffelu, LISPU, SQL a neviem
z coho este, ze jazyk by bol lepsi, lebo by vsetko podporoval?
Podla mna by bol este daleko horsi a pomalsi, pretoze by to bol
chaos nad chaos.

> Na zaklade tychto argumentov samozrejme respektujem Tvoj nazor, ale o tom,
> ze podpora OOP v OP je primerana, zostavam nadalej presvedceny.

je to vec nazoru a zalezi aj na zlozitosti aplikacii. U jednoduchych
aplikacii moze byt uz samotne pouzitie OOP diskutabilne, problem
je so zlozitymi programami a s tym, ze casom sa aj z jednoduchych
programov doplnanim dalsich funkcii a roznymi upravami stavaju zlozite.

Erik


Mazani komponent se stejnym Parent

[*] Martin �ajbik <cajbik(zv)sct.sk> - 11.1.2002 16:08:40

Nemylis si to s Owner-om ? Nie vzdy je to to iste.

MarCaNT

----- Original Message -----
From: "Kaka�ka Pavol" <kakacka(zv)proca(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 11, 2002 11:23 AM
Subject: Re: Mazani komponent se stejnym Parent


> > From: <mbartone(zv)synthesia(tec)cz>
> > Jak se daji smazat vsechny komponenty, ktere maji stejny Parent ?
> > Dekuji
>
> Co to znamena zmazat? V pripdate ze Uvolnujes i toho "Parenta" tak staci
ked
> uvolnis jeho. U komponent funguje taka vlastnost ze pred uvolnenim parenta
> uvolni vsetky komponenty ktore vlastni.
>
> From: "Martin �ajbik" <cajbik(zv)sct.sk>
> > Takze by som to napisal cez nejaky cyklus napr.
> > while MyParent.ControlCount > 0 do
> > MyParent.Controls[0].Free;
> > pozor na klasicky cyklus for, ten by nedopadol dobre lebo pole Controls
sa
> > pri volani Free meni.
> > MarCaNT
>
> FOR-u sa nemusis bat staci pouzit FOR...DOWNTO namiesto FOR...DO, ale je
to
> detail.
>
> Kaka�ka Pavol
> KasiX(zv)atlas(tec)cz
>
>
>
>

jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 11.1.2002 16:16:31

On 11 Jan 2002 at 12:17, Martin Schayna wrote:

> > "private" metody jsou viditelne v ramci unity, jako by byly
> > "public". Borland toho ve VCL casto zneuziva.
>
> Ja si naopak myslim ze to neni bezduvodne, simuluje se tim dulezita
> vlastnost, ktera se u jinych OOP jazyku nazyva "friendly classes",
> neboli jakesi uzsi propojeni mezi tridami z duvodu lepsi spoluprace.

Podle meho nazoru je to hodne mizerna implementace, protoze z toho
vznikaji ruzne zhovadilosti. Pokud by mela fungovat nejaka friendly
classes, pak bych si to predstavoval tak, ze to bude fungovat i mimo
ramec jedne unity, po explicitnim zadani, pochopitelne.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


Kopirovani do clipboardu

[*] Martin �ajbik <cajbik(zv)sct.sk> - 11.1.2002 16:19:03

Ak ti ide iba o text tak potom

uses
Clipbrd;

Clipboard.AsText:= 'Nejaky text';

----- Original Message -----
From: <jpecl(zv)volny(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 11, 2002 12:45 PM
Subject: Kopirovani do clipboardu > Zdravim,
> kterou funkci lze programove kopirovat do clipboardu ?
> HoP
>
>
>
>
>

kde je Windows?

[*] Sebesta Jan <delcomseb(zv)volny(tec)cz> - 11.1.2002 16:20:09

funkce GetWindowsDirectory.
Priklad tip c. 714 z 1001 Tipu a Triku pr oDelphi.

Jan Sebesta

----- Original Message -----
From: "bleak" <bleak(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, January 10, 2002 3:58 PM
Subject: kde je Windows?> lze nejak spolehlive zjistit,v kterem adresari je system Windows?
> ja vim, ze je vetsinou ve WINDOWS, ale uz jsem videl i W95, WIN95...
>
>
>

hrisnikem je podle meho soudu Delphi jako "builder

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 11.1.2002 16:20:51

Myslim, ze je to o ochote. Pokud nejsem ochoten se vzdelavat, tak zadne
hlubsi znalosti neziskam i kdyby je do mne cpali horem dolem. Otazkou je
pristup k informacim, ktere potrebuji.

Martin Ben

> -----Puvodni zprava-----
> Od: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
> > From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> > Bohuzel, zkusenosti ukazuji, ze ne kazdy programator (zde
> spice "klikac")
> > tuto ochotu ma.
>
> To ale prece neni o ochote, bez hlubsich znalosti stejne nic
> vetsiho dohromady
> neda.
>
> Petr Vones


Kopirovani do clipboardu

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 11.1.2002 16:22:44

v unite Clipbrd je "objekt" Clipboard

Takze mozes napisat Clipboard.AsText := 'sssssssssss';

Ak to chces priamo z kontroliek tak niektore maju metodu CopyToClipboard.
Niektorym to mozes nariadit cez message SendMessage(Handle, WM_COPY, 0, 0);

btw: Toto patri do konfery. :)

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

From: <jpecl(zv)volny(tec)cz>
> Z edit boxu, ze stringu, zat�m jednoduch� objekty, nikoli p�es ctrl+c ale
programov� um�stit do schr�nky, potom se p�epnout do jin� aplikace a tam
klidn� ctrl+v
> Tak.

> Od: Kaka�ka Pavol <kakacka(zv)proca(tec)cz>

> > >From: <jpecl(zv)volny(tec)cz>
> > kterou funkci lze programove kopirovat do clipboardu ?
>
> Co a odkial?

Kouslej program

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 11.1.2002 16:27:23

From: "Slavom�r �eke�" <cekel(zv)noves.sk>
> mam podobny problem ... robim v D5 ... ak spustim program z delphi, tak
> zmrzne ako program, tak i delphi, nezmrzne jedine v pripade, ze ten moj
> program najprv spustim z windowsu a az potom z delphi (i ked aj to
> niekedy nepomaha) ... kde je problem ? D3 mi toto NIKDY nerobila ???

To nebude otazka Delphi, ale skor stavu Windows. Co resources (D5 ich
pochopitelne zeru viac), doba od poslednej instalacie Windows, dalsie
programy typu "balast" :-) a nakoniec samotna aplikacia. To vsetko
ovplivnuje stabilitu a divne chovanie.

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

kde je Windows?

[*] virag <ivan.virag(zv)aliatel(tec)cz> - 11.1.2002 16:30:45

Myslim, ze jsem to nasel v 1001 trikach

function GetWinPath : string;
var BuffLen : DWORD;
Buff : PChar;
begin
BuffLen := MAX_PATH + 1;
GetMem(Buff, BuffLen);
try
if GetWindowsDirectory(Buff, BuffLen) <> 0 then begin
Result := StrPas(Buff);
end
else begin
Result := '';
end;
finally
FreeMem(Buff);
end;
end;

Ivan Virag

-----Original Message-----
From: bleak [mailto:bleak(zv)atlas(tec)cz]
Sent: 10. ledna 2002 15:59
To: delphi-l(zv)clexpert(tec)cz
Subject: kde je Windows?


lze nejak spolehlive zjistit,v kterem adresari je system Windows?
ja vim, ze je vetsinou ve WINDOWS, ale uz jsem videl i W95, WIN95...

Varian Skin Factory - KRACH?

[*] Erik Salaj <winsoft(zv)stonline.sk> - 11.1.2002 16:55:03

> penize, coz u komerce v drtive vetsine pripadu nepada v uvahu. Delat
> jakoukoli aplikaci bez zdroju komponent povazuji za hazard, a i u
komercniho
> sw jsem radsi, kdyz zdroje mam - treba k VCL. Riziko nedostupnosti je tu
> vzdycky, u freeware i u komerce. Resenim je jen Open Source.

ani Open Source nie je ziadnou zarukou. Niekedy je totiz jedno,
ci mas alebo nemas zdrojak. Niekedy zase moze byt neprijemne
ak zo zdrojaka urobi 10 programatorov 10 dalsich zdrojakov.
Inokedy moze byt neprijemne, ak sa zmenia licencne podmienky
a to, co bolo zadarmo, je treba zaplatit (alebo zostane
zadarmo ale je nutne k tomu dokupit technicku podporu
alebo manual alebo poslat 1000000 pohladnic).

Erik


Mazani komponent se stejnym Parent

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 11.1.2002 17:15:34

Ano, sorry, predpokladam ze ked dal tazatel taku otazku aku dal vytvara
komponenty za designu ale vdaka za upresnenie.

Uzite si vikend. V Pondelok zase do prace :-(

:-)))))

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

----- Original Message -----
From: "Martin �ajbik" <cajbik(zv)sct.sk>
> Nemylis si to s Owner-om ? Nie vzdy je to to iste.

TCP spojeni

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 11.1.2002 17:19:10

> Maly prikladek na socket server a socket klient pomoci Synapse (pro porovnani) by neskodil.

Rad pro porovani prikladecek provedu, ale protoze neznam jak vypada a
co presne dela ta verze s Indy, tak nemohu slouzit.

Posli mi, prosim, na muj mail tu verzi s Indy, a ja rad vyrobim
prikladecek pro srovnani. ;-)


-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

TCP spojeni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 17:24:14

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> Posli mi, prosim, na muj mail tu verzi s Indy, a ja rad vyrobim
> prikladecek pro srovnani. ;-)

Mimochodem mel bych feature request do Synapse (pokud to tam u neni) a to
podporu cookies v HTTP klientu.

Petr Vones


kde je Windows?

[*] bleak <bleak(zv)atlas(tec)cz> - 11.1.2002 17:55:27

diky za odpovedi... zda se, ze mi chybi dost dobra kniha. Pokud nekdo
uvazujete o knize Mistrovstvi v Delphi, pak vezte, ze to jsou vyhozeny
prachy...
bleak

----- Original Message -----
> funkce GetWindowsDirectory.
> Priklad tip c. 714 z 1001 Tipu a Triku pr oDelphi.

OT: trocha teorie o teorii D

[*] Erik Salaj <winsoft(zv)stonline.sk> - 11.1.2002 18:36:40

> na okraji zajmu (i kdyz k jeho syntaxi lze mit take mnoho vyhrad). To ze
do
> nektereho jazyka byly pozdeji (nejakym zpusobem) implementovany objekty
prece
> jeste neznamena, ze je nutne aby zde byly vsechny vlastnosti ktere "ma mit
OOP
> jazyk", navic to nekdy ani dost dobre neni mozne nebo by investice do
potrebne
> zmeny nebyla adekvatni vysledku.

suhlasim, chcel som hlavne upozornit, ze podpora OOP v OP ma svoje
obmedzenia
a ze programator sa moze stretnut s problemami sposobenymi tymito
obmedzeniami.
Aj ked s tym nic neurobime, je myslim dobre o tom nieco vediet. Uzitocne je
podla
mna si aj vyskusat programovanie v niektorom "cistom" OOP jazyku, daju sa
tym
ziskat velmi dobre skusenosti a navyky s OOP a tieto potom mozno vyuzit
v akomkolvek jazyku a vyvojovom nastroji. Popalenie sa, ci zbavovanie sa
zlych
navykov (a zle skonstruovanych programov) moze byt inak dost neprijemne.
OP a asi aj vsetky ostatne jazyky, ktore nevznikli vybudovanim na OOP
principoch ale rozsirovanim neobjektoveho zakladu o objektove vlastnosti,
napr. C++ v sebe toto nebezpecenstvo maju. Zda sa mi, ze to nebol dobry
tah a ze problemy ktore tym vznikli sa cim dalej tym viac a viac prejavuju.
Momentalne sa myslim, uz postupuje rozumnejsie a uz sa nerozsiruje povedzme
C++ na C# alebo Javu, ale vytvori na novy jazyk.

Erik


TCP spojeni

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 11.1.2002 18:37:52

> Mimochodem mel bych feature request do Synapse (pokud to tam u neni) a to
> podporu cookies v HTTP klientu.

Podpora cookies tam je i neni:

Cookies jsou totiz implementovany u HTTP pomoci HTTP hlavicek v
dotazu i opovedi.

No a u Synapse si snadno prectes vsechny vracene hlavicky a jestlize
tam narazis na 'set-cookie', tak si jeji data kamkoliv zapamatuj.

Obdobne u HTTP requestu muzes nastavit libovolnou tvoji hlavicku,
tedy klidne si ze zapamatovanych predchozich dat vygeneruj do HTTP
dotazu svoje hlavicky 'cookie'. A je to!

Kdybych se snazil implementovat podporu cookies primo do meho kodu,
narazim zakonite na nasledujici problemy:

- kde skladovat cookies, ktere maji mit delsi zivotnost nez je
zivotnost tridy s implemetaci HTT protokolu? Do souboru, doregistru,
do pameti... to s ma preci rozhodovat program, ne implementace HTTP!

- podle ceho mam rozhodovat, kterou cookies smim ci nesmim poslat?
Tuto bezpecnostni politiku si ma take rozhodovat program, ne
implementace HTTP!

Proto si myslim, ze bohate staci, ze poskytuji v Synapsi nastroje,
pomoci kterych lze snadno manipulovat s HTTP hlavickama, potazmo tedy
i s cookies. Konkretni zachazeni s cokies necht si kazdy implementuje
jak potrebuje, protoze jakakoliv implementace v Synapsi by byla
prilis svazujici a tedy pro mnoho lidi stejne nevhodna...

Implementace cookies patri do implemetace HTTP browseru, ne do
implementace HTTP protokolu. Tot muj skromny nazor. ;-)

-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

OT Pomlouvejme C++

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

From: "David Kraina" <DKx(zv)Seznam(tec)cz>
> 99% C++ konference pomlouva nas pascalisty. Jednoho takoveho mam dokonce v
> tymu. Nevite o nejakem srovnani a chybach C++. No tak, rozjedem odvetu !!!

Ahoj,

nemyslim si ze flamewar typu Pascal vs. C++ je nekomu ku prospechu. Pokud
bychom sli opravdu do hloubky tak urcite najdeme ruzne vyhody a nevyhody obou
dvou jazyku. V mnoha pripadech jsou si temer rovnocenne a je spis otazkou toho
kdo se co naucil jako prvni (a pak pouzival) a podle toho pak 'ten svuj' jazyk
preferuje na ukor toho druheho. Tyhle debaty se vedou uz od doby, kdy oba dva
jazyky byly dotazene do prakticky pouzitelne podoby. Je to stejne jako tema
Windows vs. Linux atd.

Pokud ma podobna debata vubec nejaky smysl, pak snad jedine s ohledem na
vhodnost toho ktereho jazyka pro vyuku, ale tam se to muze take snadno
zvrhnout ve stejne nesmyslne debaty.

Petr Vones


Dynamicky script vo Firebirde.

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 11.1.2002 20:00:17

Haj hou!

On 11 Jan 2002, at 14:47, Kalhous Zdenek wrote:

> On 11 Jan 2002, at 14:13, Roland Turcan wrote:
>>
> > Potreboval by som dynamicky script vo Firebirde, skusim vysvetlit:
>
> To by potreboval urcite skoro kazdy (ja urcite) ale obavam se, ze
> za ty penize to FB ani IB neumi.

V penezich to neni, verte mi :-) Problem je v implementaci
ulozenych procedur, ktera je dost postavena na kompilaci a
verifikaci kodu procedur pri jejich ulozeni. Jakekoliv dynamicke
SQL nelze v te dobe vyhodnotit a prelozit. Vysledkem by bylo
jednak pomalejsi provadeni procedur (dynamicky preklad dle
potreby) a moznost, ze proste selzou. S tim by se rada uzivatelu
treba i dokazala vyrovnat (i kdyz pro pravde receno nevite co
chcete, podle meho by se vam to moc nelibilo, predevsim nasledky
ktere by to melo :-). ale znamenalo by to kompletni prepracovani
celeho systemu ulozenych procedur, zjistovani zavyslosti mezi
objekty databaze, implementace rady prikazu ALTER a DROP atd.

S pozdravem

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


jak na navratovou hodnotu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2002 20:38:07

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> Vyuzivanie GC moze byt aj velmi efektivne: zoberie sa kus
> suvislej pameti a jeden smernik, ktory ukazuje na zaciatok.
> Pri alokaci sa ten smernik posunie dalej (plus skontroluje
> sa, ci je dost pameti, teda ci nie je potrebne vykonat
> "upratovanie pameti") - teda velmi jednoducha a efektivna
> operacia (zopar instrukcii). Urcite je to rychlejsie
> ako klasicke alokovanie z heapu, kde treba najst v zozname
> volnych blokov dostatocne velky blok, z neho potom
> naalokovat pamet a upravit vysledny zoznam blokov
> Uvolnovanie objektov je este efektivnejsie - aplikacia
> objekty vobec neuvolnuje (ziade Free/Destroy), tato
> operacia uplne odpada (0 instrukcii), kdezto v pripade
> klasickej dealokacie je potrebne vratit alokovanu pamet
> do zoznamu volnych blokov.

Problem je ze tento princip potrebuje vetsi virtualni adresovy prostor, pokud
jednou alokuji blok pameti a vytvorim tak ukazatel, tezko jej mohu svevolne
menit behem doby zivota dane alokace. Nicmene v pripade ze budu vytvaret a
rusit tisice objektu mohu tento princip pouzit i v Delphi. Za timto ucelem ma
trida TObject metody NewInstance a FreeInstance kde lze toto chovani pro dane
tridy vytvorit. Opet je zde otazka v kterych pripadech to prinasi vyznamny
efekt.

> myslel som moznost detailnejsie specifikovat (presnejsie povedane obmedzit)
> pristupove prava, nie iba private, protected, public, published. Napr.
> ze niektore metody budu dostupne iba niektorej triede a inym triedam nie.

Takto je to v C++.

> to nie je vyhoda, pretoze jednak jazyk sa zbytocne komplikuje,

Ukazatele jazyk komplikuji ? Odvazim se tvrdit ze stale mene nez vicenasobna
dedicnost. Navic v mnoha pripadech je to jediny efektivni zpusob prace s daty
(pokud vynechame prime pouziti assembleru).

Petr Vones


Varian Skin Factory - KRACH?

[*] Jir� Foldyna <jiri.f(zv)avizo(tec)cz> - 11.1.2002 21:19:51

> > penize, coz u komerce v drtive vetsine pripadu nepada v uvahu. Delat
> > jakoukoli aplikaci bez zdroju komponent povazuji za hazard, a i u
> komercniho
> > sw jsem radsi, kdyz zdroje mam - treba k VCL. Riziko
> nedostupnosti je tu
> > vzdycky, u freeware i u komerce. Resenim je jen Open Source.
>
> ani Open Source nie je ziadnou zarukou. Niekedy je totiz jedno,
> ci mas alebo nemas zdrojak. Niekedy zase moze byt neprijemne
> ak zo zdrojaka urobi 10 programatorov 10 dalsich zdrojakov.
> Inokedy moze byt neprijemne, ak sa zmenia licencne podmienky
> a to, co bolo zadarmo, je treba zaplatit (alebo zostane
> zadarmo ale je nutne k tomu dokupit technicku podporu
> alebo manual alebo poslat 1000000 pohladnic).
>
> Erik

Ahoj,

rekl bych, ze Open Source je zarukou, ze mam zdrojaky minimalne v okamziku
porizeni komponenty, u rady projektu je i dobra sance do budoucnosti (treba
JCL nebo Synapse :-)). Zatim jsem jeste nenarazil na problem, ze bych musel
posilat 1000000 pohlednic nebo dokupovat manual apod.
Ale toto je debata mimo misu - ja mam nazor, ktery vyhovuje memu profesnimu
pohledu, ty mas nazor jiny. Nikdo nerozsoudi, kdo z nas nema pravdu, nebot
pravda je povetsinou vyrazne subjektivni zalezitosti...

Zdravim

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

OT: Pascal vs. C(++)

[*] David Janko <djanko(zv)infoware(tec)cz> - 11.1.2002 21:24:23

> Puvodni zprava, kterou napsal David Kraina dne 11 Jan 2001:
>
> 99% C++ konference pomlouva nas pascalisty. Jednoho takoveho mam dokonce v
> tymu. Nevite o nejakem srovnani a chybach C++. No tak, rozjedem odvetu !!!

Zadnou "odvetu" pls ne - z toho nejspis nic rozumneho nevzejde ... ale par
konkretnich veci co me na pascalu slusne receno zarazi uvest snad mohu
(delal jsem zejmena v C, PHP a lehce jsem nahledl do Pythonu - spis jen
proto ze me zaujala jeho krasna syntax a struktura - a s prichodem CLX sem
zkusil trosku Pascal/D/Kylix).
Strucne:
--------
C: jako nizkourovnovy jazyk mi pripada vynikajici, ale pouziti tam kde
potrebujete vysokourovnovy pristup mi reseni C++/knihovny uz tak vynikajici
neprijde, i kdyz je pouzitelne;
PHP: velmi prakticky vysokurovnovy jazyk, bohuzel z historickych duvodu ma
dost "spinavou" koncepci coz u vetsich projektu je dost ......;
Python: vysokourovnovy jazyk s vynikajici koncepci, byl jsem fakt nadsen
;-); kdyby borlandi vysli z neho misto s Pascalu, zilo by se nam asi lepe
...
Pascal: je to mysmas vseho mozneho, a ackoliv je v nem spousta dobreho, tak
jako celek mi to jiz jako nic extra neprijde :(

Konkretne:
-----------
- priorita operatoru logickych/aritmetickych mi pripada naprosto nelogicka
(zajmave je, ze prinasi "nadbytecne" zavorky, na ktere si pascaliste v C
zpravidla stezuji ;-)))
- strasne moc "duplicitnich" datovych typu (ted myslim i ty co se jen tak
tvari): jen takovy "obecny" string co jich ma: klasicky Pas retezec,
AnsiString, PChar, VariantAsString, mema nebo blob vlastne taky ... a kazdou
chvili jsem nucen mezi nema ne zrovna hezky prevadet ... a k tomu pristupuji
ruzne ty same funkce lisici se jen typem vstupnich parametru (treba hledani
substringu, zlate strstr() v C ). A neni to jen u stringu a jen u typu (co
takove NULL, nil ?). V C je to krasne jasne (ale nema neordinalni typy,
jiste), v PHP se o to nemusite implicitne starat, a Pascal je mysmas vseho
;(.

- dalsi mysmas je pri otvirani a praci se souborama - zlaty fopen("soubor",
"params") v C nebo PHP;

#define "coz bych u vysokourovnoveho jazyka cekal" CBC

- case neumi pouzit string, CBC;
- smycky nemaji else, CBC; for neumi libovolny inc vyraz;
- ze se nekde nesmi psat strednik je dost difne, begin .. end ..else .. mi
moc prehledne neprijde (o nic vic nez {} v C - ale proc ne jako to ma python
?? to je to mi prijde idealni);
- proc je prirazeni/porovnani := / = a nebo jako ve vetsine ostatnich jazyku
= / == ? Kdyz soucasne pisu PHP (nebo C) a Pascal, mam pak spustu chyb v
obojim :(.
- ze metody nemaji za nazvem () mi sice nijak zvlast nevadi, ale bylo by to
myslim cistci;
- sprintf() by take obcas bodlo;
- return by mohlo ukoncit fci (s navratovou hodnotou) - zatim sem neprisel
na to, jak to korektne vyresit ? snad Result := a Abort ?
- StrToInt a pod. fce nemaj ani tolik inteligence jako ANSI atoi() v C, o
extenzich jako ma std libc v linuxu ani nemluvim;

No, urcite je toho mnohem vice, a neco muze byt zpusobeno moji nedostatecnou
znalosti Pascalu, ale jako nahled co programatora ktery delal nekdy v C nebo
PHP nebo Java nebo Python nebo atd. a prijde k pascalu neprijemne prekvapi,
to snad staci. Zamerne uvadim kokretni priklady, aby to pokud mozno
neskoncilo na obecnem flame co je lepsi, ci dokonce nejlepsi ...

dekuji za pozornost ;-)

---
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe

Ochrana shareware programu

[*] V�t Jur�sek - konference <delphi(zv)obecpohori(tec)cz> - 11.1.2002 22:14:33

> To se da odhalit a velice snadno. Kdyz pominu monitory registru, ktere to
> udelaji velmi komfortne, tak uz temer stupid user to muze zjistit prostym
> porovnanim registru pred a po cinu.
********* to se da castecne obejit, kdyz tento tajny zaznam do registru
aplikace udela napriklad po tretim legalnim spusteni - to uz to vetsinou
nikdo monitorem nesleduje.


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


Sput�n� druh� aplikace

[*] Zden�k �t�p�nek�����^��ޏ����� - 11.1.2002 22:22:07

Zdravim

ad1) Nedavno jsem na to psal funkci:

function GetAppPathByExt(const ext: String): String;
var
Registry: TRegistry;
ExtPath, ExtBuf: String;
begin
Registry := TRegistry.Create;
Registry.RootKey:=HKey_classes_root;
if Registry.KeyExists('\.'+ext) then //otestuje existenci klice s
priponou
begin
Registry.OpenKey('\.'+ext,false); //otevre klic s priponou
ExtBuf := Registry.ReadString(''); //precte tzp souboru {extfile}
Registry.CloseKey; //zavre registr
Registry.OpenKey(ExtBuf+'\shell',false); //otevre extfile\shell
if Registry.ReadString('') = '' then
Registry.OpenKey('open\command',false) else
Registry.OpenKey(Registry.ReadString('')+'\command',false); //otevre
defaultni otviraci programovz klic+command
ExtPath := (Registry.ReadString('')); //precte kompletni cestu k
programu i s parametry
ExtPath := (StringReplace(ExtPath, '"', '', [rfReplaceAll])); //z cesty
odstrani "
PathRemoveArgs(Pchar(ExtPath)); //z cesty odstrani parametry,
zbyde c:\abc.exe
if FileExists(ExtPath) then Result := ExtPath else Result := '';
//zaverecna kontrola (projistotu) zapis do Resultu
end
else
begin //klic neexistuje
Result := '';
end;
Registry.Free;
end;

Zdenek
----- Original Message -----
From: <jpecl(zv)volny(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 11, 2002 12:44 PM
Subject: Sput�n� druh� aplikace


> Ahoj,
> 1. jak zjist�m v delphi um�st�n� programu, se kter�m je asociovan� soubor
o zn�m� p��pon� ?
> 2. jak�m zp�sobem spustit tento program a otev��t v n�m dan� soubor (mohou
existovat 2 varianty: spustit program jako novou instanci a v n�m otev��t
soubor, nebo zji��ovat zda program ji� b�� a otev��t v n�m pouze nov�
okno).
> D�ky
> HoP
>
>
>

Sput�n� druh� aplikace

[*] Zden�k �t�p�nek�����^��ޏ����� - 11.1.2002 22:36:51

Jeste dodatek.

PathRemoveArgs je v nejake knihovne souvisejici s IE. Na soukromy mail ti
posilam unitu.

Zdenek
----- Original Message -----
From: "Zden�k �t�p�nek" <zstepanek(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 11, 2002 10:22 PM
Subject: Re: Sput�n� druh� aplikace


> Zdravim
>
> ad1) Nedavno jsem na to psal funkci:
>
> function GetAppPathByExt(const ext: String): String;
> var
> Registry: TRegistry;
> ExtPath, ExtBuf: String;
> begin
> Registry := TRegistry.Create;
> Registry.RootKey:=HKey_classes_root;
> if Registry.KeyExists('\.'+ext) then //otestuje existenci klice s
> priponou
> begin
> Registry.OpenKey('\.'+ext,false); //otevre klic s priponou
> ExtBuf := Registry.ReadString(''); //precte tzp souboru {extfile}
> Registry.CloseKey; //zavre registr
> Registry.OpenKey(ExtBuf+'\shell',false); //otevre extfile\shell
> if Registry.ReadString('') = '' then
> Registry.OpenKey('open\command',false) else
> Registry.OpenKey(Registry.ReadString('')+'\command',false); //otevre
> defaultni otviraci programovz klic+command
> ExtPath := (Registry.ReadString('')); //precte kompletni cestu k
> programu i s parametry
> ExtPath := (StringReplace(ExtPath, '"', '', [rfReplaceAll])); //z cesty
> odstrani "
> PathRemoveArgs(Pchar(ExtPath)); //z cesty odstrani
parametry,
> zbyde c:\abc.exe
> if FileExists(ExtPath) then Result := ExtPath else Result := '';
> //zaverecna kontrola (projistotu) zapis do Resultu
> end
> else
> begin //klic neexistuje
> Result := '';
> end;
> Registry.Free;
> end;
>
> Zdenek
> ----- Original Message -----
> From: <jpecl(zv)volny(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Friday, January 11, 2002 12:44 PM
> Subject: Sput�n� druh� aplikace
>
>
> > Ahoj,
> > 1. jak zjist�m v delphi um�st�n� programu, se kter�m je asociovan�
soubor
> o zn�m� p��pon� ?
> > 2. jak�m zp�sobem spustit tento program a otev��t v n�m dan� soubor
(mohou
> existovat 2 varianty: spustit program jako novou instanci a v n�m otev��t
> soubor, nebo zji��ovat zda program ji� b�� a otev��t v n�m pouze nov�
> okno).
> > D�ky
> > HoP
> >
> >
> >
> >
>

Balicky pouzite v projektu

[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 12.1.2002 09:53:56

Ahoj,

nevitem, prosim, nekdo o prostredku, kterym
by bylo mozne zjistit, ktere balicky jsou potreba
pro beh aplikace nebo knihovny prelozene s balicky?
Nebo je neco soucasti Delphi a ja to nenasel?
Jde mi o to, ze bych tomu podstrcil hotovy exac
nebo dllko a zjistil bych to. Nebo chci moc?

S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203

IB6 a zakladni nastaveni

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 12.1.2002 11:06:18

> > Behalf Of Jan Sebel�k
> > create database 'g:\aplikace\amex\data\amex.gdb'
> > user 'SYSDBA'
> > password 'm'
> > page_size 4096
> > default character set WIN1250
>
> Odes�latel: Pavel Malinsk� <spiderland(zv)iol(tec)cz>
> Jinak taky pamatuj na definici znakov� sady
> u polo�ek pro spr�vn� t��d�n� apod.

Urcite souhlasim, ale
-
default character set definuji uz pri create database, takze ho nemusim explicitne uvadet u jednotlivych polozek
-
trideni (COLLATE) definuji zpravidla na urovni domeny, abych na to u jednotlivych polozek nezapomnel.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

IB6 a zakladni nastaveni

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 12.1.2002 11:11:41

> Odes�latel: PeJaSoft <pejasoft(zv)volny(tec)cz>
> A tento script spoustis jak? Pres isql.exe nebo nejak programove?

Pokud ta otazka patri me, tak skript poustim pres IBConsole.
Ackoli jsem byl uz upozornen, ze existuje rada lepsich variant, jenze ja jsem strasne linej na nejake hledani a stahovani sw obecne. :-)

Pokud bych to chtel delat programove (stejne se tomu nevyhnu), pak bych urcite, stejne jako ty, pouzil IBSQL.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

hrisnikem je podle meho soudu Delphi jako "builder

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 12.1.2002 11:19:53

> From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> > IDE ("builder") je hodne poplatne zacatecnikum. Svadi to k tomu, ze aplikace
> > se "naklika", nikoli naprogramuje.
>
> Odes�latel: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> To bych takhle netvrdil, protoze by z toho slo usuzovat ze 'profesional'
> programuje pouze z prikazove radky, coz je samozrejme blbost.

Ja jsem to taky rikal s urcitou nadsazkou.
To co pises, Petre, nize, plne podepisu. :-)

Honza
-----------------
> Odes�latel: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> To bych takhle netvrdil, protoze by z toho slo usuzovat ze 'profesional'
> programuje pouze z prikazove radky, coz je samozrejme blbost. Urcitou snadnost
> kterou IDE nabizi muze vyuzit kazdy aniz by to vedlo k necemu hruzostrasnemu
> pokud si *predtim* o veci neco precte. A to je ten zakladni problem, protoze
> modni styl "rychlokvasenych odborniku" dnes vladne svetem temer ve vsech
> oborech (typicky pristup managmentu vyskoleneho stejnym zpusobem: nabereme
> lidi z ulice -> posleme na tydenni skoleni -> mame kvalifikovane odborniky).

Varian Skin Factory - KRACH?

[*] Erik Salaj <winsoft(zv)stonline.sk> - 12.1.2002 11:41:04

> rekl bych, ze Open Source je zarukou, ze mam zdrojaky minimalne v okamziku
> porizeni komponenty, u rady projektu je i dobra sance do budoucnosti
(treba

mal som uz viacero zdrojakov v ruke, ktore boli rovnako uzitocne ako keby
neboli. Jednoducho bolo nevyhnutne ich prepisat, ziadna ich modifikacia ani
studium z ekonomickeho hladiska neprichadzali do uvahy. To ako priklad,
ze niekedy je jedno mat a nemat zdrojak, a ze teda zdrojak z Open Source
nemusi este nic znamenat. Povedal by som, ze prave v nekomercnych
oblastiach software je toto riziko zvysene a ze freewarom sa casto stava
prave software, ktory by bol inak nepredajny. Okrem toho povedat,
ze ved ja si to dorobim, ak tam nieco nie je, ze ja si to upravim ak budem
nieco ine potrebovat, ze ved ja si opravim chyby ak to je narychlo zbuchane
a plne chyb - to nie je problem povedat, ale uz tazsie urobit (a potom
spocitat kolko to cele vlastne stalo). V Open Source su takisto rizika,
ako aj u kazdeho software, a povedal by som, ze este vecsie ako
u ineho druhu software a to preto, ze je to cele znacne netransparentne
a necitatelne (kam to ti autori smeruju, co vlastne za to chcu) a mne
sa to v mnohych pripadoch javi ako cira spekulacia a to je dovodom
k mojmu negativnemu vztahu k takymto systemom.

Erik

jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 12.1.2002 12:20:35

> Problem je ze tento princip potrebuje vetsi virtualni adresovy prostor,
pokud
> jednou alokuji blok pameti a vytvorim tak ukazatel, tezko jej mohu
svevolne
> menit behem doby zivota dane alokace. Nicmene v pripade ze budu vytvaret a

v Pascale nie, ale v jazykoch, ktore podporuju GC, to mozne je.

> rusit tisice objektu mohu tento princip pouzit i v Delphi. Za timto ucelem
ma
> trida TObject metody NewInstance a FreeInstance kde lze toto chovani pro
dane
> tridy vytvorit. Opet je zde otazka v kterych pripadech to prinasi vyznamny
> efekt.

alokacia nie je problem, ale neurobis "upratovanie pameti", takze vo vecsine
pripadov je to nanic. Systemy s GC prinasaju efekty - su odstranene vsetky
pametove chyby a problemy s fragmentaciou - podla mna su to velmi
vyznamne efekt, bez GC su to totiz prakticky NERIESITELNE problemy.

> Ukazatele jazyk komplikuji ? Odvazim se tvrdit ze stale mene nez
vicenasobna
> dedicnost. Navic v mnoha pripadech je to jediny efektivni zpusob prace s
daty
> (pokud vynechame prime pouziti assembleru).

prave smerniky znemoznuju pouzitie GC, predsa nemozes "upratovat pamet",
ked nevies, co v tej pameti je. Je zaujimave, ze moderne a efektivne jazyky
tento "jediny efektivny sposob prace s udajmi" nepodporuju. A este mi
prezrad v com je efektivnejsi pristup k udajom pomocou smernika ako
pristup k atributom objektu (podla mna je to totiz robene presne tou istou
instrukciou a z toho mi vychadza, ze teda tie smerniky nebudu jedinym
efektivnym sposobom). Co sa tyka viacnasobnej dedicnosti, doporucujem
pozriet riesenie v Eiffely.

Erik

Nemuzu rozchodit v Delphi napsany modul do Apache

[*] Hojan <hojan(zv)sin.cvut(tec)cz> - 12.1.2002 12:28:36

Dobry den,
muj problem je nasledujici:
V Delphi 6 vytvorim novou Web Server Application
a zvolim Apache Shared Module (DLL).

Necham puvodni jmeno (Project1) a implementuju do modulu
nejakou funkcnost (na request vraci jednoduchou stranku - odzkouseno jako CGI).

Zkompiluju projekt - vznikne Project1.dll. Do httpd.conf pridam:

LoadModule Project1_module modules/Project1.dll

<Location /project>
SetHandler project1-handler
Order deny,allow
Allow from all
</Location>

No a cekam, ze kdyz si spustim stranku http://mujserver/project,
tak se zavola muj modul. To se ale nestane a vzdy dostanu 404ku.

Zkusil jsem snad uz vsechno, nechapu, proc to nejede. Trasovanim
jsem zjistil, ze modul se nacte a inicializuje pri startu apache tak, jak ma.
Primet ale apache k tomu, aby zavolal project1-handler se mi nepodarilo.

Mam Delphi 6 a Apache 1.3.22 pod Win2000.

Diky za kazdou radu
Jan Rychtar

Nemuzu rozchodit v Delphi napsany modul do Apache

[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 12.1.2002 13:36:00

> LoadModule Project1_module modules/Project1.dll
Toto upravte na
LoadModule project1-handler Project1_module modules/Project1.dll
>
> <Location /project>
> SetHandler project1-handler
> Order deny,allow
> Allow from all
> </Location>

S pozdravem
Jiri Kratochvil
programator drobnych aplikaci (Delphi, Kylix, PHP, SQL)
webmaster www.webzin(tec)cz, www.stuff(tec)cz
---------------------------------------------------------------------------
URL: http://www.webzin(tec)cz , http://nbbg.webzin(tec)cz/new,
http://www.stuff(tec)cz (mirrored (zv) http://www.webzin(tec)cz/www/stuff),
http://services.webzin(tec)cz, http://services.webzin(tec)cz/kratochvil
e-mail: jiri.kratochvil(zv)webzin(tec)cz , webmaster(zv)webzin(tec)cz
tel./fax: +420 35 610 3723
mobil: +420 777 622481
---------------------------------------------------------------------------


Jak umistit Form do jineho Formu?

[*] Josef Semera <semera(zv)atlas(tec)cz> - 12.1.2002 14:16:33



Windows.SetParent(Form1.Handle,Form2.Handle);

>
> Zdravim
> poradi mi nekdo viz. %subject%. Potreboval bych hodit Form na
> MDIChild form. Myslel jsem ze by to mohlo jit pres Parent,
> ale neni to tak.

Predavani stringu (VB - Delphi)

[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 12.1.2002 16:12:22

Ahoj,
mam program (ve VB) a DLL v Delphi, zatim jsme si predavali parametry jen
Integer, ted potrebujeme i typ string (PChar, ..). Mate s tim nekdo
zkusenosti, a muzete poradit, jaka cesta bude nejlepsi?
TIA
Petr


Varian Skin Factory - KRACH?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.1.2002 18:05:40

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> prave software, ktory by bol inak nepredajny. Okrem toho povedat,
> ze ved ja si to dorobim, ak tam nieco nie je, ze ja si to upravim ak budem
> nieco ine potrebovat, ze ved ja si opravim chyby ak to je narychlo zbuchane
> a plne chyb - to nie je problem povedat, ale uz tazsie urobit (a potom
> spocitat kolko to cele vlastne stalo). V Open Source su takisto rizika,

Jenze presne tohle se ti stane i s komercnimi vecmi. Casto jsou to take desne
spatlane veci a mam pocit ze autori spolehaji na to, ze si zdrojaky mnoho lidi
nekoupi ;-) Opravovat neco v takovem kodu je utrpeni pricemz nekdy dana firma
ani nejevi zajem to sama opravit (v lepsim pripade ti nabidne vraceni penez).

> spocitat kolko to cele vlastne stalo). V Open Source su takisto rizika,
> ako aj u kazdeho software, a povedal by som, ze este vecsie ako
> u ineho druhu software a to preto, ze je to cele znacne netransparentne
> a necitatelne (kam to ti autori smeruju, co vlastne za to chcu) a mne

Podminky jsou vetsinou popsany v licenci, takze tohle je myslim jasne.
Netvrdim ze Open Source je lepsi nebo horsi nez komercni produkty, je to jen
dalsi alternativa ktera ma svoje vyhody i nevyhody. Jednou z nevyhod je treba
to, ze diky nedostatku kapacit (prece jen ti lide co se na tom podileji musi
take z neceho zit) neni schopen nabidnout kompletni reseni, presto se ale
kolikrat jedna o zajimavy a uzitecny kod.

Petr Vones


TCP spojeni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.1.2002 18:18:29

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> Obdobne u HTTP requestu muzes nastavit libovolnou tvoji hlavicku,
> tedy klidne si ze zapamatovanych predchozich dat vygeneruj do HTTP
> dotazu svoje hlavicky 'cookie'. A je to!

Dobre, predstavoval jsem si neco jako tohle:

SynapseHttpRequest.Cookies.Add('USERID=123456');

> - kde skladovat cookies, ktere maji mit delsi zivotnost nez je

To je samozrejme nesmysl, to uz je vec aplikace kde a jak si uklada nebo
generuje cookies.

Petr Vones


jak na navratovou hodnotu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.1.2002 19:06:11

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> alokacia nie je problem, ale neurobis "upratovanie pameti", takze vo vecsine
> pripadov je to nanic. Systemy s GC prinasaju efekty - su odstranene vsetky
> pametove chyby a problemy s fragmentaciou - podla mna su to velmi
> vyznamne efekt, bez GC su to totiz prakticky NERIESITELNE problemy.

Zalezi asi hlavne na typu aplikaci. Jedna vec jsou 'uzivatelske aplikace' a
jina zase sluzby bezici na serveru kde je treba obslouzit tisice pozadavku.

> prave smerniky znemoznuju pouzitie GC, predsa nemozes "upratovat pamet",
> ked nevies, co v tej pameti je. Je zaujimave, ze moderne a efektivne jazyky
> tento "jediny efektivny sposob prace s udajmi" nepodporuju. A este mi

V konecnem dusledku se to pak stejne prelozi do assembleru. Pokud nepouzijes
ukazatele rovnou, ale budes to nejakym jinym zpusobem konvertovat tak to bude
pro vetsinu aplikaci pomalejsi a komplikovanejsi nez pouziti slusneho
alokatoru ktery umozni prime pouziti ukazatelu.

> prezrad v com je efektivnejsi pristup k udajom pomocou smernika ako
> pristup k atributom objektu (podla mna je to totiz robene presne tou istou

Data nejsou jen objekty. Mel jsem tim namysli napriklad parsovani vetsich
datovych struktur. Pokud oznacis pouziti ukazatelu jako 'nevhodne' tezko muzes
pomoci mene 'low-level jazyka' (jako je Eiffel) toto delat stejne efektivne ve
srovnani treba s C++ nebo Object Pascalem.

Petr Vones

Ochrana shareware programu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.1.2002 19:11:04

From: "V�t Jur�sek - konference" <delphi(zv)obecpohori(tec)cz>

> ********* to se da castecne obejit, kdyz tento tajny zaznam do
registru
> aplikace udela napriklad po tretim legalnim spusteni - to uz to
vetsinou
> nikdo monitorem nesleduje.

A jak budes implementovat ten persistentni citac poctu legalnich
spusteni :-)

Bye, pf

jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 12.1.2002 19:31:27

On 12 Jan 2002 at 12:20, Erik Salaj wrote:

> > Ukazatele jazyk komplikuji ? Odvazim se tvrdit ze stale mene nez
> vicenasobna
> > dedicnost. Navic v mnoha pripadech je to jediny efektivni zpusob
> > prace s
> daty
> > (pokud vynechame prime pouziti assembleru).
>
> prave smerniky znemoznuju pouzitie GC, predsa nemozes "upratovat
> pamet", ked nevies, co v tej pameti je. Je zaujimave, ze moderne a
> efektivne jazyky tento "jediny efektivny sposob prace s udajmi"
> nepodporuju. A este mi prezrad v com je efektivnejsi pristup k udajom
> pomocou smernika ako pristup k atributom objektu (podla mna je to
> totiz robene presne tou istou instrukciou a z toho mi vychadza, ze
> teda tie smerniky nebudu jedinym efektivnym sposobom). Co sa tyka
> viacnasobnej dedicnosti, doporucujem pozriet riesenie v Eiffely.

Vezmi si napriklad jakykoliv exe a ukaz mi, jak bys zjistil informace
v nem ulozene bez ukazatelu. Ja to fakt nevim, proto by me to velmi
zajimalo.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 12.1.2002 19:34:02

> V konecnem dusledku se to pak stejne prelozi do assembleru. Pokud
nepouzijes
> ukazatele rovnou, ale budes to nejakym jinym zpusobem konvertovat tak to
bude
> pro vetsinu aplikaci pomalejsi a komplikovanejsi nez pouziti slusneho
> alokatoru ktery umozni prime pouziti ukazatelu.

to je podla mna hlavne otazka kvalitneho kompilatora, napr. uz tusim Borland
C++ 3.1 mal take optimalizacie, ze bolo jedno, ci sa prechadzalo polom
pomocou indexu alebo prechadzas polom smernikom - kompilator to
optimalizoval automaticky (na smernik). Ale kod s indexom je podla
mna ovela prehladnejsi a kompilator naviac moze index skontrolovat
a upozornit na nespravny index, v pripade smernika nedokaze kompilator
urobit nic len generovat prislusnu instrukciu. Dovolim si tvrdit, ze program
pisany normalnym sposobom moze byt este efektivnejsi ako program
"optimalizovane" pisany pomocou smernikov, pretoze u smernikov
ma kompilator malu sancu nieco optimalizovat (a na niektorych pocitacov
moze byt vyhodnejsie pristupovat k datam pomocou offsetu a indexu,
nie pomocou priamej adresy, t.j. smernika).

> > prezrad v com je efektivnejsi pristup k udajom pomocou smernika ako
> > pristup k atributom objektu (podla mna je to totiz robene presne tou
istou
>
> Data nejsou jen objekty. Mel jsem tim namysli napriklad parsovani vetsich
> datovych struktur. Pokud oznacis pouziti ukazatelu jako 'nevhodne' tezko
muzes
> pomoci mene 'low-level jazyka' (jako je Eiffel) toto delat stejne
efektivne ve
> srovnani treba s C++ nebo Object Pascalem.

velmi zjednodusene povedane, zalezi co je to "efektivne". Az
najefektivnejsie
sa programuje v assembleri alebo priamo v binarnom kode?

Erik


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 12.1.2002 19:37:58

> Vezmi si napriklad jakykoliv exe a ukaz mi, jak bys zjistil informace
> v nem ulozene bez ukazatelu. Ja to fakt nevim, proto by me to velmi
> zajimalo.

nerozumiem otazke, chces odpoved na to, ze bez smernikov sa da
programovat (ze nie su nutne), alebo ze je mozne za chodu zistovat
nepouzitu pamet a cistit ju (t.j. ze GC moze fungovat)? Plati aj
jedno aj druhe (za urcitych podmienok samozrejme).

Erik


Ochrana shareware programu

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

Puvodni zprava, kterou napsal V�t Jur�sek - konference dne 11 Jan 2002:

> > To se da odhalit a velice snadno. Kdyz pominu monitory registru, ktere
> > to udelaji velmi komfortne, tak uz temer stupid user to muze zjistit
> > prostym porovnanim registru pred a po cinu.
> ********* to se da castecne obejit, kdyz tento tajny zaznam do registru
> aplikace udela napriklad po tretim legalnim spusteni - to uz to vetsinou
> nikdo monitorem nesleduje.

No ale nekam si asi musis napsat ten pocet, kdy to zapises, ne? A to uz
je misto, kam kdyz ti ten stupid user vzdy zapise tu prvni hodnotu, tak
nikdy program nic nezapise :)

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 12.1.2002 20:15:59

On 12 Jan 2002 at 19:37, Erik Salaj wrote:

> > Vezmi si napriklad jakykoliv exe a ukaz mi, jak bys zjistil
> > informace v nem ulozene bez ukazatelu. Ja to fakt nevim, proto by me
> > to velmi zajimalo.
>
> nerozumiem otazke, chces odpoved na to, ze bez smernikov sa da
> programovat (ze nie su nutne), alebo ze je mozne za chodu zistovat
> nepouzitu pamet a cistit ju (t.j. ze GC moze fungovat)? Plati aj jedno
> aj druhe (za urcitych podmienok samozrejme).

Chci vedet, jak zjistis informace z tabulek, ktere jsou ulozeny v
exe. Napriklad, jak tam najdes nejaky resource, kde je ulozeny, v
jakem jazyce, jak je velky atp., aniz bys pouzil ukazatel.

S ukazateli se to resi tak, ze se nastavis na zacatek, zjistis, kde
je prvni tabulka s informacemi o sekcich, v ni najdes tu sekci,
kterou hledas, pak skocis na zacatek te sekce a prohledavas dal, az
najdes co potrebujes. Skoky se realizuji tak, ze k pointru prictes
vhodnou hodnotu, ktera "dopravi" zacatek ukazatele na potrebnou
adresu uvnitr prohledavane struktury. Exe jsem vzal jako priklad,
takto se pracuje s jakymkoliv podobnym blokem pameti, ktery nejevi
zadnou dostatecnou pravidelnost, na kterou by se daly pouzit _pouze_
objekty.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


jak na navratovou hodnotu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.1.2002 20:38:37

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>

> Chci vedet, jak zjistis informace z tabulek, ktere jsou ulozeny v
> exe. Napriklad, jak tam najdes nejaky resource, kde je ulozeny, v
> jakem jazyce, jak je velky atp., aniz bys pouzil ukazatel.
>
> S ukazateli se to resi tak, ze se nastavis na zacatek, zjistis, kde
> je prvni tabulka s informacemi o sekcich, v ni najdes tu sekci,
> kterou hledas, pak skocis na zacatek te sekce a prohledavas dal, az
> najdes co potrebujes.

Totez se da prece udelat pomoci streamu, jeho metody seek a metod pro
cteni odpovidajici datovych entit. C++ ma napr. operator >> pro cteni
dat ze streamu

[ne ze bych byl proti pointerum ;-)]

Bye, pf


TCP spojeni

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.1.2002 20:57:36

> Dobre, predstavoval jsem si neco jako tohle:
> SynapseHttpRequest.Cookies.Add('USERID=123456');

Velmi podobne to preci udelat muzes... jen to 'add' udelas na headers
property, a jako hodnotu das primo cely radek s cookies, ne jen jmeno a
hodnotu. Pokud ti jde jen o tohle, tak vyrobit metodu, ktera z toho tveho
'userid=123456' klidne ten radek do hlavicek vygeneruji. To neni problem.

-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library

jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 12.1.2002 21:12:36

On 12 Jan 2002 at 20:38, Petr Fejfar wrote:

> > S ukazateli se to resi tak, ze se nastavis na zacatek, zjistis, kde
> > je prvni tabulka s informacemi o sekcich, v ni najdes tu sekci,
> > kterou hledas, pak skocis na zacatek te sekce a prohledavas dal, az
> > najdes co potrebujes.
>
> Totez se da prece udelat pomoci streamu, jeho metody seek a metod pro
> cteni odpovidajici datovych entit. C++ ma napr. operator >> pro cteni
> dat ze streamu

To je ale stale o tomtez. Jak napises takovy stream? Nemluve o tom,
ze prace s takovym objektem je znacne nepohodlna a narocnejsi jak na
vykon, tak i na psani kodu. Krome toho nacitani velkych objemu dat do
streamu take neni to prave orechove.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


Ochrana shareware programu

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.1.2002 21:12:30

> ********* to se da castecne obejit, kdyz tento tajny zaznam do registru
> aplikace udela napriklad po tretim legalnim spusteni - to uz to vetsinou
> nikdo monitorem nesleduje.

Omyl... sledovat to zacnou, az to zacne otravovat. pak teprve nasadi
vsechny ty monitory a zacnou zjistovat, kam vsude si tva aplikace saha a
odkud asi tak bere informace. ;-)
-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library

jak na navratovou hodnotu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.1.2002 21:24:12

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>

> To je ale stale o tomtez. Jak napises takovy stream? Nemluve o tom,

To neni prece argument - konec koncu vsechno nakonen bezi na urovni
strojoveho kodu. Diskuze je prece o urovni abstrakce, kterou poskytuje
ten ktery jazyk/virtualni pocitac programatorovi. Takze predpokladam,
ze v jazyku, ktery me ochudil o praci s pointery bude napr. stream
implementovan, takze ho nemusim psat.

> ze prace s takovym objektem je znacne nepohodlna a narocnejsi jak na
> vykon, tak i na psani kodu. Krome toho nacitani velkych objemu dat
do
> streamu take neni to prave orechove.

Proc? Kompilator muze soubor namapovat do pameti a ty se o to nemusis
na urovni aplikace vubec starat.

Nepohodlne IMHO bude definovat pro kazdou datovou entitu nejakou tridu
nebo alespon typ - tady je prace s pointery bezesporu uspornejsi i.e.
mene pracna, ovsem za cenu vetsi pravdepodobnosti chyby.


Bye, pf


jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 12.1.2002 22:03:13

Ahoj,

ja to povazuji za argument. Stream na soubor je neco jineho nez
stream na muj specificky blok pameti. Nekdy potrebuji soubor
namapovat, jindy ho potrebuji natahnout do pameti. Nekdy potrebuji ve
streamu vyresit zcela specifickou situaci. Jazyk, ktery mi nedovoli
napsat takovy stream nejakou efektivni cestou, se proste nehodi pro
urcity typ uloh (kterymi se treba zabyvam).

U streamu, ktere me nepusti primo k pameti, nastava problem v pripade
cteni obsahu ruznych typu. Pokud vim, ze na dane adrese je integer,
pretypuji si pointer na PInteger(P)^ a mam vystarano. Takze pak mohu
udelat treba tohle:
Inc(PByte(P), PInteger(P)^) a jsem tam, kde potrebuji byt. V pripade
streamu si musim nadeklarovat promennou, do ni nacist hodnotu, a pak
udelat skok dlouhy Cislo - SizeOf(integer). Jeste horsi je siuace,
kdy mam v pameti nejaky PChar. V pripade streamu to znamena cist byte
po bajtu, nez najdu znak #0. Tomuhle rikam vselijak, jen ne efektivni
kod. U pointeru jsem hotov raz-dva. Resenim by bylo, ze stream bude
umet precist PChar (PWChar) na jeden zatah, ale tohle obvykle
znamena, ze bych ho to musel naucit. A jsme zase u pointeru.

Delphi pouzivam proto, ze me prilis neomezuje vysokourovnovymi
udelatky a pusti me do hloubky, kdyz potrebuji. Jestlize se tato
vlastnost nekomu nelibi, pak nechapu, proc v Delphi programuje a
neprejde na neco pro nej vhodnejsiho. Ja napriklad nechci zadne
automaticke uvolnovani pameti a chci pouzivat pointery, protoze resim
urcite typy uloh, kde pointery potrebuji, a naopak rozhodne
nepotrebuji automaticke uvolnovani pameti - leda v pripade, ze bych
takovou automatiku mohl podle potreby pro dany objekt (blok pameti)
vypnout. Zavedeni uprav, ktere zde propaguje Erik, by pro me
znamenalo od Delphi odejit.

On 12 Jan 2002 at 21:24, Petr Fejfar wrote:

> > To je ale stale o tomtez. Jak napises takovy stream? Nemluve o tom,
>
> To neni prece argument - konec koncu vsechno nakonen bezi na urovni
> strojoveho kodu. Diskuze je prece o urovni abstrakce, kterou poskytuje
> ten ktery jazyk/virtualni pocitac programatorovi. Takze predpokladam,
> ze v jazyku, ktery me ochudil o praci s pointery bude napr. stream
> implementovan, takze ho nemusim psat.
>
> > ze prace s takovym objektem je znacne nepohodlna a narocnejsi jak na
> > vykon, tak i na psani kodu. Krome toho nacitani velkych objemu dat
> do
> > streamu take neni to prave orechove.
>
> Proc? Kompilator muze soubor namapovat do pameti a ty se o to nemusis
> na urovni aplikace vubec starat.
>
> Nepohodlne IMHO bude definovat pro kazdou datovou entitu nejakou tridu
> nebo alespon typ - tady je prace s pointery bezesporu uspornejsi i.e.
> mene pracna, ovsem za cenu vetsi pravdepodobnosti chyby.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


OT: tabulky v HTML

[*] Advanced Utilities <delphist(zv)atlas(tec)cz> - 12.1.2002 23:46:02

tak pouzij v prave bunce misto dalsi tabulky, ktera je pouze kvuli barve,
zmenu barvy pozadi te bunky.
a nebo tam nasazej do te table1x1 n�kolik <br> nebo ;nbsp za ten text

----- Original Message -----
From: "Hurricane" <hurricane(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, January 05, 2002 4:24 PM
Subject: OT: tabulky v HTML


> Zdravim
>
> Omnlouvam se za OT, ale nikde jinde jsem odpoved nenasel.
>
> Mam celou stranku rozdelenou tabulkou na dva sloupce. V pravem sloupci je
> dalsi tabulka 1x1 (funguje pouze jako barevne ohraniceni). Vyska textu v
> levem sloupci je vetsi nez v pravem. Tabulka 1x1 mi obemkne cely text v
> pravem sloupci, ale ja chci, aby vyplnila cely prostor praveho sloupce.
Ted
> pod ni zustava prazdny prostor. Nastaveni height="100%" nepomaha.
>
> Diky
> Hurricane
>

screen saver

[*] Milan ��ek - 13.1.2002 00:30:32

Ahoj,
pri tvorbe sveho prvniho Screen Saveru jsem narazil na nekolik otazek:

1) Proc mi nefunguje {$D SCRNSAVE "Muj sporic"}? Samozrejme muzu soubor
pojmenovat dlouhym nazvem, pak je to v poradku. Cetl jsem to jako
doporuceni, tak se ptam, jak je to spravne?
2) pri nahledu mi prilis nevyhovuje vykreslovani pomoci Canvas. Da se v
nahledovem okne zobrazit napr. animovany GIF? V pripade avi souboru se
trochu obavam potreby kodeku. Jde mi o 100% funkcnost.
3) muj sporic obrazovky by mel mit pouze funkci spoustece (nema zadny
form) - pokud uzivatel neni po urcitou dobu aktivni, sporic zavola
externi exe aplikaci. V ni bude pochopitelne osetreno ukonceni.

Mam problem se zavolanim externi aplikace:
Je lepsi pouzit ShellExecute nebo CreateProcess? ShellExecute mi docela
funguje, ale CreateProcess za zadnou cenu:

// if not CreateProcess(nil,
// PChar(FullPath), { pointer to command line
string }
// nil, { pointer to process
security attributes }
// nil, { pointer to thread
security attributes }
// true, { handle inheritance flag
}
// CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,
{ creation flags }
// nil, { pointer to new
environment block }
// nil, { pointer to current
directory name }
// StartupInfo,ProcessInfo) then
ShowMessage('Failed to spawn updater process');

Vzdy nastane chyba: "Spravna inicializace aplikace (0xc0000142) se
nezdarila. Klepnutim na tlacitko OK muzete aplikaci ukoncit."
Mozna ani nebudu potrebovat znat stav bezici exe aplikace a sporic po
jejim spusteni ukoncim. Potrebuji ale zjistit, jestli spusteni probehlo
v poradku. Idealni by bylo, kdybych sporic ukoncil tesne po exe
aplikaci, ale neni to podminka.

Diky

S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP1) Win2k (SP2)
a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


Nemuzu rozchodit v Delphi napsany modul do Apache

[*] Hojan <hojan(zv)sin.cvut(tec)cz> - 13.1.2002 01:01:16

> > LoadModule Project1_module modules/Project1.dll
> Toto upravte na
> LoadModule project1-handler Project1_module modules/Project1.dll

Nefunguje mi to, apache dava chybovou hlasku:

Syntax error on line 193 of e:/program files/apache group/apache/conf/httpd.conf
LoadModule takes two arguments, a module name and the name of a shared object
file to load it from.

Zkusil jsem dat tam jen jmeno handleru nebo prejmenovat modul
na "project1-handler", ale oboji bez uspechu.


Jan Rychtar

Tlac (tprinter.newpage) a HP LJ 1000

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 13.1.2002 06:01:09

Zdravim,
problem s tloustkou cary asi souvisi s rozlisenim tiskarny. Cim je rozliseni
vetsi, tim budou cary tenci.
Mozna se mylim
Pavel


> ovladace od HP jsou vubec zahadne - je zase pres QR z
> Delphi5 tisknu formular - tabulku s tlustymi carami (2body),
> aby ale vubec bylo videt, ze jde o "tlustou" a ne tenkou
> caru, tak musim tloustku nastavit aspon na 12bodu....preview
> pak vypada vskutku zajimave, ale tiskne to spravne...
> kdybyste mel nekdo nejaky tip na napravu, tak se prosim
> ozvete.
> Filip Kinsky
>
> On Wed, 9 Jan 2002 07:59:46 +0100
> "Miroslav Barica" <miroslav.barica(zv)matador.sk> wrote:
> > tak to mam smolu, netlacim cez quickreport a nemam ani
> > delphi2 ;o). tlac
> > je zalozena cisto na priamej tlaci cez textout. zrejme
> > moc moznosti nie
> > je ako tento problem vyriesit?
> >
> > >Ahoj,
> > >stretol...;-(
> > >"Usporne" to tlaci aj na Minolta QMS Magicolor 2200
> > Desklaser. Ale
> > dospel
> > >som k zaveru, ze stary program z cias Delphi 2.0 tlaci v
> > poriadku -
> > >QuicReport 1.0d .
> > >Lauko.
> >
> >
> > >vsetko krasne funguje, akurat len pri tlaci
> > viacstrankovych zostav na
> > >HPLJ1000 po skonceni tlace vyhodi jeden papier, s celou
> > zostavou. cize,
> > >vsetky stranky tlaci na jednu stranu. akoby
> > tprinter.newpage
> > ignorovalo.
> > >nestretol sa niekto s tymto krasnym javom? zeby nejaky
> > economod? ;o).
> > >dik, maju sa....
> >
> >

Parametr

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 13.1.2002 06:22:25

Zdravim,
no pravdepodobne budes muset Buttony dymanicky generovat dle tvych
pozadavku.
Ja mam na to vytvoreny Unit FMenu, kde nacitam data - nazvy tlacitek - z
nejakeho textaku a tak vyrabim ruzna nabidkova menu.
Nevim co myslis <zobrazily dalsi funkce aplikace.> Jestli jsou ty dalsi
funkce jenom dalsi tlacitka, tak je to v pohode, jestli potrebujes generovat
i nejake Labely, Edity a pod. tak uz si pekne zaprogramujes, protoze musis
urcit kde a co a jak bude umisteno.
Vim o cem mluvim, protoze jsem to programoval a i doprogramoval a pul roku
jiz pouzivam.

Jeslti mas zajem o informace, napis na soukromy mail privat(zv)kopr(tec)cz
Pavel

----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz


> Poradi nekdo jak napsat aplikaci aby se pri zadani parametru zobrazily
dalsi
> funkce aplikace.
>
> napr. test.exe zobrazi se form s Buttonem1
> test.exe test zobrazi se form s Buttonem1 a Buttonem2
>
> Diky za raduViktor Marek
> viktor(zv)mbox.vol(tec)cz
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.313 / Virov� b�ze: 174 - datum vyd�n�: 2.1.2002


Varian Skin Factory - KRACH?

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 13.1.2002 06:35:23

No ja bych tak zoufaly nebyl,
behem kratke doby nekdo z firmy zalozi novou firmu a ty komponenty - asi pod
jinym nazvem - se budou nabizet dale. Jettli se mylim, tam mas smulu a je to
vlastne dobry poznatek - pro tebe - do budoucna, ze mas brat pouze
komponenty se zdrojakama.

----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz

> mam aplikaci postavenou na VSF - freeware. Byl jsem nemile prekvapen,
> kdyz jsem se na strankach teto firmy docetl o ukonceni jeji aktivity.
> Pocital jsem s dalsim rozsirovanim moznosti - take jsem dal nekolik
> navrhu na vylepseni. Bylo mi slibeno, ze v dalsi verzi bude. Firma
> ale konci a ja mam rozestavenou aplikaci, komponenty VSF bez zdroju.
> Bohuzel uz neni ani mozne komponenty zakoupit.
>
> Chci se zeptat, jak je to v pripade, ze takova firma "zkrachuje" s
> licencni politikou? Je mozne si sehnat zdrojove kody, aniz bych se
> vystavil nejakemu postihu? Pokud ano, najde se nekdo, kdo tyto
> komponenty vlastni? Mozna bych je i odkoupil. I kdyz pro freeware
> aplikaci... :-(
>
> Diky
>
> S pozdravem Milan Cizek, amatersky programator, D5 Ent (SP1), D6 Ent
> Win2k (SP2,Pre-SP3) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ:
> 59826637
>
> ______________________________________________________________________
> Jak si stoji kurz koruny? http://kurzy.seznam(tec)cz


Zarovnani TEdit doprava nefunguje pod Win95?

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 13.1.2002 06:46:30

Zdravim,
v TKEdit jde i pod win95 zarovnavani doprava.
Koukni na http://www.kopr(tec)cz/delphi/index.htm

----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz


> Mam tutez smutnou zkusenost. Je to bohuzel dane nejakym DLL ve Windows (uz
> si nepamatuji jakym), me to delalo i v ranejsi verzi Windows 98. Takze s
tim
> asi nic nenadelas, pokud sam neprepises zobrazovani. Sorry.
>
> Jan Skopovy
>
> From: "Ing. Petr �vejda" <lingvista(zv)lingvista(tec)cz>
> Subject: Zarovnani TEdit doprava nefunguje pod Win95?
>
> > Pod Win 98 a Win2000 mi dobre funguje moje komponenta TEdit, ktera
> zarovnava
> > text doprava. Zarovnani vsak nefunguje pod Win95. Nevite nekdo, ktery z
> > prikazu ma toto omezeni a popr. jak komponentu prepsat, aby to fungovalo
i
> > pod Windows 95?
>

Focus a Drag&Drop

[*] Tom� Ju���ek - 13.1.2002 11:22:20

Ahoj,
potreboval bych, aby okno neprijalo focus (nedoslo k jeho vykresleni do
popredi) pokud zacinam drag&drop operaci prave na nem. V samotnych windows
to funguje napr pri pretahovani souboru. Je to mozne?

S pozdravem

Tomas Juricek
E-mail: TJSof(zv)Seznam(tec)cz
ICQ: 101381896


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 13.1.2002 14:02:52

> Chci vedet, jak zjistis informace z tabulek, ktere jsou ulozeny v
> exe. Napriklad, jak tam najdes nejaky resource, kde je ulozeny, v
> jakem jazyce, jak je velky atp., aniz bys pouzil ukazatel.

mozem sa pohybovat po subore pomocou Seek funkcie a citat
zo suboru, co potrebujem, alebo mozem nacitat subor do pola
(bajtov) a na "navigaciu" pouzit index pola. Takto precitam
EXE plus vytvorim objekty, do ktorych ulozim jednotlive casti.
Objekty mi potom poskytuju pohodlny sposob na ziskanie akejkolvek
informacie a aj moznost dalsieho spracovania (napr. vlozenie dalsej
sekcie alebo zmazania sekcie).

> S ukazateli se to resi tak, ze se nastavis na zacatek, zjistis, kde
> je prvni tabulka s informacemi o sekcich, v ni najdes tu sekci,
> kterou hledas, pak skocis na zacatek te sekce a prohledavas dal, az
> najdes co potrebujes. Skoky se realizuji tak, ze k pointru prictes
> vhodnou hodnotu, ktera "dopravi" zacatek ukazatele na potrebnou
> adresu uvnitr prohledavane struktury. Exe jsem vzal jako priklad,
> takto se pracuje s jakymkoliv podobnym blokem pameti, ktery nejevi
> zadnou dostatecnou pravidelnost, na kterou by se daly pouzit _pouze_
> objekty.

Kazdy subor ma urcitu strukturu. Format exe suboru je znamy, a vlastne
v zadani uz si vymenoval niektore casti, ktore obsahuje. OOP umoznuje
vytvorit pomocou objektov model tohto suboru. Je to ovela inteligentnejsi
a bezpecnejsi sposob ako s nim pracovat v porovnani so smernikami.

Erik


Obsah k 1001 T&T

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 13.1.2002 14:11:06

Chcel by som sa spytat (pripadne poprosit) Petra Vonese,
ci je mozne zverejnit obsah k %subj% v elektronickej forme.

Vasu knihu pouzivam tamer kazdy den, ale casto mi dlho
trva kym nieco najdem alebo zistim, ze tam nie je...

Verim, ze by nam to mnohym urychlilo pouzivanie Vasej
inak skvelej knizky...

P.S.
Este vacsia pomoc by bola, keby bolo mozne vygenerovat
ku knizke register, ktory chyba uplne,
(samozrejme by stacil elektronicky :-)

S uctou
Jaroslav Popluhar, zacinajuci vyvojar v Delphi



---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.313 / V�rusov� datab�za: 174 - d�tum vydania: 2. 1. 2002

ODBCe - pole BLOB v dotazu musi byt posledni?

[*] borkovec(zv)email(tec)cz - 13.1.2002 15:38:18

Dobre odpoledne,
pred nejakym casem jsem pracoval s ODBCe a nyni me zarazil %subj%. Je to opravdu tak, nebo jsem nekde neco nechtene nastavil? Mel jsem dojem, ze tehdy mohly byt BLOBY kdekoliv. Ted to vyhazuje chybu index descriptoru
D5Prof, NT4, MSSQL2000
R&B

---
---------> Created by Email(tec)cz
http://www.email(tec)cz <--- Get Your Free Email


Varian Skin Factory - KRACH?

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 13.1.2002 16:11:39

Haj hou!

On 12 Jan 2002, at 11:41, Erik Salaj wrote:

> mal som uz viacero zdrojakov v ruke, ktore boli rovnako uzitocne ako keby
> neboli. Jednoducho bolo nevyhnutne ich prepisat, ziadna ich modifikacia ani
> studium z ekonomickeho hladiska neprichadzali do uvahy. To ako priklad,
> ze niekedy je jedno mat a nemat zdrojak, a ze teda zdrojak z Open Source
> nemusi este nic znamenat. Povedal by som, ze prave v nekomercnych
> oblastiach software je toto riziko zvysene a ze freewarom sa casto stava
> prave software, ktory by bol inak nepredajny.

To si snad delas legraci ? Naopak u free-se-zdroji a open source
se muzes podivat na zdrojaky jeste pred tim, nez se rozhodnes to
pouzit nebo ne. U komercniho se ti muze naopak stat, ze "navrch
huj a vespod fuj", ale to zjistis az kdyz za to zaplatis. Klasickym
prikladem je Async Pro a QuickReporty.

Osobne nemam nic proti komercnim knihovnam, ale kdyz hledam
vhodne reseni pro sve potreby, vzdy se nejprve rozhlizim po free se
zdroji nebo po open source (nejen proto ze je zadarmo, ale prave
kvuli tomu, ze se muzu podivat dovnitr a roshodnout se), a teprve
kdyz nic vhodneho nenajdyu, tak testuji komercni nabidku.

> Okrem toho povedat, ze ved ja si to dorobim, ak tam nieco nie je,
> ze ja si to upravim ak budem nieco ine potrebovat, ze ved ja si
> opravim chyby ak to je narychlo zbuchane a plne chyb - to nie je
> problem povedat, ale uz tazsie urobit (a potom spocitat kolko to
> cele vlastne stalo).

Absolutne ZADNE komponenty nebo knihovny nevyhovi na 100%.
Vzdy je drive ci pozdeji neco upravit nebo opravit, i kdyby to mela
byt naprosta drobnost v rozsahu jednoho radku. Pak dostupnost
zdroju a predevsim jejich _kvalita_ je dulezita.

> V Open Source su takisto rizika, ako aj u kazdeho software, a
> povedal by som, ze este vecsie ako u ineho druhu software a to
> preto, ze je to cele znacne netransparentne a necitatelne (kam to
> ti autori smeruju, co vlastne za to chcu) a mne sa to v mnohych
> pripadoch javi ako cira spekulacia a to je dovodom k mojmu
> negativnemu vztahu k takymto systemom.

Ted uz si ale urcite delas legraci ? Naopak open source je uz z
principu ten nejtransparentnejsi zpusob vyvoje. Samozrejme, ze i
zde hrozi riziko, ze autori prestanou mit zajem ve vyvoji pokracovat,
ale:

a) Nikdy se to nestane ze dne naden, a diky transparentnosti je
mozne to zaznamenat vcas.

b) Vzdy je tady moznost, ze nekteri uzivatele (take programatori)
se rozhodnou ve vyvoji pokracovat.

U komercniho SW zadne zaruky podpory ani vyvoje take nemas, a
pokud veris slibum firem, tak jsi "velmi duverivy". Firmy podporuji
sve produkty jen do te miry, do ktere se jim to vyplati a jenom tim
zpusobem ktery se jim vyplati. Svet je plny "opustenych" produktu.
S open source (nebo i komercnim produktem od ktereho si muzes
koupit zdroje) jsi alespon kryty v tom, ze muzes podporovat sam
sebe, nebo si na to nekoho najmout. A taky nejsi nuceny kupovat
upgrade jen proto, aby jsi ziskal opravu nejake chyby.

Howgh!

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


ODBCe - pole BLOB v dotazu musi byt posledni?

[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 13.1.2002 17:28:07

> pred nejakym casem jsem pracoval s ODBCe a nyni
> me zarazil %subj%.

Neznam ODBCe, ale v ODBC zalezi na driveru, zda
umoznuje nahodne poradi cteni polozek (napr. Access
to umoznuje, MSSQL Server nikoliv).
Zalezi tedy na implementaci v ODBCe, zda vsechny
polozky nacte do sveho bufferu a tobe umozni je
zobat jiz nahodile. Problem tohoto zpusobu muze byt
prave u BLOB polozek, ktere mohou byt znacne
velke, a muze byt nevhodne je nacitat drive, nez
o ne pozadas. Je mozne, ze prave z tohodle duvodu
musi byt BLOBy na konci a jsou nacitany az pri
pozadavku.

Daniel

Problem pri ladeni BDE aplikacie

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 13.1.2002 17:54:35

Pokial pri ladeni BDE aplikacie v D5 pouzijem uprostred ladenia
Program Reset (Ctrl-F2) cele BDE sa potom chova divne,
teda neda sa dalej pouzivat a generuje rozne chyby
typu - locked record, a pod. (pricom lck subor neexistuje...)

Nestava sa to vzdy, niekedy pomaha restart Delphi
vynimocne treba restartovat cely OS (Win2000).

Neda sa tomu nejako vyhnut - nastavenim alebo pod.?

Jaro

Varian Skin Factory - KRACH?

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 13.1.2002 18:19:19

> Odes�latel: Pavel Cisar <pcb(zv)atlas(tec)cz>
Ahoj Pavle,
nechci komentovat Tvuj pomerne rozsahly prispevek, souhlasim s Tebou.
Pekne ses "rozohnil".

Moc se tesim na Tvoji prednasku
Open Source z pohledu programatora a uzivatele
na seminari Delphi 2002 (6.-7.2.2002)

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Predavani stringu (VB - Delphi)

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 13.1.2002 18:21:10

> Odes�latel: Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz>
> mam program (ve VB) a DLL v Delphi, zatim jsme si predavali parametry jen
> Integer, ted potrebujeme i typ string (PChar, ..). Mate s tim nekdo
> zkusenosti, a muzete poradit, jaka cesta bude nejlepsi?
Nevim, co ti poradit.
Proste deklaruj parametry procedur jako PChar a taky se k nim tak chovej.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Ochrana shareware programu

[*] Tom Lebr <tom.lebr(zv)volny(tec)cz> - 13.1.2002 18:45:31

Dobry den

> > Takze se primlouvam...nedelejte ochrany.... mam za to ze se to
nevyplati.
>
> :) Taky se primlouvam... nezamykej byt :)
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>

No nevim jestli jsem takovy "expert", ale otevrit FABku (nebo ty bezne
prodavane "bezpecnostni" zamky) plansetou se naucite opravdu za chvilku,
chce to jen trochu trenovat, protoze cviceni dela mistra. Nastesti se jednou
takto ziskany klic neda dat na Astalavistu, pak by opravdu nemelo smysl
zamykat :)

Ale vazne - moje zkusenost rika, ze nejlepsi "ochrana" jsou sluzby, doplnky,
aktualizace, vylepsovani produktu na miru a osobni kontakt - zijeme v
menicim se svete, pro moralni zastarani programu bohate staci aby treba
Ceska posta zmenila strukturu poplatku nebo formulare na dobirky - hned je o
registrace zahrnujici bezplatny update postarano.

s pozdravem

Tomas Lebr


Balicky pouzite v projektu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 19:31:16

From: "Pavel Malinsk�" <spiderland(zv)iol(tec)cz>
> nevitem, prosim, nekdo o prostredku, kterym
> by bylo mozne zjistit, ktere balicky jsou potreba
> pro beh aplikace nebo knihovny prelozene s balicky?

Ahoj,

balicky se ti zobrazi po prelozeni projektu kdyz das z menu v IDE:
Project | Information.

Dale muzes ziskat seznam importovanych knihoven programove, napriklad pomoci
nastroju typu Dependency Walker. Jeden takovy najdes treba tady:
http://www.volweb(tec)cz/pvones/delphi/

Petr Vones

screen saver

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 19:33:21

From: "Milan ��ek" <cizek.milan(zv)seznam(tec)cz>
> 1) Proc mi nefunguje {$D SCRNSAVE "Muj sporic"}? Samozrejme muzu soubor

Ahoj,

spravna syntaxe je:

{$DESCRIPTION 'text'}

Petr Vones


Kouslej program

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 19:35:07

From: "Jan N�mec" <yendikdelphi(zv)seznam(tec)cz>
> mam Win98 a Dhi5,
> "obcas" se stane, ze mi muj program spadne, od programu i Delph "neni
> odpoved"... Pokud odprasknu Delphi, pak se nekdy stane, ze Windowsy nejak

Ahoj,

Windows 9x nejsou schopny se plne zotavit z takoveho padu. Pokud chces ladit
aplikace tak prejdi na NT.

Petr Vones


jak na navratovou hodnotu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 13.1.2002 19:37:11

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>

> ja to povazuji za argument. Stream na soubor je neco jineho nez
> stream na muj specificky blok pameti. Nekdy potrebuji soubor

Tak to je omyl: blok pameti stejne jako cast souboru atd. neni z
logickeho hlediska nic jineho, nez posloupnost elementarnich
alokacnich jednotek, kterou potrebujes nejak intepretovat a nejak s ni
operovat.

Stream pak neni nic jineho nez vhodnou abstrakci takove posloupnosti.> pretypuji si pointer na PInteger(P)^ a mam vystarano. Takze pak mohu
> udelat treba tohle: Inc(PByte(P), PInteger(P)^) a jsem tam, kde
potrebuji byt.
> V pripade streamu si musim nadeklarovat promennou, do ni nacist
hodnotu,
> a pak udelat skok dlouhy Cislo - SizeOf(integer).

PInteger(P)^ neni take nic jineho, nez nacteni hodnoty do promenne
nejakou instrukci napr. MOV AX,[SI+BX]

Kdyz vezmu optimalizacni moznosti dnesnich prekladacu, tak si dovedu
predstavit, ze lze implementovat/prekladat ekvivalentni operaci nad
streamem napr.

S.SeekForward(S.ReadInteger);

ktera pokud by se funkce seek/read pouzily v intrinsic verzich, tak by
se skoro nelisila od prekladu operaci s pointery.

A pokud bys napr. nekdy pozdeji potreboval u Tve aplikace otocit
endian napr. pri prechodu na jinou platformu nez wintel (nam se
stalo), tak bys videl, jak je implementace pomoci streamu uzitecna -
prepsal bys nekolik metod u streamu a zbytek kodu by zustal bezezmeny.
Zatimco v tom pointerovem gulasi bych to upravovat nechtel ;-)> Zavedeni uprav, ktere zde propaguje Erik, by pro me
> znamenalo od Delphi odejit.

Pravdu mas v tom, ze urcite ulohy, zejmena ktere operuji s legacy
daty,
je nutne psat pomoci tradicnich metod jako je adresace pameti druheho
a vyssiho radu.

Otazkou je, jestli kvuli tomu zatezovat prevaznou cast kodu, ktera
timto zpusobem napsana byt nemusi a zvysovat znama rizika plynouci z
prime prace s operacni pameti. Napr. jeden z nejnovejsich jazyku C# ma
GC a je navrzen bez pointeru, ale pro ty vzacne pripady, kdy to bez ni
ch nejde, umoznuje psat tzv. unsafe kod, kde muzes pracovat s pointery
a pomoci deklarace fixed vyjmout data z pusobnosti GC.

Konec koncu i Borland tim, ze v Delphi zavedl pro dereferenci instance
tridy syntaxi bez operatoru dereference, vykrocil timto smerem.
Bohuzel, zustal jen u te kosmeticke zalezitosti, ktera mirne zvysuje
citelnost kod.

Bye, pf

Zablokovani posunu okna

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 19:42:34

From: "SPELZA s.r.o." <spelza(zv)spelza(tec)cz>
> dik za radu. Funguje to ale pouze v pripade, ze je
>
> BorderIcons:= [biSystemMenu];
>
> ja ale potrebuji mit listu okna bez jakychkoliv ikonek a proto mam
>
> BorderIcons:= [];

Ahoj,

procedure TForm1.WMNCHitTest(var Message: TWMNCHitTest);
begin
inherited;
with Message do
if Result = HTCAPTION then
Result := HTCLIENT;
end;

Petr Vones


Blikajici pismo

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 19:50:31

From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> Ve Windows nic takoveho neni.

Coz je vcelku logicke. Nejsnazsi reseni je pomoci timeru. Pokud to ale bude
nekdo delat jako komponentu tak by se mel vyvarovat zakladni chyby, kde se
pouzije zvlastni timer pro kazdy takovy blikajici label. Misto toho je vhodne
si udelat spolecnou casovou zakladnu s jednim timerem, kde se kazdy vytvoreny
label zapise do seznamu notifikaci udalosti tohoto timeru a podle toho bude
pak blikat.

Petr Vones


JCLStrings.StrSearch(....,?Index?)

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

From: "Roland Turcan" <rolo(zv)sedas.sk>
> Help hovori toto:
> ----
> StrSearch
> The search starts at the supplied index and is case-sensitive.
> ----
> Ale parameter index nie je akceptovany a vzdy mi vrati poziciu prveho
> vyskytu. Nie je na toto nejaky update?

Ahoj,

jako mas verzi JCL ? Me to tu funguje spravne.

Petr Vones


SNAPSHOT

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 20:10:24

From: "Zden�k Sv�en" <dkonf(zv)seznam(tec)cz>
> Zjistim ten handle pomoci FindWindow? Nebo podle ceho?

Ahoj,

musis zjistit alespon tridu toho okna (pro konzoli je to tusim 'tty'). K tomu
muzes pouzit nastroj WinSight ktery se dodava s Delphi.

Petr Vones


problem s threadem

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 20:12:17

From: "Milan ��ek" <Cizek.Milan(zv)seznam(tec)cz>
> nensala by se nejaka nazorna ukazka nebo odkaz, klidne i do
> literatury? Jedine, co vim o eventech je to, ze existuji. :-(

Doporucuju knihu "Windows pro pokrocile a experty" ktera sice uz vysla pred
mnoha lety, ale porad se da obcas nekde koupit. Jde o preklad knihy J.Richter:
Advanced Windows 3rd edition.

Petr Vones


Dynamicka zmena velikosti recordu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 20:15:36

From: "Dalibor Falt�nek" <dalibor.faltynek(zv)orgrez(tec)cz>
> Chytremu napovez, hloupeho kopni..., muzes to kapku konkretizovat? Ja s tema
> objektama zase takovy kamarad nejsem.

Stahni si priklady k teto knize:
http://www.newriders.com/books/title.cfm?isbn=1578702216

a podivej se na Sample07 - GasForm.pas

Petr Vones


BMP-ICO este raz

[*] <idulgerov(zv)centrum.sk> - 13.1.2002 20:54:02

Zdravim vsetkych.
Kedze nikto nereagoval, skusim este raz,
ale uz naposledy, slubujem.

Prave som experimentoval s ikonami,
a mam taku drobnu otazocku.
Takze konvertujem bmp subor na ikonu
pomocou CreateIconIndirect, vsetko je ok
az na to ze ked tu ikonu ulozim do
suboru automaticky sa mi skonvertuje
na 16 farieb. Pritom pri kontrolnom
vykresleni na Form je vsetko OK, t.j 256 farieb.
Preco ?


Ivan Dulgerov
programator-amater, mladost v prdeli do penzie daleko
SLOVAK REPUBLIC
K chatovaniu je tu http://www.XChat.sk
Zalo�te si svoj mail na http://mail.centrum.sk


jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 13.1.2002 21:05:10

On 13 Jan 2002 at 14:02, Erik Salaj wrote:

> > Chci vedet, jak zjistis informace z tabulek, ktere jsou ulozeny v
> > exe. Napriklad, jak tam najdes nejaky resource, kde je ulozeny, v
> > jakem jazyce, jak je velky atp., aniz bys pouzil ukazatel.
>
> mozem sa pohybovat po subore pomocou Seek funkcie a citat
> zo suboru, co potrebujem, alebo mozem nacitat subor do pola
> (bajtov) a na "navigaciu" pouzit index pola. Takto precitam
> EXE plus vytvorim objekty, do ktorych ulozim jednotlive casti.
> Objekty mi potom poskytuju pohodlny sposob na ziskanie akejkolvek
> informacie a aj moznost dalsieho spracovania (napr. vlozenie dalsej
> sekcie alebo zmazania sekcie).

:-)) To je opravdu efektivni metoda. Uz jsi neco takoveho zkousel nad
vetsimi objemy dat, ktera nejsou pravidelna a obsahuji PChary? Vsadim
se, ze nejen ze takovyhle kod bude neuveritelne pomaly, ale take tam
nasekas vic chyb a budes ho dele ladit. Klidne se muzeme pokusit o
zcela konkretni ukazku.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


BMP-ICO este raz

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 21:10:05

From: <idulgerov(zv)centrum.sk>
> Prave som experimentoval s ikonami,
> a mam taku drobnu otazocku.
> Takze konvertujem bmp subor na ikonu
> pomocou CreateIconIndirect, vsetko je ok
> az na to ze ked tu ikonu ulozim do
> suboru automaticky sa mi skonvertuje
> na 16 farieb. Pritom pri kontrolnom

Ahoj,

TIcon neumi ulozit ikony s vice jak 16ti barvami.

Petr Vones


jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 13.1.2002 21:11:16

On 13 Jan 2002 at 19:37, Petr Fejfar wrote:

> PInteger(P)^ neni take nic jineho, nez nacteni hodnoty do promenne
> nejakou instrukci napr. MOV AX,[SI+BX]
>
> Kdyz vezmu optimalizacni moznosti dnesnich prekladacu, tak si dovedu
> predstavit, ze lze implementovat/prekladat ekvivalentni operaci nad
> streamem napr.
>
> S.SeekForward(S.ReadInteger);
>
> ktera pokud by se funkce seek/read pouzily v intrinsic verzich, tak by
> se skoro nelisila od prekladu operaci s pointery.
>
> A pokud bys napr. nekdy pozdeji potreboval u Tve aplikace otocit
> endian napr. pri prechodu na jinou platformu nez wintel (nam se
> stalo), tak bys videl, jak je implementace pomoci streamu uzitecna -
> prepsal bys nekolik metod u streamu a zbytek kodu by zustal bezezmeny.
> Zatimco v tom pointerovem gulasi bych to upravovat nechtel ;-)
>
>
> > Zavedeni uprav, ktere zde propaguje Erik, by pro me
> > znamenalo od Delphi odejit.
>
> Pravdu mas v tom, ze urcite ulohy, zejmena ktere operuji s legacy
> daty, je nutne psat pomoci tradicnich metod jako je adresace pameti
> druheho a vyssiho radu.
>
> Otazkou je, jestli kvuli tomu zatezovat prevaznou cast kodu, ktera
> timto zpusobem napsana byt nemusi a zvysovat znama rizika plynouci z
> prime prace s operacni pameti. Napr. jeden z nejnovejsich jazyku C# ma
> GC a je navrzen bez pointeru, ale pro ty vzacne pripady, kdy to bez ni
> ch nejde, umoznuje psat tzv. unsafe kod, kde muzes pracovat s pointery
> a pomoci deklarace fixed vyjmout data z pusobnosti GC.

Ja take nepsal, ze programuji zasadne pomoci ukazatelu. Objekty delam
vsude tam, kde jsou ucelne. Jsou vsak urcite typy uloh, kde prace s
ukazateli je nejefektivnejsi jak na rychlost, tak na velikost psaneho
kodu, a tedy i na citelnost.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


Varian Skin Factory - KRACH?

[*] Erik Salaj <winsoft(zv)stonline.sk> - 13.1.2002 22:24:22

> Ted uz si ale urcite delas legraci ? Naopak open source je uz z
> principu ten nejtransparentnejsi zpusob vyvoje. Samozrejme, ze i

nezmysel, software je daleko viac nez nejaky zdrojak.

> zde hrozi riziko, ze autori prestanou mit zajem ve vyvoji pokracovat,
> ale:
>
> a) Nikdy se to nestane ze dne naden, a diky transparentnosti je
> mozne to zaznamenat vcas.

mozno

> b) Vzdy je tady moznost, ze nekteri uzivatele (take programatori)
> se rozhodnou ve vyvoji pokracovat.

mozno

> U komercniho SW zadne zaruky podpory ani vyvoje take nemas, a
> pokud veris slibum firem, tak jsi "velmi duverivy". Firmy podporuji
> sve produkty jen do te miry, do ktere se jim to vyplati a jenom tim
> zpusobem ktery se jim vyplati. Svet je plny "opustenych" produktu.

U komerneho software mam jasny mechanimus (netvrdim, ze idealny)
v ktorom ekonomicke zaujmy a konkurencny tlak nahanaju k produkcii
kvalitneho software. U Open Source tento zakladny mechanizmus
nevidim. A tu je ta dilema, ktoru riesime. Je to rovnake ako ked by
sme chceli porovnat dva vyrobky: prvy vyrobeny v komunistickej
ekonomike a druhy v kapitalistickej. Ten prvy vyrobok je daleko lacnejsi.
Otazka: je aj lepsi a vyhodnejsi? Moja odpoved je, ze u prevaznej
vecsiny vyrobkov nie je. Je mensie riziko zakupenia prveho vyrobku?
Mozno, niekedy. A je celkovo ako system vyhodnejsia komunisticka
ekonomika? Urcite nie.

Erik


jak na navratovou hodnotu

[*] Erik Salaj <winsoft(zv)stonline.sk> - 13.1.2002 22:25:13

> Delphi pouzivam proto, ze me prilis neomezuje vysokourovnovymi
> udelatky a pusti me do hloubky, kdyz potrebuji. Jestlize se tato
> vlastnost nekomu nelibi, pak nechapu, proc v Delphi programuje a
> neprejde na neco pro nej vhodnejsiho. Ja napriklad nechci zadne
> automaticke uvolnovani pameti a chci pouzivat pointery, protoze resim
> urcite typy uloh, kde pointery potrebuji, a naopak rozhodne
> nepotrebuji automaticke uvolnovani pameti - leda v pripade, ze bych
> takovou automatiku mohl podle potreby pro dany objekt (blok pameti)
> vypnout. Zavedeni uprav, ktere zde propaguje Erik, by pro me
> znamenalo od Delphi odejit.

Delphi podla mna nie je urcene ani vyhodne pre nizkourovnove zalezitosti
ale typickou oblastou jeho pouzitia su databazove aplikacie. Tam
korektnost a spolahlivost su prvorade poziadavky a otazky, ci je
vyhodnejsi smernik, alebo nie prakticky nemaju vyznam. Ozaj, preco
nie su smerniky napr. v SQL serveri, ked je to take vyhodne, ale
namiesto nich tam obvykle byva podporovany vysokourovnovy
SQL jazyk? Myslis, ze keby tam doplnili smerniky, ze by to
prinieslo nejake zlepsenie?

Erik

Problem pri ladeni BDE aplikacie

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.1.2002 22:38:54

From: "Jaroslav Popluhar" <delphi1(zv)acc.sk>
> Pokial pri ladeni BDE aplikacie v D5 pouzijem uprostred ladenia
> Program Reset (Ctrl-F2) cele BDE sa potom chova divne,
> teda neda sa dalej pouzivat a generuje rozne chyby
> typu - locked record, a pod. (pricom lck subor neexistuje...)
>
> Nestava sa to vzdy, niekedy pomaha restart Delphi
> vynimocne treba restartovat cely OS (Win2000).
>
> Neda sa tomu nejako vyhnut - nastavenim alebo pod.?

Ahoj,

vyhnout se tomu da jedine tak, ze bud prestanes BDE pouzivat nebo budes
ladenou aplikaci vzdy korektne ukoncovat.

Petr Vones


GC, Delphi, OOP Was: jak na navratovou hodnotu

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

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> Delphi podla mna nie je urcene ani vyhodne pre nizkourovnove zalezitosti
> ale typickou oblastou jeho pouzitia su databazove aplikacie. Tam

Tohle je myslim prave ten zakladni omyl. Delphi neni dalsi PowerBuilder nebo
Access (s lepsim jazykem). To ze Borland propaguje Delphi hlavne na databaze
je prave jedna z nejvetsich chyb kterou dela, protoze to je (byl by *) dobry
nastroj pro Windows desktop aplikace obecne.

> vyhodnejsi smernik, alebo nie prakticky nemaju vyznam. Ozaj, preco
> nie su smerniky napr. v SQL serveri, ked je to take vyhodne, ale
> namiesto nich tam obvykle byva podporovany vysokourovnovy
> SQL jazyk? Myslis, ze keby tam doplnili smerniky, ze by to

To je prece uplne jina oblast, v interpretacnich jazycich jako je SQL, PHP,
ASP samozrejme ukazatele nebudou, protoze tam o efektivitu kodu z hlediska
rychlosti vubec nejde. Delphi proste neni dalsi Java nebo .NET

Petr Vones

*) k tomu byl by: Toto je problem ktery se tahne uz leta a to je prave
ignorovani faktu, ze Delphi by mohlo byt idealni nastroj pro Windows aplikace
vubec (svet totiz nejsou jen databaze). Bohuzel k tomu aby se tak stalo stale
neco chybi, predevsim aktualni a vice kompletni konverze API headeru, vice
'systemovych' funkci a trid zapouzdrujici API primo v RTL, podpora veci jako
DirectX (jeden pomerne castych dotazu je zdali se daji v Delphi psat hry, coz
jiste neni okrajova cast sw prumyslu), podpora aktualnich vlastnosti systemu
(prevevsim GUI, Shell, MMC snapin, IE extensions atd..) Prave proto ze Borland
tento problem uz leta ignoruje a nic nenasvedcuje tomu, ze se to v budoucnosti
vyrazne zmeni existuji projekty jako je treba Jedi, ktere se snazi tuto mezeru
vyplnit.

OT: Komercni software a Open Source - drive Varian

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.2002 00:05:56

Puvodni zprava, kterou napsal Pavel Cisar dne 13 Jan 2002:

> To si snad delas legraci ? Naopak u free-se-zdroji a open source
> se muzes podivat na zdrojaky jeste pred tim, nez se rozhodnes to
> pouzit nebo ne. U komercniho se ti muze naopak stat, ze "navrch
> huj a vespod fuj", ale to zjistis az kdyz za to zaplatis. Klasickym
> prikladem je Async Pro a QuickReporty.

To si snad delas legraci? Znas nejakou lepsi komunikacni knihovnu nez je
Async Professional, at jiz co do sirky zaberu i co do spolehlivosti?
Pokud ano, velmi rad se na ni podivam. Jen pro zajimavost Async
Professional je ve svete nejprodavanejsim produktem TurboPower Software,
a kazdorocne ziskava radu oceneni od jejich uzivatelu a vyvojaru vubec.
Umistuje se kazdorocne na prvnim miste. Async Professional pouziva silene
kvantum uzivatelu po celem svete a to jsou profesionalni programatori.
Protoze Async Professional neni levna zalezitost, tak to nemaji vetsinou
vyvojari freeware, ale vyvojari tvorici opravdove produkty pro komercni
zakazniky. Dovolim si tady s Tebou ostre nesouhlasit a tvrdim, ze Async
Professional je velmi kvalitni komunikacni knihovna, ktera nema
konkurenci.

A jestli mas pocit, ze je "vespod fuj", tak ono je to v podstate uplne
jedno, pokud je to funkcni celek a pracuje to vyborne. A ono to pracuje
vyborne. To je i duvod, proc ja si komponenty kupuji. Ne proto, abych se
hrabal ve zdrojaku (i kdyz si kupuji jedine se zdrojakem), ale proto,
abych s jejich pomoci napsal aplikaci rychle a produktivne. A o tom to
je, to je RAD. K tomu jsou Delphi. Ne na to, abych nejprve hledal po
svete OpenSource, pak prochazel megabajty kodu a snazil se zjistit, jak
je to napsane, a pak mozna neco vyvinul a nebo take se v tom zacal rypat
a cele to prekopal. K tomu nepotrebuju OpenSource, to si mohu napsat
rovnou sam. Zdrojovy kod vyuziji teprve v okamziku, kdy neco nechodi
presne podle mych predstav a mam touhu se v tom rochnit.

Co se tyka QuickReportu, tam nemohu souhlasit ani nesouhlasit, jestli je
vespod fuj. On je i na vrchu fuj, nechodi, jak by mel. Ackoliv mam verzi
Professional, nehrabu se ve zdrojacich, ale vyuzivam jine knihovny, jine
komercni knihovny chci rici. Kdyby byl nejaky QuickReport OpenSource,
take bych se v nem nehrabal, kdyby nepracoval, protoze se v tom nechci
hrabat, ja nejsem vyvojar knihovny pro sestavy. Ja jsem vyvojar komecnich
aplikaci, ktery vyuziva dily, ze kterych aplikace staci. To mas asi jako
kdyz budes zednik a budes nakupovat cihly nebo nektere dostavat zadarmo.
Muzes bud stavet dum a nebo ty cihly zadarmo obalit betonem, aby lepe
drzely, pripadne je rozmlatit kladivem a zase davat dohromady.

U komercnich produktu byva ve svete zvykem Back Money Guarantee, coz
znamena, ze kdyz si koupis nejaky produkt a nejsi s nim zcela spokojen do
obvykle 30 ci 60 dnu, jednoduse ho vratis a dostanes zpet sve penize. I
zde si muzes prohlednout, co kupujes. Ve vetsine pripadu je to ale jedno,
co je uvnitr napsano za kod, protoze bezny vyvojar, ktery opravdu vyviji
aplikace, nema cas se zabyvat vecmi, ktere si muze koupit.

Dale existuji trial verze, se kterymi vyvines kompletni produkt a pak
teprve jdes platit. Nekupujes zajice v pytli.

> Absolutne ZADNE komponenty nebo knihovny nevyhovi na 100%.

Tohle rozhodne nemusi byt pravda.

> Vzdy je drive ci pozdeji neco upravit nebo opravit, i kdyby to mela
> byt naprosta drobnost v rozsahu jednoho radku. Pak dostupnost
> zdroju a predevsim jejich _kvalita_ je dulezita.

Tohle take nemusi byt pravda. Zalezi to na konkretnim pripadu. A vyhodou
komercnich komponent je take to, ze oni to upravi za tebe... Kazdy
komercni projekt se vyviji a meni, muzes davat pripominky a oni to tam
mohou zapracovat. Reknu ti uprimne, ze jsem konkretne v Async
Professional nemusel nikdy nic upravovat a vyhovuje. Ve vetsine knihoven
jsem nic neupravoval. Snad mozna nejake ty free, kdyz tak nad tim
uvazuji. Jsi jiny pripad nez ja, me to vyhovuje.

> Ted uz si ale urcite delas legraci ? Naopak open source je uz z
> principu ten nejtransparentnejsi zpusob vyvoje. Samozrejme, ze i
> zde hrozi riziko, ze autori prestanou mit zajem ve vyvoji pokracovat, ale:
>
> a) Nikdy se to nestane ze dne naden, a diky transparentnosti je
> mozne to zaznamenat vcas.

To ovsem znamena, ze nedelas nic jineho, nez ze sledujes jednu konkretni
knihovnu a jeji vyvoj a vsechno. Ano, pokud mas jedinou, pak to lze. Ale
pak nekdo take pouziva vic knihoven nez Ty.

> b) Vzdy je tady moznost, ze nekteri uzivatele (take programatori)
> se rozhodnou ve vyvoji pokracovat.

A nebo taky ne. Me se jeste nestalo, ze by mi zkrachoval vyrobce
komponent, ktere mam komercne. Jednou se stalo, ze se prestalo s vyvojem
a prodali to jine firme, ktera to tak nejak nevyviji, ale to byla tak
mala komponenta, ze to nestoji za rec. A jednou jednu firmu take prodali
nebo prevedli do USA, a vyvoj se natolik rozjel, ze ti novi udelali
produkty 10x lepsi nez ti puvodni. Zato si vzpominam, ze v dobach Delphi1
a Delphi2 jsem pouzival jeste hromady free knihoven a vubec nikdo v tom
nepokracoval. Takze tam nekdy sahaji me duvody, proc pouzivat vetsinou
komercni knihovny.

> U komercniho SW zadne zaruky podpory ani vyvoje take nemas, a

U velkych a renomovanych firem mas zaruky vyvoje i podpory z toho duvodu,
ze ta firma uz vyviji 10 let a ma velky tym programatoru a ma slusne
rozjetou firmu, ktera slusne vydelava. Neni duvod s tim prestat, protoze
to nese velke penize. U OpenSource nemas zaruky vubec zadne.

> pokud veris slibum firem, tak jsi "velmi duverivy". Firmy podporuji
> sve produkty jen do te miry, do ktere se jim to vyplati a jenom tim

A o tom to je. Jim se to vyplati, kdyz za to platis. Open Source je
zadarmo, tak si snadno muze autor rici, ze se na to vykasle...

> zpusobem ktery se jim vyplati. Svet je plny "opustenych" produktu.

Ano, hlavne OpenSourcu, freewaru a sharewaru. Kvalitni komercni produkty
se vetsinou neopousti. Kvalitni komercni produkty nejsou za $9.95.

> S open source (nebo i komercnim produktem od ktereho si muzes
> koupit zdroje) jsi alespon kryty v tom, ze muzes podporovat sam
> sebe, nebo si na to nekoho najmout. A taky nejsi nuceny kupovat
> upgrade jen proto, aby jsi ziskal opravu nejake chyby.

To nejsi ani u kvalitnich komercnich produktu. A opravit si to (dle Tve
teorie rypani v kodu) si to muzes taky sam prece...

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

Komercni vs. OpenSource Was: Varian Skin Factory -

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2002 02:41:41

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> U komerneho software mam jasny mechanimus (netvrdim, ze idealny)
> v ktorom ekonomicke zaujmy a konkurencny tlak nahanaju k produkcii
> kvalitneho software. U Open Source tento zakladny mechanizmus

Omyl, jde predevsim o to vec prodat a mit z ni zisk, to je zajem cislo jedna.
Meritko kvality nastupuje teprve v pripade, ze je zajem cislo jedna necim
ohrozen (konkurence s lepsim produktem, caste stiznosti zakazniku na nekvalitu
produktu a z toho plynouci negativni image, zastaralost reseni atd.)

> nevidim. A tu je ta dilema, ktoru riesime. Je to rovnake ako ked by
> sme chceli porovnat dva vyrobky: prvy vyrobeny v komunistickej
> ekonomike a druhy v kapitalistickej. Ten prvy vyrobok je daleko lacnejsi.

Toto je ponekud odvazne tvrzeni, protoze cena vyrobku vyrobena v socialismu
byla nezridka daleko vyssi, coz ovsem zaniklo v neexistujicich/zvracenych
trznich principech na kterych je socialismus postaven.

Zakladem je prece to, ze OpenSource nikomu nevnucuje ze je (vzdy) lepsi nez
komercni software, ale existuje coby alternativa. Pokud bychom striktne
porovnavali napriklad kvalitu kodu ruznych komercnich a open source komponent
pro Delphi, tak to vyjde priblizne nastejno. Mezi komercnimi produkty se totiz
najdou opravdu strasne veci (nezridka se jedna i o produkty zvucnych jmen),
ovsem diky reklame a ostatnim sluzbam ktere (zase naopak) neni OpenSource
schopny nabidnout jsou prodejne. Stejne tak v Open Source lze najit plno velmi
kvalitniho kodu, ktery je i pres schazejici ostatni sluzby (podpora,
dokumentace) natolik zajimavy, ze se najde dostatecne mnozstvi lidi kterym se
vyplati jej pouzivat, coz v konecnem dusledku znamena jeho rozvoj, protoze
stale existuji lide, kteri jsou ochotni neco delat nejen ciste pro penize.

Rovnice penize=kvalita totiz neplati vzdy, a to i v jinych oborech nez je
software.

Petr Vones


OT: Komercni software a Open Source - drive Varian

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 14.1.2002 03:13:05

----- Original Message -----
From: "Erik Salaj" <winsoft(zv)stonline.sk>

> U komerneho software mam jasny mechanimus (netvrdim, ze idealny)
> v ktorom ekonomicke zaujmy a konkurencny tlak nahanaju k produkcii
> kvalitneho software. U Open Source tento zakladny mechanizmus
> nevidim.

Ahoj.
To ze ty ho nevidis, neznamena, ze neexistuje.

>A tu je ta dilema, ktoru riesime. Je to rovnake ako ked by
> sme chceli porovnat dva vyrobky: prvy vyrobeny v komunistickej
> ekonomike a druhy v kapitalistickej. Ten prvy vyrobok je daleko lacnejsi.
> Otazka: je aj lepsi a vyhodnejsi? Moja odpoved je, ze u prevaznej
> vecsiny vyrobkov nie je. Je mensie riziko zakupenia prveho vyrobku?
> Mozno, niekedy. A je celkovo ako system vyhodnejsia komunisticka
> ekonomika? Urcite nie.

No tedy srovnavat OpenSource/FreeWare a komunistickou ekonomiku je
NESMYSL!!!!
Mozna stejny jako pristupovat k dusevnimu a prakticky nehmotnemu softwaru
jako k cihle.
Kouzlo OpenSource/FreeWare je v tom, ze nahlizi na SW jinym zpusobem nez na
hmotne zbozi a prispusobuje tomu model distribuce a zisku.
Dokonce by se dal najit trochu podobny priklad i v distribuci "hmotneho"
zbozi, napr. mobilnich telefonu. Tam take lze ziskat pristroj za cenu IMHO
nizsi nez vyrobni (1 kc) diky tomu faktu, ze operator nasledne vydela mnohem
vice na provozu tohoto telefonu ve sve siti a tezko nekdo bude tvrdit, ze
operatori mobilnich telefonu jsou komunisti.
Je to samozrejme velmi volne srovnani.

OpenSource/FreeWare podobnym zpusobem nejprve "investuje do uzivatele" tim ,
ze si nenecha zaplatit za vyvoj, a "prodava" tak produkt "pod cenou" ale
vytvari si tak predpoklad zisku z "provozu" SW predevsim diky svemu know-how
(placena podpora, tistene manualy, distribuce na CD, reseni na miru a pod.)
a v pripade OpenSource zaroven jeste muze velmi "levne" ziskavat sirokou a
kvalitni vyvojovou zakladnu a velmi zajimave konkurencni prostredi (napr.
ruzne distribuce Linuxu).

Oba modely (komercni i OpenSource/FreeWare) v soucasne dobe existuji a nekdy
se i prolinaji. A v obou systemech najdes uspesne i neuspesne firmy,
jednotlivce, projekty.

Tak to teda vidim ja.

Ludek


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

TCP programovani

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 14.1.2002 07:45:51

Ahoj,

v kodu, pouzivajicim TClientSocket a TServerSocket, ktery psal
kolega, se casto vyskytuji dva obraty:

1) Pote, co se provede nejaka operace se socketem (napr. volani
ServerSocket.Close) je zarazena cekaci smycka (napr. 1000 krat
provest Application.ProcessMessages), protoze vykonavani kodu
zrejme hned pokracuje nasledujicim radkem, ale pozadovana
operace se zrejme provadi dele. Cekaci smycka je vlozena napr.
mezi ServerSocket.Close a nasledne ServerSocket.Open. Podle
komentare ve zdrojaku usuzuji, ze bez toho to prinejmensim na NT
nefunguje dobre, ale pouzite reseni se mi zda jako reseni nasledku
neceho a nikoli reseni problemu. Jak to tedy je?

2) Veskere odesilani dat do TCP spojeni je realizovano v cyklu,
ktery skonci bud po uspesnem odeslani dat nebo po 10 pokusech
o odeslani. Znamena to snad, ze odeslani dat do spojeni je vec tak
nespolehliva, ze je potreba ji zkouset opakovane, nebo jde zase o
zalepovani nasledku jineho problemu?

Diky.

David Lebeda


Specha: jak vytvorit novy mdb file z Delphi?

[*] Vagner Pavel <Vagner(zv)ceps(tec)cz> - 14.1.2002 08:15:27

Hi lidicky,
pekne prosim nevi nekdo jak vytvorit z Delphi(5 Enterprise) novy mdb file?
Predem dik
Pavel Vagner


Kouslej program

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 14.1.2002 08:19:36

Tohle neni reseni, ja mam Win Me a D4 a taky se mi obcas stane, a to uz i
pri kompilaci nebo kdyz treba jen provedu vyber v listboxu. Tohle je NECO
uvnitr ...
S pozdravem Rumcajs
> "obcas" se stane, ze mi muj program spadne, od programu i Delph "neni
> odpoved"... Pokud odprasknu Delphi, pak se nekdy stane, ze Windowsy
> nejak drzi ten muj program a nepomuze nez restart compu. Projevuje se
> to tim, ze pri naslednem spusteni Delph a snaze kompilovat, Delphi

Nejspis tam mas nejakou chybu, nekonecny cyklus nebo kdovi co.
Pripadne neplatne volani cehosi, chybnou praci s pameti atp.

Pokud chces, aby se Wokna chovaly lepe, zahod 98 a porid si jich 2000
nebo vice.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282

kde je Windows?

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 14.1.2002 08:22:03

Uz nevi kde sem to sehnal (asi na CD Chip), ale ma paletu komponent zvanou
BUPack, mezi nimiz je i BUDirectories, ktera ma odkazy na vsechny dulezite
slozky v Oknech. Mejlem posilat ti to asi nebudu, bo je toho pekny balik
.... Muzu se ale podivat, ve kterem cisle to bylo ...

> lze nejak spolehlive zjistit,v kterem adresari je system Windows?
> ja vim, ze je vetsinou ve WINDOWS, ale uz jsem videl i W95, WIN95...
>
>

OT: Nabidka prace - Praha

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 14.1.2002 08:39:32

Dobry den,

hledame programatora pro aplikace v Delphi. Nutna velmi dobra znalost
Delphi, alespon castecna znalost databazi (Interbase). Pouze na HPP. Nastup
behem unora 2002. V pripade Vaseho zajmu poslete prosim profesni zivotopis
na papouch(zv)papouch.com.

S pozdravem
Otakar Maly

PaPouch elektronika
http://www.papouch.com

RXlib - existuji?

[*] Miroslav Kortus <delphi(zv)nemocnice-vs(tec)cz> - 14.1.2002 09:03:04

Zkus hledat na www.torry.net (nejedna se o domovskou stranku puvodnich
komponent !!)
Pokud nebudes mit uspech napis mi na adresu kortusm(zv)volny(tec)cz
Mira


screen saver

[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 14.1.2002 09:11:27

From: "Milan ��ek" <cizek.milan(zv)seznam(tec)cz>
> 1) Proc mi nefunguje {$D SCRNSAVE "Muj sporic"}? Samozrejme muzu soubor

Ahoj,
spravna syntaxe je:
{$DESCRIPTION 'text'}


Ahoj,
nevim cim to je, ale nefunguje mi ani jedno z reseni. Ze by se ve
Win2k prebiral popis podle nazvu souboru? Nejak se mi to nezda.
Bohuzel ted nemam moznost vyzkouset to na jinem OS. Co ten popis
vlastn� udela? To je nejaka cast v resources?

Diky

S pozdravem Milan Cizek, amatersky programator, D5 Ent (SP1), D6 Ent
Win2k (SP2,Pre-SP3) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ:
59826637

______________________________________________________________________
WWW stranky zdarma na http://www.sweb(tec)cz


TCP programovani

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 14.1.2002 09:20:22

> 1) Pote, co se provede nejaka operace se socketem (napr. volani
> ServerSocket.Close) je zarazena cekaci smycka (napr. 1000 krat
> provest Application.ProcessMessages), protoze vykonavani kodu
> zrejme hned pokracuje nasledujicim radkem, ale pozadovana
> operace se zrejme provadi dele. Cekaci smycka je vlozena napr.
> mezi ServerSocket.Close a nasledne ServerSocket.Open. Podle
> komentare ve zdrojaku usuzuji, ze bez toho to prinejmensim na NT
> nefunguje dobre, ale pouzite reseni se mi zda jako reseni nasledku
> neceho a nikoli reseni problemu. Jak to tedy je?

smysl to mit muze ale rozhodne to neni korektni reseni.
Pouziva ten kus kodu natvrdo definovany TCP port? Pokud ano pak po
close
nebmusi byt ten samy port nejakou dobu k dispozici (zvlaste pokud bylo
skutecne
navazano spojeni a ServerSocket.Close jej ukoncoval). Vlozeni maleho
zpozdeni
muze problem vyresit - ale ne ve vsech pripadech. Poklud bude spojeni
z dostatecne
pomale/chybove linky pak muze zustat port obsazeny i nekolik minut.

Reseni tohoto problemu neni jednoduche. Lze napriklad pri bindovani
socketu reagovat
na chybu 10048 tak, ze chvilku pockam a zkusim to znovu (definovany
pocet pokusu).
Pripadne je mozne povolit moznost pouziti portu i pokud je obsazen
(SetSockOpt() a SO_REUSEADDR)
ale to muze mit nezadouci efekty (napriklad dany port muze skutecne
pouzivat
nejaky jiny program).> 2) Veskere odesilani dat do TCP spojeni je realizovano v cyklu,
> ktery skonci bud po uspesnem odeslani dat nebo po 10 pokusech
> o odeslani. Znamena to snad, ze odeslani dat do spojeni je vec tak
> nespolehliva, ze je potreba ji zkouset opakovane, nebo jde zase o
> zalepovani nasledku jineho problemu?

ty komponenty neznam, ale muze jit o "reseni" problemu s plnym
systemovym bufferem pro dane spojeni.

JCLStrings.StrSearch(....,?Index?)

[*] Roland Turcan <rolo(zv)sedas.sk> - 14.1.2002 09:22:44


----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
Sent: Sunday, January 13, 2002 8:08 PM


> From: "Roland Turcan" <rolo(zv)sedas.sk>
> > Help hovori toto:
> > ----
> > StrSearch
> > The search starts at the supplied index and is case-sensitive.
> > ----
> > Ale parameter index nie je akceptovany a vzdy mi vrati poziciu prveho
> > vyskytu. Nie je na toto nejaky update?
>
> Ahoj,
>
> jako mas verzi JCL ? Me to tu funguje spravne.
>
> Petr Vones
>

Kde je verzia ? Ja som v JCLString.pas nasiel toto

{ Unit owner: Azret Botash}
{ Last modified: July 2, 2001

Je to najnovsia ?

R.

TCP programovani

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 14.1.2002 09:28:47

> 1) Pote, co se provede nejaka operace se socketem (napr. volani
> ServerSocket.Close) je zarazena cekaci smycka (napr. 1000 krat
> provest Application.ProcessMessages), protoze vykonavani kodu
> zrejme hned pokracuje nasledujicim radkem, ale pozadovana
> operace se zrejme provadi dele. Cekaci smycka je vlozena napr.
> mezi ServerSocket.Close a nasledne ServerSocket.Open. Podle
> komentare ve zdrojaku usuzuji, ze bez toho to prinejmensim na NT
> nefunguje dobre, ale pouzite reseni se mi zda jako reseni nasledku
> neceho a nikoli reseni problemu. Jak to tedy je?

smysl to mit muze ale rozhodne to neni korektni reseni.
Pouziva ten kus kodu natvrdo definovany TCP port? Pokud ano pak po
close
nebmusi byt ten samy port nejakou dobu k dispozici (zvlaste pokud
bylo
skutecne
navazano spojeni a ServerSocket.Close jej ukoncoval). Vlozeni maleho
zpozdeni
muze problem vyresit - ale ne ve vsech pripadech. Poklud bude spojeni
z dostatecne
pomale/chybove linky pak muze zustat port obsazeny i nekolik minut.

Reseni tohoto problemu neni jednoduche. Lze napriklad pri bindovani
socketu reagovat
na chybu 10048 tak, ze chvilku pockam a zkusim to znovu (definovany
pocet pokusu).
Pripadne je mozne povolit moznost pouziti portu i pokud je obsazen
(SetSockOpt() a SO_REUSEADDR)
ale to muze mit nezadouci efekty (napriklad dany port muze skutecne
pouzivat
nejaky jiny program).> 2) Veskere odesilani dat do TCP spojeni je realizovano v cyklu,
> ktery skonci bud po uspesnem odeslani dat nebo po 10 pokusech
> o odeslani. Znamena to snad, ze odeslani dat do spojeni je vec tak
> nespolehliva, ze je potreba ji zkouset opakovane, nebo jde zase o
> zalepovani nasledku jineho problemu?

ty komponenty neznam, ale muze jit o "reseni" problemu s plnym
systemovym bufferem pro dane spojeni.

||sorry nestihl jsem to dopsat - OE odesle zpravu CtrlEnter coz je
||kombinace klaves kterou se
||mi prave pred chvili podarilo omylem zmacknout :-( )

Je-li socket v non-blocking modu pak veskere pokusy o odeslani dat
konci chybou
WSAEWOULDBLOCK. Ta znamane (u sent() operaci), ze system neni schopen
zaradit
nova data do bufferu,ktery shromazduje data k odeslani (neni v nem
misto). Je
pravdepodobne, ze za par okamziku bude buffer volny (zvlaste na
ethernetu) cili
opakovaci smycka bude funkcni. Ale zase je to nekorektni reseni.
Spravne reseni
je bud pouzit blocking mod socketu a thread (jednodussi) nebo plnou
obsluhu spojeni
pomoci udalosti (napriklad WSAAsyncSelect + obsluhu socketem
generovanych udalosti
v nejake okenni rutine atd).

V blocking mode nema smysl opakovat operace ve smycce. Dojde-li k
selhani funkce, pak je to
opravdu kvuli nejake chybe.

Zdravi
D. Toman

Nefungujici TCPIP

[*] JIM Design <jim.design(zv)iol(tec)cz> - 14.1.2002 09:30:55

ahoj,

zalezi co tam je za sitovky a jestli jsou poce spojeny koaxem nebo UTP.
mel jsem podobny problem se sitovkama SVEC PN1000 (NE2000 compatible) a od
te doby co mam
spravny HUB a podstatne drazsi sitovky (3COM) se problem nevyskytuje.

M.Jirman

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Bednar��k Dalibor


Ahoj,

Mam asi 6 pocitace s touto konfiguraci

Win98
Klient Microsoft
Klient Netware
IPX/SPX
TCPIP

U obou je nastaveni shodne, krome IP adresy samozrejme.
Ale bohuzel na 3 z nich nefunguje PING(pise - Vyprsel casovy limit zadosti)
na IP adresu serveru, tudiz ani TCPIP.
Na obou bezi internet.

Zkousel jsem uz vsechno mozne a porad nic.
Nevite nekdo, kde by mohl byt zakopany pes?

Diky moc

nastaveni okna do popredi

[*] JIM Design <jim.design(zv)iol(tec)cz> - 14.1.2002 09:30:56

Ahoj,

na to je IMHO funkce SetForegroundWindow.

M.Jirman

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of campulka

Cau,
nejak nemuzu prijit na to, jak dat okno moji aplikace do popredi, kdyz je v
popredi spustena DOS aplikace ve fullscreenu. Potrebuju aby se ta DOS
aplikace minimalizovala a ta moje skocila do popredi...
Skousel jsem ShowWindow(...), SetWindowPos(...) a nic :(

Dik Jirka.

(W98, D4)

Komercni software a Open Source - drive Varian Ski

[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 14.1.2002 09:41:47

Jenom mala noticka na okraj - nekomu by se z JISTYCH duvodu mohlo zdat, ze
je Petr Zahradnik pozitivne zaujaty vuci produktum firmy TURBOPOWER. Musim
tady z vlastni mnohalete zkusenosti s nekolika produkty zminene firmy
potvrdit, ze jsou (vetsinou) skvele naprogramovane, perfektne funkcni a maji
pres news nejspickovejsi a nejrychlejsi zakaznickou podporu, s jakou jsem se
kdy setkal. A ty dnes uz tisice US$, ktere nasi firmu staly jsou skvelou
investici, ktera se jiz davno vratila ve snadnosti vyvoje a udrzbe aplikaci
(a ze treba z AsyncPro vyuzivame jen malou cast...). Tim nerikam, ze
nepouzivame freeware se zdroji, ale jen u malych zalezitosti, kde se lze
snadno orientovat ve zdrojaku a pripadne byt schopen ho modifikovat.
Je mnohost ve svete vselika a je jen dobre, ze si kazdy muze uspokojit sve
potreby tak, jak jemu vyhovuje. Svet neni cernobily, i kdyz by to asi mnohym
vyhovovalo. Muka volby holt nejsou pro kazdeho ;-))

Mira Ondrisek
BONNEL TECHNOLOGIE

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Petr Zahradnik
> Sent: Monday, January 14, 2002 12:06 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Komercni software a Open Source - drive Varian Skin
> Factory - KRACH?
>
> To si snad delas legraci? Znas nejakou lepsi komunikacni knihovnu nez je
> Async Professional, at jiz co do sirky zaberu i co do spolehlivosti?
> Pokud ano, velmi rad se na ni podivam. Jen pro zajimavost Async
> Professional je ve svete nejprodavanejsim produktem TurboPower Software,
> a kazdorocne ziskava radu oceneni od jejich uzivatelu a vyvojaru vubec.
> Umistuje se kazdorocne na prvnim miste. Async Professional pouziva silene
> kvantum uzivatelu po celem svete a to jsou profesionalni programatori.
> Protoze Async Professional neni levna zalezitost, tak to nemaji vetsinou
> vyvojari freeware, ale vyvojari tvorici opravdove produkty pro komercni
> zakazniky. Dovolim si tady s Tebou ostre nesouhlasit a tvrdim, ze Async
> Professional je velmi kvalitni komunikacni knihovna, ktera nema
> konkurenci.
>

Balicky pouzite v projektu

[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 14.1.2002 09:42:05

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Vones

Ahoj,

> balicky se ti zobrazi po prelozeni projektu kdyz das z menu v IDE:
> Project | Information.

Tak neco takoveho jsem myslel:). Tot ono.

> Dale muzes ziskat seznam importovanych knihoven programove,
> napriklad pomoci
> nastroju typu Dependency Walker. Jeden takovy najdes treba tady:
> http://www.volweb(tec)cz/pvones/delphi/ Tvoje nastroje mam.

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

jak na navratovou hodnotu

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 14.1.2002 09:50:12

From: "Erik Salaj" <winsoft(zv)stonline.sk>
> Predovsetkym s Eiffelom, to je jazyk zalozeny na OOP s vlastnostami,
> ktore Object Pascal nikdy nebude mat a jazyky ako C# alebo Java
> mozno budu mat za 5 rokov polovicu z toho, co Eiffel mal pred 10
> rokmi. Object Pascal je sice sikovny a ako tak OOP podporuje

> a s Delphi a komponentami umoznuje RAD beznych aplikacii,
> ale vdaka svojim vlastnostiam a obmedzeniam nie je vhodny
> na serioznejsie OOP programovanie.

Hmm, toto je blbost.
V Eifelu som nevidel doteraz ziadnu napisanu aplikaciu. Tym netvrdim ze
neexistuje, len ze som ziadnu nevidel, ak mas nejaky odkaz na nieco budem
rad ked posles (Referencie na domovskych strankach som nenasiel).
Naproti tomu v Delphi som uz videl hodne aplikacii objektovych i
neobjektovych. A dokonca velmi serioznych. Nebudem zbytocne menovat ale
videl som aplikacie typu C/S, muli-tier, utils, tools, ... Niektore az tak
objektove ze su zrovnatelne s produktom Navision alebo systemom Open
interface. Na niektorych som sam spolupracoval.

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Problem pri ladeni BDE aplikacie

[*] Male�ek Ond�ej <ondrej.malecek(zv)radom-cz(tec)cz> - 14.1.2002 09:51:41

Mne vetsinou pomuze ukoncit Delphi (& vsechny BDE app) a smazat PDOXUSRS.NET

Ondrej

> > Pokial pri ladeni BDE aplikacie v D5 pouzijem uprostred ladenia
> > Program Reset (Ctrl-F2) cele BDE sa potom chova divne,
> > teda neda sa dalej pouzivat a generuje rozne chyby
> > typu - locked record, a pod. (pricom lck subor neexistuje...)
> >
> > Nestava sa to vzdy, niekedy pomaha restart Delphi
> > vynimocne treba restartovat cely OS (Win2000).
> >
> > Neda sa tomu nejako vyhnut - nastavenim alebo pod.?

Tvorba komponent

[*] Standa <Ooman(zv)centrum(tec)cz> - 14.1.2002 09:54:48

Ahoj snazim se vytvaret nejake komponenty a mam nekolik problemu asi by mi
pomohlo videt nejake zdrojaky uz hotovych ( z tech v Delphi sem toho moc
nepobral ). Nevi nekdo o nejakych jednoduchych komponentach se zdrojakem,
nebo jeste lepe nevi nekdo o strankach kde popisujou tvorbu komponent v
Delphi.

Specha: jak vytvorit novy mdb file z Delphi?

[*] Jaroslav Bucek <bucek(zv)eskon(tec)cz> - 14.1.2002 09:54:27

Asi nejjednodussi bude pouzit free KaDao komponenty. Najdes je na
www.delphi.pari.bg

Jarda

----- Original Message -----
From: "Vagner Pavel" <Vagner(zv)ceps(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, January 14, 2002 8:15 AM
Subject: Specha: jak vytvorit novy mdb file z Delphi?> Hi lidicky,
> pekne prosim nevi nekdo jak vytvorit z Delphi(5 Enterprise) novy mdb file?
> Predem dik
> Pavel Vagner


nahodnost randomu a volani application.processmess

[*] Vladimir Michl <vladimir.michl(zv)hlubocky.del(tec)cz> - 14.1.2002 09:56:44

On Tue, 8 Jan 2002 akresta(zv)volny(tec)cz wrote:

> To je mi jasne ze to nema nic spolecneho, ale domnival jsem se ze jestli
> chci dat procesorovy cas jinym aplikacim zavolam tuto funkci. A tak me
> napadlo jestli ma vyznam volat ji vicekrat za sebou...

No znahodnovani rady jiz asi smysl nema, protoze generator generuje data s
definovanym rozlozenim. Jedine nad cim ma smysl uvazovat je nastaveni
pocatecni hodnoty (RandSeed). Videl jsem doporuceni, ze je vhodne, pokud
ma clovek k dispozici cas v milisekundach, davat jako tu inicializaci
prave pocet milisekund v sekunde a to roztahnout pres cely interval
RandSeed, pripadne k tomu do dolni poloviny dostat ty sekundy.

S pozdravem

Vladimir Michl
-----------------------------------------
Vladim�r Michl <Vladimir.Michl(zv)hlubocky.del(tec)cz>
Del a.s.
Stroj�rensk� 38
���r nad S�zavou
pobo�ka Olomouck� 355
Hlubo�ky-Mari�nsk� �dol�
tel: 068/5353548


Specha: jak vytvorit novy mdb file z Delphi?

[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 14.1.2002 09:58:22

Ahoj
posilam Ti svuj zkusebmi priklad na vytvoreni databaze pomoci ADO

Naimportuj si knihovnu C:\Program Files\Common Files\SYSTEM\ADO\msadox.dll.
Tim se vygeneruje ADOX_TLB.

uses
ActiveX,Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs,
StdCtrls,ADOX_TLB;

procedure TForm1.Button1Click(Sender: TObject);
var FCatalog : Catalog;
FConnection : Connection;
FTable : Table;
FColumn : _Column;
FPrimaryKey,FSecondaryIndex1 : Index;
i : integer;
FDatabaseName,FTableName : string;
const
MSJet4ConnectString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s';
begin
FDatabaseName:='c:\a\new.mdb';
FTableName:='Table1';
//Inicializace objektu FCatalog
FCatalog:=CoCatalog.Create;
//Inicializace objektu FConnection
FConnection:=CoConnection.Create;
//Inicializace objektu FTable
FTable:=CoTable.Create;
//Inicializace objektu FPrimaryKey
FPrimaryKey:=CoIndex.Create;
//Inicializace objektu FSecondaryIndex1
FSecondaryIndex1:=CoIndex.Create;
try
//Vytvoreni databaze
FCatalog.Create(format(MSJet4ConnectString,[FDatabaseName]));
//Otev�en� datab�ze

FConnection.Open(format(MSJet4ConnectString,[FDatabaseName]),'Admin','',adCo
nnectUnspecified);
//Nastaveni otevrene databaze jako aktivni katalog
FCatalog.Set_ActiveConnection(FConnection);
//..................Tvorba tabulky
Table1.................................
//Prirazeni jmena tabulky
FTable.Name:=FTableName;
//Nastaveni vlastnosti Rodicovky katalog - dulezite pro nastavovani
Properties
FTable.ParentCatalog:=FCatalog;
//Pridani pole ID do tabulky
FTable.Columns.Append('ID',adInteger,0);
//Nastaveni vlastnosti pole ID jako automaticke cislo
FTable.Columns['ID'].Properties['Autoincrement'].Value:=True;
//Pridani pole Prijmeni do tabulky
FTable.Columns.Append('Prijmeni',adVarWChar,20);
//Nastaveni vlastnosti "Povolit nulovou delku" pole Prijmeni na Ano
FTable.Columns['Prijmeni'].Properties['Jet OLEDB:Allow Zero
Length'].Value:=true;
//Nastaven� vlastnosti "Je nutno zadat" pole Prijmeni na Ne
FTable.Columns['Prijmeni'].Properties['Nullable'].Value:=true;
//nemusi byt vyplnena, default = false - musi byt vyplnena
//Pridani pole Jmeno do tabulky
FTable.Columns.Append('Jmeno',adVarWChar,15);
//Nastaveni vlastnosti "Je nutno zadat" pole Prijmeni na Ne
FTable.Columns['Jmeno'].Properties['Nullable'].Value:=true; //nemusi
byt vyplnena, default = false - musi byt vyplnena
//Pridani tabulky FTable do kolekce Tables
FCatalog.Tables.Append(FTable);
//..................Tvorba primarniho indexu tabulky
Table1...............
//Prirazeni jmena indexu
FPrimaryKey.Name:='PrimaryKey';
//Nastaveni indexu jako primarni
FPrimaryKey.PrimaryKey:=True;
//Pridani pole ID do indexu
FPrimaryKey.Columns.Append('ID',adInteger,0);
//Pridani primarniho indexu do kolekce indexu
FTable.Indexes.Append(FPrimaryKey,null);
//..................Tvorba sekundarniho slozeneho indexu tabulky
Table1...
//Prirazeni jmena indexu
FSecondaryIndex1.Name:='SekundarniIndex1';
//Pridani pole Prijmeni jako prvni slozky indexu
FSecondaryIndex1.Columns.Append('Prijmeni',adVarWChar,20);
//Pridani pole Jmeno jako druhe slozky indexu
FSecondaryIndex1.Columns.Append('Jmeno',adVarWChar,15);
//Pridani slozeneho indexu do kolekce index�
FTable.Indexes.Append(FSecondaryIndex1,null);

//........................................................................
finally
//Zavreni databaze
try FConnection.Close; except end;
//Uvolneni objektu FSecondaryIndex1
FSecondaryIndex1._Release;
//Uvolneni objektu FPrimaryKey
FPrimaryKey._Release;
//Uvolneni objektu FTable
FTable._Release;
//Objekt FConnection nelze uvolnit metodou _Release, nastane chyba
FConnection:=nil;
//Objekt FCatalog nelze uvolnit metodou _Release, nastane chyba
FCatalog:=nil;
end;
end;

Nevim zda je nutne objekty uvolnovat, prosim zda by se k tomu mohl nekdo
vyjadrit

Petr

> Hi lidicky,
> pekne prosim nevi nekdo jak vytvorit z Delphi(5 Enterprise) novy mdb file?
> Predem dik
> Pavel Vagner
>

OT: Jak obnovit data z CD-RW

[*] Radek Hole�ek <radek.holecek(zv)fire(tec)cz> - 14.1.2002 10:24:13

Dobry den,

omlouvam se za OT, ale zalohoval jsem si zdrojaky na RW,
reinstalovat PC a bohuzel jsem si to RW omylem nechtene vymazal.
Poradite, prosim, nekdo postup, jak ty zdrojaky obnovit?
Na internetu jsem nic nenasel.
Napsat ty programy bych sice zvladnul, ale nestihl bych to v terminu.

S diky

Radek Holecek


Ochrana shareware programu

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 14.1.2002 10:26:32

From: "V�t Jur�sek - konference" <delphi(zv)obecpohori(tec)cz>
> > To se da odhalit a velice snadno. Kdyz pominu monitory registru, ktere
to
> > udelaji velmi komfortne, tak uz temer stupid user to muze zjistit
prostym
> > porovnanim registru pred a po cinu.
> ********* to se da castecne obejit, kdyz tento tajny zaznam do registru
> aplikace udela napriklad po tretim legalnim spusteni - to uz to vetsinou
> nikdo monitorem nesleduje.

Toto neni riesenie.
Monitor byva zapnuty daleko viac nez len pri troch startoch aplikacie.
Jedinym serioznym riesenim je zapisanie zakodovaneho retazca do registru,
ktory v sebe nesie menitelnu a unikatnu informaciu ktora sama o sebe nic
neznamena. Dokaze ju pouzit len viacurovnovy (ale staci i primitivny)
dekodovaci mechanizmus. Problem pre hackera/crackera nieje udaj v registru
ale ten dekodovaci mechanizmus. V skutocnosti je ale lepsie to urobit trosku
komplikovanejsie nez ako som to popisal, ale otazkou stale pre autorov
ostava "Ma to vyznam?".

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Tlac (tprinter.newpage) a HP LJ 1000

[*] Jaroslav N�dhera <nadhera(zv)csh(tec)cz> - 14.1.2002 10:38:50

> problem s tloustkou cary asi souvisi s rozlisenim tiskarny. Cim je
rozliseni
> vetsi, tim budou cary tenci.
> Mozna se mylim

Ale proc za casu D2 byla tloustka cary spravna? Me se to projevuje taky -
stejny program pouzivajici QuickReport, tiskarna HP5P, jednou zkompilovany v
D2, jednou v D4 a tloustka car je ruzna.

J. N�dhera

CSH spol. s r.o.
Velfl�kova 10, 160 00 Praha 6
tel.: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel.: 069/633 56 87
www: http://www.csh(tec)cz , e-mail: nadhera(zv)csh(tec)cz

Obsah k 1001 T&T

[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 14.1.2002 10:45:51

Pod to bych se podepsal.... uz me to napadlo driv, ale nemel jsem odvahu
to napsat ;)
Jakysi index by hodne pomohl, sice je kniha celkem prehledne usporadana,
ale i tak by to bodlo.

Ales


> Chcel by som sa spytat (pripadne poprosit) Petra Vonese,
> ci je mozne zverejnit obsah k %subj% v elektronickej forme.
>
> Vasu knihu pouzivam tamer kazdy den, ale casto mi dlho
> trva kym nieco najdem alebo zistim, ze tam nie je...
>
> Verim, ze by nam to mnohym urychlilo pouzivanie Vasej
> inak skvelej knizky...

OT: Komercni software a Open Source - drive Varian

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 14.1.2002 11:01:49

Haj hou!

Vazeni pratele, protoze se toho seslo hodne a z ruznych stran,
reaguji radeji souhrne, zez odpovidat na kazdou pripominku vzlast.
Alespon tak (snad) ziskate ucelenejsi obraz.

----

1) Spektrum (typu) SW je velmi siroke, a stejne tak i zpusoby jak
je vytvaren a udrzovan. Vedle velkych producentu sw (Borland, MS,
SW602, Aktis) existuji i mali "zivnostnicci" (Petr Zahradnik), a
spousta sw se vytvari i ve velkych firmach primarne pro jejich
vlastni potrebu (banky, CEZ, Skodovka). Existuje sw "v krabicich"
(Delphi, Abra), sw ktery je "polokrabicovy" a vzdy se mirne upravuje
na miru konkretnimu zakaznikovi (SAP) a sw na zakazku. Kazdy
typ firmy (vyvoje) i sw ma sva specifika a zajete stereotypy, ktera
se _nedaji_ v plne mire aplikovat na ostatni druhy. Co je dobre pro
jednoho, muze byt pohroma pro druheho. Nasemi milemu Adminovi
vyhovuji (kvalitni) komercni komponenty, protoze mu umoznuji
_rychle_ vytvaret ruzne druhy malych aplikaci, coz je presne to,
cim se zivi. Kdyby podobnym zpusobem delal napr. Aktis svoji
Abru, neobstal by v konkurenci. Stejne tak se nevyplati napr.
Skodovce kupovat 100+1 komercni knihovnu pro interni vyvoj,
protoze by to bylo celkove moc drahe atd. Takze pokud zrovna vy
nespatrujete v pouzivani Open Source pro _sebe_ zadne vyhodny,
jeste to neznamena, ze pro ostatni to neni "nejlepsi vec pod
sluncem hned po predkrajenem chlebu".

2) Open Source nema nic spolecneho ani s komunizmem a
socialistickou ekonomikou, ani s penezi vubec. Business byl na
Open Source "navlecen" az v roce 1998, a to jenom proto, ze
zapojenim firem do vyvoje OS jeho vyvoj radikalne akceleruje
(srovnejte stav OS pred rokem 1998 a nyni) a z toho profituji vsichni
(i ti, kteri se primo nezapoji). Ale Open Source (byt se mu tak
nerikalo) tu _byl vzdycky_, a vzdycky bude. Jestli na nem nekdo
dokaze vydelat, nebo se uzivit jeho vytvarenim je jina vec (o tom se
tady nebudu rozepisovat, pridte si podiskutovat do Belohradu :-),
ale OS ma velkou vyhodu v tom, ze _neni_ spjaty s vyrobcem, a
tudiz krach nebo ztrata zajmu vyrobce neznamena automaticky
jeho konec (jen malo komercniho sw takovou udalost prezije).

3) Open Source je pro _zakaznika_ vzdy lepsi nez closed source,
pokud jde o ochranu jeho investic do sw. Tecka. Nikdo nerika, ze
by se mel zakaznik hrabat ve zdrojich, ale obecna dostupnost
zdroju umoznuje, aby se v nich hrabali ti kdo to chteji a na to maji.
A verte, ze se vzdycky nekdo najde. Napr. vite o tom, ze existuje
specialni verze Firebirdu ktera se jmenuje Yaffil, a pochazi z Ruska
? Je sice jenom pro Windows, ale je o 10-30% rychlejsi nez
soucasna IB/FB a ma radu dalsi zajimavych vlastnosti ktere ostatni
verze nemaji. Samozrejme, ze za nim nestoji zadna velka firma,
ale pouze dva schopni russti programatori, kteri si upravuji FB
predevsim pro svou vlastni potrebu. Projekt Firebird se ted snazi
navazat spolupraci a zaclenit nejzajimavejsi veci do dalsi verze FB
(1.5). A takovych prikladu se daji najit tisice. Napr. vite o tom, ze
po nedavnem uvolneni zdroju Quake 2 se rozjel projekt portovani
Quake 2 enginu do Delphi ? Uz maji prevedeno cca 10% (zacali
nedavno, ale uz je kolem toho par desitek lidi). Pro nekoho mozna
pitomost a zbytecnost, ale pro spoustu lidi je to moznost naucit se
"hi-tech" grafiku a chrlit nejen zajimave hry, ale i jine aplikace
pouzivajici napr. 3D vizualizaci (virtualni Temelin pro servisni
techniky ?). Nepodcenujte silu Open Source jako vyukoveho
nastroje (nejen na skolach) !

3) Open Source _neni_ lek na vsechny nemoci sveta, ale ma sve
nesporne prednosti jak pro vyvojare, tak pro uzivatele. Ne kazdy
jich ale dokaze/muze vyuzit pro sve konkretni potreby, a nikdo ho
ani nenuti. Ale nepouzivat OS kdyz je to vyhodne jen proto ze je to
OS je kratkozrake a dukazem "spatneho podnikatelskeho zameru"
:-) Osobne take nepouzivam kdejakou pitomost jen proto ze je to
free-se-zdroji nebo Open Source, ale nijak se nebranim pouzit ty
dobre (napr. INDY, DUnit, Want, Apache, Linux, Firebird, PHP,
Python, Xalan, Tomcat, DocBook, GhostScript atd.) a ktere bych
jen tezko programoval sam (mam jenom jeden zivot). Abych rekl
pravdu, bez existence prave takovych OS programu bych radu veci
vubec nemohl (legalne) delat, protoze bych si nemohl dovolit koupit
potrebne nastroje. A je mi naprosto jasne, ze OS je trnem v zadnici
firem ktere se zivi prodejem sw ktery bych si jinak musel koupit :-)

4) Open Source je jen _kompletne jina_ metoda vyvoje a distribuce
sw, nic vic. To znamena ze ma jista pravidla, a ze ji muzete
aplikovat bud uspesne nebo neuspesne. Jen na SourceForge
najdete pres 30,000 projektu, ale jen cca polovina je
"zivotaschopnych". Desetina z nich jsou "klicove" projekty, ktere
jsou nejen vysoce kvalitni, ale posunuji hranice moznosti pro
"bezne" uzivatele (napr. JBoss, phpNuke, MySQL, Python).
Nektere projekty jsou male, a tudiz riziko jejich pouzivani je vetsi,
ale je mnoho velkych projektu a rada znich je zastitena nemalym
balikem peniz a predevsim osobnich zajmu. Myslite si napr., ze
Linux muze zkrachovat ? Ani omylem, prilis mnoho firem je na nem
dnes zavislych nebo znej ma nemaly profit (od vyrobcu chytrych
TV, firewallu, digitalnuch kamer, handheldu, velkeho "zeleza" po
vyrobce krabicoveho sw). To same plati i o desitkach tisic dalsich
projektu.

5) Ekonomika Open Source je _jina_ nez bezne zazita ekonomika
SW. Rozhodne v ni nejsou astronomicke penize pro jedineho
hrace, ale je v ni dost penez aby se kola udrzela v chodu. Ta kola
by se sice mnohdy tocila i bez penez, ale penize je dokazi roztocit
do neuveritelnych obratek (bezte si o tom popovidat k IBM, napr. o
projektu Eclipse kdyz uz ne o Linuxu :-) Firmy, ktere se zivi
prodejem krabicoveho sw (MS, Borland) jsou z Open Source
nestastne a ani nejsou schopne prejit na OS ekonomiku (z
principu), ale pro firmy ktere jsou zalozene predevsim na
dodavkach _reseni_ je to zlaty dul (predevsim diky drastickemu
snizeni nakladu na vyvoj a vetsi marze z cen finalniho produktu). Je
jasne, ze z obchodniho hlediska _neni_ Open Source hra pro
kazdeho, a pro nekoho muze byt i smrtelna, ale pro mnohe je to
raketove palivo pro jejich business.

Zaverem snad jen tolik, ze svet neni cernobily ani sedy, ale barevny
az oci prechazeji. Pokud zrovna vy tezite z existence OS nebo
primo z jeho vyvoje, nebo naopak vam OS "prekazi" v podnikani,
meli by jste si uvedomit, ze na svete bylo, je a bude misto pro
vsechny. Neni treba se hadat ani prat, pro vsechny je mista dost :-)

S pozdravem

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


Vlastny MessageDlg ...

[*] Slavom�r �eke� - 14.1.2002 11:21:39

Zdravim ...

potrebujem poradit ... vytvoril som si form, ktory je pre mna vlastne
Dialogove okienko ... a chcem, aby sa choval ako MessageDlg, t.j. aby
ked ho zavolam z nejakej procedurky, tak aby sa cakalo kym sa to moje
dialogove okienko zatvori a aby sa pokracovalo vo vykonavani procedurky
(teda presne tak ako keby som pouzil standardny MessageDlg)... ako to
dosiahnut ? teraz to ide tak, ze dialogove okienko je viditelne, ale
procedura necaka na ukoncenie mojho dialogoveho okienka a skonci sa.

Prosim pomozte ... vdaka

Slavo


OT: free hosting PHP+Interbase?

[*] Kinsky Filip <xkinf01(zv)vse(tec)cz> - 14.1.2002 11:46:04

Ahoj,
nevite nahodou nekdo o serveru, ktery by poskytoval zdarma
hosting s PHPckem a Interbazi??
potreboval bych neco ozkouset....

Filip Kinsky


SYNAPSE a chyba 10054-Connection reset by peer

[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 14.1.2002 11:51:27

Ahoj,

pouzivam TTCPBlockSocket pro komunikaci se serverem, navazu pres
Connect spojeni a posilam data pres RecvString/SendString, to je
v pohode. Server ma ale tu vlastnost, ze klienty kteri jsou delsi
dobu nez 5 minut v necinosti, odstreli. Takze na klientovi mi pri
dalsim SendString vyskoci chyba 10054. Proto se ptam, lze nejak
PRED odeslanim SendString zkontrolovat jestli je soket pripojeny ?

Samozrejme muzu testovat LastError = ... a pak davat znovu Connect
a SendString, ale to se mi moc nelibi.

Dik Marian Jonas


Vlastny MessageDlg ...

[*] Miroslav Barica <miroslav.barica(zv)matador.sk> - 14.1.2002 12:02:19

co tak aktivovat ten dialog cez blablabla.showmodal?

>dosiahnut ? teraz to ide tak, ze dialogove okienko je viditelne, ale
>procedura necaka na ukoncenie mojho dialogoveho okienka a skonci sa.

>Prosim pomozte ... vdaka


Ukoncovani aplikace

[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 14.1.2002 12:08:15

Mel bych dotaz ke korektnosti ukoncovan aplikace.
Kteremu zpusobu dat prednost

- Form1.close�
- Application.Terminate;

Diky za radu

Viktor Marek
viktor(zv)mbox.vol(tec)cz


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


OT: Komercni software a Open Source - drive Varian

[*] Jir� Foldyna <jiri.f(zv)avizo(tec)cz> - 14.1.2002 12:11:58

Ahoj, pod tohle bych se rad podepsal, kdybych to tak umel napsat :-))))

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

> -----P�vodn� zpr�va-----
> Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> u�ivatele Pavel Cisar
> Odesl�no: 14. ledna 2002 11:02
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: OT: Komercni software a Open Source - drive Varian Skin
> Factory - KRACH?
>
> Haj hou!
>
> Vazeni pratele, protoze se toho seslo hodne a z ruznych stran,
> reaguji radeji souhrne, zez odpovidat na kazdou pripominku vzlast.
> Alespon tak (snad) ziskate ucelenejsi obraz.
>
> ----
>
> 1) Spektrum (typu) SW je velmi siroke, a stejne tak i zpusoby jak
> je vytvaren a udrzovan. Vedle velkych producentu sw (Borland, MS,
> SW602, Aktis) existuji i mali "zivnostnicci" (Petr Zahradnik), a
> spousta sw se vytvari i ve velkych firmach primarne pro jejich
> vlastni potrebu (banky, CEZ, Skodovka). Existuje sw "v krabicich"
> (Delphi, Abra), sw ktery je "polokrabicovy" a vzdy se mirne upravuje
> na miru konkretnimu zakaznikovi (SAP) a sw na zakazku. Kazdy
> typ firmy (vyvoje) i sw ma sva specifika a zajete stereotypy, ktera
> se _nedaji_ v plne mire aplikovat na ostatni druhy. Co je dobre pro
> jednoho, muze byt pohroma pro druheho. Nasemi milemu Adminovi
> vyhovuji (kvalitni) komercni komponenty, protoze mu umoznuji
> _rychle_ vytvaret ruzne druhy malych aplikaci, coz je presne to,
> cim se zivi. Kdyby podobnym zpusobem delal napr. Aktis svoji
> Abru, neobstal by v konkurenci. Stejne tak se nevyplati napr.
> Skodovce kupovat 100+1 komercni knihovnu pro interni vyvoj,
> protoze by to bylo celkove moc drahe atd. Takze pokud zrovna vy
> nespatrujete v pouzivani Open Source pro _sebe_ zadne vyhodny,
> jeste to neznamena, ze pro ostatni to neni "nejlepsi vec pod
> sluncem hned po predkrajenem chlebu".
>
> 2) Open Source nema nic spolecneho ani s komunizmem a
> socialistickou ekonomikou, ani s penezi vubec. Business byl na
> Open Source "navlecen" az v roce 1998, a to jenom proto, ze
> zapojenim firem do vyvoje OS jeho vyvoj radikalne akceleruje
> (srovnejte stav OS pred rokem 1998 a nyni) a z toho profituji vsichni
> (i ti, kteri se primo nezapoji). Ale Open Source (byt se mu tak
> nerikalo) tu _byl vzdycky_, a vzdycky bude. Jestli na nem nekdo
> dokaze vydelat, nebo se uzivit jeho vytvarenim je jina vec (o tom se
> tady nebudu rozepisovat, pridte si podiskutovat do Belohradu :-),
> ale OS ma velkou vyhodu v tom, ze _neni_ spjaty s vyrobcem, a
> tudiz krach nebo ztrata zajmu vyrobce neznamena automaticky
> jeho konec (jen malo komercniho sw takovou udalost prezije).
>
> 3) Open Source je pro _zakaznika_ vzdy lepsi nez closed source,
> pokud jde o ochranu jeho investic do sw. Tecka. Nikdo nerika, ze
> by se mel zakaznik hrabat ve zdrojich, ale obecna dostupnost
> zdroju umoznuje, aby se v nich hrabali ti kdo to chteji a na to maji.
> A verte, ze se vzdycky nekdo najde. Napr. vite o tom, ze existuje
> specialni verze Firebirdu ktera se jmenuje Yaffil, a pochazi z Ruska
> ? Je sice jenom pro Windows, ale je o 10-30% rychlejsi nez
> soucasna IB/FB a ma radu dalsi zajimavych vlastnosti ktere ostatni
> verze nemaji. Samozrejme, ze za nim nestoji zadna velka firma,
> ale pouze dva schopni russti programatori, kteri si upravuji FB
> predevsim pro svou vlastni potrebu. Projekt Firebird se ted snazi
> navazat spolupraci a zaclenit nejzajimavejsi veci do dalsi verze FB
> (1.5). A takovych prikladu se daji najit tisice. Napr. vite o tom, ze
> po nedavnem uvolneni zdroju Quake 2 se rozjel projekt portovani
> Quake 2 enginu do Delphi ? Uz maji prevedeno cca 10% (zacali
> nedavno, ale uz je kolem toho par desitek lidi). Pro nekoho mozna
> pitomost a zbytecnost, ale pro spoustu lidi je to moznost naucit se
> "hi-tech" grafiku a chrlit nejen zajimave hry, ale i jine aplikace
> pouzivajici napr. 3D vizualizaci (virtualni Temelin pro servisni
> techniky ?). Nepodcenujte silu Open Source jako vyukoveho
> nastroje (nejen na skolach) !
>
> 3) Open Source _neni_ lek na vsechny nemoci sveta, ale ma sve
> nesporne prednosti jak pro vyvojare, tak pro uzivatele. Ne kazdy
> jich ale dokaze/muze vyuzit pro sve konkretni potreby, a nikdo ho
> ani nenuti. Ale nepouzivat OS kdyz je to vyhodne jen proto ze je to
> OS je kratkozrake a dukazem "spatneho podnikatelskeho zameru"
> :-) Osobne take nepouzivam kdejakou pitomost jen proto ze je to
> free-se-zdroji nebo Open Source, ale nijak se nebranim pouzit ty
> dobre (napr. INDY, DUnit, Want, Apache, Linux, Firebird, PHP,
> Python, Xalan, Tomcat, DocBook, GhostScript atd.) a ktere bych
> jen tezko programoval sam (mam jenom jeden zivot). Abych rekl
> pravdu, bez existence prave takovych OS programu bych radu veci
> vubec nemohl (legalne) delat, protoze bych si nemohl dovolit koupit
> potrebne nastroje. A je mi naprosto jasne, ze OS je trnem v zadnici
> firem ktere se zivi prodejem sw ktery bych si jinak musel koupit :-)
>
> 4) Open Source je jen _kompletne jina_ metoda vyvoje a distribuce
> sw, nic vic. To znamena ze ma jista pravidla, a ze ji muzete
> aplikovat bud uspesne nebo neuspesne. Jen na SourceForge
> najdete pres 30,000 projektu, ale jen cca polovina je
> "zivotaschopnych". Desetina z nich jsou "klicove" projekty, ktere
> jsou nejen vysoce kvalitni, ale posunuji hranice moznosti pro
> "bezne" uzivatele (napr. JBoss, phpNuke, MySQL, Python).
> Nektere projekty jsou male, a tudiz riziko jejich pouzivani je vetsi,
> ale je mnoho velkych projektu a rada znich je zastitena nemalym
> balikem peniz a predevsim osobnich zajmu. Myslite si napr., ze
> Linux muze zkrachovat ? Ani omylem, prilis mnoho firem je na nem
> dnes zavislych nebo znej ma nemaly profit (od vyrobcu chytrych
> TV, firewallu, digitalnuch kamer, handheldu, velkeho "zeleza" po
> vyrobce krabicoveho sw). To same plati i o desitkach tisic dalsich
> projektu.
>
> 5) Ekonomika Open Source je _jina_ nez bezne zazita ekonomika
> SW. Rozhodne v ni nejsou astronomicke penize pro jedineho
> hrace, ale je v ni dost penez aby se kola udrzela v chodu. Ta kola
> by se sice mnohdy tocila i bez penez, ale penize je dokazi roztocit
> do neuveritelnych obratek (bezte si o tom popovidat k IBM, napr. o
> projektu Eclipse kdyz uz ne o Linuxu :-) Firmy, ktere se zivi
> prodejem krabicoveho sw (MS, Borland) jsou z Open Source
> nestastne a ani nejsou schopne prejit na OS ekonomiku (z
> principu), ale pro firmy ktere jsou zalozene predevsim na
> dodavkach _reseni_ je to zlaty dul (predevsim diky drastickemu
> snizeni nakladu na vyvoj a vetsi marze z cen finalniho produktu). Je
> jasne, ze z obchodniho hlediska _neni_ Open Source hra pro
> kazdeho, a pro nekoho muze byt i smrtelna, ale pro mnohe je to
> raketove palivo pro jejich business.
>
> Zaverem snad jen tolik, ze svet neni cernobily ani sedy, ale barevny
> az oci prechazeji. Pokud zrovna vy tezite z existence OS nebo
> primo z jeho vyvoje, nebo naopak vam OS "prekazi" v podnikani,
> meli by jste si uvedomit, ze na svete bylo, je a bude misto pro
> vsechny. Neni treba se hadat ani prat, pro vsechny je mista dost :-)
>
> S pozdravem
>
> Pavel Cisar
> Mobil: 0724 281429
> http://www.ibphoenix(tec)cz
> Vse co potrebujete pro Firebird a InterBase
>

Vlastny MessageDlg ...

[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 14.1.2002 12:12:11


TvujDialog.ShowModal;

T.

OT: Propojeni PC + notebook paralelnim kabelem

[*] Frankie Y <frankie.y(zv)seznam(tec)cz> - 14.1.2002 12:13:44

Ahoj,
chci pripojit dva pocitace tak, aby mohli sdilet jedno pripojeni k
Internetu. V domneni, ze je to snadna vec, jsem zakoupil paralelni kabel,
nainstaloval Prime propojeni kabelem, spojil pocitace, nastavil jeden jako
host, druhy jako hostitel. Avsak spojeni mezi pocitaci se nezdarilo. Po
hledani na Internetu jsem narazil na jedinou stranku, ktera by mohla
vysvetlit muj problem (ostatni poskytovali pouze velice povrchni navod ve
smyslu vyse uvedeneho textu). Pro zdarne propojeni je totiz zrejme potreba,
aby v obou pocitacich byl v BIOSu nastaven paralelni port jako EPP nebo ECP.
Na desktopu to nastavit mohu avsak nedari se mi dostat se do BIOSu
notebooku. Proto bych potreboval zjistit jinou cestou presne nastaveni
notebooku a dle nej upravit konfiguraci PC. Nevite nekdo jak na to nebo by
pricina nezdaru mohla byt jeste jinde?

Frankie


Vlastny MessageDlg ...

[*] Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz> - 14.1.2002 12:15:54

[P��loha v souboru: winmail.dat]
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On

> potrebujem poradit ... vytvoril som si form, ktory je pre mna vlastne
> Dialogove okienko ... a chcem, aby sa choval ako MessageDlg, t.j. aby
> ked ho zavolam z nejakej procedurky, tak aby sa cakalo kym sa to moje
> dialogove okienko zatvori a aby sa pokracovalo vo vykonavani
> procedurky
> (teda presne tak ako keby som pouzil standardny MessageDlg)... ako to
> dosiahnut ? teraz to ide tak, ze dialogove okienko je viditelne, ale
> procedura necaka na ukoncenie mojho dialogoveho okienka a skonci sa.

Pouzij TvujForm.ShowModal;

Jaroslav Sipek

Upload dat pres HTTP ---> PHP 2

[*] Karel Klimes <klimes(zv)metra(tec)cz> - 14.1.2002 12:22:45


>drobny dotaz... kdyz pridavas ty data, aktualizujes take cislo v
>hlavicce u toho "Content-Length:" ? takhel to znamena, ze proste se v

Content-length aktualizuju.

> > POST /www/tests/http/test.php HTTP/1.1
> > Content-Type: multipart/form-data;
> > boundary=---------------------------7d12261e450
> > Host: 193.0.0.229
> > Content-Length: 181
> >
> > -----------------------------7d12261e450
> > Content-Disposition: form-data; name="data_x"
> > Content-Type: application/octet-stream
> >
> > DATA
> > -----------------------------7d12261e450--
> >
> >
> > Na pozici DATA jsem postupne doplnoval bajty (odesilal jsem je po jednom),
> > vysledky jsou uvedeny zde:
> >
> > - odeslano: 22h (") prijato (v PHP promene data_x): 5ch 22c (\")
> > - odeslano: 27h (') prijato: 5ch 27h (\')
> > - odeslano: 5ch (\) prijato: 5ch 5ch (\\)
> > - odeslano: 00h prijato: NIC
> >
> > mj. kdyz odeslu napr. 40h 40h 40h 00h 41h 41h 41h, tak prijmu jenom 40h
> 40h
> > 40h, proste se to od te 00h odrizne.
>
>-- Lukas Gebauer.
>
>E-mail: gebauerl(zv)mlp(tec)cz
>http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

OT: Jak obnovit data z CD-RW

[*] "Petr Slab�" <Slaby(zv)c3(tec)cz> - 14.1.2002 12:40:36

Ahoj,

jedine co me napada je moznost si zkusit ulozit cely disk do ISO souboru (ale to nejspis neprojde), nebo projit CD sektor po sektoru a vyseparovat data z tech sektoru. U CD bych predpokladal, ze sektory (v kterych je ulozen soubor) pujdou za sebou.

Hodne zdaru... :-))

Petr

*********** REPLY SEPARATOR ***********

On 14.1.2002 at 10:24 Radek Hole�ek wrote:

>Dobry den,
>
>omlouvam se za OT, ale zalohoval jsem si zdrojaky na RW,
>reinstalovat PC a bohuzel jsem si to RW omylem nechtene vymazal.
>Poradite, prosim, nekdo postup, jak ty zdrojaky obnovit?
>Na internetu jsem nic nenasel.
>Napsat ty programy bych sice zvladnul, ale nestihl bych to v terminu.
>
>S diky
>
>Radek Holecek

jak na navratovou hodnotu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 14.1.2002 13:03:11

On 13 Jan 2002 at 22:25, Erik Salaj wrote:

> Delphi podla mna nie je urcene ani vyhodne pre nizkourovnove
> zalezitosti ale typickou oblastou jeho pouzitia su databazove
> aplikacie.

Naprosto nesouhlasim. Delphi je natolik dobre vymyslene (samozrejme,
nic neni naprosto idealni), ze umoznuje tvorit jak databazove
aplikace, tak i nizkourovnova reseni. Jakou to ma vyhodu? Jestlize mi
nevyhovuje standardne nabizene reseni pripojeni k databazi, mohu si
napsat uplne odspodu svoje reseni, se vsim vsudy, s veskerou
efektivitou. Takze kdyby Delphi neznalo ukazatele, nemohl bych psat
podporu pro OLE DB, ale musel bych zustat na urovni ADO. Chapu, ze
tobe by to stacilo, ale mne ne.

> Tam korektnost a spolahlivost su prvorade poziadavky a
> otazky, ci je vyhodnejsi smernik, alebo nie prakticky nemaju vyznam.

OLE DB v rade pripadu pozaduje nebo vraci ukazatel na nejaka data
nebo pole. Proc asi?

> Ozaj, preco nie su smerniky napr. v SQL serveri, ked je to take
> vyhodne, ale namiesto nich tam obvykle byva podporovany vysokourovnovy
> SQL jazyk? Myslis, ze keby tam doplnili smerniky, ze by to prinieslo
> nejake zlepsenie?

:-) Jenze k tem datum se musis nejak dostat. A to se provadi pres
nejakou knihovnu funkci, ktere uz ukazatele casto obsahuji. Pokud
jazyk nepodporuje ukazatele, musi tuto vlastnost nejak obejit, nebo
je nutne napsat mezivrstvu, ktera umozni danemu jazyku dostat se k
datum. Pak mu ale zpravidla neumozni dostat se k datum pouzitim
funkci z te knihovny.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


"Client", SQLtabulka, D5(D6) a DBE(??) ???

[*] Ing. Ji�� SOKOL <JS-delphi(zv)seznam(tec)cz> - 14.1.2002 13:12:01

Zdravim panove,
mam dotaz. Chtel ve svem projektu pouzit SQLtabulku(lokalni) nejspis typu PARADOX
a chtel bych tento projekt umistit na CD. Dale bych chtel, aby kam prijdu
se tento projekt rozjel a hlavne,

aby mel pristup do ty tabulky.

Vim, ze existuje DBE engine a ze pomoci installshieldu by to slo vyresit,
ale je to moc instalovani na typ projektu, ktery potrebuju vytvorit.

Ma to byt aplikace, ze prijdu, spustim, odejdu a nic za mnou nezustane.

Nevite nekdo, jake jsou potrebne knihovny, kam je umistit a treba jaka
je potreba uprava registru na to, abych mohl zobrazit tabulku a
pochopitelne i s ni nejak pracovat??

Tu SQLTabulku chci pouzivat proto,ze prace s daty pomoci SQL prikazu je
fakt pohodlna - vyhledavani, filtrace, serazeni atd.

Diky za vase navrhy.

Jiri
SOKOL

______________________________________________________________________
Co davaji v TV? http://tv.seznam(tec)cz


IB/FB table properities

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 14.1.2002 13:21:05

Ahoj,

prosim o radu jak ziskat %subj%, tak jak se zobrazi v IBConsole v
Properities for: MOJE_TABULKA
na zalozce Properities
(Name, Type, Character Set, Collation, Default Value, Allow Nulls)

Nemohu to v system. tabulkach najit.
Nazvy vsech tabulek databaze vybrat umim.

Dekuji za vasi pomoc,

preji hezky den,
Jarek Uher


Resource editor

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 14.1.2002 13:28:12

Hi
Nevite nekdo jakym nastrojem by se dala do *.res souboru dostat
bitmapa v trochu slusne bitove hloubce 16bpp, 24bpp, 32bpp (Delphi
Image editor je v tomto ponekud impotentni a umi maximalne 256
barev a
i s tim pracuje nejak divne - jevi se mi to tak, ze neupravi paletu).

Diky,
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


GC, Delphi, OOP Was: jak na navratovou hodnotu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 14.1.2002 13:28:24

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>

> Jsou vsak urcite typy uloh, kde prace s
> ukazateli je nejefektivnejsi jak na rychlost, tak na velikost
psaneho
> kodu, a tedy i na citelnost.

1. Je pravda, ze pokud nemas tech pointeru ve hre soucasne vice,
dokaze
(nejen) Delphi od verze 5 pri optimalizaci produkovat podobny kod,
jaky by napsal dobry programator v assembleru, takze z pohledu
run-time
je bezesporu efektivni.

2. Je pravda, ze Ti napsani stejneho kodu pomoci pointeru zabere mene
casu,
nez by potreboval dobry programator v assembleru, navic se da
predpokladat,
ze kod bude portabilni na urovni Delphi popr. jineho Pascalu.

3. Velikost psaneho kodu je jiz ale diskutabilni, protoze pokud
roztrousis
pointerove operace v kodu, muzes toho napsat mnohem vic, nez
kdybys je
zapouzdril do nejakeho streamu, o udrzovatelnosti ani nemluve (viz
napr.
pozadavek na zmenu endianu - kolik dereferenci vicebytovych hodnot
bys
asi zapomel zkonvertovat a kolik by jich bylo zkonvertovano
omylem)

4. Citelnost zapisu s pointery bude vetsinou horsi a mene
srozumitelna,
napr. Tvuj priklad

Inc(PByte(P), PInteger(P)^)

je urcite mene srozumitelny nez napr.

SeekForward(ReadInteger) popr. SeekRelative(ReadInteger)

nebo napr. jen

SeekForwardIndirect()

(ale napr. SWI() by moc srozumitelne nebylo, prestoze bys toho
napsal
zdaleka nejmene ;-)


5. Udrzovatelnost a modifikovatelnost kodu s pointery bude obecne
spatna,
protoze efektivitu vysledneho kodu jsi dosahl tim, ze v podstate
operujes primo na urovni stroje misto na urovni nejake vhodne
logicke
abstrakce, k cemuz predevsim byly vyssi programovaci jazyky
zavedeny.

Myslim, ze dnes jsou pomerne vzacne pripady, kdy je nutne
optimalizovat rychlost algoritmu na urovni strojovych taktu,
protoze kdyz vezmes v uvahu stredni dobu na vyvoj nejakeho SW,
tak za tu dobu Ti vzroste vykon CPU na trhu nejmene o 30 %.

Ale o to vic se do popredi dostava pozadavek na
udrzovatelnost, zejmena na modifikovatelnost a reusibilitu.

Predstav si, ze bys napr. chtel predbehnout se svym podnikatelskym
zamerem
dobu a rozhodl se misto prodeje lokalizatoru spustit lokalizacni
server a umoznit lidem lokalizovat si jejich aplikace na dalku
pres Internet
(a nechat si za to platit od transakce).

Co by asi zbylo z Tvych dnesnich operaci s PE formatem?
Kdybys to dnes psal jako stream, tak bys ho jen prepsal tak,
aby na EXE mohl pres TCP/IP a vse ostatni by zustalo stejne ;)


Bye, pf

Tvorba komponent

[*] Roland Turcan <rolo(zv)sedas.sk> - 14.1.2002 13:45:19

Kniha Borland Delphi X Developer's Guide - Caption "Creating custom
components";

R.

----- Original Message -----
From: "Standa" <Ooman(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, January 14, 2002 9:54 AM
Subject: Tvorba komponent


> Ahoj snazim se vytvaret nejake komponenty a mam nekolik problemu asi by mi
> pomohlo videt nejake zdrojaky uz hotovych ( z tech v Delphi sem toho moc
> nepobral ). Nevi nekdo o nejakych jednoduchych komponentach se zdrojakem,
> nebo jeste lepe nevi nekdo o strankach kde popisujou tvorbu komponent v
> Delphi.
>
>

IB/FB table properities

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 14.1.2002 13:59:31

> prosim o radu jak ziskat %subj%, tak jak se zobrazi v IBConsole v
> Properities for: MOJE_TABULKA na zalozce Properities
> (Name, Type, Character Set, Collation, Default Value, Allow Nulls)

ja to teda nevim, ale pokud bych to hledal,
podival bych se, jak to hleda IBConsole.

dekuji PeC(zv)

IB/FB table properities

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 14.1.2002 13:59:01

From: "Jaroslav Uher" <moravia(zv)mbox.vol(tec)cz>
> prosim o radu jak ziskat %subj%, tak jak se zobrazi v IBConsole v
> Properities for: MOJE_TABULKA
> na zalozce Properities
> (Name, Type, Character Set, Collation, Default Value, Allow Nulls)

Chces to programovo alebo nejakym nastrojom? Ak programovo tak musis napisat
o ktoru vlastnost Ti ide konkretne ale mozem Ta upozornit ze ide o proces
ktory je velmi komplikovany. Jeho komplikovanost ale zavisi na druhu
property a kompletnosti jej zobrazenia.

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Resource editor

[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 14.1.2002 14:21:40

Ahoj,

tady jeden najdes: http://www.wilsonc.demon.co.uk/delphi.htm

Tom

Radek KALA wrote:
>
> Hi
> Nevite nekdo jakym nastrojem by se dala do *.res souboru dostat
> bitmapa v trochu slusne bitove hloubce 16bpp, 24bpp, 32bpp (Delphi
> Image editor je v tomto ponekud impotentni a umi maximalne 256
> barev a
> i s tim pracuje nejak divne - jevi se mi to tak, ze neupravi paletu).

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

Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic

e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446


Pascal vs. C(++)

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 14.1.2002 14:23:33

From: "Blazek Jaroslav" <Jaroslav.Blazek(zv)access-it(tec)cz>
> Ja bych byl take pro....... Programuji v C++B a Delphi a muj hlavni jazyk
je C/C++. V praci delam jen v Delphi.
> S Pascalem jsem zacinal (je to moje slabsi stranka), ale jakmile jsem jsem
presel na C/C++ propadl jsem tomu.
>
> mam hned jeden dotaz, jak toto udelat v pascalu
> <P>
> stve me porad tohle
> a:=nil;
> b:=nil;
> c:=nil;
> jde to nejak udelat jako v C
> <C>
> a=b=c=NULL;
>
> rekl bych ze ne.....

mas pravdu nejde jedine ze by si si napisal niekolko "overload" funkci do
ktorej by si predaval "var" parametre.
(Pred casom sa to tu riesilo.)

> Co mi jeste chybi
> 1. V Delphi mi strasne chybi jako v C inkrementace a dekrementace
> <C>
> i++;++i;i--;--i;
> sice mi namitnete, ze existuje Inc() a Dec(), ale to zdaleka nesplnuje
funkce operatoru ++,-- v C. Inc() a Dec() jsou procedury a nedaji se pouzit
jako parametry, treba fci.
> Do budoucna si je asi udelam sam.

Nemusis je robit uz su:
http://www.builder(tec)cz/art/homepage/delphilikec.html

> 2. Chybi mi pretezovani operatoru, kdy v C++ muzu treba scitat, odecitat,
delit, nasobit objekty stejneho typu.

???

> 3. Nebo mi chybi treba toto (je to jen vykonstruovany priklad)
> <C>
> if ((hodnota1=MojeFce(hodnota2=MojeFce2())==1)
> {
> Neco1=DalsiFce1(hodnota1);
> Neco2=DalsiFce2(hodnota2);
> }
> <P> to musim napsat takto a hned mam o nekolik radku navic
>
> hodnota2:=MojeFce2;
> hodnota1:=MojeFce(hodnota2);
> if hodnota1=1 then
> begin
> Neco1:=DalsiFce1(hodnota1);
> Neco2:=DalsiFce2(hodnota2);
> end;

Toto prave riesi zapis ako MojeFce(var parameter: Integer). Integer;
To var znamena ze hodnota premennej ide do funkcie kde je mozne ju zmenit a
zasa z funkcie. (tak ako to riesi priklad v prilozenom linku vyzsie)

> 4. Do dneska jsem jeste nepochopil, proc pred "else" nemuze byt strednik

pretoze ELSE je pokracovanie prikazu IF. "Strednik" sa dava vzdy za koncom
prikazu.

> 5. A co treba v <C > zjednoduseny if (priklad je pekna blbost)
> <C>
> (b=a=(MojeFce()>1000 ? 1 : 0))++;
> <P> v pascalu zase nekolik radku navic
> if MojeFce>1000 then
> begin
> a:=1;
> b:=a;
> Inc(b);
> end
> else
> begin
> a:=0;
> b:=a;
> Inc(b);
> end;

No ono to je _mozno_ prave vyhoda Pascalu ze sa zapisuju prikazu najlepsie
na kazdy riadok zvlast a skor sa v tom da orientovat. Najme po dlhom case je
to jednoznacnejsie nez zapis v C. Ale to je mozno subjektvny pohlad.
Tiez je to zapis lepsi na krokovanie pri ladeni.

> V pascalu jsem bridil, mam jiste mezery, ale obcas mi plno veci chybi.....

Mno ono je mozna najlepsie naucit sa jeden jazyk poriadne a v tom
programovat stale (ak to moznosti dovoluju) a mozno ze je to jedno ktory
jazyk pretoze v dnesnej dobe su moznosti relativne vyrovnane. Kazdy jazyk ma
svoje plus i minus. V dnesnej dobe ide najma o cas a tym padom to chce mat
bud rychly hardware alebo kompilator :)). Mam pocit ze v tomto kompilator
Delphi nema konkurenciu.

Kakacka Pavol
KasiX(zv)atlas(tec)cz


GC, Delphi, OOP

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 14.1.2002 14:24:37

On 14 Jan 2002 at 13:28, Petr Fejfar wrote:

> 3. Velikost psaneho kodu je jiz ale diskutabilni, protoze pokud
> roztrousis
> pointerove operace v kodu, muzes toho napsat mnohem vic, nez
> kdybys je
> zapouzdril do nejakeho streamu, o udrzovatelnosti ani nemluve (viz
> napr.
> pozadavek na zmenu endianu - kolik dereferenci vicebytovych hodnot
> bys
> asi zapomel zkonvertovat a kolik by jich bylo zkonvertovano
> omylem)

Abych to blize vysvetlil. Pokud potrebuji vyresit zcela specifickou
ulohu pri praci s nestrukturovanymi nebo smisene strukturovanymi
daty, kterou neresim nikde jinde, a pro kterou bych musel napsat
hromady objektu, kdybych se chtel vyhnout pointerum uplne, na objekty
se vykaslu a resim to pomoci pointeru. Pokud bych totez resil na vice
mistech, pak to samozrejme zapouzdrim do vhodneho objektu, a s
pointery pracuji uvnitr nej. V zadnem pripade ale nepovazuji za
schudne neco takoveho resit pres dynamicke pole bajtu (jak navrhoval
Erik), a pohybovat se v nem pomoci indexu. Tohle zkomplikuje praci s
PChar retezci natolik, ze nema vubec smysl se s tim babrat, pokud pro
to neni opravdu zavazny duvod.

> 5. Udrzovatelnost a modifikovatelnost kodu s pointery bude obecne
> spatna,
> protoze efektivitu vysledneho kodu jsi dosahl tim, ze v podstate
> operujes primo na urovni stroje misto na urovni nejake vhodne
> logicke
> abstrakce, k cemuz predevsim byly vyssi programovaci jazyky
> zavedeny.
>
> Myslim, ze dnes jsou pomerne vzacne pripady, kdy je nutne
> optimalizovat rychlost algoritmu na urovni strojovych taktu,
> protoze kdyz vezmes v uvahu stredni dobu na vyvoj nejakeho SW, tak
> za tu dobu Ti vzroste vykon CPU na trhu nejmene o 30 %.

Napriklad u takoveho Lokalizatoru se bez optimalizace na teto urovni
stale neobejdu. Vykon pocitacu je stale natolik maly, ze i 100%
narust vykonu je prilis malo na to, abych to mohl delat s vetsim
durazem na prenositelnost na ukor vykonu. Zatim mi spadl kamen ze
srdce pouze v otazce RAMeti.

> Ale o to vic se do popredi dostava pozadavek na
> udrzovatelnost, zejmena na modifikovatelnost a reusibilitu.
>
> Predstav si, ze bys napr. chtel predbehnout se svym podnikatelskym
> zamerem
> dobu a rozhodl se misto prodeje lokalizatoru spustit lokalizacni
> server a umoznit lidem lokalizovat si jejich aplikace na dalku
> pres Internet
> (a nechat si za to platit od transakce).

I o tom uz uvazuju. Nejvetsim zadrhelem je prozatim system
spolehlivych, levnych a jednoduchych mikroplateb po celem svete.

> Co by asi zbylo z Tvych dnesnich operaci s PE formatem?
> Kdybys to dnes psal jako stream, tak bys ho jen prepsal tak,
> aby na EXE mohl pres TCP/IP a vse ostatni by zustalo stejne ;)

Hodne zalezi i na tom, zda se to bude zpracovavat na serveru nebo u
klienta. Tedy, zda se budou prenaset lokalizovane programy (nebo
vybrane objekty) na server, nebo naopak zda se budou prenaset moduly
ke klientovi (a tam pobezi treba na Linuxu? :). V kazdem pripade se
jedna o dost velke datove toky, takze bez pevne linky by uzivatel
prodelal. Ale pri tom me nenapada, jak by to ovlivnilo treba
rozebirani konkretniho C dialogu, ktery protece internetem cely jako
nejaky blok, a rozebira si ho az modul, kteremu ten dialog patri.

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


Resource editor

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 14.1.2002 14:37:03

Resource Builder, Resource Hacker, Resource Graber, MicroAngelo...

--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

14.1.2002 Radek KALA:
> Hi
> Nevite nekdo jakym nastrojem by se dala do *.res souboru dostat
> bitmapa v trochu slusne bitove hloubce 16bpp, 24bpp, 32bpp (Delphi
> Image editor je v tomto ponekud impotentni a umi maximalne 256
> barev a
> i s tim pracuje nejak divne - jevi se mi to tak, ze neupravi paletu).

> Diky,
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Cerneho 58/60, 635 00
> tlf. : + 420 5 4622 3491
> fax : + 420 5 4622 3470
> GSM : + 420 603 85 75 15

Resource editor

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 14.1.2002 14:40:34

> Hi
> Nevite nekdo jakym nastrojem by se dala do *.res souboru dostat
> bitmapa v trochu slusne bitove hloubce 16bpp, 24bpp, 32bpp (Delphi
> Image editor je v tomto ponekud impotentni a umi maximalne 256
> barev a i s tim pracuje nejak divne - jevi se mi to tak, ze
> neupravi paletu).

Ahoj,

mozes si do projektu pridat svoj vlastny .rc subor, Delphi ho rozozna a
automaticky skompiluje pomocou brcc32.exe.

Struktura .rc suboru je popisana v Platform SDK, pre bitmapu by mala
fungovat priblizne takato syntax:

<id> BITMAP <filename>

napr.

MyBitmap BITMAP mybmp001.bmp

HTH
TOndrej


IB/FB table properities

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 14.1.2002 14:43:58

On 14 Jan 2002, at 13:59, Kakacka Pavol wrote:

> From: "Jaroslav Uher" <moravia(zv)mbox.vol(tec)cz>
> > prosim o radu jak ziskat %subj%, tak jak se zobrazi v IBConsole v
> > Properities for: MOJE_TABULKA na zalozce Properities (Name, Type,
> > Character Set, Collation, Default Value, Allow Nulls)
>
> Chces to programovo alebo nejakym nastrojom? Ak programovo tak musis
> napisat o ktoru vlastnost Ti ide konkretne ale mozem Ta upozornit ze
> ide o proces ktory je velmi komplikovany. Jeho komplikovanost ale
> zavisi na druhu property a kompletnosti jej zobrazenia.

programove
select [pole_ktere_potrebuji] from ???
where ???

A ze je to komplikovane souhlasim.
Rad bych si udelal programek, ktery by mi na zaklade tabulky
generoval scripty k INSERT, UPDATE a DELETE proceduram.

Jarek Uher



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