Archív konference Delphi

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

Local SQL na velku indexovanu paradox tabulku

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 14.5.1998 01:34:17

Spr�vne :

select * from stars where (delta <= :DeltaMin and delta >=:DeltaMax) AND alfa in
(select * from stars where alfa between :AlfaMin and :AlfaMax)

SQL je to spravne ale neviem ci local SQL to zvlada
Tungli Jan
Tungli(zv)pvt.sk
----------
> Od: Stepan Liska <LISKA(zv)milada.troja.mff.cuni(tec)cz>
> Pre: delphi(zv)pinknet(tec)cz
> Predmet: Re: Local SQL na velku indexovanu paradox tabulku
> D�tum: 13. m�j 1998 15:27
>
> > Mam s tym teraz ale iny problem : povodne som potreboval z tabulky
> > vyrezat "stvorec" - podla dvoch indexov - slo to velmi pomaly.
> > Zredukoval som SQL dotaz na select * from stars where alfa between
> > :AlfaMin and :AlfaMax. Vysledok vratilo uzasne rychlo, aj ked mal
> > 20.000 recordov. Potom som vymenil alfa za delta, a to cakal som to
> > iste. Ale vysledok bol uplne iny - strasne pomale, hoci tam bol tiez
> > index. Zrejme to bude tym, ze podla Alfa je tabulka fyzicky
> > zotriedena, a podla delta nie. Ale tam mam index, ktory by mi to mal
> > nahradit. Nerozumiem tomu a akosi sa mi nedari cez to prejst.
>
> Coz takhle udelat nejdrive select na Alfa, a v tom selectu dat
> ORDER BY Delta a na vysledek dat select podle Delta. Teda takhle by
> mi to prislo jako nejlepsi na najiti ctverce. Akorat mam takovej
> pocit, ze se neda v LocalSQL udelat vnoreny dotaz, resp. pouzit
> vysledek jednoho dotazu v jinem. Teda asi takto
>
> select * from
> ( select * from stars
> where alfa between :AlfaMin and :AlfaMax
> )
> where delta between :DeltaMin and :DeltaMax
>
> Je to jenom napad, ale treba nekdo poradi zda to jde.
>
> Stepan.

Local SQL na velku indexovanu paradox tabulku

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 14.5.1998 02:12:55

S between kaluzulou mal som tiey neprijemne skusenosti, lebo bol strasne pomaly ale ked som miesto toho pouzil A<=MaxA AND A>=MinA tak mi to islo rychlo. Naskumal som precoje to tak.


----------
> Od: Stepan Liska <LISKA(zv)milada.troja.mff.cuni(tec)cz>
> Pre: delphi(zv)pinknet(tec)cz
> Predmet: Re: Local SQL na velku indexovanu paradox tabulku
> D�tum: 13. m�j 1998 15:27
>
> > Mam s tym teraz ale iny problem : povodne som potreboval z tabulky
> > vyrezat "stvorec" - podla dvoch indexov - slo to velmi pomaly.
> > Zredukoval som SQL dotaz na select * from stars where alfa between
> > :AlfaMin and :AlfaMax. Vysledok vratilo uzasne rychlo, aj ked mal
> > 20.000 recordov. Potom som vymenil alfa za delta, a to cakal som to
> > iste. Ale vysledok bol uplne iny - strasne pomale, hoci tam bol tiez
> > index. Zrejme to bude tym, ze podla Alfa je tabulka fyzicky
> > zotriedena, a podla delta nie. Ale tam mam index, ktory by mi to mal
> > nahradit. Nerozumiem tomu a akosi sa mi nedari cez to prejst.
>
> Coz takhle udelat nejdrive select na Alfa, a v tom selectu dat
> ORDER BY Delta a na vysledek dat select podle Delta. Teda takhle by
> mi to prislo jako nejlepsi na najiti ctverce. Akorat mam takovej
> pocit, ze se neda v LocalSQL udelat vnoreny dotaz, resp. pouzit
> vysledek jednoho dotazu v jinem. Teda asi takto
>
> select * from
> ( select * from stars
> where alfa between :AlfaMin and :AlfaMax
> )
> where delta between :DeltaMin and :DeltaMax
>
> Je to jenom napad, ale treba nekdo poradi zda to jde.
>
> Stepan.

Zobrazen� Html z disku

[*] Petr Urban <urban(zv)zbk(tec)czn(tec)cz> - 14.5.1998 06:25:31

Zkou��m si trochu hr�t s Delphi a internetem. Nev�m ale, jak zobrazit v Html
(THtml) str�nku, kter� je na disku tak, aby se neza�al p�ihla�ovat k
internetu. Um�m pouze zobrazit str�nku, kter� je na internetu (u� to je ale
SUPER :). Nev�m, jestli jste to n�kdy n�kdo zkou�el. Ale
za pokus nic ned�m. Hledal jsem to n�jakou dobu v helphu, ale bezv�sledn�.
Jakoby na to snad ani nemysleli :(
S pozdravem

Cooler


PowerBuilder

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 14.5.1998 07:23:37

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Hi all
prominte ze to sem pletu, ale nevite nahodou zda neexistuje takova konference i pro PowerBuilder20


Oracle a Delphi 16bits

[*] Rychetsk� Pavel PharmDr <rychetskyp(zv)mpsv(tec)cz> - 14.5.1998 07:47:24

>mam nasledujici problem, nemohu se z Delphi 1.02, resp. BDE
2.52 C/S
>dostat na Oracle v. 7.3.4.1. Pri pokusu o spojeni system vypise

>hlasku:
>
>Vendor initialization failed.
>
>Predpokladam, ze chyba je v nastaveni BDE pro Oracle a to v
parametru
>VENDOR INIT. Pouzivam soubor ORA7WIN.DLL (datum 25.2.97,
velikost 273
>264 K).

SQLLinks 16bit nemam, ale bdobny problem je popsan nekde u Borlandu
(resp. u tech, jak se jenom jmenujou, co byli Borland) pro 32 bitovy
BDE.

Takze bych tu knihovnu videl jako ORA73WIN.DLL ve velikosti kolem 600 K
(zalezi na konkretni podverzi).
Tato knihovna je v pripade standardne provedene instalace Oraclovskeho
klienta
v adresari ORAWIN\BIN, kteryzto adresar musi byt na ceste.

Pavel Rychetsky


TListView

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 14.5.1998 07:52:48

Zdravim,

da se zjistit, ktera polozka z TListView je vybrana (mam na mysli neco
jako ItemIndex)?
Dekuji

S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

Problem s knihovnou RX 2.40

[*] TucekR(zv)p15.monet(tec)cz - 14.5.1998 07:53:00

Hmm tento problem mam jiz pul roku a zatim jsem to nevyresil uspokojive,
ani autori RX ani fachmani od Borlandu mi nepomohly........

TRT


----------
Od: Richard Skopal
Komu: DELPHI Distribution List
P�edm�t: Problem s knihovnou RX 2.40
Datum: 13. kv�ten 1998 10:12

Ahoj
Mam stejny problem s RX knihovnou 2.40, o kterem uz tady kdysi nekdo
psal.
Pri instalaci Dclrxtls.dpl do Delphi 3.0 C/S Windows 95 zamrznou tak,
ze jedinym resenim je resetovat pocitac.
K zamrznuti dojde vetsinou pri vyberu zalozky "RX Tools" v palete
komponent.
Mam PC s Pentium MMX 166 MHz, 32 MB RAM, Windows 95 cz OSR2,
IE4.0 + Active Desktop.
Kdyz z Register procedury pro Dclrxtls.dpl odstranim nekolik komponent,
tak se instalace podari. Nepodarilo se mi ale zjistit, ktere komponenty
tyto problemy zpusobuji. Zda se, ze zalezi spis na poctu registrovanych
komponent
v Dclrxtls.dpl, nez na tom, ktere z nich se odstrani.

Zkousel jsem nainstalovat RX 2.40 i na PC s Pentium II a WinNT 4.0
Server a
na PC s Cyrix 120 a Win 95 - zde vsechno funguje bez problemu.


Richard Skopal
skopalr(zv)trexima(tec)cz

'This control requires version 4.70 or greater of

[*] Ondrej Kelle <Kelleon(zv)nnsk.sk> - 14.5.1998 08:26:48

Na Mrkvosofte som nasiel update:
ftp://ftp.microsoft.com/Softlib/MSLFILES/40comupd.exe

Nainstaluje to verziu 4.72.2106.4. :)

Ondrej Kelle
it(zv)nnsk.sk

> -----Original Message-----
> From: Ondrej Kelle [SMTP:Kelleon(zv)nnsk.sk]
> Sent: 13. m�j 1998 14:06
> To: 'Delphi Distribution List'
> Subject: 'This control requires version 4.70 or greater of
> COMCTL32.DLL'
>
> Ahoj vsetci,
>
> tuto hlasku dostavam v runtime pri vytvarani formulara, ktory obsahuje
> TDateTimePicker. Je to spustane na Win95 (s ktorymi nemam takmer
> ziadne
> skusenosti), verzia COMCTL32.DLL na tom stroji je 4.00.950.
>
> Naivne som dufal, ze tento problem vyriesim jednoducho tym, ze do
> InstallShield setup-u pridam tuto DLL v pozadovanej verzii. Napadlo
> ma,
> ze ju najprv skusim rucne aktualizovat, ale - au. Win95 mi tuto DLL
> nedovoli ani premenovat a krici na mna, ze je 'in use by Windows'. Mam
> dojem, ze teda ani InstallShield v tomto pripade neuspeje (alebo prave
> na to je tam to sympaticke posledne okno 'Restart Windows'?). Okrem
> toho, mozu tam byt ine zavisle kniznice, o ktorych nemam ani
> potuchy...
>
> Takze moja otazka znie: Kedze neviem, na akych strojoch bude moja
> aplikacia spustana, znamena to, ze sa musim vzdat pouzivania tych
> novsich controls, napr. TDateTimePicker, TProgressBar, TTreeView...
> atd.? Je toto mozne vyriesit pomocou InstallShield-u? Myslim tym
> verziu
> Express, ktora je dodavana zdarma s Delphi 3.
>
> Pripadne, ktory service pack alebo ktora verzia IE :) musi byt
> nainstalovana, aby som vo Win95 mal pozadovane verzie systemovych
> kniznic?
>
> S tymito problemami som zatial velmi neprisiel do styku, takze budem
> vdacny za kazdu pomoc, pripadne odkazy, kde mam hladat informacie.
>
> Vopred vdaka
>
> Ondrej Kelle
> it(zv)nnsk.sk


problemy s DCOM, "RPC server nebyl nalezen"

[*] Martin Koran <komar(zv)komar(tec)cz> - 14.5.1998 08:41:46


-----Original Message-----
From: Ladislav Nagy <lada(zv)kolej.mff.cuni(tec)cz>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Date: Wednesday, May 13, 1998 10:36 PM
Subject: problemy s DCOM, "RPC server nebyl nalezen">"RPC server nebyl nalezen."


Zkus http://www.exepc.com/~dmiser/dcom95.htm


====================================
Martin Koran
KOMAR
Hilbertova 68
440 01 LOUNY

tel.: +420 (395) 65 40 19
fax: +420 (395) 65 53 85
mail: komar(zv)komar(tec)cz

TListBox

[*] Petr Studeny <studeny(zv)olympo(tec)cz> - 14.5.1998 08:49:51

> Zdravim,
>
> netusite nekdo, jak dostat k polozce v Listboxu ikonu (BMP, ICO)?
>
> Diky.
>
> S pozdravem
>
> Libor Krayzel
> Czech Television, Television Studio Ostrava
> Dvorakova 18
> 729 20 Ostrava

Co si pamatuju, tak to umela komponenta RxDBLookupList z RX knihovny,
ktera je tu stale na poradi dne.

----------------------------------------------------------------
Petr Studeny
OLYMPO controls Ltd. e-mail: studeny(zv)olympo(tec)cz
Havrankova 33, 619 00 Brno phone: +421-05-43216101-11
----------------------------------------------------------------


TListView

[*] Vit Sykacek <vit.sykacek(zv)vsp(tec)cz> - 14.5.1998 09:02:36

Co takhle zkusit TlistView.ItemFocused property ?????

DireCon

-----Original Message-----
From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
Sent: Thursday, May 14, 1998 7:53 AM
To: '*** Delphi'
Subject: TListView

Zdravim,

da se zjistit, ktera polozka z TListView je vybrana (mam na mysli neco
jako ItemIndex)?
Dekuji

S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

Gumove pole

[*] Stepan Cerny <chaosz(zv)geocities(tec)com> - 14.5.1998 09:22:56

Dobre rano ... :-)

nevite negdo, jak jednoduse, elegantne (a pokud mozno bez prace) udelat
natahovaci pole pro cisla ?
Neco jako StringList, ale aby se tam ty cisla ukladali jako cisla predem
daneho typu (Integer, Real, Double), nebo pole ( MyPole = Array[1..X] of
Integer).

Diky, Diky, Diky

Stepan Cerny
chaosz(zv)geocities.com

Problem s knihovnou RX 2.40

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.5.1998 09:23:28

> Hmm tento problem mam jiz pul roku a zatim jsem to nevyresil uspokojive,
> ani autori RX ani fachmani od Borlandu mi nepomohly........

Podle me tohle nema zadnou souvislost s RX, je to zrejme ciste chyba
Borlandu.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

editor RTF & Pict & OLE

[*] Ivan Tur�an <iturcan(zv)borland(tec)cz> - 14.5.1998 09:41:52

Fajn,

ale, ja mam komponentu ktora podporuje vkladanie obrazkov a lubovolnych
inych objektov do
RichEditu, ale stale zostava problem programovo menit velkost objektu, jeho
poziciu a ulozenie
objektu na disk.

NASIEL NIEKDO NA TOTO RIESENIE ?


Ivan Turcan


----- P�vodn� zpr�va -----
Odes�latel: Ondrej Kelle <Kelleon(zv)nnsk.sk>
Komu: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Datum: 13. kv�tna 1998 23:44
P�edm�t: RE: editor RTF & Pict & OLE


>Nieco som nasiel pre Delphi 2 na
>http://www.dystopia.fi/~janij/techinfo/richedit.htm
>
>Ondrej Kelle
>it(zv)nnsk.sk
>
>> -----Original Message-----
>> From: Ivan Tur�an [SMTP:iturcan(zv)borland(tec)cz]
>> Sent: Tuesday, May 12, 1998 9:50 PM
>> To: DELPHI Distribution List
>> Subject: editor RTF & Pict & OLE
>>
>> Hello,
>>
>> Nakolko nepozna TRichEdit vkladanie obrazkov, jedinu moznosta ako ich
>> tam
>> dat
>> je doplnit TRichEdit o OLE interface a obrazky tam vkladat ako OLE
>> objekt.
>> To ma ale niekolko otazok z ktorima si lamem hlavu.
>> Ako mozem programovo zmenit velkost objektu ?
>> Ako ziskam data obrazku ktory je ulozeny v OLE ?
>> Nie ze by som nevedel programovat ale napriek vsetkej snahe sa mi
>> nepodarilo
>> na to prist, jednak
>> koli tomu ze nemam podrobny HELP na win API, a ako iste viete tak v
>> helpoch
>> D3 su na tie najdolezitejsie veci len odkazy !!!?
>>
>> Nepozna niekdo lepsi sposob ako editovat obrazky spolu z textom, alebo
>> nema
>> niekto komponentu podporujuci novy format RTF z word97, ja mam len
>> manual a
>> ten ma cca. 800 KB ?
>>
>>
>> Ivan Turcan
>>
>>
>

TListBox

[*] Radek Pospisil <suspi(zv)sh.cvut(tec)cz> - 14.5.1998 10:05:36

U listboxu jde zapnout OwnerDraw a potom je pri vykreslovani kazde polozky
vyvolana udalost OnItemDraw, nebo tak nejak, v jeho obsluze pak muzete misto
kazde polozky v listboxu namalovat co chcete, daji se tak docela pohodlne
delat velice pekne listboxy.

bye

Radek

> -----Original Message-----
> From: Ji�� Appeltauer [mailto:re.appeltauer(zv)tyhan(tec)cz]
> Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
> P�edm�t: TListBox
>
>
> >Zdravim,
> >
> >netusite nekdo, jak dostat k polozce v Listboxu ikonu (BMP, ICO)?
> >
> >Diky.
> >
> > S pozdravem
> >
> > Libor Krayzel
> >Czech Television, Television Studio Ostrava
> >Dvorakova 18
> >729 20 Ostrava
> >
> >Phone: (069) 6201 375
> >E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> >> Homepage: http://members.tripod.com/~sovtop
> >> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> >> E-mail2: mailto:sovtop(zv)email(tec)cz
> >>
> >>
>

problemy s DCOM, "RPC server nebyl nalezen"

[*] Radek Pospisil <suspi(zv)sh.cvut(tec)cz> - 14.5.1998 10:10:57

V NT je utilita dcomcnfg.exe, ktera nastavuje veci kolem DCOMu (servery,
uzivatele, atd). Predpokladam, ze je taky v instalaci DCOMu pro W95, pokud
jste ji uz neobjevil.

bye

Radek

> -----Original Message-----
> From: Martin Koran [mailto:komar(zv)komar(tec)cz]
> Sent: Thursday, May 14, 1998 8:42 AM
> To: DELPHI Distribution List
> Subject: Re: problemy s DCOM, "RPC server nebyl nalezen"
>
>
> -----Original Message-----
> From: Ladislav Nagy <lada(zv)kolej.mff.cuni(tec)cz>
> To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
> Date: Wednesday, May 13, 1998 10:36 PM
> Subject: problemy s DCOM, "RPC server nebyl nalezen"
>
> >"RPC server nebyl nalezen."
>
> Zkus http://www.exepc.com/~dmiser/dcom95.htm
>
>
> ====================================
> Martin Koran
> KOMAR
> Hilbertova 68
> 440 01 LOUNY
>
> tel.: +420 (395) 65 40 19
> fax: +420 (395) 65 53 85
> mail: komar(zv)komar(tec)cz
>
>

ShowMOdal

[*] TucekR(zv)p15.monet(tec)cz - 14.5.1998 10:15:00

Nojo ale to okno neslo zopbrazit ani jako FORM.SHOW !!!!!!

TRT
----------
Od: Ji�� Appeltauer
Komu: DELPHI Distribution List
P�edm�t: Re: ShowMOdal
Datum: 13. kv�ten 1998 16:28

J� bych Petrovi moc neoponoval, protoze ta hlaska znamena presne to, ze
okno, ktere se
snazis zobrazit modalne, uz tam jednou je. Treba neni hnedka navrchu,
muze
byt vespod a
jeste k tomu vsemu nedokreselene, to uz se mi taky jednou stalo (taky
jsem
si hral s MDI).
Kazde okno, ktere chces zobrazovat modalne musi mit nastavenou property
Visible na false.
Abych tak pravdu rek, mozna jsi zrovna tuhle prehlid, protoze ja jsem to
taky kontroloval,
nezlob se, jestli se pletu. Clovek si rekne, nejaky Visible - True nebo
False - dyt je to jedno,
prave to je ten omyl neni...

Tak Cau, nejmenovany Tool Tim.

>Hmmm to je sice hezka rada, jenze doslo k nejake smrti, nebot ta okna
>byla nastavena na default hodnoty (kontroloval jsem to s nove
vytvorenym
>oknem) a samozrejme ze to stejne nefungovalo.....
>
>Ale stejne diky za rady....
>
> TRT
>
> ----------
>Od: Petr Urban
>
>Neni s tim zadny problem. To jen staci, kdyz tem oknum das spravny
>VISIBLE
>True nebo False). Vono to totiz nastavi Visible na True a pak se to
>vsechno
>zblbne. Hral jsem si uplne stejne jako ty a pak jsem to pul hodiny
>hledal
>:))
>Cekam na d�ky.
>Tak to by melo byt vse.
>
>Cooler
>
> -----P�vodn� zpr�va-----
>Od: TucekR(zv)p15.monet(tec)cz <TucekR(zv)p15.monet(tec)cz>
>
>>Mam nasledujici problem
>>
>>mam aplikaci funguje normalne
>> po spsusteni se zobrazi hlavni okno tuknu okno se skryje a
>>vytvori
>> se jine pri ukonceni toho okna se uvolni a zobrazi to predchozi
>>
>>hral jsem si a hlavni okno jsem udelal MDIForm a to druhe MDIChild,
pak
>>tospadlo na hlasce "cannot make a visible window modal", predelal jsem
>>to zptaky na fsNormal, ale tato hlaska tam uz zustatva na porad a okno
>>se nechce zobrazovat !!!
>>
>>PROC paneboze, je to vsechno tak jak bylo a presto to dela toto,
smazal
>>jse DCU, projekt vsechno narharl zptaky a nic....
>>
>>PORADTE PROSIM
>>
>> TRT
>>
>>PS: znovu delat to okno se mi nechce....

TListBox

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 14.5.1998 10:30:54

Jsou na to zarucene nejake komponenty na DSP nebo Torry. Jinak to lze snadno
udelat na kolene pres OwnerDraw.

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

> Zdravim,
>
> netusite nekdo, jak dostat k polozce v Listboxu ikonu (BMP, ICO)?

TListBox

[*] Vit Sykacek <vit.sykacek(zv)vsp(tec)cz> - 14.5.1998 10:45:24

No to dost dob�e nejde, bez toho abys p�episoval Canvas. Ale pro� nepou�ije�
TlistView ??
DireCon

-----Original Message-----
From: Petr Studeny [mailto:studeny(zv)olympo(tec)cz]
Sent: Thursday, May 14, 1998 9:50 AM
To: delphi(zv)pinknet(tec)cz
Subject: Re: TListBox

> Zdravim,
>
> netusite nekdo, jak dostat k polozce v Listboxu ikonu (BMP, ICO)?
>
> Diky.
>
> S pozdravem
>
> Libor Krayzel
> Czech Television, Television Studio Ostrava
> Dvorakova 18
> 729 20 Ostrava

Co si pamatuju, tak to umela komponenta RxDBLookupList z RX knihovny,
ktera je tu stale na poradi dne.

----------------------------------------------------------------
Petr Studeny
OLYMPO controls Ltd. e-mail: studeny(zv)olympo(tec)cz
Havrankova 33, 619 00 Brno phone: +421-05-43216101-11
----------------------------------------------------------------


ListView

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 14.5.1998 10:50:51

Zdravim,

v TListView mi jdou nektere polozky "za roh". Chtel bych po ukazani
mysi na nekterou polozku zobrazit cely nazev formou hintu (Visual Basic
to umi automaticky). Poradite?
Dekuji.

S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

Problem s knihovnou RX 2.40

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 14.5.1998 10:57:32

Mi to taky nejak blblo, ale uvazoval jsem takto:

const DPL = DLL ;

type Path = TEnvironmentVariable;

if not Tvuj AdresarSRx4.22 in Path then raise ;

Jinymi slovy, pokud jsem nemel cestu na DPL uvedenou v Path
(to je takova dosovska nesmrtelna promena), potom mi to hazelo chyby.
Vyhazel jsem vsechny zavislosti na runtime DPL. A od te doby
se jen raduju a divim, jak jsou ti vychodnejsi programatori sikovni.

Martin

Gumove pole

