Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Vyber recordu v zavislosti na jinych recordech
[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 18.6.2003 10:40:46
Co to znamena 3 po sobe ?
Zaznamy jsou nejak trideny a maji nejakou spolecnou vlastnost ?
Pavel
> From: Jan Harman [mailto:harman(zv)volny(tec)cz]
> mam tabulku kde je pole Saving, ktere muze nabyvat 0..100
> [%], a potrebuji
> vybrat vsechy recordy, krom tech kde je Saving 3x po sobe 100.
>
> Ted to resim dost slozite oznacovanim vsech recordu se 100%
> cislem kolik je
> jich pohromade do zvlastniho pole "Sav100" a potom delam
> vyber jen tech
> ktere neobsahuji v poli "Sav100" trojku, nebo co potrebuji. Funguje to
> dobre, jen to oznacovani je hrozne pomale, navic to
> spotrebovava pole navic.
> Jedna se o pocty kolem 100000 recordu.
>
Vyber recordu v zavislosti na jinych recordech
[*] Jan Harman <harman(zv)volny(tec)cz> - 18.6.2003 10:55:51
jsou setrideny dle pole "DatumCas".
priklad tabulky
"DatumCas" "Saving"
-----------------------------
10.5.2003 11:00 55
10.5.2003 11:05 100
10.5.2003 11:10 100
10.5.2003 11:15 78
10.5.2003 11:20 100
10.5.2003 11:25 100
10.5.2003 11:30 100
10.5.2003 11:35 97
...
chci vsechny recordy krome 11:20..11:30, protoze jsou 3 po sobe obsahujici
100.> Co to znamena 3 po sobe ?
> Zaznamy jsou nejak trideny a maji nejakou spolecnou vlastnost ?
>
> Pavel
>
> > From: Jan Harman [mailto:harman(zv)volny(tec)cz]
>
> > mam tabulku kde je pole Saving, ktere muze nabyvat 0..100
> > [%], a potrebuji
> > vybrat vsechy recordy, krom tech kde je Saving 3x po sobe 100.
> >
> > Ted to resim dost slozite oznacovanim vsech recordu se 100%
> > cislem kolik je
> > jich pohromade do zvlastniho pole "Sav100" a potom delam
> > vyber jen tech
> > ktere neobsahuji v poli "Sav100" trojku, nebo co potrebuji. Funguje to
> > dobre, jen to oznacovani je hrozne pomale, navic to
> > spotrebovava pole navic.
> > Jedna se o pocty kolem 100000 recordu.
> >
>
>Kyklix3 open edition
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 18.6.2003 10:16:40
Haj hou!
On 17 Jun 2003 at 15:33, Jakub Cizek wrote:
> dobre rano/poledne/odpoledne/vecer/noc/a opet rano ...
>
> Chtel jsem se zeptat, jaka je vase zkusenost s Kylixem3 Open Edition.
> Po nainstalovani na RH9 (KDE) se mi spousti dosti dlouho a zatim jsem nemel
> dostatek trpelivosti pockat na konec sestaveni .... i priblble "hello world"
> aplikace ...
>
> nechapu to, protoze kylix1 mi jeste na starem mandrake jela v pohode ..
Kylix funguje v podstate jen s distribucemi ktere jsou uvedene na krabici / v
readme, tedy s zadnou novou distribuci RH, SuSE nebo MDK. To je stary znamy
problem, o kterem vsichni vi vcetne Borlandu, ale Borland mlci a mlci, a nic
nedela. Zrejme maji plne ruce prace s C# a Delphi.NET.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Vyber recordu v zavislosti na jinych recordech
[*] Jan Harman <harman(zv)volny(tec)cz> - 18.6.2003 09:52:38
Zdravim vsechny,
mam tabulku kde je pole Saving, ktere muze nabyvat 0..100 [%], a potrebuji
vybrat vsechy recordy, krom tech kde je Saving 3x po sobe 100.
Ted to resim dost slozite oznacovanim vsech recordu se 100% cislem kolik je
jich pohromade do zvlastniho pole "Sav100" a potom delam vyber jen tech
ktere neobsahuji v poli "Sav100" trojku, nebo co potrebuji. Funguje to
dobre, jen to oznacovani je hrozne pomale, navic to spotrebovava pole navic.
Jedna se o pocty kolem 100000 recordu.
Dik
Honza
Delphi 1-20. a 21. stoleti
[*] Tomas Mazurek <tomas.mazurek(zv)vitkovice(tec)cz> - 18.6.2003 09:28:37
Dobry den,
mam jednu starou aplikaci v Delphi1.0 pracujici nad tabulkami Paradoxu.
Uzivatel si stezuje, ze kdyz do polozky typu Date vlozi rok na 2 cislice,
doplni se automaticky rok na 19 + ty dve vlozene cislice. Chtel bych
dosahnout toho, aby se tam doplnilo 2000. Zajimave je to, ze takhle se ta
paradoxovska tabulka chova jen v Delphi1.0. Kdyz s ni pracuju v 16ti bitovem
Database Desktopu nebo v Delphi5.0, tak uz se tam spravne doplnuje 2000.
Nevite nekdo, kam bych mel sahnout? Asi nekde do zdrojaku Delphi1.0, kdyz
Database Engine (IDAPI), nad kterym pracuje Database Desktop, pracuje
spravne...
Dik
Tomas
Ulozenie ikony do databazy
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 18.6.2003 09:01:36
> -----Original Message-----
> From: Ivan Dulgerov [mailto:idulgerov(zv)stonline.sk]
> Sent: Sunday, June 15, 2003 3:39 PM
> To: Delphi Forum
> Subject: Ulozenie ikony do databazy
>
>
> Zdravim.
>
> Pokusam sa urobit nasledujucu vec :
> Otazka : Neviete ako ulozim ikonu suboru do
> databazy ?
>
priklad na nacteni obrazku z clipboardu a nasledne ulozeni do fieldu
ktery je BLOB:
<code>
Logo1.Picture.Bitmap.Assign(Clipboard);
DM1.Nastav.Edit;
LB1 := TBlobStream.Create(DM1.NastavLogo1, bmWrite);
Logo1.Picture.Bitmap.SaveToStream(LB1);
LB1.free;
DM1.Nastav.Post;
</code>
Logo1: Timage
NastavLogo1: TBlobField;
LB1: TBlobStream
Rozsirene Open/Save dialogy
[*] Krayzel Libor <libor.krayzel(zv)czech-tv(tec)cz> - 18.6.2003 08:10:33
> Pouzivam je v Delphi IDE, jsou primo v JCL jako expert
> http://sourceforge.net/project/showfiles.php?group_id=47514&re
> lease_id=118195
Je to i pro Delphi 4?
OT: Cipove karty
[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 18.6.2003 05:52:28
> o blizsi informace o jeho chipech ktere pouziva
www.alcor(tec)cz
bye
vmlich
Kompatibilita s DBase 3
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 18.6.2003 05:34:27
17.6.2003 Jiri Hoffmayer:
> Ahoj vsem,
> v aplikaci vytvarim tabulku DBF pomoci TTable.CreateTable, vysledna tabulka
> je ve formatu DBase 4. Zakaznik by potreboval aby tabulka byla kompatibilni
> s DBase 3. Lze to nejak zaridit?
Tak, ze si v BDE administratorovi v nativnim driveru pro BDE nastavis
Level na 3
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
SGML vs HTML, XML
[*] Bronislav Klucka <delphi(zv)pro2-soft(tec)com> - 18.6.2003 03:19:16
>
> Zdravim,
> nejak se mi nikde nedari najit jestli jsou komentare zname z XML a
> HTML ("<!--" a "-->") definovane uz normou SGML, nevi to tu nekdo?
>
> Jakub Dusek
ano, komentare jsou platne SGML tagy
1/ na netu tato informace je (staci si nagooglit SMGL a trosku hledat...
2/ staci si jen uvedomit, ze XML neni nic jineho, nez oklestene SGML
(o HTML se samozrejme toto rici neda), takze co umi XML, umi i SGML
S pozdravem
Bronislav Klucka
Windows programmmer, Web programmer
-------------------------------------------------
http://pro2-soft.com
Email : Bronislav.Klucka(zv)pro2-soft.com
Phone : +420605582922
OT: Cipove karty
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 18.6.2003 00:01:03
>
>OK, takze co tedy na to jit pres carovy kod, ovsem malinko jinak.
>Natisknes si predem 500-700 karticek s carovymi kody. Jak zacnes tu
>objednavku, priradis ji pomoci ctecky jednu kartu, tj. nejaky kod. Pak
>predas tuto kartu. Az se cely proces dokonci, stejna karta se zase
>uvolni na dalsi praci. Staci natisknout karty, krete budou opakovane
>pouzitelne, a ctecky carovych kodu. Nebudou treba tiskarny carovych
>kodu.
no, pokud uz takto - pak by asi bylo lepsi si kody natisknout na malicke
samolepky (asi tak 100 samolepek na A4, nebo do rulicky) a lepit na ten
papir - bylo by to asi lepsi i pro pripadnou zpetnou evidenci, reklamace a
pod. a usetri se zmatky s "uvolnovanim" karet.
Nicmene postup pres kartu - respektive pres chip v klestich se mi jevi
jako prijatelnejsi. Pokud vezme v uvahu i bezkontaktni cipove karty, je
prace jeste rychlejsi. Staci jen polozit na uvedene misto na stole
zpracovavany dokument a ihned vidim vse potrebne.
ps: mohl bych poprosit V. Milicha o blizsi informace o jeho chipech ktere
pouziva - budu ted take resit neco podobneho s autorizaci vstupu.
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
MemProof a database.open
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Michal Jiskra" <jiskra(zv)eskon(tec)cz>
> naslednemu padu aplikace. Nevite o co jde ? Pouzivam D5(SP1),BDE,MSDE a
> testuji to na WMe.
BDE - to bude ono.
Petr Vones
ClientDataset, vlastni trideni (ceske)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Sedlak Zdenek" <konf(zv)seus(tec)cz>
> prosim pouziva nekdo z vas ClientDataset pro zobrazovani dat v gridu s tim,
> ze pomoci neho take tridi? Necha se celkem dobre definovat indexy (temporary
Zkousel jsem to na malem prikladu a tridilo to spravne cesky (Delphi 7).
Petr Vones
Tlacitko pro Tray Icon v XP
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Jiri Cincura" <xcincura(zv)informatics.muni(tec)cz>
> Zdravim vsechny,
> spustil jsem jeden svuj program pod WinXP a tlacitko, ktere pouzivam
> pro minimalizaci do tray na titulkovem pruhu formulare, bylo klasicke -
> sede - a ne podle WinXP vzhledu. Nevi tedy nekdo, jak na titulkovem
Pokud jde o tlacitko ktere je vykreslovano v tvem kodu tak je nutne pri
zapnutych XP tematech pouzit pro kresleni prislusne funkce z uxtheme. Podivej
se do zdrojaku VCL na komponenty TBitBtn apod, kde se pouziva unit Themes.
Petr Vones
SimpleMAPI Pegasu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> Prave ze hlasku dava knihovna Pegasu. Zdrojaky TJclEmail jsem samozrejme
Podobne to dela i Outtook, je to bezpecnostni opatreni proti virum aby se bez
vedomi uzivatele neodesilali pres klienta maily. Patrne by to melo jit nekde
vypnout, ovsem to musi prozradit vyrobce.
Petr Vones
Rozsirene Open/Save dialogy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Krayzel Libor" <libor.krayzel(zv)czech-tv(tec)cz>
> Pouzivate nekdo v aplikaci nejake specialni open/save dialogy? Napr. s
> moznosti definovani oblibenych adresaru, apod.
Pouzivam je v Delphi IDE, jsou primo v JCL jako expert
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195
Vypada to pak ve vsech Open/Save dialogach takto:
http://www.volweb(tec)cz/pvones/jedi/IdeOpenDlgFavorite.png
Petr Vones
Prohledavani binarky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.6.2003 21:30:51
From: "Pavel Tresnak" <pavel.tresnak(zv)haida(tec)cz>
> ja bych pouzil TCustomMemoryStream - pouzivame to pro parsovani velkych
> souboru (kolem 500MB) a vykon je ohromny. Kriticka cast je napsana v
> asembleru, ale myslim, ze i standardni zapis bude velice rychly.
A jeste rychlejsi to bude, kdyz nebudes data kopirovat z toho souboru do page
filu (zbytecnou alokaci "pameti" a naslednym nahranim obsahu souboru) ale
pouzijes mapovani souboru.
Petr Vones
Vytvoreni instalace
[*] Miroslav Vopalecky <m.vopalecky(zv)worldonline(tec)cz> - 17.6.2003 21:12:50
Ahoj.
Udelal jsem databazovy projekt v D7 (pomoci IB) a nevim jak vytvorit
instalacku. Vyzkousel jsem kde co pomoci InstallShield. Avsak na jinem
stroji se mi nepodarilo projekt spustit, pravdepodobne chybi neco co
umoznuje komunikaci s databazi "*.GDB". Nedatabazovy zkusebni projekt se mi
podarilo nainstalovat a vse fungovalo. Poradte, prosim, novackovi v D7.
Existuje cestina do InstallShield, at nemusim prekladat?
Vsem predem dekuji
s pozdravem
Mirek Vopalecky
mobil: 602362166
W2000, D7Prof
OT TEST
[*] Borkovec Software Info <info(zv)borkovec(tec)com> - 17.6.2003 20:09:42
btw, jake jsou vase prvni dojmy z noveho visual studia, a samozrejme ze
c#????
ja musim priznat, ze jsem velmi mile prekvapen (po VS 6.0) a mam tim na
mysli
hlavne IDE (napr. Server explorer) - ale nechci predbihat, jsou to zhruba
ctrnactidenni dojmy
Roman Borkovec
----- Original Message -----
From: "Milan Tomes" <milan.tomes(zv)haida(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, June 17, 2003 7:38 AM
Subject: RE: OT TEST
Abych se priznal, tak v praci jsem si ten proces absolvoval cely z CD ale
strach jsem nezaznamenal. Jedine co jsem zaznamenal bylo neskutecne dlouhe
cekani. Doma jsem to vyresil tak, ze jsem si vsechna CD stahnul na disk a
instaloval jsem to z disku. Rychlost byla asi tak 4x vyssi, takze kdyz to
spocitam, tak jsem na tom i s tim stahovanim vydelal asi tak pul hodiny
:))))))
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Ludek ZITA
>
> ----- Original Message -----
> From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
>
> > > Pri instalaci .NET jsem mel uprimny strach o CD mechaniku a mel jsem
> pocit
> > > ze se hlava nutne musi stalym vystavovanim do krajnich poloh utrhnout.
> >
> > Nic takoveho jsem nezaznamel (Visual C# Standard) a to i pres to ze mam
> > nechvalne znamy IBM 75GXP disk z Madarska, ktery uz mel vadne
> sektory :-)
> >
> > Petr Vones
>
> No ja mel na mysli mechaniku CD ne disk. Tam mi to prislo , ze pro nazev
> kazdeho souboru se mrkne nekam na zacatek CD a pak si jde pro
> data na konec
> a porad dokola a jako by to vubec nebralo v uvahu cashe. Fakticky jsem se
> strachoval jestli behem te hodinove instlace CD mechanika neodejde do
> vecnych lovist.
>
> Ludek
OT: Cipove karty
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 17.6.2003 19:42:41
Puvodni zprava ze dne 17.6.2003:
> inzeratu, podle ktereho ten inzerat bez problemu identifikuje. Kod
> platebniho dokladu je devitimistne cislo, ID inzeratu je GUID. Samozrejme to
> vsechno muzu zapisovat na disketu, ale ta je neskladna, neprilis spolehliva
> a vyzaduje formatovani. Cipova karta se mi zda pro tento ucel technologicky
> vhodnejsi, i kdyz to bude drazsi.
OK, takze co tedy na to jit pres carovy kod, ovsem malinko jinak.
Natisknes si predem 500-700 karticek s carovymi kody. Jak zacnes tu
objednavku, priradis ji pomoci ctecky jednu kartu, tj. nejaky kod. Pak
predas tuto kartu. Az se cely proces dokonci, stejna karta se zase
uvolni na dalsi praci. Staci natisknout karty, krete budou opakovane
pouzitelne, a ctecky carovych kodu. Nebudou treba tiskarny carovych
kodu.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================OT: Cipove karty
[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 17.6.2003 18:33:38
> provozne to vypada takto. Klient prinese objednavku na inzerat. Kocka
> objednavku prijme a bud ihned vystavi pokladni doklad (pokud se plati
Ja teraz robim podobnu zakazku: Na kazdy predmet (u teba na klienta, resp
jeho sprievodku, zlozku s dokladmi obchodneho pripadu) sa po vstupe do firmy
nacvaknu klieste s identifikacnym chipom. Na kazdej stacii sa chip nasnima a
na obrazovke sa hned objavia udaje pripadu z databaze (BTW PostgreSQL+Zeos,
zatial sa spravaju slusne).
Na papier sa udaje davaju len v krajnom pripade, vsetko je v pocitaci.
Klieste sa recykluju, t.j. pri uzavreti pripadu sa im da priznak, ze su
volne a zvysi sa poradie recyklacie.
Snimac chipov je nejaka desticka 4x4 cm s jednym DIL16 IO snad za 4 stovky,
na zbernici RS 485 ich mam 30 + prevodnik na RS232, komponentu kludne
poskytnem dalej, ale 'as is', bez zaruky.
Mne tam vacsinou nesedia uradnicky, ale stroje riadene mikroradicom, takze
spravu o prilozeni chipu posielam im, ale je uplne jedno, kto ten UDP paket
prijme, ci nejaky mikrokontroler alebo bezne PC.
Mimochodom, obsluha strojov ma tiez karty s takymi istymi chipmi, takze sa
aj oni mozu autorizovat v tom istom snimaci.
bye
vmlich
OT: Cipove karty
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 17.6.2003 18:27:37
> Asi jsem uplne mimo, ale proc vlastne operatorka na prijmu nemuze tech
> nekolik malo slov nadatlit do PC ? Vzdyt jenom manipulace s
> kartou behem
> celeho procesu zpracovani inzeratu bude vetsinou daleko
> delsi, nez pocatecni
> nadatleni.
Vysoce kvalifikovana operatorka s minimalne rocni praxi v zapisovani
inzeratu potrebuje na pripravu bezneho inzeratu okolo 40-60 sekund. Nejde
jen zapis textu inzeratu, ale rovnez definovani vydavani - ve kterych
novinach, ve kterych cislech, ve kterych rubrikach, jaky typ inzeratu,
overeni, zda se nejedna o podvod - proste je toho vice. Takze u nas, ac to
vypada legracne, uspora 10 sekund casu na pripravu jednoho inzerat by
znamenala teoretickou rocni usporu ve vysi zhruba 1,8 nasobku rocniho platu
jedne operatorky, cili nejakych 350 kKc. A samozrejme naopak, prodlouzeni
zadavani by znamenalo analogicke zvyseni nakladu. Neni to legrace. S
prodlouzenim manipulacni doby se samozrejme pocita, ale snaha je o co
nejvetsi minimalizaci prodlouzeni. Manipulace s cipovou kartou, pokud se
bude pouze zasouvat do sterbiny na pocitaci, se nam zda prijatelne rychla.
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
OT: Cipove karty
[*] delphin(zv)post(tec)cz - 17.6.2003 18:06:36
> provozne to vypada takto. Klient prinese objednavku na inzerat. Kocka
> objednavku prijme a bud ihned vystavi pokladni doklad (pokud se plati
> hotove), nebo ji preda dal ke zpracovani. Dalsi na rade je operatorka,
ktera
> objednavku zpracuje, tj. inzerat napise a zaridi jeho vydavani. Pak prijde
> na radu dalsi operatorka, ktera se stara o ekonomicke a marketingove data,
> ta objednavku zaeviduje, k tomu potrebuje cislo pokladniho dokladu (pokud
> existuje) a identifikator inzeratu. Potiz je v tom, ze tyto operace musi
byt
> z provoznich a casovych duvodu od sebe oddelene. Takze v praxi to vypada
> tak, ze kocka na prepazce obslouzi treba 20 klientu, a az potom muze
poslat
> objednavky ke zpracovani inzeratu. Ani to se nedeje synchronne, protoze
> operatorky pisi nejen takto evidovane inzeraty, ale i neevidovanou
> (bezplatnou, WEBovou nebo SMS inzerci), takze se prijate objednavky
> zpracovavaji v davce. Po zpracovani inzeratu urcenych k evidenci se
hromadka
> objednavek posune k dalsi kocce, ktera se stara o to, aby vse bylo radne
> zaplaceno. Aby mohla inzerat efektivne zaevidovat, potrebuje jej najit.
> Pokud jej bude hledat v databazi, je to na dlouho a muze se splest,
protoze
> denne se u nas zpracuje okolo 5 000 inzeratu. Takze potrebuji, aby s
> objednavkou sel kod pokladniho dokladu pro pripad hotovostni platby a ID
> inzeratu, podle ktereho ten inzerat bez problemu identifikuje. Kod
> platebniho dokladu je devitimistne cislo, ID inzeratu je GUID. Samozrejme
to
> vsechno muzu zapisovat na disketu, ale ta je neskladna, neprilis
spolehliva
> a vyzaduje formatovani. Cipova karta se mi zda pro tento ucel
technologicky
> vhodnejsi, i kdyz to bude drazsi.
Asi jsem uplne mimo, ale proc vlastne operatorka na prijmu nemuze tech
nekolik malo slov nadatlit do PC ? Vzdyt jenom manipulace s kartou behem
celeho procesu zpracovani inzeratu bude vetsinou daleko delsi, nez pocatecni
nadatleni.OT: SGML vs HTML, XML
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 17.6.2003 18:15:37
Zdravim,
nejak se mi nikde nedari najit jestli jsou komentare zname z XML a
HTML ("<!--" a "-->") definovane uz normou SGML, nevi to tu nekdo?
Jakub Dusek
------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------
OT: Cipove karty
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 17.6.2003 17:45:30
> > provozne to vypada takto. Klient prinese objednavku na
> inzerat. Kocka
> > objednavku prijme a bud ihned vystavi pokladni doklad
> (pokud se plati
> > hotove), nebo ji preda dal ke zpracovani. Dalsi na rade je
> operatorka,
> > ktera objednavku zpracuje, tj. inzerat napise a zaridi jeho
> vydavani.
> [...]
>
> A co takhle vytisknout na objednavku carovy kod, a operatorka z nej
> sejme cislo, a jede se dal? To by IMHO melo vyjit nejlevneji, a
> nemuze se ztratit karta z objednavky.
Carove kody byly prvni na rade. Jenze cena tiskarny carovych kodu se
pohybuje nad 10 kKc, primerene bombenfest a idiotensicher snimace okolo 3
kKc. Na jehlicce to tetovat nemuzu, operatorka ma na inzerat cca 40 vterin,
laserovka je taky pomala a navic draha, pokladni tiskarny stoji taky okolo 8
kKc, tisky carovych kodu na paskovych tiskarnach jsou blbe citelne, a hlavne
kolem toho musi porad nekdo poskakovat (technik). Pri 10 pracovistich cena
vyskoci na 150 kKc i vice. Naproti tomu ctecka cipovych karet do 3.5 FD
pozice prijde na radove $40, cipova karta stoji okolo 50 Kc, da se na ni
100000 zapsat... Je to tak, jak psal Petr Zahradnik, asi nejbliz k tomu je
disketa, jenze tady je zase neprakticka manipulace a nespolehlivost.
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
OT: Cipove karty
[*] Milan Cizek <cizek.milan(zv)seznam(tec)cz> - 17.6.2003 17:45:30
> Mimochodem - komunikace a pouzivani cipove karty mne take
> zajima. Jde o autorizaci osoby pri vstupu do objektu, nebo
> pri platbe na zakaznickou kartu
> - tedy na konkretnim miste.
>
> Nevite nekdo jak na to? Neexistuje nejaka komponenta na
> komunikaci s cipovou kartou pres ctecku/zapisovacku?
>
> Uvitam jakoukoliv radu, nebo odkaz treba s popisem komunikace.
Ahoj,
na www.delphi-jedi.org je k dispozici prepis API pro komunikaci se SMART
kartami.
S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
OT: Cipove karty
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 17.6.2003 17:57:31
Porad mi ale vychazi nejlepe carovy kod.
Bud ho vytisknu primo na fakturu/doklad a stejny do pruvodky (+zapis do DB),
jinak staci pouze pruvodka -faktura je az na konci. Cislo faktury vlastne
nepotrebuji, identifikuje ji carovy kod.
Tisk caroveho kodu dnes zvladaji temer vsechny tiskarny a snimace stoji par
kacek.
U karet narazite na problem s omezenim v poctu zapisu.
> Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
> OK,
> provozne to vypada takto. Klient prinese objednavku na inzerat. Kocka
objednavku prijme a bud ihned vystavi pokladni doklad (pokud
> se plati hotove), nebo ji preda dal ke zpracovani. Dalsi na rade je
operatorka, ktera objednavku zpracuje, tj. inzerat napise a zaridi
> jeho vydavani. Pak prijde na radu dalsi operatorka, ktera se stara o
ekonomicke a marketingove data, ta objednavku zaeviduje, k
> tomu potrebuje cislo pokladniho dokladu (pokud existuje) a identifikator
inzeratu. Potiz je v tom, ze tyto operace musi byt z
> provoznich a casovych duvodu od sebe oddelene. Takze v praxi to vypada
tak, ze kocka na prepazce obslouzi treba 20 klientu,
> a az potom muze poslat objednavky ke zpracovani inzeratu. Ani to se nedeje
synchronne, protoze operatorky pisi nejen takto
> evidovane inzeraty, ale i neevidovanou (bezplatnou, WEBovou nebo SMS
inzerci), takze se prijate objednavky zpracovavaji v davce.
> Po zpracovani inzeratu urcenych k evidenci se hromadka objednavek posune k
dalsi kocce, ktera se stara o to, aby vse
> bylo radne zaplaceno. Aby mohla inzerat efektivne zaevidovat, potrebuje
jej najit.Pokud jej bude hledat v databazi, je to na dlouho a
> muze se splest, protoze denne se u nas zpracuje okolo 5 000 inzeratu.
Takze potrebuji, aby s objednavkou sel kod pokladniho
> dokladu pro pripad hotovostni platby a ID inzeratu, podle ktereho ten
inzerat bez problemu identifikuje. Kod platebniho dokladu je
> devitimistne cislo, ID inzeratu je GUID. Samozrejme to vsechno muzu
zapisovat na disketu, ale ta je neskladna, neprilis spolehliva
> a vyzaduje formatovani. Cipova karta se mi zda pro tento ucel
technologicky vhodnejsi, i kdyz to bude drazsi.
Kompatibilita s DBase 3
[*] Jiri Hoffmayer <parsys(zv)digitus(tec)cz> - 17.6.2003 17:48:30
Ahoj vsem,
v aplikaci vytvarim tabulku DBF pomoci TTable.CreateTable, vysledna tabulka
je ve formatu DBase 4. Zakaznik by potreboval aby tabulka byla kompatibilni
s DBase 3. Lze to nejak zaridit?
Diky!
Jirka
OT: Cipove karty
[*] Reditel HitRadia Amerika <radek(zv)hemelik(tec)cz> - 17.6.2003 17:06:28
Mimochodem - komunikace a pouzivani cipove karty mne take zajima. Jde
o
autorizaci osoby pri vstupu do objektu, nebo pri platbe na
zakaznickou kartu
- tedy na konkretnim miste.
Nevite nekdo jak na to? Neexistuje nejaka komponenta na komunikaci s
cipovou
kartou pres ctecku/zapisovacku?
Uvitam jakoukoliv radu, nebo odkaz treba s popisem komunikace.
Diky Radek H.
Reditel HitRadia Amerika, radek(zv)hemelik(tec)cz dne 17.06.2003 HitRadio
Amerika
Tel.: +420 608 12 10 10 (R. Hemelik)
Tel.: +420 777 166 777 (studio Radio Amerika)
e-mail: studio(zv)hitradio(tec)cz http://www.xcz(tec)cz - ..tudy vede cesta...
http://www.hitradio(tec)cz - Surfujte s hudbou..!?
http://www.facelink(tec)cz - Vase tvar na internetu!
http://www.digisoft(tec)cz http://radek.hemelik(tec)cz
Dne Tue, 17 Jun 2003 16:24:21 +0200, Jiri Foldyna napsal(a):
#Ahoj,
#
#nejsem si jisty, jestli to neni prilis OT, ale zkusim to. Potrebuji
najit co
#nejlevnejsi reseni pro bezchybny zapis a cteni 8-bytovych dat na PC.
V
#podstate jde o pruvodku k objednavce, na kterou ze behem procesu
zpracovani
#pripisuji udaje, ktere nakonec slouzi k zaevidovani objednavky. Tyto
udaje
#samozrejme lze k objednavce pripisovat rucne, ale vzhledem k tomu,
ze se jedna
#o GUIDy = {05F47FA2-F0DB-4E65-BDEE-DC23C302EE32}, neni nadeje, ze by
se to
#obeslo bez chyb :-))). Vyhovel by i carovy kod, jenze to bych musel
vybavit
#nejmene 10 pocitacu tiskarnou a snimacem caroveho kodu, coz je
docela nakladna
#zalezitost. Napadlo me tedy, ze bych ke kazde objednavce pripojil
cipovou
#kartu, na niz by se evidencni udaje pripisovaly. Jelikoz se takto
zpracuje
#okolo 250 objednavek denne, je docela zajimava i cena karty, protoze
musim
#pocitat s tim, ze budu potrebovat 500-700 karet, abych zajistil
jejich
#efektivni kolobeh.
#Co tedy potrebuji je cca 500 pametovych cipovych karet s kapacitou
pameti tak
#256 - 1024 byte a k nim tak 10 ctecek/zapisovacek do PC. Na PC bezi
W2K, takze
#ctecky musi byt vicemene autonomni, neni nadeje, ze bych byl schopen
#spolehlive generovat nejaky protokol zavisly na casovani karty. Cena
za tohle
#vsechno musi byt co nejnizsi, aby se vedeni neosypalo. Nasel jsem
par
#dodavatelu, karta s cipem ST14C02C do 50 Kc, ctecky za cca 1000 Kc
se seriovym
#pripojenim k zabudovani do 3.5 pozice v case apod., ale protoze s
tim nemam
#zadne zkusenosti, uvitam rady od chytrejsich.
#
#Diky
#
#Jiri Foldyna mailto:jiri.f(zv)avizo(tec)cz
#
#
#
#
#
#
#http://www.XCZ(tec)cz - Novy internetovy portal. Novy zpusob komunikace
a zabavy.
OT: Cipove karty
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 17.6.2003 17:06:28
> > nejsem si jisty, jestli to neni prilis OT, ale zkusim to.
> Potrebuji najit co
> > nejlevnejsi reseni pro bezchybny zapis a cteni 8-bytovych
> dat na PC. V
>
> Nejlevnejsi reseni je jiste obycejna disketa. Na co to potrebujes
> davat na nejake medium? Co s tim pak dal delas? To nejde po siti?
> Popis trochu ten vlastni problem...
OK,
provozne to vypada takto. Klient prinese objednavku na inzerat. Kocka
objednavku prijme a bud ihned vystavi pokladni doklad (pokud se plati
hotove), nebo ji preda dal ke zpracovani. Dalsi na rade je operatorka, ktera
objednavku zpracuje, tj. inzerat napise a zaridi jeho vydavani. Pak prijde
na radu dalsi operatorka, ktera se stara o ekonomicke a marketingove data,
ta objednavku zaeviduje, k tomu potrebuje cislo pokladniho dokladu (pokud
existuje) a identifikator inzeratu. Potiz je v tom, ze tyto operace musi byt
z provoznich a casovych duvodu od sebe oddelene. Takze v praxi to vypada
tak, ze kocka na prepazce obslouzi treba 20 klientu, a az potom muze poslat
objednavky ke zpracovani inzeratu. Ani to se nedeje synchronne, protoze
operatorky pisi nejen takto evidovane inzeraty, ale i neevidovanou
(bezplatnou, WEBovou nebo SMS inzerci), takze se prijate objednavky
zpracovavaji v davce. Po zpracovani inzeratu urcenych k evidenci se hromadka
objednavek posune k dalsi kocce, ktera se stara o to, aby vse bylo radne
zaplaceno. Aby mohla inzerat efektivne zaevidovat, potrebuje jej najit.
Pokud jej bude hledat v databazi, je to na dlouho a muze se splest, protoze
denne se u nas zpracuje okolo 5 000 inzeratu. Takze potrebuji, aby s
objednavkou sel kod pokladniho dokladu pro pripad hotovostni platby a ID
inzeratu, podle ktereho ten inzerat bez problemu identifikuje. Kod
platebniho dokladu je devitimistne cislo, ID inzeratu je GUID. Samozrejme to
vsechno muzu zapisovat na disketu, ale ta je neskladna, neprilis spolehliva
a vyzaduje formatovani. Cipova karta se mi zda pro tento ucel technologicky
vhodnejsi, i kdyz to bude drazsi.
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
OT: Cipove karty
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.6.2003 17:18:29
On 17 Jun 2003 at 17:06, Jiri Foldyna wrote:
> provozne to vypada takto. Klient prinese objednavku na inzerat. Kocka
> objednavku prijme a bud ihned vystavi pokladni doklad (pokud se plati
> hotove), nebo ji preda dal ke zpracovani. Dalsi na rade je operatorka,
> ktera objednavku zpracuje, tj. inzerat napise a zaridi jeho vydavani.
[...]
A co takhle vytisknout na objednavku carovy kod, a operatorka z nej
sejme cislo, a jede se dal? To by IMHO melo vyjit nejlevneji, a
nemuze se ztratit karta z objednavky.
S pozdravem
Zbysek Hlinka
OT: Cipove karty
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 17.6.2003 16:36:27
Puvodni zprava ze dne 17.6.2003:
> nejsem si jisty, jestli to neni prilis OT, ale zkusim to. Potrebuji najit co
> nejlevnejsi reseni pro bezchybny zapis a cteni 8-bytovych dat na PC. V
Nejlevnejsi reseni je jiste obycejna disketa. Na co to potrebujes
davat na nejake medium? Co s tim pak dal delas? To nejde po siti?
Popis trochu ten vlastni problem...
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================OT: Cipove karty
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 17.6.2003 16:24:21
Ahoj,
nejsem si jisty, jestli to neni prilis OT, ale zkusim to. Potrebuji najit co
nejlevnejsi reseni pro bezchybny zapis a cteni 8-bytovych dat na PC. V
podstate jde o pruvodku k objednavce, na kterou ze behem procesu zpracovani
pripisuji udaje, ktere nakonec slouzi k zaevidovani objednavky. Tyto udaje
samozrejme lze k objednavce pripisovat rucne, ale vzhledem k tomu, ze se
jedna o GUIDy = {05F47FA2-F0DB-4E65-BDEE-DC23C302EE32}, neni nadeje, ze by
se to obeslo bez chyb :-))). Vyhovel by i carovy kod, jenze to bych musel
vybavit nejmene 10 pocitacu tiskarnou a snimacem caroveho kodu, coz je
docela nakladna zalezitost. Napadlo me tedy, ze bych ke kazde objednavce
pripojil cipovou kartu, na niz by se evidencni udaje pripisovaly. Jelikoz se
takto zpracuje okolo 250 objednavek denne, je docela zajimava i cena karty,
protoze musim pocitat s tim, ze budu potrebovat 500-700 karet, abych
zajistil jejich efektivni kolobeh.
Co tedy potrebuji je cca 500 pametovych cipovych karet s kapacitou pameti
tak 256 - 1024 byte a k nim tak 10 ctecek/zapisovacek do PC. Na PC bezi W2K,
takze ctecky musi byt vicemene autonomni, neni nadeje, ze bych byl schopen
spolehlive generovat nejaky protokol zavisly na casovani karty. Cena za
tohle vsechno musi byt co nejnizsi, aby se vedeni neosypalo. Nasel jsem par
dodavatelu, karta s cipem ST14C02C do 50 Kc, ctecky za cca 1000 Kc se
seriovym pripojenim k zabudovani do 3.5 pozice v case apod., ale protoze s
tim nemam zadne zkusenosti, uvitam rady od chytrejsich.
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Prohledavani binarky
[*] Martin Nedopil <delphi(zv)hon(tec)cz> - 17.6.2003 15:54:19
Vyzkousej toto,
kdysi jsem to pouzival pro parsovani mutlipart, ale ted uz si nejsem jisty,
jak to tenkrat fungovalo. Ale ve spojeni s memory streamem by to mohlo
slapat rychle. Jestli to budes zkouset, dej pak do konference vedet.
BMH = Boyer-Moore-Horspool (viz. Google)
Martin
function GetStringBMH(StrToFind: string; const Stream: TStream): longint;
const MaxBufferSize = 1024 * 63;
type
TBMHTable = array[0..255] of byte;
TSearchBuffer = ^TSearchBufferArray;
TSearchBufferArray = packed array[1..MaxBufferSize] of char;
var
BMHTable: TBMHTable;
Buffer : TSearchBuffer;
I,J, BytesRead:integer;
function DoBMHSearch(const StrToFind: string): longint;
var K:Integer;
label NotFound;
begin
Result := -1;
J := length(StrToFind);
while (J <= BytesRead) do begin
I := J;
for K := length(StrToFind) downto 1 do begin
if Buffer^[I] <> StrToFind[K] then
goto NotFound;
Dec (I)
end;
Result := (BytesRead - I);
Exit;
NotFound: Inc(J,BMHTable[ord(Buffer^[J])])
end
end; procedure MakeBMHTable (const StrToFind: string);
var K:integer;
begin
Fillchar (BMHTable,sizeof(BMHTable),length(StrToFind));
for K := 1 to (length(StrToFind) - 1) do
BMHTable[ord(StrToFind[K])] := (length(StrToFind) - K)
end; function CreateBuffer: word;
begin
Result := MaxBufferSize;
try
GetMem (Buffer, Result)
except
Result := 0
end
end;
procedure DestroyBuffer;
begin
Freemem(Buffer,sizeof(Buffer^))
end;
function FindString (const StrToFind: string; const Stream:
TStream): longint;
begin
Result := -1;
repeat
BytesRead:=Stream.Position;
Stream.Read(Buffer^,sizeof(Buffer^));
BytesRead:=Stream.Position - BytesRead;
Result := DoBMHSearch(StrToFind);
if Result <> -1 then begin
Result := Stream.Position - Result;
break
end;
if BytesRead = Sizeof(Buffer^) then
Stream.Seek(Stream.Position-Length(StrToFind),soFromBeginning);
until (Stream.Size = Stream.Position);
end;
begin
CreateBuffer;
MakeBMHTable(StrToFind);
try
Result := FindString (StrToFind, Stream)
finally
DestroyBuffer;
end
end;
----- Original Message -----
From: "Pavel Tresnak" <pavel.tresnak(zv)haida(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, June 17, 2003 2:03 PM
Subject: RE: Prohledavani binarky
> ja bych pouzil TCustomMemoryStream - pouzivame to pro parsovani velkych
> souboru (kolem 500MB) a vykon je ohromny. Kriticka cast je napsana v
> asembleru, ale myslim, ze i standardni zapis bude velice rychly.
>
> Pavel Tresnak
> mailto:pavel.tresnak(zv)haida(tec)cz
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Karel Rys
> Sent: Tuesday, June 17, 2003 1:48 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Prohledavani binarky
>
>
> Vaclav Sazima dne 17 Jun 2003 v 11:05:
>
> > S : string;
> > F : TFileStream
> >
> > setlength (S,F.Size);
> > F.ReadBuffer (S [1],F.Size);
> > Vaclav Sazima
>
> No, jenze ta "binarka" muze byt treba 2 GB dat...
>
> Karel Rys
>
>
>
>
>
>TGraphicControl vs. TCustomControl
[*] Pavel CABAK <delphikonf(zv)cross(tec)cz> - 17.6.2003 15:30:18
Ahoj.
Mam formular a na nem, jak uz to byva, spoustu editu, labelu a imagu. Do
toho vseho vytvarim vlastni objekt, potomek TCustomControl. Ten obsahuje
dalsich 5 objektu potomku TGraphicControl, jejichz Parent je nastaven na ten
1. objekt.
Kdyz aplikaci spustim, tak mi to stale prekresluje (viditelne blika) tech 5
objektu a edity nejsou prekresleny vubec (je v nich zobrazene to, co je pod
mym formularem) dokud do nich nekliknu mysi (ale kurzor se stejne
nevykresli). Kdyz tech 5 objektu predelam na potomky TCustomControl, tak
vsechno jede v pohode = zadne zbesile prekreslovani, edity zobrazuji to co
maji a i kurzor v nich poblikava.
Jakou vlastnost mam kde nastavit, aby mi i pri pouziti TGraphicControl
vsechno fungovalo tak, jako pri pouziti TCustomControl? Podobnych objektu s
objekty bude na formulari jeste spousta, proto chci pouzit potomka bez
Handlu.
Diky
Pavel CABAK
cabak(zv)cross(tec)cz
Sluzby v Delphi3
[*] Martin Fisar <martin_fisar(zv)gordic(tec)cz> - 17.6.2003 15:30:18
Zdravim,
potreboval bych poradil se psanim sluzby v Delphi 3. Instalovat
a ostranit sluzbu funguje v pohode. Problem je se spustenim sluzby.
Nejsem schopen rozchodit to tak, aby mi funkce
StartServiceCtrlDispatcher vratila TRUE (vzdycky to vrati chybu).
takhle nejak to vypada:
var ServiceTableEntry: TServiceTableEntry;
...
procedure Service_main;
begin
sshStatusHandle := RegisterServiceCtrlHandler( srvname,
THandlerFunction((zv)Service_ctrl));
if sshStatusHandle>0 then
begin
ssStatus.dwServiceType := SERVICE_WIN32_OWN_PROCESS;
ssStatus.dwServiceSpecificExitCode := 0;
ssStatus.dwCheckPoint := 1;
if ReportStatusToSCMgr( SERVICE_START_PENDING, NO_ERROR, 3000 ) then
ServiceStart
else
ReportStatusToSCMgr(SERVICE_STOPPED,GetLastError,0);
end;
if sshStatusHandle>0 then
ReportStatusToSCMgr( SERVICE_STOPPED, GetLastError, 0 );
end;
...
...
Begin
...
with ServiceTableEntry do
begin
lpServiceName:= srvname;
lpServiceProc:= TServiceMainFunction( (zv)Service_Main);
end;
if not StartServiceCtrlDispatcher( ServiceTableEntry) then
AddToMessageLog( srvname, 'Chyba StartServiceCtrlDispatcher.');
...
End.
Diky predem
Martin Fisar
Martin_Fisar(zv)gordic(tec)cz
Kyklix3 open edition
[*] Jakub Cizek <jakub.cizek(zv)chatspace(tec)cz> - 17.6.2003 15:33:18
dobre rano/poledne/odpoledne/vecer/noc/a opet rano ...
Chtel jsem se zeptat, jaka je vase zkusenost s Kylixem3 Open Edition.
Po nainstalovani na RH9 (KDE) se mi spousti dosti dlouho a zatim jsem nemel
dostatek trpelivosti pockat na konec sestaveni .... i priblble "hello world"
aplikace ...
nechapu to, protoze kylix1 mi jeste na starem mandrake jela v pohode ..
--
Best regards,
jakub.cizek(zv)chatspace(tec)cz
"I am using plaintext,
you should too!"
Pridat data do komponenty
[*] delphi(zv)minv.sk - 17.6.2003 15:18:17
Ahoj
Chcel by som vytvorit komponentu, ktora by obsahovala subor s datami,
ktore by komponenta vyuzivala. Vie ma niekto nakopnut spravnym smerom?
Predpokladam nejako cez *res subor, netusim vsak ako.
Dik
Werki
Prohledavani binarky
[*] Pavel Tresnak <pavel.tresnak(zv)haida(tec)cz> - 17.6.2003 14:03:13
ja bych pouzil TCustomMemoryStream - pouzivame to pro parsovani velkych
souboru (kolem 500MB) a vykon je ohromny. Kriticka cast je napsana v
asembleru, ale myslim, ze i standardni zapis bude velice rychly.
Pavel Tresnak
mailto:pavel.tresnak(zv)haida(tec)cz
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Karel Rys
Sent: Tuesday, June 17, 2003 1:48 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Prohledavani binarky
Vaclav Sazima dne 17 Jun 2003 v 11:05:
> S : string;
> F : TFileStream
>
> setlength (S,F.Size);
> F.ReadBuffer (S [1],F.Size);
> Vaclav Sazima
No, jenze ta "binarka" muze byt treba 2 GB dat...
Karel Rys
Prohledavani binarky
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 17.6.2003 13:48:12
Vaclav Sazima dne 17 Jun 2003 v 11:05:
> S : string;
> F : TFileStream
>
> setlength (S,F.Size);
> F.ReadBuffer (S [1],F.Size);
> Vaclav Sazima
No, jenze ta "binarka" muze byt treba 2 GB dat...
Karel Rys
Prohledavani binarky
[*] delphin(zv)post(tec)cz - 17.6.2003 13:33:12
> Binarni soubor obvykle obsahuje i znaky #0 a to by se promenne typu
> string moc nelibilo :-(
promenna typu string samozrejme akceptuje znaky #0. Omezeni s #0 plati pro
"null-terminated strings", coz je v delphi treba pchar.Prohledavani binarky
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 17.6.2003 12:30:09
17.6.2003 Vaclav Sazima:
> jestli jde ten soubor nacist do pameti, tak bych se s tim nemazal,
> nacetl bych to do promenne typu string a pouzil funkci pos.
Binarni soubor obvykle obsahuje i znaky #0 a to by se promenne typu
string moc nelibilo :-(
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Version info - vyreseno
[*] Daniel VALS <vals(zv)apls(tec)cz> - 17.6.2003 10:38:52
Diky moc za radu.
----- Original Message -----
From: "Ondrej Kelle" <o.kelle(zv)digitalpublishing.de>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, June 17, 2003 10:35 AM
Subject: RE: Version info
> > Version info v Project options pouzit
> > nejde, protoze nemam v aplikaci zadny formular.
>
> Formulare nepotrebujes. Staci mat v .dpr nasledovny riadok:
> {$R *.RES}
>
> HTH
> TOndrej
>
Prohledavani binarky
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 17.6.2003 11:05:59
Karel Rys wrote:
> Viliam Mlich dne 17 Jun 2003 v 10:41:
>
>
>>>a pouziti instrukce SCANSB, ktera by vzdy dokazala
>>
>>Neskumal som to, ale nejak som presvedceny, ze pri zvolani standardnej
>>fcie pos sa SCASB pouzije. Liezt dnes do assembleru treba jedine v
>>skutocne vynimocnych pripadoch.
>
>
> Mozna ale nebude uplne snadne funkci Pos presvedcit, aby se k tomuto ucelu dala zneuzit. Jako
> parametr ocekava string, nenapada me, jak snadno binarku do teto podoby dostat. A pchar z ni
> neudelas, protoze uvnitr mohou byt #0...
S : string;
F : TFileStream
setlength (S,F.Size);
F.ReadBuffer (S [1],F.Size);
Vaclav Sazima
Prohledavani binarky
[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 17.6.2003 10:41:52
> mapovani do pameti
to bez debaty
> a pouziti instrukce SCANSB, ktera by vzdy dokazala
Neskumal som to, ale nejak som presvedceny, ze pri zvolani standardnej
fcie pos sa SCASB pouzije. Liezt dnes do assembleru treba jedine v
skutocne vynimocnych pripadoch.
bye
vmlich
Dynamicka procedura
[*] David Kraina <dkx(zv)seznam(tec)cz> - 17.6.2003 10:53:53
Dobry den,
da se nejak vytvorit za behu programu procedura, ktera bude potomek
procedury jine (neco jako BeginThread) ?
Tuto funkci bych vyuzil jeste jinak, ale pouzil bych to na dynamicke
vytvareni Timeru - jak se mu da predat parametr - (zv) bohuzel nesezere ?
Diky
S pozdravem
===================================================
David Kraina, DKx
-------------------------------
Vedouci vyvojarskeho tymu MX-3, programator
http://DKx.on.to
http://MX-3.w3.to
===================================================
Scrollovani CheckListBoxu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 17.6.2003 10:29:51
> Asi jsem to nejak nepochopil. Poslu CheckListBoxu tuto
> zpravu, ale porad se nic nedeje.
>
> Posilam to: SendMessage(CheckListBox1.Handle,
> LB_SETHORIZONTALEXTENT, x, 0);, kde x jsem zkousel cisla
> 0, 2, 10, 100 a plno dasli, ale porad nic.
Myslim, ze ta sprava ma efekt iba v tom pripade, ak je dana hodnota vecsia
ako sirka klientskej oblasti (client area) listboxu.
procedure AdjustScrollWidth(ListBox: TCustomListBox);
var
MaxWidth, TextWidth, I: Integer;
begin
with ListBox do
begin
MaxWidth := 0;
for I := 0 to Items.Count - 1 do
begin
TextWidth := Canvas.TextWidth(Items[I]);
if TextWidth > MaxWidth then
MaxWidth := TextWidth;
end;
Inc(MaxWidth, 20); // checkbox + margins
if MaxWidth > ClientWidth then
SendMessage(Handle, LB_SETHORIZONTALEXTENT, MaxWidth, 0);
end;
end;
Vsimol som si, ze v Delphi 7 je uz property ScrollWidth, ktoru mozes pouzit
namiesto SendMessage:
if MaxWidth > ClientWidth then
ScrollWidth := MaxWidth;
Ten kod je pisany z hlavy, mozno ho bude treba upravit, aby sa dal vobec
skompilovat.
HTH
TOndrej
Zmena jmena listu v Excelu
[*] Lubos Urban <lubos.urban(zv)visicom.sk> - 17.6.2003 11:33:01
Takto som to robil ja. Fungovalo to aj office 2000 a XP. S Office 97 som to
neskusal.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComObj;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
WB, Excel: Variant;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var
WorkBook, Sheet: Variant;
Col, Row,iRow : Integer;
s:string;
begin
Sheet := WB.WorkSheets[1];
Sheet.Cells.VerticalAlignment := $FFFFEFF4;// xlCenter
Sheet.Name:='Fill Cells';
Row := 2;
// Sheet.Rows[Row].Font.Bold := True;
inc(Row,2);
// Sheet.Rows[Row].Font.Bold := True;
for Col := 1 to 10 do begin
Sheet.Cells[Row, Col].Font.Bold := True;
Sheet.Cells[Row, Col] := 'Column'+inttostr(Col);
end;
inc(Row);
for iRow:=1 to 10 do begin
for Col := 1 to 10 do begin
s:=format('iRow=%d iCol=%d',[Row,Col]);
Sheet.Cells[Row, Col]:=s;
end;
Inc(Row);
end;
for iRow:=1 to 10 do begin
Sheet.Cells[iRow, 15]:=IntToStr(iRow);
end;
Sheet.Cells[iRow, 15]:= '= SUM(R[-10]C:R[-1]C)';
Sheet.Cells.Columns.AutoFit;
Sheet.Cells[2, 2] := 'Data Created at '+datetostr(now);
Sheet.Cells[2, 2].Font.Bold := True;
Sheet.Cells[2, 2].Interior.Color := clYellow;
// xlInsideHorizontal = $0000000C;
// xlInsideVertical = $0000000B;
// xlDiagonalDown = $00000005;
// xlDiagonalUp = $00000006;
// xlEdgeBottom = $00000009;
// xlEdgeLeft = $00000007;
// xlEdgeRight = $0000000A;
// xlEdgeTop = $00000008;
// xlHairline = $00000001;
// xlMedium = $FFFFEFD6;
// xlThick = $00000004;
// xlThin = $00000002;
Sheet.Cells[2, 2].Borders[$00000008].Weight:= $FFFFEFD6;
Sheet.Cells[2, 2].Borders[$0000000A].Weight:= $FFFFEFD6;
Sheet.Cells[2, 2].Borders[$00000007].Weight:= $FFFFEFD6;
Sheet.Cells[2, 2].Borders[$00000009].Weight:= $FFFFEFD6;
Sheet.Range['a4:j4'].Interior.Color := clYellow;
Sheet.Range['a4:j4'].Borders[$0000000B].Weight:= $FFFFEFD6;
Sheet.Range['a4:j4'].Borders[$00000008].Weight:= $FFFFEFD6;
Sheet.Range['a4:j4'].Borders[$0000000A].Weight:= $FFFFEFD6;
Sheet.Range['a4:j4'].Borders[$00000007].Weight:= $FFFFEFD6;
Sheet.Range['a4:j4'].Borders[$00000009].Weight:= $FFFFEFD6;
Sheet.Range['a5:j14'].Borders[$0000000C].Weight:= $00000002;
Sheet.Range['a5:j14'].Borders[$0000000B].Weight:= $00000002;
Sheet.Range['a5:j14'].Borders[$0000000A].Weight:= $00000002;
Sheet.Range['a5:j14'].Borders[$00000007].Weight:= $00000002;
Sheet.Range['a5:j14'].Borders[$00000009].Weight:= $00000002;
// xlHAlignCenter = $FFFFEFF4;
// xlHAlignCenterAcrossSelection = $00000007;
// xlHAlignDistributed = $FFFFEFEB;
// xlHAlignFill = $00000005;
// xlHAlignGeneral = $00000001;
// xlHAlignJustify = $FFFFEFDE;
// xlHAlignLeft = $FFFFEFDD;
// xlHAlignRight = $FFFFEFC8
Sheet.Range['a5:j14'].HorizontalAlignment:= $FFFFEFF4;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Excel:=CreateOleObject('Excel.Application');
Excel.Visible:=True;
WB:= Excel.WorkBooks.Add;
end;
end.
----- Original Message -----
From: "Marek Soukup" <nodes(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, June 17, 2003 11:02 AM
Subject: Zmena jmena listu v Excelu
> Zdravim,
> pokousim se exportovat data do MS Excel a chtel bych prejmenovat aktualni
> sheet (pouzivam imporotovanou knihovnu excel97.pas a delphi5). Zatim jsem
> pouzival pouze ExcelApplication a tady bude cesta zrejme pres
> ExcelWorksheet. Nemate nekdo nejaky priklad jak to udelat ?
>
> S pozdravem
> Marek Soukup
>
>
>
>Version info
[*] Daniel VALS <vals(zv)apls(tec)cz> - 17.6.2003 10:11:50
Zdravim,
muze mi nekdo poradit jak vytvorit Version info exe souboru v konzolove
aplikaci pod Win32? Version info v Project options pouzit nejde, protoze
nemam v aplikaci zadny formular.
Diky.
Daniel VALS
Version info
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 17.6.2003 10:44:53
> Zdravim,
> muze mi nekdo poradit jak vytvorit Version info exe souboru v
konzolove
> aplikaci pod Win32?
>Version info v Project options pouzit nejde, protoze
> nemam v aplikaci zadny formular.
?? version info nesouvisi s zadnym formularem a funguje i u aplikaci
bez Form unity
D. Toman
Prohledavani binarky
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 17.6.2003 10:56:54
Viliam Mlich dne 17 Jun 2003 v 10:41:
> > a pouziti instrukce SCANSB, ktera by vzdy dokazala
>
> Neskumal som to, ale nejak som presvedceny, ze pri zvolani standardnej
> fcie pos sa SCASB pouzije. Liezt dnes do assembleru treba jedine v
> skutocne vynimocnych pripadoch.
Mozna ale nebude uplne snadne funkci Pos presvedcit, aby se k tomuto ucelu dala zneuzit. Jako
parametr ocekava string, nenapada me, jak snadno binarku do teto podoby dostat. A pchar z ni
neudelas, protoze uvnitr mohou byt #0...
Karel Rys
Re[2]: Firebird/MS-SQL dbExpress alebo ADO
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 17.6.2003 10:38:52
Haj hou!
On 16 Jun 2003 at 23:30, Jaroslav Popluhar wrote:
> PC> ulozenych procedurach a spoustich. Co nety nepujde odizolovat na strane db,
> PC> pujde zamaskovat v teto vrstve.
>
> Co znamena nety?
Preklep :-)
> Existuju nejake priklady takychto nadstavieb?
Pravdaze, prehrsel :-) Bud lze pouzit nejaky obecny OPF (object Persistence
Framework) nebo O-R mapping system. Spoustu materialu na toto tema je napr.
na http://www.cetus-links.org/ a http://www.ambysoft.com , z projektu napr. Bold
v Delphi 7 nebo projekt JEDI-Obiwan (viz mailing-list JEDI-
Obiwan(zv)yahoogroups.com). A samozrejme se to da usit i na miru konkretni
aplikaci.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Version info
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 17.6.2003 10:35:51
> Version info v Project options pouzit
> nejde, protoze nemam v aplikaci zadny formular.
Formulare nepotrebujes. Staci mat v .dpr nasledovny riadok:
{$R *.RES}
HTH
TOndrej
Prohledavani binarky
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 17.6.2003 10:38:52
>>Zdravim
>
>
>>nemate nekdo algoritmus na prohledavani binarniho souboru. Potreboval
>>bych vyhledat urcity retezec bytu v souboru napriklad podle 0345DE3344
>>atd.
Ahoj,
jestli jde ten soubor nacist do pameti, tak bych se s tim nemazal,
nacetl bych to do promenne typu string a pouzil funkci pos.
Vaclav Sazima
Version info
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.6.2003 10:38:52
CreateWindow ... a tak dal .. ne?
Jirka
> Zdravim,
> muze mi nekdo poradit jak vytvorit Version info exe souboru v konzolove
> aplikaci pod Win32? Version info v Project options pouzit nejde, protoze
> nemam v aplikaci zadny formular.Version info
[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 17.6.2003 10:38:51
> muze mi nekdo poradit jak vytvorit Version info exe souboru
> v konzolove aplikaci pod Win32? Version info v Project options
> pouzit nejde, protoze nemam v aplikaci zadny formular.
Formularem to neni, pridej tam resource {$R *.RES}
Daniel
-------------------------------------------------------
Scanning complete: NO intelligent life form in range.
Zmena jmena listu v Excelu
[*] Marek Soukup <nodes(zv)atlas(tec)cz> - 17.6.2003 11:02:54
Zdravim,
pokousim se exportovat data do MS Excel a chtel bych prejmenovat aktualni
sheet (pouzivam imporotovanou knihovnu excel97.pas a delphi5). Zatim jsem
pouzival pouze ExcelApplication a tady bude cesta zrejme pres
ExcelWorksheet. Nemate nekdo nejaky priklad jak to udelat ?
S pozdravem
Marek Soukup
Re[2]: Prohledavani binarky
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 17.6.2003 10:05:49
Daniel Frantik dne 17 Jun 2003 v 9:26:
> Ten algoritmus se jemnuje Aho-Corasic (nebo tak nejak). Princip je ve
> vytvoreni stavoveho automatu reprezentujiciho hledany text. (to je ta
> slozitost O(m) ) a pak jen linearniho projiti vsech dat (to je ta
> slozitost O(n). V pripade tohoto algotitmu je pak cela slozitost
> O(m+n) v pripade drive navrhovaneho je slozitost O(m*n) coz je pro
> vesti binarky absolutne nepouzitelny.... V pripade dalsich dotazu muzu
> poradit, ale urcite na webu neco najdes. Jednoduchy popis byl v
> nejakych skriptech matfyzu pro 2. semestr 1. rocniku (jmeno mi nejak
> vypadlo)
Uvedeny algoritmus bude efektivnejsi, ale tipnul bych si, ze rozdil nebude az tak dramaticky, jak
by se mohlo podle uvadene slozitosti zdat. Pokud jsou to opravdu binarni data s "nahodilymi"
hodnotami (tj. pravdepodobnost vyskytu vsech hodnot 0 - 255 je stejna), tak se da predpokladat, ve
v 255 z 256 pripadu se postoupi s prohledavanim na dalsi pozici hned pri testu prvniho znaku a
pouze v 1 z 256 (tj. asi 0,39 %) pripadu se bude porovnavat dalsi pozice. Pokud jde o extremni
urychleni a nevadil by pristup na nizsi urovni, dal bych prednost Petrem Vonesem doporucovanemu
mapovani do pameti a pouziti instrukce SCANSB, ktera by vzdy dokazala velmi rychle najit prvni
shodny znak. (Ja vim, assembler se uz velke oblibe netesi :->.)
Karel Rys
velikost Memo pole
[*] Simek Pavel - KVS <p.simek(zv)icsvscr(tec)cz> - 17.6.2003 09:41:48
Ahoj vsichni,
jen kratky dotaz - jak muze byt maximalne velike MEMO pole??
Kejchal
Scrollovani CheckListBoxu
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 17.6.2003 09:44:48
>Poslanim spravy LB_SETHORIZONTALEXTENT.
Asi jsem to nejak nepochopil. Poslu CheckListBoxu tuto zpravu, ale porad se
nic nedeje.
Posilam to: SendMessage(CheckListBox1.Handle, LB_SETHORIZONTALEXTENT, x,
0);, kde x jsem zkousel cisla 0, 2, 10, 100 a plno dasli, ale porad nic.
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Delphi 7, WinXP HE
Re[4]: Prohledavani binarky
[*] hlavki(zv)medium13 <hlavki(zv)medium13.sk> - 17.6.2003 10:11:50
DF> V pripade dalsich dotazu muzu poradit, ale urcite na webu neco najdes.
DF> Jednoduchy popis byl v nejakych skriptech matfyzu pro 2. semestr 1. rocniku
DF> (jmeno mi nejak vypadlo)
ako som uz pisal (strana 38):
http://www.edi.fmph.uniba.sk/pardubska/2MIFI.zip
m.Rozsirene Open/Save dialogy
[*] Krayzel Libor <libor.krayzel(zv)czech-tv(tec)cz> - 17.6.2003 09:44:48
Pouzivate nekdo v aplikaci nejake specialni open/save dialogy? Napr. s
moznosti definovani oblibenych adresaru, apod.
POP3 server
[*] MAd <mad(zv)vos(tec)cz> - 17.6.2003 09:35:47
Ahoj,
nema nekdo odkaz na velmi jednoduchy POP3 server nejlepe i se zdrojovymi
texty ? Popr. kde najit dokumentaci ? Dekuji, MAd
This e-mail was scanned by RAV Antivirus. (www.ravantivirus.com)
Re[2]: Prohledavani binarky
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 17.6.2003 09:26:45
> -----Original Message-----
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Miso Hlavac
> Nuz ale kazdopadne sa to da spravit na O(n+m). Tento alg. spravili
> taki traja ujovia... Mena uz neviem... :o)
Ten algoritmus se jemnuje Aho-Corasic (nebo tak nejak). Princip je ve
vytvoreni stavoveho automatu reprezentujiciho hledany text. (to je ta
slozitost O(m) ) a pak jen linearniho projiti vsech dat (to je ta slozitost
O(n). V pripade tohoto algotitmu je pak cela slozitost O(m+n) v pripade
drive navrhovaneho je slozitost O(m*n) coz je pro vesti binarky absolutne
nepouzitelny....
V pripade dalsich dotazu muzu poradit, ale urcite na webu neco najdes.
Jednoduchy popis byl v nejakych skriptech matfyzu pro 2. semestr 1. rocniku
(jmeno mi nejak vypadlo)
Danik
OT:ADO connection - uz jsem na to kapnul :O))
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 16.6.2003 15:17:44
Takova kravina, poustel jsem to z wincommandera, kteryho poustim z davky
kde mam premlasknutej PATH takze nemohl najit Oracle :O)))
OT:ADO connection - uz jsem na to kapnul :O))
[*] Ivan Virag <lgcvirag(zv)iol(tec)cz> - 16.6.2003 14:44:37
To je takova potiz napsat, v cem to bylo? Dekuji.
Ivan Virag
> Behalf Of Tomas Fajman
> Subject: Re: OT:ADO connection - uz jsem na to kapnul :O))
>
>
> Uz je to OK :O)
> ADMIN: OT:ADO connection - uz jsem na to kapnul :O
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.6.2003 14:53:43
Puvodni zprava ze dne 16.6.2003:
> Uz je to OK :O)
Misto teto zpravy bez informacni hodnoty by jiste bylo pro ostatni
ucastniky prinosnejsi, kdybys popsal, jak jsi to vyresil. Jinak je
tento prispevek v rozporu s pravidly.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================OT:ADO connection - uz jsem na to kapnul :O))
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 16.6.2003 14:32:32
Uz je to OK :O)
OT:ADO connection
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 16.6.2003 14:14:31
Cauky mam takovej zvlastni problem, prosim muzete mi nekdo poradit :O)
Pripojuju se na Oracle pres ADO a kdyz to pustim z prostredi Delphi 6 tak
to slape jak hodinky, ale kdyz pak pustim samotnej "exe " , tak to na me
rve
"Klient a sitove soucasti Oracle nebyly nalezeny", nevite cim by to mohlo
byt? Dikes Tom
Paleta nastroju do dvou radku
[*] Tom Beran <tfuzzy(zv)atlas(tec)cz> - 16.6.2003 13:29:29
> Ahoj,
> Nevite jestli jde paleta nastroju (ouska) dat do dvou nebo tri radku?
>
http://www.gexperts.org/index.html
T.
Paleta nastroju do dvou radku
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 16.6.2003 12:50:27
16.6.2003 Kadane Miroslav:
> Ahoj,
> Nevite jestli jde paleta nastroju (ouska) dat do dvou nebo tri radku?
> Mam Delphi 7pro
A nestaci ti prave tlacitko na palete, kde si vyberes rychle spravnou
paletu ze seznamu
Jinak to, co chces (a sppustu dalsich veci) umi GExperts pro Delphi
http://www.gexperts.org/
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
SimpleMAPI Pegasu
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 16.6.2003 12:25:01
Ahoj,
a co takhle zjistit handle okna teto hlasky a poslat mu zpravu WM_CLOSE. Neni to sice ciste reseni, ovsem ucel to splni.
Ales
>
> -----Original Message-----
> From: Lebeda David [mailto:david.lebeda(zv)comarr(tec)cz]
>
>
> Hlaska, proti ktere bojuju, je v podstate jen kosmeticky
> problem - neni to dulezite, ale
> kdyby to slo...FB 1.0.x a WinXP, pripona GDB, - asi pro Pavla Cis
[*] Sedlak Zdenek <konf(zv)seus(tec)cz> - 16.6.2003 12:09:45
Ahoj,
koupil jsem si knihu Interbase/Firebird a musim rici, ze me velmi potesila a
privedla me v nekterych castech na zajimave myslenky. Diky za ni.
Mel bych zaroven dva dotazy tykajici se Firebirdu (1.0.x).
1) V knize v kapitole 11.2 o pojmenovani databaze uvadis, ze mohou byt
problemy s nazvem souboru (priponou) pokud server pobezi na WinXP (i ME).
Prave se chystam instalovat server FB 1.0.3 na WinXP, u hlavniho db souboru
pouziji vhodnou priponu (*.fdb), ale v knize uvadis, ze tato verze FB
neumoznuje zmenu nazvu (pripony) bezpecnostni databaze. Prosim jaka
konkretni nebezpeci z toho mohou plynout? A jak je resit pokud nastanou,
eventualne jak jim predchazet?
2) Je nejaka moznost jak snadno prevest knihovny podpurnych funkci UDF z win
do linuxu? Mam vlastni zdroje v Delphi, ale samozrejme produkuju DLL pro
Win32. Prepokladam, ze pujde prelozit ty zdroje v Kylixu a vytvorit *.SO.
Ale chci se optat neni-li i jina moznost?
Diky
Zdenda
SimpleMAPI Pegasu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 16.6.2003 12:19:01
> > Tem, co ovladaji Pegas pres simple MAPI, bych ale smeroval jeste
> > jeden dotaz: necham-li ze sve aplikace odeslat mail (s dialogem -to
> > potrebuji), nabehne v poradku Pegas, ale v me aplikaci se objevi
> > okenko, ze transfer dat do Pegasu pres simple MAPI probehl v poradku
> > a ze se mam do Pegasu prepnout pomoci Alt+Tab. Tohle pusobi rusive -
> > nejde to nejak potlacit? Pegas se sam aktivuje do popredi, takze
> > nepotrebuji zadne podobne hlasky. Jde to?
>
> musis nastavit
> JclEmail.Email.Send(false); // odeslat mail bez dialogu
No jo, ale to se mi nezobrazi vubec editor mailu a mail se rovnou posle. Ja potrebuji
editor mailu zobrazit, v nem mail doplnit, odeslat. Pote se vratim zpet do sve
aplikace - a ona tam visi hlaska, ze se mam pres Alt-Tab prepnout do Pegasu a tam
delat, co uznam za vhodne. A tuhle hlasku bych chtel zrusit.
Resenim neni ani pouzivani vlastniho editoru mailu, protoze potrebuji pri editaci
mailu pouzivat moznosti mailoveho programu - napr. signatury, ruzna nastaveni,
copy self, potvrzeni o precteni apod.
Hlaska, proti ktere bojuju, je v podstate jen kosmeticky problem - neni to dulezite, ale
kdyby to slo...
Dik
David Lebeda
Paleta nastroju do dvou radku
[*] Kadane Miroslav <miroslav.kadane(zv)cht-pce(tec)cz> - 16.6.2003 12:12:51
Ahoj,
Nevite jestli jde paleta nastroju (ouska) dat do dvou nebo tri radku?
Mam Delphi 7pro
Dik Mirek
SimpleMAPI Pegasu
[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 16.6.2003 12:06:45
Ahoj,
On 16 Jun 2003 at 11:00, Lebeda David wrote:
> tak posilani mailu pres Pegas prostrednictvim simple MAPI jsem
> rozchodil - kdoviproc v registrech Windows chybelo uvedeni potrebne
> DLL, ale po dopsani to slape. Jak jsem zjistil, uvedeny zapis do
> registru nevznikne ani na jinych strojich, takze to se mi jevi jako
> chyba instalatoru mapi pro Pegas.
nevim, ja s tim problem nemel. A vcera jsem si stahnul a nainstaloval
posledni verzi PM, take vse probehlo OK.
> Tem, co ovladaji Pegas pres simple MAPI, bych ale smeroval jeste jeden
> dotaz: necham-li ze sve aplikace odeslat mail (s dialogem -to
> potrebuji), nabehne v poradku Pegas, ale v me aplikaci se objevi
> okenko, ze transfer dat do Pegasu pres simple MAPI probehl v poradku a
> ze se mam do Pegasu prepnout pomoci Alt+Tab. Tohle pusobi rusive -
> nejde to nejak potlacit? Pegas se sam aktivuje do popredi, takze
> nepotrebuji zadne podobne hlasky. Jde to?
musis nastavit
JclEmail.Email.Send(false); // odeslat mail bez dialogu
Jarek U.
SimpleMAPI Pegasu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 16.6.2003 11:00:32
Ahoj,
tak posilani mailu pres Pegas prostrednictvim simple MAPI jsem rozchodil -
kdoviproc v registrech Windows chybelo uvedeni potrebne DLL, ale po dopsani to
slape. Jak jsem zjistil, uvedeny zapis do registru nevznikne ani na jinych strojich,
takze to se mi jevi jako chyba instalatoru mapi pro Pegas.
Tem, co ovladaji Pegas pres simple MAPI, bych ale smeroval jeste jeden dotaz:
necham-li ze sve aplikace odeslat mail (s dialogem -to potrebuji), nabehne v poradku
Pegas, ale v me aplikaci se objevi okenko, ze transfer dat do Pegasu pres simple
MAPI probehl v poradku a ze se mam do Pegasu prepnout pomoci Alt+Tab. Tohle
pusobi rusive - nejde to nejak potlacit? Pegas se sam aktivuje do popredi, takze
nepotrebuji zadne podobne hlasky. Jde to?
Diky
David Lebeda
Font "OCR B 10 AT" a PPPU sek
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 16.6.2003 10:30:30
Nejaky TTF OCR_B mam a je free.
Pokud mas zajem posli mail.
Jakub Martinek
jmartinek(zv)vakmb(tec)cz
> Ahojte,
> snazim sa o vyplnanie PPPU (Postova Pen. Poukazka "U") kde
> musi byt pouzity
> (podla postoveho uradnika) font "OCR B 10 AT" (seky citaju
> scanerom). Tento
> font je bohuzial za peniaze (dost drahy).
> Chcel by som sa opytat ci niekto neriesil tento problem, pripadne ako.
> Pripada mi to dost potavene na hlavu, posta to vyzaduje a font predava
> externa firma ;-(
> Dakujem, Lauko.Scrollovani CheckListBoxu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 16.6.2003 10:33:31
> A nejde nejak zajistit, aby se zobrazil vodorovnej scroolbar, kdyz je
> text delsi?
Mozes si prejst vsetky Items, zistit max. TextWidth, a nastavit si to podla
potreby.
HTH
TOndrej
Free tool for MSDE
[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 16.6.2003 10:27:30
Jinak existuji jeste od MS utilitky isql a osql. Ze kterych muzes delat
vsechno co lze udelat prostrednictvim prikazu SQL (tedy vsechno).
Pavel
> From: Tom Beran
> > chcel by som vyskusat MSDE.
> > Poznate niekto free nastroj, ktorym mozem pod MSDE vytvorit DB?
> > Prip. nieco jednoduche pre Backup a Restore?
> >
>
> A little Alternative Administrative Console for Microsoft Msde 1.0 and
> Msde 2000 written in Microsoft Visual Basic 6.0
>
> http://www.asql.biz/DbaMgr.shtm
>
Scrollovani CheckListBoxu
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 16.6.2003 10:00:29
A nejde nejak zajistit, aby se zobrazil vodorovnej scroolbar, kdyz je
text delsi?
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Seznam nainstalovanych ActiveX prvku
[*] likeapear(zv)centrum(tec)cz - 16.6.2003 09:51:28
Ahoj,
v nasi aplikaci pouzivame TOleContainer pro dynamicke vkladani ActiveX prvku
do oken. Potreboval bych vytvorit funkci pro vyber ActiveX prvku ze seznamu
nainstalovanych. Neco podobneho jako je v Delphi v menu Components | Import
ActiveX control... Uzivatel by vybral prvek a jeho ProgID by se predalo
OleContaineru. Napsal jsem funkci, ktera projde registry a zobrazi seznam
nainstalovanych prvku. Nektere prvky ale obsahuji vice trid a ja nevim co s
tim. Delal nekdo neco podobneho? Neexistuje toto nekde hotove? Dik za
odpovedi
WinXP, D5Ent
||| likeapear
Scrollovani CheckListBoxu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 16.6.2003 09:21:27
> nevi nekdo jak donutit CheckListBox, aby kdyz je polozka
> delsi, aby se zobrazil vodorovnej ScrollBar?
Poslanim spravy LB_SETHORIZONTALEXTENT.
HTH
TOndrej
WMDeviceChange a DriveComboBox
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 16.6.2003 09:06:26
kdysi jsem posilal pod predmetem "RE: Po pripojeni zarizeni na USB Windows
poslou nejakou Message?" kde byly eventy pri zmene disku, vracely i kterych
disku se to tyka, vyuziva to prave WMDeviceChange zkus to najit v archivu
Jina barva a styl TMainMenu
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 16.6.2003 08:54:25
Na Win98 je barva spravna, ale menu ma byt pri najeti mysi vystouple a to
neni... Jeste podotykam, ze XPThemes jsou vypnuty.
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> Behalf Of Petr Vones
>
> From: "Milan Tomes" <milan.tomes(zv)haida(tec)cz>
> > Kolega nyni otevrel jiny projekt a tam zadna dedicnost formu
> neni a presto
> > se mu TMainMenu vykresluje (pro zmenu) cerne. Jsem z toho opravdu danek.
> >
> > Nevite nekdo co s tim ???
> >
> > D7 Prof., WinXP Prof + SP1, HW mame uplne stejne (tedy krome
> monitoru :))))
>
> Deje se to jen na XP nebo i jinych Windows ?
>
> Petr Vones
>
>
>
Free tool for MSDE
[*] Tom Beran <tfuzzy(zv)atlas(tec)cz> - 16.6.2003 08:54:25
> chcel by som vyskusat MSDE.
> Poznate niekto free nastroj, ktorym mozem pod MSDE vytvorit DB?
> Prip. nieco jednoduche pre Backup a Restore?
>
A little Alternative Administrative Console for Microsoft Msde 1.0 and
Msde 2000 written in Microsoft Visual Basic 6.0
http://www.asql.biz/DbaMgr.shtm
T.
Problem s Fullscreenem
[*] delphi(zv)minv.sk - 16.6.2003 08:30:24
Stiahni novy driver na kartu,
ale kazdopadne DelphiX je uz poriadne stara zalezitost, dnes uz o directdraw
ani nechyrovat. Neplanuje niekto napisat cosi podobne ako DelphiX na DX9?
Keby sa robil nejaky nas team na to, tak joinem.
Werki
> Mam novou grafickou kartu GFORCE a od te doby mam problem s
> aktivaci fullscreenu v DelphiX. Kdyz se pokusim spustit aplikaci
> na fullscreen, zustane bila obrazovka a kurzor presypaci hodiny
> (bohuzel se drzi v klasicke windows smyccce - chvili cekej - nic
> nedelej - chvili cekej atd...8-(( ) Kdyz to ale necham dat na
> tvrdo na 800x600 jede vse v pohode. Mate s tim nekdo zkusenost?
> Dikes
>
> --
> Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
> poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
> vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
>
>ADMIN: DULEZITA INFORMACE
[*] lubos hubka <lhubka(zv)1tel(tec)cz> - 16.6.2003 08:21:23
Zdravim.
S tou pomocou to je blbe. To poznam.
Takze mam niekedy volne chvilky, a mohol by som
pomoct. Ale pracujem v CBuilderi. V pripade krajnej nudze mozem
nainstalit delphi.
Ako by asi vyzerala spolupraca? Ake problemy este treba riesit?
S pozdravom
Lubos Hubka
Font "OCR B 10 AT" a PPPU sek
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 16.6.2003 08:00:22
Take tiskneme postovni poukazky (i z DOSu) a tento font nepouzivame. Misto
toho pouzivame Arial CE a problemy nemame.
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> Behalf Of Lauko Stefan
>
> snazim sa o vyplnanie PPPU (Postova Pen. Poukazka "U") kde musi
> byt pouzity
> (podla postoveho uradnika) font "OCR B 10 AT" (seky citaju
> scanerom). Tento
> Dakujem, Lauko.
vlastni procerura
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 16.6.2003 07:21:20
> potrebuji ovladat z vlastni procedury prvek lezici na formu (napr.
> label1.cation:='bla bla';), ale nefunguje to. Procedura i formular je
> v jednom unitu. Jak tedy lze volat prvek? Form1.label1.caption...
> nefunguje.
Co to znamena, ze nefunguje? Predpokladam, ze procedura je
samostatna procedura, nikoli metoda formu. Nevidim podle daneho
popisu duvod, proc by to nemelo fungovat.
Jedna z moznosti, proc by vse nemuselo byt v poradku, by mohla
byt ta, ze sice existuje globalni promenna Form1, kterou Delphi
iniciativne zalozilo, ale program ji treba vubec nepouziva, protoze si
form vytvaris do svoji vlastni promenne typu TForm1. Nemuze to
byt neco takoveho? Nebo pak chyby typu, ze procedura se pouzije v
dobe, kdy form jeste nebo uz neexistuje apod. Tezko rict.
David Lebeda
ADMIN: Jeste informace
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.6.2003 00:54:04
Jeste dulezita informace - adresa konference zustava stale stejna a je
tedy delphi-l(zv)clexpert(tec)cz. Ani prihlasovani a odhlasovani se nemeni.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================vlastni procerura
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 15.6.2003 23:07:18
----- Original Message -----
From: "votava" <votavasw(zv)seznam(tec)cz>
> zdravim,
> potrebuji ovladat z vlastni procedury prvek lezici na formu (napr.
> label1.cation:='bla bla';), ale nefunguje to.
> Procedura i formular je v jednom unitu. Jak tedy lze volat prvek?
> Form1.label1.caption... nefunguje.
Ahoj.
No asi ta procedura musi byt privatni nebo verejna to formu. :
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
procedure TvojeProcedura;
public
{ Public declarations }
// tady das procedure TvojeProcedura; pokud ji budes volat odjinud nez z
vlastniho formu.
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.TvojeProcedura;
begin
Label1.Caption := 'A JE TO ...';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TvojeProcedura;
end;
end.
Ludek
vlastni procerura
[*] votava <votavasw(zv)seznam(tec)cz> - 15.6.2003 22:22:16
zdravim,
potrebuji ovladat z vlastni procedury prvek lezici na formu (napr.
label1.cation:='bla bla';), ale nefunguje to.
Procedura i formular je v jednom unitu. Jak tedy lze volat prvek?
Form1.label1.caption... nefunguje.
diky za kazdou radu Votava
ADMIN: DULEZITA INFORMACE
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.6.2003 22:10:10
Vazeni pratele,
timto vam vsem chci podekovat za pomoc, o kterou jsem vas myslim v
dubnu pozadal, totiz o pomoc s naprogramovanim lepsiho software pro
filtrovani mailu do teto konference.
Nebudu vas dlouze napinat - nepomohl vubec nikdo, prestoze je Vas tu k
tisicovce. Tedy kdyz nepocitam tech par prispevku s radami. Tak diky!
Aplikaci jsem tedy napsal sam pres tento vikend, otestoval a jiz take
nasadil na ostry provoz. Z tohoto duvodu vas informuji, ze kdyby
cokoliv nechodilo, muze to byt z tohoto duvodu a dejte mi o tom vedet.
Filtr pracuje tak, ze kazdy prichozi mail kompletne prepracuje do nove
podoby. Funguje to asi takto:
1. Pole FROM se rozlozi na jmeno a e-mail adresu. Jmeno se prevede do
ASCII a tedy se odstrani diakritika. Prekontroluje se na nepovolena
slova, pokud je obsahuje, pak se jmeno smaze. E-mail adresa se prevede
na mala pismena. Nove pole FROM se sestavi z prevedeneho jmena a
prevedene e-mail adresy.
2. Pole SUBJECT se prevede do ASCII a tedy se odstrani diakritika.
Prekontroluje se, zda nezacina nepovolenym znakem, zda neni subject
cely prazdny apod. Pokud neni subject v poradku, cely e-mail se vraci
s chybovym hlasenim odesilateli.
3. Pole DATE se nacte a pouzije v polozce hlavicky jako
X-OriginalDate, protoze e-mail do konference je posilan s platnym
datumem a casem odeslani z meho serveru, nikoliv z pocitace
odesilatele. Tim padem pole DATE bude vzdy aktualni.
4. Pole MESSAGEID a REFERENCES se ponechava, pokud existuje.
5. Ostatni pole nejsou pouzity, tedy zadna dulezitost zpravy, zadne
potvrzovani prijeti, potvrzovani precteni apod.
6. Zprava se rozlozi na vsechny jeji casti, tedy se dekoduji
jednotlive casti MIME. Casti jine nez text/plain se ignoruji, tedy
zadne prilohy, zadne VCARD, digitalni podpisy apod. Textove casti se
prevedou do ASCII a tedy se odstrani diakritika.
7. Vysledne telo zpravy jiz bez diakritiky je dale je kontrolovano na
velikost a jsou z nej v nejvetsi mozne mire odstraneny pricmrdky
kontroly AVG, AVAST, reklamy apod. Tato cast bude jeste dal
upravovana, jeste to neni uplne dokonceno.
8. Vysledek je odeslan listserveru k rozeslani ucastnikum.
To je vse. Pokud mate nejake napady nebo komentare nebo snad chcete
pomoci (v coz nedoufam), pak se ozvete na muj mail, nikoliv do
konference. Zrovna tak v pripade problemu.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================Free tool for MSDE
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 15.6.2003 21:40:41
Zdravim vsetkych,
chcel by som vyskusat MSDE.
Poznate niekto free nastroj, ktorym mozem pod MSDE vytvorit DB?
Prip. nieco jednoduche pre Backup a Restore?
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
ADMIN: Ignorujte
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.6.2003 21:26:29
Toto je zkouska. Ignorujte a neodpovidejte.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================Firebird/MS-SQL dbExpress alebo ADO
[*] Jaroslav Popluh�r - 13.6.2003 16:12:44
Hello delphi-l,
Startujeme vyvoj DB aplikacie, ktora musi byt prevadzky-schopna
na DB FireBird a MS-SQL 2000.
Aby sme zmensili rozdiely na strane klienta, radi by sme pre pristup
k DB pouzili ADO alebo dbExpress.
Pre spravne rozhodnutie by som rad zvazil Vase skusenosti,
rady a odporucania.
Takze ADO alebo dbExpress?
Alebo mame aj inu moznost?
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
FormatMemo v PDX
[*] Jaroslav Popluh�r - 13.6.2003 16:53:43
Hello Ale�,
Monday, June 9, 2003, 5:05:53 PM, you wrote:
AH> Zdravim konferu, help me please,
AH> mam tabulku v paradoxu, ktera obsahuje polozku FMTMemo. Nevim proc a
AH> jak, ale u klienta doslo k podivnemu naruseni teto tabulky a ja uz nevim
AH> jak na ni. Chova se tak, ze pokud listujete databazi a prohlizite toto
AH> memo vse jede az po urcity zaznam, kdy se jakoby memo pri zobrazeni
AH> zablokuje a dale uz se ukazuje u vsech zaznamu pouze text tohoto memo
AH> zaznamu, nepomuze nez restartovat aplikaci. Kdyz tento prelistuju a
AH> pohybuji se po jinych zaznamech je vse OK az do doby kdy se dostanu na
AH> tento zaznam.
Ja som bol v podobnej situacii s normalnymi polozkami v PDOXe.
Jedina cesta bola:
1. zistit posledny zaznam od zaciatku tabulky, ktory este funguje
2. zistit posledny zaznam od konca tabulky
3. vybrat data pd zaciatku po poslendy dobry zaznam
4. detto od konca
5. zo zalohovanych DB pohladat tu oblast, kde v aktualnej DB bolo
poskodenie
6. naimportovat vysledky 3. 4. a 5. spolu do novej tbl.
Samozrejme najslabsim miestom je bod 5.
- zaloha nemusi existovat
- tiez moze obsahovat poskodenie (ja som musel pouzit az 4. zalohu od
konca)
- POZOR, poskodeni moze byt viac (ale na to zrejme prides pri
importe:-)
Pri tychto operaciach odporucam urobit len kopie tabuliek bez
akychkolvek indexov!!!
A zindexovat reparovanu tbl. az po alebo pocas importu.
Vela zdaru, trpezlivosti a stastia.
Jaro mailto:delphi1(zv)acc.sk
Ulozenie ikony do databazy
[*] Milan Cizek <cizek.milan(zv)seznam(tec)cz> - 15.6.2003 20:32:11
> Pokusam sa urobit nasledujucu vec :
>
> 1. rekurzne prehladam disk
> 2 .z urcitych vopred definovanych suborov
> ziskam pomocou SHGetFileInfo Handle ikony
> Az po tento bod je vsetko v pohode
> 3.tuto ikonu potrebujem ulozit do databazy
> A tu je problem.
> Otazka : Neviete ako ulozim ikonu suboru do
> databazy ?
Ahoj,
nepises v cem je presne problem, resp. jakou databazi pouzivas. Pokud
pouzijes sloupec typu BLOB, nemel bys s tim mit problemy. Na tema
ukladani/cteni obrazku z BLOBu je v archivu cela rada prikladu.
S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Ulozenie ikony do databazy
[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 15.6.2003 15:38:47
Zdravim.
Pokusam sa urobit nasledujucu vec :
1. rekurzne prehladam disk
2 .z urcitych vopred definovanych suborov
ziskam pomocou SHGetFileInfo Handle ikony
Az po tento bod je vsetko v pohode
3.tuto ikonu potrebujem ulozit do databazy
A tu je problem.
Otazka : Neviete ako ulozim ikonu suboru do
databazy ?
S pozdravom
Ivan Dulgerov
J.Straku 12
969 00 Bansk� �tiavnica
SLOVAK REPUBLIC
tel : 00421 - 045/6920428
OT:Re: proc je Java lepsi nez .NET
[*] shotec <shotec(zv)seznam(tec)cz> - 15.6.2003 19:02:54
----- Original Message -----
From: "Erik Salaj" <info(zv)winsoft.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, June 15, 2003 4:46 PM
Subject: Re: proc je Java lepsi nez .NET
> > Carlos E. Perez napsal 101 duvodu proc je Java lepsi nez .NET:
> >
http://www.freeroller.net/page/ceperez/20030129#finally_looks_like_we_have
>
> a to kto je ten Carlos E. Perez?
>
> Erik
>
Neznam ho :-) nejspis nejakej javaMan co pise do freerolleru...
proc je Java lepsi nez .NET
[*] Erik Salaj <info(zv)winsoft.sk> - 15.6.2003 16:46:54
> Carlos E. Perez napsal 101 duvodu proc je Java lepsi nez .NET:
> http://www.freeroller.net/page/ceperez/20030129#finally_looks_like_we_have
a to kto je ten Carlos E. Perez?
Erik
ClientDataset, vlastni trideni (ceske)
[*] Sedlak Zdenek <konf(zv)seus(tec)cz> - 15.6.2003 16:19:00
Ahoj,
prosim pouziva nekdo z vas ClientDataset pro zobrazovani dat v gridu s tim,
ze pomoci neho take tridi? Necha se celkem dobre definovat indexy (temporary
i persistent) ovsem nikde nemuzu najit nejakou metodu ci udalost, kde bych
mohl urcit vlastni pravidle pro porovnani (podobne jako tomu je napr. u
stringlistu). Nevite tedy jak primet clientdataset, aby tridil cesky?
diky za kazdou radu
Zdenda
DragDrop z cizi App
[*] TJ <TJSof(zv)Seznam(tec)cz> - 15.6.2003 11:57:56
Podivej se na message WM_DROPFILES. Dalsi moznosti je pouzit interface
IDropTarget.
Tomas Juricek
> -----Original Message-----
> Prijemny den,
> potreboval bych, abych mohl na nejaky objekt v me aplikaci prenest
soubory
> z jine, nebo napriklad z plochy. Poradte nekdo prosim, nebo me alespon
> nasmerujte kde bych to nasel. Dik
>
> Pospa
>
DragDrop z cizi App
[*] Posp�il Jan <J.Pospisil(zv)Aquasoft(tec)cz> - 14.6.2003 14:21:42
Prijemny den,
potreboval bych, abych mohl na nejaky objekt v me aplikaci prenest =
soubory z jine, nebo napriklad z plochy. Poradte nekdo prosim, nebo me =
alespon nasmerujte kde bych to nasel. Dik
Pospa
OT: proc je Java lepsi nez .NET
[*] shotec <shotec(zv)seznam(tec)cz> - 14.6.2003 22:14:24
Carlos E. Perez napsal 101 duvodu proc je Java lepsi nez .NET:
http://www.freeroller.net/page/ceperez/20030129#finally_looks_like_we_have
WMDeviceChange a DriveComboBox
[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 14.6.2003 19:38:50
Zdravim
Mam taku malickost.
Potrebujem zobrazit nazov CDRomu v DriveComboBox
vzdy pri vymene media v mechanike.
Zatial som neprisiel na nic rozumnejsieho
ako odchytit udalost WMDeviceChange a vytvorit DriveComboBox
znovu.
Takto :
************************************************************
procedure TMainForm.WMDeviceChange(var Message: TMessage);
begin
DriveComboBox1.Free;
DriveComboBox1:=TDriveComboBox.Create(self);
with DriveComboBox1 do begin
Parent :=MainForm;
Left:=280;
Top:=192;
end;
end;
************************************************************
Otazka :
Neslo by to urobit nejako rozumnejsie ?
S pozdravom
Ivan Dulgerov
J.Straku 12
969 00 Bansk� �tiavnica
SLOVAK REPUBLIC
tel : 00421 - 045/6920428
Hypertextove odskoky na zaznamy databaze
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.6.2003 15:20:08
From: "Miroslav Vav��n" <mirun(zv)forcom(tec)cz>
> Co m� napad� z hlavy je tu ��st "http://" ozna�it jako hidden (vlastnost
> textu - pak nen� vid�t, ale url funguje)
A proc nepouzit rovnou HTML ? Le jej zobrazit TWebBrowser komponente nebo i
dalsich ktere ale zobrazuji jen urcitou cast HTML.
Petr Vones
Odchyceni komunikace s com portem
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 14.6.2003 15:19:24
> Potreboval bych sledovat, ktere prikazy konkretni program posila na COM
> port. Je tu nejaka moznost?
Zkusils PortMon z www.sysinternals.com ?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
Odchyceni komunikace s com portem
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.6.2003 15:15:46
From: "Delphi konference" <jsdelphi(zv)creatix(tec)cz>
> Potreboval bych sledovat, ktere prikazy konkretni program posila na COM
> port. Je tu nejaka moznost?
http://www.sysinternals.com/ntw2k/freeware/portmon.shtml
Petr Vones
Odchyceni komunikace s com portem
[*] Milan Cizek <cizek.milan(zv)seznam(tec)cz> - 14.6.2003 15:20:45
Ahoj,
podivej se na www.sysinternals.com.
S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
> -----Original Message-----
> Potreboval bych sledovat, ktere prikazy konkretni program
> posila na COM port. Je tu nejaka moznost?Odchyceni komunikace s com portem
[*] Delphi konference <jsdelphi(zv)creatix(tec)cz> - 14.6.2003 15:10:49
Potreboval bych sledovat, ktere prikazy konkretni program posila na COM
port. Je tu nejaka moznost?
Dekuji
Jan Skopovy
--------------------------------------
avast! Antivirus: Odchozi zprava cista.
Virova databaze (VPS): 13.6.2003
Scrollovani CheckListBoxu
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 14.6.2003 14:30:24
Zdravim,
nevi nekdo jak donutit CheckListBox, aby kdyz je polozka delsi, aby se
zobrazil vodorovnej ScrollBar?
Diky.
S p=F8=E1n=EDm p=ECkn=E9ho dne
Ji=F8=ED =C8in=E8ura
e-mail: mailto:jiri(zv)cincura.net; mailto:cincura(zv)wo(tec)cz;
mailto:xcincura(zv)informatics.muni(tec)cz
web: http://www.cincura.net/
=20
Scrollovani CheckListBoxu
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 14.6.2003 14:30:36
Zdravim,
nevi nekdo jak donutit CheckListBox, aby kdyz je polozka delsi, aby se
zobrazil vodorovnej ScrollBar?
Diky.
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Hypertextove odskoky na zaznamy databaze
[*] Miroslav Vav��n <mirun(zv)forcom(tec)cz> - 14.6.2003 10:15:48
Co m� napad� z hlavy je tu ��st "http://" ozna�it jako hidden (vlastnost
textu - pak nen� vid�t, ale url funguje)
S pozdravem
Mirun
----- Original Message -----
From: "Altius Research" <jkolomaznikova(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 15, 2003 4:54 PM
Subject: Re: Hypertextove odskoky na zaznamy databaze
> Diky za radu. Tohle reseni ma ale jednu malou mouchu,
> kdyz v databazi pouziji to "http://" pred slovem,
> ktere ma tvorit ten hyperlink, tak v tom RxDbRichEditu
> se zobrazi i to "http://", coz vypada dost hrozne.
> Ma ta komponenta nejakou funkci, kterou by sel tenhle
> retezec skryt?
>
> Diky
>
> JK
> AR
>
>
> ______________________________________________________________
> > Od: <delphi-l-owner(zv)clexpert(tec)cz>
> > Komu: delphi-l(zv)clexpert(tec)cz
> > CC:
> > Datum: Sun, 11 May 2003 18:56:41 +0200
> > P�edm�t: Re: Hypertextove odskoky na zaznamy databaze
> >
> > Ahoj,
> >
> > Pod pojmom "parsovat" mal autor pravdepodobne na
> > mysli podla mna vhodnejsi vyraz "interpretovat".
> > Vyrazom "parsovat" sa vo vseobecnosti oznacuje:
> > rozlozit nieco, rozoberat, analyzovat a pod.
> > (blizsie pozri vyznam "parse", "parsing" v anglictine)
> >
> > Ja som Mirunovi porozumel zhruba tak, ze RxDBRichEdit bude
> > obsahovat na urcenych poziciach text obsahujuci url-adresu
> > (t.j. taku, ktora zacina specialnym "url" identifikatorom
> > napr. "http://") s vopred definovanym obsahom. Pri kliknuti
> > na takyto text sa vyvola udalost OnURLClick a v jej obsluhe
> > na zaklade obdrzaneho parametra mozes vykonat prislusny
> > hypertextovy odskok na urceny zaznam databazy.
> >
> > Vlkovic
>
>
> --------------------
> Centrum(tec)cz Auto: P�in��me V�m kompletn� p�ehled kabriolet� na �esk�m
trhu! 34 aut, ve kter�ch si l�to opravdu
u�ijete!<http://user.centrum(tec)cz/redir.php?url=http://auto.centrum(tec)cz/clanek.
phtml?id=3870>
>
>
>
>
Cteni PDF dokumentu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 14.6.2003 10:04:13
> > pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
>
>O zadne nevim. Ono to totiz neni zase tak jednoduche, text muze byt v nekolika
>sloupcich popripade kazda strana v PDF dokumentu muze byt jinak otocena apod.
to neni ten hlavni problem - hlavnim problemem je cestina a fonty obecne.
Protoze se programy generujici PDF snazi o co nejmensi vysledek, casto
vkladaji jen nejnutnejsi znaky z fontu - dokonce nektere prevadece do PDF
pouziji pro kazde ceske pismenko samostatny font. Pak je v textu
<Font1>#pismeno1<font2>#pismeno1<font1>#pismeno1<font3>ala
a vysledkem je "zizala" {psano cesky}
Takze je pak potreba provest rozpoznani prave daneho znaku fontu.
Komercni COM komponenta, ktera prevadi PDF na TXT (predpokladam ze bez
cestiny):
http://www.verypdf.com/pdf2txt/pdf2txt.htm
Jinak nejaky vyber toho co je na SourceForge.net (predpokladam ze to je v
C, ale pro zacatek by to mohlo stacit):
http://sourceforge.net/projects/pdftohtml/
http://sourceforge.net/projects/pdflibrary/ (PDF.NET)
http://sourceforge.net/projects/pdfsearch/
http://sourceforge.net/projects/pdftools/
http://sourceforge.net/projects/libpdftotext/
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Vypnuti ScrollLock
[*] Erik Salaj <info(zv)winsoft.sk> - 13.6.2003 16:00:05
> existuje nejaky zpusob, jak vypnout programove na klavesnici
> ScrollLock (pripadne CaspLock, nebo NumLock) tak, aby
> opravdu i na klavesnici zhasla prislusna diodka??
na http://www.winsoft.sk/downld.htm najdes nas KeyLed 1.1
freeware vcitane zdrojoveho kodu
Erik
SimpleMAPI a Pegas
[*] Pavel Zichovsky <zichovsky(zv)trul(tec)cz> - 13.6.2003 15:34:26
Zdravim,
p=F8edpok=E1d=E1m, =BEe p=F8i instalaci MAPI podpory pro PMail jste vybral=
, =BEe chcete
SimpleMapi a ne Mapi 1.0.
Pak zkuste nap=F8=EDklad ve wordu/excelu otev=F8=EDt n=ECjak=FD soubor a d=
=E1t
Soubor/odeslat/p=F8=EDjemce po=B9ty
Jeslti se dokument p=F8enese do Pmailu a otev=F8e se okno s novou zpr=E1vo=
u (a
p=F8=EDlohou), tak SimpleMapi funguje, a probl=E9m bude n=ECkde jinde.
Pokud se nov=E1 zpr=E1va neobjev=ED, zkuste p=F8einstalovat MAPI pro PMail=
.
M=EC to na WinXP Pro CZ s PMailem 4.02a funguje.
S pozdravem
Pavel =AEichovsk=FD (zichovsky(zv)trul(tec)cz)
On 13 Jun 2003 at 15:00, Lebeda David wrote:
> snazim se rozchodit posilani mailu pres TJclEMail, tj. pres simple
> Chyba asi neni v JCL, ale v pouzivani Pegasu. Chci se proto zeptat na
> zkusenosti s pouzivanim simpleMAPI pro Pegas. Pegase spoustim ze site,
> u nej je nejaky programek pro doinstalaci mapi (i simpleMAPI), ten
> jsem spustil, ale i po restartu pocitace zadna zmena.SimpleMAPI a Pegas
[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 13.6.2003 15:23:38
Ja to pouzivam bez problemu. Jedine s XP jsou problemy.
> Ahoj,
>
> snazim se rozchodit posilani mailu pres TJclEMail, tj. pres simple
> MAPI. Na svem pocitaci pouzivam Pegasus Mail v4.02a. Uvedena trida ale
> vytrvale hlasi, ze pro Pegas neni mapi instalovane, GetClientLibName
> vraci prazdny retezec.
>
> Chyba asi neni v JCL, ale v pouzivani Pegasu. Chci se proto zeptat na
> zkusenosti s pouzivanim simpleMAPI pro Pegas. Pegase spoustim ze site,
> u nej je nejaky programek pro doinstalaci mapi (i simpleMAPI), ten
> jsem spustil, ale i po restartu pocitace zadna zmena.
>
> Diky
>
> David Lebeda
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
SimpleMAPI a Pegas
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 13.6.2003 15:00:09
Ahoj,
snazim se rozchodit posilani mailu pres TJclEMail, tj. pres simple
MAPI. Na svem pocitaci pouzivam Pegasus Mail v4.02a. Uvedena
trida ale vytrvale hlasi, ze pro Pegas neni mapi instalovane,
GetClientLibName vraci prazdny retezec.
Chyba asi neni v JCL, ale v pouzivani Pegasu. Chci se proto zeptat
na zkusenosti s pouzivanim simpleMAPI pro Pegas. Pegase
spoustim ze site, u nej je nejaky programek pro doinstalaci mapi (i
simpleMAPI), ten jsem spustil, ale i po restartu pocitace zadna
zmena.
Diky
David Lebeda
Delphi a vypnuty pocitac v siti
[*] Jaroslav Vorlicek <vorlicek(zv)ders(tec)cz> - 13.6.2003 14:38:30
Zdravim vespolek,
BTW kdyz uz vim, jak pocitac zapnout, je mozne take na dalku pocitac vypnout
?
Predem diik
Jaroslav Vorlicek
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Lukas Gebauer
Sent: Friday, June 13, 2003 10:07 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Delphi a vypnuty pocitac v siti
> Zdravim vespolek,
> nevite nekdo nahodou, jestli (a jak) lze po siti vzbudit
> vypnuty pocitac zkrz Delphi ? Delal jste nekdo neco takoveho/podobneho ?
Pokud poctac podporuje wake-on-lan technologii, pak jde zapnout
specielnim packetem pustenym do pocitacove site.
K tomu potrebujes ale znat cislo citove karty toho pocitace. Pokud ji
znas, muzes zkusit funkci WakeOnLan z unity SynaMisc.pas v me
Synapsi. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Vypnuti ScrollLock
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 13.6.2003 12:52:56
On 13 Jun 2003 at 12:07, Pavel Poles wrote:
> existuje nejaky zpusob, jak vypnout programove na klavesnici
> ScrollLock (pripadne CaspLock, nebo NumLock) tak, aby
> opravdu i na klavesnici zhasla prislusna diodka??
Musim te vazne varovat, se ScrollLockem si nezahravej. Blize viz
http://www.slhaters(tec)cz
S pozdravem
Zbysek Hlinka
Vypnuti ScrollLock
[*] Rumcajs-konfera <konfera(zv)rumcajs(tec)com> - 13.6.2003 12:14:43
Mam sadu komponent BuPack a je tam jedna, kter=E1 to umi... Zkus naj=EDt =
BuPack
na netu....=0D
Rumcajs=0D
=0D
____________________ =0D
Zdravim,=0D
=0D
existuje nejaky zpusob, jak vypnout programove na klavesnici =0D
ScrollLock (pripadne CaspLock, nebo NumLock) tak, aby =0D
opravdu i na klavesnici zhasla prislusna diodka??=0D
=0D
Dekuji za odpovedi=0D
=0D
Pavel Poles=0D
=0D
=2E=20
Vypnuti ScrollLock
[*] Pavel Poles <xCony(zv)seznam(tec)cz> - 13.6.2003 12:07:51
Zdravim,
existuje nejaky zpusob, jak vypnout programove na klavesnici
ScrollLock (pripadne CaspLock, nebo NumLock) tak, aby
opravdu i na klavesnici zhasla prislusna diodka??
Dekuji za odpovedi
Pavel Poles
Tlacitko pro Tray Icon v XP
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 13.6.2003 10:57:35
Zdravim vsechny,
spustil jsem jeden svuj program pod WinXP a tlacitko, ktere pouzivam
pro minimalizaci do tray na titulkovem pruhu formulare, bylo klasicke -
sede - a ne podle WinXP vzhledu. Nevi tedy nekdo, jak na titulkovem
pruhu vykouzlit tlacitko, aby to fungovalo i pod WinXP... Treba GetRight
to ma a spolehlive to funguje. Urcite je tedy na to nejaka fce, ale me
se ji nepodarilo najit.
Diky.
Jiri Cincura
http://cincura.web.wo(tec)cz/
Tlacitko pro Tray Icon v XP
[*] Jiri Cincura <xcincura(zv)informatics.muni(tec)cz> - 13.6.2003 11:00:48
Zdravim vsechny,
spustil jsem jeden svuj program pod WinXP a tlacitko, ktere pouzivam
pro minimalizaci do tray na titulkovem pruhu formulare, bylo klasicke -
sede - a ne podle WinXP vzhledu. Nevi tedy nekdo, jak na titulkovem
pruhu vykouzlit tlacitko, aby to fungovalo i pod WinXP... Treba GetRight
to ma a spolehlive to funguje. Urcite je tedy na to nejaka fce, ale me
se ji nepodarilo najit.
Diky.
Jiri Cincura
http://cincura.web.wo(tec)cz/
Delphi a vypnuty pocitac v siti
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 13.6.2003 10:06:30
> Zdravim vespolek,
> nevite nekdo nahodou, jestli (a jak) lze po siti vzbudit
> vypnuty pocitac zkrz Delphi ? Delal jste nekdo neco takoveho/podobneho ?
Pokud poctac podporuje wake-on-lan technologii, pak jde zapnout
specielnim packetem pustenym do pocitacove site.
K tomu potrebujes ale znat cislo citove karty toho pocitace. Pokud ji
znas, muzes zkusit funkci WakeOnLan z unity SynaMisc.pas v me
Synapsi. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
Delphi a vypnuty pocitac v siti
[*] Jaroslav Vorl��ek <vorlicek(zv)ders(tec)cz> - 13.6.2003 09:56:32
Zdravim vespolek,
nevite nekdo nahodou, jestli (a jak) lze po siti vzbudit
vypnuty pocitac zkrz Delphi ? Delal jste nekdo neco takoveho/podobneho ?
Predem diik
Jaroslav Vorlicek
MemProof a database.open
[*] Michal Jiskra <jiskra(zv)eskon(tec)cz> - 13.6.2003 09:23:21
Ahoj,
kontroluji program v MemProof a nevim si rady s jednou veci. Kdyz dam
database.open memproof vypise errorovou hlasku
82100 Error 0000007B 0
OpenFileMapping(4,0,"SMBuffer") : N�zev souboru, adres��e nebo jmenovk
OpenFileMapping opens a named file-maping object.
The returned thread-handle must be closed with CloseHandle when no loger
needed.
v modulu kernel32.dll i kdyz databazi na konci programu korektne
uzavru(database.close). Aplikace je aplikacnim serverem, do databaze se
napojuji i z vlaken(kazde vlakno ma svuj vlastni dm,session a database).
Nechci aby doslo k nejakemu preteceni zdroju pro pripojeni do DB a
naslednemu padu aplikace. Nevite o co jde ? Pouzivam D5(SP1),BDE,MSDE a
testuji to na WMe.
Dale jsem napr. dostal hlaseni pri pouziti MessageDlg - error
destroyicon(unknown win32 error) v modulu user32.dll, ale referovane unity
jsou z VCL ... Co s takovymi chybami, daji se nejak ovlivnit ?
Diky za jakekoliv rady pro odstranovani chyb nalezenych memproofem, hlavne
tech, ktere jsou odkazovany do vcl....
Diky
Michal
P.S. MemProof verze 0.9.4.8., hookdll 0.9.4.5
Re[3]: Je PC zapnute? - vyreseno.
[*] Bohac Frantisek <bohacf(zv)vnol(tec)cz> - 13.6.2003 07:25:32
Po konzultaci s Lukasem Gebauerem se vse vyjasnilo:
kdyz se pinguje IP, tak timeout funguje bez problemu, ale kdyz se pinguje
jmeno pocitace ktery neexituje, tak to chvilku trva, nez to DNS zpracuje -
to byly ty prodlevy, ktere me tam zarazely ...
FB
----- Original Message -----
From: "Lukas Gebauer" <gebylist(zv)mlp(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 12, 2003 2:45 PM
Subject: Re: Re[2]: Je PC zapnute?> > > Pokud pouzivate TCP/IP protokol, tak knihovna Synapse
> > > (www.ararat(tec)cz/synalse), unita PingSend, funkce PingHost()
> > Jde tam nejak nastavit timeout? Na vnitrni siti je odezva vyborna, takze
by
> > stacilo nastavit maly timeout ... protoze kdyz je fce PingHost() volana
bez
> > jakehokoliv nastaveni, tak to u vypnutych pocitacu trva hoodne douho :-(
>
> A to je takovy problem se podivat na to, jak je ta funkce PingHost
> napsana? (je to 5 radku kodu!)
>
> Udelej to, a zjistis, ze je to jen ukazkove pouziti objektu
> TPingSend, ktery sam o sobe ma treba property timeout.
>
> Proc ta ten objekt a ta property jsou? Inu, proto, aby jej mohl
> kdokoliv pouzit jak potrebuje. ;-)
>
> --
> Lukas Gebauer.
>
> E-mail: gebauerl(zv)mlp(tec)cz
> http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
>
>
GSM modem a SMS
[*] <tomsir1.edu(zv)mail.cez(tec)cz> - 13.6.2003 06:50:55
trosku popularnejsi formou treba na : http://www.dreamfabric.com/sms
radegast
"Petr Fejfar" <development(zv)callnet(tec)cz>(zv)clexpert(tec)cz on 12.06.2003 20:43:=
12
Odpov=ECzte pros=EDm - delphi-l(zv)clexpert(tec)cz
Odesl=E1no k=FDm: delphi-l-owner(zv)clexpert(tec)cz
Komu: <delphi-l(zv)clexpert(tec)cz>
Kopie:
P=F8edm=ECt: Re: GSM modem a SMS
From: "Petr Langer" <langer(zv)xdom(tec)cz>
> Bohuzel, pokud vim, neni v teto oblasti zadny
> standard
Byvavavalo. Uz radu let existuji ETSI normy.
Pro individualni potrebu je muzes
stahnout na http://pda.etsi.org/pda/queryform.asp
Takze pokud si nastudujes zakladni normy GSM 3.38, 3.40, 7.05 a 7.07,
mel bys byt teoreticky schopen napsat komunikaci s kazdym mobilem.
> a je to pro kazdy telefon (GSM modem)
> vice mene jine.
Bohuzel, je to prilis dynamicky se vyvijejici
odvetvi, takze FW telefonu obsahuji mnozstvi chyb
a odchylek od standardu.
Ale pro bezne odesilani/prijimani SMS a praci s phonebookem v podstate
vetsina existujicich pristoju konvergovala ke standardum.
Co se tyce novych vlastnosti jako jsou address booky, foldery,
multimedia etc., tam se to zase rozjelo a je v tom pekny bordel.
HTH, pf
=Cteni PDF dokumentu
[*] Ondrej Krsko <ondrej.krsko(zv)zoznam.sk> - 13.6.2003 01:42:15
ahoj,
samozrejme, pdf ponuka toho dost vela.
preco by asi moj "adobe_acrobat_reader_v505_ce_cz.zip" mal 12.5 mega?
s pozdravom
ondrej
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 12, 2003 9:25 PM
Subject: Re: Cteni PDF dokumentu
> From: "Pavel Malinsky" <malinsky(zv)pmcom(tec)cz>
> > casto zde byla rec o vytvareni PDF souboru, ale ja bych potreboval
> > pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
> > placenych komponent, ale free zadnou. Existuje vubec nejaka, nebo
> > jak nacist PDF do obyc. textu? Treba i za predpokladu, ze pouziju
>
> O zadne nevim. Ono to totiz neni zase tak jednoduche, text muze byt v
nekolika
> sloupcich popripade kazda strana v PDF dokumentu muze byt jinak otocena
apod.
>
> Petr Vones
>
>
>
Cteni PDF dokumentu
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 12.6.2003 21:19:27
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
>
> > pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
> > placenych komponent, ale free zadnou. Existuje vubec nejaka, nebo
> > jak nacist PDF do obyc. textu?
> > Treba i za predpokladu, ze pouziju importovany ActveX Acrobat Readeru.
>
>
> A co takhle google kde se (bez uvozovek) zada "PDF reader Delphi"
>
> Petr Langer
Prvni vec, kterou delam, kdyz neco hledam je web,
a pak se teprv ptam, kdyz nejsem spokojeny s vysledkem hledani:))).
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Cteni PDF dokumentu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.6.2003 21:25:18
From: "Pavel Malinsky" <malinsky(zv)pmcom(tec)cz>
> casto zde byla rec o vytvareni PDF souboru, ale ja bych potreboval
> pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
> placenych komponent, ale free zadnou. Existuje vubec nejaka, nebo
> jak nacist PDF do obyc. textu? Treba i za predpokladu, ze pouziju
O zadne nevim. Ono to totiz neni zase tak jednoduche, text muze byt v nekolika
sloupcich popripade kazda strana v PDF dokumentu muze byt jinak otocena apod.
Petr Vones
GSM modem a SMS
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.6.2003 20:43:12
From: "Petr Langer" <langer(zv)xdom(tec)cz>
> Bohuzel, pokud vim, neni v teto oblasti zadny
> standard
Byvavavalo. Uz radu let existuji ETSI normy.
Pro individualni potrebu je muzes
stahnout na http://pda.etsi.org/pda/queryform.asp
Takze pokud si nastudujes zakladni normy GSM 3.38, 3.40, 7.05 a 7.07,
mel bys byt teoreticky schopen napsat komunikaci s kazdym mobilem.
> a je to pro kazdy telefon (GSM modem)
> vice mene jine.
Bohuzel, je to prilis dynamicky se vyvijejici
odvetvi, takze FW telefonu obsahuji mnozstvi chyb
a odchylek od standardu.
Ale pro bezne odesilani/prijimani SMS a praci s phonebookem v podstate
vetsina existujicich pristoju konvergovala ke standardum.
Co se tyce novych vlastnosti jako jsou address booky, foldery,
multimedia etc., tam se to zase rozjelo a je v tom pekny bordel.
HTH, pf
GSM modem a SMS
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 12.6.2003 19:24:36
Ahoj,
pro zacatek se zkus mrknout na AsyncPro, je ted pod MPL. Umi ted i posilani
SMS v PDU mode. http://sourceforge.net/projects/tpapro
Zdravim
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> Subject: GSM modem a SMS
> snazim se program pro zasilani a prijem SMSek pres GSM modem.
> Nemate nekdo
> nejake zkusenosti nebo dokonce neco podobneho jiz hotoveho??GSM modem a SMS
[*] Petr Langer <langer(zv)xdom(tec)cz> - 12.6.2003 18:47:18
----- Original Message -----
From: "�imek Pavel - KVS" <p.simek(zv)icsvscr(tec)cz>
Subject: GSM modem a SMS
> snazim se program pro zasilani a prijem SMSek pres GSM modem. Nemate nekdo
> nejake zkusenosti nebo dokonce neco podobneho jiz hotoveho??
Bohuzel, pokud vim, neni v teto oblasti zadny standard a je to pro kazdy
telefon (GSM modem) vice mene jine. Obecne se ale pouzivaji AT prikazy,
jejich popis bys mel najit na webu (ve specifikaci) vyrobce.
HTH,
Petr Langer
Cteni PDF dokumentu
[*] Petr Langer <langer(zv)xdom(tec)cz> - 12.6.2003 18:44:22
----- Original Message -----
From: "Pavel Malinsky" <malinsky(zv)pmcom(tec)cz>
Subject: Cteni PDF dokumentu
> Ahoj,
>
> casto zde byla rec o vytvareni PDF souboru, ale ja bych potreboval
> pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
> placenych komponent, ale free zadnou. Existuje vubec nejaka, nebo
> jak nacist PDF do obyc. textu?
> Treba i za predpokladu, ze pouziju importovany ActveX Acrobat Readeru.
A co takhle google kde se (bez uvozovek) zada "PDF reader Delphi"
Petr Langer
Re[2]: Je PC zapnute?
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.6.2003 14:45:30
> > Pokud pouzivate TCP/IP protokol, tak knihovna Synapse
> > (www.ararat(tec)cz/synalse), unita PingSend, funkce PingHost()
> Jde tam nejak nastavit timeout? Na vnitrni siti je odezva vyborna, takze by
> stacilo nastavit maly timeout ... protoze kdyz je fce PingHost() volana bez
> jakehokoliv nastaveni, tak to u vypnutych pocitacu trva hoodne douho :-(
A to je takovy problem se podivat na to, jak je ta funkce PingHost
napsana? (je to 5 radku kodu!)
Udelej to, a zjistis, ze je to jen ukazkove pouziti objektu
TPingSend, ktery sam o sobe ma treba property timeout.
Proc ta ten objekt a ta property jsou? Inu, proto, aby jej mohl
kdokoliv pouzit jak potrebuje. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
Re[2]: Je PC zapnute?
[*] Bohac Frantisek <bohacf(zv)vnol(tec)cz> - 12.6.2003 14:37:02
> Pokud pouzivate TCP/IP protokol, tak knihovna Synapse
> (www.ararat(tec)cz/synalse), unita PingSend, funkce PingHost()
>
> --
> Jan Fiala
> mailto:jan.fiala(zv)wo(tec)cz
>
Jde tam nejak nastavit timeout? Na vnitrni siti je odezva vyborna, takze by
stacilo nastavit maly timeout ... protoze kdyz je fce PingHost() volana bez
jakehokoliv nastaveni, tak to u vypnutych pocitacu trva hoodne douho :-(
Problem s Fullscreenem
[*] kobka(zv)volny(tec)cz - 12.6.2003 13:03:11
Mam novou grafickou kartu GFORCE a od te doby mam problem s
aktivaci fullscreenu v DelphiX. Kdyz se pokusim spustit aplikaci
na fullscreen, zustane bila obrazovka a kurzor presypaci hodiny
(bohuzel se drzi v klasicke windows smyccce - chvili cekej - nic
nedelej - chvili cekej atd...8-(( ) Kdyz to ale necham dat na
tvrdo na 800x600 jede vse v pohode. Mate s tim nekdo zkusenost?
Dikes
--
Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
dbExpress - vytvoreni ClientDataSetu v programu a
[*] Sedlak Zdenek <konf(zv)seus(tec)cz> - 12.6.2003 12:40:11
Ahoj,
laboruji s dbExpress. Pokud zobrazuji data v DBGridu, tak to nedelam tak, ze
nataham komponenty na formular a vse nastavim, ale vytvarim si potrebne
komponenty ve zdrojaku.
Mam tedy funkci ktera mi vraci otevreny dataset (samozrejme takovy, ktery je
mozne zobrazit v gridu, tedy ne jednosmerny). A ten pak priradim do
DBGrid.Datasource.Dataset, pokud jej zaviram, tak to take udelam "rucne" v
kodu. Vse funguje dobre, pokud pouzivam IBExpress, tam samozrejme neni
problem.
Ted bych potreboval si tuto funkcnost pripravit i pro dbExpress. Samozrejme
pouzivatm spojeni SQLQuery - DatasetProvider - ClientDataset. Az ten
clientdataset si vracim a funguje to.
Vytvorit SQLQuery, datasetprovider i clientdataset. Tomu clientdatasetu
pomoci funkce SetProvider nastavim spravny provider. Pokud necham
packetrecords na -1 (a nacte mi to vlastne vsechny zaznamy) pak po otevreni
ClientDataSetu mohu uvolnit SQLQuery i Provider.
A po ukonceni prohlizeni v gridu muzu uvolnit take ClientDataSet.
Problem mam, pokud si omezym packetRecords napr. na 20. Pak samozrejme
nemuzu uvolnit SQLQuery ani DatasetProvider. Toto uvolneni bych chtel udelat
az pri uvolnovani Clientdatasetu. Ale vzhledem k tomu, ze takto otevrenych
gridu muzu mit vice, tak nemam zadne globalni promene s temi datasety a
providery. Chtel bych se tedy zeptat, jestli je mozne nejakym zpusobem
zjistit ciste z Clientdatasetu jaky pouziva provider? Tedy dostat na nej
odkaz. Bohuzel neobsahuje metodu GetProvider. Z provideru pak uz ziskam i tu
puvodni SQLQuery a mohu uvolnit SQLQuery i provider i ClientDataset.
Nevite nekdo jak na to?
Pouzivam W2K, Delphi 6 Pro.
diky
Zdenda
Zakazani animace minimalizace a maximalizace oken
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 12.6.2003 11:45:15
Ahoj,
nevite jak docane zakat/povolit animaci kdyz se
minimalizuje/restoruje/maximalizuje okno. Nastavuji toto programove pro radu
oken aplikace a je to trochu vizualni show.
Diky,
Danik {D5,W2k}
Cteni PDF dokumentu
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 12.6.2003 10:31:33
Ahoj,
casto zde byla rec o vytvareni PDF souboru, ale ja bych potreboval
pouze PRECIST PDF dokument do prosteho textu. Nasel jsem nekolik
placenych komponent, ale free zadnou. Existuje vubec nejaka, nebo
jak nacist PDF do obyc. textu? Treba i za predpokladu, ze pouziju
importovany ActveX Acrobat Readeru.
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
OT: Font "OCR B 10 AT" a PPPU sek
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.6.2003 10:35:23
Puvodni zprava ze dne 12.6.2003:
> snazim sa o vyplnanie PPPU (Postova Pen. Poukazka "U") kde musi byt pouzity
> (podla postoveho uradnika) font "OCR B 10 AT" (seky citaju scanerom). Tento
> font je bohuzial za peniaze (dost drahy).
> Chcel by som sa opytat ci niekto neriesil tento problem, pripadne ako.
> Pripada mi to dost potavene na hlavu, posta to vyzaduje a font predava
> externa firma ;-(
Ja mel tento font legalne uz od nepameti, myslim ze byl soucasti
Corelu. Nicmene si vzpominam, ze nekdy pred rokem, kdyz nastupovaly
nove poukazky A, tak posta tento font rozdavala. Nevim, jestli ho muze
legalne rozdavat, jak rikam, ja ho stejne davno mel, ale zkus se
zeptat na te poste, jestli nahodou nemaji koupenou licenci pro jeho
sireni.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
OT: Font "OCR B 10 AT" a PPPU sek
[*] Lauko Stefan <laukosw(zv)naex.sk> - 12.6.2003 10:30:34
Ahojte,
snazim sa o vyplnanie PPPU (Postova Pen. Poukazka "U") kde musi byt pouzity
(podla postoveho uradnika) font "OCR B 10 AT" (seky citaju scanerom). Tento
font je bohuzial za peniaze (dost drahy).
Chcel by som sa opytat ci niekto neriesil tento problem, pripadne ako.
Pripada mi to dost potavene na hlavu, posta to vyzaduje a font predava
externa firma ;-(
Dakujem, Lauko.XML
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 12.6.2003 10:14:01
Ohledne XML napr.
www.kosek(tec)cz
http://gspot.sh.cvut(tec)cz/%7Ethe/skola/xmltutor/index.html
Budes potrebovat nejaky XML parser. Bud original MS (Free, ponekud velky, na
nejstarsich windows se musi doinstalovat) nebo nejaky cizi (maji chyby ale
na tohle by to melo stacit) - viz torry a pod. Jeden je taky na
www.destructor.de (pry celkem dobry). Jinak prace s XML je easy :-)
Danik
> -----Original Message-----
> Behalf Of Krayzel Libor
> Subject: XML
> Nejl�pe p��klady a dema. Chci ukl�dat a na��tat XML z aplikace psan� v
> Delphi 4.
>
> D�kuji.
XML
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 12.6.2003 10:04:02
Hezk=FD den,
pros=EDm nave=EFte mne na spr=E1vnou cestu. Jsem zat=EDm XML =
nedot=E8en=FD za=E8=E1te=E8n=EDk:)
Nejl=E9pe p=F8=EDklady a dema. Chci ukl=E1dat a na=E8=EDtat XML z =
aplikace psan=E9 v
Delphi 4.
D=ECkuji.=3D=3D[ Libor Krayzel =
]=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D
http://www.elka(tec)cz/
http://www.elka(tec)cz/easypad/ * mailto:elka(zv)elka(tec)cz
phone: +420 608 937 935
ICQ: 112690517
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=20
TDBF 6.23 a AccessViolation pri praci
[*] Zaplik <zaplik(zv)volny(tec)cz> - 12.6.2003 09:11:08
> Ono je to cele na 2 veci.
> Me zas nechodila tabulka s vice jak 2-mi indexy
> a jine dalsi problemy, ktere se v BDE neobjevovaly.
> Napr. pri filtrovani se TDBF kousla a konec...
>
> Tady na konferenci jsem se prd dozvedel
> a tak jsem to zase prepsal do BDE.
> Na TDBF623 jsem se vykaslal.
No, prepisovat to zpatky do BDE uz nebudu, protoze kvuli potizim s BDE jsem
byl nucen to predelat. A TDBF dalo nejmene prace na prepsani. Ale Tvoje
zminka o max 2 indexech pomohla. Je ale s podivem, ze na jinem souboru ktery
ma asi 8 indexu to vubec nevadi. No jeste budu badat .
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.488 / Virov� b�ze: 287 - datum vyd�n�: 5.6.2003
OT: nutne potrebuji MSVCRT32.DLL z Windows Milleni
[*] Petr Palicka <palicka(zv)aginfo(tec)cz> - 12.6.2003 09:29:40
Ahoj,
asi jsem neco podelal v instalace a prepsal ve
windows ME knihovnu msvcrt32.dll nespravnou verzi.
_Opravdu_ nutne bych ji potreboval od nekoho poslat.
muzete prosim nekdo?
dekuji
Peca
=20