Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
OCX,BDE, a instalacia/registracia
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 14.1.1999 08:02:26
Chyba muze byt v tom, ze pri instalaci chybi nejaka DLL. Zkus provest
registraci rucne pomoci regsvr32 a pokud ti to vrati chybu tusim 485, je
to tutove nejaka chybejici DLL. Zkus zjistit, jake jsou rozdily v
konfiguraci jednotlivych pocitacu (jeden ma instalovanou treba Foxku,
druhy ne) a podle toho by se dalo odhadnout, co chybi. Preji hodne
stesti.********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P�vodn� zpr�va-----
> Od: Administrator [SMTP:Administrator(zv)rosoft.sk]
> Odesl�no: 13. ledna 1999 15:51
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: OCX,BDE, a instalacia/registracia
>
> Prosim o pomoc.
>
> Robim vo firme ActiveX formular v Delphi 4.0. Vsetko je uz hotove,
> rozchodene, ale mam taky
> "Maly problem" s instalaciou. Na niektorych pocitacoch pri instalacii
> v
> InstallShielde mi bez problemov to
> ocx zaregistruje a na niektorych nie (vypise chybu ze ho nemohol
> zaregistrovat). Neviem preco. Dakujem za
> radu
>
>
>
> Patrik Tesar
> ROSOFT
Access - System Tables(Erik Salaj)
[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 14.1.1999 08:16:33
O DAO nemam vubec(skoro) poneti tak prosim par odpovedi :
1) Pokud jsem to dobre pochopil tak abych DAO mohl pouzivat v Delphi tak
potrebuji
a)DAO komponenty
b)DAO library(asi nejake Dll - ka), ktere abych mohl sirit tak
si musim od Microsoftu koupit ten jejich
Developer Pack - ci jak se to jmenuje(co obsahuje MS Visual
C++, J++, VB, atd.) ...to je ta
nejdulezitejsi otazka ... pochopil jsem to dobre ?
2) Nevim co vsechno DAO podporuje ale jako laik predpokladam ze vse co
BDE a navic(co jsem tak vypozoroval z konference) tak pristup k
objektum(sesitum,databazim ...) Excelu, Accesu atd.bez nainstalovani
techto aplikaci na danem pocitaci( tedy zadne pomale OLE, ani o neco
lepsi DDE, ktere ale vyzaduji nainstalovane aplikace).
3) Zajimalo by me(mozna ze jsem naivni utopista), zda existuji
komponenty(ale pokud mozno ne ActiveX - u kterych jestli jsem to
pochopil tak potrebiji mit nainstalovane serverove aplikace na urcite
masine tzn. pokud chci napr. pouzit TWebBrowser tak IE prislusne verze
musi byt na tom kompu .... to bych taky potreboval vysvetlit), ktere
pristupuji primo k souborum napr. Excelu bez jakychkoli jinych ovladacu.
4)Jedna se mi hlavne o pristup k sesitum Excelu z Delphi.
Diky vsem za odpovedi na moje(asi stupidni - zacatecnicke)
otazky.
> -----P�vodn� zpr�va-----
> Od: Erik Salaj [SMTP:erik(zv)dodo.sk]
> Odesl�no: 13. ledna 1999 11:35
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Access - System Tables(Erik Salaj)
>
> Doporucujem pozriet si dokumentaciu k DAO 3.5,
> ide o subor DAO35.HLP, je to tam vsetko uvedene.
> DAO pouziva objektovy model, ktory je z hladiska
> pouzitia velmi jednoduchy, neporovnatelne jednoduchsi
> voci BDE API funkciam (BDE je tu zase velmi, velmi
> daleko od DAO).
>
> Postup je mozne pouzit aj na dalsie datove formaty,
> pre ktore su k dispozicii ISAM drivery. Mozu byt urcite
> obmedzenia ale s citanim indexov, poloziek, ... by nemal
> byt problem.
>
> Este je vyhodne v Delphi pomocou Import Type Library
> vygenerovat a pouzit unit pre DAO 3.5 (aj ked obsahuje
> zopar chyb).
>
> Erik Salaj
> erik(zv)dodo.sk
>
> -----Original Message-----
> From: Martin Kleiner <mkleiner(zv)seznam(tec)cz>
> To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
> Date: Wednesday, January 13, 1999 1:28 AM
> Subject: Re: Access - System Tables(Erik Salaj)
>
>
> >Moc dekuji, je to presne to co jsem potreboval, ale nejsem z toho
> dvakrat
> >moudry.
> >Mohl by jsi mi poslat neco blizsiho ohledne tohoto kusu zdrojaku
> >
> >DBEngine := CreateOleObject('DAO.DBEngine.35'); ???
> >Database := DBEngine.OpenDatabase('C:\test.mdb');
> >Relations := Database.Relations; ???
> >
> >Jde mi zejmena o to zjistit dalsi informace (primarni klice,
> indexy,povinne
> >polozky...) a da li se tento postup pouzit i na jine databaze nez
> Access,
> >popripade kde najdu nejaky help?
> >
> >Diky Martin Kleiner
> >
> >
> >>Ide to samozreme riesit aj bez tychto komponentov (len pomocou DAO
> >>objektov):Zvlastni chybove hlaseni
[*] Petr Kundrata <pksoft(zv)iol(tec)cz> - 14.1.1999 08:32:15
Vojtech Semecky napsal:
> A ted jeden zajimavy prirodni ukaz:
> Pokud v Delphi 3 zkompiluji program, ktery to pouziva a
> spustim ho, vse probehne vporadku a program funguje. Ukoncim
> ho a znovu zkusim zkompilovat a uz to hodi chybu. Hned pri
> kompilaci. A sice takovou, ze to tvrdi, ze nemuze vytvorit
> EXE soubor:
>
> "Could not create output file 'c:\neco\neco.exe'"
St�v� se to, pokud je soubor neco.exe spu�t�n/otev�en -
je pot�eba d�sledn� ukon�it (pod�vat se do Ctrl-Alt-Del
okna a ukon�it nebo resetovat po��ta�).
Kompil�tor pot�ebuje smazat neco.exe a nejde mu to.
Pokud to nedok�e kompil�tor, skon�� i del neco.exe s chybou.
Petr Kundrata
Problemu pro Scott Valley
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 14.1.1999 08:37:31
Haj hou!
S kluky co delali ten support se dalo dost dobre mluvit a ti byli dost
ochotni vysvetlit jak to cele "funguje" (ted uz ale pro Inprise nedelaji
:-). Jinak to prohlaseni je spis o tom. ze to budou resit do X dni, ne ze to
vyresit (to muze slibit jen blazen :-). Nicmene ted by to melo vypadat
trochu jinak, ale zda to bude vyrazne lepsi, o tom pochybuji. Porad bude
rychlejsi a levnejsi support z komunity.
HTH
-----Original Message-----
Puvodni zprava, kterou napsal Pavel Cisar dne 13 Jan 99,:
> My jsme to meli koupene, ale k nicemu nam to nebylo. Podstatne chyby
> stejne akorat deleguji do ciziny kde "zmizi". Jedinou vyhodou je CD, ktere
Zmizi? Vzdyt tvrdi, ze je musi vyresit do X dni. A jak to tedy
dopadlo? To rekli, ze to nevyresi?
Programatori sobe
[*] RADIK(zv)p15.monet(tec)cz - 14.1.1999 08:41:00
Myslim ze spousta odkazu by sla najit na Delphi Super Page v databazi.
Tam je primo db soubor a autory a emaily. Krom toho bych byl asi schopen
dat i soubor odkazu z Delphi(tec)cz (musel bych se poptat Sluneho), ale tam
jsou stranky, ale mail jen na autora odkazu.
Ales
----------
Od: Zbysek Hlinka
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Programatori sobe
Datum: 13. leden 1999 17:38
Ahoj all,
chtel bych pozadat vsechny, kteri maji chut cas a rozumny pristup
k internetu, zda byste mohli vypracovat seznam vyrobcu free a
share komponent pro Delphi. Adresy by mely byt pokud mozno
aktualni. Kvuli pozdejsimu setrideni dodrzujte prosim nasledujici
format:
"Jmeno" <e-mail>
Kazdy zaznam na samostatnem radku v textovem souboru.
Priklad:
"Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
Az bude hotove ideove prohlaseni, posbiraji se tyto seznamy a
posle se na ne vyzva ke spolupraci.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Programatori sobe
[*] SICHTA Daniel <Sichta(zv)asset.sk> - 14.1.1999 08:44:12
Caute
Potreboval by som poradit, ako vypisem text na canvas pomocou textout,
tak aby bol text transparentny.
pouzivam OS-Win98,Delphi 3. Diky.
Ing. Daniel �ichta
ASSET s.r.o. Rosinsk� 8
011 05, �ilina SLOVAKIA
% 421-89-542-15
) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> Okno jako thread
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 14.1.1999 08:51:59
Haj hou!
Pokud je mi znamo, tak prave tohle jednoduse nejde, anzto VCL neni
thread-safe. To ovsem neznamena, ze to nejde z principu, jen si proste ta
okna v threadu musis udelat "pesky" jako ve VC++ :-)))
From: Jan Rychtar <hojan(zv)sin.cvut(tec)cz>>Ahoj,
>potrebuju z hlavniho formu spustit nekolik samostatnych oken tak,
>aby bezely nezavisle na vytizeni hlavniho okna, tedy v threadu.
>Zkousim proto primo v Execute noveho threadu volat Create a ShowModal, ale
>s..e se to.
>
>Vim, ze to delam blbe. Poradte mi prosim nekdo.
>
>Honza Rychtar (hojan(zv)sin.cvut(tec)cz)
Bez Subjectu
[*] SICHTA Daniel <Sichta(zv)asset.sk> - 14.1.1999 09:08:03
Ospravedlnujem sa za predchadzajuci mail bez subjectu !!!!
Ing. Daniel �ichta
ASSET s.r.o. Rosinsk� 8
011 05, �ilina SLOVAKIA
% 421-89-542-15
) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> zasifrovana? data ve FoxPro
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 14.1.1999 09:13:28
Ahoj,
existuje program ANTIPRO.EXE, kter� decompiluje zdroj�ky, nebo naopak
zdroj�k zakryptuje.
J� m�m verzi 3.1, kter� pracuje pouze s aplikacemi od FoxPlus po FOXPRO 2.x.
O ��dn�m kryptov�n� DBF jsem nesly�el. Je mo�n�, �e tam m� data pouze
ulo�en� podle n�jak�ho kl��e, kter� bys m�l naj�t ve zdroji aplikace. Pokud
chce� ozvi se mi do po�ty a po�lu Ti ANTIPRO.
Pokud nebude zakryptovan� aplikace, tak to t�m rozbal� na zdroj�k.
Petr Sadovsk�
-----P�vodn� zpr�va-----
Od: Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 7:39
P�edm�t: RE: zasifrovana? data ve FoxPro
>Ve Foxpro byly (a zatim jeste jsou) memo soubory s priponou FPT
>(doufam ze jsem ty volne texty dobre pochopil).
>FoxPro celkem znam, ale nikdy jsem nenarazil na nejaky interni
>algoritmus.
>Neni to "jen" zakodovane nejakym algoritmem?
>
>+-------------------------------+
>| Ing. Petr Jezek |
>| Delvina, s.r.o |
>| 010 01 Zilina |
>+ - - - - - - - - - - - - - - - +
>| tel: +421 (89) 624 344 |
>| fax: +421 (89) 621 018 |
>| email: petr(zv)sevis.sk |
>| web: www.delvina.sk |
>+-------------------------------+
>
>
>-----Original Message-----
>From: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
>Sent: Wednesday, January 13, 1999 1:03 PM
>To: 'DELPHI Distribution List (el. adresa 2)'
>Subject: off: zasifrovana? data ve FoxPro
>
>
>Ahojky pratele,
>mam tady jakysi starsi projekt udelany ve FoxPro (tento retezec jsem
>nasel
>v souboru Foxw250b.esl
>
>FileVersion 1.00 InternalName foxprow : & LegalCopyright (c) 1989 -
>
>1993 Microsoft Corporation
>ProductName Microsoft FoxPro for Windows
>ProductVersion 2.5a
>)
>
>program je nepouzitelny, ale je tam databaze (DBF s volnymi texty DBT)
>ve
>ktere je ukryto dosti prace a ta databaze je sifrovana zrejme jakymsi
>internim sifrovacim algoritmem Foxky.
>
>
>Kdesi na inetu jsem videl neco, co to umelo decryptovat. Nevite nekdo,
>kde
>by to mohlo byt?
>
>Aby to nebylo tak moc off nevite o komponente do Dephi, ktera by to
>umela?
>
>Dik
>
>===========mozno pouzit PGP==============
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>===========mozno pouzit PGP==============
>
>
GROUP BY MESIAC V PARADOX
[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 14.1.1999 09:13:12
Na SQL (Informix), ale i ve FoxPro se da pouzit:
SELECT MONTH(DatumField), YEAR(DatumField), sum(neco) from table group
by 1,2
Ale nevim jsetli to pusti BDE (na SQL nejspis ano)
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+
-----Original Message-----
From: Jan Skopov� [mailto:jan.skopovy(zv)vol(tec)cz]
Sent: Wednesday, January 13, 1999 7:20 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: GROUP BY MESIAC V PARADOX
Jestli jsem to spravne pochopil, jedna se o lokalni SQL.
V tom pripade mas smulu. Existuje sice funkce EXTRACT(Month From
DatumField), ta se vsak da pouzit vsude krome klauzule GROUP BY. Jedina
moznost je pri ulozeni a zmene ukladat do pridavneho fieldu napr:
PouzeMesicField cislo mesice rucne a podle tohoto fieldu pak grupovat.
Lokalni SQL Inprise pekne zmrskal.
Jan Skopovy
-----P�vodn� zpr�va-----
Od: Pavol Griga <paly(zv)sct.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. ledna 1999 18:24
P�edm�t: GROUP BY MESIAC V PARADOX
> Nevie mi niekto poradit ako nad tabulkou s dvoma
>stpcami Datum, Hodnota urobit sumarizaciu
>za jednotlive mesiace.
>
> za dobru radu vopred Pan Boh zaplat
Pouziti databaze
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 14.1.1999 09:18:35
Zdravim,
stojim pred problemem navrhu databaze pro novou aplikaci. Mam dve
moznosti: bud paradoxi tabulky, nebo Access. Co muzete doporucit?==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================
Okno jako thread
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.1.1999 09:30:53
Presne tohle bych uvital jako velkou pozitivni zmenu ve VCL (kdyby uz
jine zmeny neudelali.....)
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Cisar [SMTP:pcisar(zv)aktis(tec)cz]
> Odesl�no: 14. ledna 1999 8:52
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Okno jako thread
>
> Haj hou!
>
> Pokud je mi znamo, tak prave tohle jednoduse nejde, anzto VCL neni
> thread-safe. To ovsem neznamena, ze to nejde z principu, jen si proste
> ta
> okna v threadu musis udelat "pesky" jako ve VC++ :-)))
>
>
> From: Jan Rychtar <hojan(zv)sin.cvut(tec)cz>
>
>
> >Ahoj,
> >potrebuju z hlavniho formu spustit nekolik samostatnych oken tak,
> >aby bezely nezavisle na vytizeni hlavniho okna, tedy v threadu.
> >Zkousim proto primo v Execute noveho threadu volat Create a
> ShowModal, ale
> >s..e se to.
> >
> >Vim, ze to delam blbe. Poradte mi prosim nekdo.
> >
> >Honza Rychtar (hojan(zv)sin.cvut(tec)cz)
> Okno jako thread
[*] RADIK(zv)p15.monet(tec)cz - 14.1.1999 09:38:00
Napada me udelat to "opacne", pokud to samozrejme jde a pomuze to.
Udetat hlavni okno jako thread a pripadne i dalsi okna jako thready a v
hlavnim programu (threadu) to jen zobrazovat.....
Ales
>Ahoj,
>potrebuju z hlavniho formu spustit nekolik samostatnych oken tak,
>aby bezely nezavisle na vytizeni hlavniho okna, tedy v threadu.
>Zkousim proto primo v Execute noveho threadu volat Create a ShowModal,
ale
>s..e se to.
>
>Vim, ze to delam blbe. Poradte mi prosim nekdo.
>
>Honza Rychtar (hojan(zv)sin.cvut(tec)cz)Hranate zakonceni cary
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 14.1.1999 09:49:54
Tak mi to pripadlo divne a napsal jsem kousek kodu:
CPaintDC dc(this);
LOGBRUSH logbrush;
logbrush.lbStyle = BS_SOLID;
logbrush.lbColor = RGB(100,100,100);
logbrush.lbHatch = HS_CROSS; //to se ale ignoruje
HPEN hpen = ExtCreatePen(PS_GEOMETRIC | PS_SOLID |
PS_ENDCAP_SQUARE,
10,&logbrush,0,NULL);
SelectObject(dc.m_hDC,hpen);
dc.MoveTo(10,10);
dc.LineTo(100,150);
DeleteObject(hpen);
A chodi to, cara je pekne hranata. Kdyz se vynecha parametr
PS_ENDCAP_SQUARE, jsou konce kulate. Zkus treba jinou grafickou kartu.
Zrovna vcera mi na karte Riva TNT 16 MB Delphi odmitaly kreslit svislou
caru o sile 2 pixely.********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************> -----P�vodn� zpr�va-----
> Od: roman.palarcik(zv)spt(tec)cz [SMTP:roman.palarcik(zv)spt(tec)cz]
> Odesl�no: 13. ledna 1999 13:02
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Hranate zakonceni cary
>
> Ve Win98 je to to same, na NT nemam moznost vyzkouset. Jedine co me
> napadlo je kreslit ty cary jako obdelniky, prip. pokud budou zesikma
> tak jako 4-uhelnik. Musely by se ale spocitat koncove body. Pokud by
> ale bylo lepsi reseni, byl bych radsi. Nehlede na to, ze pekne
> navazovani sikmych car stejne neudelam a spravne by to ta funkce mela
>
> taky umet.
>
> Roman Palarcik
> roman.palarcik(zv)spt(tec)cz
>
>
>
> > -----P�vodn� zpr�va-----
> > Od: roman.palarcik(zv)spt(tec)cz [SMTP:roman.palarcik(zv)spt(tec)cz]
> > Odesl�no: 13. ledna 1999 8:58
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Hranate zakonceni cary
> >
> > Po delsi dobe mam takovy dotaz:
> > Zkousel jsem pomoci API funkci kreslit caru, ktera by mela hranate
> > zakonceni. Pouzival jsem k tomu ExtCreatePen, ktery to podle helpu
> > umoznuje (s parametrem PS_ENDCAP_SQUARE), ale porad to kresli s
> > kulatym
> > zakoncenim uplne stejne jako kdyz se to vytvori pomoci CreatePen.
> Neni
> >
> > to nahodou tim, ze to Win95 nepodporuje? Klasicke kresleni na canvas
> > totiz umi taky jenom cary s kulatym zakoncenim.
> >Problemu pro Scott Valley
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 09:58:07
Puvodni zprava, kterou napsal Pavel Cisar dne 14 Jan 99,:
> :-). Jinak to prohlaseni je spis o tom. ze to budou resit do X dni, ne ze
> to vyresit (to muze slibit jen blazen :-). Nicmene ted by to melo vypadat
No jo, ale to je tedy support na dve veci, kdyz tam neni "vyresit"...
To bych vlastne mohl nabizet i ja a kdokoliv jiny, prestoze nejsme
schopeni neco vyresit... a poprve by nam mozna nekdo zaplatil :-)
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Pouziti databaze
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 09:58:07
Puvodni zprava, kterou napsal Krayzel Libor dne 14 Jan 99,:
> stojim pred problemem navrhu databaze pro novou aplikaci. Mam dve
> moznosti: bud paradoxi tabulky, nebo Access. Co muzete doporucit?
Tezko ti muzu neco doporucit, kdyz jsi nenapsal, co na tom
chces delat, jake bude zamereni tveho programu, jak bude
bezet...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Obhajoba Inprise
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 14.1.1999 10:14:19
From: RADIK(zv)p15.monet(tec)cz <RADIK(zv)p15.monet(tec)cz>
>Prave pokud cena/vykon neni dle meho soudu adekvatni, tak je cas se
>poohlednout jinde...."Jinde" je to jeste mnohem horsi.
>No nevim, jestli nekdo u nas kupuje C/S verzi bez toho, ze to ma uz
>davno od kamarada pucene, nebo aspon okomentovane.....
Jde predevsim o velke firmy, kde ti co rozhoduji a "kupuji" (plati) s tim
nakonec nepracuji a odmitaji poslouchat hlasy "zdola". A pak se divi proc
jim zamestnanci tvrdi, ze to nejde.
>To je prave ono, kazdy by chtel v te light verzi neco a z mnoha ruznych
>light verzi vzniklo BDE ; )
Tohle neni pravda ani legrace. BDE je relikt a jeste k tomu nepovedeny. Je
nestesti, ze se ho Inprise drzi jako Kaca certa. Doufam ze je pravda, ze
pracuji na jinem (nativnejsim) reseni, ale melo byt uz v D4 a v D5 nejspis
taky nebude a vubec mam obavu jak bude nakonec vypadat (a abstraktni
TDataSet neni nejlepsi reseni). Nejlepsi by bylo cele napojeni na DB v
Delphi napsat znovu a jinak.
>Myslim ze prekladacum a jazykum v obecne rovime celkem rozumim, takze
>vim ze v Delphi lze napsat "temer" vsechno, ale jde o to s jakou namahou.
No prave. Jde o to, aby bylo dost treba i jen castecnych reseni VSECH
moznych problemu, na ktera se da navazat. Zacinat o nuly je neefektivni a ne
kazdy to dokaze. Konec koncu, v tomhle vidim hlavni smysl vyzvy Programatori
sobe (alternativni MIDAS je jen zacatek).
>Urcite bych te nachytel na svestkach se spoustou pripadu, ktere
>vyvraci, ze Delphi jsou universalni nastroj.
Delphi je predevsim Object Pascal, a ten je az na PAR veci naprosto
srovnatelny s C++, ktere je povazovano za nejuniverzalnejsi. Jedine, v cem
je C++ napred je pocet platforem na kterych je implementovan. Builder Delphi
nakonec vubec nemusim pouzit, nebo si muzu napsat svuj vlastni (vim o dvou
produktech tohoto typu) a stejne tak i VCL. Proto bych si napr. nekoupil
Delphi, ktere by nemelo radkovy prekladac a linker.
>Chapu, ze Inprise prisla na
>to, ze DB dnes leti, vetsina (ve svete) aplikaci je prave DB, je z toho
>nejvetsi vejvar, ze i MIDAS za tu cenu amikum prodaji, takze proste
>rozsiruji Delphi jednim smerem. To je obchod, zivot nebo neco jineho, ja
>nevim, ale smiril jsem se s tim.
Me vubec nevadi ze delaji hlavne to co nese, ale nesmirim se s tim, ze svym
pristupem "vrazdi" dobry nastroj. Kdyz uz se necemu nechteji venovat sami,
tak at to umozni a usnadni udelat druhym. Nic vic, nic min.
HTH
CTETE, VELMI DULEZITE !!!
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 14.1.1999 10:19:08
je to opravdu skveli ze je DAO i ADO zdarma...
M.
Takze konecne jsem se dozvedel (aspon doufam ze je to pravda ;-) jak je
to vlastne s Accessem (resp. *.mdb soubory) po strance licencni.
Informace pochazeji od Jirky Buriana z MS CZ.
Takze DAO i ADO jsou zdarma, problem je v tom, ze Access databaze
pouziva ke sve cinnosti MSJet a pokud jej chcete sirit tak musite mit
zakoupeny "runtime". Tzn. Access Developers Toolkit (ci jak se to ted
jmenuje - cena snad neco v ramci 15.000,- Kc) popr. MS Office Developers
Edition.
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
-----P�vodn� zpr�va-----
Od: Erik Salaj <erik(zv)dodo.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. ledna 1999 20:18
P�edm�t: Re: CTETE, VELMI DULEZITE !!!>> Inprise se opravdu vzhlizi v MIDASu a CORBA technoligiich.
>>Faktem je, ze tam by mela smerovat budoucnost. Jenomze aby nekam neco
>>mohlo smerovat, museji tam smerovat predevsim vyvojari a zakaznici, ne
>>jen vyvojovy nastroj!!! Tyto technologie jsou prilis nakladne (alspon
>>pro vetsinu zakazniku v CR - jak je to v US si netroufam odhadnout) a
>>tak je to jako kdyz ma bezzuby chut na orechy. Mohlo by se stat, ze sice
>>bude existovat skvela technologie, kterou ale nikdo nebude moct
>>pouzivat, protoze na ni jednoduse nema (kolik ze se prodalo licenci
>>MIDASu v CR? Dve???).
>
>Hlavne ked obdobne technologie Microsoftu ADO/RDS/OLEDB a DCOM su
>k dispozicii zdarma.
>
>Erik Salaj
>erik(zv)dodo.sk
>
>
>
>
None
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 14.1.1999 10:24:17
> Potreboval by som poradit, ako vypisem text na canvas pomocou textout,
> tak aby bol text transparentny.
> pouzivam OS-Win98,Delphi 3. Diky.
Canvas.Brush.Style := bsClear
Tom
Like v procedure na IB
[*] Pavel Bare� <atoll(zv)telecom(tec)cz> - 14.1.1999 10:41:36
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Poradte mi prosim nekdo se syntax� LIKE v proceduer poku do ni poterbuji dat promenou
domnival jsem se ze to ma byt nejak takhle:
alter PROCEDURE STAV SKLADU (
ODD DATE,
DOD DATE,
SKLAD smallint,
VYROBEK INTEGER
) RETURNS (
STAV FLOAT
) AS
declare variable pom float;
declare variable pom2 float;
begin
select sum(vydej) from pohyb
where cislo vyr=:vyrobek and cis skladu =:sklad and datum between :odD and :doD into :pom;
if (pom is null) then pom=0;
select sum(kusy) from polozky where cislo vyr=:vyrobek and cis dod like (Cast(:Sklad as character)+"%") and
datum between :odD and :doD into :pom2;
if (pom2 is null) then pom2=0;
stav=pom-pom2;
suspend;
end
ale takhle to nechodi ani zadna jina syntaxe, ktera mne napadla
dekuji za radu
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
GROUP BY MESIAC V PARADOX
[*] Pavol Griga <paly(zv)sct.sk> - 14.1.1999 10:46:15
-----P�vodn� zpr�va-----
Od: Jan Skopov� <jan.skopovy(zv)vol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. janu�r 1999 21:31
P�edm�t: Re: GROUP BY MESIAC V PARADOX
>Jestli jsem to spravne pochopil, jedna se o lokalni SQL.
>
>V tom pripade mas smulu. Existuje sice funkce EXTRACT(Month From
>DatumField), ta se vsak da pouzit vsude krome klauzule GROUP BY. Jedina
>moznost je pri ulozeni a zmene ukladat do pridavneho fieldu napr:
>PouzeMesicField cislo mesice rucne a podle tohoto fieldu pak grupovat.
>
>Lokalni SQL Inprise pekne zmrskal.
>
Asi nic ine mi nezostava
vdaka
Problemu pro Scott Valley
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 14.1.1999 10:53:25
>
> Puvodni zprava, kterou napsal Pavel Cisar dne 14 Jan 99,:
>
> > :-). Jinak to prohlaseni je spis o tom. ze to budou resit
> do X dni, ne ze
> > to vyresit (to muze slibit jen blazen :-). Nicmene ted by
> to melo vypadat
>
> No jo, ale to je tedy support na dve veci, kdyz tam neni "vyresit"...
> To bych vlastne mohl nabizet i ja a kdokoliv jiny, prestoze nejsme
> schopeni neco vyresit... a poprve by nam mozna nekdo zaplatil :-)
>
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
Vzdycky vsechno vyresit nejde, proto to nikdo nemuze
slibit. Myslim, ze support vsech ostatnich firem je deklarovan stejne
(aspon u Sybase to vim, tam si kupujes taky tu snahu).
Samozrejme taky muzes zkusit prodavat svuj support k Delphi.
Uvidime, s jakym uspechem. Myslim, ze valny nebude, protoze nemas
zazemi u vyrobce a nemuzes zarucit, ze se bugy objevi v dalsich verzich.
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!Problemu pro Scott Valley
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 11:00:08
Puvodni zprava, kterou napsal Polak Jiri dne 14 Jan 99,:
> Vzdycky vsechno vyresit nejde, proto to nikdo nemuze
To je jasne. Ale pokud ze 7 nevyresi nic, tak je to divne.
Neznam vsak konkretni podminky a problemy.
> slibit. Myslim, ze support vsech ostatnich firem je deklarovan stejne
> (aspon u Sybase to vim, tam si kupujes taky tu snahu). Samozrejme taky
> muzes zkusit prodavat svuj support k Delphi. Uvidime, s jakym uspechem.
Neuvidime nic, protoze ja nic prodavat nebudu, to byla nadsazka.
> Myslim, ze valny nebude, protoze nemas zazemi u vyrobce a nemuzes zarucit,
> ze se bugy objevi v dalsich verzich.
Ovsem dle informaci dvou ucastniku teto diskuse vidim, ze ani
zazemi u vyrobce neni zaruceno, ze se neco vyresi. A bugy
vetsinou pribyvaji s rostoucim cislem verze, jak vidime...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Ukonceni Windows
[*] V�t�zslav Gazda������u��n�?��? - 14.1.1999 11:01:20
Pred ukoncenim Windows je poslana vsem aplikacim zprava WM QUERYENDSESSION. Potom je poslana zprava WM ENDSESSION, ktera informuje zda povolily ukonceni Windows i ostatni aplikace v reakci na zpravu WM QUERYENDSESSION.
Mohlo by to vypadat treba takto:
TForm1 = class(TForm)
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
private
FEnd:Boolean;
procedure WMQueryEndSession
(var Message:TWMQueryEndSession);
message WM QUERYENDSESSION;
procedure WMEndSession
(var Message:TWMEndSession);
message WM ENDSESSION;
end;
procedure TForm1.WMQueryEndSession;
begin
{Uzivatel chce ukoncit Windows}
{Aplikace muze byt ukoncena}
FEnd := True;
{Ted se vyvola OnCloseQuery}
inherited;
end;
procedure TForm1.WMEndSession;
begin
inherited;
{Ukoncit aplikaci jen jestlize vsechny
ostatni aplikace povolily ukonceni Windows}
FEnd := Message.EndSession;
end;
procedure TForm1.FormCloseQuery
(Sender: TObject; var CanClose: Boolean);
begin
{Ukoncit aplikaci jen pri ukonceni Windows.}
CanClose := FEnd;
end;
Vita
VersionInfo
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 14.1.1999 11:06:52
Zdravim vsechny pritomne,
Mam jeden projekt, ktery se tahne jiz od D1. Nyni v D4 si hraju
s volbou kompilatoru "Include Version Information in project".
U vsech ostatnich projektu to funguje dobre, ale tady tam ty informace
nedostanu.
Tedy aby bylo jasno - vymazal jsem vsechny soubory projektu krome *.DPR,
znova jsem to ulozil, v options je zaskrtnute include a autoincrement,
v options se to zobrazuje dobre, ale v EXE to neni - koukam na to pres
Explorer - soubor - vlastnosti. Co s tim ?????
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
off topic - Excel tabulka
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 14.1.1999 11:11:02
Vsiml sis, ze toto je konference o Delphi?
Jinak na poskozene soubory existuje jakysi DataDigger.
Nevim, jestli si to jmeno pamatuju presne a nikdy jsem ho jeste
nezkousel. Myslim, ze jsem ho nekdy stahl z webu a mam ho doma.
Jestli ho najdu, tak Ti ho zitra poslu (mas-li zajem).
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!> -----Original Message-----
> From: Jixm Heinisch [mailto:HeiJu(zv)sol(tec)cz]
> Sent: Wednesday, January 13, 1999 5:59 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: off topic - Excel tabulka
>
>
> Ahoj mam po�kozenou tabulku z excelu 95 .
> Velikost asi 40 kilo . Byla na diskete s poskozen�m sektorem.
> muze mi nekdo pomoct.
>
> Pripadne zaslu soubor.
>
> Diky
>
> Jiri Heinisch
>
> Kdo si stahne; potesi me i sebe
> http://www.mujweb(tec)cz/www/heinisch/Narozen.zip Free
> http://www.mujweb(tec)cz/www/heinisch/Bedekr.zip Shareware -
> skoro zadarmo
>
> H-trading - Danovy a ekonomicky servis
> Vyvoj a tvorba ekonomickeho software
> http://www.mujweb(tec)cz/www/heinisch/
> HeiJu(zv)sol(tec)cz
> 691 83 Drnholec
>
>
> None
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 14.1.1999 11:12:51
Ahoj,
nevim, jestli to pujde pomoci TextOut, zkus pouzit API funkci ExtTextOut
a vynechat pritom moznost ETO_OPAQUE. Ale nevim, nezkousel jsem to.********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P�vodn� zpr�va-----
> Od: SICHTA Daniel [SMTP:Sichta(zv)asset.sk]
> Odesl�no: 14. ledna 1999 8:44
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t:
>
> Caute
>
> Potreboval by som poradit, ako vypisem text na canvas pomocou textout,
> tak aby bol text transparentny.
> pouzivam OS-Win98,Delphi 3. Diky.
>
>
> Ing. Daniel �ichta
> ASSET s.r.o. Rosinsk� 8
> 011 05, �ilina SLOVAKIA
> % 421-89-542-15
> ) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> CDROM
[*] Jirka <virt(zv)pepa(tec)cz> - 14.1.1999 11:20:17
Ahoj vsem,
nevite nekdo , jak precist sektory z CDROMu ve Win95.
Napsal jsem takovy program v DOSu,ale ten pouziva Int 2Fh,coz u Win95 a D3
jiz nejde.
Dekuji za kazdou odpoved
Jirka Virt
email: virt(zv)pepa(tec)cz
cursory, recka pismena
[*] muher(zv)csas(tec)cz - 14.1.1999 11:34:44
Zdravim
Mam dva problemky, se kterymi si nevim rady:
1) Potrebuju v aplikaci svoje kurzory a nejak mi to nejde.
Priklad z helpu taky nefunguje (screens.cur.....). Kurzory
mam ulozene v "k.res".
2) Do TEdit bych potreboval dostat i nejake to recke pismenko
abych mohl napsat treba "55 um", ale misto toho "u" tam dat
"mikro". Jde to vubec, prip. lze to nejak obejit?
Mockrat dekuji !SQL, SQL a este raz SQL a potom este SQL
[*] Michal Moscovic <moscovic(zv)fred.utc.sk> - 14.1.1999 11:34:54
>Problem s topic-u SQL, SQL a este raz SQL pretrvava...
Nazdar seci...
Pocas Vianoc som tu nastienil 1 problem, ale este som ho nedoriesil, takze
Vas opat prosim o pomoc...
Takze aby nevznikli nejasnosti este raz podrobny popis problemu:
Mam tabulku A (X,...) a tabulku B (SUMA, PLUS, MINUS,...) kde PLUS a MINUS
obsahuju hodnoty X definovane v A.
Chcem (vysledok) tabulku C, kde bude C (X, SUMA). Tato SUMA v C sa
vypocitava tak, ze sa pre kazde X prejdu vsetky riadky v B a ak sa hodnota
PLUS v danom riadku rovna X tak sa hodnota z B.SUMA pripocita k C.SUMA, a ak
sa MINUS v danom riadku rovna X tak sa hodnota z B.SUMA (daneho riadku)
pripocita k C.SUMA.
V tabulke A (X,...) X reprezentuje nieco ako cislo uctu a ... reprezentuju
jeho blizsi popis. Tabulka B je vlastne nieco ako uctovanie, kde sa udava
SUMA a obraty na dvoch uctoch PLUS (nieco ak MD) a MINUS (nieco ako DAL).
Vysledna tabulka C ma vlastne urcovat konecne zostatky na vsetkych uctoch.
(cize scitane vsetky sumy PLUS a odcitane vsetky sumy MINUS pre dany ucet.)
Pocas toho co ste mi pomahali som prisiel k nasledovnym zaverom:
SELECT X,
((SELECT SUM(Suma) FROM B WHERE Plus=X)
-(SELECT SUM(Suma) FROM B WHERE Minus=X)) AS Suma
FROM A
vracia skoro spravne vysledky, az na 2 problemy:
1. Je to pomale (ale to mi az tak nevadi)
2. Funguje to iba vtedy ak sa dane X v tabulke B nachadza aspon raz v
polozke PLUS a aspon raz v polozke MINUS). V tomto pripade vrati spravny
vysledok. Ak sa vsak X nenachadza aspon raz v oboch tak to proste necha
prazdne policko (ide asi o to, ze SUM(Suma) vrati NULL. Cize vysledok vyzera
takto:
{priklad by nemal ublizit}
TABULKA A
X POPIS
1 ...
2 ...
3 ...
4 ...
5 ...
TABULKA B
SUMA PLUS MINUS
100 1 2
200 3 1
50 4 5
10 5 3
TABULKA C - toto vrati ten kod uvedeny vyssie
X SUMA
1 -100
2
3 190
4
5 -40
TABULKA C - toto chcem aby vratil
X SUMA
1 -100
2 -100
3 190
4 50
5 -40
Dufam ze teraz, je to uz uplne jasne... A este viac dufam, ze sa niekomu
podari
pomoct mi s tym...
Este si pamatam, ze niekto mi radil nieco za pomoci IsNull, ale neviem ako
sa s tymto prikazom pracuje a jeho priklad nefungoval.
Popredu vdaka moc...
Vas verny Salmon
moscovic(zv)fred.utc.sk
salmon(zv)frcatel.utc.sk
PS: ak niekto vie o nejakej dobrej literature o SQL dajte mi pls vediet...
najlepsie
nejaky zdroj na inete... ale moze byt aj kniha... Myslim, ze nie som sam kto
zacina a tak by to tu mohlo pomoct viacerym...
* registrace Help Designer
[*] Marek Prokop <prokopsw(zv)czn(tec)cz> - 14.1.1999 11:38:12
Omlouvam se za ponekud off-topic, ale potreboval bych zaregistrovat
Help Designer Standard u www.devgr.com. Problem je, ze to potrebuji
do konce tydne, nemam zadnou kartu a klasicky bankovni prevod by
trval moc dlouho. Nemate nekdo, prosim, nejaky napad?
Dekuji
Marek Prokop
DBGrid ?
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 14.1.1999 11:42:01
Ahoj
nevite prosim jestli existuje neco podobneho pro DBGrid ?
- vim ze to jde dopsat ale pokud uz je to nekde hotove, tak bych to rad
pouzil
dekuju
M.
> Priklad: Combo s prvky Petr, Pecivo, Emil.
> Combo je po startu prazdne, stisknu P, objevi se Petr. Pak stisknu E a
> misto emil se zustane PEtr a pak stisknu C a objevi se PECivo atd.
Access - System Tables(Erik Salaj)
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 11:44:21
1, Jak jsem pred par dny uz psal, takze:
a) potrebujes komponenty pro DAO (aby se ti dobre pracovalo ;-)
b) na pocitaci, na kterem budes spoustet program musis nainstalovat DAO (cca
3 diskety) popr. vlastni instalace pomoci InstallShieldu (napr.)
c) DAO samo o sobe je v podstate API pro pristup k Microsoft Jet Engine a
samo o sobe je zdarma (jak rikal Jirka Burian s MS). Co potrebujes, je
licence pro sireni MS Jet Engine, ktera je soucasti napr. Access Developers
Toolkit ci Office 97 Developers Edition. Mozna je i soucasti dalsich
vyvojarskych nastroju od MS, ale to nevim, takze jen me dohady ;-)
2, BDE a DAO je trosku neco jineho. DAO podporuje v podstate vse co umi MS
JET (resp. vse k cemu jsou drivery). Tzn. v podstate vsechny MS veci +
nektere dalsi. Vice ti asi rekne Erik Salaj, ktery do toho vidi preci jen
vic nez ja ;-)
Mac
Mor�ol Marian wrote:
> O DAO nemam vubec(skoro) poneti tak prosim par odpovedi :
> 1) Pokud jsem to dobre pochopil tak abych DAO mohl pouzivat v Delphi tak
> potrebuji
> a)DAO komponenty
> b)DAO library(asi nejake Dll - ka), ktere abych mohl sirit tak
> si musim od Microsoftu koupit ten jejich
> Developer Pack - ci jak se to jmenuje(co obsahuje MS Visual
> C++, J++, VB, atd.) ...to je ta
> nejdulezitejsi otazka ... pochopil jsem to dobre ?
> 2) Nevim co vsechno DAO podporuje ale jako laik predpokladam ze vse co
> BDE a navic(co jsem tak vypozoroval z konference) tak pristup k
> objektum(sesitum,databazim ...) Excelu, Accesu atd.bez nainstalovani
> techto aplikaci na danem pocitaci( tedy zadne pomale OLE, ani o neco
> lepsi DDE, ktere ale vyzaduji nainstalovane aplikace).
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
CTETE, VELMI DULEZITE !!!
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 11:55:45
No je ale DAO je ti v podstate bez MS JET k ho*nu a ten zdarma neni ;-)))
Mac
Mirek �ipel wrote:
> je to opravdu skveli ze je DAO i ADO zdarma...
>
> M.
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
QuickReport vs HP 1100
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 12:02:27
Uz jsme se o tom bavili v Belohrade. Ja fakt nevim, co ta tiskarna umi nebo ne
(hlavne nevim jak to zjistim ;-). Co me stve je to, ze musim vubec neco
predelavat a zakaznikovi tezko vysvetlis, ze je chyba jinde nez u tebe a tudiz
si zase "vydelam", kdyz jine programy (Word ;-) funguji. Jeste musim zkusit
Sineu a kdyz tak to predelam (diky JAROvi to muzu zkusit uz dnes a naostro,
protoze mi poslal "brousek" ;-)
Mac
P.S. Ja jen ze to asi velmi brzo postihne i dalsi lidi, protoze HP 1100 je
tusim pokracovatel rady HP 6L a 5L ;-)
Petr Vones wrote:
> Ahoj,
>
> Neni to nahodou takova ta polovicni tiskarna ktera ma cas sveho "rozumu"
> tvorenou softwarem primo v pocitaci ? S tim jsou problemy. Prvni co bych
> zkusil je obycejny tisk pomoci funkci v unitu Printers. Podle toho jak
> to popisujes, to ale vypada na nejaky problem ktery vznika v inicializaci
> tisku QR (QRPrinter). Chyba nemusi byt primo v QR, on treba jen zjistuje
> nejake informace o tiskarne pri kterych ten jejich driver spadne. Napriklad
> u tiskarny HP LaserJet 5L (ktera nema driver primo ve Windows, ale musis
> instalovat nejaky objemny SW) se mi osvedcilo nic neinstalovat a vybrat
> nejblizsi driver - HP LJ 4L. Je to ale silene reseni a ne vzdy musi vyjit.
>
> --
>
> Internet proti monopolu. Petr Vones, amatersky programator
> * http://www.bojkot(tec)cz *
> * protestni akce *
> ************************
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Pouziti databaze
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 12:20:02
Jestli v siti tak osobne preferuju Access. Jestli single verze tak taky
;-)))
Vyhody z meho pohledu:
- Pohodovy navrh databaze pomoci Accessu, vcetne grafickeho zobrazeni relaci
apod.
- Jeden jedinny databazovy soubor
- Nepotrebuju BDE
- V siti se chova rozumne
- Podporuje do urcite miry transakce a chova se trosku jako 'maly' SQL
server (alespon me tak pripada oproti Paradoxu, DBase ad.)
- Mohu pouzit i nektere specificke prikazy Accessu, popr. dotazy ulozenen
primo v databazovem souboru, ktere mi obcas ulehci zivot
Nevyhody:
- nutnost dalsich prvotnich investic mimo Delphi (Access resp. Developers
Toolkit, DAO komponenty)
- ... sem zaslepeny, nic dalsiho me nenapada ;-))) ale asi se taky jeste
neco najde jako vsude
Mac
Krayzel Libor wrote:
> Zdravim,
>
> stojim pred problemem navrhu databaze pro novou aplikaci. Mam dve
> moznosti: bud paradoxi tabulky, nebo Access. Co muzete doporucit?
>
> ==[ eLK(zv) ]===================================================
> http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
> http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
> ============================================================
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
CTETE, VELMI DULEZITE !!!
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.1.1999 12:26:32
Ale zase ho ma kazdy uzivatel MS Office. A to je dnes kazdy, ze. A ho*no
ma dnes taky skoro kazdy :-))))))))))
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 14. ledna 1999 11:56
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: CTETE, VELMI DULEZITE !!!
>
> No je ale DAO je ti v podstate bez MS JET k ho*nu a ten zdarma neni
> ;-)))
>
> Mac
>
> Mirek �ipel wrote:
>
> > je to opravdu skveli ze je DAO i ADO zdarma...
> >
> > M.
>
> --
> ==============================================================
> = Ing. Martin Kubecka - Amenit s.r.o. =
> = Na Valech - budova Dytron, 741 01 Novy Jicin =
> = telefon/fax: +420 656 706203 mobil: +420 603 265926 =
> = http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
> = ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
> ==============================================================
> Problemu pro Scott Valley
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 14.1.1999 12:38:13
> > Myslim, ze valny nebude, protoze nemas zazemi u vyrobce a nemuzes zarucit,
> > ze se bugy objevi v dalsich verzich.
>
> Ovsem dle informaci dvou ucastniku teto diskuse vidim, ze ani
> zazemi u vyrobce neni zaruceno, ze se neco vyresi. A bugy
> vetsinou pribyvaji s rostoucim cislem verze, jak vidime...
No ne! Tu ( tu >> ) poznamku jsem pochopil jako prima joke!
Tom
Pouziti databaze
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 14.1.1999 12:46:57
> Nevyhody:
>
> - nutnost dalsich prvotnich investic mimo Delphi (Access
> resp. Developers Toolkit, DAO komponenty)
Cena?Okno jako thread
[*] V�t�zslav Gazda������u��n�?��? - 14.1.1999 13:12:05
Stahni si z moji stranky http://www.tda(tec)cz/vita/ ukazkovou aplikaci Thread & Form. Nevim jestli je to to co potrebujes, ale neco podobneho to umi. Kdyz tak dej vedet, kdyby ti nebylo neco jasne.
Vita
SQL, SQL a este raz SQL a potom este SQL
[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 14.1.1999 13:21:03
Skus toto:
select cislo, sum(a.suma) as plus, sum(b.suma) as minus
from t_ucet, outer t_pohyb a, outer t_ b
where cislo=a.plus and cislo=b.minus
group by 1
Nevim jak se na tvoji SQl spojuji tabulky (Left Join). Na Informixu je
to outer.
Dostanes sice dva sloupce (minus a plus, ale kdys si do DB gridu pridas
vypocitatelne
pole, tak tam to muzes odecist plus osetrit null hodnoty.
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+
-----Original Message-----
From: Michal Moscovic [mailto:moscovic(zv)fred.utc.sk]
Sent: Thursday, January 14, 1999 11:35 AM
To: delphi-l(zv)fwd(tec)cz
Subject: SQL, SQL a este raz SQL a potom este SQL
>Problem s topic-u SQL, SQL a este raz SQL pretrvava...
Nazdar seci...
Pocas Vianoc som tu nastienil 1 problem, ale este som ho nedoriesil,
takze
Vas opat prosim o pomoc...
Takze aby nevznikli nejasnosti este raz podrobny popis problemu:
Mam tabulku A (X,...) a tabulku B (SUMA, PLUS, MINUS,...) kde PLUS a
MINUS
obsahuju hodnoty X definovane v A.
Chcem (vysledok) tabulku C, kde bude C (X, SUMA). Tato SUMA v C sa
vypocitava tak, ze sa pre kazde X prejdu vsetky riadky v B a ak sa
hodnota
PLUS v danom riadku rovna X tak sa hodnota z B.SUMA pripocita k C.SUMA,
a ak
sa MINUS v danom riadku rovna X tak sa hodnota z B.SUMA (daneho riadku)
pripocita k C.SUMA.
V tabulke A (X,...) X reprezentuje nieco ako cislo uctu a ...
reprezentuju
jeho blizsi popis. Tabulka B je vlastne nieco ako uctovanie, kde sa
udava
SUMA a obraty na dvoch uctoch PLUS (nieco ak MD) a MINUS (nieco ako
DAL).
Vysledna tabulka C ma vlastne urcovat konecne zostatky na vsetkych
uctoch.
(cize scitane vsetky sumy PLUS a odcitane vsetky sumy MINUS pre dany
ucet.)
Pocas toho co ste mi pomahali som prisiel k nasledovnym zaverom:
SELECT X,
((SELECT SUM(Suma) FROM B WHERE Plus=X)
-(SELECT SUM(Suma) FROM B WHERE Minus=X)) AS Suma
FROM A
vracia skoro spravne vysledky, az na 2 problemy:
1. Je to pomale (ale to mi az tak nevadi)
2. Funguje to iba vtedy ak sa dane X v tabulke B nachadza aspon raz v
polozke PLUS a aspon raz v polozke MINUS). V tomto pripade vrati spravny
vysledok. Ak sa vsak X nenachadza aspon raz v oboch tak to proste necha
prazdne policko (ide asi o to, ze SUM(Suma) vrati NULL. Cize vysledok
vyzera
takto:
{priklad by nemal ublizit}
TABULKA A
X POPIS
1 ...
2 ...
3 ...
4 ...
5 ...
TABULKA B
SUMA PLUS MINUS
100 1 2
200 3 1
50 4 5
10 5 3
TABULKA C - toto vrati ten kod uvedeny vyssie
X SUMA
1 -100
2
3 190
4
5 -40
TABULKA C - toto chcem aby vratil
X SUMA
1 -100
2 -100
3 190
4 50
5 -40
Dufam ze teraz, je to uz uplne jasne... A este viac dufam, ze sa niekomu
podari
pomoct mi s tym...
Este si pamatam, ze niekto mi radil nieco za pomoci IsNull, ale neviem
ako
sa s tymto prikazom pracuje a jeho priklad nefungoval.
Popredu vdaka moc...
Vas verny Salmon
moscovic(zv)fred.utc.sk
salmon(zv)frcatel.utc.sk
PS: ak niekto vie o nejakej dobrej literature o SQL dajte mi pls
vediet...
najlepsie
nejaky zdroj na inete... ale moze byt aj kniha... Myslim, ze nie som sam
kto
zacina a tak by to tu mohlo pomoct viacerym...Like v procedure na IB
[*] Pavel Chaloupka <pavel(zv)mc-club(tec)cz> - 14.1.1999 13:56:47
Predpokladam, ze by to melo byt takto:
(Cast(:Sklad as character) | "%") and
na IB je na spojovani stringu znak | misto +. -----P�vodn� zpr�va-----
Od: Pavel Bare� <atoll(zv)telecom(tec)cz>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 12:02
P�edm�t: Like v procedure na IB
Poradte mi prosim nekdo se syntax� LIKE v proceduer poku do ni
poterbuji dat promenou
domnival jsem se ze to ma byt nejak takhle:
alter PROCEDURE STAV_SKLADU (
ODD DATE,
DOD DATE,
SKLAD smallint,
VYROBEK INTEGER
) RETURNS (
STAV FLOAT
) AS
declare variable pom float;
declare variable pom2 float;
begin
select sum(vydej) from pohyb
where cislo_vyr=:vyrobek and cis_skladu =:sklad and datum between :odD
and :doD into :pom;
if (pom is null) then pom=0;
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
(Cast(:Sklad as character)+"%") and
datum between :odD and :doD into :pom2; if (pom2 is null) then pom2=0;
stav=pom-pom2;
suspend;
end
ale takhle to nechodi ani zadna jina syntaxe, ktera mne napadla
dekuji za radu
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
CTETE, VELMI DULEZITE !!!
[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 14.1.1999 13:58:10
Teda(ptal jsem se uz jednou ale prece jenom pro upreneni) pokud budu
predpokladat, ze muj program pobezi na compu, na kterem je nainstalovan
MS Office, potrebuji jenom DAO komponenty(nemusim kupovat "MS
Access/Developers Toolkit") -- vyplyva to z toho logicky, ale jen tak
pro potvrzeni.
> -----P�vodn� zpr�va-----
> Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl�no: 14. ledna 1999 12:27
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: CTETE, VELMI DULEZITE !!!
>
> Ale zase ho ma kazdy uzivatel MS Office. A to je dnes kazdy, ze. A
> ho*no
> ma dnes taky skoro kazdy :-))))))))))
>
>
> Martin Fron�k
> ZZN Slan� a.s.
> Pra�sk� 1579, 274 49, Slan�
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: Martin Kubecka [SMTP:martin.kubecka(zv)amenit(tec)cz]
> > Odesl�no: 14. ledna 1999 11:56
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: CTETE, VELMI DULEZITE !!!
> >
> > No je ale DAO je ti v podstate bez MS JET k ho*nu a ten zdarma neni
> > ;-)))
> >
> > Mac
> >
> > Mirek �ipel wrote:
> >
> > > je to opravdu skveli ze je DAO i ADO zdarma...
> > >
> > > M.
> >
> > --
> > ==============================================================
> > = Ing. Martin Kubecka - Amenit s.r.o. =
> > = Na Valech - budova Dytron, 741 01 Novy Jicin =
> > = telefon/fax: +420 656 706203 mobil: +420 603 265926 =
> > = http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
> > = ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
> > ==============================================================
> > None
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 14.1.1999 13:58:45
Nastav
Canvas.Brush.Style := bsClear;
tim se nastavi barva Brushe na transparentni, a Brushem se prave
podmalovava TextOut.
Filip Jirsak
> From: SICHTA Daniel <Sichta(zv)asset.sk>
> To: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
> Date sent: Thu, 14 Jan 1999 08:44:12 +0100
> Send reply to: delphi-l(zv)fwd(tec)cz
> Caute
>
> Potreboval by som poradit, ako vypisem text na canvas pomocou textout,
> tak aby bol text transparentny.
> pouzivam OS-Win98,Delphi 3. Diky.
>
>
> Ing. Daniel eichta
> ASSET s.r.o. Rosinskss 8
> 011 05, AEilina SLOVAKIA
> % 421-89-542-15
> ) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk>
> *************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
CTETE, VELMI DULEZITE !!!
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 14:20:14
Taky myslim. Developers Toolkit potrebujes jen aby si to mohl legalne sirit
dale.
Mac
Petr Zahradnik wrote:
> > predpokladat, ze muj program pobezi na compu, na kterem je nainstalovan MS
> > Office, potrebuji jenom DAO komponenty(nemusim kupovat "MS
> > Access/Developers Toolkit") -- vyplyva to z toho logicky, ale jen tak pro
> > potvrzeni.
>
> Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
> Microsoft Access, pak nepotrebujes nic.
>
> Petr Zahradnik, pocitacovy expert
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
CTETE, VELMI DULEZITE !!!
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 14:22:39
Puvodni zprava, kterou napsal Mor�ol Marian dne 14 Jan 99,:
> Teda(ptal jsem se uz jednou ale prece jenom pro upreneni) pokud budu
> predpokladat, ze muj program pobezi na compu, na kterem je nainstalovan MS
> Office, potrebuji jenom DAO komponenty(nemusim kupovat "MS
> Access/Developers Toolkit") -- vyplyva to z toho logicky, ale jen tak pro
> potvrzeni.
Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
Microsoft Access, pak nepotrebujes nic.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Pouziti databaze
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.1.1999 14:22:48
Access Developers Toolkit neco okolo 15.000,- tusim (neznam aktualni
ceny) a za DAO komponenty jsem dal cca 3.500,- Kc.
Mac
Krayzel Libor wrote:
> > Nevyhody:
> >
> > - nutnost dalsich prvotnich investic mimo Delphi (Access
> > resp. Developers Toolkit, DAO komponenty)
>
> Cena?
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Edit komponenta bez API na DSP
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 14.1.1999 14:25:09
Na DSP by nekde mela byt nova komponenta (pridana maximalne pred
mesicem), ktera resi Edit, aniz by vyuzivala standardnich komponent
Windows, meno bylo tusim nejak redit...(???). Bohuzel jsem si smazal
mail, kde byla jeji adresa a na DSP
ji nemuzu vubec najit, nevite o ni nekdo (nebo nemate nekdo schovane
posledni tak 4 maily z DSP o uploadu)?
Ach jo, pocitac ten jeden mail urcite snese, ale ja ho musel rychle
smazat, abych v nich mel poradek -:)
Predem mockrat diky
Filip Jirsak*************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Hranate zakonceni cary
[*] roman.palarcik(zv)spt(tec)cz - 14.1.1999 14:35:01
Tak mi to pripada taky divne, napsal jsem to takhle, vyzkousel na dvou
PC (obe grafiky sice uplne obycejne) a neslo to. Asi bude lepsi
spolehnout se na vykresleni pres obdelnik. Jinak diky za vyzkouseni.
procedure TForm1.Button1Click(Sender: TObject);
var
DC: HDC;
LB: TLOGBRUSH;
PEN, oldPEN: HPEN;
begin
DC:=GetDC(Handle);
LB.lbStyle:=BS_SOLID;
LB.lbColor:=RGB(100,100,100);
PEN:=ExtCreatePen(PS_GEOMETRIC or PS_SOLID or PS_ENDCAP_SQUARE, 10,
LB, 0, nil);
oldPEN:=SelectObject(DC, PEN);
MoveToEx(DC, 50, 50, nil);
LineTo(DC, 200, 200);
SelectObject(DC, oldPEN);
DeleteObject(PEN);
ReleaseDC(Handle, DC);
end; Roman Palarcik
roman.palarcik(zv)spt(tec)cz
----------------------------------------------------------------------
-----------------
Tak mi to pripadlo divne a napsal jsem kousek kodu:
CPaintDC dc(this);
LOGBRUSH logbrush;
logbrush.lbStyle = BS_SOLID;
logbrush.lbColor = RGB(100,100,100);
logbrush.lbHatch = HS_CROSS; //to se ale ignoruje
HPEN hpen = ExtCreatePen(PS_GEOMETRIC | PS_SOLID |
PS_ENDCAP_SQUARE,
10,&logbrush,0,NULL);
SelectObject(dc.m_hDC,hpen);
dc.MoveTo(10,10);
dc.LineTo(100,150);
DeleteObject(hpen);
A chodi to, cara je pekne hranata. Kdyz se vynecha parametr
PS_ENDCAP_SQUARE, jsou konce kulate. Zkus treba jinou grafickou kartu.
Zrovna vcera mi na karte Riva TNT 16 MB Delphi odmitaly kreslit svislou
caru o sile 2 pixely.********************************************************
Petr Brant [p.brant(zv)samo(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************> -----P�vodn� zpr�va-----
> Od: roman.palarcik(zv)spt(tec)cz [SMTP:roman.palarcik(zv)spt(tec)cz]
> Odesl�no: 13. ledna 1999 13:02
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Hranate zakonceni cary
>
> Ve Win98 je to to same, na NT nemam moznost vyzkouset. Jedine co me
> napadlo je kreslit ty cary jako obdelniky, prip. pokud budou zesikma
> tak jako 4-uhelnik. Musely by se ale spocitat koncove body. Pokud by
> ale bylo lepsi reseni, byl bych radsi. Nehlede na to, ze pekne
> navazovani sikmych car stejne neudelam a spravne by to ta funkce mela
>
> taky umet.
>
> Roman Palarcik
> roman.palarcik(zv)spt(tec)cz
>
>
> > -----P�vodn� zpr�va-----
> > Od: roman.palarcik(zv)spt(tec)cz [SMTP:roman.palarcik(zv)spt(tec)cz]
> > Odesl�no: 13. ledna 1999 8:58
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Hranate zakonceni cary
> >
> > Po delsi dobe mam takovy dotaz:
> > Zkousel jsem pomoci API funkci kreslit caru, ktera by mela hranate
> > zakonceni. Pouzival jsem k tomu ExtCreatePen, ktery to podle helpu
> > umoznuje (s parametrem PS_ENDCAP_SQUARE), ale porad to kresli s
> > kulatym
> > zakoncenim uplne stejne jako kdyz se to vytvori pomoci CreatePen.
> Neni
> >
> > to nahodou tim, ze to Win95 nepodporuje? Klasicke kresleni na canvas
> > totiz umi taky jenom cary s kulatym zakoncenim.
> >Unicode
[*] Tomas Vesely <veselyt(zv)sagas(tec)cz> - 14.1.1999 14:52:07
Ahoj,
chtel jsem se zeptat, jestli nekdo nevite o nejakem dokumentu nebo knize
o Unicodu. Jak se vubec zadava a podobne.
Diky
Vesna
veselyt(zv)sagas(tec)cz
Edit komponenta bez API na DSP
[*] Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz> - 14.1.1999 14:58:16
Filip Jirsak wrote:
> Na DSP by nekde mela byt nova komponenta (pridana maximalne pred
> mesicem), ktera resi Edit, aniz by vyuzivala standardnich komponent
> Windows, meno bylo tusim nejak redit...(???). Bohuzel jsem si smazal
> mail, kde byla jeji adresa a na DSP
> ji nemuzu vubec najit, nevite o ni nekdo (nebo nemate nekdo schovane
> posledni tak 4 maily z DSP o uploadu)?
Nejsem si uplne jisty jestli je to ono, ale nedavno jsem z DSP stahl
komponentu mwEdit, ktera je prave napsana uplne od zakladu znova a
umoznuje i Syntax Highlight (lze pridat i vlastni jazyky krome
Delphi...).
Je to kompletne vcetne zdrojaku, presne misto na DSP ted nemuzu najit,
jelikoz maji vypnuty Search...
--
<TT>
/* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
/* xcibulka(zv)hwlab.felk.cvut(tec)cz */
/* KCibulka(zv)seznam(tec)cz */
/* ardour(zv)usa.net */
/* OnLine: If you have ICQ my ICQ# is 4111110. */
/* If you don't have ICQ you can page me through: My Personal */
/* Communication Center: http://wwp.mirabilis.com/4111110 */
/* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
/* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
</TT>
Edit komponenta bez API na DSP
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 14.1.1999 15:22:50
Haj hou!
Najdes to i na www.torry.ru v Samples (mwEdit) nebo primo u zdroje na
http://www.eccentrica.org/gabr/mw/
HTH
> Na DSP by nekde mela byt nova komponenta (pridana maximalne pred
> mesicem), ktera resi Edit, aniz by vyuzivala standardnich komponent
> Windows, meno bylo tusim nejak redit...(???). Bohuzel jsem si smazal
> mail, kde byla jeji adresa a na DSP
> ji nemuzu vubec najit, nevite o ni nekdo (nebo nemate nekdo schovane
> posledni tak 4 maily z DSP o uploadu)?
CTETE, VELMI DULEZITE !!!
[*] Pavel Zichovsky <zichovsky(zv)jesnem(tec)cz> - 14.1.1999 15:27:11
Martin Fron�k napsal toto:
> Ale zase ho ma kazdy uzivatel MS Office. A to je dnes kazdy, ze. A ho*no
> ma dnes taky skoro kazdy :-))))))))))
To s tim Office snad ani nemuzes myslet vazne??? To si opravdu myslis, ze
kazdy, kdo ma Win, tak si hned koupi Office Professional (ktery ma MSJET)
za takovy prachy, co za to chcou??? Nezanedbatelne mnozstvi lidi pouziva
neco jineho (602, Corel apod.). Podminovat funkci programu (vetsinou
specializovaneho) pritomnosti MS Office je docela zrudnost. A to, ze ho ma
vetsina lidi (mozna i legalne????), te neomlouva.
S pozdravem
Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
mobil: pavel.zichovsky(zv)sms.paegas(tec)cz (120 znaku)
PGP podporovano a vitano
Unicode
[*] David Hrbac <hrbac.david(zv)usa(tec)net> - 14.1.1999 15:38:33
viz www.unicode.org
David Hrbac
-----P�vodn� zpr�va-----
Od: Tomas Vesely <veselyt(zv)sagas(tec)cz>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 15:20
P�edm�t: Unicode
Ahoj,
chtel jsem se zeptat, jestli nekdo nevite o nejakem dokumentu nebo knize
o Unicodu. Jak se vubec zadava a podobne.
Diky
Vesna
veselyt(zv)sagas(tec)cz
TDatabase, Paradox a transakce
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 14.1.1999 15:52:10
Zdravicko...
V BDE 5.01 je tech zaznamu opravdu 255 a po prekroceni tohoto limitu
vyhazuje exception, a ne ze ne.
F.
> -----P�vodn� zpr�va-----
> Od: Marek Prokop [SMTP:prokopsw(zv)czn(tec)cz]
> Odesl�no: st�eda, ledna 13, 1999 21:41
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: TDatabase, Paradox a transakce
>
> Transakce s Paradoxem v zasade funguji, ale vyznam maji spis ve
> viceuzivatelskem pristupu k datum. V zadnem pripade nepomohou pri
> padu pocitace nebo programu.
>
> Je ale treba dat veliky pozor na omezeni po�tu
> updatovanych/insertovanych zaznamu (delete bez omezeni). Tento limit
> je u ruznych verzi BDE ruzny, s vyssi verzi se zvysuje, ale i tak je
> prakticky neunosne maly. Myslim, ze to je 255 zaznamu (shoduje se,
> tusim, s max. poctem recordlocku), z hlavy to ted nevim presne.
> Jakmile je tento limit prekrocen, dalsi zaznamy uz
> updatovany/insertovany nejsou, a to bez jakehokoli upozorneni!!!!
>
> Marek Prokop
CTETE, VELMI DULEZITE !!!
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 14.1.1999 16:36:28
Me to nemusi omlouvat, ja jen tvrdim, ze Office ma dnes skoro kazdy.
A to ostatni me nezajima. Potrebuji kompatibilitu, a tu mi dava MS.
Osobne nepouzivam MS JET, tak me neobvinuj........
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Zichovsky [SMTP:zichovsky(zv)jesnem(tec)cz]
> Odesl�no: 14. ledna 1999 15:27
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: CTETE, VELMI DULEZITE !!!
>
> Martin Fron�k napsal toto:
>
> > Ale zase ho ma kazdy uzivatel MS Office. A to je dnes kazdy, ze. A
> ho*no
> > ma dnes taky skoro kazdy :-))))))))))
> To s tim Office snad ani nemuzes myslet vazne??? To si opravdu myslis,
> ze
> kazdy, kdo ma Win, tak si hned koupi Office Professional (ktery ma
> MSJET)
> za takovy prachy, co za to chcou??? Nezanedbatelne mnozstvi lidi
> pouziva
> neco jineho (602, Corel apod.). Podminovat funkci programu (vetsinou
> specializovaneho) pritomnosti MS Office je docela zrudnost. A to, ze
> ho ma
> vetsina lidi (mozna i legalne????), te neomlouva.
>
[Martin Fron�k] Jak "mozna i legalne?" ty to nemas legalne?InstallShield + BDE (Paradox)
[*] Ondrej Jaura <jaura(zv)redbull.dcs.fmph.uniba.sk> - 14.1.1999 16:48:27
Zdravim
Pomocou programu InstallSHield dodavaneho s D4 som vytvoril
instalaciu programu vyuzivajuceho BDE (Paradox).
Testovacia instalacia prebehla vporiadku (W95CZ + vyvojove
prostredie D4).
Instalacia na WinNT 4 US prebehla vporiadku, ale pri spusteni
program hlasil chybu o nemoznosti inicializovat BDE.
Pri instalacii som zvolil pridanie BDE - cast Paradox.
Program vyuziva TTable a TQuery - samozrejme na Paradox subory.
Tabulky maju nastavene langdrv na Paradox Czech ANSI. Dakujem za pomoc
Ondrej Jaura
-----------------
Ondrej Jaura
student 1.rocnika MFF UK Bratislava, odbor: informatika
e-mail: jaura(zv)redbull.dcs.fmph.uniba.sk
homepage: http://redbull.dcs.fmph.uniba.sk/~jaura
on-line: talker Tri Tulene - netopier.dnp.fmph.uniba.sk 5678 (Kerberos)
-----------------
Like v procedure na IB
[*] Pavel Chaloupka <pavel(zv)mc-club(tec)cz> - 14.1.1999 16:53:50
Oprava :
(Cast(:Sklad as character) || "%") and
na IB je na spojovani stringu znak || misto +.
-----P�vodn� zpr�va-----
Od: Pavel Chaloupka <pavel(zv)mc-club(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 15:09
P�edm�t: Re: Like v procedure na IB
Predpokladam, ze by to melo byt takto:
(Cast(:Sklad as character) | "%") and
na IB je na spojovani stringu znak | misto +. -----P�vodn� zpr�va-----
Od: Pavel Bare� <atoll(zv)telecom(tec)cz>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 12:02
P�edm�t: Like v procedure na IB
Poradte mi prosim nekdo se syntax� LIKE v proceduer poku do ni
poterbuji dat promenou
domnival jsem se ze to ma byt nejak takhle:
alter PROCEDURE STAV_SKLADU (
ODD DATE,
DOD DATE,
SKLAD smallint,
VYROBEK INTEGER
) RETURNS (
STAV FLOAT
) AS
declare variable pom float;
declare variable pom2 float;
begin
select sum(vydej) from pohyb
where cislo_vyr=:vyrobek and cis_skladu =:sklad and datum between :odD
and :doD into :pom;
if (pom is null) then pom=0;
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
(Cast(:Sklad as character)+"%") and
datum between :odD and :doD into :pom2; if (pom2 is null) then pom2=0;
stav=pom-pom2;
suspend;
end
ale takhle to nechodi ani zadna jina syntaxe, ktera mne napadla
dekuji za radu
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
WinNT 4 - narodne prostredie
[*] Ondrej Jaura <jaura(zv)redbull.dcs.fmph.uniba.sk> - 14.1.1999 16:54:22
Zdravim
Potreboval by som pridat do WinNT 4 US narodne (=CZ/SK)
prostredie.
Resp.: ako sa sprava ceske triedenie na tabulkach Paradox v BDE na
ne-ceskom prostredi, ako funkcie AnsiUpperCase?
Ako postupovat vyuzitim prostriedkov, ktore ponuka Delphi 4? Dakujem za rady
Ondrej Jaura
-----------------
Ondrej Jaura
student 1.rocnika MFF UK Bratislava, odbor: informatika
e-mail: jaura(zv)redbull.dcs.fmph.uniba.sk
homepage: http://redbull.dcs.fmph.uniba.sk/~jaura
on-line: talker Tri Tulene - netopier.dnp.fmph.uniba.sk 5678 (Kerberos)
-----------------
sdileni disku pro konkretni aplikaci
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 14.1.1999 17:03:43
Api funkce :
WNetAddConnection & spol
Vaclav Sazima
Petr Kro�a ml. wrote:
>
> Dekuji za cennou radu, ale jeste bych potreboval vedet, jak se napamovani a
> odmapovani provadi v D3. Tedy, ktera knihovna (ci komponenta) to ma na
> starost.
>
> PK
> -----P�vodn� zpr�va-----
> Od: Jan Fiala <fiala(zv)infos(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 15. ledna 1999 7:30
> P�edm�t: Re: sdileni disku pro konkretni aplikaci
>
> >Jedno z reseni by bylo sdilet disk na NT se jmenem, koncicim znakem $,
> napr.
> >Disk$. V programu si ho pak namapovat a na konci odmapovat. Pokud disk
> konci
> >znakem $, neni videt ve sdilenych prostredcich.OCX,BDE, a instalacia/registracia
[*] Administrator <Administrator(zv)rosoft.sk> - 14.1.1999 17:21:15
> Chyba muze byt v tom, ze pri instalaci chybi nejaka DLL. Zkus provest
> registraci rucne pomoci regsvr32 a pokud ti to vrati chybu tusim 485,
> je
> to tutove nejaka chybejici DLL. Zkus zjistit, jake jsou rozdily v
> konfiguraci jednotlivych pocitacu (jeden ma instalovanou treba Foxku,
> druhy ne) a podle toho by se dalo odhadnout, co chybi. Preji hodne
> stesti.
>
>
Skusal som to pomocou regsvr32 a vypisovalo to chybu tusim 07
Potom som to v installshielde neinstaloval ako Program Files,
ale ako
System - Files a napodiv zaregistroval korektne!!!!!!
Povodne som skusal OCX s tym istym .tlb, ale jedno bez BDE
(uplne ciste)
a inokedy to normalne OCX uz zo vsetkymi nalezitostami.
Nefungovalo ani jedno
ani druhe na niektorych pocitacoch (tie, ktore mali uz
instalovane BDE fungovali!!!!!)
Vysledok: Ked instalujem OCX az ako system file tak to
nainstaluje v poriadku!!!!!
Ale: Viete niekto preco??
> otazky
[*] Administrator <Administrator(zv)rosoft.sk> - 14.1.1999 17:22:45
1.)
Potreboval by som vediet ci a ako pouziva SQL v TQuery mnou vytvorene
indexy v Tabulkach Paradox.
2.)
Je zamknutie Paradox tabulky 7.0 na password dostatocna ochrana proti
ukradnutiu udajov ci nie?
Dakujem za odpoved na moje trivialne otazky.
Patrik Tesar
ROSOFT
off topic - Excel tabulka
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 14.1.1999 17:43:24
>Vsiml sis, ze toto je konference o Delphi?
>
ahoj
Vsiml , ale mam nouzi, pokud posles, bude fajn /snad/ Jiri Heinisch
Kdo si stahne; potesi me i sebe
http://www.mujweb(tec)cz/www/heinisch/Narozen.zip Free
http://www.mujweb(tec)cz/www/heinisch/Bedekr.zip Shareware - skoro zadarmo
H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec
Odchytavani paketu
[*] sup(zv)svitap(tec)cz - 14.1.1999 17:51:24
Hi lidi,
napred trochu omacky okolo: mam PC s WinNT jako komunikacni server pro
Internet, dve sitovy karty, jednu pro vnitrni sit, druhou napojenou na
pevnou linku. Mezi nimi routing, firewal atd.
Potreboval bych na karte pro vnitrni sit ochytavat pakety a zjistovat, ktery
uzivatel kam miri, a to v Delphi3. Napr: uzivatel 192.168.0.240 se prave
prihlasuje na http://www.seznam(tec)cz.
Prosim o nakopnuti spravnym smerem. Dekuju predem.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420 461 568 202
fax: ++420 461 568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
InstallShield + BDE (Paradox)
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 14.1.1999 18:52:33
Ahoj, Ondreji,
mel jsem odobny problem pod D3. Install shield totiz proti rozumnemu
ocekavani nezapise do Registry cestu na BDE DLL-ky. Takze je potreba do
Install-shildu pridat cosi, aby je to tam zapsalo. Nejak jsem to delal, ale
uz nevim jak. Ale jde to vcelku bez problemu. Tady je popis chyby:
$2109 Cannot initialize the BDE" error
- nebyla v registry cesta k BDE DLL-k�m
The following entry in the registry is probably incorrect:
HKEY_LOCAL_MACHINE\SOFTWARE|\BORLAND\DATABASE ENGINE\ DLLPATH.
This entry is probably empty or pointing to the wrong location on the
deployed machine's registry.
Enter the path to IDAPI32.DLL
(usually <drive>: \bugtrack\bde).
-----P�vodn� zpr�va-----
Od: Ondrej Jaura <jaura(zv)redbull.dcs.fmph.uniba.sk>
Komu: Konferencia Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 17:02
P�edm�t: InstallShield + BDE (Paradox)> Zdravim
>
>
> Pomocou programu InstallSHield dodavaneho s D4 som vytvoril
>instalaciu programu vyuzivajuceho BDE (Paradox).
> Testovacia instalacia prebehla vporiadku (W95CZ + vyvojove
>prostredie D4).
>
> Instalacia na WinNT 4 US prebehla vporiadku, ale pri spusteni
>program hlasil chybu o nemoznosti inicializovat BDE.
>
> Pri instalacii som zvolil pridanie BDE - cast Paradox.
>
> Program vyuziva TTable a TQuery - samozrejme na Paradox subory.
>Tabulky maju nastavene langdrv na Paradox Czech ANSI.
>
> Dakujem za pomoc
> Ondrej Jaura
>
>
>-----------------
> Ondrej Jaura
>
> student 1.rocnika MFF UK Bratislava, odbor: informatika
>
> e-mail: jaura(zv)redbull.dcs.fmph.uniba.sk
> homepage: http://redbull.dcs.fmph.uniba.sk/~jaura
> on-line: talker Tri Tulene - netopier.dnp.fmph.uniba.sk 5678 (Kerberos)
>-----------------
>CTETE, VELMI DULEZITE !!!
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.1.1999 18:57:15
Petr Zahradnik wrote:
> Puvodni zprava, kterou napsal Zbysek Hlinka dne 13 Jan 99,:
>
> > Nicmene nevidim zadnou prekazku, ktera by branila tomu, aby se
> > GTS SINEA objevil v OSS projektu PS (Programatori Sobe). :-)
>
> :-))) A TurboPower by nam mohl dat komplet jejich sortiment, ze? :-)))
Zcela nepochybne. Stejne to budou muset udelat, protoze jim to
programatori prestanou kupovat, kdyz si to udelaji sami.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Instalace - nastaven� alias�
[*] Arnost Kobylka <Arnost.Kobylka(zv)atlas(tec)cz> - 14.1.1999 19:11:13 -0000
Pou��v�m D2 (C/S) s IS Express. Pot�ebuji u klienta p�ednastavit aliasy a
drivery na ur�it� hodnoty, nap�. jm�no datab�ze, serveru (instalace na mnoha
stanic�ch jednoho z�kazn�ka), p��padn� i vazbu na ODBC. Je to mo�n�?
V kroku 3 nastaven� BDE to na mn� chce jakousi cestu, nen� mi moc jasn�
jakou, ani mo�nosti t�ch "optional parameters".
M�te n�kdo zku�enosti?
Ing. Arno�t Kobylka
C3, s.r.o.
�rob�rova 32
Praha 10
71734608
CTETE, VELMI DULEZITE !!!
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 19:31:11
Puvodni zprava, kterou napsal Zbysek Hlinka dne 14 Jan 99,:
> > :-))) A TurboPower by nam mohl dat komplet jejich sortiment, ze? :-)))
>
> Zcela nepochybne. Stejne to budou muset udelat, protoze jim to
> programatori prestanou kupovat, kdyz si to udelaji sami.
Toho se rozhodne nebojim.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Zvlastni chybove hlaseni
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 14.1.1999 20:06:32
Ahoj, me se docela libi Raize komponenty, dostanes od Inprise
po registraci Delphi, ale ted nevim, jestli jsou i pro D4.
Zkus se tam podivat.
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
----------
> Odes�latel: Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Zvlastni chybove hlaseni
> Datum: 13. ledna 1999 18:30
>
> Ahoj,
>
> Pouzivam VCL TSystemListView a TSystemTreeView. To jsou freewarove nahrady
> za FileListBox a DirectoryListBox ve stylu 95 (jako v Exproleru).
> 2) Nevite nekdo o jinych podobnych komponentach? NEmusi byt FREE, ale hlavne
> musi fungovat a docela rad bych po registraci dostal SRC.
>
> Diky
> Vojtech Semecky
To snad neni pravda
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 14.1.1999 20:25:51
TO SNAD NENI PRAVDA, ANEB JAK SI NECHAT ZAPLATIT ZA SVE VLASTNI CHYBY
Omlouvam se za off-topic ,ale jsem pekne vytoceny.
tohle mi prislo po jednom tydnu urgenci.
-----P�vodn� zpr�va-----
Od: Michal Falta <level(zv)telecom(tec)cz>
Komu: Ji�� Heinisch <HeiJu(zv)sol(tec)cz>
Datum: 14. ledna 1999 12:52
P�edm�t: Re: Tarifikator - Error
>Ji�� Heinisch wrote:
>>
>> Dobry den
>>
>> Po delsim zkoumani jsem prisel na zavadu pri provozu tarifikatoru TT 010
>> 110
>> po zmene casoveho intervalu v dusledku zmen u a.s Telecom , vlastni
>> tarifikator na
>> tyto zmeny NEREAGUJE a porad sleduje cas v 360 sec intervalech misto 240
>> sec.
>>
>> Prosim o radu co s tim
>>
>> Jiri Heinisch
>>
Dostal jsem tuto odpoved
*************************************************
>Vazeny pane Heinisch,
>
> Chyba, kterou jste zjistil nen� v tarifik�toru, ale je v programu
>Tkonfig. Nabidka na reseni je zakoupit Upgrade programu Tkonfig s novymi
>tarify a opravenou chybou.
>
>Cena upgrade s disketou a po�tovn�m na dob�rku je 240 K� p�i zaplaceni
>p�edem na ��et 19708-551/0100 posleme mailem za cenu 195 K� s DPH a
>po�tou da�ovy doklad.
>
>S pozdravem Ing Michal Falta LEVEL
>
Programatori sobe
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 14.1.1999 20:27:43
Hlas�m se do prace, zatim muzu delat kafe.
Pokud bude potreba tak se Zbysku ozvi.
Jiri Heinisch
Kdo si stahne; potesi me i sebe
http://www.mujweb(tec)cz/www/heinisch/Narozen.zip Free
http://www.mujweb(tec)cz/www/heinisch/Bedekr.zip Shareware - skoro zadarmo
H-trading - Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
691 83 Drnholec
sdileni disku pro konkretni aplikaci
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 14.1.1999 20:42:16
To lze ovsem pouzit v pripade, ze je pristup bez hesla.
WNetAddConnection to resi i v pripade s heslem.
Vaclav Sazima
pcuhel(zv)deltax(tec)cz wrote:
>
> Cau
>
> Nestacilo by se odkazovat na server pomoci cesty
> \\Server\sdileny_adresar\soubor bez mapovani disku
>
> -----P�vodn� zpr�va-----
> Dekuji za cennou radu, ale jeste bych potreboval vedet, jak se napamovani a
> odmapovani provadi v D3. Tedy, ktera knihovna (ci komponenta) to ma na
> starost.
>
> PK
off: zasifrovana? data ve FoxPro
[*] Pavel Cink <apscomp(zv)login(tec)cz> - 14.1.1999 20:51:45
> Kdysi pred lety jsem ve Foxce (BRRR..) nejakou dobu psal, ale nevzpominam si,
> ze by mela v sobe primo sifrovaci algoritmus. Tenkrat se ale prodavali nejake
> doplnujici knihovny, ve kterych bylo prave snad i sifrovani datovych souboru.
> Prodaval to tu DAQUAS - http://www.daquas(tec)cz (tusim ze to snad u nich dokonce
> i nekdo psal), zkus se tam zeptat. Taky se podivej nejakym dekompilerem fox
> zdrojaku jestli se tam nejake takove knihovny vyskytuji.
Pokud vim, tak dekompilatory FOXky ze souboru EXE a FXP zadne PLB nebo FLL
knihovny nevytahnou. Pritom to sifrovani je pravdepodobne delane pomoci knihovny
CRYPTOR nebo NETLIB (pokud si na to nekdo nenapsal neco sam).
V pripade CRYPTORu neni klic nikde ulozen a bey jeho znalosti nemas sanci.
V pripade pouziti funkci knihovny NETLIB je vzdy sifrovan cely soubor a jeho delka se prodluzuje o 8 Byte. Ovsem kde ten klic najit to nevim. Kazdopadne tabulku
zakodovanou NETLIBem rozhodne neotevres prikazem USE.
To je tak vsechno, co si jeste z FOXkareni ohledne tohoto problemu pamatuju.
S pozdravem
Pavel
Hranate zakonceni cary
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:10:31
roman.palarcik(zv)spt(tec)cz wrote:
>
> Tak mi to pripada taky divne, napsal jsem to takhle, vyzkousel na dvou
> PC (obe grafiky sice uplne obycejne) a neslo to. Asi bude lepsi
> spolehnout se na vykresleni pres obdelnik. Jinak diky za vyzkouseni.
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> DC: HDC;
> LB: TLOGBRUSH;
> PEN, oldPEN: HPEN;
> begin
> DC:=GetDC(Handle);
> LB.lbStyle:=BS_SOLID;
> LB.lbColor:=RGB(100,100,100);
> PEN:=ExtCreatePen(PS_GEOMETRIC or PS_SOLID or PS_ENDCAP_SQUARE, 10,
> LB, 0, nil);
> oldPEN:=SelectObject(DC, PEN);
> MoveToEx(DC, 50, 50, nil);
> LineTo(DC, 200, 200);
> SelectObject(DC, oldPEN);
> DeleteObject(PEN);
> ReleaseDC(Handle, DC);
> end;
Ahoj,
Zkousel jsem to na Win95 a nakresli to se zakulacenym okrajem. Nektere styly
ExtCreatePen jsou totiz podporovany jen v NT.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
QuickReport vs HP 1100
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:13:49
Martin Kubecka wrote:
>
> Uz jsme se o tom bavili v Belohrade. Ja fakt nevim, co ta tiskarna umi nebo ne
> (hlavne nevim jak to zjistim ;-). Co me stve je to, ze musim vubec neco
> predelavat a zakaznikovi tezko vysvetlis, ze je chyba jinde nez u tebe a tudiz
> si zase "vydelam", kdyz jine programy (Word ;-) funguji. Jeste musim zkusit
> Sineu a kdyz tak to predelam (diky JAROvi to muzu zkusit uz dnes a naostro,
> protoze mi poslal "brousek" ;-)
>
> Mac
>
> P.S. Ja jen ze to asi velmi brzo postihne i dalsi lidi, protoze HP 1100 je
> tusim pokracovatel rady HP 6L a 5L ;-)
To jsou ty neustale inovace. Jakmile se objevi jakztakz dodelany produkt, uz
je treba jej nahradit novym, zpravidla nedotazanejsim .... :-) Urcite bych
to napsal QuSoftu, at se na to podivaji.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Zvlastni chybove hlaseni
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.1999 21:16:33
Puvodni zprava, kterou napsal Ing. Zdenek Sraier dne 14 Jan 99,:
> Ahoj, me se docela libi Raize komponenty, dostanes od Inprise
> po registraci Delphi, ale ted nevim, jestli jsou i pro D4.
> Zkus se tam podivat.
Jsou i pro D4.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
VersionInfo
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:16:34
"Ing. Zdenek Sraier" wrote:
>
> Zdravim vsechny pritomne,
>
> Mam jeden projekt, ktery se tahne jiz od D1. Nyni v D4 si hraju
> s volbou kompilatoru "Include Version Information in project".
> U vsech ostatnich projektu to funguje dobre, ale tady tam ty informace
> nedostanu.
> Tedy aby bylo jasno - vymazal jsem vsechny soubory projektu krome *.DPR,
> znova jsem to ulozil, v options je zaskrtnute include a autoincrement,
> v options se to zobrazuje dobre, ale v EXE to neni - koukam na to pres
> Explorer - soubor - vlastnosti. Co s tim ?????
Ahoj,
To je zvlastni, vymazal jsi i .res soubor projektu ?
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Ctrl, Alt, Shift...
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:19:47
"Ing. Zdenek Sraier" wrote:
>
> Nazdar,
>
> Nechci byt valecny stvac, ale kde presne ty kody najdes.
> Mam D4 Prof a jiz nekolikrat jsem to v helpu hledal a bez uspechu.
> Nastesti je mam vytistene jeste z D2.
> Bohuzel je v D4 nenajdu a nenajdu a nenajdu a ....
Ahoj,
Ja je najdu primo ve Win32API helpu (ne pres Delphi Help) pod heslem "Virtual-Key Codes".
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Explorer-like komponenty (Was:Zvlastni chybove hla
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:35:26
Vojtech Semecky wrote:
> Ahoj,
>
> Pouzivam VCL TSystemListView a TSystemTreeView. To jsou freewarove nahrady
> za FileListBox a DirectoryListBox ve stylu 95 (jako v Exproleru).
> 2) Nevite nekdo o jinych podobnych komponentach? NEmusi byt FREE, ale hlavne
> musi fungovat a docela rad bych po registraci dostal SRC.
Ahoj,
Existuji komponenty ShellControlPack, muzes si pomoci toho udelat aplikaci temer
podobnou Exploreru. Najdes je na http://www.plasmatech.com/.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Zmena data/casu vytvoreni adresare
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:36:09
Marek ��ek wrote:
>
> Ahoj,
>
> Poradite mi, jak se da ve windows zmenit datum/cas vytvoreni adresare ?
Ahoj,
Tenhle problem se tu jiz kdysi objevil, a pokud vim tak ve Win95 se nenaslo zadne
reseni. Pritom to na prvni pohled vypada jako banalita .... :-)
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Zastupce LNK
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.1999 21:54:27
Jirka wrote:
>
> Ahoj,
>
> nevite nekdo , jak ze zastupce (*.lnk) ziskat informace o souboru a ceste k
> nemu - v D3?
Ahoj,
Najdes to tady: http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\nov\13\dlfaaadb.htm
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
GROUP BY MESIAC V PARADOX
[*] Jan Skopov� <jan.skopovy(zv)vol(tec)cz> - 14.1.1999 22:47:06
Toto v BDE opravdu nejde (lokalni SQL).
Jan Skopovy
-----P�vodn� zpr�va-----
Od: Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 9:08
P�edm�t: RE: GROUP BY MESIAC V PARADOX
Na SQL (Informix), ale i ve FoxPro se da pouzit:
SELECT MONTH(DatumField), YEAR(DatumField), sum(neco) from table group
by 1,2
Ale nevim jsetli to pusti BDE (na SQL nejspis ano)
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+
-----Original Message-----
From: Jan Skopov� [mailto:jan.skopovy(zv)vol(tec)cz]
Sent: Wednesday, January 13, 1999 7:20 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: GROUP BY MESIAC V PARADOX
Jestli jsem to spravne pochopil, jedna se o lokalni SQL.
V tom pripade mas smulu. Existuje sice funkce EXTRACT(Month From
DatumField), ta se vsak da pouzit vsude krome klauzule GROUP BY. Jedina
moznost je pri ulozeni a zmene ukladat do pridavneho fieldu napr:
PouzeMesicField cislo mesice rucne a podle tohoto fieldu pak grupovat.
Lokalni SQL Inprise pekne zmrskal.
Jan Skopovy
-----P�vodn� zpr�va-----
Od: Pavol Griga <paly(zv)sct.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 13. ledna 1999 18:24
P�edm�t: GROUP BY MESIAC V PARADOX
> Nevie mi niekto poradit ako nad tabulkou s dvoma
>stpcami Datum, Hodnota urobit sumarizaciu
>za jednotlive mesiace.
>
> za dobru radu vopred Pan Boh zaplat
Like v procedure na IB
[*] Jaroslav KULHEIM <kulheim(zv)fitness(tec)cz> - 14.1.1999 22:53:01
Myslim, ze IB neumi pouzivat parametry tvorene vyrazem ve stored procedure.
Tedy napisto asi takto:
...
DECLARE VARIABLE pomstr VARCHAR(9); /* 9 je max hodnota integeru */
...
pomstr = sklad || "%";
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
:pomstr and
datum between :odD and :doD into :pom2;
Jaroslav KULHEIM
kulheim(zv)fitness(tec)cz
-----P�vodn� zpr�va-----
Od: Pavel Bare� <atoll(zv)telecom(tec)cz>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 12:07
P�edm�t: Like v procedure na IB
Poradte mi prosim nekdo se syntax� LIKE v proceduer poku do ni
poterbuji dat promenou
domnival jsem se ze to ma byt nejak takhle:
alter PROCEDURE STAV_SKLADU (
ODD DATE,
DOD DATE,
SKLAD smallint,
VYROBEK INTEGER
) RETURNS (
STAV FLOAT
) AS
declare variable pom float;
declare variable pom2 float;
begin
select sum(vydej) from pohyb
where cislo_vyr=:vyrobek and cis_skladu =:sklad and datum between :odD
and :doD into :pom;
if (pom is null) then pom=0;
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
(Cast(:Sklad as character)+"%") and
datum between :odD and :doD into :pom2; if (pom2 is null) then pom2=0;
stav=pom-pom2;
suspend;
end
ale takhle to nechodi ani zadna jina syntaxe, ktera mne napadla
dekuji za radu
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
To snad neni pravda
[*] Micrel <micrel(zv)micrel(tec)cz> - 14.1.1999 23:00:52
Zrejme je to normalni a stve mne to taky. Ja jsem od roku 1992, kdy delam
tarifikacni programy, vzdycky pri jakekoliv zmene ze strany SPT Telecomu
nebo chybe posilal aktualizace zadarmo a i tenhle tyden posilam na vlastni
naklady stovky aktualizaci tarifikacniho programu (a mam jich instalovano
vice jak dva tisice) pro uzivatele, kteri nemaji E-mail (ti co jsou na
internetu si mohou stahnout aktualizaci sami) a nic za to nechci.
Jaro B.
-----P�vodn� zpr�va-----
Od: Ji�� Heinisch [SMTP:HeiJu(zv)sol(tec)cz]
Odesl�no: 14. I 1999 20:26
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: To snad neni pravda
TO SNAD NENI PRAVDA, ANEB JAK SI NECHAT ZAPLATIT ZA SVE VLASTNI CHYBY
Omlouvam se za off-topic ,ale jsem pekne vytoceny.
tohle mi prislo po jednom tydnu urgenci.
-----P�vodn� zpr�va-----
Od: Michal Falta <level(zv)telecom(tec)cz>
Komu: Ji�� Heinisch <HeiJu(zv)sol(tec)cz>
Datum: 14. ledna 1999 12:52
P�edm�t: Re: Tarifikator - Error
>Ji�� Heinisch wrote:
>>
>> Dobry den
>>
>> Po delsim zkoumani jsem prisel na zavadu pri provozu tarifikatoru TT
010
>> 110
>> po zmene casoveho intervalu v dusledku zmen u a.s Telecom , vlastni
>> tarifikator na
>> tyto zmeny NEREAGUJE a porad sleduje cas v 360 sec intervalech misto
240
>> sec.
>>
>> Prosim o radu co s tim
>>
>> Jiri Heinisch
>>
Dostal jsem tuto odpoved
*************************************************
>Vazeny pane Heinisch,
>
> Chyba, kterou jste zjistil nen� v tarifik�toru, ale je v programu
>Tkonfig. Nabidka na reseni je zakoupit Upgrade programu Tkonfig s novymi
>tarify a opravenou chybou.
>
>Cena upgrade s disketou a po�tovn�m na dob�rku je 240 K� p�i zaplaceni
>p�edem na ��et 19708-551/0100 posleme mailem za cenu 195 K� s DPH a
>po�tou da�ovy doklad.
>
>S pozdravem Ing Michal Falta LEVEL
>To snad neni pravda
[*] Mirun <forcom(zv)telecom(tec)cz> - 14.1.1999 23:25:15
Cemu se divis ?
Kdyz byl Gates jeste malej, tak mu jednou rodice sdelili prislovi "za chyby
se plati" a podivej se - on to pochopil po svem a vymyslel Windousy - a kde
dneska je ? :-)))
Nektere nase firmy to holt zkouseji po nem.
Chtel bych poprosit nektere zucastnene prispevatele, aby pri pokladani svych
dotazu popsali do subjectu strohe heslo, ktere urcuje o cem majl je, pripada
mi trochu nestastne napsat tam "dotaz", "otazka" apod. Neda se podle toho
moc dobre vyhledavat. Diky.
Mirun
-----P�vodn� zpr�va-----
Od: Ji�� Heinisch <HeiJu(zv)sol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 20:45
P�edm�t: To snad neni pravda
TO SNAD NENI PRAVDA, ANEB JAK SI NECHAT ZAPLATIT ZA SVE VLASTNI CHYBY
Omlouvam se za off-topic ,ale jsem pekne vytoceny.
tohle mi prislo po jednom tydnu urgenci.
-----P�vodn� zpr�va-----
Od: Michal Falta <level(zv)telecom(tec)cz>
Komu: Ji�� Heinisch <HeiJu(zv)sol(tec)cz>
Datum: 14. ledna 1999 12:52
P�edm�t: Re: Tarifikator - Error
>Ji�� Heinisch wrote:
>>
>> Dobry den
>>
>> Po delsim zkoumani jsem prisel na zavadu pri provozu tarifikatoru TT 010
>> 110
>> po zmene casoveho intervalu v dusledku zmen u a.s Telecom , vlastni
>> tarifikator na
>> tyto zmeny NEREAGUJE a porad sleduje cas v 360 sec intervalech misto 240
>> sec.
>>
>> Prosim o radu co s tim
>>
>> Jiri Heinisch
>>
Dostal jsem tuto odpoved
*************************************************
>Vazeny pane Heinisch,
>
> Chyba, kterou jste zjistil nen� v tarifik�toru, ale je v programu
>Tkonfig. Nabidka na reseni je zakoupit Upgrade programu Tkonfig s novymi
>tarify a opravenou chybou.
>
>Cena upgrade s disketou a po�tovn�m na dob�rku je 240 K� p�i zaplaceni
>p�edem na ��et 19708-551/0100 posleme mailem za cenu 195 K� s DPH a
>po�tou da�ovy doklad.
>
>S pozdravem Ing Michal Falta LEVEL
>Zmena data/casu vytvoreni adresare
[*] Mirun <forcom(zv)telecom(tec)cz> - 14.1.1999 23:38:12
Marek ��ek wrote:
>
> Ahoj,
>
> Poradite mi, jak se da ve windows zmenit datum/cas vytvoreni adresare ?
>Ahoj,
>Tenhle problem se tu jiz kdysi objevil, a pokud vim tak ve Win95 se nenaslo
zadne
>reseni. Pritom to na prvni pohled vypada jako banalita .... :-)
Napada me jedno genialni reseni: (proved pomoci programu)
1. zmen si systemove datum na to, ktere chces nastavit
2. vytvor novy adresar s libovolnym nazvem
3. zkopiruj celou strukturu se vsemi soubory z puvodniho adresare do noveho
4. vymaz puvodni adresar
5. vytvorenemu adresari dej stare jmeno
6. nastav zpet puvodni systemove datum
7. posli mi $10 za tento napad
tento algoritmus je vhodny zejmena pro uzivatele s zivotne dulezitymi daty,
a v oblasti casteho vyskytu bourky
(trochu humoru snad nikomu neublizi ne ?)
Mirun
Uzamykani oken/formularu
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 14.1.1999 23:44:10
Hi,
>Tak si napis program na pozadi spoustejici se spolu se systemem, ktery po
>shozeni tve aplikace onanistou jej opet spusti :-)))
Myslenka SW watch-dogu nen� spatna, take uz jsem o ni uvazoval. BTW, Piette
ma mezi utilitami WINWATCH, ktera tuto funkci celkem uspokojive dela, takze
se nemusi nic psat.
Bye, pf
Uzamykani oken/formularu
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 14.1.1999 23:45:28
Hi,
>> potreboval bych zamknout aplikaci uvnitr nektereho MDI child okna tak,
aby se okno dalo
>> normalne ovladat, ale neslo se prepinat do jineho okna,
>
>http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\oct\25\dlfaaaal.htm
Dik za tip: mus�m priznat, ze to nejjednoduzsi reseni blokovat MDI children
pomoc� property k tomu ��elu slou��c�mu mne nenapadlo :-))>> neslo prepnout ani do jineho tasku a to jak z klavesnice tak mysi.
>
>http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\sep\30\dlfaaabt.htm, ale
nebude to fungovat v NT.
A to jsem si myslel, ze uz mam docela slusny prehled o funkcich na wokennim
API :-(
Thanx, pf
CTETE, VELMI DULEZITE !!!
[*] Erik Salaj <erik(zv)dodo.sk> - 15.1.1999 00:19:49
Je v tom chaos, pretoze napr. Jet 3.5 aj Jet 4.0 je sucastou MDAC
a to je free. Dalej Jet Engine nie je nijako chraneny, ale DAO 3.5
je chranene licencnym kodom, bez ktoreho nedovoli vytvarat DAO
objekty. Takze skor by to nasvedcovalo tomu, ze licenciu vyzaduje
DAO.
Erik Salaj
erik(zv)dodo.sk
-----Original Message-----
From: Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: Thursday, January 14, 1999 10:41 AM
Subject: Re: CTETE, VELMI DULEZITE !!!>je to opravdu skveli ze je DAO i ADO zdarma...
>
>M.
>
>
>Takze konecne jsem se dozvedel (aspon doufam ze je to pravda ;-) jak je
>to vlastne s Accessem (resp. *.mdb soubory) po strance licencni.
>Informace pochazeji od Jirky Buriana z MS CZ.
>
>Takze DAO i ADO jsou zdarma, problem je v tom, ze Access databaze
>pouziva ke sve cinnosti MSJet a pokud jej chcete sirit tak musite mit
>zakoupeny "runtime". Tzn. Access Developers Toolkit (ci jak se to ted
>jmenuje - cena snad neco v ramci 15.000,- Kc) popr. MS Office Developers
>Edition.
>
>Mac
>
>--
>==============================================================
>= Ing. Martin Kubecka - Amenit s.r.o. =
>= Na Valech - budova Dytron, 741 01 Novy Jicin =
>= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
>= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
>= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
>==============================================================
>
>
>-----P�vodn� zpr�va-----
>Od: Erik Salaj <erik(zv)dodo.sk>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 13. ledna 1999 20:18
>P�edm�t: Re: CTETE, VELMI DULEZITE !!!
>
>>> Inprise se opravdu vzhlizi v MIDASu a CORBA technoligiich.
>>>Faktem je, ze tam by mela smerovat budoucnost. Jenomze aby nekam neco
>>>mohlo smerovat, museji tam smerovat predevsim vyvojari a zakaznici, ne
>>>jen vyvojovy nastroj!!! Tyto technologie jsou prilis nakladne (alspon
>>>pro vetsinu zakazniku v CR - jak je to v US si netroufam odhadnout) a
>>>tak je to jako kdyz ma bezzuby chut na orechy. Mohlo by se stat, ze sice
>>>bude existovat skvela technologie, kterou ale nikdo nebude moct
>>>pouzivat, protoze na ni jednoduse nema (kolik ze se prodalo licenci
>>>MIDASu v CR? Dve???).
>>
>>Hlavne ked obdobne technologie Microsoftu ADO/RDS/OLEDB a DCOM su
>>k dispozicii zdarma.
>>
>>Erik Salaj
>>erik(zv)dodo.sk
Delphi a Access
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.1.1999 06:17:34
> Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
> Microsoft Access, pak nepotrebujes nic.
Muzete prosim uvest odkaz, nebo poslat priklad napojeni na Access
databazi z Delphi?
Dekuji.
==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================FoxPRO, SQL dotaz a cestina
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 15.1.1999 06:20:42
>Zdravim vsechny,
>mam nasledujici dotaz:
>Pouzivam tabulku FoxPRO 2.6 s kodovanim 1250. Pro pripojeni pouzivam
>nativni ovladac BDE 5.1 s nastavenim kodovanim 1250.
>Pokud tabulku otevru pres komponentu TTable, je vse OK, ale pokud
>pouziju TQuery, tak se me spatne zobrazuji ceske znaky.
>
Zkus si nastavit cestinu 1250 i pro Paradox.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
-----------------------------------------------------------------
sdileni disku pro konkretni aplikaci
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 15.1.1999 06:48:09
>Ahoj vsichni.
>Mam takovy problemek a nevim, zda je vubec realne ho vyresit. Pracuje to
pod
>NT a na WIN98 bude muj klient appl.
>Potreboval bych, aby mi aplikace spoustela konkretni program z nasdileneho
>sitoveho disku, ale tak, aby se sama ke sdileni prihlasila. Myslim to tedy
>tak, aby uzivatel na tento disk nemohl vlezt, kdezto moje aplikace by jen
>poslala heslo a tim se autorizovala. Lze tedy z konkretni aplikace udelat
>uzivatele ?
>Co radite ?
>
Jedno z reseni by bylo sdilet disk na NT se jmenem, koncicim znakem $, napr.
Disk$. V programu si ho pak namapovat a na konci odmapovat. Pokud disk konci
znakem $, neni videt ve sdilenych prostredcich.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
-----------------------------------------------------------------
Programatori sobe
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.1.1999 06:55:38
RADIK(zv)p15.monet(tec)cz wrote:
> Myslim ze spousta odkazu by sla najit na Delphi Super Page v databazi. Tam
> je primo db soubor a autory a emaily. Krom toho bych byl asi schopen dat i
> soubor odkazu z Delphi(tec)cz (musel bych se poptat Sluneho), ale tam jsou
> stranky, ale mail jen na autora odkazu.
OK, kazdy kdo ma pevnou linku a chut, muze dat neco dohromady
(nejsou jen DSP). Pak se to porovna a spoji.
>
> ----------
> Od: Zbysek Hlinka
>
> chtel bych pozadat vsechny, kteri maji chut cas a rozumny pristup
> k internetu, zda byste mohli vypracovat seznam vyrobcu free a
> share komponent pro Delphi. Adresy by mely byt pokud mozno
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
off topic - Excel tabulka
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 15.1.1999 07:32:42
> -----Original Message-----
> From: Jixm Heinisch [mailto:HeiJu(zv)sol(tec)cz]
> Sent: Thursday, January 14, 1999 5:43 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: off topic - Excel tabulka
>
>
> >Vsiml sis, ze toto je konference o Delphi?
> >
>
> ahoj
>
> Vsiml , ale mam nouzi, pokud posles, bude fajn /snad/
>
>
> Jiri Heinisch
Mam s tim problemy. Ma to 2MB. Snazil jsem se to vystavit,
ale FreeWeb, kde bych mel mit jeste 6 MB mista, mi po FTP
transferu 900K hlasi, ze uz tam neni misto. Muzu to nekomu poslat,
vystavite to?
Jiri, chces to poslat i pres tu velikost?
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!Odchytavani paketu
[*] Pavel Zichovsky <zichovsky(zv)jesnem(tec)cz> - 15.1.1999 07:35:29
sup(zv)svitap(tec)cz napsal toto:
> napred trochu omacky okolo: mam PC s WinNT jako komunikacni server pro
> Internet, dve sitovy karty, jednu pro vnitrni sit, druhou napojenou na
> pevnou linku. Mezi nimi routing, firewal atd.
> Potreboval bych na karte pro vnitrni sit ochytavat pakety a zjistovat, ktery
> uzivatel kam miri, a to v Delphi3. Napr: uzivatel 192.168.0.240 se prave
> prihlasuje na http://www.seznam(tec)cz.
Hmmm, a to neumi (aspon nejak) ten vas firewall???
Jinak to pujde asi dost tezko, protoze byste se musel nejak dostat na
uroven, na ktere budete brat vsechny prichozi pakety (alespon TCP),
analyzovat je (jestli je to HTTP protokol, jestli je to prikaz GET, pak z
toho paketu vytahnou adresu....) a pak je poslat dal, cili proste napsat
si vlastni firewall....
Druha moznost je pouzit (nebo napsat) nejakou proxy, ktera bude pozadavky
ukladat do logu (to umi snad kazda), nebo rovnou zobrazovat v nejakem
okne. Pak ale musite vsechny donutit, aby pouzivali vasi proxy.
Ja bych to s mymi moznostmi (WinRoute) resil bud tim, ze bych zapnul na
firewallu logovani vsech TCP paketu na port 80, a napsal bych program,
ktery by hlidal zmenu prislusneho logu, udelal reversni DNS z IP adres a
vysledek zobrazil.
Pripadne neco podobne, ale z logu proxy (tam bych nemusel delat reverzni
DNS)
S pozdravem
Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
mobil: pavel.zichovsky(zv)sms.paegas(tec)cz (120 znaku)
PGP podporovano a vitano
Programatori sobe
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.1.1999 07:41:48
Ji�� Heinisch wrote:
> Hlas�m se do prace, zatim muzu delat kafe.
>
> Pokud bude potreba tak se Zbysku ozvi.
Dekuji, ja bych si dal radeji caj. Ale ne nejakou zbrndu, piju jen
kvalitu. :-)
Nejdrive napis, zda mas nejakou vlastni predstavu, jak by to melo
vypadat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Zmena data/casu vytvoreni adresare
[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 15.1.1999 07:53:36
Prave me kolega poradil a je to odzkousene na NT, ze cas adresare se zmeni,
na cas vytvoreni noveho souboru v adresari. No neni to parada?
Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
Mius a.s. (http://www.mius(tec)cz)
Dlouha 2940
415 01 TEPLICE
Czech Republic
> -----P�vodn� zpr�va-----
> Od: Mirun [SMTP:forcom(zv)telecom(tec)cz]
> Odesl�no: 14. ledna 1999 23:38
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Zmena data/casu vytvoreni adresare
>
> Marek ��ek wrote:
> >
> > Ahoj,
> >
> > Poradite mi, jak se da ve windows zmenit datum/cas vytvoreni adresare ?
>
> >Ahoj,
>
> >Tenhle problem se tu jiz kdysi objevil, a pokud vim tak ve Win95 se
> nenaslo
> zadne
> >reseni. Pritom to na prvni pohled vypada jako banalita .... :-)
>
> Napada me jedno genialni reseni: (proved pomoci programu)
> 1. zmen si systemove datum na to, ktere chces nastavit
> 2. vytvor novy adresar s libovolnym nazvem
> 3. zkopiruj celou strukturu se vsemi soubory z puvodniho adresare do
> noveho
> 4. vymaz puvodni adresar
> 5. vytvorenemu adresari dej stare jmeno
> 6. nastav zpet puvodni systemove datum
> 7. posli mi $10 za tento napad
>
> tento algoritmus je vhodny zejmena pro uzivatele s zivotne dulezitymi
> daty,
> a v oblasti casteho vyskytu bourky
>
> (trochu humoru snad nikomu neublizi ne ?)
>
> Mirun
>
> Zastupce LNK
[*] Jirka <virt(zv)pepa(tec)cz> - 15.1.1999 07:53:55
No jo, o tom v�m , ale to fungovalo jen v D1 a TP7 pro W.
Opravdu nekdo nevite, jak to dostat v 32bit verzi?????!!!
Jirka Virt
email: virt(zv)pepa(tec)cz
-----P�vodn� zpr�va-----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 23:24
P�edm�t: Re: Zastupce LNK
>Jirka wrote:
>>
>> Ahoj,
>>
>> nevite nekdo , jak ze zastupce (*.lnk) ziskat informace o souboru a ceste
k
>> nemu - v D3?
>
>Ahoj,
>
>Najdes to tady:
http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\nov\13\dlfaaadb.htm
>
>--
>
>Internet proti monopolu. Petr Vones, amatersky programator
>* http://www.bojkot(tec)cz *
>* protestni akce *
>************************
>
>Font
[*] Jaroslav Jura <jajax(zv)atlas(tec)cz> - 15.1.1999 07:53:34
> Potrebujes cestinu? Zrovna vcera jsem to resil. Stahni si:
>
> soubor LANG.EXE. Ten doplni Cestinu do W95 US a tim padem i ceske fonty,
> ceske trideni napr. pro Access / DAO atd.
>
> A nezapomen v programu u fontu nastavit charset na East_European.
>
> Mac
>
Presne tak, chtelo to zmenit charset. Mel jsem totiz u fontu charset jako default, tak jsem
nastavil primo v BDE langdriver Ascii ANSI a chodi to take. Ale take jsem zjistil, ze nejde
na jednom note-booku spustit BDE (je tam totiz pekny smetiste). Samotneho by me ale zajimalo
cim to muze byt. Asi opravdu bude lepsi primo v programu u fontu nastavit charset na
East_European. Dik
jARA
--
Ing. Jaroslav Jura
Adamovske strojirny, INF
jajax(zv)atlas(tec)cz
Zvlastni chybove hlaseni
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 15.1.1999 08:01:54
Coto ? Zaregistroval sem se a nic. Jak se k nim dostat ?
Ondrej Krajicek
Ing. Zdenek Sraier wrote:
>
> Ahoj, me se docela libi Raize komponenty, dostanes od Inprise
> po registraci Delphi, ale ted nevim, jestli jsou i pro D4.
> Zkus se tam podivat.
>
> S pozdravem Zdenek
>
> --------------------------------------- E-Mail -------------------------
> | Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
> | o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
> | ( o o) |--------------------- WWW --------------------------|
> | (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
> ------------------------------------------------------------------------
> | WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
> ------------------------------------------------------------------------
>
> ----------
> > Odes�latel: Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz>
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Zvlastni chybove hlaseni
> > Datum: 13. ledna 1999 18:30
> >
> > Ahoj,
> >
> > Pouzivam VCL TSystemListView a TSystemTreeView. To jsou freewarove nahrady
> > za FileListBox a DirectoryListBox ve stylu 95 (jako v Exproleru).
>
> > 2) Nevite nekdo o jinych podobnych komponentach? NEmusi byt FREE, ale hlavne
> > musi fungovat a docela rad bych po registraci dostal SRC.
> >
> > Diky
> > Vojtech Semecky
Delphi a Access
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 15.1.1999 08:07:56
-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 15. ledna 1999 6:23
P�edm�t: Delphi a Access
>> Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
>> Microsoft Access, pak nepotrebujes nic.
.
.
to je pravda, ale vysvetluj nekomu kdo ma 602proPC ze si MUSI koupit a
NAINSTALOVAT Microsoft Office PROFESSIONAL nebo Access - jinak mu tvuj
program nebude fungovat..
a jak je to kdyz si uzivatel Access nebo Office odinstaluje - to tvuj
program prestane bez jakehokoliv upozorneni fungovat nebo tam JET zustane a
je pouzivan nelegalne ?
M.mini exe
[*] BEKE Frantisek <beke(zv)asset.sk> - 15.1.1999 08:45:25
Zdravim!
Pred casom (rok-dva?) som nasiel niekde na nete
ukazku minimalnej velkosti exe kompilovane pod delphi.
Neviem presne, tusim sa to volalo mini.zip...
Co je zaujimave, bola tam nahrada systemovej unity,
kde boli len potrebne funkcie. Ide mi prave o tuto unitu,
ale nejak ten zip nemozem najst (mozno sa volal inak!).
Neviete mi niekto poradit, odkial by som to mohol stiahnut,
resp nevedel by mi niekto poslat aspon tu unitu?
Dik!
bye,
Feri (the bjs)
- beke(zv)asset.sk - telnet://sano.sk:7000 -
Skoleni InterBase
[*] Ales Zeleny <zelenya-l(zv)mlp(tec)cz> - 15.1.1999 08:59:52
---------------------- Forwarded by Richard Kubat/Inprise on 14-01-99
12:57 ---------------------------
Richard Kubat
13-01-99 12:00
Vazeni pratele a kolegove,
rad bych vas upozornil na to, ze cca za 14 dni probehne
v prazskem skolicim stredisku Inprise pokrocily kurs InterBase
Prosim podivejte se na
http://www.inprise(tec)cz/skoleni.htm
kde najdete popis skoleni. Skolitel je dlouholety uzivatel
InterBase, ktery je (se svym tymem) dodavatelem aplikacnich
reseni v InterBase pro sektor zdravotnictvi. Nepujde tedy
o zadnou suchou teorii, ale cele skoleni se opira o nekolikaletou
praxi v praci s InterBase. Umi tez dobre a poutave prednaset
a behem jeho prednasek se nebudete nudit. Jeho schopnost
srozumitelne verbalni komunikace je totiz vynikajici.
Srdecne vas na toto skoleni zvu a jsem si jist, ze pokud se
rozhodnete jej absolvovat, rozhodne neudelate chybu.
Pro dalsi detaily se prosim spojte s Radkou Lacmanovou,
z Inprise CZ/SK (rlacmanova(zv)inprise(tec)cz), ktera vam zasle
prihlaskovy formular, popripade sdeli dalsi detaily.
S pratelskym pozdravem, -- Richard Kubat, reditel Inprise CZ/SK
__________________________________
Inprise - Borland s.r.o., Male namesti 13,
110 00 Praha 1, Czech republic
Telephone +420.2.2161.2262
Fax +420.2.2161.2811
URL: http://www.inprise(tec)cz
+------------------------+ +---------------------------+
|Ales Zeleny OK1UUE| |Ales Zeleny OK1UUE|
|Mestska knihovna v Praze| |Municipal Library of Prague|
|Marianske nam. 1 | |Marianske nam. 1 |
|115 72 | |115 72 |
| | | |
|Tel.: (420)(2)22113 452 | |Tel.: (420)(2) 22113 452 |
|E-mail:zelenya(zv)mlp(tec)cz | |E-mail:zelenya(zv)mlp(tec)cz |
|MIME: ISO-8859-2 OK! | |MIME: ISO-8859-2 OK! |
+------------------------+ +---------------------------+
Multitasking, to je kdyz se aplikace mohou hroutit paralelne.
Multitasking means that applications can crash simultaneously.VersionInfo
[*] Kelle Ondrej <kelleon(zv)nnsk.sk> - 15.1.1999 09:03:15
> Zdravim vsechny pritomne,
>
> Mam jeden projekt, ktery se tahne jiz od D1. Nyni v D4 si hraju
> s volbou kompilatoru "Include Version Information in project".
> U vsech ostatnich projektu to funguje dobre, ale tady tam ty informace
> nedostanu.
> Tedy aby bylo jasno - vymazal jsem vsechny soubory projektu
> krome *.DPR,
> znova jsem to ulozil, v options je zaskrtnute include a autoincrement,
> v options se to zobrazuje dobre, ale v EXE to neni - koukam na to pres
> Explorer - soubor - vlastnosti. Co s tim ?????
A mas tam direktivu {$R *.RES} ?
Ondrej Kelle
kelleon(zv)nnsk.sk
off: zasifrovana? data ve FoxPro
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 15.1.1999 09:11:25
>Pokud vim, tak dekompilatory FOXky ze souboru EXE a FXP zadne PLB nebo FLL
>knihovny nevytahnou. Pritom to sifrovani je pravdepodobne delane pomoci
knihovny
>CRYPTOR nebo NETLIB (pokud si na to nekdo nenapsal neco sam). Pokud je knihovna zabalena uvnitr APP, FXP, EXE, tak ji ANTIPRO rozbali.
Pokud ji tahal z venku odnekud z disku a nemas ji- musis ji sehnat, nebo mas
smulu. V programu musi byt volani jak zakryptovani tak od kryptovani,
protoze jinak by se ta tabulka nedala pouzivat
>V pripade CRYPTORu neni klic nikde ulozen a bey jeho znalosti nemas sanci.
>V pripade pouziti funkci knihovny NETLIB je vzdy sifrovan cely soubor a
jeho delka se prodluzuje o 8 Byte. Ovsem kde ten klic najit to nevim.
Kazdopadne tabulku
>zakodovanou NETLIBem rozhodne neotevres prikazem USE. Ja osobne bych nikdy, nikomu nedal program udelany tak, abych se musel
bal, ze ztratim data,
kdyz uzivatel zapomene heslo.A myslim si, ze nejsu sam.
Petr
Delphi a Access
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.1999 09:31:02
Puvodni zprava, kterou napsal Krayzel Libor dne 15 Jan 99,:
> Muzete prosim uvest odkaz, nebo poslat priklad napojeni na Access
> databazi z Delphi?
????? Proste si vytvoris alias a napojis se pres TTable - stejne
jako u vsech ostatnich databazi a tabulek.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Modalny na nemodalny - riesenie
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 15.1.1999 09:34:51
Ahojte vsetci !
K problemu "Modalny na nemodalny" som sa rozhodol poslat konecne
(dufam) riesenie spolu s vysvetlenim. Myslim ze ho dlzim vsetkym
kolegom, ktori na moj dotaz reagovali, hoci som ho neformuloval
dost jasne.
Moj "modalny" formular ma za ulohu informovat uzivatela, ze sa nieco
deje (spracovanie struktury adresarov) a po skonceni sa ma sam
automaticky zatvorit.
Zatvaranie mi vsak fungovalo len rucne t.j. ak uzivatel klikol
napr. na button (s vlastnostou ModalResult mrOK, mrCancel apod.).
Skusal som naozaj vsetko mozne (ci uz to bolo zavolanie metody Close,
priradenie hodnoty ModalResult:= mrOk), vsetko neuspesne.
Petr Vones navrhoval zobrazit formular ako nemodalny,
t.j. metodou Show a nasledne zabranit moznosti vybrat hlavni
formular aplikace (Application.MainForm.Enabled := False).
Hoci by to bolo trochu neobvykle, podla vsetkeho by to mohlo
fungovat, lenze primarny problem sa tym vlastne obchadza.
Zatvaranie formularu "shownuteho" ako modal sa mi nakoniec podarilo
vyriesit poslanim spravy WM_CLOSE. Hoci som aj tuto moznost predtym
neuspesne
vyskusal (inspirovany radou Milosa Koutneho z archivu konferencie v
podobnej
zalezitosti).
Fungujuci vysledok bol celkom jednoduchy a vyzeral asi takto:
-------------------------------------------------------------
procedure TMojForm.FormActivate(Sender: TObject);
var PMHand: hWnd
begin
... "vykonanie vlastnej programovej obsluhy"
PMHand := FindWindow( 'TMojForm', PChar ( Caption ) );
PostMessage(PMHand, WM_CLOSE, 0, 0);
end;
-------------------------------------------------------------
Pricina toho, ze Close, resp. ModalResult := mr... je (podla mojho
laickeho
nazoru) v tom, ze cele "vykonanie vlastnej programovej obsluhy"
vztahujucej
sa na tento formular prebieha v obsluhe udalosti OnActivate, odkial
chcem
formular hned aj zatvorit (podotykam, ze to iste zrejme plati aj na
obsluhu
udalosti OnShow).
V tejto etape vsak este nedochadza k spusteniu vlastnej aplikacnej
slucky [Jiri Polak],
takze pokus o close-nutie takehoto formulara nemal ziadnu odozvu
(zaujimave, ze nedochadzalo
ale ani k vyvolaniu exeption z dovodu "zatvarania niecoho, co tu este
celkom nie je").
Dufam ze problem "Modalny na nemodalny" sa mi aspon hmlisto podarilo
identifikovat.
V kazdom pripade vsak dakujem vsetkym, co mi odpovedali, za ochotu a
namahu !
Peter Vlkovic
=======================================================================
>
>>>
>>> Ahojte !
>>> Je mozne pocas behu programu zmenit modalny formular
>>> na nemodalny ?
>>> Dik.
>>>
>>> P.V.
>>
>>
>> Jiz vytvoreny ne. Zalezi na zpusobu, jakym ho vytvoris. Muze byt Show
>> nebo ShowModal.
>>
>
>
>Formular vytvaram cez ShowModal.
>
>Moj povodny problem je v tom, ze sa mi tento formular nedari
>zavriet priamo v programe.
>Uz sa to tu aj preberalo, prispevky na tuto temu som si v archive
>pozeral. Lenze hoci som uz skusal kadeco, formular dokazem zatvarat
>vzdy len mysou resp. alt+F4, t.j. manualne.
>Nechcel som vas tym zatazovat, ale uvitam akukolvek radu.
>
>Vdaka.
>
>P.Vlkovic
>
>
>Zvlastni chybove hlaseni
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.1999 09:38:34
Puvodni zprava, kterou napsal Ondrej Krajicek dne 15 Jan 99,:
> Coto ? Zaregistroval sem se a nic. Jak se k nim dostat ?
Vzdyt je tam vylozene napsano, ze jsou pro D3 a D4:
http://www.inprise.com/delphi/webreg/
Ja bych ti to poslal, ale uz jsem to zase davno smazal...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Delphi a Access
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.1999 09:43:34
Puvodni zprava, kterou napsal Mirek �ipel dne 15 Jan 99,:
> >> Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
> >> Microsoft Access, pak nepotrebujes nic.
>
> to je pravda, ale vysvetluj nekomu kdo ma 602proPC ze si MUSI koupit a
> NAINSTALOVAT Microsoft Office PROFESSIONAL nebo Access - jinak mu tvuj
> program nebude fungovat..
Ale to je logicke, kdo chce delat aplikace s databazemi Access,
koupi si VB Pro nebo VC++ Pro a ma licenci na sireni MSJet.
Reseni, ktere vyuziva instalovaneho Accessu u zakaznika, je
vhodne tehdy, kdyz znas jeho prostredi nebo vylozene pracuje
s Accessem a chce neco dodelat...
> a jak je to kdyz si uzivatel Access nebo Office odinstaluje - to tvuj
> program prestane bez jakehokoliv upozorneni fungovat nebo tam JET zustane
> a je pouzivan nelegalne ?
Pokud Access odinstaluje, tak to fungovat prestane.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Delphi a Access
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.1.1999 09:43:07
> ????? Proste si vytvoris alias a napojis se pres TTable - stejne
> jako u vsech ostatnich databazi a tabulek.
Alias? Z toho mi vyplyva, ze musim pouzit BDE. Vcera si tvrdil, ze ne.Delphi a Access
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.1999 09:50:35
Puvodni zprava, kterou napsal Krayzel Libor dne 15 Jan 99,:
> > ????? Proste si vytvoris alias a napojis se pres TTable - stejne
> > jako u vsech ostatnich databazi a tabulek.
>
> Alias? Z toho mi vyplyva, ze musim pouzit BDE. Vcera si tvrdil, ze ne.
Ja jsem ti o tom, ze nemusis pouzit BDE, nic netvrdil. To ti tady
tvrdil nekdo jiny. Jsou tri moznosti - (a) pouzijes BDE, (b) napichnes
se primo na DAO a pak si musis vsechno naprogramovat sam, (c) pouzijes
nekterou nativni nahradu BDE pro Access.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Edit komponenta bez API na DSP
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 15.1.1999 09:50:33
Tuhle komponentu uz jsem si stahnul, ale asi jsem si ji spatne
prohlid. A to jmeno jsem si taky nepamatoval... Ach jo, jeste ze uz
je ten patek.
Mockrat dik za nakopnuti, podivam se, co jsem si to vlastne stahnul.
Jeste jednou dik.
Filip Jirsak
> From: "Pavel Cisar" <pcisar(zv)aktis(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Subject: Re: Edit komponenta bez API na DSP
> Date sent: Thu, 14 Jan 1999 15:22:50 +0100
> Send reply to: delphi-l(zv)fwd(tec)cz
> Haj hou!
>
> Najdes to i na www.torry.ru v Samples (mwEdit) nebo primo u zdroje na
> http://www.eccentrica.org/gabr/mw/
>
> HTH
>
> > Na DSP by nekde mela byt nova komponenta (pridana maximalne pred
> > mesicem), ktera resi Edit, aniz by vyuzivala standardnich komponent
> > Windows, meno bylo tusim nejak redit...(???). Bohuzel jsem si smazal
> > mail, kde byla jeji adresa a na DSP
> > ji nemuzu vubec najit, nevite o ni nekdo (nebo nemate nekdo schovane
> > posledni tak 4 maily z DSP o uploadu)?
>
>
----------
> Date sent: Thu, 14 Jan 1999 14:58:16 +0100
> From: Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz>
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Edit komponenta bez API na DSP
> Send reply to: delphi-l(zv)fwd(tec)cz
>
> Filip Jirsak wrote:
>
> > Na DSP by nekde mela byt nova komponenta (pridana maximalne pred
> > mesicem), ktera resi Edit, aniz by vyuzivala standardnich
komponent
> > Windows, meno bylo tusim nejak redit...(???). Bohuzel jsem si
smazal
> > mail, kde byla jeji adresa a na DSP
> > ji nemuzu vubec najit, nevite o ni nekdo (nebo nemate nekdo
schovane
> > posledni tak 4 maily z DSP o uploadu)?
>
> Nejsem si uplne jisty jestli je to ono, ale nedavno jsem z DSP stahl
> komponentu mwEdit, ktera je prave napsana uplne od zakladu znova a
> umoznuje i Syntax Highlight (lze pridat i vlastni jazyky krome
> Delphi...).
> Je to kompletne vcetne zdrojaku, presne misto na DSP ted nemuzu
najit,
> jelikoz maji vypnuty Search...
>
> --
> <TT>
> /* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
> /* xcibulka(zv)hwlab.felk.cvut(tec)cz */
> /* KCibulka(zv)seznam(tec)cz */
> /* ardour(zv)usa.net */
> /* OnLine: If you have ICQ my ICQ# is 4111110. */
> /* If you don't have ICQ you can page me through: My Personal */
> /* Communication Center: http://wwp.mirabilis.com/4111110 */
> /* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
> /* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
> </TT>
>
>
*************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Odchytavani paketu
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 15.1.1999 10:01:54
> From: "Pavel Zichovsky" <zichovsky(zv)jesnem(tec)cz>
> Organization: Jesenicka nemocnice s.r.o.
> To: delphi-l(zv)fwd(tec)cz
> Date sent: Fri, 15 Jan 1999 07:35:29 +0100
> Subject: Re: Odchytavani paketu
> Send reply to: delphi-l(zv)fwd(tec)cz
> sup(zv)svitap(tec)cz napsal toto:
>
> > napred trochu omacky okolo: mam PC s WinNT jako komunikacni server pro
> > Internet, dve sitovy karty, jednu pro vnitrni sit, druhou napojenou na
> > pevnou linku. Mezi nimi routing, firewal atd.
> > Potreboval bych na karte pro vnitrni sit ochytavat pakety a zjistovat, ktery
> > uzivatel kam miri, a to v Delphi3. Napr: uzivatel 192.168.0.240 se prave
> > prihlasuje na http://www.seznam(tec)cz.
>
> Hmmm, a to neumi (aspon nejak) ten vas firewall???
>
> Jinak to pujde asi dost tezko, protoze byste se musel nejak dostat na
> uroven, na ktere budete brat vsechny prichozi pakety (alespon TCP),
> analyzovat je (jestli je to HTTP protokol, jestli je to prikaz GET, pak z
> toho paketu vytahnou adresu....) a pak je poslat dal, cili proste napsat
> si vlastni firewall....
>
> Druha moznost je pouzit (nebo napsat) nejakou proxy, ktera bude pozadavky
> ukladat do logu (to umi snad kazda), nebo rovnou zobrazovat v nejakem
> okne. Pak ale musite vsechny donutit, aby pouzivali vasi proxy.
>
Muzu poslat zdrojak jednoduche proxy, neni muj, nevim kde jsem ho
ziskal, ale uz jsem ho tu 2x udal -:). Odchytavani vsech paketu TCP
by asi bylo na nejakou NT service, ovladac sitoveho protokolu nebo
neco podobneho, a to se zrejme nevyplati (pokud to neni server pro
tisice uzivatelu -:).
Filip Jirsak
> Ja bych to s mymi moznostmi (WinRoute) resil bud tim, ze bych zapnul na
> firewallu logovani vsech TCP paketu na port 80, a napsal bych program,
> ktery by hlidal zmenu prislusneho logu, udelal reversni DNS z IP adres a
> vysledek zobrazil.
>
> Pripadne neco podobne, ale z logu proxy (tam bych nemusel delat reverzni
> DNS)
>
> S pozdravem
> Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
> mobil: pavel.zichovsky(zv)sms.paegas(tec)cz (120 znaku)
> PGP podporovano a vitano
>
> *************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Aktivita modemu na lince
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 15.1.1999 10:18:50
Ahoj,
potreboval bych poradit s modemem. Pripojuji se na Internet pres
telefon a tak hlidam cas. Interval mezi vyzvednutim poskytovatelem a
skutecnym odpocitavanim po pripojeni a prihlaseni na ruznou odezvu (cca
16-35 sekund a nekdy i dele). Potreboval bych si zobrazit skutecnou delku
pripojeni treba od vytoceni (mam tonovou volbu, prodleva na zacatku je
zanedbatelna) a koncem tak, abych vedel presne ubehnuty cas treba v
sekundach. Nemate, prosim, nekdo kousek kodu (chtel bych si to vlozit do
sveho programu), nebo nejaky funkcni priklad v Delphi? Moc by mi to pomohlo.
Dekuji
Jaro B.Delphi a Access
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 15.1.1999 10:26:56
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> >> Pokud na tom pocitaci je Microsoft Office PROFESSIONAL nebo
> >> Microsoft Access, pak nepotrebujes nic.
> .
> .
>
>
> to je pravda, ale vysvetluj nekomu kdo ma 602proPC ze si MUSI koupit a
> NAINSTALOVAT Microsoft Office PROFESSIONAL nebo Access - jinak mu tvuj
> program nebude fungovat..
>
[Martin Fron�k] Mno, pokud ma nekdo 602proPC, pak je rozumu
mdleho......Prevod DTB
[*] SICHTA Daniel <Sichta(zv)asset.sk> - 15.1.1999 10:35:48
Nazdar vsetci
Existuje nejaky jednoduchy sposob ako previest dtb (MS access 7) na IB
5.x
Mam W98 a D3
Dakujem !!!
Ing. Daniel �ichta
ASSET s.r.o. Rosinsk� 8
011 05, �ilina SLOVAKIA
% 421-89-542-15
) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> CTETE, VELMI DULEZITE !!!
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 15.1.1999 10:40:22
>> > Nicmene nevidim zadnou prekazku, ktera by branila tomu, aby se
>> > GTS SINEA objevil v OSS projektu PS (Programatori Sobe). :-)
>>
>> :-))) A TurboPower by nam mohl dat komplet jejich sortiment, ze? :-)))
>
>Zcela nepochybne. Stejne to budou muset udelat, protoze jim to
>programatori prestanou kupovat, kdyz si to udelaji sami.
Ale pak zas nebude duvod, aby nam to davali, kdyz uz budeme mit vlastni
:-)))
VersionInfo
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 15.1.1999 10:42:53
Haj hou!
>Mam jeden projekt, ktery se tahne jiz od D1. Nyni v D4 si hraju
>s volbou kompilatoru "Include Version Information in project".
>U vsech ostatnich projektu to funguje dobre, ale tady tam ty informace
>nedostanu.
Doporucuji vyhledat v newsech pres www.href.com , tam se o tomhle pred
casemdiskutovalo (podrobnosti si uz bohuzel nepamatuji, sorry).
HTH
Formatovana hodnota pole z Query
[*] Pavel Bare� <atoll(zv)telecom(tec)cz> - 15.1.1999 11:02:44
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Potreboval bych ziskat z Query hodnoru pole i s formatovanim stejne, jako se zobrazuje napr. dbGridu.
zPavel Bare�
Atoll s.r.o.
www.atoll(tec)czkousel jsem
QueryPOLE.Value
QueryPOLE.TEXT
ale oboji to vraci bez formatovani
dekuji za odpoved
Like v procedure na IB
[*] Pavel Bare� <atoll(zv)telecom(tec)cz> - 15.1.1999 11:02:50
Ale ano umi to:
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
(cast(:sklad as varchar(2))||"%") and
datum between :odD and :doD into :pom2;
takto to funguje OK
jeste jeden postreh - Cast neumi z nejakeho duvodu pretypovat FLOAT na CHAR
ale pouze na VARCHAR
takze Cast(float as CHAR) vyhodi
ybu -413
dekuji vsem za radu ohledne spojovani stringu, k IB je sice 5 prirucek a
temer v kazde jsou popsany datove typy,
zakladani databaze atd., ale tohle jesem mimo jednoho prikladu nikde nenasel
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
-----P�vodn� zpr�va-----
Od: Jaroslav KULHEIM <kulheim(zv)fitness(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 23:02
P�edm�t: Re: Like v procedure na IB
Myslim, ze IB neumi pouzivat parametry tvorene vyrazem ve stored procedure.
Tedy napisto asi takto:
...
DECLARE VARIABLE pomstr VARCHAR(9); /* 9 je max hodnota integeru */
...
pomstr = sklad || "%";
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
:pomstr and
datum between :odD and :doD into :pom2;
Jaroslav KULHEIM
kulheim(zv)fitness(tec)cz
-----P�vodn� zpr�va-----
Od: Pavel Bare� <atoll(zv)telecom(tec)cz>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 14. ledna 1999 12:07
P�edm�t: Like v procedure na IB
Poradte mi prosim nekdo se syntax� LIKE v proceduer poku do ni
poterbuji dat promenou
domnival jsem se ze to ma byt nejak takhle:
alter PROCEDURE STAV_SKLADU (
ODD DATE,
DOD DATE,
SKLAD smallint,
VYROBEK INTEGER
) RETURNS (
STAV FLOAT
) AS
declare variable pom float;
declare variable pom2 float;
begin
select sum(vydej) from pohyb
where cislo_vyr=:vyrobek and cis_skladu =:sklad and datum between :odD
and :doD into :pom;
if (pom is null) then pom=0;
select sum(kusy) from polozky where cislo_vyr=:vyrobek and cis_dod like
(Cast(:Sklad as character)+"%") and
datum between :odD and :doD into :pom2; if (pom2 is null) then pom2=0;
stav=pom-pom2;
suspend;
end
ale takhle to nechodi ani zadna jina syntaxe, ktera mne napadla
dekuji za radu
Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz
sdileni disku pro konkretni aplikaci
[*] Petr Kro�a ml. <pkroca(zv)compact(tec)cz> - 15.1.1999 11:16:12
Dekuji za cennou radu, ale jeste bych potreboval vedet, jak se napamovani a
odmapovani provadi v D3. Tedy, ktera knihovna (ci komponenta) to ma na
starost.
PK
-----P�vodn� zpr�va-----
Od: Jan Fiala <fiala(zv)infos(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 15. ledna 1999 7:30
P�edm�t: Re: sdileni disku pro konkretni aplikaci
>Jedno z reseni by bylo sdilet disk na NT se jmenem, koncicim znakem $,
napr.
>Disk$. V programu si ho pak namapovat a na konci odmapovat. Pokud disk
konci
>znakem $, neni videt ve sdilenych prostredcich.
Prevod DTB
[*] Lubos Dusanic <lubos(zv)iname(tec)com> - 15.1.1999 11:29:22
SICHTA Daniel wrote:
> Nazdar vsetci
>
> Existuje nejaky jednoduchy sposob ako previest dtb (MS access 7) na IB
> 5.x
> Mam W98 a D3
>
caves,
a co tak skusit datapump - je to v kazdej dodavke delphi3.
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
dbf v sieti
[*] Martin <martin(zv)geoplanpp.sk> - 15.1.1999 11:46:33
Zdravim,
To co ma zaujima sa tu uz pretriasalo ale aj tak to akosi nechapem. Takze :
1. Potrebujem urobit malu aplikacia zalozenu na DBASE IV alebo paradox ale
dbase vyhovuje viac (viem s tym lepsie narabat). Ziaden SQL server
neprichadza do uvahy, potrebujem to len pre seba. Niekolko stovjek zaznamov.
Problem je v tom ze potrebujem aby to bezalo v sieti a potrebujem nejako
uzamknut riadok. Da sa to aj nejako inac ako si ulozit editovane hodnoty a
potom ich skontrolovat? A co ak medzi skontrolovanim a vlastnym zapisom
niekde iny zmeni data ?
2. Ak mam DBF pripojene cez QUERY na DBGRID. Ak zmenim udaje a prejdem na
iny zaznam su udaje okamzite fyzicky zapisane do DBF ? Da sa to nejako
ovladat ?
3. Ako je to pri citani ? Aktualizuje sa QUERY nejak automaticky napr. pri
prechode na iny zaznam alebo to musim urobit v programe ? Ako ? Da sa to aj
inak ako znovu spustis SQL vyraz v query ?
Ak robim v sieti potrebujem mat aktualne data pre kazdeho uzivatela.
4. Obsahuje DBF aj nejaky autoinkrement ?
5. Co je lepsie pre editaciu DBF prip. paradoxu, TABLE alebo QUERY ? Mam dve
tabulky prepojene , niekolko stovjek riadkov.
Vdaka za kazdu odpoved, v tomto som zaciatocnik
Martin
Trideni dat v tabulce
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 15.1.1999 12:01:39
>>myslim si, ze v najjeduch�om pripade by malo stacit nastavit index (napr. >v
>>Database
>>Desktope) pre stlpec KOD. Ale ak tam mas viac poli alebo indexov, >musis
>>stlpec KOD
>>presunut na prve miesto v tabulke.
Kdyz dam klic na sloupec KOD tak trideni funguje dobre, ale vyvstava
jiny problem, pri zadani duplicitni hodnoty v polozce KOD se vypise KEY
VIOLATION. To je vcelku dobre, alespon se zabrani zadani duplicitnich
kodu, ale problem je ze obycejnemu uzivateli tato hlaska nic nerika.
Neda se nejak programove tato systemova hlaska nahradit jinou, treba
textem POZOR, HODNOTA JE DUPLICITNI, apod.? Vim ze nejaka cesta vede
pres editaci hotoveho EXE souboru Resource Workshopem, ale neda se to
udelat nejak programove?
Za jakykoliv tip dekuji.
Prem. Mikes
n.u.
>
>Modalny na nemodalny - riesenie
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 15.1.1999 12:04:36
>Moj "modalny" formular ma za ulohu informovat uzivatela, ze sa nieco
>deje (spracovanie struktury adresarov) a po skonceni sa ma sam
>automaticky zatvorit.
Jaky je duvod, ze jsi to neudelal pres formular, nastaveny jako StayOnTop ?
Tak se to obvykle dela a nen� problem ho z nadrizeneho formulare zavrit
:-)
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
-----------------------------------------------------------------
Delphi a Access
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 15.1.1999 12:08:45
> > to je pravda, ale vysvetluj nekomu kdo ma 602proPC ze si
> MUSI koupit a
> > NAINSTALOVAT Microsoft Office PROFESSIONAL nebo Access -
> jinak mu tvuj
> > program nebude fungovat..
> >
> [Martin Fron�k] Mno, pokud ma nekdo 602proPC, pak je rozumu
> mdleho......
>
Souhlasim.
Dle meho nazoru se to vztahuje i na vyrobce 602proPC.
S jakym zamerem to zacali v 602SW vyvijet? Poodobna
situace tady byla kdysi, kdyz se objevilo InView.
Taky si myslim, ze to nemelo sanci na uspech
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!Invalid variant type conversion
[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 15.1.1999 12:19:10
P�i pokusu p�ev�st komponentu TMessenger z Delphi 3 do Delphi 4 jsem
narazil na n�sleduj�c� probl�m:
Kompilace je OK, ale p�i vol�n� k�du
RemoteHandle := CreateFile(PChar(RemotePath),
GENERIC_WRITE,
FILE_SHARE_READ,
nil,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL,
NULL);
(private
RemoteHandle : THandle;
RemotePath : string;)
dost�v�m ERROR, �e vznilka v�jimka EVariantError s hl�en�m Invalid
variant type conversion. Nevid�m d�vod - v Delphi 3 bez probl�m�. M�te
n�kdo n�pad, nebo nem�te tuto komponentu p��mo pro D4 (messaging p�es
LAN, Broadcast) ?
M�ra
Delphi a Access
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.1999 12:25:33
Puvodni zprava, kterou napsal Polak Jiri dne 15 Jan 99,:
> > [Martin Fron�k] Mno, pokud ma nekdo 602proPC, pak je rozumu
> > mdleho......
>
> Souhlasim.
> Dle meho nazoru se to vztahuje i na vyrobce 602proPC.
> S jakym zamerem to zacali v 602SW vyvijet? Poodobna
> situace tady byla kdysi, kdyz se objevilo InView.
> Taky si myslim, ze to nemelo sanci na uspech
Nema to tady sice co delat, ale ja si dovolim nesouhlasit!
Ja jsem priznivcem Microsoft Office a vzdy si kupuji nejnovejsi
verzi Professional. O software od Software602 si myslim, ze je
to shit a ze ziji jeste ze slavy stareho Text602. Ale rozhodne
si nemyslim, ze uzivatele jejich software jsou blbci. Oni k tomu
maji urcite vyhody - treba cenu nebo kdo vi, co jineho. Co se
tyka meho nazoru - pro me je lepsi clovek ten, ktery si za
2 tisice koupi legalni 602proPC, nez kdyz ukradne Microsoft
Office, ze na nej nema. Co se tyka firmy Software602, nepatrim
mezi jeji fandy, nicmene je to firma jako kazda jina a snazi
se neco delat. Ze to neni tak uplne k nicemu, to se pozna podle
toho, ze to nekdo kupuje. A oni vydelavaji. O tom to je. Zacali
to vyvijet se zamerem vydelavat penize - a to se jim dari.
Je jedno, ze nekomu se to nelibi, jinemu zase jo. Ja take
nemam rad napriklad Linux, ale nerikam, ze uzivatele Linuxu
jsou mdleho rozumu.
Je tady urcite rada programatoru, kteri delaji neco, co uz je
davno vymysleno, ale delaji to treba pro zabavu nebo proste
proto, ze to nekdo koupi, ze neco udelaji lepe. Proc mam
rikat napriklad o vsech instalacnich programech, ze jsou to
smejdy a kdo je pouziva, je mdleho rozumu, jen proto, ze ja
pouzivam InstallShield Professional a ostatni na nej treba
nemaji...?
Uvedomte si jednu vec - kdyby tady nebyl Paegas, tak by EuroTel
nebyl tak levny. Kdyby tady nebyla Software602, tak by treba
byl Office jeste drazsi, nez je ted. Kazdou chvilku tady
nekdo nadava na M$, ze co vsechno dela blbe, ale najednou se
tady bude nadavat na jeho konkurenci (i kdyz je sporne, zda
je to opravdova konkurence), ze proc vubec neco delaji...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Breakpoint list
[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 15.1.1999 12:37:15
Na breakpoint list se mohu dostat jen p�es ALT+CTRL+B. Nena�el jsem
nikde menu, ktere bylo v D3. Navic bych potreboval tento shortcut
vyhodit, proto�e mam na teto konfiguraci znak { .
Pouzivam GExpert 0.96 pro D4 (mimochodem u D3 jsem s Gexpert umel
prepnout zobrazeni zalozek komponent do vice radek, tady to nemohu najit
????).
D�ky
M�ra
Trideni dat v tabulce
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 15.1.1999 12:45:11
>>Kdyz pouzivas TQuery, tak musis dat ORDER BY KOD,
>>Po pridani zaznamu pak jeste Close, Open a nalezeni noveho zaznamu.
>>Snadne ze? ..... brr, ale opravdu se to tak dela. Pochybuji, ze nekdo
>>s Delfinu vymyslel pro tento pripad neco lepsiho ... nebo snad ano?
>>Jaro
To nalezeni noveho zaznamu se dela nekde v udalostech toho TQuery? Nevim
jak na to ani kde to hledat. Zkus me nakopnout...
>
>Delphi a Access
[*] tomas gurny <gurny(zv)atlas(tec)cz> - 15.1.1999 12:46:06
>Muzete prosim uvest odkaz, nebo poslat priklad napojeni na Access
>databazi z Delphi?
>
>Dekuji.
nevim jestli je to to co potrebujes, ale
na http://www.torry.ru/samples.htm#3415 najdes priklad
'How To Connect Delphi To Access Databases'
Tomas
Modalny na nemodalny - riesenie
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 15.1.1999 12:48:03
Ahoj.
Pochopil jsem, kde je problem.
Tvoje reseni se mi nelibi, ale nenapada mne,
jak to za dane situace vyresit. Je tam nutny ten modalni dialog?
Pokud chces po dobu akce zamknout zbytek aplikace, tak asi ano,
ale treba by se dala cela vec prehodnotit (anebo aplikaci zamknout
jinym zpusobem).
Co se mi nelibi: Volas stejnou akci, tzn. Close, jenomze
ne proceduralne, ale pres Windows Messaging (na coz bych radeji nespolehal).
Timto zpusobem se vyvolavaji udalosti v PowerBuilderu a vim,
ze s tim jsou problemy. Kdyz se sejde vice udalosti najednou, stava
se, ze se nezpracovavaji jako FIFO, ale ze se obcas nektere
udalosti predbehnou. Proto mam k tomuto zpusobu vyvolavani funkci
averzi, zvlaste pokud to neni nutne.
Take mi pripada chybna logika:
Mas tam deletrvajici akci a jenom proto, abys zobrazil
informaci o ni, preneses rizeni teto akce na jine okno.
A udalosti tohoto okna pouzivas na veci, ke kterym nejsou urceny.
Predpokladam, ze akce se ze zakladniho formu spousti uzivatelskou udalosti.
Myslim, ze tato udalost by ji mela take dokoncit a nemela by ji predavat
jinemu oknu.
Proto si myslim, ze vhodnejsi by bylo zobrazit informace o akci
v nemodalnim okne nebo primo v tomto okne tak, ze treba rozsvitis po dobu
trvani akce neviditelny panel. S tim panelem jsem to s uspechem pouzival,
navic jsem na nem mel tlacitko 'Stop' pro dlouhodobe cyklicke akce.
tedy:
Procedure MojeAkceSeZobrazenimZpravy;
begin
Panel1.Show; //Form1.Show
//tady je moje akce
Panel1.Hide; //Form1.Hide
end;
Zkus svuj problem jeste prehodnotit.
Zdar
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!> -----Original Message-----
> From: Peter Vlkovic [mailto:vlkovic(zv)minv.sk]
> Sent: Friday, January 15, 1999 9:35 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Modalny na nemodalny - riesenie
>
>
> Ahojte vsetci !
>
> K problemu "Modalny na nemodalny" som sa rozhodol poslat konecne
> (dufam) riesenie spolu s vysvetlenim. Myslim ze ho dlzim vsetkym
> kolegom, ktori na moj dotaz reagovali, hoci som ho neformuloval
> dost jasne.
>
> Moj "modalny" formular ma za ulohu informovat uzivatela, ze sa nieco
> deje (spracovanie struktury adresarov) a po skonceni sa ma sam
> automaticky zatvorit.
>
> Zatvaranie mi vsak fungovalo len rucne t.j. ak uzivatel klikol
> napr. na button (s vlastnostou ModalResult mrOK, mrCancel apod.).
>
> Skusal som naozaj vsetko mozne (ci uz to bolo zavolanie metody Close,
> priradenie hodnoty ModalResult:= mrOk), vsetko neuspesne.
>
> Petr Vones navrhoval zobrazit formular ako nemodalny,
> t.j. metodou Show a nasledne zabranit moznosti vybrat hlavni
> formular aplikace (Application.MainForm.Enabled := False).
> Hoci by to bolo trochu neobvykle, podla vsetkeho by to mohlo
> fungovat, lenze primarny problem sa tym vlastne obchadza.
>
> Zatvaranie formularu "shownuteho" ako modal sa mi nakoniec podarilo
> vyriesit poslanim spravy WM_CLOSE. Hoci som aj tuto moznost predtym
> neuspesne
> vyskusal (inspirovany radou Milosa Koutneho z archivu konferencie v
> podobnej
> zalezitosti).
>
>
> Fungujuci vysledok bol celkom jednoduchy a vyzeral asi takto:
> -------------------------------------------------------------
> procedure TMojForm.FormActivate(Sender: TObject);
> var PMHand: hWnd
> begin
> ... "vykonanie vlastnej programovej obsluhy"
> PMHand := FindWindow( 'TMojForm', PChar ( Caption ) );
> PostMessage(PMHand, WM_CLOSE, 0, 0);
> end;
> -------------------------------------------------------------
>
>
> Pricina toho, ze Close, resp. ModalResult := mr... je (podla mojho
> laickeho
> nazoru) v tom, ze cele "vykonanie vlastnej programovej obsluhy"
> vztahujucej
> sa na tento formular prebieha v obsluhe udalosti OnActivate, odkial
> chcem
> formular hned aj zatvorit (podotykam, ze to iste zrejme plati aj na
> obsluhu
> udalosti OnShow).
> V tejto etape vsak este nedochadza k spusteniu vlastnej aplikacnej
> slucky [Jiri Polak],
> takze pokus o close-nutie takehoto formulara nemal ziadnu odozvu
> (zaujimave, ze nedochadzalo
> ale ani k vyvolaniu exeption z dovodu "zatvarania niecoho, co tu este
> celkom nie je").
>
> Dufam ze problem "Modalny na nemodalny" sa mi aspon hmlisto podarilo
> identifikovat.
>
> V kazdom pripade vsak dakujem vsetkym, co mi odpovedali, za ochotu a
> namahu !
>
> Peter Vlkovic
>
>
>
> ==============================================================
> =========
> >
> >>>
> >>> Ahojte !
> >>> Je mozne pocas behu programu zmenit modalny formular
> >>> na nemodalny ?
> >>> Dik.
> >>>
> >>> P.V.
> >>
> >>
> >> Jiz vytvoreny ne. Zalezi na zpusobu, jakym ho vytvoris.
> Muze byt Show
> >> nebo ShowModal.
> >>
> >
> >
> >Formular vytvaram cez ShowModal.
> >
> >Moj povodny problem je v tom, ze sa mi tento formular nedari
> >zavriet priamo v programe.
> >Uz sa to tu aj preberalo, prispevky na tuto temu som si v archive
> >pozeral. Lenze hoci som uz skusal kadeco, formular dokazem zatvarat
> >vzdy len mysou resp. alt+F4, t.j. manualne.
> >Nechcel som vas tym zatazovat, ale uvitam akukolvek radu.
> >
> >Vdaka.
> >
> >P.Vlkovic
> >
> >
> >
> sdileni disku pro konkretni aplikaci
[*] pcuhel(zv)deltax(tec)cz - 15.1.1999 13:02:21
Cau
Nestacilo by se odkazovat na server pomoci cesty
\\Server\sdileny_adresar\soubor bez mapovani disku
-----P�vodn� zpr�va-----
Dekuji za cennou radu, ale jeste bych potreboval vedet, jak se napamovani a
odmapovani provadi v D3. Tedy, ktera knihovna (ci komponenta) to ma na
starost.
PK
Delphi a Access
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 15.1.1999 13:07:23
>>Souhlasim.
>>Dle meho nazoru se to vztahuje i na vyrobce 602proPC.
>>S jakym zamerem to zacali v 602SW vyvijet? Poodobna
>>situace tady byla kdysi, kdyz se objevilo InView.
>>Taky si myslim, ze to nemelo sanci na uspech
>
Ne ze bych se chtel zastavat Sw602, ale kdyby MS Office stal tolik, za
co se prodava Sw602, tak by asi kazdy koupil ten Office. Slysel jsem ze
firme Sw602 se podarilo u nas ziskat nekolik velkych kontraktu na
pokryti potreb celych rezortu ve statni sprave kancelarskym softwarem.
Bylo to pry po te, co jednani s Microsoftem o rozumne licencni a upgrade
politice nevedelo k zadnemu cili. Je to mozna ke skode nejen MS, ale i
tech lidi co s tim budou delat, ale na druhou stranu takovym tem
sekretarkam to mozna pro beznou praci uplne staci.
Prem. Mikes
n.u.
>Delphi a Access
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 15.1.1999 13:09:47
> nevim jestli je to to co potrebujes, ale
> na http://www.torry.ru/samples.htm#3415 najdes priklad
> 'How To Connect Delphi To Access Databases'
> Tomas
Diky.Prevod DTB
[*] SICHTA Daniel <Sichta(zv)asset.sk> - 15.1.1999 13:25:11
-----Original Message-----
From: Lubos Dusanic [SMTP:lubos(zv)iname.com]
Sent: 15. janu�r 1999 11:29
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Prevod DTB
SICHTA Daniel wrote:
> Nazdar vsetci
>
> Existuje nejaky jednoduchy sposob ako previest dtb (MS access
7) na IB
> 5.x
> Mam W98 a D3
>
caves,
a co tak skusit datapump - je to v kazdej dodavke delphi3.
Mohol by si to upresnit ?
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
Delphi a Access
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 15.1.1999 13:34:15
Petre, s vetsinou veci ktere pises, lze souhlasit.
Taky nemam rad MicroSoft. Myslim si o jeho produktech,
ze to jsou smejdy a ze jsou koncepcne nepromyslene.
Uz jenom ty nesourode zbastlene databazoviny, to je hruza.
Jejich hlavni prednosti je pusobiva reklama.
Taky si nemyslim, ze nekdo, kdo pouziva neco jineho nez ja,
je mdleho rozumu. Jde ale o kontext.
Taky schvaluji existenci konkurence, ale rekni mi,
proc bych si mel nekdo kupovat nejake 602pro PC kdyz je to
stejny nebo spise jeste horsi smejd nez Office?
I kdyz je jeho cena mensi, levnejsi neni rozhodne,
protoze mi neposkytne tolik moznosti jako Office.
A nechci-li mit pocitac jenom na psani dopisu
a hry, musim pocitat s tim, ze mi 602proPC nestaci
na to, abych byl otevren ostatnim.
Myslim, ze od 602proPC to byl chybny zamer. Bohuzel
nema na to, aby mohla konkurovat MicroSoftu a mela by si
vybrat oblast, ve ktere ma sanci se prosadit. To, ze se
nejake 602proPC prodaly, je hloupost prvouzivatelu,
kteri si kupuji prvni pocitac a berou to zdanlive nejlevnejsi
(nebo je to snad i OEM),
nebo uzivatele, kteri se kvalifikovane rozhodli, ze jim to staci.
O tech druhych si samozrejme nemyslim, ze jsou mdleho rozumu.
Je tady jeste jeden aspekt, ktery mne rozciluje.
Souvisi to s domacimi vs. zahranicnimi vyrobky.
V teto zemi je oblibenym motem "Kupujte ceske vyrobky".
Proc? Protoze jsou kvalitnejsi nebo levnejsi? Ne, protoze jsou
ceske a nasi vyrobci potrebuji zisk nebo zkrachuji, ... To odmitam.
At zkrachuji! Nechapu, proc podporovat vyrobce, kteri
vyrabi nekvalitne nebo draze. To jsou paraziti.
A pusobi to na mne dojmem, ze 602 vydelava prevazne na smlouvach
s distributory HW. Nevi o tom nekdo neco?
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!> -----Original Message-----
> From: Petr Zahradnik [mailto:clexpert(zv)clexpert(tec)cz]
> Sent: Friday, January 15, 1999 12:26 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Delphi a Access
>
>
> Puvodni zprava, kterou napsal Polak Jiri dne 15 Jan 99,:
>
> > > [Martin Fron�k] Mno, pokud ma nekdo 602proPC, pak je rozumu
> > > mdleho......
> >
> > Souhlasim.
> > Dle meho nazoru se to vztahuje i na vyrobce 602proPC.
> > S jakym zamerem to zacali v 602SW vyvijet? Poodobna
> > situace tady byla kdysi, kdyz se objevilo InView.
> > Taky si myslim, ze to nemelo sanci na uspech
>
> Nema to tady sice co delat, ale ja si dovolim nesouhlasit!
> Ja jsem priznivcem Microsoft Office a vzdy si kupuji nejnovejsi
> verzi Professional. O software od Software602 si myslim, ze je
> to shit a ze ziji jeste ze slavy stareho Text602. Ale rozhodne
> si nemyslim, ze uzivatele jejich software jsou blbci. Oni k tomu
> maji urcite vyhody - treba cenu nebo kdo vi, co jineho. Co se
> tyka meho nazoru - pro me je lepsi clovek ten, ktery si za
> 2 tisice koupi legalni 602proPC, nez kdyz ukradne Microsoft
> Office, ze na nej nema. Co se tyka firmy Software602, nepatrim
> mezi jeji fandy, nicmene je to firma jako kazda jina a snazi
> se neco delat. Ze to neni tak uplne k nicemu, to se pozna podle
> toho, ze to nekdo kupuje. A oni vydelavaji. O tom to je. Zacali
> to vyvijet se zamerem vydelavat penize - a to se jim dari.
> Je jedno, ze nekomu se to nelibi, jinemu zase jo. Ja take
> nemam rad napriklad Linux, ale nerikam, ze uzivatele Linuxu
> jsou mdleho rozumu.
>
> Je tady urcite rada programatoru, kteri delaji neco, co uz je
> davno vymysleno, ale delaji to treba pro zabavu nebo proste
> proto, ze to nekdo koupi, ze neco udelaji lepe. Proc mam
> rikat napriklad o vsech instalacnich programech, ze jsou to
> smejdy a kdo je pouziva, je mdleho rozumu, jen proto, ze ja
> pouzivam InstallShield Professional a ostatni na nej treba
> nemaji...?
>
> Uvedomte si jednu vec - kdyby tady nebyl Paegas, tak by EuroTel
> nebyl tak levny. Kdyby tady nebyla Software602, tak by treba
> byl Office jeste drazsi, nez je ted. Kazdou chvilku tady
> nekdo nadava na M$, ze co vsechno dela blbe, ale najednou se
> tady bude nadavat na jeho konkurenci (i kdyz je sporne, zda
> je to opravdova konkurence), ze proc vubec neco delaji...
>
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> Autorizovany dealer TurboPower Software... knihovny pro Delphi
> ==============================================================
> === Petr Zahradnik - Computer Laboratory ===
> === Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
> === telefon: 047-5500610, telefon/fax: 047-5501627 ===
> === mobilni telefon GSM (hotline): 0602-409601 ===
> === http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
> ==============================================================
> ICQ: 21215917, PGP vitano
> FoxPRO, SQL dotaz a cestina
[*] Daniel Jirasek <daniel_jirasek(zv)conel(tec)cz> - 15.1.1999 13:54:52
To jsem zkousel, ale nepomohlo to.
Problem jsem jeste dale zkoumal, a dosel jsem k zaveru,
ze chybne ceske znaky se zobrazuji pouze pri pouziti
trideni podle polozky, ktera nema index.
Daniel Jirasek - Conel
-----Puvodni zprava-----
Od: Jan Fiala [SMTP:fiala(zv)infos(tec)cz]
Odeslano: 15. ledna 1999 6:21
Komu: Delphi forum
Poedmit: Re: FoxPRO, SQL dotaz a cestina
>Zdravim vsechny,
>mam nasledujici dotaz:
>Pouzivam tabulku FoxPRO 2.6 s kodovanim 1250. Pro pripojeni pouzivam
>nativni ovladac BDE 5.1 s nastavenim kodovanim 1250.
>Pokud tabulku otevru pres komponentu TTable, je vse OK, ale pokud
>pouziju TQuery, tak se me spatne zobrazuji ceske znaky.
>
Zkus si nastavit cestinu 1250 i pro Paradox.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informaeni system pro napojaoe
-----------------------------------------------------------------
Delphi a Access
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 15.1.1999 13:55:18
Haj hou!
>Je tady jeste jeden aspekt, ktery mne rozciluje.
>Souvisi to s domacimi vs. zahranicnimi vyrobky.
>V teto zemi je oblibenym motem "Kupujte ceske vyrobky".
>Proc? Protoze jsou kvalitnejsi nebo levnejsi? Ne, protoze jsou
>ceske a nasi vyrobci potrebuji zisk nebo zkrachuji, ... To odmitam.
>At zkrachuji! Nechapu, proc podporovat vyrobce, kteri
>vyrabi nekvalitne nebo draze. To jsou paraziti.
>A pusobi to na mne dojmem, ze 602 vydelava prevazne na smlouvach
>s distributory HW. Nevi o tom nekdo neco?
A co takhle pracovni mista, he ? Kdyz nemas praci, nemuzes si dovolit
"dobry" zahranicni produkt. Navic spousta lidi radsi pracuje za mensi penize
pro ceskou firmu, nez za vetsi penize pro cizince. Nevim, zda jsi nekdy
pracoval pod nemeckym, svycarskym nebo rakouskym sefem, ale ja bych nemohl
ani za nic. To uz bych radsi zalozil vlastni Sw602,. nez delat prodejce u
MicroSoftu nebo "udrzbare" u SAPu. Samozrejme ze nejsem zastancem ochrany
domaciho trhu za kazdou cenu, zvyhodnovani spatnych hospodaru pred lepsimi
atd., ale pokud nejsou rovne sance, je potreba pomahat. Podle meho odhadu
tohle tema muzeme znovu otevrit tak nejdriv za deset, a pak se mozna
shodneme.
Howgh!
TListBox
[*] Ji�� Toman <jiri.toman(zv)seznam(tec)cz> - 15.1.1999 13:55:30
Ahoj vsichni
Prominte ze otravuji s touto banalitou, ale jsem teprve zacinajici v D4.
Mam tento dotaz: chci smazat v list boxu jednu nebo nekolik polozek
ktere uzivatel vybere a opet zobrazit ListBox.
For i :=0 to ListBox1.Items.Count - 1 do
begin
If ListBox1.Selected[i] then
begin
ListBox1.Items.Delete[i];
ListBox1.Refresh;
end;
End;
Polozku v ListBoxu smazu, ale pak musim ListBox preindexovat ? Nebo
mam pocet cyklu pro FOR snizit o jednu, aby mi program nespadl pri
posledni polozce, protoze ListBox.Items.Count bude nizsi o smazane
polozky. Zajimalo by me jak to delaji ostatni. Co je lepsi, nebo
je to cele blbe.
Diky - zdravim vsechny Jirka Toman
Textove pole SQL
[*] Jan Nov�k���r����n�?��? - 15.1.1999 13:57:16
Mam nasledujici problem .Prosim o radu.
Na MS SQL serveru mam tabulku, ktera ma pole typu text. Na tuto tabulku
pristupuji
z Delphi pomoci BDE . tento pristup funguje napr . na pole typu varchar v
poradku.
Jakmile vsak v aplikace pouziji komponentu DBMemo a chi zapisovat
do pole typu text objevi se chyba General SQl error. Cim to muze byt ?
Dekuji za radu. Je to chyba BDE nebo je neco spatne nastaveno na SQl
serveru.
Diky
dbf v sieti
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 15.1.1999 14:14:51
> From: "Martin" <martin(zv)geoplanpp.sk>
> To: <delphi-l(zv)fwd(tec)cz>
> Subject: dbf v sieti
> Date sent: Fri, 15 Jan 1999 11:46:33 +0100
> Send reply to: delphi-l(zv)fwd(tec)cz
> Zdravim,
>
> To co ma zaujima sa tu uz pretriasalo ale aj tak to akosi nechapem. Takze :
>
> 1. Potrebujem urobit malu aplikacia zalozenu na DBASE IV alebo paradox ale
> dbase vyhovuje viac (viem s tym lepsie narabat). Ziaden SQL server
> neprichadza do uvahy, potrebujem to len pre seba. Niekolko stovjek zaznamov.
> Problem je v tom ze potrebujem aby to bezalo v sieti a potrebujem nejako
> uzamknut riadok. Da sa to aj nejako inac ako si ulozit editovane hodnoty a
> potom ich skontrolovat? A co ak medzi skontrolovanim a vlastnym zapisom
> niekde iny zmeni data ?
Ve strukture vety je nekde nejaky bit nebo bajt, ketry zaznam
uzamkne, ale musim se doma podivat, ktery to je. (Pokud k tabulce
chces pristupovat primo na urovni souboru.)
Filip Jirsak
*************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Metadata
[*] OLEJNIK Andrej <olej(zv)asset.sk> - 15.1.1999 14:24:54
Vie niekto programovo vycucat metadata z nejakej databazy napr. Interbase
tak ako to robi Database Explorer v zalozke Text ?
Dalej este chcem vycucat triggre pre tabulky
dik
olej
Dynamic array of integers
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 15.1.1999 14:28:43
Doma mam nekolik ukazek, ktere toto resi (myslim, ze jedno je primo
komponenta TIntegerList zpracovana podle TStringList). Postup je asi
nasledujici: (je to napsany v "pseudo" Pascalu, vymyslim to ted u
maileru a nechce se mi kontrolovat vsechny detaily implementace a
poradi parametru funkci, ani si to nepamatuju)
type TDynPole = pointer;
function VytvorDynPole(pocet:integer;typ): TDynPole;
begin
Result := GetMem(pocet*sizeOf(typ));
end;
procedure SetSizeOfDynPole(pocet:integer;typ;var pole: pointer):
begin
Realloc(pole,pocet*sizeOf(typ))
//nebo jak se ta funkce pro zmenu velikosti alokovane pameti jmenuje
end;
function GetDynPole(index: ineteger;typ; pole: TDynPole): ^Typ;
var Temp: integer;
begin
Temp := Int(pole)+ (index*sizeOf(typ));
// skoda ze Delphi nema pointerovou aritmetiku
Result := Pointer(Temp);
end;
procedure SetDynPole(index:integer; data: typ; pole: TDynPole);
var Temp: integer;
begin
Temp := Int(pole)+ (index*sizeOf(typ));
Temp^ := data;
end;
Filip Jirsak
> Date sent: Fri, 15 Jan 1999 14:43:00 +0100
> From: Peter Vlkovic <vlkovic(zv)minv.sk>
> Organization: MV SR
> To: delphi-l(zv)fwd(tec)cz
> Subject: Dynamic array of integers
> Send reply to: delphi-l(zv)fwd(tec)cz
> Ahojte !
>
> Moze mi niekto nazorne ukazat v Delphi3
> (ak je to mozne), ako vytvorit dynamicke pole
> obsahujuce ciselne hodnoty (napr. typu integer),
> ktore by bolo mozne za behu programu naplnit
> vopred neznamym poctom ciselnych konstant,
> a toto pole potom nasledne spracovat.
>
> Mam na mysli nieco na sposob TStringListu ale
> pre integre alebo longinty.
>
> Myslim z v D4 existuju dynamicke polia, ale co v D3 ?
>
> Dakujem vsetkym.
>
>
> Peter Vlkovic
> *************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
FOXPro + TQuery a cestina
[*] Daniel Jirasek <daniel_jirasek(zv)conel(tec)cz> - 15.1.1999 14:30:51
Potrebuji nutne poradit s timto problemem.
Mam ceskou databazi FoxPRO a pouzivam TQuery. Nevim z jakeho duvodu mi jde
cestina jen kdyz pouziji "Request live = true", ale pokud toto pouziji, tak me
prestane fungovat funkce "TQuery.Locate". Potrebuji jednak spravne zobrazovat cestinu, ale
zaroven vyhledavat pomoci funkce "Locate".
Moc dik za kazdou radu.
------------------------------------------------------
Daniel Jirasek - Conel s.r.o.
Sokolska 71, Usti nad Orlici
tel.: 0465 521020
e-mail: daniel_jirasek(zv)conel(tec)cz
Odchytavani paketu 2
[*] sup(zv)svitap(tec)cz - 15.1.1999 14:33:28
> From: "Pavel Zichovsky"
> Organization: Jesenicka nemocnice s.r.o.
> > napred trochu omacky okolo: mam PC s WinNT jako komunikacni server pro
> > Internet, dve sitovy karty, jednu pro vnitrni sit, druhou napojenou na
> > pevnou linku. Mezi nimi routing, firewal atd.
> > Potreboval bych na karte pro vnitrni sit*) ochytavat pakety a zjistovat,
ktery
*) pres danou kartu jde pripojeni Internetu pro celou fabriku
> > uzivatel kam miri, a to v Delphi3. Napr: uzivatel 192.168.0.240 se prave
> > prihlasuje na http://www.seznam(tec)cz.
Doplneni: docela mi staci , ze se uzivatel 192.168.0.240 hlasi do internetu,
ani nepotrebuju vedet, kam. Pro statistiku potrebuju jen cislo, kolikrat se
dany uzivatel prihlasil do internetu za dany obdobi.>
> Hmmm, a to neumi (aspon nejak) ten vas firewall???
Hmm, ten to cpe do _HODNE_ neprehlednyho logu.
>Muzu poslat zdrojak jednoduche proxy, neni muj, nevim kde jsem ho
>ziskal, ale uz jsem ho tu 2x udal -:). Odchytavani vsech paketu TCP
>by asi bylo na nejakou NT service, ovladac sitoveho protokolu nebo
>neco podobneho, a to se zrejme nevyplati (pokud to neni server pro
>tisice uzivatelu -:).
>Filip Jirsak
>e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
>e-mail: Jirsak(zv)mujmail(tec)cz
>autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Popr. mi staci, jak udelat odchyt paketu na dane karte.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420 461 568 202
fax: ++420 461 568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
TListBox
[*] BEKE Frantisek <beke(zv)asset.sk> - 15.1.1999 14:34:24
Zdravicko!
> For i :=0 to ListBox1.Items.Count - 1 do
> begin
> If ListBox1.Selected[i] then
> begin
> ListBox1.Items.Delete[i];
> ListBox1.Refresh;
> end;
> End;
Najlepsie je spravit cyklus "odzadu", nieco podobneho, ako tu:
for i :=ListBox1.Items.Count - 1 downto 0 do
if ListBox1.Selected[i] then // <- hadam sa takto zistuje "stav"
polozky...
ListBox1.Items.Delete[i];
bye,
Feri (the bjs)
- beke(zv)asset.sk - telnet://sano.sk:7000 -
TListBox
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 15.1.1999 14:38:10
>
> For i :=0 to ListBox1.Items.Count - 1 do
> begin
> If ListBox1.Selected[i] then
> begin
> ListBox1.Items.Delete[i];
> ListBox1.Refresh;
> end;
> End;
>
> Polozku v ListBoxu smazu, ale pak musim ListBox preindexovat ? Nebo
> mam pocet cyklu pro FOR snizit o jednu, aby mi program nespadl pri
> posledni polozce, protoze ListBox.Items.Count bude nizsi o smazane
> polozky. Zajimalo by me jak to delaji ostatni. Co je lepsi, nebo
> je to cele blbe.
>
> Diky - zdravim vsechny Jirka Toman
>
Ja bych to asi udelal stejne, jenom - kvuli tem indexum - bych cyklus
postavil obracene:
For i :=ListBox1.Items.Count - 1 downto 0 do
Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!Metadata
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 15.1.1999 14:42:14
Haj hou!
Pokud ti jde konkretne o InterBase, pak veskera metadata jsou v tabulkach se
jmenem RDB$xxx. V dokumentaci IB je popis jejich struktury a vyznam polozek.
Snadno si pak zjistis co potrebujes.
HTH
From: OLEJNIK Andrej <olej(zv)asset.sk>
>Vie niekto programovo vycucat metadata z nejakej databazy napr. Interbase
>tak ako to robi Database Explorer v zalozke Text ?
>Dalej este chcem vycucat triggre pre tabulky
Dynamic array of integers
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 15.1.1999 14:43:00
Ahojte !
Moze mi niekto nazorne ukazat v Delphi3
(ak je to mozne), ako vytvorit dynamicke pole
obsahujuce ciselne hodnoty (napr. typu integer),
ktore by bolo mozne za behu programu naplnit
vopred neznamym poctom ciselnych konstant,
a toto pole potom nasledne spracovat.
Mam na mysli nieco na sposob TStringListu ale
pre integre alebo longinty.
Myslim z v D4 existuju dynamicke polia, ale co v D3 ?
Dakujem vsetkym.
Peter Vlkovic