[*] MotlicekP(zv)TESCOSW.CZ - 14.5.1998 11:39:42

Koukni se sem:

http://www.gnomehome.demon.nl/uddf/pages/arrays.htm


Petr Motlicek
> -----P�vodn� zpr�va-----
> Od: Stepan Cerny [SMTP:chaosz(zv)geocities.com]
> Odesl�no: 14. kv�tna 1998 9:23
> Komu: Delphi konference
> P�edm�t: Gumove pole
>
> Dobre rano ... :-)
>
> nevite negdo, jak jednoduse, elegantne (a pokud mozno bez prace)
> udelat
> natahovaci pole pro cisla ?
> Neco jako StringList, ale aby se tam ty cisla ukladali jako cisla
> predem
> daneho typu (Integer, Real, Double), nebo pole ( MyPole = Array[1..X]
> of
> Integer).
>
> Diky, Diky, Diky
>
> Stepan Cerny
> chaosz(zv)geocities.com
>
>

Gumove pole

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 14.5.1998 11:43:24

> nevite negdo, jak jednoduse, elegantne (a pokud mozno bez prace) udelat
> natahovaci pole pro cisla ?
> Neco jako StringList, ale aby se tam ty cisla ukladali jako cisla predem
> daneho typu (Integer, Real, Double), nebo pole ( MyPole = Array[1..X] of
> Integer).
>
> Diky, Diky, Diky
>
> Stepan Cerny
> chaosz(zv)geocities.com

On TStringList ma polozku Objects, tak zkus vyuzit ji.
Cau Pavel

-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------


Gumove pole

[*] Vit Sykacek <vit.sykacek(zv)vsp(tec)cz> - 14.5.1998 11:53:05

Podivej se v helpu na VarArrayCreate() function myslim, ze je to co hledas
DireCon

-----Original Message-----
From: Stepan Cerny [mailto:chaosz(zv)geocities.com]
Sent: Thursday, May 14, 1998 9:23 AM
To: Delphi konference
Subject: Gumove pole

Dobre rano ... :-)

nevite negdo, jak jednoduse, elegantne (a pokud mozno bez prace) udelat
natahovaci pole pro cisla ?
Neco jako StringList, ale aby se tam ty cisla ukladali jako cisla predem
daneho typu (Integer, Real, Double), nebo pole ( MyPole = Array[1..X] of
Integer).

Diky, Diky, Diky

Stepan Cerny
chaosz(zv)geocities.com

Gumove pole

[*] V�t�zslav Gazda������u��n�?��? - 14.5.1998 12:02:34

Doporucuji pouzit objekt TList, protoze se hodne podoba objektu TStringList.
Pro 4 bajtove typy jako je treba Integer je to jednoduche:

oList.Add(Pointer(nIntegerValue));

nIntegerValue := Integer(oList.Items[3]);

pro vetsi typy jako je napriklad Real, bych doporucil vytvorit si objekt,
ktery bude mit promennou Real:

TRealObject = class(TObject)
public
RealValue:Real;
end;

a ten potom ulozit do objektu TList:

oReal := TRealObject.Create;
oReal.RealValue := nRealValue;
oList.Add(oReal);

oReal := oList.Items[3];
nRealValue := oReal.RealValue;

Asi nejlepsi by bylo vytvorit si pro takove gumove pole svuj objekt, ktery
bude interne vyuzivat objekt TList v nemz bude mit ulozene objekty, ktere
budou schopny uchovat jednu hodnotu typu Variant.
Vlastnosti a metody takoveho gumoveho pole budou potom vracet primo hodnoty
typu Variant, ktere bude vytahovat z jednotlivych objektu ulozenych v
internim objektu TList. Do takoveho gumoveho pole potom muzes ulozit
jakykoliv datovy typ.

Vita


Ztraceni dat v Delphi 3

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 14.5.1998 12:33:59

Ahoj,

po dloude dobe delam zase najakou databazi v Delphi 3
a mam takovito problem :

Kdyz aplikaci zkousim (obcas mi spadne, musim to resetovat apod),
tak se mi potom z databaze ztraci data (vetsinou posledne ukladana).
Problem je v tom, ze se ztraci po docela dlouhe dobe. Program byl mezi
vlozenim dat a jejich ztracenim urcite ukoncen a znovu spusten a tudiz
i databaze mezi tim byla urcite zavrena a znovu otevrena.

Chtel jsem se zeptat, jestli nove Delphi (resp. BDE) nejak data cachuje
a jak se da buffer vyprazdnit, pripadne jak se to da uplne zakazat.

PS : Myslim, ze to dela pouze kdyz je aplikace spustena z IDE Delphi
(jeste aby to delalo normalne, ze). Ale i tak me to pekne xxxxx,
protoze uz tam asi po desaty zadavam pokusne rekordy :-((

Diky za napady
Vojta


problemy s DCOM, "RPC server nebyl nalezen"

[*] Radek Pospisil <suspi(zv)sh.cvut(tec)cz> - 14.5.1998 12:41:28

> ...
> Dostal som sa vsak k tomu, ze pocitace vyuzivajuce
> DCOM pod Windows 95 musia byt nutne pripojene na nejaky NT
> server, ktory ti prave posle ten chybajuci zoznam uzivatelov.
> ...

Na MS jsem nasel toto:

Q1: Does COM work on Windows 95-only networks? Can a Windows 95 machine act
as a COM server machine in such a case?

A: The answers to both the questions are Yes. You can run COM clients and
servers on Windows 95-only networks. If there is an NT domain in the
network, Windows 95 can provide authentication/authorization via a pass-
through security mechanism. If there are no NT domains in the network, only
non-secure calls can be made in such networks. Since the default behavior of
COM is to make secure calls, this behavior must be changed before a COM
client can successfully call a COM server on a Windows 95-only network.

Vice viz: http://support.microsoft.com/support/kb/articles/q174/0/24.asp

bye

Radek


Export z Outloku

[*] Martin Kubecka <martin.kubecka(zv)dytron(tec)cz> - 14.5.1998 12:42:53

Abych to uvedl na presnou miru, tak po instalaci Outlook98 se mi
nainstaloval i nejaky update na Outlook Express (najednou je anglicky) a
ten umi i tridit podle Subjectu (cesky z IE 4.0 to neumi). Bohuzel stale
neumi (ani Outlook98) tridit doslou postu pro IMAP4 protokol.

Mac

Martin Kubecka wrote:
>
> Jasne ze to neni nic moc rada ;-), ale ja prave z tohoto duvodu pouzivam
> Nechtskape Communicator 4.04, ktery umi tridit podle threadu i maily a
> ne jen newsy (nechapu, proc to Outlook v mailech neumi a newsech jo).
>
> Mac


probl�m: transakce s tabulkami paradox

[*] Marek Prokop <prokopsw(zv)czn(tec)cz> - 14.5.1998 13:18:48

Podle nasich experimentu neni RollBack aplikovany na paradoxove tabulky
schopen vratit operace delete a insert. Pouze update. Navic je zde omezeni
na max. 255 zmenenych zaznamu v jedne transakci.

Marek Prokop

On Wednesday, May 13, 1998 10:39 AM, MotlicekP(zv)TESCOSW.CZ
[SMTP:MotlicekP(zv)TESCOSW.CZ] wrote:
> Problem:
> Paradox Tabulka1 a Tabulka2 spolecny atribut atribut1. Tabulka1 a
> Tabulka2 jsou napojeny na TDatabase DBS;
>
> begin
> DBS.StartTransaction;
> smaz(Tabulka1atribut1.AsString);
> tabulka1.Delete;
> DBS.RollBack;
> end;
> ...
> procedure smaz(hodnota_klice);
> begin
> // tabulka2 se filtruje pouze na hodnoty hodnota_klice pro pole
> atribut1
>
> while not tabulka2.eof begin;
> tabulka2.Delete;
> end;
>
> // tabulka2 se vraci na puvodni zaznam
> end;
>
> Dotaz: Po provedeni RollBack-u se tabulka1 vrati do puvodnihostavu,
> tabulka2 nikoliv. Cim to je ? Je to tim, ze se premistuje
> ukazatel v tabulace tabulka2 (navraceni na puvodni zaznam)
> nebo ze se filtruje ?
>
> Petr Motlicek


Detekce pripojenych uzivatelu

[*] Ing. J�n Kuch�r�����!j��G - 14.5.1998 13:56:41

Cau
Skus mi prosim Ta napisat tie funkcie, v tom style ako ich mam dat priamo do
procedury povedzme po stlaceni tlacitka Tbutton, tak aby sa mi v komponente
TEdit zobrazil napojeny uzivatel. Skusil som to totiz dat do svojho programu
a nechcej vediet kolko chybovych hlaseni mi vyskocilo, takze uz neviem ako
dalej.

Dik


-----P�vodn� zpr�va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 7. m�j 1998 19:42
P�edm�t: Re: Detekce pripojenych uzivatelu


> Nevite nekdo jak zjistit kteri uzivatele jsou prave pripojeni k nektere z
> mych sdilenych slozek ? Jedna se mi o o neco jako je program "NetWatch"
> Sledovani site ). V API jsem zadnou odpovidajici funkci nesel. Prosim
> heeeelp.

Mozna by pomohly funkce, ale nejsem si jisty:

DWORD WNetGetConnection(
LPCTSTR lpLocalName, // pointer to local name
LPTSTR lpRemoteName, // pointer to buffer for remote name
LPDWORD lpnLength // pointer to buffer size, in characters
);

DWORD WNetGetUser(
LPCTSTR lpName, // pointer to local name to get user name for
LPTSTR lpUserName, // pointer to buffer for user name
LPDWORD lpnLength // pointer to buffer size variable
);

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

TTable ztraci 352 bajtu

[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 14.5.1998 14:33:21

Ahoj,

pri dynamickem alokovani TTable se ztraci 352 bajtu.
Vypada to, ze napsat aplikaci v Delphi s nulovou ztratou pameti asi nepujde.
Mate nekdo podobne zkusenosti?

Milos Skacel


procedure TForm1.Button1Click(Sender: TObject);
var taZamestPrep:TTable;
leak:Integer;
begin
SaveAllocationState;
taZamestPrep:=TTable.Create(nil);
try
with taZamestPrep do begin
Name:='taZamestPrep';
DatabaseName:='D:\Developr\MemoryLeak';
TableName:='MVYKAZ.DB';
Active:=TRUE;
end;
finally
taZamestPrep.Free;
end;
leak:=RestoreAllocationState;
if (leak <> 0) then
MessageBox(0,PChar('Your application leaks '+IntToStr(leak)+' bytes.'),'Memory Leak',mb_OK or mb_IconExclamation);
end;

Testy databazi

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 14.5.1998 14:45:35

Hi,

Tak jsem konecne zprovoznil aplikaci, ktera bude prubezne zverejnovat
vysledky testu databazi.
Pokud budou nejake dotazy ci namety jak provadet tesy jinym zpusobem,
tak je prosim posilejte na mou adresu jahoda(zv)lesprojekt(tec)cz.

Upozornuji, ze vlastni test trva CCA 8 hodin (podle databaze a podle
toho kdy zablbne - ta databaze), tak to budu plnit postupne. Zatim uplny
automatizovany test probehl pouze u MSSQL. Interbase skoncila s hlaskou
Out of Virtual Memory (asi ovladac IDAPI/BDE pro Interbase) a MSAccess
ohlasil Out of Temporary disk space kdyz delal 30000 zaznamu pres
manualni Commit, ale ten byl v te dobe 1.2 GB prazdny, takze nevim. Vice
se doctete v poznamkach na Webu.

Testy databazi:
http://www.lesprojekt(tec)cz/delphi

P.S. Vzhledem v castym dotazum na databaze doufam, ze tohle neni
OFFTOPIC
P.S.2 Neberte to jako reklamu firmy, ale jako test, ktery jsem stejne
chtel udelat a vysledek se chci rozdelit.

J.Jahoda


Zmena Main Form za chodu.

[*] Radek Dostal <dostal(zv)gyzamb(tec)cz> - 14.5.1998 15:10:40

Zdaraim vsetky
Potrebuji neceo takoveho:

START
Create FormA
Show FormA
xx
x x //uzivatel vybere vetev
x x
Create FormB Create FormC
Show FormB Show FormC
Close FromA Close Form A
Free Form A Free Form A
.... ....

Dekuji za odpoved
Radek Dostal
****************************************
*Radek Dostal *
* Dostal(zv)gyzamb(tec)cz *
* Http://www.MujWeb(tec)cz/www/RadekDostal *
****************************************

TListView

[*] Tool Tim <tool_tim(zv)tyhan(tec)cz> - 14.5.1998 15:55:46

TListView.ItemFocused se zapamatovava docela tezko(je to vlastne objekt
TListItem), zato TListItem.ItemFocused.Index, je to typu Interger - je to
poradove cislo Itemu (ikonky - chcete-li)
Zavolat se pomoci tohoto cisla da TListView.Items.Item[cislo], kde cislo je
ListView.ItemFocused.Index (integer :).

Tool Tim

-----P�vodn� zpr�va-----
Od: Vit Sykacek <vit.sykacek(zv)vsp(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 14. kv�tna 1998 10:49
P�edm�t: RE: TListView


>Co takhle zkusit TlistView.ItemFocused property ?????
>
> DireCon
>
>-----Original Message-----
>From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
>Sent: Thursday, May 14, 1998 7:53 AM
>To: '*** Delphi'
>Subject: TListView
>
>Zdravim,
>
>da se zjistit, ktera polozka z TListView je vybrana (mam na mysli neco
>jako ItemIndex)?
>Dekuji
>
> S pozdravem
>
> Libor Krayzel
>Czech Television, Television Studio Ostrava
>Dvorakova 18
>729 20 Ostrava
>
>Phone: (069) 6201 375
>E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
>> Homepage: http://members.tripod.com/~sovtop
>> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
>> E-mail2: mailto:sovtop(zv)email(tec)cz
>>
>>

ListView

[*] Tool Tim <tool_tim(zv)tyhan(tec)cz> - 14.5.1998 16:06:22

Vyse popsanym zpusobem (viz Re: TListView) si zjistite, ktera "ikona" je
prave aktivni.
Pak do event OnMouseMove se nastavi TListView.Hint na
TListView.Items.Item[ListView.ItemFocused.Index].Caption.
Nevim, jestli to stopro pude, ale teoreticky to bude mluvit.

Tool Tim & Cooler

-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
Komu: '*** Delphi' <delphi(zv)pinknet(tec)cz>
Datum: 14. kv�tna 1998 16:47
P�edm�t: ListView


>Zdravim,
>
>v TListView mi jdou nektere polozky "za roh". Chtel bych po ukazani
>mysi na nekterou polozku zobrazit cely nazev formou hintu (Visual Basic
>to umi automaticky). Poradite?
>Dekuji.
>
> S pozdravem
>
> Libor Krayzel
>Czech Television, Television Studio Ostrava
>Dvorakova 18
>729 20 Ostrava
>
>Phone: (069) 6201 375
>E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
>> Homepage: http://members.tripod.com/~sovtop
>> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
>> E-mail2: mailto:sovtop(zv)email(tec)cz
>>
>>

Seriova komunikace, potvrzovani RTS/CTS - help

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.5.1998 17:49:00

Ahoj,

Mam problem se s urcitym zvlastnim druhem seriove komunikace ktery se velmi
poboba potvrzovani RTS/CTS. Zarizeni do ktereho vysilam data vsak NEMA zadny
vstupni vyrovnavaci buffer. Tedy po zmene signalu CTS nesmi moje aplikace
vyslat zadna data. Ve Windows to ale funguje tak, ze signal se cte s urcitym
zpozdenim, takze po zmene stavu CTS se vyslou tak 2..3 znaky. Pri normalni
komunikaci rizene RTS/CTS to nevadi, protoze signal CTS se vetsinou nastavuje
kdyz je vstupni buffer tak ze 75% plny. To ale v mem pripade nemuze fungovat.

Prozatim pouzivam neco v tomto smyslu:

TSentThread.Execute
repeat
GetCommModemStatus(DeviceHandle, MS);
if MS and MS_CTS_ON <> 0 then
begin
if WriteFile(DeviceHandle, DataPtr^[DataPos], 1, NW, nil) and (NW = 1)
then
begin
Inc(DataPos);
// nastaveni casovace (viz dale)
end else Chyba .....
end;
until Terminated or (DataPos > DataSize);

Tedy pred kazdym vyslanym znakem ctu stav signalu CTS, jenze pouzivat
volani funkce WriteFile pro kazdy samostatny znak je silene pomale (rychlost
38400). Zarizeni prijima data v blocich, takze jsem nakonec dospel k variante
kde pri prvni zmeme signalu CTS spustim thread ktery vykonanva vyse uvedenou
funkci a po kazdem znaku nastavi casovac rekneme na 1 sec. Pokud se tedy vice
jak 1 sec nevysle zadny znak, pozastavim thread a opetovna zmena signalu CTS
jej znovu spusti. Cele je to ale desne krkolomne. Priznavam ze prilis do
hloubky nerozumim threadum a overlapped I/O operacim (snazim se to ale napravit)
takze pokud by bylo mozne tento problem resit nejak elegantneji byl bych
rad za jakoukoliv pomoc.

Dekuji.

Petr Vones, amatersky programator

Parent = DESKTOP

[*] Stepan Liska <LISKA(zv)MILADA.TROJA.MFF.CUNI.CZ> - 14.5.1998 18:48:46

> Diky, ale asi jsem to popsal moc strucne.
> Ten formular neni hlavni a potrebuji, aby zustal navrchu i pres ostatni
> aplikace. Asi pred mesicem tu nekdo psal, ze formular bud musi byt
> hlavni, nebo musi mit nsatavenu vlastnost Parent na Desktop.
> A to prave nevim, jak nastavit. Ale mozna se to da resit i jinak.

Ahoj, zatim nikdo nereaguje, tak zase moje chatrna pamet. Myslim,
ze jsem to videl nekde ve WINAPI helpu. Tusim, ze je to
konstanta HWND_DESKTOP a je to mozna u popisu funkce
CreateWindow(Ex??).

Stepan.

Udalosti pri procesu

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 14.5.1998 20:01:16

Ahoj vsichni!
Ve sve aplikaci provadim jiste matematicke vypocty ktere trvaji
radove nekolik vterin. Behem techto vypoctu volam
Application.ProcessMessages.
Problem je v tom, tedy aspon si myslim, ze pokud behem onech vypoctu
vyvolam v me aplikaci nejakou udalost, zavola se procedura na
jeji obsluhu a muze dojit ke zmeneni nekterych dat ci v horsim
pripade odalokovani casti dat pouzivanych pri vypooctu a cele to krachne.

Da se nejak osetrit aby pri zavolani Application.ProcessMessages
nebyly po dobu vypoctu zpracovavany udalosti od me aplikace, ale
pouze od jinych, nebo si to musim vsechno pohlidat sam?

Diky za kazdou radu Pavel

-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------


Aktualni pole v DBGrid

[*] Klokan - Petr P�idal <klokan-pp(zv)usa(tec)net> - 14.5.1998 21:07:00

1 ) Nevite nekdo jak se da precist i nastavit aktualni pozice kurzoru v
DBGrid - Jde mi hlavne o "sloupec" tabulky, "radek" (zaznam) vim jak..
2 ) Jak se da udelat, aby v DBGridu byl jeden sloupec nepristupny pro
kurzor (pri ReadOnly nejse jen menit, ale pristupny je)

Diky moc Klokan
--
--------------------------------------- \ (\./)
KLOKAN - Petr Pridal \ (o o)
Halkova 34, BRNO 614 00 - tel 05-576113 \ (.)
---------------------------------------------------------(] [)-_-----
mailto:klokan-pp(zv)usa.net http://members.xoom.com/klokan {~~~}/ )
--------------------------------------------------------(') (')/----
Podivejte se na http://travel.to/turecko97 \_)-(_)

ListView

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.5.1998 21:17:21

Krayzel Libor wrote:
>
> Zdravim,
>
> v TListView mi jdou nektere polozky "za roh". Chtel bych po ukazani
> mysi na nekterou polozku zobrazit cely nazev formou hintu (Visual Basic
> to umi automaticky). Poradite?

Ahoj,
pokud vim tak automaticky to dela TTreeView, u TListView si nejsem jisty
ale nevzpominam si ze bych to v nejake aplikaci videl.

Petr Vones, amatersky programator

Zobrazen� Html z disku

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.5.1998 21:34:59

Petr Urban wrote:
>
> Zkou��m si trochu hr�t s Delphi a internetem. Nev�m ale, jak zobrazit v Html
> (THtml) str�nku, kter� je na disku tak, aby se neza�al p�ihla�ovat k
> internetu. Um�m pouze zobrazit str�nku, kter� je na internetu (u� to je ale
> SUPER :). Nev�m, jestli jste to n�kdy n�kdo zkou�el. Ale
> za pokus nic ned�m. Hledal jsem to n�jakou dobu v helphu, ale bezv�sledn�.
> Jakoby na to snad ani nemysleli :(
> S pozdravem
>
> Cooler

Ahoj,

napriklad v adresari \Demos\Internet\Html je priklad jednoducheho prohlizece.
Napr.soubor C:\Dokumenty\Delphi\Printer.html zobrazis tak ze do URL zadas:

file:///C|/Dokumenty/Delphi/Printer.html

Necekej od nej ale ze bude zobrazovat jako bezny prohlizec, nicmene pro
jednodussi pripady plne postaci. Mam dojem ze v C++ Builderu 3 je uplne nova
sada komponent pro Internet, ktera se snad objevi i v Delphi 4 :-)

Petr Vones, amatersky programator


ListView

[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 14.5.1998 22:08:46

> Vyse popsanym zpusobem (viz Re: TListView) si zjistite, ktera "ikona" je
> prave aktivni.
> Pak do event OnMouseMove se nastavi TListView.Hint na
> TListView.Items.Item[ListView.ItemFocused.Index].Caption.
> Nevim, jestli to stopro pude, ale teoreticky to bude mluvit.

Proc to delat jednoduse kdyz to de slozite ze ? Muj post se nevztahuje k
puvodnimu problemu ale k tomu navrhovanemu strasnemu zapisu:

ListView.Items.Item[ListView.ItemFocused.Index].Caption je prece to samy
jako
ListView.ItemFocused.Caption

Kdopak se to tu drbe pravou hodou za levym uchem ? :-))

McLEI


Problem s knihovnou RX 2.40

[*] Miki Vom��ka����h���h��� - 14.5.1998 23:39:03

Sakra ten chlap ma pravdu, nainstaloval jsem RX do adresare
Delphi3\Lib\ a najednou vse funguje, slava mu.

M11


>Mi to taky nejak blblo, ale uvazoval jsem takto:
>
>const DPL = DLL ;
>
>type Path = TEnvironmentVariable;
>
>if not Tvuj AdresarSRx4.22 in Path then raise ;
>
>Jinymi slovy, pokud jsem nemel cestu na DPL uvedenou v Path
>(to je takova dosovska nesmrtelna promena), potom mi to hazelo chyby.
>Vyhazel jsem vsechny zavislosti na runtime DPL. A od te doby
>se jen raduju a divim, jak jsou ti vychodnejsi programatori sikovni.
>
>Martin
>

Gumove pole

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 14.5.1998 23:45:19

Hi,

to je sice pravda, ale typ Variant je _prilis_ pomaly, takze se mu
vyhybam jako cert krizi! Nicmene, myslim si, ze i v PASCALU bude nejaka
knihovna, ktera takove pole umi i s ruznym typem ulozene hodnoty. V C++
je urcite. Jmenuje se to Standart Template Library od Rogue Wave
(myslim). Borland (vlastne Inprise) ma urcite neco takoveho i pro
Delphi. Zkuste se nekdo podivat do helpu... fronek(zv)fic(tec)cz



--cut--
> Asi nejlepsi by bylo vytvorit si pro takove gumove pole svuj objekt, ktery
> bude interne vyuzivat objekt TList v nemz bude mit ulozene objekty, ktere
> budou schopny uchovat jednu hodnotu typu Variant.
> Vlastnosti a metody takoveho gumoveho pole budou potom vracet primo hodnoty
> typu Variant, ktere bude vytahovat z jednotlivych objektu ulozenych v
> internim objektu TList. Do takoveho gumoveho pole potom muzes ulozit
> jakykoliv datovy typ.
>
> Vita


Komunikace client/server (Application servers, Act

[*] Ladislav Nagy <lada(zv)kolej.mff.cuni(tec)cz> - 14.5.1998 23:47:06

Ahoj delfini.
Omlouvam se za delku tohoto mailu, ale je to myslim velice zajimava oblast. Mozna jako nekteri z Vas se snazim ve firme prorazit s myslenkou podpory Internetu takze Vam budu vdecny za jakekoliv zkusenosti a rady.

V poslednim mailu jsem se ptal na veci kolem DCOM. DIky za rady. Z Vasich mailu se mi zdalo, ze existuje mnohem vice moznosti jak podporovat rozdeleni logiky aplikace na klienta a server. Ja jsem si zatim ozkousel :
1) ActiveX, coz mi umoznilo pri natazeni ActiveX do Internet Exploreru praci s daty ulozenymi na serverovske strane.
2) Ted se mi podarilo spustil application server, ktery cekal na serverovske strane a pak z jine stanice (zatim v lokalni WinNT-siti) spustit klienta, ktery muze pracovat s daty na strane serveru (soubory, lokalni databaze, ...).

Cil: server + klienti, kteri se pripojuji po Internetu a pracuji s daty na serveru.

Q1) Doporucujete na to Delphi a nebo ne?
Q2) Jake existuji dalsi moznosti podporovane v Delphi (krome moznosti 1 a 2)?
Q3) Snahou je minimalizovat praci. Mam takovou ideu - server aplikace + maly programek + <neco ?ActiveX?>. Tato trojice by pak umoznovala nasledujici:
a) praci pres WWW browser ... nevyhoda - stahuje se rozsahly ActiveX, ale dostupne vsude.
b) mit na klientske strane maly programek + <neco ?ActiveX?>. Uzivatel spusti maly programek. Ten jen preda rizeni tomu <neco ?ActiveX?>. To se spoji se serverem pres Internet.
c) lisi se od b) jen v tom, ze vse je na jednom PC.

Vsechny tri varianty by mely umoznovat stejnou uzivatelskou praci s daty.
Tedy jedno programovani a tri druhy vyuziti.

Q4) To zni dobre, co rikate. Je to vsak realizovatelne?
Q5) Jak doporucujete resit klient-server komunikaci Vy?

Diky moc za sebe i za vsechny koho dana problematika zajima.

Ladislav Nagy


Databazy a aplikacie

[*] Zdeno Jasek <zdeno.delphi(zv)mailcity(tec)com> - 14.5.1998 23:52:54 -0700

>Vzhladom na ukoncenu diskusiu o spolahlivosti Paradox tabuliek a na
>skutocnost havarie mojho disku, mal by som na Vas pani dve otazky:
>
>* ako zarucit korektny beh aplikacie s Paradox tabulkami (caste vypadky
>indexov atd.)

Ked som robil aplikaciu v Clipperi, mal som rovnaky problem a riesil som ho tak, ze program vedel, kedy spadol a pri dalsom starte vymazal vsetky indexove subory *.NTX v tabulkach, ktore sa modifikuju a vytvoril ich podla istej sablony nanovo. Odvtedy som prestal mat problemy so stratou udajou. Rovnaky postup chystam realizovat aj v pripade mojej delphovskej aplikacie nad paradoxovskymi indexami. Toto je nutne robit nad kazdou ne - SQL databazou, pretoze len SQL ti moze zarucit vnutornu konzistentnost databazy.


Get your FREE, private e-mail
account at http://www.mailcity.com


Problem s knihovnou RX 2.40

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 14.5.1998 23:57:47

Hi,

sice me taky nekdy vyvojari Borlandu lezi v zaludku, ale nemusi to byt
jen jejich chyba, obzvlast kdyz si tady psal, ze to zlobi na W95 OSR2 !

Jiz pred nekolika lety udelal MS totez s Lotusem (tusim). Udelal novou
verzi DOSu tak, aby si na tom 1-2-3 rozbil hubu, SCHVALNE! Takze to muze
byt i opakovani historie.


fronek(zv)fic(tec)cz


Petr Zahradnik wrote:
>
> > Hmm tento problem mam jiz pul roku a zatim jsem to nevyresil uspokojive,
> > ani autori RX ani fachmani od Borlandu mi nepomohly........
>
> Podle me tohle nema zadnou souvislost s RX, je to zrejme ciste chyba
> Borlandu.
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert


Restart

[*] Miki Vom��ka����h���h��� - 15.5.1998 01:51:34

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Ahoj,
poradte mi nekdo prosim, jak restartovat z programu Windows.
Diky
Miki Vomacka


Komunikace client/server (Application servers, Act

[*] Zdeno Jasek <zdeno.delphi(zv)mailcity(tec)com> - 15.5.1998 05:04:46 -0700

> a) praci pres WWW browser ... nevyhoda - stahuje se rozsahly ActiveX, ale dostupne vsude.
> b) mit na klientske strane maly programek + <neco ?ActiveX?>. Uzivatel spusti maly programek. Ten jen preda rizeni tomu <neco ?ActiveX?>. To se spoji se serverem pres Internet.
> c) lisi se od b) jen v tom, ze vse je na jednom PC.

Okrem programovania v Delphach robim aj v Jave a dost sa v nasej firme o tuto problematiku zaujimave, ale osobne mam taky pocit, ze vsetci maju plne huby Javy, ActiveX-ov a internetu, ale v praxi to funguje len na aplikaciach typu telefonny zoznam. Zober si moznosti, ktore si vymenoval:
a) stahovat za kazdym niekolko KB ActiveX cez internet? Na nasich linkach?
b) Aky je rozdiel mat na klientskej strane "maly programek" a "velky programek"? Tym sa totiz likviduje hlavna vyhoda riesenia - ziadna udrzba.
c) sem nepatri (nejde cez internet - uplne ina architektura aplikacie).

Kym nebudu u nas prepojenia s rychlostou 30 Kb/s, som v tomto smere dost skepticky. Navyse taka slusna klient/server aplikacia ma ovela krajsie a praktickejsie rozhranie, nez nejaky ubohy browser.

Este poznamka k b): naco tam potrebujes ActiveX? Ak nechces ist cez browser, chod priamo cez TCP/IP pouzitim bud DCOMu alebo CORBA rozhrania (VisiBroker od Inpriseu - pred mesiacom od Borlandu, pred dvoma mesiacmi od Visigenicu).


Get your FREE, private e-mail
account at http://www.mailcity.com


Komponenta HTML

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.5.1998 06:42:10

Zdravim,

nevite nekdo o komponente pro zobrazeni HTML bez toho, aby musel byt
nainstalovan Internet Explorer?
Dekuji.
S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

zmena hesla pdox tabulky

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

Dobry den,

potreboval bych poradit jak v programu (vytvorenym v D1) menit, vytvaret
a rusit hesla u paradoxovske tabulky.

Dik Petr Riedel
e-mail: petr.riedel(zv)ipbpojistovna(tec)cz


Ztraceni dat v Delphi 3

[*] MotlicekP(zv)TESCOSW.CZ - 15.5.1998 07:07:10

Taky se mi to stavalo, kdyz jsem "nekorektne" ukoncil beh aplikace.
Pokud jsem dobre pochopil manual,
tak data se neulozi fizycky do tabulky na disku, pokud tabulka (TTable)
se neuzavre (Close) pred ukoncenim
behu programu. (a z nasledneho pozorovani se mi to potvrdilo - stava se
to pri spusteni z IDE Delphi).

Petr Motlicek

> -----P�vodn� zpr�va-----
> Od: Vojtech Semecky [SMTP:v-soft(zv)mbox.lantanet(tec)cz]
> Odesl�no: 14. kv�tna 1998 14:34
> Komu: delphi(zv)pinknet(tec)cz
> P�edm�t: Ztraceni dat v Delphi 3
>
> Ahoj,
>
> po dloude dobe delam zase najakou databazi v Delphi 3
> a mam takovito problem :
>
> Kdyz aplikaci zkousim (obcas mi spadne, musim to resetovat apod),
> tak se mi potom z databaze ztraci data (vetsinou posledne ukladana).
> Problem je v tom, ze se ztraci po docela dlouhe dobe. Program byl mezi
> vlozenim dat a jejich ztracenim urcite ukoncen a znovu spusten a tudiz
> i databaze mezi tim byla urcite zavrena a znovu otevrena.
>
> Chtel jsem se zeptat, jestli nove Delphi (resp. BDE) nejak data
> cachuje
> a jak se da buffer vyprazdnit, pripadne jak se to da uplne zakazat.
>
> PS : Myslim, ze to dela pouze kdyz je aplikace spustena z IDE Delphi
> (jeste aby to delalo normalne, ze). Ale i tak me to pekne xxxxx,
> protoze uz tam asi po desaty zadavam pokusne rekordy :-((
>
> Diky za napady
> Vojta


TListBox

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.5.1998 07:13:52

> No to dost dob�e nejde, bez toho abys p�episoval Canvas. Ale pro�
nepou�ije�
> TlistView ??

Uz me to napadlo, ale problem je, ze se mi na nekterych masinach
neprenaseji ikony, ktere mam nadefinovane v ImageListu

S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

Databazy a aplikacie

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 07:20:24


> Vzhladom na ukoncenu diskusiu o spolahlivosti Paradox tabuliek a na
> skutocnost havarie mojho disku, mal by som na Vas pani dve otazky:
>
>
> * ako zarucit korektny beh aplikacie s Paradox tabulkami (caste
> vypadky
> indexov atd.)
Zarucit to nejde. Doporucit se da toto:
1. zalohovat
2. obcas (nejlepe pred zalohovanim) pouzit DbiRegenIndexes(...)> * aka existuje alternativa k Paradoxu a ake ma vyhody
MSAccess 97. Mam s ni lepsi zkusenosti v sitovem provozu nez
PDOX. Ikdyz musim priznat, ze u zakaznika se mi stalo, ze po vypadku
proudu jsem musel spustit Access 97 a provest rekonstrukci.
Co se tyce ceny, tak je potreba jen DAO, ktere je soucasti
MSOffice 97.
Jo a na rychlost doporucuji se podivat na
http://www.lesprojekt(tec)cz/delphi

Pokud chcete 100% zaruku, tak jedine velkou databazi MSSQL,
Oracle, Sybase nebo Oracle

J.Jahoda

> predom dakujem
>
>
> richard willmann


Aktualni pole v DBGrid

[*] Ondrej Kelle <Kelleon(zv)nnsk.sk> - 15.5.1998 07:32:22

1) pomocou SelectedIndex alebo SelectedField
2) snad v OnColEnter

Ondrej Kelle
it(zv)nnsk.sk

> -----Original Message-----
> From: Klokan - Petr P�idal [SMTP:klokan-pp(zv)usa.net]
> Sent: 14. m�j 1998 21:07
> To: DELPHI Distribution List
> Subject: Aktualni pole v DBGrid
>
> 1 ) Nevite nekdo jak se da precist i nastavit aktualni pozice kurzoru
> v
> DBGrid - Jde mi hlavne o "sloupec" tabulky, "radek" (zaznam) vim jak..
> 2 ) Jak se da udelat, aby v DBGridu byl jeden sloupec nepristupny pro
> kurzor (pri ReadOnly nejse jen menit, ale pristupny je)
>
> Diky moc Klokan
> --
> --------------------------------------- \ (\./)
> KLOKAN - Petr Pridal \ (o o)
> Halkova 34, BRNO 614 00 - tel 05-576113 \ (.)
> ---------------------------------------------------------(] [)-_-----
> mailto:klokan-pp(zv)usa.net http://members.xoom.com/klokan {~~~}/ )
> --------------------------------------------------------(') (')/----
> Podivejte se na http://travel.to/turecko97 \_)-(_)
>

sdilene prostredky

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 15.5.1998 07:38:42

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Hi
potreboval bych zjistit jake sdilene prostredky jsou k dispozici na danem pocitaci existuje na to nejaka API funkce, nebo je to ulozeno nekde v registrech. (chci to zjistit lokalne tj. na pocitaci na kterem bezi moje aplikace)

DLL

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 15.5.1998 07:42:32

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Nevite nekdo jestli existuje nejaky program na zobrazeni funkci v DLL [neco jako depends] vcetne typu vstupnich a vystupnich parametru s moznosti pripadne jeste zobrazit danou funkci v assembleru20


Parent = DESKTOP

[*] Ing. R�bert T�TH - 15.5.1998 07:55:19

ked som ta dobre pochopil, tak potrebujes asi toto:

setwindowpos(handle_volaneho_okna,HWND_TOPMOST,left,top,width,height,SWP_NOa
ctivate);

moznosti, volby a ostatne sa docitas v Help-u.

P.S. Tuto funkciu volaj este pred volanim okna a nezabudaj aktualizovat
poradie okien funkciou
application.normalizetopmost

S pozdravom

Ing. Robert TOTH, Lucenec

toth(zv)lcsr01.vszp.sk

-----Pyvodnm zprava-----
Od: Stepan Liska <LISKA(zv)milada.troja.mff.cuni(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 14. maj 1998 23:27
Pxedmlt: Re: Parent = DESKTOP


> Diky, ale asi jsem to popsal moc strucne.
> Ten formular neni hlavni a potrebuji, aby zustal navrchu i pres ostatni
> aplikace. Asi pred mesicem tu nekdo psal, ze formular bud musi byt
> hlavni, nebo musi mit nsatavenu vlastnost Parent na Desktop.
> A to prave nevim, jak nastavit. Ale mozna se to da resit i jinak.

Ahoj, zatim nikdo nereaguje, tak zase moje chatrna pamet. Myslim,
ze jsem to videl nekde ve WINAPI helpu. Tusim, ze je to
konstanta HWND_DESKTOP a je to mozna u popisu funkce
CreateWindow(Ex??).

Stepan.

Komunikace client/server (Application servers, Act

[*] �ke��k Jaroslav�������6�����̿ - 15.5.1998 07:55:45

Timto problemem se zabyvaji kolegove z firmy TH soft Zamberk
Vyzkouseli jiz radu alternativ vcetne trivrstve architektury a myslim, ze
dosli k zajimavym vysledkum co se zejmena vykonu tyce.
Reseni je opravdu vice. Pokud vsak budete brat do uvahy pozadovanou
rychlost odezvy, cenu a komplikace pri vyvoji a nasazeni projektu,
pak vam jiz mnoho alternativ asi nezustane.
Pouziti technologie MIDAS s resenim podle bodu 2) je licencne
neskutecne drahe (neco kolem 180 000,- Kc), takze vetsinou
nepripada do uvahy!
Ad Q1) Ano.
Ad Q2) Jako nejrychlejsi varianta se zatim ukazuje pripad, kdy maly
programek je naopak primo na serveru. Klient nepotrebuje
mit zadny program. Ten potrebuje pouze www stranku s daty.
Vyhoda: neni to o nic pomalejsi nez natahovani normalnich
web tranek a klient nemusi byt vybeven zadnym software krome
prohlizece. Tak muze aplikaci vyuzit kdokoliv bez omezeni
a nemusi stahovat a instalovat nejaky software.
Tez by me zajimalo, zda nekdo objevil jeste jina efektivni reseni.
Nyni se zabyvame zrcadlenim ci replikaci vice serveru spojenych pomoci
Internetu a naslednym vytvorenim distribuovaneho aplikacniho systemu
na Internetu.
Ma jiz nekdo s timto nejake zkusenosti?
Jaro
----------------------------

>Ahoj delfini.
>Omlouvam se za delku tohoto mailu, ale je to myslim velice zajimava oblast.
Mozna jako nekteri z Vas se snazim ve firme prorazit s myslenkou podpory
Internetu takze Vam budu vdecny za jakekoliv zkusenosti a rady.
>
>V poslednim mailu jsem se ptal na veci kolem DCOM. DIky za rady. Z Vasich
mailu se mi zdalo, ze existuje mnohem vice moznosti jak podporovat rozdeleni
logiky aplikace na klienta a server. Ja jsem si zatim ozkousel :
>1) ActiveX, coz mi umoznilo pri natazeni ActiveX do Internet Exploreru
praci s daty ulozenymi na serverovske strane.
>2) Ted se mi podarilo spustil application server, ktery cekal na
serverovske strane a pak z jine stanice (zatim v lokalni WinNT-siti) spustit
klienta, ktery muze pracovat s daty na strane serveru (soubory, lokalni
databaze, ...).
>
>Cil: server + klienti, kteri se pripojuji po Internetu a pracuji s daty na
serveru.
>
>Q1) Doporucujete na to Delphi a nebo ne?
>Q2) Jake existuji dalsi moznosti podporovane v Delphi (krome moznosti 1 a
2)?
>Q3) Snahou je minimalizovat praci. Mam takovou ideu - server aplikace +
maly programek + <neco ?ActiveX?>. Tato trojice by pak umoznovala
nasledujici:
> a) praci pres WWW browser ... nevyhoda - stahuje se rozsahly ActiveX, ale
dostupne vsude.
> b) mit na klientske strane maly programek + <neco ?ActiveX?>. Uzivatel
spusti maly programek. Ten jen preda rizeni tomu <neco ?ActiveX?>. To se
spoji se serverem pres Internet.
> c) lisi se od b) jen v tom, ze vse je na jednom PC.
>
>Vsechny tri varianty by mely umoznovat stejnou uzivatelskou praci s daty.
>Tedy jedno programovani a tri druhy vyuziti.
>
>Q4) To zni dobre, co rikate. Je to vsak realizovatelne?
>Q5) Jak doporucujete resit klient-server komunikaci Vy?
>
>Diky moc za sebe i za vsechny koho dana problematika zajima.
>
>Ladislav Nagy


Databazy a aplikacie

[*] �ke��k Jaroslav�������6�����̿ - 15.5.1998 08:07:11

>
> Pokud chcete 100% zaruku, tak jedine velkou databazi MSSQL,
>Oracle, Sybase nebo Oracle

Ja bych jeste pripomel Interbasi. Je za polovicni cenu oproti Oracle
a pracuje se nam s ni dobre. Spolehlivost dat zajisti urcite.
(I kdyz si myslim, �e na 100% neni nic - �ekn�me t�eba na 99.99%)
Nebudu detailista. Pravou je, ze od chvile prechodu z DB formatu
na Interbasi mame pokoj od zakazniku. Neztraceji se data atd .....
viz. rada prispevku na tema jakou databazi.
Jaro
>

TTable ztraci 352 bajtu

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 08:08:20

Ahoj,

Testy tohoto druhu jsou BLBOST!!!!!.

V uvedenem prikladu jsi opomel to, ze TTable vyuziva sluzeb
nejake komponenty TDatabase a TSession a ty taky neco stoji. Tyhle
komponenty jsou implicitne nastavene a oni se samy inizializuji, ale
samy se zrusi az po ukonceni aplikace neboli v sekci finalization v
unite db.pas. V tyhle unite je spousta globalnich promennych, ktere se
inicializuji pri prvnim zavolani a i kdyby jsi toto vse nejak obesel
(zavolal jednou pred testem), tak tim jeste neni vyresen promblem toho,
ze nekde muze byt zavolana metoda z TList.Add a ta provede Grow pole,
ktere je samozrejme dynamicky zvetsovane. Ale dost teorie.

Zajimalo by mne jak se tenhle priklad chova pri opakovanem
Click-nuti. Pokud i po druhem treti ci dvacatem Click-nuti to neuvolnuje
352 bajtu neboli celkem 20x 352 uz chybi, tak pak neni chyba v DB, ale v
DBTABLES.

J.Jahoda


> Ahoj,
>
> pri dynamickem alokovani TTable se ztraci 352 bajtu.
> Vypada to, ze napsat aplikaci v Delphi s nulovou ztratou pameti asi
> nepujde.
> Mate nekdo podobne zkusenosti?
>
> Milos Skacel
>
>
> procedure TForm1.Button1Click(Sender: TObject);
> var taZamestPrep:TTable;
> leak:Integer;
> begin
> SaveAllocationState;
> taZamestPrep:=TTable.Create(nil);
> try
> with taZamestPrep do begin
> Name:='taZamestPrep';
> DatabaseName:='D:\Developr\MemoryLeak';
> TableName:='MVYKAZ.DB';
> Active:=TRUE;
> end;
> finally
> taZamestPrep.Free;
> end;
> leak:=RestoreAllocationState;
> if (leak <> 0) then
> MessageBox(0,PChar('Your application leaks '+IntToStr(leak)+'
> bytes.'),'Memory Leak',mb_OK or mb_IconExclamation);
> end;
>

Zmena Main Form za chodu.

[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 15.5.1998 08:24:55


Podivej se do zdrojaku Forms.pas, Application.Run.
Chova se to tak, ze kdyz zavres MainForm tak to zavola
PostQuitMessage(0). Se zavrenim MainForm aplikace normalne skonci.

Milos Skacel

Databazy a aplikacie

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

> MSAccess 97. Mam s ni lepsi zkusenosti v sitovem provozu nez
> PDOX. Ikdyz musim priznat, ze u zakaznika se mi stalo, ze po vypadku
> proudu jsem musel spustit Access 97 a provest rekonstrukci.

Rekonstrukce se da udelat i bez Accessu, na to je funkce DAO nebo ODBC.

> Co se tyce ceny, tak je potreba jen DAO, ktere je soucasti
> MSOffice 97.
> Jo a na rychlost doporucuji se podivat na
> http://www.lesprojekt(tec)cz/delphi
>
> Pokud chcete 100% zaruku, tak jedine velkou databazi MSSQL,
> Oracle, Sybase nebo Oracle

A nebo Sybase SQL Anywhere, ktery je mnohem levnejsi, podporuje mnoho
platforem (jako klient, tak i server) a da se snadno rozsirovat od
jednoho pocitace pres malou sit peer-to-peer az po velkou sit
client/server a to navic vcetne velmi dobre udelane replikace.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Problem s knihovnou RX 2.40

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

> sice me taky nekdy vyvojari Borlandu lezi v zaludku, ale nemusi to byt
> jen jejich chyba, obzvlast kdyz si tady psal, ze to zlobi na W95 OSR2 !
>
> Jiz pred nekolika lety udelal MS totez s Lotusem (tusim). Udelal novou
> verzi DOSu tak, aby si na tom 1-2-3 rozbil hubu, SCHVALNE! Takze to muze
> byt i opakovani historie.

No jo, ale Delphi 3 prislo az po OSR2 a ja predpokladam, ze u Borlandu
take maji nejaky pocitac s Win95 OSR2, takze to snad mohli otestovat,
kdyz davali novou verzi...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Databazy a aplikacie

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 15.5.1998 09:11:46

Alternativy zde:
* http://www.kylecordes.com/bag/index.html,
Velmi zajimava komponenta na http://home.sprynet.com/sprynet/rrm/index.html,
bohuzel vsak nelze sdilet jednu tabulku dvema aplikacemi. Jinak je to velmi
hezke reseni. Naopak vsak podporuje kompresi za behu, hesla, indexy a
data v jednom souboru.

Uz jsem uvazoval, ze i neco sam si sesmolim, ale vzdycky jen vzdychnu a je
po srande.

Nejlepsi reseni by bylo napsat jednoduchou komponentku, ktera by pri behu
dynamicky
linkovala TUtility.Dll a pokousela by se verifikovat tabulku, kterou ma ve
svem
property. Pokud by tabulka nesla otevrit, hned by na ni najela, jinak by ji
nechala byt.

Co vy na to?

Martin

P.S. Ja na to nic, ja na to nemam cas, protoze resim ukoly typu vezmi 11
bajtu a
nakouskuj je do radku, oddel strednikem a pokracuj dal. Ale jednou, mozna...

Databazy a aplikacie

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 09:34:22

> >
> > Pokud chcete 100% zaruku, tak jedine velkou databazi MSSQL,
> >Oracle, Sybase nebo Oracle
>
> Ja bych jeste pripomel Interbasi. Je za polovicni cenu oproti Oracle
> a pracuje se nam s ni dobre. Spolehlivost dat zajisti urcite.
> (I kdyz si myslim, �e na 100% neni nic - �ekn�me t�eba na 99.99%)
> Nebudu detailista. Pravou je, ze od chvile prechodu z DB formatu
> na Interbasi mame pokoj od zakazniku. Neztraceji se data atd .....
> viz. rada prispevku na tema jakou databazi.
> Jaro
Sorry ja na ni uplne zapomel.

J.Jahoda

Nastaveni hesla

[*] tomas.mazurek(zv)vitkovice(tec)cz - 15.5.1998 09:55:24


Hello,

v priloze posilam kousek kodu z Delphi 1.02, kde se provadi
restrukturalizace tabulky a zadava se hlavni heslo... Jak je to s
AUX. hesly, to nevim...

tomas.mazurek(zv)vitkovice(tec)cz

unit Resp;

interface

uses
SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
Forms, Dialogs, DBiProcs, DBiTypes, DB, DBTables, StdCtrls, FileCtrl;

type
TForm1 = class(TForm)
Button1: TButton;
FileListBox1: TFileListBox;
DirectoryListBox1: TDirectoryListBox;
DriveComboBox1: TDriveComboBox;
DataSource1: TDataSource;
Table1: TTable;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
hDb : hDbiDb;
TblDesc : CRTblDesc;
Vysl : DbiResult;
pOptDesc : pFLDDesc;
OptDesc : FldDesc;
pOptData : pBYTE;
Heslo : Array[0..255] of Char;
{ Heslo : String;}
begin
If FileListBox1.ItemIndex = -1
then MessageDlg('Nebyl vybr�n ��den soubor',mtError,[mbOK],0)
else Try
begin
New(pOptDesc);
pOptDesc := (zv)OptDesc;
FillChar(TblDesc,sizeof(CRTblDesc),#0);
DbiOpenDatabase('SZNR','STANDARD',dbiReadWrite,dbiOpenExcl,nil,0,nil,nil,hDb);
pOptDesc := AllocMem(sizeof(FLDDesc));
pOptData := AllocMem(20);
OptDesc.iOffset := 0;
{ OptDesc.iLen := Length('czech') + 1;
StrPCopy(OptDesc.szName,'LANGDRIVER');
StrPCopy(PChar(pOptData),'czech');}
Table1.TableName := FileListBox1.FileName;
StrPCopy(TblDesc.szTblName,Table1.TableName);
StrCopy(TblDesc.szTblType,szParadox);
{ TblDesc.iOptParams := 1;
TblDesc.pFldOptParams := (zv)OptDesc;
TblDesc.pOptData := pOptData;}
TblDesc.bPack:= True;
StrPCopy(Heslo,'AAA');
StrPCopy(TblDesc.szPassword,'AAA');
TblDesc.bProtected := true;
Vysl := DbiDoRestructure(hDb,1,(zv)TblDesc,nil,nil,nil,False);
If Vysl = 0
then ShowMessage('');
end;
finally
begin
DbiCloseDatabase(hDb);
Table1.EnableControls;
Table1.Open;
DbiSaveChanges(Table1.Handle);
Table1.Close;
Dispose(pOptDesc);
end;
end;
end;

end.

Local SQL na velku indexovanu paradox tabulku

[*] Stepan Liska <LISKA(zv)MILADA.TROJA.MFF.CUNI.CZ> - 15.5.1998 10:06:07

> > select * from
> > ( select * from stars
> > where alfa between :AlfaMin and :AlfaMax
> > )
> > where delta between :DeltaMin and :DeltaMax
> >
> > Je to jenom napad, ale treba nekdo poradi zda to jde.
>
> Dakujem, neskusal som, ci to takto ide. Problem nie je az tak celkom
> v tom, ako to urobit, ako skor urobit to tak, aby to bolo rychle.
> Ono totiz na obe premenne mam osobitny index, ale podla Alfa to hlada
> rychlo (lebo podla toho je tabulka fyzicky zotriedena) a podla Delta
> strasne pomaly, hoci tam mam ten index. Skoro mi pripdada, ze to
> hadam hlada sekvencne. Ide skor o to, ako prinutit BDE pouzivat
> obidva indexy.

No, proc jsem to vymyslel takhle; bylo tady nekolik zminek o tom,
jak prinutit SQL server, aby pouzival nejaky index, ale to asi nebude
chodit na localSQL. Tak jsem myslel, ze tim ORDER BY by se mohlo
localSQL prinutit pouzit ten index. Jenze myslim, ze localSQL neumi
vnoreny dotaz a pouzit hotovy dotaz jako vstup noveho dotazu taky asi
nejde.

Dale mne napada udelat na tabulku SetRange a pak to proste projet
sekvencne na druhou souradnici. Mozna by sel nejak i ten setrange
osalit (vim, ze jde setrange na vice klicovych polozek, ale nejak mi
to takhle po ranu nemysli). Pak je taky moznost udelat v BDE callback
filtrovaci funkci. Ale to prave projizdi celou databazi sekvencne.
Takze ja bych doporucil kombinaci obou, pripadne vsech tri veci.

Podle mojich zkusenosti je pri optimalizaci na rychlost vzdycky
treba zkombinovat nekolik pristupu a pak teprve je to to prave
orechove. Jak uz jsem tu psal, kdyz jsme resili databazi firem na CD,
tak jsme se opravdu zapotili. Preci jenom je CDcko ponekud pomale.
Ale nakonec se to podarilo.

Sorry za ten dlouhej emajl, ale ja jsem hrozne ukecanej.

Stepan.

Ztraceni dat v Delphi 3

[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 15.5.1998 11:07:34

Vojtech Semecky wrote:
>
> Ahoj,
>
> po dloude dobe delam zase najakou databazi v Delphi 3
> a mam takovito problem :
>
> Kdyz aplikaci zkousim (obcas mi spadne, musim to resetovat apod),
> tak se mi potom z databaze ztraci data (vetsinou posledne ukladana).
> Problem je v tom, ze se ztraci po docela dlouhe dobe. Program byl mezi
> vlozenim dat a jejich ztracenim urcite ukoncen a znovu spusten a tudiz
> i databaze mezi tim byla urcite zavrena a znovu otevrena.
>
> Chtel jsem se zeptat, jestli nove Delphi (resp. BDE) nejak data cachuje
> a jak se da buffer vyprazdnit, pripadne jak se to da uplne zakazat.
>
> PS : Myslim, ze to dela pouze kdyz je aplikace spustena z IDE Delphi
> (jeste aby to delalo normalne, ze). Ale i tak me to pekne xxxxx,
> protoze uz tam asi po desaty zadavam pokusne rekordy :-((
>
> Diky za napady
> Vojta


Asi bude zalezet na tom, kde a jaka databaze to je. Pokud jsou ta data
na NT serveru muze byt problem v cashovani samotnych entecek. Uz jsem
se s tim setkal (ne sice v Delphi s BDE, ale u souborove orientovanych
tabulek) a musel jsem vymenit nektere ovladaci moduly, ktere nebyly
optimalizovany pro NT.
--
Ing. Jindrich Danihelka
E-Mail jidas(zv)mbox.vol(tec)cz
Tel. 038/57805
038/7512861


Restart

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 15.5.1998 11:25:36

ExitWindowsEx(EWX_REBOOT, 0);
Vaclav Sazima

Miki Vom��ka wrote:

> Ahoj,poradte mi nekdo prosim, jak restartovat z programu
> Windows.DikyMiki Vomacka

TTable ztraci 352 bajtu

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 11:53:36


> Ahoj,
>
> Testy tohoto druhu jsou BLBOST!!!!!.
Radeji jsem zde mel volit nebezpecne!!!

> V uvedenem prikladu jsi opomel to, ze TTable vyuziva sluzeb
> nejake komponenty TDatabase a TSession a ty taky neco stoji. Tyhle
> komponenty jsou implicitne nastavene a oni se samy inizializuji, ale
> samy se zrusi az po ukonceni aplikace neboli v sekci finalization v
> unite db.pas. V tyhle unite je spousta globalnich promennych, ktere se
> inicializuji pri prvnim zavolani a i kdyby jsi toto vse nejak obesel
> (zavolal jednou pred testem), tak tim jeste neni vyresen promblem
> toho,
> ze nekde muze byt zavolana metoda z TList.Add a ta provede Grow pole,
> ktere je samozrejme dynamicky zvetsovane. Ale dost teorie.
>
> Zajimalo by mne jak se tenhle priklad chova pri opakovanem
> Click-nuti. Pokud i po druhem treti ci dvacatem Click-nuti to
> neuvolnuje
> 352 bajtu neboli celkem 20x 352 uz chybi, tak pak neni chyba v DB, ale
> v
> DBTABLES.
>
> J.Jahoda
>
>
> > Ahoj,
> >
> > pri dynamickem alokovani TTable se ztraci 352 bajtu.
> > Vypada to, ze napsat aplikaci v Delphi s nulovou ztratou pameti asi
> > nepujde.
> > Mate nekdo podobne zkusenosti?
> >
> > Milos Skacel
> >
> >
> > procedure TForm1.Button1Click(Sender: TObject);
> > var taZamestPrep:TTable;
> > leak:Integer;
> > begin
> > SaveAllocationState;
> > taZamestPrep:=TTable.Create(nil);
> > try
> > with taZamestPrep do begin
> > Name:='taZamestPrep';
> > DatabaseName:='D:\Developr\MemoryLeak';
> > TableName:='MVYKAZ.DB';
> > Active:=TRUE;
> > end;
> > finally
> > taZamestPrep.Free;
> > end;
> > leak:=RestoreAllocationState;
> > if (leak <> 0) then
> > MessageBox(0,PChar('Your application leaks '+IntToStr(leak)+'
> > bytes.'),'Memory Leak',mb_OK or mb_IconExclamation);
> > end;
> >

Small Fonts x Large Fonts

[*] �uhel Petr <cuhel(zv)diamo(tec)cz> - 15.5.1998 12:25:02

Cau

Podle me to lze poznat posle vlastnosti
PixelsPerInch ve formulari
small font ma 96 dpi
large font ma 120 dpi

Bye

> nevite nekdo jak zjistim, jestli aktualni nastaveni prostredi
> je "Large Fonts" nebo "Small Fonts" ?

DLL

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 12:38:09


> Nevite nekdo jestli existuje nejaky program na zobrazeni funkci v DLL
> [neco jako depends] vcetne typu vstupnich a vystupnich parametru s
> moznosti pripadne jeste zobrazit danou funkci v assembleru?
>
Jedine nejakej Sourcer. Ja jsem kdysi pouzival Sourcer od fy. v
communications, inc. v6.09, ale ten bezel pod dosem a vyuzival expanded
memory. Kde sou ty casy.

V DLL jsou pouze exportovave nazvy funkci (nemuseji byt, staci
pouze ordinal number), ale parametry funkci a dokonce jejich typ tam
pochopitelne neni.

K zverejnovani parametru funkci a jejich typu dochazi pouze u
OLE Automation serveru v TLB nebo OCX.

J.Jahoda


sdilene prostredky

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 13:05:09

Hi,

> Hi
> potreboval bych zjistit jake sdilene prostredky jsou k dispozici na
> danem pocitaci existuje na to nejaka API funkce, nebo je to ulozeno
> nekde v registrech. (chci to zjistit lokalne tj. na pocitaci na kterem
> bezi moje aplikace)
>
v registrech to je na
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\LanManServer\Shares

pro WindowsNT, pro W95 to tam neni, takze musi existovat API
funkce

Urcite se na to dostatene pres funkce WNetOpenEnum a
WNetEnumResource

J.Jahoda


Prave tlacitko v Exploreru v moji aplikaci

[*] Pavel Drtil <drtil(zv)norek.list.skm.vutbr(tec)cz> - 15.5.1998 13:10:03

Mel bych dotaz:

Vytvarim katalogizer souboru a mam tam zobrazen strom a soubory.
Chtel bych aby se mi na stisk praveho tlacitka vybalilo to same menu,
co zobrazuje Explorer pri stisku praveho tlacitka.
(PopMenu s polozkami Send To, Prozkoumat, Sdileni, Vytvorit zastupce ...)
Toto umi delat napr. i Windows Commander (kdyz si to clovek zapne)
pujde jen o nejaky jednoduchy volani, ale nemuzu na to prijit...

diky

Pavel


----------------------------------------
Pavel Drtil - mailto:xdrtil00(zv)stud.fee.vutbr(tec)cz

e-mail: xdrtil00(zv)stud.fee.vutbr(tec)cz - doporucen
drtil(zv)norek.list.skm.vutbr(tec)cz

talk drtil(zv)drtil.list.skm.vutbr(tec)cz


Restart

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 13:15:52

ExitWindowsEx(EWX_REBOOT or EWX_FORCE, 0);
J.Jahoda

> Ahoj,
> poradte mi nekdo prosim, jak restartovat z programu Windows.
> Diky
> Miki Vomacka


TTable ztraci 352 bajtu

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.5.1998 13:26:29

> pri dynamickem alokovani TTable se ztraci 352 bajtu.
> Vypada to, ze napsat aplikaci v Delphi s nulovou ztratou pameti asi nepujde.

Jak se tak divam na tvuj priklad, tak jsi to otestoval asi spatne,
copak jsi potom uvolnil vsechno, co s TTable souvisi? Co treba
TDatabase, TSession apod.? Ja jsem nestudoval podorben zdrojaky,
ale zkus se podivat ne na stav po TTable.Free, ale uplne po
ukonceni celeho programu, kdy se ukoncuje cely engine...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Udalosti pri procesu

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 15.5.1998 13:28:59


> Ahoj vsichni!
> Ve sve aplikaci provadim jiste matematicke vypocty ktere trvaji
> radove nekolik vterin. Behem techto vypoctu volam
> Application.ProcessMessages.
> Problem je v tom, tedy aspon si myslim, ze pokud behem onech vypoctu
> vyvolam v me aplikaci nejakou udalost, zavola se procedura na
> jeji obsluhu a muze dojit ke zmeneni nekterych dat ci v horsim
> pripade odalokovani casti dat pouzivanych pri vypooctu a cele to
> krachne.
>
> Da se nejak osetrit aby pri zavolani Application.ProcessMessages
> nebyly po dobu vypoctu zpracovavany udalosti od me aplikace, ale
> pouze od jinych, nebo si to musim vsechno pohlidat sam?
>
Ahoj,

Ja pouzivam Windows NT a ty fungujou takto:
Application.ProcessMessages funguje pouze pro tu aplikaci, ktera tuto
funkci zavola neboli sama sebe. W95 funguji stejne, ale casteji jsou
zahlcene (alespon ty moje testovaci). Ve Win32 totiz udalosti slouzi
pouze k obsluze prekreslovani a k zpracovani udalosti. Takze to co
pozadujete, dela system sam. Neni potreba volat ProcessMessages, ale pak
se taky nebude aplikace prekreslovat a ve Windows TaskManageru se bude
aplikace hlasit jako "Not Responding".
Ja to resim tak, ze pred zapocetim vypoctu zakazu ovladani menu
a aktivnich prvku na formulari a po skonceni je povolim.

ZakazOvladani;
try
vypocet;
finally
PovolOvladani;
end;

procedure TForm1.ZakazOvladani;
begin
for i:=0 to ComponentCount-1 do
if Components[i] is TControl then
TControl(Components[i]).Enabled := false;
end;

PovolOvladani je opace.

Dale se to opravit tak, ze ZakazOvladani si zapamatuje stav a
zakaze a PovolOvladani ho pouze obnovi.

J.Jahoda

P.S. Doufam, ze to cele neni pro 16 bit, tam ProcessMessages je
zivotni nutnost.

> Diky za kazdou radu Pavel
>
> -----------------------------------------------------------
> Ing. Pavel Simicek
> UVSSaR, FS, VUT Brno, Technicka 2, 616 69
> Tel. 05/41142461
> e-mail simicek(zv)uvss.fme.vutbr(tec)cz
> -----------------------------------------------------------


Gumove pole - HOTOVO

[*] Stepan Cerny <chaosz(zv)geocities(tec)com> - 15.5.1998 14:28:08

Zdravim vsechny lidi(atd.) dobre vule ... :-)

DEKUJI VSEM za rady ohledne "Gumoveho pole" !!!
Problem jsem vyresil tak, ze jsem se podival do zdrojaku TList & TStringList
a spachal dva objekty (TIntList, TRealList).
Tyto objekty jsou primimy ptomky TObject, tagze jsou male, rychle(, krasne,
heboucke, atd...) a bez zbytecnych metod a properties.
POZOR: Rychlost ulozeni 1.000.000 Integeru metodou Add trva cca 900 ms
(P200, 32MB), nacitani cca 300 ms; pokud se pred plnenim nastavi pocet
polozek (Count := 1000000) tak bylo ukladani cca 2x rychlejsi. Pro Real
trvaji vsechny operace cca 2x dele.

Nechci se vnucovat, ale pokud negdo mate zajem, tag poslu (9kB
nezapakovano).

PS: Jeste potrebuju udelat 2rozmerne gumove pole :-(((

Stepan Cerny
chaosz(zv)geocities.com

~~~~~~~~~~~~~~
Stepan Cerny wrote:

> Dobre rano ... :-)
>
> nevite negdo, jak jednoduse, elegantne (a pokud mozno bez prace) udelat
> natahovaci pole pro cisla ?
> Neco jako StringList, ale aby se tam ty cisla ukladali jako cisla predem
> daneho typu (Integer, Real, Double), nebo pole ( MyPole = Array[1..X] of
> Integer).
>
> Diky, Diky, Diky
>
> Stepan Cerny
> chaosz(zv)geocities.com

Aktualni pole v DBGrid

[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 15.5.1998 14:42:51


Hi,

ano, v OnColEnter se podivas, jestli tenhle sloupek je v datasetu read-only a kdyztak zvysis selected index o 1 (pokud to neni posledni pole. Ja pripadne posilam focus na dalsi radek, a kdyz je posledni, tak obvykle pridavam novy record.... fronek(zv)fic(tec)cz

-----Original Message-----
From: Ondrej Kelle [SMTP:Kelleon(zv)nnsk.sk]
Sent: Friday, May 15, 1998 7:32 AM
To: 'DELPHI Distribution List'
Subject: RE: Aktualni pole v DBGrid

1) pomocou SelectedIndex alebo SelectedField
2) snad v OnColEnter

Ondrej Kelle
it(zv)nnsk.sk

Local SQL na velku indexovanu paradox tabulku

[*] psoft <psoft(zv)kosice.telecom.sk> - 15.5.1998 15:12:32

>
> No, proc jsem to vymyslel takhle; bylo tady nekolik zminek o tom,
> jak prinutit SQL server, aby pouzival nejaky index, ale to asi nebude
> chodit na localSQL. Tak jsem myslel, ze tim ORDER BY by se mohlo
> localSQL prinutit pouzit ten index. Jenze myslim, ze localSQL neumi
> vnoreny dotaz a pouzit hotovy dotaz jako vstup noveho dotazu taky asi
> nejde.

Vnoreny mi na localSQL nechodi, asi sa zrejme neda...
Ale s tym pouzitim dotazu ako vstup pre druhy dotaz by som si nebol
taky isty. Mam komponentu, ktora dovoluje triedit vysledok SQL bez
toho, aby si zmenil samotne SQL, resp. dal cosi take ako Refresh
alebo Update. Triedi sa priamo docasna tabulka s
vysledkom SQL dotazu, bez pristupu na tabulky (mam pocit, ze to
funguje prave len pre LocalSQL).
A tak mi chodi po rozume, ze ked sa to da triedit, hadam by to slo
aj filtrovat, alebo nie ?> Dale mne napada udelat na tabulku SetRange a pak to proste projet
> sekvencne na druhou souradnici. Mozna by sel nejak i ten setrange
> osalit (vim, ze jde setrange na vice klicovych polozek, ale nejak mi
> to takhle po ranu nemysli). Pak je taky moznost udelat v BDE callback
> filtrovaci funkci. Ale to prave projizdi celou databazi sekvencne.
> Takze ja bych doporucil kombinaci obou, pripadne vsech tri veci.

Tu je zadrhel v tom, ze to ma byt ako mapa hviezdnej oblohy, kde
vidis nejaky usek. Ak by som prvu cast vybral cez index a druhu
sekvencne, stale mi ostane nejakych 10-20% recordov pre sekvencne
hladanie , a to je stale dost vela.

> Podle mojich zkusenosti je pri optimalizaci na rychlost vzdycky
> treba zkombinovat nekolik pristupu a pak teprve je to to prave
> orechove. Jak uz jsem tu psal, kdyz jsme resili databazi firem na CD,
> tak jsme se opravdu zapotili. Preci jenom je CDcko ponekud pomale.
> Ale nakonec se to podarilo.

Aspon mam nadej, ze sa vzdy cosi to da robit ... :-)))> ''''
> (O O)
> +-------------oOO------(_)--------------------+
> | PSOFT, ing.Peter Cirip |
> | Sibirska 18, 080 01 Presov, Slovensko |
> | Mobil : 0903 601 068 091/723 104 |
> | E-mail: psoft(zv)ke.telecom.sk |
> | WEB : http://www.ke.telecom.sk/psoft/ |
> +-------------------------------oOO-----------+
> |__|__|
> || ||
> ooO Ooo
>

zmena hesla pdox tabulky

[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 15.5.1998 15:19:02


na www.inprise.com
je nekde dbidorestructure.html
a tam je popsano jak heslo pridat+zrusit

nebo tam maji priklad na to same v addpswd.zip

Milos Skacel

Telnet

[*] Lukes V�clav <lukes(zv)msm.pvt(tec)cz> - 15.5.1998 15:25:41


Ahoj,

pred casem jsem otravoval s radou stran napsani jednoducheho telnetu v
Delphi. Musim priznat, ze jsem se k zadnemu vysledku, ktery by se
telnetu, alespon vzdalene podobal nedostal.

Mohl by mi nekdo prosim osvetlit tuto problematiku ?

Diky

Vasek

PS: Preji pekny vikend.

Problem s knihovnou RX 2.40

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 15.5.1998 16:15:38

Nevim proc hazite problem na vyvojare Borlandu. Ja mam D3.02 na OSR2 i s RX
2.40 a bezi jak drak.

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



No jo, ale Delphi 3 prislo az po OSR2 a ja predpokladam, ze u Borlandu
take maji nejaky pocitac s Win95 OSR2, takze to snad mohli otestovat,
kdyz davali novou verzi...

S pozdravem
Petr Zahradnik, pocitacovy expert ????

Text Editor pro TDBRichEdit

[*] Martin Kubecka <martin.kubecka(zv)dytron(tec)cz> - 15.5.1998 17:17:14

Nevite nekdo o nejakem textovem editoru (free with source) pro
TDBRichEdit resp TRichEdit ??? V examples k Delphi neco sice je, ale rad
bych tam mel i dalsi funkce a jsem strasne liny to programovat ;-).

Aneb pokud uz to nekde je a je to free proc to zkratka nepouzit
(upravit, prizpusobit a lecos se treba i naucit).

Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....

Dik za kazdou reakci ;)

Martin Kubecka


Dream Company komponenty

[*] Martin Kubecka <martin.kubecka(zv)dytron(tec)cz> - 15.5.1998 18:12:58

Docela slusna kolekce komponent pro Delphi (neco na zpusob RX Lib).

Uz jsem od nich kdysi pouzil AviPlay a FFill a ted to dali do jednoho
baliku a je tam asi 40 komponent (vetsina je free). Co me potesilo je
TDCMenu, ktere upgarduje jiz existujici TMainMenu tak ze vypada jako z
Office97 (moznost obrazku je samozrejma). Kdyz nastavite font Tahoma a
velikost 8 tak jsem fakt nerozeznal jedinny rozdil (na rozdil od jinych
97-like menu co jsem zkousel).

+ spousta dalsich ;)

http://www.brama.com/dream-co/

No tak tot vse


ListView

[*] Tool Tim <tool_tim(zv)tyhan(tec)cz> - 15.5.1998 18:14:13

Zdravim
Omlouvam se za chybu (technickou), taky to tak umim, jen mi to nejak
nedoslo.
Ale kdyby nic, tak to funguje :-//. Kdo se drbe pravou hodou za levym uchem
nevim.
Co je to hoda? Nejaky drbatko?

Tool Tim & Cooler

-----P�vodn� zpr�va-----
Od: Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz>
P�edm�t: RE: ListView


>> Vyse popsanym zpusobem (viz Re: TListView) si zjistite, ktera "ikona" je
>> prave aktivni.
>> Pak do event OnMouseMove se nastavi TListView.Hint na
>> TListView.Items.Item[ListView.ItemFocused.Index].Caption.
>> Nevim, jestli to stopro pude, ale teoreticky to bude mluvit.
>
>Proc to delat jednoduse kdyz to de slozite ze ? Muj post se nevztahuje k
>puvodnimu problemu ale k tomu navrhovanemu strasnemu zapisu:
>
>ListView.Items.Item[ListView.ItemFocused.Index].Caption je prece to samy
>jako
>ListView.ItemFocused.Caption
>
>Kdopak se to tu drbe pravou hodou za levym uchem ? :-))
>
> McLEI


TListBox

[*] Tool Tim <tool_tim(zv)tyhan(tec)cz> - 15.5.1998 18:24:01

Doporucuju ukladat obrazky k TImageListu do souboru a za behu je nacitat. Uz
se to tady jednou probiralo. Nekdo nadnesl, ze je to zavineno verzemi IE,
ktere to obsluhuji kazda jinak (tak nejak). Takze se obrazky v TImageListu
neuchovavaji.
Jinak nevim.

Tim

-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
P�edm�t: RE: TListBox


>> No to dost dob�e nejde, bez toho abys p�episoval Canvas. Ale pro�
>nepou�ije�
>> TlistView ??
>
>Uz me to napadlo, ale problem je, ze se mi na nekterych masinach
>neprenaseji ikony, ktere mam nadefinovane v ImageListu
>
> S pozdravem
>
> Libor Krayzel
>Czech Television, Television Studio Ostrava
>Dvorakova 18
>729 20 Ostrava
>
>Phone: (069) 6201 375
>E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
>> Homepage: http://members.tripod.com/~sovtop
>> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
>> E-mail2: mailto:sovtop(zv)email(tec)cz
>>
>>

free nahrada za MIDAS

[*] Erik Salaj <erik(zv)dodo.sk> - 15.5.1998 18:58:10

Na www.kylecordes.com su informacie o niektorych takychto komponentoch

Erik

-----Original Message-----
From: Martin Fronek <FRONEK(zv)FIC.CZ>
To: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Date: 13. m�j 1998 0:12
Subject: free nahrada za MIDAS


>Hi,
>
>nemate nekdo v planu, ci snad ve vyvoji budouci komponenty, ci spise
>knihovnu, ktera by nahradila drahy MIDAS? Myslim vzdalene datove zdroje,
>pres treti uroven, staci provoz pres TCP/IP (co taky jineho...dneska:-)
>
>fronek(zv)fic(tec)cz
>

TListBox

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

Krayzel Libor wrote:
>
> > No to dost dob�e nejde, bez toho abys p�episoval Canvas. Ale pro�
> nepou�ije�
> > TlistView ??
>
> Uz me to napadlo, ale problem je, ze se mi na nekterych masinach
> neprenaseji ikony, ktere mam nadefinovane v ImageListu

Ahoj,
o problemech s ImageListem se pise tady, treba to pomuze:

http://www.inprise.com/devsupport/delphi/qanda/1387.html

Petr Vones, amatersky programator

IP adresa

[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 15.5.1998 20:54:34

Ahoj Delfici,

neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
adresu ??

Diky za pomoc,

Peter
peterrus(zv)intesys(tec)cz


Databazy a aplikacie

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.5.1998 21:01:06

Martin Nedopil wrote:
>
> Alternativy zde:
> * http://www.kylecordes.com/bag/index.html,

Problem je ze vetsina komponent je delana i pro Delphi 2 a tudiz neni odvozena
od TDataSet, nemuzes pak na ni pouzit datove komponenty coz je dost skoda.

> Velmi zajimava komponenta na http://home.sprynet.com/sprynet/rrm/index.html,
> bohuzel vsak nelze sdilet jednu tabulku dvema aplikacemi. Jinak je to velmi
> hezke reseni. Naopak vsak podporuje kompresi za behu, hesla, indexy a
> data v jednom souboru.

>
> Uz jsem uvazoval, ze i neco sam si sesmolim, ale vzdycky jen vzdychnu a je
> po srande.

Taky jsem se o to snazil, nekladl jsem si zadne velke cile, spis jen abych misto
pouzivani vlastnich datovych struktur s TList a podobne mel poruce neco co lze
jednoduse napojit na datove komponety. (viz prispevek "Datasety bez BDE").
Zatim jsem ale nemel cas to dokoncit.

> Nejlepsi reseni by bylo napsat jednoduchou komponentku, ktera by pri behu
> dynamicky
> linkovala TUtility.Dll a pokousela by se verifikovat tabulku, kterou ma ve
> svem
> property. Pokud by tabulka nesla otevrit, hned by na ni najela, jinak by ji
> nechala byt.
>
> Co vy na to?

To neni spatny napad, mozna bych ji napojil na vsechny tabulky v danem datovem
modulu. Problem ale vidim v tom ze pro opravy musi byt tabulka otevrena jako
Exclusive, coz pri sdilenych tabulkach bude zpusobovat problemy. Dival jsem se
na ukazkovou aplikaci dutil32 u Borlandu, tam me ale nefunguje spravne
zobrazovani informaci o poctu indexu. Patrne se jedna o chybu. Pouzivam BDE 4.51

Navic jedna takova komponenta jiz existuje, ale neni free:
http://www.o2a.com/tu.htm

Petr Vones, amatersky programator

Databazy a aplikacie

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.5.1998 21:34:06

> no dobre, ale predstavte si aplikaciu za radovo 4000 korun + dph, ktora ma
> ale na druhej strane vysoke poziadavky na spolahlivost databaz. Aplikacia
> bezi 24 hodin 365 dni v roku. Predchadzajuca verzia pre DOS bola o tisicku
> lacnejsia a ziadne problemy s nou asi 4 roky neboli, teraz ma zakaznici kopu
> do ... a ani sa im necudujem.

Toto je relativni pojem. Mohou byt problemy a nemusi byt problemy. Je treba si
uvedomit, ze jednouzivatelska aplikace pod DOSem na databazi dBase, FoxPro
nebo Paradox, kde nebudu vyuzivat MEMO polozky, bude mnohem spolehlivejsi
nez sitova aplikace bezici na siti peer-to-peer pod Windows 3.1 nebo
Windows 95 na databazi dBase, FoxPro nebo Paradox s hromadou indexu a MEMO
polozek. Vysvetleni je jednoduche. V jednouzivatelske aplikaci se ti nesdili
zadna data, nemuze vypadnout sousedni pocitac, zkolabovat sit, kdyz mas
zalozni zdroj, tak nemuze vypadnout elektrika... Tabulka s MEMO polozkami
ma radove nizsi spolehlivost, protoze prvni, co se podela pri vypadku, to
jsou odkazy na MEMO polozky...

Mam zkusenosti s ruznymi programy bezicimi nad ruznymi databazemi. Treba
ucetnictvi udelane v Clipperu - nejsem autor, ale jsem Centralni poradenske
stredisko pro Severocesky kraj na tyto programy, takze prichazim do styku
(osobnim i telefonickem) s kvantem zakazniku, kteri problemy maji. Jakmile
vypadne pocitac (treba elektrika) a neudela se ScanDisk + preindexace,
muze byt zadelano na pekny problem. Ne zridka jsem videl tabulky, kdy
uprostred je chlivek - proste se neco zanedbalo a ono to jelo dal, ale
binec uprostred zustal. A to jsou vetsinou jednouzivatelske programy.
Co jsem ja delal programy v DOSu vyuzivajici tabulky Paradoxu (delano
pod Borland Pascalem s vyuzitim Borland Database Engine), ty jsou
vetsinou spolehlive, nicmene i tam jsem mel obcas nejaky problem, kdyz
ve spravnou chvili dosel proud... A co jsou programy pod Windows, tak
jsem delal jak s tabulkami dBase i Paradox. Pokud se nepouzivaji MEMO
polozky, docela to jde, ale s MEMO polozkami je to katastrofa. Mam jednu
rozsahlejsi aplikaci (spedicni objednavkovy system), kterou jsem ja
trouba udelal na dBase tabulkach, bezi na peer-to-peer siti se ctyrmi
pocitaci Windows 95. Skoro vsechny tabulky maji MEMO a to je tragedie.
Jakmile pocitac zatuhne, je to problem, neni sance to nejak rozumne
obnovit, proste prichazi na radu moje rucni prace nebo minula zaloha.
Nastesti se jim to nestava prilis casto, ale kdyz nemeli zalozni
zdroj, tak jsem jim to casto stavalo. A i ted se to obcas stane. Uvedom
si, ze jakmile je tam vice pocitacu, zvysuje se riziko, ze aspon jeden
padne treba diky nejakemu jinemu spustenemu programu - a zakaznici
jsou cunata, nahraji si do pocitace cokoliv... to mozna znas. Pak mam
treba take svuj vlastni Informacni system, ktery pouzivam pro sebe,
je postaveny na tabulkach Paradox. MEMO polozky ma a uz se mi take
nekolikrat stalo, ze mi zatuhl pocitac - neni to u me bezne, protoze
nejsem prase a nedavam do pocitace vsechno, co kde najdu, ale cas od
casu mi nejaky program dokaze cely pocitac zatuhnout. Jeste se mi
nestalo, ze bych o data prisel, ale riziko tu je velike.

Proto jsem si take poridil SQL server a to konkretne Sybase SQL Anywhere.
K nemu pozdeji. A co ti poradim? Zalezi, pro koho delas a kolik to ma
stat. Vyhodou beznych tabulek dBase, FoxPro, Paradox je, ze je muzes
volne sirit a vybiras tedy penize pouze za svou aplikaci, zakaznik
nemusi mit zadny SQL server. Toto je dobre, kdyz to jsou bezne aplikace
typu jednoduche ucetnictvi, cenik apod., kde se to pouziva na jednom
pocitaci a lidi si to denne zalohuji. Ale jakmile budes takove tabulky
davat na sit a aplikace bude sitova, nebo to bude neco opravdu sloziteho
se spoustou indexu a memo polozek, pridelavas si problemy. Totiz tvoje
aplikace bude relativne levnejsi, protoze zakaznik si nebude muset
kupovat SQL server, zaplati tedy jen program tobe. Jenze to jen do doby,
kdy se opravdu nastve, protoze mu budes porad opravovat tabulky a nebo
bude prichazet o data, kdyz si bude vracet data ze zalohy z minuleho
tydne. Vzdy to musis posuzovat podle toho, jaka je to aplikace, komu
se bude sirit - jednoduche ucetnictvi s SQL serverem si nikdo nekoupi...
Na druhou stranu si snad nikdo nekoupi firemni informacni system, na
kterem je zavisly beh jejich firmy, kdyz nebude mit SQL server...

A ted k tomu SQL serveru. Pokud chces hodne penez usetrit zakaznikum,
doporucuji ti TurboPower FlashFiler. Podrobnejsi informace ti mohu
dodat. Kratce jen tolik, ze je to knihovna pro Delphi, ktera nahrazuje
BDE, je to SQL databaze, ktera ma vlastni format souboru a podporuje
transakce a zurnal. Ale co zase nepodporuje, to je SQL. Takze je to
jen pro TTable, je to dost spolehlive. Chodi to jak na jednom PC, tak
i v siti a to take pres TCP/IP. Klientska cast se ti linkuje primo
do EXE, nemusis distribuovat zadne BDE, aplikace je mnohem mensi.
Velka vyhoda je, ze ten server je volne siritelny, takze zakaznik
si nemusi nic kupovat. Proste mu nainstalujes server + tvuj EXE.
Cena je take velmi rozumna.

Pokud chces plnohodnotny SQL server, ten uz je jinak licencovany,
zakaznik si musi koupit SQL server + navic licence na klienty.
Takze cena za 1 PC je nizsi nez cena za sit server + 20 stanic.
A to dosti znacna... Ale na druhou stranu je si zase treba uvedomit,
ze SQL server je sice investice, ale dela se jen jednou. Totiz kdyz
udelas 10 programu zalozenych na SQL serveru, zakaznik ma jen jeden
SQL server, tedy jednu licenci serveru a na kazde stanici jednu
licenci klienta. Takze zakaznik si koupi jeden SQL server a pak
uz na nem muze mit vice aplikaci, samozrejme od ruznych firem.
Je nekolik SQL serveru, kazdy se hodi na neco jineho. Nejsem zadny
expert na SQL servery, takze jen tak strucne - Oracle si poridis,
kdyz chces provozovat silene rozsahlou databazi treba jako je
nejaky statni informacni system, protoze v takovem objemu se
Oracle snad zadny jiny SQL server nevyrovna. Sybase SQL Server
je take na velikanske objemy. Podle toho to take stoji hodne...
Pokud delas nejakou normalni aplikaci, pak si vyberes asi mezi
Microsoft SQL nebo Borland Interbase nebo Sybase SQL Anywhere.
Kazdy ma sve vyhody i nevyhody. Interbase ma vyhodu hlavne pro
tebe a to v tom, ze ho mas u Delphi. Takze si ho nemusis kupovat,
abys mohl databaze testovat a vyvijet. Microsoft SQL ma zase
jine vyhody, totiz je asi nejrozsirenejsi, protoze Microsoft je
Microsoft. A jestli znas Microsoft BackOffice Small Business
Server, tak to je BackOffice omezeny na nekolik uzivatelu, stoji
asi 60 tisic, takze takova stredni firma si ho muze dovolit
koupit. A docela se dost prodava. Zase ty jako programator si
muzes koupit MSDN Universal, ktery obsahuje vsechny produkty
Microsoftu, tedy vyvojove nastroje, Office, BackOffice, vsechny
operacni systemy ve vsech jazycich a tedy vcetne vyvojovych
licenci pro NT Server + SQL Server. Navic s rocni aktualizaci
po 3 mesicich. Stoji to sice balik, ale vyplati se to, pokud
neco vetsiho vyvijis, protoze kdyz sectes naklady na MSDN prof.,
jde je SDK a DDK, SQL server a NT Server, vyjde te to draz
samostatne, zatimco s MSDN Universal mas i tu aktualizaci,
takze dostanes novejsi NT Server a nemusis kupovat upgrade.

A ted k tomu Sybase SQL Anywhere. Ten je totiz velmi zajimavy,
protoze "roste spolu s uzivatelem". MS SQL Server, jak vis,
chodi jen na NT Serveru (ta nova verze snad jiz konecne bude
chodit i na Win95). No a v tom jsou prave velke vyhody
SQL Anywhere, protoze ten podporuje daleko vice platforem.
leduj, kde to vsude bezi:

Server na DOS, NetWare, OS/2, Windows NT, Windows 95 a Windows 3.x
Client/Standalone na DOS, OS/2, Windows NT, Windows 95 a Windows 3.x

Ma to slusne pozadavky na system, minimalni konfigurace jsou:
DOS 5.0 (4MB RAM), NetWare 3.11 (16MB RAM), OS/2 2.0 (8MB RAM),
Windows 95 (8MB RAM), Windows NT 3.5 (16MB RAM)
a Windows 3.1 (4MB RAM). Co se tyka siti, podporuje to protokoly:
DOS - NetBIOS a IPX, NerWare - IPX a TCP/IP, OS/2 a Windowsy -
- NetBIOS, IPX a TCP/IP.

Takze zde je velka vyhoda, ze nejchudsi uzivatel, ktery ma treba
jeden pocitac s Windows 95, si koupi zakladni licenci Base za
nejakych 12 tisic. No a pouziva to najednom pocitaci. Ma velmi
spolehlivou databazi s moznostmi Ansi SQL, transakci, triggeru,
ulozenych procedur apod. Kdyz si poridi druhy pocitac, ktery ma
take treba Windows 95, tak si udela sit peer-to-peer, nemusi
nic dokupovat, protoze Base licence je pro 1 server + 1 client,
coz je tento pripad. A najednou ma sitovy SQL. Kdyz koupi treti
pocitac, prikoupi jednu client licenci za nejakych asi 5 tisic
a pokracuje... Kdyz mu pocitace narostou a rad by udelal nejakou
vykonnejsi sit, koupi si dedikovany Windows NT Server a udela
z toho plnohodnotnou sit, uz to neni peer-to-peer. Ale pozor,
to neni vsechno, on si koupi notebooka, ktery si chce nosit
domu, takze je treba replikace. Na to je licence Standalone
with replication, umi to bezvadne replikovat. Kdyz je pripojen
na sit, vyuziva client pristup, nez se odpoji, udela replikaci,
jde s tim pryc a pak zase zreplikuje data. Zadny problem.
Toto jsou velke vyhody tohoto SQL, protoze neni treba zacinat
na treba 40 tisicich, kdyz mas jen jeden nebo dva pocitace,
ale hlavne nepotrebujes hned od zacatku NT Server. V pohode
to spolupracuje i s 16-bitovymi Windows na siti vcetne replikace,
muzes si udelat heterogenni sit. Jinak toto je jeden model, pak
se to prodava i jako concurrent model, coz je zase licence pro
server + nekolik clientu, to je kdyz uz mas sit a nezacinas
od zacatku, proste druhy zpusob licencovani. Jinak pokud chces
prodavat aplikaci zakazniku, je jeste dalsi licencovani pro VAR,
jmenuje se to GOLD DISK, koupis si za silene prachy CD s mnoha
instalacemi a ty pak instalujes zakaznikum az do vycerpani...

> Ake su financne naroky, pokial by som chcel namiesto paradoxu pouzit
> napriklad interbase?!? Zakaznik by ho asi musel mat, ze?

Ano, viz vyse. Zakaznik musi mit SQL Server + urcity pocet klientu,
to se koupi zvlast (pripadne VAR jako je GOLD DISK...) a ty pak
dodas aplikaci.

PS: To jsem se rozkecal, sorry...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Udalosti pri procesu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.5.1998 21:37:03

Simicek Pavel wrote:
>
> Ahoj vsichni!
> Ve sve aplikaci provadim jiste matematicke vypocty ktere trvaji
> radove nekolik vterin. Behem techto vypoctu volam
> Application.ProcessMessages.

Ja bych ten vypocet napsal jako thread, volani ProcessMessages neni idealni
reseni

Petr Vones, amatersky programator

Local SQL na velku indexovanu paradox tabulku

[*] psoft <psoft(zv)kosice.telecom.sk> - 15.5.1998 21:50:43


> > Mam s tym teraz ale iny problem : povodne som potreboval z tabulky
> > vyrezat "stvorec" - podla dvoch indexov - slo to velmi pomaly.
> > Zredukoval som SQL dotaz na select * from stars where alfa between
> > :AlfaMin and :AlfaMax. Vysledok vratilo uzasne rychlo, aj ked mal
> > 20.000 recordov. Potom som vymenil alfa za delta, a to cakal som to
> > iste. Ale vysledok bol uplne iny - strasne pomale, hoci tam bol tiez
> > index. Zrejme to bude tym, ze podla Alfa je tabulka fyzicky
> > zotriedena, a podla delta nie. Ale tam mam index, ktory by mi to mal
> > nahradit. Nerozumiem tomu a akosi sa mi nedari cez to prejst.
>
> Coz takhle udelat nejdrive select na Alfa, a v tom selectu dat
> ORDER BY Delta a na vysledek dat select podle Delta. Teda takhle by
> mi to prislo jako nejlepsi na najiti ctverce. Akorat mam takovej
> pocit, ze se neda v LocalSQL udelat vnoreny dotaz, resp. pouzit
> vysledek jednoho dotazu v jinem. Teda asi takto
>
> select * from
> ( select * from stars
> where alfa between :AlfaMin and :AlfaMax
> )
> where delta between :DeltaMin and :DeltaMax
>
> Je to jenom napad, ale treba nekdo poradi zda to jde.

Dakujem, neskusal som, ci to takto ide. Problem nie je az tak celkom
v tom, ako to urobit, ako skor urobit to tak, aby to bolo rychle.
Ono totiz na obe premenne mam osobitny index, ale podla Alfa to hlada
rychlo (lebo podla toho je tabulka fyzicky zotriedena) a podla Delta
strasne pomaly, hoci tam mam ten index. Skoro mi pripdada, ze to
hadam hlada sekvencne. Ide skor o to, ako prinutit BDE pouzivat
obidva indexy.


> ''''
> (O O)
> +-------------oOO------(_)--------------------+
> | PSOFT, ing.Peter Cirip |
> | Sibirska 18, 080 01 Presov, Slovensko |
> | Mobil : 0903 601 068 091/723 104 |
> | E-mail: psoft(zv)ke.telecom.sk |
> | WEB : http://www.ke.telecom.sk/psoft/ |
> +-------------------------------oOO-----------+
> |__|__|
> || ||
> ooO Ooo
>

Telnet

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 15.5.1998 23:54:06

Hi,

tady ti to osvetli naprosto perfektne, navrch si muzes stahnout haldu
skvelejch komponent i se zdrojakem, a za to vsecko posles akorad
pohlednici (je to postcardware). fronek(zv)fic(tec)cz

http://www.rtfm.be/fpiette/indexuk.htm

=?iso-8859-2?Q?Lukes_V=E1clav?= wrote:
>
> Ahoj,
>
> pred casem jsem otravoval s radou stran napsani jednoducheho telnetu v
> Delphi. Musim priznat, ze jsem se k zadnemu vysledku, ktery by se
> telnetu, alespon vzdalene podobal nedostal.
>
> Mohl by mi nekdo prosim osvetlit tuto problematiku ?

Problem s knihovnou RX 2.40

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 16.5.1998 00:31:17

Hi,

myslis ze u Borlandu nekoho napadlo naladovat si tam hodne komponent?
Predpoklad byl, ze se bodou pouzivat ty jejich, a treba neco malo svych,
ze se to takhle rozmuze, to snad byl jen jejich sen.... Ale je to moc
dobre!

Petr Zahradnik wrote:
>
> > sice me taky nekdy vyvojari Borlandu lezi v zaludku, ale nemusi to byt
> > jen jejich chyba, obzvlast kdyz si tady psal, ze to zlobi na W95 OSR2 !
> >
> > Jiz pred nekolika lety udelal MS totez s Lotusem (tusim). Udelal novou
> > verzi DOSu tak, aby si na tom 1-2-3 rozbil hubu, SCHVALNE! Takze to muze
> > byt i opakovani historie.
>
> No jo, ale Delphi 3 prislo az po OSR2 a ja predpokladam, ze u Borlandu
> take maji nejaky pocitac s Win95 OSR2, takze to snad mohli otestovat,
> kdyz davali novou verzi...

POZOR!! D�le�it� zpr�va!

[*] �ke��k Jaroslav�������6�����̿ - 16.5.1998 08:18:43

Jo naletel jsem, protoze jsem to obdrzel poprve. Priste budu chytrejsi
Omlouvam se.
Dekuji vsem, kteri me upozornili.
Jaro

PS Nejvice se mi libi chytraci, co ted vsechno vedi a poprve
treba take nekomu naleteli.

>Hi,
>
>musim se zastat pana Skerika, on to jiste myslel dobre, kdo vi co dela
>takovej OUTLOOK pri otvirani zpravy? Treba si tam MS nechal nejaky
>"zadni vratka" pro budouci rozsirovani, a nekdo to prokouk...
>
>Je to samozrejme _velmi_ nepravdepodobne, ale u MS jsou schopni vseho!
>
>fronek(zv)fic(tec)cz
>
>
>Pavel Cisar wrote:
>>
>> Kdybych pokazde dostal korunu, kdyz dostanu takovyhle mail.... :-)
>>
>> Mily p. Skeriku, bud nejste az takovy profesional, nebo si z nas velmi
>> nevkusne utahujete. BTW, podle velikosti hlavicky se timhle mailikem
stavite
>> do jedne rady s nejmenovanym "dovedou", ktery zaslal 8MB do konference.
>>
>> Bye


Problem s knihovnou RX 2.40

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.5.1998 09:57:34

> Nevim proc hazite problem na vyvojare Borlandu. Ja mam D3.02 na OSR2 i s RX
> 2.40 a bezi jak drak.

Opravdu? Tak to asi nebude tim OSR2. Mimochodem, ja jsem to na tom
notebooku zkousel zatim jen pod Delphi 2, protoze Delphi 3 mam
zatim jen na hlavni masice, na notebooku jiz delsi dobu testuji
instalace BDE 4.5, takze ho tam zatim nemohu nahrat. Ale pod D2
mi to prave nechodilo a nekdo tu psal, ze jemu to nechodi v D3
na OSR2. Takze az to ja nainstaluji, nahlasim stav. A modlim se,
aby to chodilo...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

IP adresa

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.5.1998 09:57:34

> neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
> adresu ??

To ti rika primo WinSock.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Text Editor pro TDBRichEdit

[*] Martin Kubecka <martin.kubecka(zv)dytron(tec)cz> - 16.5.1998 11:49:19

Abych to upresnil, jde mi o toto:

cislo 756 vypsat jako "sedmsetpadesatsest" ;)

Martin

> Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
> vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
> volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
> daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....

IP adresa

[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 16.5.1998 12:27:44

Ahoj :-))),

to je super, ze to rika :-)) .. ale jak to zjistim, abych to mohl pouzit
v programu??

Diky,

Peter
peterrus(zv)intesys(tec)cz


Petr Zahradnik wrote:
>
> > neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
> > adresu ??
>
> To ti rika primo WinSock.
>
> S pozdravem


Komunikace client/server (Application servers, Act

[*] �ke��k Jaroslav�������6�����̿ - 16.5.1998 12:56:06

>
>Kym nebudu u nas prepojenia s rychlostou 30 Kb/s, som v tomto smere dost
skepticky. Navyse taka slusna klient/server aplikacia ma ovela krajsie a
praktickejsie rozhranie, nez nejaky ubohy browser.

Ja bych to nevidel tak cerne, resp. videl jsem jiz projekty na Internetu,
ktere funguji dobre.
Napr. objednavkovy system vypocetni techniky. Muzete si podle aktualnich
ceniku rezervovat nebo
objednat zbozi a pod. Pritom je asi zrejme, ze ucetni prislusne firmy vam
nebudou vystavovat fakturu
nebo uctovat tento pripad pomoci browseru. Budou, ale pristupovat i ke
stejnym datum, ktera
jsou spristupnena verejnosti momoci webu.>
>Este poznamka k b): naco tam potrebujes ActiveX? Ak nechces ist cez
browser, chod priamo cez TCP/IP pouzitim bud DCOMu alebo CORBA rozhrania
(VisiBroker od Inpriseu - pred mesiacom od Borlandu, pred dvoma mesiacmi od
Visigenicu).
>
>
>Get your FREE, private e-mail
>account at http://www.mailcity.com


IP adresa

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.5.1998 15:22:22

> Ahoj :-))),
>
> to je super, ze to rika :-)) .. ale jak to zjistim, abych to mohl pouzit
> v programu??

No vetsinou, kdyz mas nejakou WinSock knihovnu, tak tam na to je
funkce, nemusis to psat sam :-))) Toto je napr. vynatek z tcpip:

function my_hostname: string;
const
bufsize=255;
var
buf: pointer;
RemoteHost : PHostEnt;
begin
buf := NIL;
my_hostname := '';
try
getmem(buf, bufsize);
winsock.gethostname(buf, bufsize);
if char(buf^) <> #0 then
begin
RemoteHost := Winsock.GetHostByName(buf);
if RemoteHost <> NIL then
(*$ifdef ver80 *)
my_hostname := strpas(pchar(RemoteHost^.h_name))
(*$else *)
my_hostname := pchar(RemoteHost^.h_name)
(*$endif *)
else
my_hostname := '127.0.0.1';
end
else
my_hostname := '127.0.0.1';
finally
if buf <> NIL then
freemem(buf,bufsize);
end;
end;

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Text Editor pro TDBRichEdit

[*] Jan Naiser <tua(zv)ltm(tec)cz> - 16.5.1998 17:45:23

[P��loha v souboru: Slovy.pas]
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Nevim, zda ti to pomuze, ale kdysi jsem neco podobneho psal jeste ve starem
dobrem BP. Posilam jako privesek vytazenou funkci z jedne me knihovny. Ten
napad nebyl uplne muj (abych se nechlubil cizim perim), kdesi jsem ten
algoritmus vycet.
Je to psane v CP867 (kam.) pod DOSem, takze ty stringy bys musel prepsat.
Snad to bude fungovat.

S pozdravem Honza Naiser.

----------------------------------------------------
ing. Jan Naiser, E-mail: tua(zv)ltm(tec)cz


-----P�vodn� zpr�va-----
Od: Martin Kubecka <martin.kubecka(zv)dytron(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 16. kv�tna 1998 10:47
P�edm�t: Re: Text Editor pro TDBRichEdit


>Abych to upresnil, jde mi o toto:
>
>cislo 756 vypsat jako "sedmsetpadesatsest" ;)
>
>Martin
>
>> Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
>> vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
>> volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
>> daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....

Detekce pripojenych uzivatelu

[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 16.5.1998 23:11:23


-----Original Message-----
From: Ing. J�n Kuch�r <kuchar(zv)tuke.sk>
Date: 14. kv�tna 1998 21:15


>Cau
>Skus mi prosim Ta napisat tie funkcie, v tom style ako ich mam dat priamo
do
>procedury povedzme po stlaceni tlacitka Tbutton, tak aby sa mi v komponente
>TEdit zobrazil napojeny uzivatel. Skusil som to totiz dat do svojho
programu
>a nechcej vediet kolko chybovych hlaseni mi vyskocilo, takze uz neviem ako
>dalej.
>
>Dik
>
>
>-----P�vodn� zpr�va-----
>Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>

>Mozna by pomohly funkce, ale nejsem si jisty:
>
>DWORD WNetGetConnection(
> LPCTSTR lpLocalName, // pointer to local name
> LPTSTR lpRemoteName, // pointer to buffer for remote name
> LPDWORD lpnLength // pointer to buffer size, in characters
> );
>
>DWORD WNetGetUser(
> LPCTSTR lpName, // pointer to local name to get user name for
> LPTSTR lpUserName, // pointer to buffer for user name
> LPDWORD lpnLength // pointer to buffer size variable
> );
>
>S pozdravem
> Petr Zahradnik, pocitacovy expert
>


Zadna z techto funkci to neumi, nasel jsem ale fci. NetShareEnum kterou
pouziva NetWatch.
Mam tu ale novy problem :
Tahle fce je v SVRAPI.DLL nasel jsem ji i v API Helpu ale nevim jak
zjistit ve ktere unite ji definuji Delphi. Tenhle problem uz jsem nekolikrat
resil tak ze jsem dal prohledat vsechny zdrojaky k Delphhi ale urcite
existuje jednodusi reseni. ( ted nemam nainstalovane zdrojaky k Delphi takze
ji takhle hledat nemuzu. ).
Nevite nekdo jak na to ???

Diky vsem ...
Michal

Databazy a aplikacie

[*] �ke��k Jaroslav�������6�����̿ - 16.5.1998 23:22:12

------
A ted k tomu Sybase SQL Anywhere. Ten je totiz velmi zajimavy,
protoze "roste spolu s uzivatelem".
... atd
Takze zde je velka vyhoda, ze nejchudsi uzivatel, ktery ma treba
jeden pocitac s Windows 95, si koupi zakladni licenci Base za
nejakych 12 tisic.
..... atd
Toto jsou velke vyhody tohoto SQL, protoze neni treba zacinat
na treba 40 tisicich, kdyz mas jen jeden nebo dva pocitace,
ale hlavne nepotrebujes hned od zacatku NT Server. V pohode
to spolupracuje i s 16-bitovymi Windows na siti vcetne replikace,
muzes si udelat heterogenni sit. Jinak toto je jeden model, pak
se to prodava i jako concurrent model, coz je zase licence pro
server + nekolik clientu, to je kdyz uz mas sit a nezacinas
od zacatku, proste druhy zpusob licencovani. Jinak pokud chces
prodavat aplikaci zakazniku, je jeste dalsi licencovani pro VAR,
jmenuje se to GOLD DISK, koupis si za silene prachy CD s mnoha
instalacemi a ty pak instalujes zakaznikum az do vycerpani...

...atd, atd
-------------------
Jen bych pripomnel, ze nova Interbase na tom neni o nic hure,
ba mozna jeste lepe.
Od verze 5.0 je k dispozici pro Win95 (peer-to-peer) a WinNT
v jedne cene (jedno spolecne inst. CD)
Cena je tez zajimava: (orientacne)
Lokalni Interbase = 5 850,-
Interbase server = 13 530,- Kc
Licence 1 user = 6 600,- Kc
10 user = 55 000,- Kc a pod.
Pocitaji se samozrejme soucasne pripojeni uzivatele.
A protoze v mnoha firmach malokdy pracuje soucasne vice jak 10 lidi,
bohate staci tato alternativa i pro dost velke firmy.
Co je vsak zajimavejsi? pokud prodavate zakaznikum,
nemusi zakaznik kupovat server, ale jenom licence = papirky.
Instalaci provede dodavatel, ktery koupi server jednou pro sve zakazniky.
Var partnersvi je tez mozne a muzete se dostat az asi na 2.500 Kc
za licenci. Nejmensi balik je asi 20 licenci a je pri tom zajisten bezplatny
upgrade po dobu 1 rok.
Verze 4.2 je pro Linux zadara.
Pouzivam Interbasi 1 rok a uz jsem odvyknul od neustalych problemu
se zakazniky. Myslel jsem si tez ze zacatku, ze ztratime hodne zakazniku
kvuli cene, ale nestalo se tak. Mozna jich vice ziskate z okruhu
vetsich firem, kteri pozaduji profesionalni pristup, nez tech,
kteri od vas odejdou. Cim dal vice jsou zakaznici ochotni zaplatit
spolehlivost. Maloktery sef je ochoten platit lidi, kteri delaji dvakrat
jednu praci nebo cekaji az nekdo prijede obnovit data. O nervozite
kolem takovych pripadu ani nemluve. Podle zakonu schvalnosti se to
po... (poroucha, ze .... jsme na pinknetu) zrovna kdyz je napr.
uzaverka.
Jaro.
-------------
PS: To jsem se rozkecal, sorry...
-----------
To je dobre ... alespon jedno komlexni vysvetleni.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Text Editor pro TDBRichEdit

[*] �ke��k Jaroslav�������6�����̿ - 16.5.1998 23:39:16

Vynikajici je UDC MEMO WRITER PRO
Umi toho hodne. Jeho schopnosti bych srovnaval spise
s MS Word nez s DbRichEdit. Bohuzel neni vsak free.
Ke stazeni je trial verze i se zdrojaky. Ted vsak nemuzu najit ten web.
Bude-li zajem, zjistim to.
Jaro.
-----


>Nevite nekdo o nejakem textovem editoru (free with source) pro
>TDBRichEdit resp TRichEdit ??? V examples k Delphi neco sice je, ale rad
>bych tam mel i dalsi funkce a jsem strasne liny to programovat ;-).
>
>Aneb pokud uz to nekde je a je to free proc to zkratka nepouzit
>(upravit, prizpusobit a lecos se treba i naucit).
>
>Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
>vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
>volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
>daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....
>
>Dik za kazdou reakci ;)
>
>Martin Kubecka


Detekce pripojenych uzivatelu

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 17.5.1998 00:32:01

Hi,

nejlip pouzit C++Builder :-)))

ale v Delphi to je prece stejne jako kdekoliv jinde.

Tohle je uvedeno v helpu:

The NetShareEnum function is obsolete. It is provided only for
compatibility with LAN Manager and 16-bit versions of Windows.
Win32-based applications should use the WNetEnumResource function.

takze bych radeji pouzil tu novou funkci. Bulder ji ma v hlavickovem
souboru WINNETWK.H Delphi nemam....

Michal Cizek wrote:

> Mam tu ale novy problem :
> Tahle fce je v SVRAPI.DLL nasel jsem ji i v API Helpu ale nevim jak
> zjistit ve ktere unite ji definuji Delphi. Tenhle problem uz jsem nekolikrat
> resil tak ze jsem dal prohledat vsechny zdrojaky k Delphhi ale urcite
> existuje jednodusi reseni. ( ted nemam nainstalovane zdrojaky k Delphi takze
> ji takhle hledat nemuzu. ).
> Nevite nekdo jak na to ???
>
> Diky vsem ...
> Michal


Text Editor pro TDBRichEdit

[*] Martin Fronek <FRONEK(zv)FIC.CZ> - 17.5.1998 00:59:38

Hi,

byl by zajem. Co to znamena TRIAL se ZDROJAKY ???

=?iso-8859-2?B?qWtl+O1rIEphcm9zbGF2?= wrote:
>
> Vynikajici je UDC MEMO WRITER PRO
> Umi toho hodne. Jeho schopnosti bych srovnaval spise
> s MS Word nez s DbRichEdit. Bohuzel neni vsak free.
> Ke stazeni je trial verze i se zdrojaky. Ted vsak nemuzu najit ten web.
> Bude-li zajem, zjistim to.
> Jaro.
> -----
>

Databazy a aplikacie

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 17.5.1998 10:03:04

> Jen bych pripomnel, ze nova Interbase na tom neni o nic hure,
> ba mozna jeste lepe.

K tomu mam jednu hlavni poznamku. Ano, je lepsi napr. v tom, ze kdyz
mas Delphi, nemusis si kupovat pro sebe server, protoze ho uz mas,
takze koupis jen zakaznikovi. Ale Interbase ma zakladni nedostatek,
nema, pokud vim, slusnou replikaci. V tom jsou myslim Sybase SQL Anywhere
a take Sybase SQL Server nejlepsi. Podle toho jsem si take ja kupoval
SQL server, protoze ta replikace je pro me dost dulezita - mam totiz
notebooka a potrebuji na nem pracovat odpojene od serveru a pak to
zreplikovat.

> Od verze 5.0 je k dispozici pro Win95 (peer-to-peer) a WinNT

A na webu borland(tec)cz maji chybu, protoze to maji otocene - 4.2 pro 95/NT
a 5.0 jen pro NT. Ano, vim o tom, ze nova Interbase umi i Windows 95,
to by mel novy MS SQL Server umet take. Jenze zase - Sybase SQL Anywhere
umi nejen Windows 95 a Windows NT, ale umi take Windows 3.1x, DOS,
OS/2, Macintosh a NetWare (vsechno nejen klient, ale take server!!!).
Nekomu se to muze hodit, protoze muze mit klidne jeste stare Windowsy...
Neumi Linux, to je fakt, ale to me mrzi ze vseho nejmene.> v jedne cene (jedno spolecne inst. CD)

Ano, Sybase SQL Anywhere take, je jedno instalacni CD a z toho si
nainstalujes bud Server + Remote + Client nebo Standalone nebo
Standalone + Remote. To je zaklad za asi 12 tisic. Dalsi klienty
nebo standalony musis dokupovat. Samozrejme si vyberes platformu,
kterou chces instalovat.

> Cena je tez zajimava: (orientacne)
> Lokalni Interbase = 5 850,-
> Interbase server = 13 530,- Kc
> Licence 1 user = 6 600,- Kc
> 10 user = 55 000,- Kc a pod.
> Pocitaji se samozrejme soucasne pripojeni uzivatele.
> A protoze v mnoha firmach malokdy pracuje soucasne vice jak 10 lidi,
> bohate staci tato alternativa i pro dost velke firmy.

Ano, to je pravda.

> Co je vsak zajimavejsi? pokud prodavate zakaznikum,
> nemusi zakaznik kupovat server, ale jenom licence = papirky.
> Instalaci provede dodavatel, ktery koupi server jednou pro sve zakazniky.
> Var partnersvi je tez mozne a muzete se dostat az asi na 2.500 Kc
> za licenci. Nejmensi balik je asi 20 licenci a je pri tom zajisten bezplatny
> upgrade po dobu 1 rok.

Takze u Interbase uz to take funguje? U Sybase SQL Anywhere to samozrejme
je take, jmenuje se to GOLD DISK. Koupis si instalaci CD, dostanes k tomu
disketu a chodis instalovat. Na diskete se ti odecitaji licence...

> Verze 4.2 je pro Linux zadara.

Ano, to vim, ale to me netrapi, protoze Linux je neco, co neuznavam...

> Pouzivam Interbasi 1 rok a uz jsem odvyknul od neustalych problemu

Ty problemy znam.

> se zakazniky. Myslel jsem si tez ze zacatku, ze ztratime hodne zakazniku
> kvuli cene, ale nestalo se tak. Mozna jich vice ziskate z okruhu
> vetsich firem, kteri pozaduji profesionalni pristup, nez tech,
> kteri od vas odejdou. Cim dal vice jsou zakaznici ochotni zaplatit
> spolehlivost. Maloktery sef je ochoten platit lidi, kteri delaji dvakrat
> jednu praci nebo cekaji az nekdo prijede obnovit data. O nervozite

Ano, to je pravda.

> kolem takovych pripadu ani nemluve. Podle zakonu schvalnosti se to
> po... (poroucha, ze .... jsme na pinknetu) zrovna kdyz je napr.
> uzaverka.

Jo, presne tak, mam take takove zakazniky, kteri maji obcas problem,
protoze jedou na tabulkach - jenze to jsou setrilkove... Ja jsem se
rozhodl, ze takove vetsi aplikace jiz rozhodne budu delat jen na
SQL, protoze jinak jsou desne problemy.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Databazy a aplikacie

[*] Martin Fron�k <fronek(zv)fic(tec)cz> - 17.5.1998 15:43:42




-----Original Message-----
From: Petr Zahradnik [SMTP:clexpert(zv)clexpert(tec)cz]
Sent: Sunday, May 17, 1998 11:03 AM
To: delphi(zv)pinknet(tec)cz
Subject: Re: Databazy a aplikacie

to by mel novy MS SQL Server umet take. Jenze zase - Sybase SQL Anywhere
umi nejen Windows 95 a Windows NT, ale umi take Windows 3.1x, DOS,
OS/2, Macintosh a NetWare (vsechno nejen klient, ale take server!!!).
Nekomu se to muze hodit, protoze muze mit klidne jeste stare Windowsy...
Neumi Linux, to je fakt, ale to me mrzi ze vseho nejmene.
[Martin] No, tak to umi spoustu platforem, ale ukaz mi _rozumneho_ cloveka, ktery ma dneska NetWare???????
Znam nekolik _zarytych_ NW-lidi, kteri potichu presli na NT, a predtim by se nechali upalit, kdyz jim nekdo sahnul na NW :-)))


> v jedne cene (jedno spolecne inst. CD)

Ano, Sybase SQL Anywhere take, je jedno instalacni CD a z toho si
nainstalujes bud Server + Remote + Client nebo Standalone nebo
Standalone + Remote. To je zaklad za asi 12 tisic. Dalsi klienty
nebo standalony musis dokupovat. Samozrejme si vyberes platformu,
kterou chces instalovat.

> Cena je tez zajimava: (orientacne)
> Lokalni Interbase = 5 850,-
> Interbase server = 13 530,- Kc
> Licence 1 user = 6 600,- Kc
> 10 user = 55 000,- Kc a pod.
> Pocitaji se samozrejme soucasne pripojeni uzivatele.
> A protoze v mnoha firmach malokdy pracuje soucasne vice jak 10 lidi,
> bohate staci tato alternativa i pro dost velke firmy.

Ano, to je pravda.

> Co je vsak zajimavejsi? pokud prodavate zakaznikum,
> nemusi zakaznik kupovat server, ale jenom licence = papirky.
> Instalaci provede dodavatel, ktery koupi server jednou pro sve zakazniky.
> Var partnersvi je tez mozne a muzete se dostat az asi na 2.500 Kc
> za licenci. Nejmensi balik je asi 20 licenci a je pri tom zajisten bezplatny
> upgrade po dobu 1 rok.

Takze u Interbase uz to take funguje? U Sybase SQL Anywhere to samozrejme
je take, jmenuje se to GOLD DISK. Koupis si instalaci CD, dostanes k tomu
disketu a chodis instalovat. Na diskete se ti odecitaji licence...

> Verze 4.2 je pro Linux zadara.

Ano, to vim, ale to me netrapi, protoze Linux je neco, co neuznavam...

[Martin] to je skoda, pro mnoho lidi to znamena velke plus - koupi jenom HW, a Linux i IB dostanou zdarma...
ja tedy Linux neznam (nemam zkusenosti) ale zda se to byt dobry system.

> Pouzivam Interbasi 1 rok a uz jsem odvyknul od neustalych problemu

Ty problemy znam.

> se zakazniky. Myslel jsem si tez ze zacatku, ze ztratime hodne zakazniku
> kvuli cene, ale nestalo se tak. Mozna jich vice ziskate z okruhu
> vetsich firem, kteri pozaduji profesionalni pristup, nez tech,
> kteri od vas odejdou. Cim dal vice jsou zakaznici ochotni zaplatit
> spolehlivost. Maloktery sef je ochoten platit lidi, kteri delaji dvakrat
> jednu praci nebo cekaji az nekdo prijede obnovit data. O nervozite

Ano, to je pravda.

> kolem takovych pripadu ani nemluve. Podle zakonu schvalnosti se to
> po... (poroucha, ze .... jsme na pinknetu) zrovna kdyz je napr.
> uzaverka.

Jo, presne tak, mam take takove zakazniky, kteri maji obcas problem,
protoze jedou na tabulkach - jenze to jsou setrilkove...
[Martin]
nemusi to byt jen setrilkove, ja proste nemam penize, tak si to nemuzu koupit. A tito lide na tom jsou presne takhle.
Ja jsem se
rozhodl, ze takove vetsi aplikace jiz rozhodne budu delat jen na
SQL, protoze jinak jsou desne problemy.

[Martin] mozna tim prijdes o nektere zakazniky...

S pozdravem
Petr Zahradnik, pocitacovy expert


DLL

[*] psoft <psoft(zv)kosice.telecom.sk> - 17.5.1998 17:19:53

>
> > Nevite nekdo jestli existuje nejaky program na zobrazeni funkci v DLL
> > [neco jako depends] vcetne typu vstupnich a vystupnich parametru s
> > moznosti pripadne jeste zobrazit danou funkci v assembleru?
> >
> Jedine nejakej Sourcer. Ja jsem kdysi pouzival Sourcer od fy. v
> communications, inc. v6.09, ale ten bezel pod dosem a vyuzival expanded
> memory. Kde sou ty casy.
>

Len tak mimochodom, aj ja som pouzival Sourcer, super vec. Nedavno
som videl reklamu na jeho novu verziu, dokaze hadam vsetko, je urcena
pre Windows. Ma jedinu chybu - stoji mam pocit okolo 15000-20000 Ck.


> ''''
> (O O)
> +-------------oOO------(_)--------------------+
> | PSOFT, ing.Peter Cirip |
> | Sibirska 18, 080 01 Presov, Slovensko |
> | Mobil : 0903 601 068 091/723 104 |
> | E-mail: psoft(zv)ke.telecom.sk |
> | WEB : http://www.ke.telecom.sk/psoft/ |
> +-------------------------------oOO-----------+
> |__|__|
> || ||
> ooO Ooo
>

Telnet

[*] psoft <psoft(zv)kosice.telecom.sk> - 17.5.1998 17:19:53

> pred casem jsem otravoval s radou stran napsani jednoducheho telnetu v
> Delphi. Musim priznat, ze jsem se k zadnemu vysledku, ktery by se
> telnetu, alespon vzdalene podobal nedostal.
>
> Mohl by mi nekdo prosim osvetlit tuto problematiku ?

Len tak mimochom, nedavno bola v PC REVUE seria clankov presne o tom,
aj so vzorom programov. Mozno to budu mat na www.pcrevue.sk 9alebo
www.pc-revue.sk ?)

> ''''
> (O O)
> +-------------oOO------(_)--------------------+
> | PSOFT, ing.Peter Cirip |
> | Sibirska 18, 080 01 Presov, Slovensko |
> | Mobil : 0903 601 068 091/723 104 |
> | E-mail: psoft(zv)ke.telecom.sk |
> | WEB : http://www.ke.telecom.sk/psoft/ |
> +-------------------------------oOO-----------+
> |__|__|
> || ||
> ooO Ooo
>

Delphi Forum...

[*] Burger Tom� <tomasb(zv)manwe.mius(tec)cz> - 17.5.1998 18:01:05

Mili Delfini,
mam pro vas spoustu novinek na Delphi Foru (http://delphi.mius(tec)cz/)...:
1. trosku jsem predelal design (hlavne ty buttonky)
2. udelal jsem prihlasovaci i odhlasovaci formular (funguje - oba jsem
je vyzkousel, v opacnem poradi, ovsemze...)
3. k jedne vybrane zprave je mozne dohledat vsechny ostatni se stejnym
subjektem
4. pripravil jsem si cestu k download centru... Cekam jen na uvolneni
mista na serveru - doufam, ze radove ve dnech...
5. a hlavne: ve spolupraci s Borland CZ (nebo uz Inprise...?) jsme
rozbehli Delphi Forum na nove (a logicke) adrese http://www.delphi(tec)cz/.

Co dale planuju:
1. moznost vyzadat digest (souhrn zprav za urcite obdobi...)
2. expandovat seznam odkazu
3. moznost jednotlive odkazy glosovat
4. a samozrejme download centrum...

Toz uzivejte, testujte (krome odhlasovani, ovsemze...), pripominkujte
(muj mail znate...)
Krasny den a mene a mene problemu pri programovani Vam preje
Tomas Burger

-----------------------------------------------------
Tomas.Burger(zv)mius(tec)cz
Tomas.Burger(zv)sms.paegas(tec)cz
http://www.mius(tec)cz/; http://www.teplice(tec)cz/
http://delphi.mius(tec)cz/; http://www.sever(tec)cz/
icq: 3908757
-----------------------------------------------------

VarArray

[*] Michal Maga <maga(zv)frru.utcru.sk> - 17.5.1998 19:26:14

Zdravim ludkovia a ine prisery :-).

Idem rovno k veci.

Pri OLE Automation pouzivam na prenost dat medzi pocitacmi datovy typ inac
nazyvany aj VarArray.
Vytvaram normalne, cez CreateVarArray, redimenzujem, proste robim s nim
rozne prapodivno-uchvatnosti, ale co s nim nedokazem spravit, je _ZRUSIT_
ho. V helpe som nic nenasiel, takze programatori tadte: AKO ZRUSIT
VARARRAY?

Magic.

==============================================================================
mailto://maga(zv)frru.utcru.sk pmail to:
or to://m.maga(zv)usa.net Michal Maga
http: //www.utcru.sk/~maga Janovcikova 808
phone: 00421-848-25807 034 95 Likavka
fax: 00421-848-26733 (write my name on) Slovakia
ICQ: 10111671

Dominus pascit me, nihil mihi deest.
(Ps.23)
==============================================================================

Databazy a aplikacie

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 17.5.1998 20:37:32

> [Martin] No, tak to umi spoustu platforem, ale ukaz mi _rozumneho_ cloveka, ktery ma dneska
> NetWare??????? Znam nekolik _zarytych_ NW-lidi, kteri potichu presli na NT, a predtim by se
> nechali upalit, kdyz jim nekdo sahnul na NW :-)))

No pockej, to bych ti mohl rici, abys mi ukazal rozumneho cloveka, ktery
ma Linux... Ver mi, ze znam minimalne jednoho, co ma a opravdu vyuziva
NetWare server. Ale tohle je o necem jinem. Pochop - treba tento clovek
ma ted sit NetWare a stanice ma DOS, Windows 3.1, Windows 95 i Windows NT.
Takze na server muze okamzite hodit Sybase SQL Anywhere. To je obrovska
vyhoda, protoze on ted nemusi rychle menit reseni cele site, prida se
SQL server na server a pokracuje se, jedou stare i nove aplikace. Udela
se treba nejaky 32-bitovy informacni system bezici na Windows 95 a NT,
to se posadi na jeho stanice. Dale se na ty DOS stanice muze nasadit
treba nejaky jednoduchy program pro sber dat, ktery pristupuje normalne
na SQL Anywhere na NetWare serveru. A ted prave v tom je ta pointa,
jakmile se rozhodne, ze NetWare zahodi do kose a nebude uz na nej
vazan, tak tam misto NetWare hodi treba Windows NT server a pouziva
stale stejnou databazi, jede proste dal. To jsem chtel rici, ze toto je
velka vyhoda, kdyz neco podporuje vice platform - nejprve mas jedno
reseni a potrebujes se mu prizpusobit, ale pak rostes - pridavas stanice,
menis server apod. Kdyz ma ten NetWare server a bude kupovat SQL server,
ktery jede jen na NT, tak si bude muset od zacatku poridit NT server,
coz treba zrovna pro nej znamena investici nekolika desitek tisic,
ktere zrovna nema a nebo nechce investovat. Treba ani nevi, jestli se
mu to vyplati, ale casem si jiny pocitac poridi a muze to tam okamzite hodit.

> > Verze 4.2 je pro Linux zadara.
>
> Ano, to vim, ale to me netrapi, protoze Linux je neco, co neuznavam...
>
> [Martin] to je skoda, pro mnoho lidi to znamena velke plus - koupi jenom HW, a Linux i IB
> dostanou zdarma... ja tedy Linux neznam (nemam zkusenosti) ale zda se to byt dobry system.

Muj osobni pohled na Linux je asi jako pohled na neco, co si porizuji
programatori na hrani. Ale toto je muj osobni nazor.

> Jo, presne tak, mam take takove zakazniky, kteri maji obcas problem,
> protoze jedou na tabulkach - jenze to jsou setrilkove...
> [Martin]
> nemusi to byt jen setrilkove, ja proste nemam penize, tak si to nemuzu koupit. A tito lide na tom

Ja nemluvil o tobe, ale o zakaznicich, ktere znam. A nekteri jsou
opravdu setrilkove...

> jsou presne takhle. Ja jsem se rozhodl, ze takove vetsi aplikace jiz rozhodne budu delat jen na
> SQL, protoze jinak jsou desne problemy.
>
> [Martin] mozna tim prijdes o nektere zakazniky...

Ano, to je mozne, nicmene kdyz musim kazdych 14 dni poslouchat
reci techto zakazniku, ze zase museli obnovit den starou zalohu,
tak se to vyplati...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Databazy a aplikacie

[*] �ke��k Jaroslav�������6�����̿ - 18.5.1998 02:14:28

Pises, ze Sybase SQL Anywhere ma slusnou replikaci. Umoznuje to
i po Internetu?. U Interbase to je opravdu s replikaci slabsi.
Jaro


Instalace BDE

[*] Michael RUBI'N <rum(zv)brailcom(tec)cz> - 18.5.1998 04:35:38

Vazeni vestci:
Pouzivam vestirnu 2.0 a potrebuji vyresit nasledujici problem:
Jak nainstalovat a nakonfigurovat BDE automaticky, tedy
jako soucast instalacni procedury aplikace. Aby uzivatel
nemusel rucne nastavovat umisteni database, pripadne
dalsi parametry. Proste jen nainstalovat a zacit pouzivat.
Kde je to zdokumentovano?

Diky a

Zdravim.
Michael R.
(rum(zv)brailcom(tec)cz)

RichEdit

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 18.5.1998 07:40:21

Zdravim Delfiny,

jak skocit v TRichEditu na urcity radek?
Dekuji.

S pozdravem

Libor Krayzel
Czech Television, Television Studio Ostrava
Dvorakova 18
729 20 Ostrava

Phone: (069) 6201 375
E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> Homepage: http://members.tripod.com/~sovtop
> Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> E-mail2: mailto:sovtop(zv)email(tec)cz
>
>

Databazy a aplikacie

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 18.5.1998 07:41:56


> >Zarucit to nejde. Doporucit se da toto:
> >1. zalohovat
> >2. obcas (nejlepe pred zalohovanim) pouzit DbiRegenIndexes(...)
>
> trebars napriklad ze pred kazdym spustenim?
>
> >>
> >> * aka existuje alternativa k Paradoxu a ake ma vyhody
> > MSAccess 97. Mam s ni lepsi zkusenosti v sitovem provozu nez
> >PDOX. Ikdyz musim priznat, ze u zakaznika se mi stalo, ze po vypadku
> >proudu jsem musel spustit Access 97 a provest rekonstrukci.
> > Co se tyce ceny, tak je potreba jen DAO, ktere je soucasti
> >MSOffice 97.
>
>
> ok, co by som si musel kupit ja a co zakaznik pouzivajuci moj
> program?!?
> Pokial viem tak DAO by ani nemalo byt moc potrebne, ved BDE ma vlastne
> ovladace alebo nie? Alebo nieco zase pletiem ... :-)))
>
BDE sice ma vlastni ovladace nazyvane IDAPI, ale do Accessu
nepristupuji primo pres "file access", ale pres standardizovane rozhrani
DAO 3.0, 3.2 nebo 3.5. Takze architektura je takovato:
BDE->IDAPI->DAO->file.mdb
Co se tyce license na DAO, tak pokud mate DAOSDK, tak mate
license pro Vas i pro Vase zakazniky. Soucasti DAOSDK je i navod jak
generovat DAO instalacky.

J.Jahoda

> richard willmann


VarArray

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 18.5.1998 07:46:02


> Zdravim ludkovia a ine prisery :-).
>
> Idem rovno k veci.
>
> Pri OLE Automation pouzivam na prenost dat medzi pocitacmi datovy typ
> inac
> nazyvany aj VarArray.
> Vytvaram normalne, cez CreateVarArray, redimenzujem, proste robim s
> nim
> rozne prapodivno-uchvatnosti, ale co s nim nedokazem spravit, je
> _ZRUSIT_
> ho. V helpe som nic nenasiel, takze programatori tadte: AKO ZRUSIT
> VARARRAY?
>
Pokud vim, tak VarArray je subtyp od Variant a ten se rusi pres
VariantClear, ale ten se vola automaticky po ukonceni procedury ci
programu.

Long Stringy, Variant, OLE interface se inicializuji a rusi v
delphi automaticky.

J.Jahoda

> Magic.
>
> ======================================================================
> ========
> mailto://maga(zv)frru.utcru.sk pmail to:
> or to://m.maga(zv)usa.net Michal Maga
> http: //www.utcru.sk/~maga Janovcikova 808
> phone: 00421-848-25807 034 95 Likavka
> fax: 00421-848-26733 (write my name on) Slovakia
> ICQ: 10111671
>
> Dominus pascit me, nihil mihi deest.
> (Ps.23)
> ======================================================================
> ========
>

Instalace BDE

[*] �ke��k Jaroslav�������6�����̿ - 18.5.1998 08:34:19

Pouzij InstalShield
Pro instalaci BDE je tam pruvodce.
Jaro.>Vazeni vestci:
>Pouzivam vestirnu 2.0 a potrebuji vyresit nasledujici problem:
>Jak nainstalovat a nakonfigurovat BDE automaticky, tedy
>jako soucast instalacni procedury aplikace. Aby uzivatel
>nemusel rucne nastavovat umisteni database, pripadne
>dalsi parametry. Proste jen nainstalovat a zacit pouzivat.
>Kde je to zdokumentovano?
>
>Diky a
>
>Zdravim.
>Michael R.
>(rum(zv)brailcom(tec)cz)

IP adresa

[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 18.5.1998 08:37:13

Peter Rus wrote:
>
> Ahoj Delfici,
>
> neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
> adresu ??
>
> Diky za pomoc,
>
> Peter
> peterrus(zv)intesys(tec)cz


To se da najit v registrech -
Hkey_local_machine\System\CurrentSet\Services\Class\NetTrans\.
Problem asi bude s dynamickou adresou.

Zkus se zeptat v konferenci tcpip na listserv(zv)list.vslib(tec)cz


--
Ing. Jindrich Danihelka
E-Mail jidas(zv)mbox.vol(tec)cz
Tel. 038/57805
038/7512861


Drobny dotaz na resource texty

[*] Petr Studeny <studeny(zv)olympo(tec)cz> - 18.5.1998 08:48:47


Poradi mi nekdo s nasledujicim problemem ?

Pomoci Wokshopu jsem se pokousel prelozit par anglickych textu v
knihovne do cestiny ale po puziti programem se mi texty nezobrazuji
dobre cesky. Nevi nekdo kde muze byt chyba.

Diky

Text Editor pro TDBRichEdit

[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 18.5.1998 08:49:18

Martin Kubecka wrote:
>
> Abych to upresnil, jde mi o toto:
>
> cislo 756 vypsat jako "sedmsetpadesatsest" ;)
>
> Martin
>
> > Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
> > vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
> > volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
> > daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....


Ja to mam. Jestli chces, napis na muj mail, poslu ti to.


--
Ing. Jindrich Danihelka
E-Mail jidas(zv)mbox.vol(tec)cz
Tel. 038/57805
038/7512861


Ako pouzit Vxd ???

[*] Bielik Marian <bielik(zv)basl.sk> - 18.5.1998 08:58:41

Nazdar delfini !

Moze mi niekto poradit ako pouzit Vxd v D3.

Otvoril som subor prostrednicvom CreateFile a pokusil som sa definovat
funkciu
ktoru potrebujem zavolat.

VOLANA_FUNKCIA = function:integer;

var
funkcia:VOLANA_FUNKCIA;
Handle:THandle;
begin
Handle:=LoadLibrary('NAZOV.VXD');
if (Handle = NULL) then showmessage('Chyba loadlibrary ');
(zv)funkcia:=GetProcAddress(Handle,'VOLANA_FUNKCIA');

Akonahle sa pokusim zavolat "funkciu" tak to spadne s hlaskou

...EAccessViolation with message'Access violation at address 00000007.
Read off address FFFFFFFF...

Vdaka za kazdu radu.

Marian


Text Editor pro TDBRichEdit

[*] Ondrej Kelle <Kelleon(zv)nnsk.sk> - 18.5.1998 09:04:11

Ahoj, nahodou to vyplnovanie zlozeniek mam: Budes si to ale musiet
prelozit :).
Zaroven sa ospravedlnujem za diakritiku... :)

function _SayNumber(Number : Longint) : String;
begin
case Number of
0 : Result := '';
1 : Result := 'jeden';
2 : Result := 'dva';
3 : Result := 'tri';
4 : Result := '�tyri';
5 : Result := 'p�t';
6 : Result := '�est';
7 : Result := 'sedem';
8 : Result := 'osem';
9 : Result := 'dev�t';
10 : Result := 'desat';
11 : Result := 'jeden�st';
12 : Result := 'dvan�st';
13 : Result := 'trin�st';
14 : Result := '�trn�st';
15 : Result := 'p�tn�st';
16 : Result := '�estn�st';
17 : Result := 'sedemn�st';
18 : Result := 'osemn�st';
19 : Result := 'dev�tn�st';
20..29 : Result := 'dvadsat' + _SayNumber(Number - 20);
30..39 : Result := 'tridsat' + _SayNumber(Number - 30);
40..49 : Result := '�tyridsat' + _SayNumber(Number - 40);
50..59 : Result := 'p�tdesiat' + _SayNumber(Number - 50);
60..69 : Result := '�estdesiat' + _SayNumber(Number - 60);
70..79 : Result := 'sedemdesiat' + _SayNumber(Number - 70);
80..89 : Result := 'osemdesiat' + _SayNumber(Number - 80);
90..99 : Result := 'dev�tdesiat' + _SayNumber(Number - 90);
100..199 : Result := 'sto' + _SayNumber(Number - 100);
200..299 : Result := 'dvesto' + _SayNumber(Number - 200);
300..999 : Result := _SayNumber(Number div 100) + 'sto' +
_SayNumber(Number mod 100);
1000..1999 : Result := 'tis�c' + _SayNumber(Number mod 1000);
2000..2999 : Result := 'dvetis�c' + _SayNumber(Number mod 1000);
3000..999999 : Result := _SayNumber(Number div 1000) + 'tis�c' +
_SayNumber(Number mod 1000);
1000000..1999999 : Result := 'mili�n' + _SayNumber(Number - 1000000);
2000000..4999999 : Result := _SayNumber(Number div 1000000) +
'mili�ny' +
_SayNumber(Number mod 1000000);
5000000..999999999 : Result := _SayNumber(Number div 1000000) +
'mili�nov' +
_SayNumber(Number mod 1000000);
1000000000..1999999999 : Result := 'miliarda' + _SayNumber(Number -
1000000000);
else
Result := 'stra�n� suma';
end;
end;

Ondrej Kelle
it(zv)nnsk.sk

> -----Original Message-----
> From: Martin Kubecka [SMTP:martin.kubecka(zv)dytron(tec)cz]
> Sent: 15. m�j 1998 17:17
> To: DELPHI Distribution List
> Subject: Text Editor pro TDBRichEdit
>
> Nevite nekdo o nejakem textovem editoru (free with source) pro
> TDBRichEdit resp TRichEdit ??? V examples k Delphi neco sice je, ale
> rad
> bych tam mel i dalsi funkce a jsem strasne liny to programovat ;-).
>
> Aneb pokud uz to nekde je a je to free proc to zkratka nepouzit
> (upravit, prizpusobit a lecos se treba i naucit).
>
> Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
> vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a
> ve
> volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
> daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....
>
> Dik za kazdou reakci ;)
>
> Martin Kubecka


problEm transakce_s_tabulkami_paradox

[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 18.5.1998 09:05:41


-----P�vodn� zpr�va-----
Od: Marek Prokop [SMTP:prokopsw(zv)czn(tec)cz]
Odesl�no: 14. kv�tna 1998 13:19
Komu: 'DELPHI Distribution List'
P�edm�t: RE: =?WINDOWS-1250?Q?probl=E9m=3A transakce s tabulkami paradox3D

Podle nasich experimentu neni RollBack aplikovany na paradoxove tabulky
schopen vratit operace delete a insert. Pouze update. Navic je zde omezeni
na max. 255 zmenenych zaznamu v jedne transakci.
Marek Prokop


[] Dovolil bych si oponovat. Pro Paradox/BDE 4.51 Rollback vraci jak
operaci Delete tak i Insert. Zkusil jsem Rollback pro 10020 operaci Delete,
chvilku to trvalo, ale RollBack se provedl. Maximum 255 pro operace Insert a Update
vyplyva asi z omezeni na max. pocet pocet soucasne uzamcenych zaznamu v tabulce.
Kdy, resp. s jakou verzi BDE, jste to provadeli?

Milos Skacel

TTable ztraci 352 bajtu

[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 18.5.1998 09:05:08


Zajimalo by mne jak se tenhle priklad chova pri opakovanem
Click-nuti. Pokud i po druhem treti ci dvacatem Click-nuti to neuvolnuje
352 bajtu neboli celkem 20x 352 uz chybi, tak pak neni chyba v DB, ale v
DBTABLES.

[] Pri opakovanem provadeni je jiz leak=0. A celkova bilance programu
je take vyrovnana. Side-efekt v db/dbtables jsem si neuvedomil. Diky za
vysvetleni.
Nicmene stale zustava otevrena otazka 12 bajtu z mailu
Alokovana pamet, pokracovani ...., kdy zalezi na hodnote v string promenne
v DPR souboru.

Milos Skacel

Instalace BDE

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.5.1998 09:08:19

> Pouzivam vestirnu 2.0 a potrebuji vyresit nasledujici problem:
> Jak nainstalovat a nakonfigurovat BDE automaticky, tedy
> jako soucast instalacni procedury aplikace. Aby uzivatel
> nemusel rucne nastavovat umisteni database, pripadne
> dalsi parametry. Proste jen nainstalovat a zacit pouzivat.
> Kde je to zdokumentovano?

Zalezi na tom, jake mas Delphi. Idealni je pouzit rozumny instalacni
program, ktery to jiz umi. Nicmene instalace sestava z nekolika
elementarnich casti - nakopirovani vhodnych souboru, zvyseni pouziti
DLL a BLL, registrace BDE (zapis do registru a zvyseni pouziti BDE),
registrace BLL (zapis do registru), inicializace BDE pomoci BDE API,
nastaveni konfigurace driveru a prostredi pomoci BDE API, pridani
aliasu pomoci BDE API. Hotovo...

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Databazy a aplikacie

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.5.1998 09:08:19

> Pises, ze Sybase SQL Anywhere ma slusnou replikaci. Umoznuje to
> i po Internetu?. U Interbase to je opravdu s replikaci slabsi.

Ano, umoznuje hromadu moznosti aktualizace. Posila soubory aktualizace,
coz jsou soubory se zmenami, jeden posle druhemu, ten si ho precte
a posle odpoved a tu zase precte ten prvni... Umi replikovat pomoci
souboru - dava je urcite misto v siti, pripadne je muzes prenaset
treba na diskete. Pak umi replikovat pomoci MAPI - pouzivas-li MAPI,
umi si posilat zpravy timto zpusobem, at uz po siti, intranetu nebo
Internetu. Take umi replikovat primo pomoci SMTP protokolu, posila
zpravy primo na Internet. A take to umi pomoci FTP, zase posila
primo na server do FTP serveru. A nakonec jeste neco s Lotusem. Takze
moznosti je opravdu mnoho.

Vypada to tak, ze mas hlavni databazi, majitel je publisher. Pak si
tam pridas replikacniho uzivatele, nastavis mu, co se mu ma replikovat,
tedy jake tabulky, prip. jake sloupce tabulek, jakym protokolem
a jakym zpusobem (jen jednim smerem nebo obema apod.). Vygenerujes
pro nej databazi a tu mu nahrajes. Pak uz staci vzdy jen spustit
tady nebo tam replikaci, pripadne se muze nastavit replikace
automaticky treba na 20:00 hodin. Samozrejme databaze muze mit
nekolik replikaci.

S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Jezkova 12, 400 11 Usti nad Labem ===
=== Telefon, fax: 047-5501627, mobilni GSM: 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Telnet, ...

[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 18.5.1998 09:40:59


Velice dobre komponenty vcetne TELNETu {klient} a SNMP {clilent / manager} nabizi firma Dart Communications {http://www.dart.com}. Najdete zde balicek PowerTCP ktery obsahuje FTP, POP3, SMTP, TCP, SNMP, Telnet, TFTP, VT, HTTP. S Telnetem se pracuje dobre. Bohuzel je to komercni vec, ale da se to testovat - pri trial verzi se objevuje okenko, ktere upozorbuje na trial licenci. Po obdrzeni se licence doplni a uz nebude otravovat (snad). Licence by mela stat asi $598,- (3.0, nyni je uz verze 4.0). Pokud nechcete vyplnovat registracni formular a nechcete aby vas nekdo kazdy tyden otravoval jestli uz jste se rozhodli tento produkt zakoupit, tak si muzete stahnout tuto trial verzi {ftp://www.dart.com/pub/powertcp/pt4-105t.exe}.

Zde je maly vynatek:
{
VCLs
PowerTCP provides VCLs for these protocols:
+FTP: The File Transfer Protocol VCL transfers files to/from FTP servers, and includes firewall support.
+Telnet: The Telnet VCL supports client functionality with option negotiation.
+POP3: The Post Office Protocol VCL retrieves mail from any POP3 server, decoding UUENCODE and MIME attachments on the fly.
+TFTP: The Trivial File Transfer Protocol VCL supports both client and server functionality. Can be used to serve files to network booting devices.
+SMTP: The Simple Mail Transfer Protocol VCL sends mail, encoding UUENCODE and MIME attachments.
+UDP: The User Datagram Protocol VCL is used for sending and receiving simple data packets.
+TCP: The Transmission Control Protocol VCL supports client and server operations.
+VT: The VT VCL implements VT 320/220/100/52 emulation. Screen-scraping is supported.
+SNMP: The Simple Network Management Protocol (1.0) VCL implements manager and agent functionality.
+HTTP: The Hypertext Transfer Protocol control supports client functionality for HTTP versions 1.0 and 1.1.
Toolkits include templates with Pascal source code for a VT320 emulator, SMTP and POP3 (with attachments), FTP, REXEC, RLOGIN, RSH, ECHO, DISCARD, TIME, SNMP agent and manager, TFTP client and server, and an ECHO server.
}

-----P�vodn� zpr�va-----
Od: Lukes V�clav [SMTP:lukes(zv)msm.pvt(tec)cz]
Odesl�no: 15. kv�tna 1998 15:26
Komu: 'delphi(zv)pinknet(tec)cz'
P�edm�t: Telnet


Ahoj,

pred casem jsem otravoval s radou stran napsani jednoducheho telnetu v
Delphi. Musim priznat, ze jsem se k zadnemu vysledku, ktery by se
telnetu, alespon vzdalene podobal nedostal.

Mohl by mi nekdo prosim osvetlit tuto problematiku ?

Diky

Vasek

PS: Preji pekny vikend.

IP adresa

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.5.1998 09:40:52

>neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
>adresu ??


pokud Ti jde o IP adresu jiz navazaneho spojeni, muzes pouzit fce
GetSockName (na sockety v connected stavu).

Pokud chces znat lokalni IP adresu jeste pred navazanim
spojeni/bindovanim socketu je to horsi, protoze v PC muze IP interfacu
byt vice. Lze pouzit funkci GetHostByName, ktera vraci pointer na seznam
IP existujicich v PC. Ovsem program stejne zpravidla neni schopen sam
rozhodnout na jake IP ze seznamu ma provest bind, takze je nutne
napriklad pomoci cfg programu urcit k jakemu interfacu/IP ma byt socket
nabindovan.

Ve vetsine pripadu je sockety pro prijem spojeni lepsi bindovat na
INADDR_ANY a nechat TCP subsystem at pri spojeni rozhodne jakou IP
socket dostane.

Zdravi
D. Toman

Local SQL na velku indexovanu paradox tabulku

[*] Rychetsk� Pavel PharmDr <rychetskyp(zv)mpsv(tec)cz> - 18.5.1998 09:43:40

>> select * from
>> ( select * from stars
>> where alfa between :AlfaMin and :AlfaMax
>> )
>> where delta between :DeltaMin and :DeltaMax
>>
>> Je to jenom napad, ale treba nekdo poradi zda to jde.
>
>Dakujem, neskusal som, ci to takto ide. Problem nie je az tak celkom
>v tom, ako to urobit, ako skor urobit to tak, aby to bolo rychle.
>Ono totiz na obe premenne mam osobitny index, ale podla Alfa to hlada
>rychlo (lebo podla toho je tabulka fyzicky zotriedena) a podla Delta
>strasne pomaly, hoci tam mam ten index. Skoro mi pripdada, ze to
>hadam hlada sekvencne. Ide skor o to, ako prinutit BDE pouzivat
>obidva indexy.

obavam se, ze toto BDE nezvladne
zkusil bych vytvorit sekundarni index (udrzovany), ktery zahrne _obe_
polozky
soucasne potvrzuji, co tady jiz zaznelo, ze misto between je jistejsi
pouzivat
mensi nez Max AND vetsi nez Min

Pavel Rychetsky


Text Editor pro TDBRichEdit

[*] Martin Kubecka <martin.kubecka(zv)dytron(tec)cz> - 18.5.1998 09:45:37

Diky vsem! Procedurku na vypsani cisla slovy uz mam diky Honzovi
Naiserovi.

Ted kdyby se jeste nasel ten textovy editor ;-)))

Mac

> > > vypise cislo jako text.

> Ja to mam. Jestli chces, napis na muj mail, poslu ti to.
>
> --
> Ing. Jindrich Danihelka
> E-Mail jidas(zv)mbox.vol(tec)cz
> Tel. 038/57805
> 038/7512861


IP adresa

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 18.5.1998 09:51:08

> Ahoj Delfici,
>
> neexistuje nejaka API fce, ktera by mi prozradila moji soucasnou IP
> adresu ??

Mohlo by to jit treba takhle :

uses Winsock;

function LocalIP : string;
type
TaPInAddr = array [0..10] of PInAddr;
PaPInAddr = ^TaPInAddr;
var
phe : PHostEnt;
pptr : PaPInAddr;
Buffer : array [0..63] of char;
I : Integer;
GInitData : TWSADATA;
begin
WSAStartup($101, GInitData);
Result := '';
GetHostName(Buffer, SizeOf(Buffer));
phe :=GetHostByName(buffer);
if phe = nil then Exit;
pptr := PaPInAddr(Phe^.h_addr_list);
I := 0;
while pptr^[I] <> nil do begin
result:=StrPas(inet_ntoa(pptr^[I]^));
Inc(I);
end;
WSACleanup;
end;

Drobny dotaz na resource texty

[*] Ing. Jahoda Jaroslav <Jaroslav.Jahoda(zv)lesprojekt(tec)cz> - 18.5.1998 09:54:43



> Poradi mi nekdo s nasledujicim problemem ?
>
> Pomoci Wokshopu jsem se pokousel prelozit par anglickych textu v
> knihovne do cestiny ale po puziti programem se mi texty nezobrazuji
> dobre cesky. Nevi nekdo kde muze byt chyba.
>
Co to je dobre cesky? Pokud se nezobrazuji pismena jako
vv
zr atd.

ale
,,
ae se zobrazuji dobre

Tak bych to nastaveni kodove stranky pro fonty (char set). Musi
se pouzivat CharSet=238 neboli Central European

J.Jahoda

> Diky
>

VarArray

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 18.5.1998 10:15:29

Hi,

Coz takhle priradit poli hodnotu Unassigned nebo pouzit varClear ?

-----P�vodn� zpr�va-----
>Pri OLE Automation pouzivam na prenost dat medzi pocitacmi datovy typ inac
>nazyvany aj VarArray.
>Vytvaram normalne, cez CreateVarArray, redimenzujem, proste robim s nim
>rozne prapodivno-uchvatnosti, ale co s nim nedokazem spravit, je _ZRUSIT_
>ho. V helpe som nic nenasiel, takze programatori tadte: AKO ZRUSIT
>VARARRAY?

Text Editor pro TDBRichEdit

[*] Stepan Cerny <chaosz(zv)geocities(tec)com> - 18.5.1998 10:38:43

[P��loha v souboru: CastkaSlovy.pas]
Cao,

posilam ti fci, kterou delal muj kamarad, je to delane presne na slozenky,
tzn. prevod cisla na "Castku slovy".
Delal to podle meho puvodniho zdrojaku z FoxPro, kde byla omezena velikost
castky na 9999,99 Kc, nevim jestli to udelal i na vetsi castky ... to ale asi
zjistis sam :-)

Packo Stepan


Martin Kubecka wrote:

> Abych to upresnil, jde mi o toto:
>
> cislo 756 vypsat jako "sedmsetpadesatsest" ;)
>
> Martin
>
> > Ted me jeste napada, nemate nekdo napsanou nejakou procedurku, ktera
> > vypise cislo jako text. Strasne me totiz nebavi vyplnovani slozenek a ve
> > volne chvilce (vyhledove tak do pul roku ;) chci neco spachat. Kdysi
> > daaaavno sem to uz delal jeste v TP, ale zdrojak je v nenavratnu....

Databaze a aplikace, Paradox

[*] tomas.mazurek(zv)vitkovice(tec)cz - 18.5.1998 10:42:32

Dobry den,

jiz delsi dobu se zde diskuje o spolehlivosti rel. databaze Paradox.
Pripojuji svou cca 8 az 9-ti letou zkusenost s timto systemem. Ta
zahrnuje samozrejme i DOSovskou platformu. Dle meho nazoru je Paradox
velmi zavisly na vnejsich podminkach sveho fungovani. Mam zde namysli
zejmena vypadky el. proudu a vypadky OS.

Pokud srovnavam platformy, tj. DOS, Win16 a Win32, nejhure je na tom
Win16. U DOSu nastavaly zavaznejsi problemy pouze pri vypadku proudu,
coz se da osetrit levnejsimi ci drazsimi UPS. Nejvice problemu mame s
aplikacemi pro Win16. Nemyslim, ze bych psal az tak spatne aplikace,
ale potreba obnovovat tabulky pomoci TUTILITY.DLL je znacna... U
Win32 a Paradoxu pro tuto platformu je problemu radove mnohem mene.

S BDE 2.52 pro Win16 se vaze i dalsi problem a to spatne trideni
sekundarnich indexu (852, 867 i Pdox Ansi Czech) po pouziti nekterych
fci BDE, napr. pakovani tabulky ci regenerace indexu.

Jinak je treba uznat, ze Paradox ma spoustu skvelych vlastnosti,
napr. validace, ref. integrita, heslovani. A to vse na urovni
tabulky.

Dle meho nazoru, pokud nekdo uvazuje o odchodu z Paradoxu, ma smysl
uvazovat pouze o SQL databazich, osobne bych daval prednost Oracle ci
pripadne InterBase.

S pozdravem

tomas.mazurek(zv)vitkovice(tec)cz


IP adresa

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 18.5.1998 10:47:34

Pokud pouzivas dynamickou IP adresu je to trochu slozitejsi zvlaste kdyz jsi
pripojeny napr. pres proxyserver na lokalni siti (tvuj pocitac pak pouziva 2
IP adresy jednu ti prideluje lokalni server a druhou provider)
(tzv.multihomed network). Jako zdrojova adresa se pouzije tvoje IP adresa,
podle toho kam se pripojis. Winsock umoznuje tuto adresu zjistit po
naconnectovani na prislusny server pomoci funkce
problem je v tom ze musis zadat socket, coz by nemel byt problem pokud
pouzivas pro napojeni svuj program. Dalsi alternativou by bylo napojit se na
nejaky server treba na port 80 http a potom ze socketu precist IP adresu
pomoci teto funkce a odpojit se - tim ziskas svou aktualni dynamickou IP
adresu:

function TSockets.GetIPAddr(aSocket: TSocket): string;
var
addr: TSockAddrIn;
addrlen: integer;
szIPAddr: PChar;
begin
addrlen := sizeof(addr);
getsockname(aSocket,addr,addrlen);
szIPAddr := inet_ntoa(addr.sin_addr);
Result := StrPas(szIPAddr);
end;

Ako pouzit Vxd ???

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 18.5.1998 10:59:08



Bielik Marian wrote:

> Nazdar delfini !
>
> Moze mi niekto poradit ako pouzit Vxd v D3.
>

var VXDHandle : integer;
VXDFunction : integer;
vxdInBuffer : array [0..pred (VXDBufferSize)] of byte;
vxdInputCount : integer;
vxdOutBuffer : array [0..pred (VXDBufferSize)] of byte;

{Volani}
function CallVXD : boolean;
begin
if vxdhandle <> INVALID_HANDLE_VALUE then
begin
fillchar (vxdInBuffer,VXDBufferSize,0);
vxdInputCount := 0;
Result := DeviceIoControl(vxdHandle,
VXDFunction,
(zv)vxdOutBuffer,
vxdBufferSize,
(zv)vxdInBuffer,
vxdBufferSize,
vxdInPutCount,
nil);
end else Result := false;
end;

{Otevreni}
vxdhandle := CreateFile('\\.\TTXREC', 0, 0, nil, 0,0, 0);
if vxdhandle = INVALID_HANDLE_VALUE then
begin
MessageBeep (0);
MessageDlg ('TTXREC VXD Not Found',mtError,[mbOK],0);
PostQuitMessage (0);
end;

{zavreni}
if vxdhandle <> INVALID_HANDLE_VALUE then
closehandle (vxdHandle);

{pouziti}

const
vxdPutByte = 9;
vxdGetByte = 10;

procedure TTXRecPutByte (A : word; B : byte);
begin
vxdOutBuffer [0] := lo (A);
vxdOutBuffer [1] := hi (A);
vxdOutBuffer [2] := B;
VXDFunction := vxdPutByte;
CallVXD;
end;

function TTXRecGetByte (A : word) : byte;
begin
vxdOutBuffer [0] := lo (A);
vxdOutBuffer [1] := hi (A);
VXDFunction := vxdGetByte;
CallVXD;
Result := vxdInBuffer [0];
end;

Nejsem si jisty, ale mam dojem ze funkce z vxd nelze volat podle jmen, je
treba znat cislo funkce a parametry.
Vaclav Sazima


Archiv

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 18.5.1998 11:04:17

http://delphi.mius(tec)cz/
Vaclav Sazima

Krayzel Libor wrote:

> Zdravim,
>
> je nekde na webu archiv teto konference?
>
> S pozdravem
>
> Libor Krayzel
> Czech Television, Television Studio Ostrava
> Dvorakova 18
> 729 20 Ostrava
>
> Phone: (069) 6201 375
> E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> > Homepage: http://members.tripod.com/~sovtop
> > Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> > E-mail2: mailto:sovtop(zv)email(tec)cz
> >
> >

Drobny dotaz na resource texty

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 18.5.1998 11:09:26

Petr Studeny wrote:

> Pomoci Wokshopu jsem se pokousel prelozit par anglickych textu v
> knihovne do cestiny ale po puziti programem se mi texty nezobrazuji
> dobre cesky. Nevi nekdo kde muze byt chyba.

V jake knihovne? Zde muze byt problem v tom, ze Workshop byl nastaven
na 16bitove resourcy pricemz resourcy jsou 32bitove, nebo bylo
nastaveno chybne narodni prostredi.

Jinak Workshop se prilis nehodi pro lokalizaci delphackych programu.

S pozdravem

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


Archiv

[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 18.5.1998 12:31:33

http://Delphi.mius(tec)cz

> -----P�vodn� zpr�va-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odesl�no: 18. kv�tna 1998 9:03
> Komu: '*** Delphi'
> P�edm�t: Archiv
>
> Zdravim,
>
> je nekde na webu archiv teto konference?
>
> S pozdravem
>
> Libor Krayzel
> Czech Television, Television Studio Ostrava
> Dvorakova 18
> 729 20 Ostrava
>
> Phone: (069) 6201 375
> E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz
> > Homepage: http://members.tripod.com/~sovtop
> > Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz
> > E-mail2: mailto:sovtop(zv)email(tec)cz
> >
> >

NE - D�lezit� zpr�va!

[*] Vilem Svoboda <vilem_s(zv)mrp(tec)cz> - 18.5.1998 12:32:25

b) Je nemozne, aby virus (program) se z posty sam spustil a infikoval
by cosi ci dokonce smazal HDD!! (??) Nebo snad jiz jsou na svete
inteligentni roboti typu jako v Capkove R.U.R?

Podle meho nazoru se tim nekdo bavi. Nebot tyto zpravy se siri
rychleji, nez ten nejlepsi virus. Je to zrejme neco, jako pomalovat
vagon v metru a pak byt v extazi, kdyz ho "majitel" cmaranic vidi
projizdet stanici. Zdravi vas a klidnou hlavu preje Vlasta Miksik
(VLASTA(zv)AF.CZU.CZ).
********************************************************************
Vsichni tu s tebou nepochybne souhlasi. Virus ve zprave muze byt jen pokud k ni je pripojen napr. wordovsky dokument. Mam nekolik udajne zavirovanych dokumentu a rad bych si nejakeho makrovira prohledl. Jak to ale udelat, kdyz s otevrenim dokumentu se muze zaroven spustit?

vilem_s(zv)mrp(tec)cz


Databaza pre InterBase

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 18.5.1998 12:37:28

Nazdar!

Obraciam sa na Vas s problemom pri vytvarani databazy pre
InterBase(D3, Local InterBase server). Databazu vytvaram v WISQL.
Ak chcem robit tabulku cez Database Desktop tak potrebujem alias,
ktory som chcel vytvorit v BDE Administratore, ale ten chce .gdb
a ten som nenasiel. Riesil som to jeho vytvorenim (zo suboru
s menom databazy bez pripony), ale to sa asi tak nerobi.
Mozte mi niekto popisat postup, ktorym vytvorim databazu pre
InterBase. Ono to vyzera tak jednoducho, ale mam pochybnosti, ci
to robim dobre a help mi velmi nehelpol(alebo som ho zle cital?).

Vopred vdaka.

Marek Repisky
mrepisky_zl(zv)zsnp.sk


Import DLL

[*] Martin Sasek <sasek(zv)ujep(tec)cz> - 18.5.1998 13:06:28

Preji hezky den,

mam problem s importem vlastni DLL knihovny. Potrebuji ji zaradit
do sveho projectu ale dela mi to jakesi brejkule.
Podarilo se mi ji naimportovat pres ('Import type librery'), spravne
mi vytvoril vsechny interfaci, ovsem v pripade, ze zavolam
jakoukoliv funkci tak mi to spadne na 'Access violation at address ' a
cislo. Jakoby nebyla knihovna inicializovana.

Dekuji za odpovedi

Martin Sasek, ORIMEX s.r.o.
programator-analytik
--------------------------------------------------
e-mail : sasek(zv)orimex(tec)cz,sasek(zv)ujep(tec)cz
fido : 2:423/34.7(zv)fidonet.org
tel. : +420 47 5620061
fax : +420 47 5620499
GSM : +420 603 439 826
--------------------------------------------------

OFFT - Win NT a PEVNA LINKA

[*] Marcel Telka <marcel(zv)vadium.sk> - 18.5.1998 13:17:21


-----P�vodn� zpr�va-----
Od: Martin Fronek <FRONEK(zv)FIC.CZ>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 14. m�j 1998 2:41
P�edm�t: OFFT - Win NT a PEVNA LINKA


>Hi,
>
>omlouvam se za OFFT, ale potrebuju vedet, jak nastavit NT tak, aby bylo
>mozne pouzit modem s pevnou linkou a tomu modemu priradit IP adresu...
>
>je mi jasne, ze ten modem musi byt instalovan jako sitova karta...
>
>jak to udelat, a co k tomu potrebuju? Please, HELP.

Su v podstate dve moznosti:

1. Dial-up networking (tam sa da nastavit IP adresa)
2. Pouzit RAS (Steelhead). Steelhead vsak bezi len na Win NT Servri.

M.T. <marcel(zv)vadium.sk>

>
>fronek(zv)fic(tec)cz



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