Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
BatchMove a Transakce
[*] Bohuslav Svancara <softprojekt(zv)bosnet(tec)cz> - 25.10.1998 20:49:44
Nevite nekdo, jak zaridit, aby BatchMove po skonceni prace neudelal Commit?
Potrebuji v jedne transakci provest nekolik BatchMove (kopie nekolika
Paradox tabulek do SQLBase nebo zpet).
V helpu se pise, ze pokud BatchMove bezi pod nastartovanou transakci, tak
commit neudela, ale nedari se mi to, porad commituje. Mrcha jedna.
Mam zhruba tento kod:
var Database1:tDatabase;
BatchMove1: TBatchMove;
ZdrojovaPDXTabulka: TTable;
CilovaSQLTabulka: TTable;
begin
Database1 := tDatabase.Create(nil);
BatchMove1:= TBatchMove.Create(nil);
ZdrojovaPDXTabulka:= TTable.Create(nil);
CilovaSQLTabulka:= TTable.Create(nil);
Database1.AliasName := 'Interbase';
Database1.DatabaseName := 'CilovaSQLDatabase';
ZdrojovaPDXTabulka.DatabaseName := 'VK_CISELNIK'; {Paradoxovy alias}
ZdrojovaPDXTabulka.TableName := 'CISCEN.DB'; {Paradox tabulka}
CilovaSQLTabulka.DatabaseName := Database1.DatabaseName;
CilovaSQLTabulka.TableName := 'CISCEN';
BatchMove1.Source := ZdrojovaPDXTabulka;
BatchMove1.Destination := CilovaSQLTabulka;
BatchMove1.Mode := batAppendUpdate; {pro testovaci ucely se bude
2x delat totez}
Database1.Connected := true;
try
Database1.StartTransaction;
try
BatchMove1.Execute; {pro testovaci ucely se bude 2x delat totez}
BatchMove1.Execute; {pro testovaci ucely se bude 2x delat totez}
Database1.Commit;
except
Database1.RollBack;
end;
finally
Database1.Connected := false;
end;
Cilova databaze je Centura a na serveru vidim ze po BatchMove1.Execute se
provede commit.
Prikaz Database1.Commit pak zahlasi, ze "No user transaction is currently in
progress" (a totez pochopitelne RollBack).
Stejne se to chova pro Interbasi. Nemam sice verzi Delphi C/S a SQL Monitor,
kterym bych se na commit v Interbasi podival, ale chybove hlaseni je stejne.
Do Century se chodi pres ODBC, do Interbase taky (pres "InterBase 4.x Driver
by Visigen").
Nepomaha ani, kdyz Database1, ZdrojovaPDXTabulka a CilovaSQLTabulka maji
specialni Session.
Poradi nekdo?
P.S.
Nedelate nekdo s Centurou? A nemate zkusenosti s prenasenim BLOBu pomoci
BatchMove? Obcas funguje, obcas ne. Z Paradoxu do SQL nekdy ano, nekdy ne,
opacne spise ne nez ano... Z Paradoxu do Paradoxu ano, z SQL do SQL ne, musi
se to zvlast osetrovat, kazda verze ODBC driveru se chova jinak, podle toho
jak si nastavite BLOB SIZE v BDE Administratoru, tak se vam blob zkazi...,
no ohromna zabava.
Bohuslav Svancara
softprojekt(zv)bosnet(tec)cz
Username
[*] Lubo Fule <fule(zv)sct.sk> - 25.10.1998 21:09:17
Ovela jednoduchsie a asi aj korektnejsie je pouzit funkciu GetUserName
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Bro�ek Erik
> Sent: Wednesday, November 25, 1998 6:48 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Username
>
>
> > Jak zjistim jmeno uzivatele, ktery se prihlasil do Windows?
> >
> > Staci si precist pomoci TRegistry tuto hodnotu z registru:
> > \\HKEY_LOCAL_MACHINE\System\CurrentControlSet\control
> > a je to promena "Current User"
> >
> > Prihlaseni do site je zaznamenano zde:
> > \\HKEY_LOCAL_MACHINE\Network\Logon
> > a je to promena "username"
> >
> > Erik.
>
Update a Delphi 4
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 25.10.1998 22:52:17
Prvni patch netreba :-)
s pozdravem Michal Cizek Update a Delphi 4
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.10.1998 23:51:13
> Borland uvolnil nedavno druhy opravny patch na Delphi 4: nevite nekdo
> nahodou,
> zda je treba pred jeho instalaci mit nainstalovan i ten prvni patch? Diky,
Neni to potreba.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Username
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.10.1998 23:51:13
> Subject: Username
> Zdravicko...
>
> Jak zjistim jmeno uzivatele, ktery se prihlasil do Windows?
>
> Dekuji za odpovedi, F.
Viz subjekt - s drobnou zmenou - GetUserName.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Problem s BDE
[*] Radek Hladik <rhladik(zv)tfc(tec)cz> - 26.10.1998 00:15:53
Ahoj all,
mam zase jeden dotaz (uz jsem ho jednou posilal, ale nekam se
ztratil).
Pokud pisu aplikaci s BDE a musim program rucne zavrit (CTRL-F2)
nebo mi spadne, zustane databaze pro BDE otevrena a uz mne do ni nepusti.
Chci se zeptat, jestli se da zavrit nak lip, nez restartem pocitace.
Diky Radek
Radek Hlad�k
rhladik(zv)tfc(tec)cz
Offtopic - sluzba internetu
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 26.10.1998 03:44:16
Zkus "www.mail(zv)ciesin.org" nebo "webmail(zv)www.ucc.ie"
Prikazy dostanes klasicky na HELP
S pozdravem Zdenek
--------------------------------------- E-Mail
-------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne)
|
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn.
kdykoliv) |
| ( o o) |--------------------- WWW
--------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/
|
----------------------------------------------------------------------
--
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/
|
----------------------------------------------------------------------
--
----------
> Odes�latel: Kallima II <kallima(zv)bratislava.telecom.sk>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Offtopic - sluzba internetu
> Datum: 25. listopadu 1998 16:11
>
> Nazdar,
> neviete nahodou ci existuje sluzba,
> ktora by na zaslany majl s adresou
> poslala naspat stranku na tejto adrese?
> Malo by to byt nieco ako FTPmail, ale
> funguje to s WWW strankami.
> Aka je jej adresa?
>
> Diky.Delka textu
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 26.10.1998 04:22:48 pst
Ahojte,
Omlouvam se, mozna jdu s krizkem po funuse, ale kdosi tu chtel
zjistovat delku textu. Bohuzel ani nemam original dotazu - omylem jsem
ho smazal, ale presto :
existuji API fce
16-bit - GetTextExtent
32-bit - GetTextExtentPoint32 deklarovana ve WINDOWS.PAS
function GetTextExtentPoint32(DC: HDC; Str: PChar; Count: Integer;
var Size: TSize): BOOL; stdcall;
pro pouziti je ale treba DeviceContext oblasti(wokna), kam se dany text
vypisuje. Ten se zjisti pomoci API fce GetDC, ktera ma jako parametr
handle wokna. To je property Handle, kterou ma kazdy formular.
Ted tochu kodu
function TForm1.DelkaTextu(aText: PChar): integer;
var
delka: integer;
aSize: TSize;
aDC: HDC;
begin
aDC:= GetDC(Form1.Handle);
delka:= 0;
if GetTextExtentPoint32(aDC, aText, StrLen(aText), aSize) then
begin
delka:= aSize.cx;
end;
ReleaseDC(Form1.Handle, aDC);
result:= delka;
end;
dalsi podrobnosti viz Help
dalsi z tohoto blazniveho spolecenstvi
Karel Vlcek
tel.: +420 602 264812
poskytovani software
Vlcekk(zv)hotmail.com
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Vyber komponent za behu
[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 26.10.1998 07:35:51
Pokud mas na mysli to aby slo za behu menit velikost a pozici nekterych
komponent tak cti dal.
Ja pouzivam RTDesigner. Myslim ze jsem to stahnul z DSP. Je to freeware(
vlastne cardware) - ale bez zdrojaku. Nez jsem se s tim naucil delat tak
se program choval dost divne (RadioGroupBoxy neslo prepinat, ComboBoxy
neslo otevirat, slo hybat s komponentama, s kteryma to jit nemelo,
obcas Access Violation). Ted jsem vsechny tyto problemy odstranil( ale
nikdy nevim co me jeste prekvapi). Pokud to nemuzes najit nebo ztahnout
tak ti to poslu na tvou e-mail adresu i s nejakyma tema chabyma
zkusenostma. Autor slibil v dalsich verzich zdrojaky. Krome toho jsem
videl este jednu takovou komponentu, ale ta byla naprosto nepouzitelna.
> -----P�vodn� zpr�va-----
> Od: Marek Repisk� [SMTP:mrepisky_zl(zv)zsnp.sk]
> Odesl�no: 25. listopadu 1998 12:59
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Vyber komponent za behu
>
> > Nazdar kolegove,
> > neresil uzjste nekdo problem vyberu komponent uzivatelem podobne
> jako
> > to jde v navrhu v Delphi nebo treba na plose Win (tahnutim mysi nebo
> > shift+sipky)?
> > Urcite bude nejaka API funkce pro vyber objektu na zaklade TRect
> nebo
> > pod. ale zatim jsem v hledani nebyl uspesny. Za vsechny odpovedi
> diky.
> > Pavel Fiser
>
> Nazdar,
>
> mozno by stacilo vyuzit moznosti Drag&Drop.
>
> Marek Repisky
> mrepisky_zl(zv)zsnp.sk
>
>
>
>
> Update a Delphi 4
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.10.1998 07:43:33
Patrik Sl�de�ek wrote:
> Borland uvolnil nedavno druhy opravny patch na Delphi 4: nevite nekdo
> nahodou, zda je treba pred jeho instalaci mit nainstalovan i ten prvni
> patch? Diky,
Neni treba. Ale jak jsem na to koukal, zdaleka neopravuje vsechny
chyby. Dnes jsem ukazoval na D4 po zaplate 2 komponenty
DecisionCube, a padaly stejne radostne jako pred zaplatou.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
PopupMenu za behu
[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 26.10.1998 08:07:13
[P��loha v souboru: Ivy.gif]
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
�
Hi,
�
muzete mi prosim nekdo pomoci s nasledujicim problemem ? Za behu programu
nekolikrat menim obsah Popup Menu. Pri prvnim naplneni je vse OK, ale pri
dalsim dostavam hlasku, ze PMenu111 uz existuje. To PopupMenu PMenu11 se
plni z pole, kde jsou obsazena PMenu111, PMenu112 atd. Zde je kus zdrojaku:
�
.
.
.
// POPUPMENU OBNOVENI - obnoveni obsahu Popup Menu
function PopupMenu Obnoveni(P: Integer): Integer;
var
� A, B: Integer; MojeMenuItem: TMenuItem;
begin with Form1, MojeMenuItem do begin
� MojeMenuItem := nil;
� A := 0;
�
� A := High(P M1);
� while PMenu11.Items.Count > 0 do PMenu11.Items.Delete(0);
� // tady se provadi Delete a stejne to neni k nicemu
�
� for B := 0 to A do begin
��� MojeMenuItem := TMenuItem.Create(PMenu11);
��� Name���� := P M1[B].Name;
��� Caption� := P M1[B].Caption;
��� Hint������ := P M1[B].Hint;
��� OnClick� := PMenu11OnClick;
��� Enabled := P M1[B].Enabled;
��� PMenu11.Items.Add(MojeMenuItem);
� end;
�
� MojeMenuItem.Free;
.
.
.
�
�
Vasek
�
�
�
V�clav Lukes
�
E-mail: Vaclav.Lukes(zv)pvt(tec)cz <mailto:Vaclav.Lukes(zv)pvt(tec)cz> ��
511247(zv)sms.paegas(tec)cz <mailto:511247(zv)sms.paegas(tec)cz>
Tel.: 0603-511247
� Dostal som 500 Sk // Tungli
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 26.10.1998 08:26:53
Niekto mi poslal 500 Sk za moje komponenty.
Rad by som poslal komponenty ale neviem kam lebo nemam EMail adresu.
Sorry, viem ze to nepatri do konferencie ale nemal som inu moznost.
TUNGLI Jan
tungli(zv)pvt.sk
Vyber komponent za behu
[*] Pavel Fiser <fiser(zv)iol(tec)cz> - 26.10.1998 08:29:43
Marek Repisk� wrote:
> mozno by stacilo vyuzit moznosti Drag&Drop.
To bych prave potreboval, ale porad nevim, jak zjistit ty komponenty v tom
TRect nebo jak najit nejblizsi komponentu napr. vpravo od aktualni...?
Zdar Pavel
Vyber komponent za behu
[*] Pavel Fiser <fiser(zv)iol(tec)cz> - 26.10.1998 08:58:42
Mor�ol Marian wrote:
> Pokud mas na mysli to aby slo za behu menit velikost a pozici nekterych
> komponent tak cti dal.
Mam potomky TButton, ktere sami o sobe jdou za behu zvetsovat a presouvat
uzivatelem, umistene na potomku TPanel. Me jde hlavne o ten vyber.
> Ja pouzivam RTDesigner. Myslim ze jsem to stahnul z DSP. Je to freeware(
> vlastne cardware) - ale bez zdrojaku..... Pokud to nemuzes najit nebo
> ztahnout
> tak ti to poslu na tvou e-mail adresu i s nejakyma tema chabyma
> zkusenostma.
Prohledavac na DSP nenasel nic. Prosim posli mi to, budu Ti neskonale
vdecen.
> Autor slibil v dalsich verzich zdrojaky.
To by se mi libilo nejvice.
Zdar Pavel
Delphi 4, INFORMIX-CLI & Informix 7
[*] Wagner Lubomir <wagner(zv)minv.sk> - 26.10.1998 08:59:30
Chybova hlaska "Cannot load an IDAPI service library." je sposobena
zlym nastanenim premennych prostredia potrebnych pre Informix-cli.
Musi byt nastavena PATH a INFORMIXDIR. PATH musi byt nastavena
do adresara bin po instalacii Informix-cli a INFORMIXDIR ukazuje na
root adresar po instalacii Informix-cli.
Mne Informix-cli + Informix 7 + Delphi 4 (cez native driver) chodi.
Lubo.
-----Puvodni zprava-----
Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
Odeslano: 25. november 1998 17:02
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Delphi 4, INFORMIX-CLI & Informix 7
Zdravicko...
Rozbehali jste uz nekdo INFORMIX-CLI na Informixu 7 v Delphi 4 pres
ODBC? At se snazim jak se snazim, ILogin Demo u I-CLI mi hlasi error
-406 (Memory allocation failed) a kdyz zkusim I-CLI pripojit v Delphi,
koncim s hlaskou "Invalid configuration parameter". :-(((
Zkousel jsem pouzit i Delphi 4 C/S a jeho SQL Links, lec marne - v tomto
pripade mi hlasi "Cannot load an IDAPI service library. File:
SQLINF32.DLL". :-(
Budu vdecny za jakoukoli pomoc vedouci k rozchozeni propojeni Delphi 4 -
Informix 7. Dekuji.
F.
P.S.: Jestli toto propojeni uz nekomu funguje, mohl by mi, prosim,
napsat zpusob nastaveni serveru i klienta?Zakazanie zmeny velkosti stlpcov v DBGrid-e
[*] danko(zv)ns.basl.sk - 26.10.1998 09:06:28
On Wed, 25 Nov 1998, Petr Vones wrote:
> danko(zv)ns.basl.sk wrote:
> >
> > Nazdar,
> >
> > potrebujem zakazat rozsirenie stlpca v DBGrid-e uzivatelom. Da sa to
> > urobit nastavenim property v Options, ale potom nemozem menit ani poradie
> > stlpcov v mriezke, a to potrebujem. Chcem uzivatelovi presne nadefinovat
> > optimalne rozmery stlpca a zablokovat mu moznost ich zmeny, aby sa
> > zabranilo zobrazeniu horizontalnej listy pri ich velkom rozsireni.
>
> Ahoj,
>
> Treba takhle:
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> with TDrawGrid(DBGrid1) do
> Options := Options - [goColSizing];
> end;
>
> --
>
> Internet proti monopolu. Petr Vones, amatersky programator
> * http://www.bojkot(tec)cz *
> * protestni akce *
> ************************
>
>
Nazdar,
ja som to tak aj robil, ale ako som v tom maile pisal potrebujem
zachovat "drag-drop" presuvanie stlpcov a takto nastavenym Options sa to
tiez zakaze.PopupMenu za behu
[*] Karel Chmel <kchmel(zv)csob(tec)cz> - 26.10.1998 09:16:07
A zkusil jsi misto Delete tam dat Free?
Karel
----------
Odes�latel: Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: PopupMenu za behu
Datum: 26. listopadu 1998 8:07
�
Hi,
�
muzete mi prosim nekdo pomoci s nasledujicim problemem ? Za behu programu
nekolikrat menim obsah Popup Menu. Pri prvnim naplneni je vse OK, ale pri
dalsim dostavam hlasku, ze PMenu111 uz existuje. To PopupMenu PMenu11 se
plni z pole, kde jsou obsazena PMenu111, PMenu112 atd. Zde je kus zdrojaku:
�
.
.
.
// POPUPMENU_OBNOVENI - obnoveni obsahu Popup Menu
function PopupMenu_Obnoveni(P: Integer): Integer;
var
� A, B: Integer; MojeMenuItem: TMenuItem;
begin with Form1, MojeMenuItem do begin
� MojeMenuItem := nil;
� A := 0;
�
� A := High(P_M1);
� while PMenu11.Items.Count > 0 do PMenu11.Items.Delete(0);
� // tady se provadi Delete a stejne to neni k nicemu
�
� for B := 0 to A do begin
��� MojeMenuItem := TMenuItem.Create(PMenu11);
��� Name���� := P_M1[B].Name;
��� Caption� := P_M1[B].Caption;
��� Hint������ := P_M1[B].Hint;
��� OnClick� := PMenu11OnClick;
��� Enabled := P_M1[B].Enabled;
��� PMenu11.Items.Add(MojeMenuItem);
� end;
�
� MojeMenuItem.Free;
.
.
.
�
�
Vasek
�
�
�
V�clav Lukes
�
E-mail: Vaclav.Lukes(zv)pvt(tec)cz <mailto:Vaclav.Lukes(zv)pvt(tec)cz> ��
511247(zv)sms.paegas(tec)cz <mailto:511247(zv)sms.paegas(tec)cz>
Tel.: 0603-511247
�
----------
PopupMenu za behu
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 26.10.1998 09:20:02
> muzete mi prosim nekdo pomoci s nasledujicim problemem ? Za behu programu
> nekolikrat menim obsah Popup Menu. Pri prvnim naplneni je vse OK, ale pri
> dalsim dostavam hlasku, ze PMenu111 uz existuje. To PopupMenu PMenu11 se
> plni z pole, kde jsou obsazena PMenu111, PMenu112 atd. Zde je kus
zdrojaku:
�
Nazdar,
myslim si, ze je to tym, ze tam nemas Free na tie Itemy.
Skus to asi takto:
�
while PMenu11.Items.Count > 0 do
begin
TObject(PMenu11.Items[0]).Free;
PMenu11.Items.Delete(0);
end;
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Dostal som 500 Sk // Tungli
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.10.1998 09:21:13
Verejne prohlasuji, ze ja to nebyl :-))))))
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: TUNGLI Jan [SMTP:tungli(zv)pvt.sk]
> Odesl�no: 26. listopadu 1998 8:27
> Komu: DELPHI Distribution List
> P�edm�t: Dostal som 500 Sk // Tungli
>
> Niekto mi poslal 500 Sk za moje komponenty.
> Rad by som poslal komponenty ale neviem kam lebo nemam EMail adresu.
> Sorry, viem ze to nepatri do konferencie ale nemal som inu moznost.
>
> TUNGLI Jan
> tungli(zv)pvt.sk
S3 ??????????
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 26.10.1998 09:22:40
Pak zkus nainstalovat IE SP1, melo by to pomoct......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Serbajlo [SMTP:serb(zv)mikulov.sol(tec)cz]
> Odesl�no: 25. listopadu 1998 20:04
> Komu: Delphi cz
> P�edm�t: S3 ??????????
>
> Nedavno se tu probiral problem o s3. Ja jsem do system.ini dopsal
> radek busthrottle=on a delphi opravdu funguje.....ale ma to zrejme
> vedlejsi ucinek. NEJDOU vypnout Wokna 98. Proste to zustane vyset na
> obrazovce s napisem "za chcili muzete vypnout pocitac". He, a furt
> nic. Nemate nahodou referenci k teto akci, ja totiz nevim co to
> vlastne dela.
> �
> Dik za pripadnou pomoc
> �
> Serbajlo Pavel
> ICQ: 20849973
> email: serb(zv)mikulov.sol(tec)cz <mailto:serb(zv)mikulov.sol(tec)cz>
> www: www.nemamstranky(tec)cz <http://www.nemamstranky(tec)cz>
> DBEdit a formatovani vstupu???
[*] mhudak(zv)ptacek(tec)cz - 26.10.1998 9:23:12
Ahoj,
nevi nekdo (cirou nahodu :)) jak donutit komponentu DBEdit aby formatovala
vstupni data napr.tak jako Paradox?
Napr. pri zadavani IP adresy - tzn. uzivatel napise tri cisla a potom se mu
automaticky vlozi tecka.V paradoxu to tak jde ale v DBEdit nevim jak.
Diky
Michal Hudak
Ptacek - velkoobchod pro topenare
E-Mail: mhudak(zv)ptacek(tec)cz
Update a Delphi 4
[*] Johnny Walker <johnny(zv)atlas(tec)cz> - 26.10.1998 09:26:05
ee, neni treba (skor naopak :-))
Patrik Sl�de�ek wrote:
> Borland uvolnil nedavno druhy opravny patch na Delphi 4: nevite nekdo
> nahodou,
> zda je treba pred jeho instalaci mit nainstalovan i ten prvni patch? Diky,
>
> PaSla
PopupMenu za behu
[*] V�t�zslav Gazda������u��n�?��? - 26.10.1998 09:27:23
Delete pouze odstrani komponentu TMenuItem z PopupMenu, ale komonenta stale
existuje. Je treba ji uvolnit pomoci Free.
Vita
Vyber komponent za behu
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 26.10.1998 09:32:47
> > mozno by stacilo vyuzit moznosti Drag&Drop.
>
> To bych prave potreboval, ale porad nevim, jak zjistit ty komponenty v
tom
> TRect nebo jak najit nejblizsi komponentu napr. vpravo od aktualni...?
Nazdar,
vyber komponenty na OnMouseDown a potom BeginDrag.
Na vyber vpravo od aktualnej komp. ma napada iba napisat
vlastny algoritmus, alebo pouzit TabOrder.
Ked nad tym tak rozmyslam, tak to bude mat este dost inych
problemov. Napr. Ako oznacis na forme aktualnu komponentu?
To ides robit novy editor pre Delphi?
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Problem s BDE
[*] Johnny Walker <johnny(zv)atlas(tec)cz> - 26.10.1998 09:39:26
Moje skusenosti s BDE padmi:
1. Nikdy nepouzivam CTRL-F2 ale radsej odklepem vsetky exception's a potom
program zavrem korektne.
2. Ked uz sa to stane ze CTRL-F2 pouzijem alebo to padne, je potrebne
uzavriet vsetky aplikacie
pouzivajuce BDE (t.j. vecsinou delphi, dbexplorer, prip bdeadmin a
dalsie...). Je potrebne sa pozriet do task
managera, ci tam nevisi nejaky proces suvisiaci s bde, napr. dbexplorer a
ak ano, tak killnut.
Restartovat netreba :-)
Johnny
Radek Hladik wrote:
> Ahoj all,
>
> mam zase jeden dotaz (uz jsem ho jednou posilal, ale nekam se
> ztratil).
> Pokud pisu aplikaci s BDE a musim program rucne zavrit (CTRL-F2)
> nebo mi spadne, zustane databaze pro BDE otevrena a uz mne do ni nepusti.
> Chci se zeptat, jestli se da zavrit nak lip, nez restartem pocitace.
>
> Diky Radek
>
> Radek Hlad�k
> rhladik(zv)tfc(tec)cz
API funkce..
[*] Robert Vanik <hugo(zv)kamarad(tec)cz> - 26.10.1998 09:41:52
Zdravim vsechny delphimany i dephimanky,
prosim vas, muzete me nekdo poradit, kde najit (na i-netu nebo v nejake knizce)
popis API funkci? Nejlepe v cestine.
Diky predem
Bob
S3 ??????????
[*] Mrk��ek Ale� <mrkacek(zv)sieza(tec)cz> - 26.10.1998 09:46:55
tento problem byl v konferenci o Win a i ja jsem ho mel.
nainstaluj IE 4.01 SP1 a mas po problemu
Ales
----------------------------------------------------------------------
Ales Mrkacek - Informatika Sieza s.r.o.
e-mail: Mrkacek(zv)sieza(tec)cz Sturova 1282
tel: 02/4722028, 4727870 142 00 Praha 4
---(: ICQ: 20940151 :)---------------------------------------------
-----P�vodn� zpr�va-----
Od: Martin Fron�k [mailto:FRONEK(zv)ZZNSLANY.CZ]
Odesl�no: 26. listopadu 1998 9:23
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: S3 ??????????
Pak zkus nainstalovat IE SP1, melo by to pomoct......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Serbajlo [SMTP:serb(zv)mikulov.sol(tec)cz]
> Odesl�no: 25. listopadu 1998 20:04
> Komu: Delphi cz
> P�edm�t: S3 ??????????
>
> Nedavno se tu probiral problem o s3. Ja jsem do system.ini dopsal
> radek busthrottle=on a delphi opravdu funguje.....ale ma to zrejme
> vedlejsi ucinek. NEJDOU vypnout Wokna 98. Proste to zustane vyset na
> obrazovce s napisem "za chcili muzete vypnout pocitac". He, a furt
> nic. Nemate nahodou referenci k teto akci, ja totiz nevim co to
> vlastne dela.
> �
> Dik za pripadnou pomoc
> �
> Serbajlo Pavel
> ICQ: 20849973
> email: serb(zv)mikulov.sol(tec)cz <mailto:serb(zv)mikulov.sol(tec)cz>
> www: www.nemamstranky(tec)cz <http://www.nemamstranky(tec)cz>
> DWORD
[*] Martin <mbohm(zv)quelle.sk> - 26.10.1998 09:58:59
Som zaciatocnik v programovani v delphi 3
a chcel by som sa opytat ci mi niekto nevie poradit ako
do Registru (Win32) zapisat hodnotu DWORD (pripadne aj BINARY)?Detekce modemu
[*] Bro�ek Erik <Erik.Brozek(zv)pvt(tec)cz> - 26.10.1998 10:01:46
Dobry den,
mohl by me nekdo "nakopnout" spravnym smerem jak detekovat modem.
Potreboval bych zjistit na jakem portu je pritomen modem, a popripade
zjistit typ modemu a zda-li je nainstalovany ovladac pro dany typ modemu.
Diky Erik. Vyber komponent za behu
[*] stingp1.eti(zv)mail.cez(tec)cz - 26.10.1998 10:19:27
Cau,
coz takhle to udelat rucmo - sveho casu jsem si s tim zkousel hrat, a neni
to tak
komplikovane, jak to vypada - nemusis vyuzivat ani tak drag & drop, staci
pouze
pri klepnuti na prvek okna zjistit jeho TRect (maji ho ostatne vsechny
viditelne komponenty)
a pri tazeni mysi po formulari vykreslovat pouze ctverec o velikosti
komponenty.
Funguje to stejne jako treba kdyz zvetsujes sirku pole v TListView. Nekde
bych mozna
jeste nasel zdrojaky, pokud mas zajem.
Cau, Pavel
-----------------------------------------
Pavel Stingl
programator, analytik
CEZ a.s., Elektrarna Tisova
EMail : stingp1.eti(zv)mail.cez(tec)cz
-----------------------------------------
"Marek Repisk�" <mrepisky zl(zv)zsnp.sk> na 26.11.98 09:32:47
Odpov
zte pros�m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie: (Na v
dom�: Stingl Pavel/3420A/ETI/CEZ)
P
edm�t: Re: Vyber komponent za behu
> > mozno by stacilo vyuzit moznosti Drag&Drop.
>
> To bych prave potreboval, ale porad nevim, jak zjistit ty komponenty v
tom
> TRect nebo jak najit nejblizsi komponentu napr. vpravo od aktualni...?
Nazdar,
vyber komponenty na OnMouseDown a potom BeginDrag.
Na vyber vpravo od aktualnej komp. ma napada iba napisat
vlastny algoritmus, alebo pouzit TabOrder.
Ked nad tym tak rozmyslam, tak to bude mat este dost inych
problemov. Napr. Ako oznacis na forme aktualnu komponentu?
To ides robit novy editor pre Delphi?
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Poslani udalosti
[*] Ekosoft(zv)tnet(tec)cz (Eko Soft) - 26.10.1998 10:32:50
Lidicky
nevite nekdo jak se da do windows poslat udalost ?
O co jde.
Mam form do ktereho potrebuji poslat udalost onResize.
Nasel jsem API finkci SEMDMESSAGE(...) , ale zaboha menuzu zjistit jakou ma
udalost onResize hodnotu. Diky moc.
email: ekosoft(zv)tnet(tec)cz
PopupMenu za behu
[*] Lubo Fule <fule(zv)sct.sk> - 26.10.1998 10:37:15
Pokial nie je vytvorena instancia objektu nemozes na dany objekt pouzit
with, lebo este neexistuje. To ze ho potom vytvoris nepomoze, lebo hned ako
pouzijes with sa smernik na dany objekt (ktory v tomto pripade este
neexistuje) zapise kdesi do nejakeho registra procesora a pri pristupe na
jeho property a metody sa pouziva adresa, ktoru mala premenna MojeMenuItem v
okamihu pouzitia with. Okrem toho, zda sa mi, ze to PMenu11.Items.Delete(0)
nestaci, ale treba na prislusnu polozku menu zavolat aj destructor.
V zdrojaku, ktory si poslal som to opravil. Tak by to uz malo fungovat.
Inac, pri dynamickom vytvarani objektov (teda aj menu) nie je nutne
nastavovat property Name.
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Lukes V�clav
> Sent: Thursday, November 26, 1998 8:07 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: PopupMenu za behu
>
>
> �
> Hi,
> �
> muzete mi prosim nekdo pomoci s nasledujicim problemem ? Za behu programu
> nekolikrat menim obsah Popup Menu. Pri prvnim naplneni je vse OK, ale pri
> dalsim dostavam hlasku, ze PMenu111 uz existuje. To PopupMenu PMenu11 se
> plni z pole, kde jsou obsazena PMenu111, PMenu112 atd. Zde je kus
> zdrojaku:
> �
> .
> .
> .
> // POPUPMENU_OBNOVENI - obnoveni obsahu Popup Menu
> function PopupMenu_Obnoveni(P: Integer): Integer;
> var
> � A, B: Integer; MojeMenuItem: TMenuItem;
DelMenu: TMenuItem; // pomocna premenna pre uvolnenie polozky menu
begin with Form1 do begin
> � MojeMenuItem := nil;
> � A := 0;
> �
> � A := High(P_M1);
> � while PMenu11.Items.Count > 0 do begin //tu bude treba zavolat
destructor mazanej polozky menu
DelMenu := PMenu11.Items.Items[0]; //priradenie mazanej polozky do
pomocnej premennej
PMenu11.Items.Delete(0); //vyradenie polozky z menu
DelMenu.Free; //az tu sa polozka menu
"zlikviduje"
end;
> � // tady se provadi Delete a stejne to neni k nicemu
> �
> � for B := 0 to A do begin
> ��� MojeMenuItem := TMenuItem.Create(PMenu11);
with MojeMenuItem do begin // with na MojeMenuItem moze byt az vtedy,
ked je uz objekt vytvoreny
> ��� Name���� := P_M1[B].Name;
> ��� Caption� := P_M1[B].Caption;
> ��� Hint������ := P_M1[B].Hint;
> ��� OnClick� := PMenu11OnClick;
> ��� Enabled := P_M1[B].Enabled;
end;
> ��� PMenu11.Items.Add(MojeMenuItem);
> � end;
> �
> � MojeMenuItem.Free;
> .
> .
> .
> �
> �
> Vasek
> �
> �
> �
> V�clav Lukes
> �
> E-mail: Vaclav.Lukes(zv)pvt(tec)cz <mailto:Vaclav.Lukes(zv)pvt(tec)cz> ��
> 511247(zv)sms.paegas(tec)cz <mailto:511247(zv)sms.paegas(tec)cz>
> Tel.: 0603-511247
> �
>
FTP a proxy
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 26.10.1998 10:41:52
Zdravim,
hledam komponentu pro prenos pomoci FTP, ktera podporuje proxy.
.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://webhost(tec)cz/elka .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:elka(zv)seznam(tec)cz .
.........................................................
DBEdit a formatovani vstupu???
[*] Lubo Fule <fule(zv)sct.sk> - 26.10.1998 10:49:56
Da sa to, Field ma property EditMask. Tuto property treba vhodne nastavit a
uz to pojde... napr. pre IP adresu by maska vyzerala asi takto:
099.099.099.099;1;_
Ked sa nastavy pre Field property EditMask, tak potom sa bude automaticky
pouzivat v kazdom DBEdite aj DBGride, ktory sa bude na tento Field
odkazovat.> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> mhudak(zv)ptacek(tec)cz
> Sent: Thursday, November 26, 1998 9:23 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: DBEdit a formatovani vstupu???
>
> Ahoj,
>
> nevi nekdo (cirou nahodu :)) jak donutit komponentu DBEdit aby formatovala
> vstupni data napr.tak jako Paradox?
> Napr. pri zadavani IP adresy - tzn. uzivatel napise tri cisla a
> potom se mu
> automaticky vlozi tecka.V paradoxu to tak jde ale v DBEdit nevim jak.
>
> Diky
>
> Michal Hudak
> Ptacek - velkoobchod pro topenare
> E-Mail: mhudak(zv)ptacek(tec)cz
>
>
DWORD
[*] Lubo Fule <fule(zv)sct.sk> - 26.10.1998 11:01:38
Delphi ma na pracu registry selkom sikovny objekt TRegistry. Treba si k nemu
pozriet help. Je celkom jednoduche...
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin
Sent: Thursday, November 26, 1998 9:59 AM
To: delphi-l(zv)fwd(tec)cz
Subject: DWORD
Som zaciatocnik v programovani v delphi 3
a chcel by som sa opytat ci mi niekto nevie poradit ako
do Registru (Win32) zapisat hodnotu DWORD (pripadne aj BINARY)?
Outlook Express
[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 26.10.1998 11:04:25
> > pouzivej neco jinyho nez Outlook Express, opravdu to NENI dobrej soft.> s tim bych si dovolil nesouhlasit - podle meho nazoru je dost dobrej.
> Samozrejme ma nektere nectnosti (vadi mi nejvic, ze na urcitou kategorii
> zprav neni schopen udelat reply s odsazenim pomoci <) ale z toho co jsem
> mel v ruce (Pegasus, NN mailer) je urcite nejlepsi a nejprehlednejsi
Ma jeste spoustu dalsich nevyhod. Za tu nejvaznejsi povazuji to,
ze v polozkach To: a From: nezobrazuje skutecne adresy, ale pouze
to co je uvedeno jako jejich popis. Alespon jsem nikde nenasel moznost
toto vypnout.
Napr. z hlavicky To: "Nejake jmeno" <nejaky(zv)email(tec)cz> zobrazuje
pouze "Nejake jmeno". Pri zobrazovani to jeste tak nevadi,
ale ze pouziva neuplnou adresu i pri trideni posty je dost hruza.
Vojtech Semecky
Poslani udalosti
[*] Lubo Fule <fule(zv)sct.sk> - 26.10.1998 11:05:39
Popis podrobnejsie, co potrebujes urobit. Moznosti je viac, zalezi od ucelu.
Inac, message je WM_SIZE
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Eko Soft
> Sent: Thursday, November 26, 1998 10:33 AM
> To: Delphi konference
> Subject: Poslani udalosti
>
>
> Lidicky
>
> nevite nekdo jak se da do windows poslat udalost ?
>
> O co jde.
> Mam form do ktereho potrebuji poslat udalost onResize.
> Nasel jsem API finkci SEMDMESSAGE(...) , ale zaboha menuzu
> zjistit jakou ma
> udalost onResize hodnotu. Diky moc.
>
> email: ekosoft(zv)tnet(tec)cz
>
>
>
DBEdit a formatovani vstupu???
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 26.10.1998 11:17:07
> Ahoj,
>
> nevi nekdo (cirou nahodu :)) jak donutit komponentu DBEdit aby
formatovala
> vstupni data napr.tak jako Paradox?
> Napr. pri zadavani IP adresy - tzn. uzivatel napise tri cisla a potom se
mu
> automaticky vlozi tecka.V paradoxu to tak jde ale v DBEdit nevim jak.
Nazdar,
napr. takto:
DBEdit1.Field.Editmask:='000.000.000.000';
alebo
DataModul.Query1.FieldByName('IP').Editmask:='000.000.000.000';
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Export z MS ACCESS 97 do PARADOX tabulky
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 26.10.1998 11:18:12
Zkousel si nacist data z Paradoxu primo do Accessu? Ma na to primo importni
filtr (Access).
Mac
Pavol Griga wrote:
> Nevie niekto poradit ako korektne exportovat tabulky z MS ACCESS do
> PARADOXU,
> ale tak, aby sa zachovala spravne diakritika. Skusal som to cez DataPump,
> ale diakritika nebola spravne konvertovana.
>
> Za dobru radu vopred VDAKA
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Zoom
[*] svatos(zv)af(tec)czu(tec)cz - 26.10.1998 11:22:42 met
Preji pekny den,
programuji komponentu TSpreadSgeet (tabulkovy kalkulator), coz samo
o sobe neni az zase tak hrozne (uz to temer mam), ale muj sef si
najednou vsiml, ze v Excelu existuje Zoom a chce ho ode mne taky !
Nevite jak na tuhle drobnustku ?
Zkousel jsem si trosilinku hrat s mapovacima modama (SetMapMode,
SetViewPortEx, ...) ale nejsem si jist, ze je to ta spravna cesta ...
Diky za kazdy podnet.
Hynek Savtos
svatos(zv)af(tec)czu(tec)cz
API funkce..
[*] V�t�zslav Gazda������u��n�?��? - 26.10.1998 11:24:55
Doporu�uji knihu "pr�vodce v�voj��e WIN 32 API"
Vydal Unis Publishing http://www.win(tec)cz/
Vita
MS Excel97
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 26.10.1998 11:25:20
Lze to udelat pres DAO, ale komponenty (DAODS) nejsou free ...
Mac
hrenovcik(zv)ns.basl.sk wrote:
> Nazdar,
> vie niekto o nejakej freeware komponente pre D3 na nacitanie Excel97
> tabulky? (F1Book to nedokaze s v97)
> Diky
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
KODOVANIE
[*] Ing. J�n Kuch�r <kuchar(zv)tuke.sk> - 26.10.1998 11:29:20
ako ?
-----P�vodn� zpr�va-----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. november 1998 19:27
P�edm�t: Re: KODOVANIE
>> "Ing. J�n Kuch�r" wrote:
>>
>> Caute
>>
>> Otazka znie : Da sa vo W95 v D3 nastavit nejakym sposobom kodovanie
stranky (Kamenickych,
>> latin)
>
>Ahoj,
>
>Lze to vyresit konverzi textu z ruznych formatu do CP1250.
>
>--
>
>Internet proti monopolu. Petr Vones, amatersky programator
>* http://www.bojkot(tec)cz *
>* protestni akce *
>************************
>
>Problem s databazi
[*] Martin Fr�hlich <unites(zv)telecom(tec)cz> - 26.10.1998 11:38:38
Zdravim vsechny zucastnene.
Mam takovy maly problem s databazemi. Dynamicky za behu programu vytvarim databazi podle urcitych vstupnich parametru. Zpocatku se zdalo, ze moznosti tabulek Paradoxu jsou dostacujici, ale uz se povedlo, ze program vytvoril takovou definici tabulky, ze to databazi nebylo schopno vytvorit (cca 300 polozek real v jednom zaznamu). Muzete mi poradit jak toto omezeni obejit, nebo jakou jinou databazi pouzit.
Za kazdou radu budu neskonale vdecny.
===============================================
Martin Frohlich
Application designer
UNITES Valasske Mezirici
Tel./Fax.: +420 651 22562
+420 651 615085
E-mail: martin.frohlich(zv)iol(tec)cz
unites(zv)telecom(tec)cz
===============================================Prime cteni sektoru diskety ve WIN95 a NT
[*] Martin Fr�hlich <unites(zv)telecom(tec)cz> - 26.10.1998 11:48:23
Zdravim
Uz jsem se zde jednou ptal a nejak to zaniklo.
Potrebuji v Delphi3 pod Win 95 a NT cist primo sektory diskety.
Disketa neni ve formatu PC a delka sektoru muze byt 256, 512 nebo 1024 bytu. Pocet sektoru na stopu je take ruzny. Ve Win95 jsem uz neco na prime cteni vymyslel, jde to pres zarizeni VWIN32.VXD prostrednictvim DeviceIOControl kde se pouzije ControlCode VWIN32_DIOC_DOS_INT13, VWIN32_DIOC_DOS_INT25 nebo VWIN32_DIOC_DOS_IOCTL a nahradi to volani DOSu.
Ve WinNT to jde pres CreateFile('A:'.......) a ReadFile ale oba postupy maji jednu zavaznou chybu.
Ce to pouze diskety formatovane s delkou sektoru 512 byte. Je-li delka sektoru jin�, neudelam s tim vubec nic. Jedna s funkci ve Win95 VWIN32_DIOC_DOS_IOCTL by podle dokumentace mela umet zmenit parametry zarizeni a tedy i delku sektoru, ale nepovedlo se mi to rozchodit a pro WinNT jsem nic podobneho nenasel. Takze problem pretrvava, jak cist ve WIN95 a WIN NT diskety s nestandartni delkou sektoru. Potrebuji to pro _oba_ systemy. Nejlepe v DELPHI 3 Professional.
Predem Dekuji.
Martin
===============================================
Martin Frohlich
Application designer
UNITES Valasske Mezirici
Tel./Fax.: +420 651 22562
+420 651 615085
E-mail martin.frohlich(zv)iol(tec)cz
unites(zv)telecom(tec)cz
===============================================RA KOMPONENTA
[*] Ing. J�n Kuch�r <kuchar(zv)tuke.sk> - 26.10.1998 11:48:50
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Caute
Mam otazku, nestretol sa z Vas niekto, alebo nema z Vas niekto komponentu pre prehravanie RA suborov ?
Dik
Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk DWORD
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 26.10.1998 11:53:01
Som zaciatocnik v programovani v delphi 3
a chcel by som sa opytat ci mi niekto nevie poradit ako
do Registru (Win32) zapisat hodnotu DWORD (pripadne aj BINARY)?
Nazdar,
nasiel by si to v archive, ale posielam Ti to:
begin
with TRegistry.Create do
begin
rootkey:=HKEY_LOCAL_MACHINE;
if OpenKey('SOFTWARE\...',false) then
begin
WriteString('MyHod','toto je string');
{podobne WriteBinaryData alebo WriteInteger ... vid help}
closekey;
end;
free;
end;
end;
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Mistrovstvi v Delphi nebo neco podobneho
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 26.10.1998 12:14:02
Pokud by mel nekdo ze zacinajicich zajem, prenecham knihu Mistrovstvi v
Delphi 2 (nova, nepouzivana) za 1/2 puvodni ceny, pripadne vymenim za
jinou literaturu k Delphi (i v anglictine).
Pripadni zajemci ozvete se primo na muj mail, at nebrzdime konferenci.
>----------
>P. Mikes
DecisionCube
[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 26.10.1998 12:48:33
Ahoj, dekuji za ozvani
Pavel Fiser wrote:
> Na www.qusotf.com se da ztahnout demo. Ztahl jsem si ho, ale jeste jsem na nej
>
> nekouk.
ja jo, ma ale omezeni na pocet sloupcu - v podstate On-line zpusobem vytvari
Label-sv reportu
> Asi mesic predtim, nez se tam objevilo, jsem se tyden patlal
> s komponentou TQRDecGridRow, kter� se pl�cne do QuickRep.detailBandu a
> napoji na DecisionGrid. Muzu poskytnout.
Na to bych se rad podival. Odkud to je ?
Stahli jsme tu vcerac jeste jakousi ruskou docela obstojnou komponentu - (neni
free ) na Print. Ta si zrejme s vetsim poctem sloupcu umi poradit. Jeste ji
prozkoumame.
> > - jak ovlivnovat group-ovani jinak, nez volanim ShowDialog-u (-
> > uzivatelsky asi slozite, dulezite pro vyber pro datumove udaje)
> To jsem moc nepochopil. Jak� grupov�n� mysl�? Jestli to, co se nastavuje v
> Decision Cube Editoru, tak to lze naj�t v helpu pod heslem TDimensionItem.
Na to se podivam - to asi bude ono.
Stejne jeste jednou dik. Z.G.
====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech Republic
tel.: ++420-48-53 96 563, ++420-48-611 24 01, ++420-48-611 24 02
fax.: ++420-48-611 24 03
http://www.ipl(tec)cz
__________________________________________________________
Privat: Borovy vrch 289, 460 14 Liberec 13, Czech Republic
tel.: ++420-48-51 246 15
====================================================
EventLog v NT40
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 26.10.1998 13:03:41
Zdravim
poradil by mi nekdo nejakou literaturu o problematice spravy
a pristupu vubec k EventLogu ve Windows NT 4.0. At uz v tistene
nebo elektronicke podobe. (popis API ve win32.hlp od Borlandu je
docela chudy :-( ).
predem dik
Michal Cizek
email : starxax(zv)molly.vabo(tec)cz
HP : http://freeweb.coco(tec)cz/starxax
Ako zapisat SELECT
[*] danko(zv)ns.basl.sk - 26.10.1998 13:31:24
Nazdar,
ak napisem SQL prikaz: SELECT NAME, WEIGHT, SIZE FROM ANIMALS
tak zlyha, lebo SIZE je klucove slovo v SQL (rovnako ako COUNT, SUM ...).
No ja to napriek tomu potrebujem nejako zapisat, lebo stlpce su uz
vytvorene (pozri napr. tabulku Animals.dbf v DEMOS\DATA). Da sa to nejako
riesit? Skusal som to zatvorit do apostrofov, uvodzoviek aj premenovat cez
AS, ale nejde to.
Brano.FTP a proxy
[*] Pekol <kellner(zv)praktik(tec)cz> - 26.10.1998 13:35:11 -0000
> -----P�vodn� zpr�va-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odesl�no: 26. listopadu 1998 9:42
> Komu: '*** Delphi'
> P�edm�t: FTP a proxy
>
> Zdravim,
>
> hledam komponentu pro prenos pomoci FTP, ktera podporuje
> proxy.
>
bez problemu pouzivam NMFTP z D4
Mgr. Petr Kellner
Praktik SW, spol. s r.o. Dom� : Na Z�kop� 27
V. Outraty 7, Prost�jov, 796 00 Olomouc, 773 00
Tel : 0508/365583 Tel : 068/5314129
Fax : 0508/365512 Tel : 0603/457623
e-mail: kellner(zv)praktik(tec)cz pekol(zv)praktik(tec)cz
Web: www.praktik(tec)cz
e-mail pro velmi kr�tk� zpr�vy:
kellner.mobil(zv)sms.paegas(tec)cz
DecisionCube
[*] Pavel Fiser <fiser(zv)iol(tec)cz> - 26.10.1998 13:42:49
> > Asi mesic predtim, nez se tam objevilo, jsem se tyden patlal
> > s komponentou TQRDecGridRow, kter� se pl�cne do QuickRep.detailBandu a
> > napoji na DecisionGrid. Muzu poskytnout.
>
> Na to bych se rad podival. Odkud to je ?
Ode mne :-)
> Stahli jsme tu vcerac jeste jakousi ruskou docela obstojnou komponentu - (neni
> free ) na Print. Ta si zrejme s vetsim poctem sloupcu umi poradit. Jeste ji
> prozkoumame.
Taky bych se na to kouk. Vymenime si je?
Zdar Pavel
P.S. Kolik je v Liberci / Bedrichove snehu?Problem s databazi
[*] Johnny Walker <johnny(zv)atlas(tec)cz> - 26.10.1998 13:42:12
Problem s obmedzenym poctom stlpcov sa da vyriesit vytvorenim dalsej tabulky
a vytvorenim vezby 1:1. Trochu neohrabane ale ide to.
Inac treba pouzit nejaky SQL server kde su limity daleko vecsie, napr. interbase.ktory sa dodava s delphi :-)))
J.
Martin Fr�hlich wrote:
> Zdravim vsechny zucastnene.
>
> Mam takovy maly problem s databazemi. Dynamicky za behu programu vytvarim databazi podle urcitych vstupnich parametru. Zpocatku se zdalo, ze moznosti tabulek Paradoxu jsou dostacujici, ale uz se povedlo, ze program vytvoril takovou definici tabulky, ze to databazi nebylo schopno vytvorit (cca 300 polozek real v jednom zaznamu). Muzete mi poradit jak toto omezeni obejit, nebo jakou jinou databazi pouzit.
>
> Za kazdou radu budu neskonale vdecny.
>
> ===============================================
> Martin Frohlich
> Application designer
> UNITES Valasske Mezirici
> Tel./Fax.: +420 651 22562
> +420 651 615085
> E-mail: martin.frohlich(zv)iol(tec)cz
> unites(zv)telecom(tec)cz
> ===============================================FTP a proxy
[*] Johnny Walker <johnny(zv)atlas(tec)cz> - 26.10.1998 13:50:42
Hladany komponent je sucastou delphi 3 a delphi 4.
Potom je mozne pouzit komponenty od tretich firiem,
napr. freeware -> http://www.rtfm.be/fpiette/indexuk.htm
Johnny
Krayzel Libor wrote:
> Zdravim,
>
> hledam komponentu pro prenos pomoci FTP, ktera podporuje proxy.
>
> ..........................................................
> .. Libor Krayzel .
> .. Czech Television, Studio Ostrava .
> .. Dvorakova 18, 702 00 Ostrava .
> .. Telephone: 069-6201375 .
> .. URL: http://webhost(tec)cz/elka .
> .. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
> .. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
> .. E-mail2: mailto:elka(zv)seznam(tec)cz .
> ..........................................................DDE komunikaci
[*] Ale� Kle�ka - 26.10.1998 14:00:20
Mam dotaz k DDE komunikaci:
Jakym zpusobem dokaze Server klientovi oznamit, ze provedl macro??? V
clientovi vyvolam metodu "ExecuteMacro" a jako parametr WaitFlag dam True.
Ovsem nevim, jakym zpusobem se WaitStat dostane do stavu False?
Diky predem
Ale� Kle�ka
{ aklecka(zv)merlin(tec)cz }Delka textu
[*] kelleon(zv)nnsk.sk - 26.10.1998 14:03:38
> -----Original Message-----
> function TForm1.DelkaTextu(aText: PChar): integer;
> var
> delka: integer;
> aSize: TSize;
> aDC: HDC;
> begin
> aDC:= GetDC(Form1.Handle);
namiesto toho mozes pouzit Self.Canvas.Handle
Self je spravnejsie
Canvas.Handle je pohodlnejsie
:)
Ondrej Kelle
kelleon(zv)nnsk.sk
Ako zapisat SELECT
[*] Ekosoft(zv)tnet(tec)cz (Eko Soft) - 26.10.1998 14:28:00
-----P�vodn� zpr�va-----
Od: danko(zv)ns.basl.sk <danko(zv)ns.basl.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: Donnerstag, 26. November 1998 13:58
P�edm�t: Ako zapisat SELECT
>Nazdar,
> ak napisem SQL prikaz: SELECT NAME, WEIGHT, SIZE FROM ANIMALS
>tak zlyha, lebo SIZE je klucove slovo v SQL (rovnako ako COUNT, SUM ...).
>No ja to napriek tomu potrebujem nejako zapisat, lebo stlpce su uz
>vytvorene (pozri napr. tabulku Animals.dbf v DEMOS\DATA). Da sa to nejako
>riesit? Skusal som to zatvorit do apostrofov, uvodzoviek aj premenovat cez
>AS, ale nejde to.
>
> Brano.
>
SELECT ANIMALS.NAME, ANIMALS.WEIGHT, ANIMALS.SIZE FROM ANIMALS
email: ekosoft(zv)tnet(tec)cz
Delka textu
[*] stingp1.eti(zv)mail.cez(tec)cz - 26.10.1998 14:48:48
A coz takhle pouzit TCanvas.TextWidth ? :)
Cau, Pavel
-----------------------------------
------
Pavel Stingl
programator, analytik
CEZ a.s., El
ektrarna Tisova
EMail : stingp1.eti(zv)mail.cez(tec)cz
-------
----------------------------------
"Karel Vlcek"
<vlcekk(zv)hotmail.com> na 26.11.98 13:22:48
Odpov�zte p
ros
�m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie: (Na v
dom�: Stingl Pavel/3420A/ETI/CEZ)
P
edm�t: Re: Delka textu
Ahojte,
Omlouvam se, mozna jdu s krizkem po funuse, ale kdosi tu chtel
zjistovat delku textu. Bohuzel ani nemam original dotazu - omylem jsem
ho smazal, ale presto :
existuji API fce
16-bit - GetTextExtent
32-bit - GetTextExtentPoint32 deklarovana ve WINDOWS.PAS
function GetTextExtentPoint32(DC: HDC; Str: PChar; Count: Integer;
var Size: TSize): BOOL; stdcall;
pro pouziti je ale treba DeviceContext oblasti(wokna), kam se dany text
vypisuje. Ten se zjisti pomoci API fce GetDC, ktera ma jako parametr
handle wokna. To je property Handle, kterou ma kazdy formular.
Ted tochu kodu
function TForm1.DelkaTextu(aText: PChar): integer;
var
delka: integer;
aSize: TSize;
aDC: HDC;
begin
aDC:= GetDC(Form1.Handle);
delka:= 0;
if GetTextExtentPoint32(aDC, aText, StrLen(aText), aSize) then
begin
delka:= aSize.cx;
end;
ReleaseDC(Form1.Handle, aDC);
result:= delka;
end;
dalsi podrobnosti viz Help
dalsi z tohoto blazniveho spolecenstvi
Karel Vlcek
tel.: +420 602 264812
poskytovani software
Vlcekk(zv)hotmail.com
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
EventLog v NT40
[*] David Hrb�� - 26.10.1998 14:56:30
http://www.wilsonc.demon.co.uk/delphi.htm
-----P�vodn� zpr�va-----
Od: Michal Cizek <starxax(zv)molly.vabo(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 26. listopadu 1998 13:32
P�edm�t: EventLog v NT40
>Zdravim
>
>poradil by mi nekdo nejakou literaturu o problematice spravy
>a pristupu vubec k EventLogu ve Windows NT 4.0. At uz v tistene
>nebo elektronicke podobe. (popis API ve win32.hlp od Borlandu je
>docela chudy :-( ).
>
>
>predem dik
>
> Michal Cizek
> email : starxax(zv)molly.vabo(tec)cz
> HP : http://freeweb.coco(tec)cz/starxax
>
>Memo a String
[*] Pavel M. <talema(zv)top(tec)cz> - 26.10.1998 15:07:29
Mam data ulozena v polozce Memo.
Potrebuji u daneho zaznamu zkopirovar znaky od zacatku az do prvniho Enteru
do jine polozky typu String.
Muzete mi poradit ?
Pouzivam Paradox tabulky.
Diky
Pavel M.Ako zapisat SELECT
[*] Johnny Walker <johnny(zv)atlas(tec)cz> - 26.10.1998 15:14:43
Skus SELECT Animals."SIZE" FROM ANIMALS
:-)
Johnny
danko(zv)ns.basl.sk wrote:
> Nazdar,
> ak napisem SQL prikaz: SELECT NAME, WEIGHT, SIZE FROM ANIMALS
> tak zlyha, lebo SIZE je klucove slovo v SQL (rovnako ako COUNT, SUM ...).
> No ja to napriek tomu potrebujem nejako zapisat, lebo stlpce su uz
> vytvorene (pozri napr. tabulku Animals.dbf v DEMOS\DATA). Da sa to nejako
> riesit? Skusal som to zatvorit do apostrofov, uvodzoviek aj premenovat cez
> AS, ale nejde to.
>
> Brano.Ako zapisat SELECT
[*] Branislav Danko <danko(zv)basl.sk> - 26.10.1998 15:40:07
> Odes�latel: Eko Soft <Ekosoft(zv)tnet(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Ako zapisat SELECT
> Datum: 26. november 1998 14:28
>
> -----P�vodn� zpr�va-----
> Od: danko(zv)ns.basl.sk <danko(zv)ns.basl.sk>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: Donnerstag, 26. November 1998 13:58
> P�edm�t: Ako zapisat SELECT
>
>
> >Nazdar,
> > ak napisem SQL prikaz: SELECT NAME, WEIGHT, SIZE FROM ANIMALS
> >tak zlyha, lebo SIZE je klucove slovo v SQL (rovnako ako COUNT, SUM ...).
> >No ja to napriek tomu potrebujem nejako zapisat, lebo stlpce su uz
> >vytvorene (pozri napr. tabulku Animals.dbf v DEMOS\DATA). Da sa to nejako
> >riesit? Skusal som to zatvorit do apostrofov, uvodzoviek aj premenovat cez
> >AS, ale nejde to.
> >
> > Brano.
> >
>
>
> SELECT ANIMALS.NAME, ANIMALS.WEIGHT, ANIMALS.SIZE FROM ANIMALS
>
>
> email: ekosoft(zv)tnet(tec)cz
>
Aj tak som to skusal, ale nejde ani tento sposob zapisu.Kontrolni kod platebnich karet
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 26.10.1998 16:06:14
Zdravim vsechny,
1, nevite jestli existuje nejaky kontrolni soucet pro overeni platnosti
platebni karty? Resp. asi urcite existuje, ale jaky? Je to pro kazdou
kartu stejne?
2, Na platebni karte je Valid Thru: 10/99 - znamena to ze bude platna
VCETNE rijna 98 nebo do konce zari?
Mac
P.S. Vubec nechapu jak vlastne muze fungovat placeni platebni kartou
pres Internet. Ted jsem to tak cvicne zkousel (music CD z USA). CD doslo
v pohode za10 dnu - vypis z banky jeste nemam, tak jsem na to zvedav.
Ale prekvapuje mne, ze stacilo pouze vyplnit cislo karty, platnost a
jmeno (zadny PIN, zadne schvaleni bankovni operace apod.).
Desi me moznost, ze napr. zaplatim za veceri v restauraci kartou (coz uz
jsem delal), pingl si ji odnese k pultu a za chvilku mi ji prinese i s
uctem, ktery mu podepisu a on mi vrati kartu. Ovsem nic mu nebrani, aby
si opsal (zapamatoval) cislo karty, jmeno a platnost a hura na nakupy na
Internetu. To je fakt tak strasne zneuzitelne????
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Seznam tiskaren
[*] Petr Vale� <Petr.Vales(zv)gopas(tec)cz> - 26.10.1998 16:47:00
Cauu,
nevite nahodou nekdo jak yjistim seynam nainstalovanzch tiskaren.
Diik
Petr
Delphi 4, INFORMIX-CLI & Informix 7
[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 26.10.1998 16:58:49
Pres MS Query se tam taky nedostanu. Nejhorsi je, ze nevim, kde mam
chybu a chybova hlaseni mi v tom take moc nepomahaji. MS Query mi hlasi
"Insufficient Connection information was supplied Driver's
SQLSetConnectAttr failed" (jake informace jeste chce?), ILogin "Memory
allocation failed", Delphi 4 s nativnim driverem "Unable to load locale
categories" a Delphi 4 s ODBC "Invalid configuration parameter".
Nekde mi urcite neco chybi, ale uz netusim co. V Setnet32 mam nastavene:
Environment:
CLIENT_LOCALE=cz_cz {v podstate nezalezi na tom, co sem vrazim -
vzdy se chova stejne}
DB_LOCALE=88592 {na Unixu je LANG=cz_cz.88592}
DBANSIWARN=n
DBNLS=1 {stejne jako na Unixu}
DELIMIDENT=n
INFORMIXDIR=C:\Program Files\informix
INFORMIXSERVER=ONLRM4 {to je dobre :-) }
Server Information:
Informix Server: ONLRM4
HostName: RM400 {to je nazev Unixoveho serveru, kde lezi Informix}
Protocolname: onsoctcp {tady mi neni jasne, co mam doplnit - podle ceho
a co ktera polozka znamena? Sit je tcp-ip}
Service Name: dsaonlrm4 {je mezi services, na serveru je take nastaveny
a funguje bez problemu na View Point}
Uz vazne nevim, co nastavit jinak, aby to chodilo...
Dekuji za jakoukoli pomoc. F.
> -----P�vodn� zpr�va-----
> Od: Jezek Petr, Ing. (DELVINA) [SMTP:PETR(zv)sevis.sk]
> Odesl�no: st�eda, listopad 25, 1998 20:46
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Delphi 4, INFORMIX-CLI & Informix 7
>
> A to ODBC mas spravne nastavene (dostanes se na Informix pres napr MS
> Query?)
>
> +-------------------------------+
> | Ing. Petr Jezek |
> | Delvina, s.r.o |
> | 010 01 Zilina |
> + - - - - - - - - - - - - - - - +
> | tel: +421 (89) 624 344 |
> | fax: +421 (89) 621 018 |
> | email: petr(zv)sevis.sk |
> | web: www.delvina.sk |
> +-------------------------------+
>
>
> -----Original Message-----
> From: Flaska Jakub [mailto:jakub.flaska(zv)zps.skoda-auto(tec)cz]
> Sent: Wednesday, November 25, 1998 5:02 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Delphi 4, INFORMIX-CLI & Informix 7
>
>
> Zdravicko...
>
> Rozbehali jste uz nekdo INFORMIX-CLI na Informixu 7 v Delphi 4 pres
> ODBC? At se snazim jak se snazim, ILogin Demo u I-CLI mi hlasi error
> -406 (Memory allocation failed) a kdyz zkusim I-CLI pripojit v Delphi,
> koncim s hlaskou "Invalid configuration parameter". :-(((
>
> Zkousel jsem pouzit i Delphi 4 C/S a jeho SQL Links, lec marne - v
> tomto
> pripade mi hlasi "Cannot load an IDAPI service library. File:
> SQLINF32.DLL". :-(
>
> Budu vdecny za jakoukoli pomoc vedouci k rozchozeni propojeni Delphi 4
> -
> Informix 7. Dekuji.
>
> F.
>
> P.S.: Jestli toto propojeni uz nekomu funguje, mohl by mi, prosim,
> napsat zpusob nastaveni serveru i klienta?Zjisteni behu aplikace
[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 26.10.1998 18:11:16
Jak muzu zjistit, zda-li bezi aplikace ve windows. Aplikace je tez delana v Delphi.
Dik
Serbajlo Pavel
ICQ: 20849973
email: serb(zv)mikulov.sol(tec)cz
www: www.nemamstranky(tec)cz
repository
[*] Martin Kleiner <mkleiner(zv)seznam(tec)cz> - 26.10.1998 18:40:40
ahoj
delam komponetu XYZ =class(TComponent) a v metode Loaded si na sebe
presmerovavam nektere udalosti Formu... (Owner as TForm).OnShow := MyShow;
komponentu XYZ vlozim na formular a pouziji jeji udalost OnABC
formular vlozim do repozitare a vytvorim novy form jako potomka puvodniho
formu.
potud je vse v poradku, ale problem nastane, kdyz na tomto novem formu
chci pouzit nejakou udalost komponeny XYZ (po spusteni shodi celou aplikaci)
poradi mi nekdo?
diky martin
patch na QR
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 26.10.1998 19:02:34
Ahoj, na strankach http://www.qusoft.com/ je ke stazeni
update na QR 3.03
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
Vyber adresare
[*] Petr Poto�ek <alrousse(zv)mbox.vol(tec)cz> - 26.10.1998 19:04:05
-----P�vodn� zpr�va-----
Od: Bro�ek Erik <Erik.Brozek(zv)pvt(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. listopadu 1998 10:42
P�edm�t: Vyber adresare
>
>Jak udelam, aby se pomoci OpenDialog vybral
>nazev adresare. Nyni vyberu pouze soubor, ale
>adresar nikoliv.
>
>procedure TForm1.Button2Click(Sender: TObject);
>begin
> if OpenDialog1.Execute then
> begin
> filename := OpenDialog1.FileName;
> Form1.Caption := 'Vybrany soubor :' + filename;
> end;
>end;
>
Zkus zadat do OpenDialog1.FileName:='vyber....'
a v programu potom vyberes adresar napr. takto:
procedure TForm1.SpeedButton1Click(Sender: TObject);
var cesta: string;
begin
OpenDialog1.Execute;
cesta:=OpenDialog1.FileName;
SetLength(cesta,Length(OpenDialog1.FileName)-10);
{sring cesta m� hodnotu vybran�ho adres��e}
OpenDialog1.FileName:='vyber....'; {vr�cen� p�vodn� honoty}
...
...
end;
Petr
Kontrolni kod platebnich karet
[*] Mirun <forcom(zv)telecom(tec)cz> - 26.10.1998 19:35:54
Pro drtivou vetsinu firem bude asi daleko dulezitejsi povest, nez
nejakych par dolaru, ktere by si z kreditni karty vycucli. To by asi
musela byt poradne tlusta kreditka, aby se to nekomu vyplatilo.
Nehlede na to ze mas pravo nekorektni prevod z banky do 30dnu
stornovat, pokud ten kdo si penize nauctoval neni schopen dokazat, ze
k tomu ma tve svoleni. (coz pri platbe pres internet nema nikdy, ani
kdyz si neco objednas...)
Mirun
-----P�vodn� zpr�va-----
Od: Martin Kubecka <martin.kubecka(zv)amenit(tec)cz>
Komu: DELPHI Distribution List <delphi-l(zv)fwd(tec)cz>
Datum: 26. listopadu 1998 16:34
P�edm�t: Kontrolni kod platebnich karet
|Zdravim vsechny,
|
|1, nevite jestli existuje nejaky kontrolni soucet pro overeni
platnosti
|platebni karty? Resp. asi urcite existuje, ale jaky? Je to pro kazdou
|kartu stejne?
|
|2, Na platebni karte je Valid Thru: 10/99 - znamena to ze bude platna
|VCETNE rijna 98 nebo do konce zari?
|
|Mac
|
|P.S. Vubec nechapu jak vlastne muze fungovat placeni platebni kartou
|pres Internet. Ted jsem to tak cvicne zkousel (music CD z USA). CD
doslo
|v pohode za10 dnu - vypis z banky jeste nemam, tak jsem na to zvedav.
|Ale prekvapuje mne, ze stacilo pouze vyplnit cislo karty, platnost a
|jmeno (zadny PIN, zadne schvaleni bankovni operace apod.).
|Desi me moznost, ze napr. zaplatim za veceri v restauraci kartou (coz
uz
|jsem delal), pingl si ji odnese k pultu a za chvilku mi ji prinese i
s
|uctem, ktery mu podepisu a on mi vrati kartu. Ovsem nic mu nebrani,
aby
|si opsal (zapamatoval) cislo karty, jmeno a platnost a hura na nakupy
na
|Internetu. To je fakt tak strasne zneuzitelne????
|--
|==============================================================
|= Ing. Martin Kubecka - Amenit s.r.o. =
|= Na Valech - budova Dytron, 741 01 Novy Jicin =
|= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
|= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
|= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
|==============================================================
|
|
|Kontrolni kod platebnich karet
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.10.1998 19:53:13
> 1, nevite jestli existuje nejaky kontrolni soucet pro overeni platnosti
> platebni karty? Resp. asi urcite existuje, ale jaky? Je to pro kazdou
> kartu stejne?
Ano, existuje, je to pro ruzne karty ruzne - totiz karty ruznych
vydavatelu mivaji ruzny pocet mist, maji ruzne prefixy. Podle cisla
proste poznas, zda je to VISA, EC/MC, AMEX, JCB, DC, Sporitelna apod.
Samozrejme to ma nejake modulo. Ted z hlavy to nevim, ale mam to tady
nekde napsane - ta cisla rozhodne, to pocitani take nekde najdu.
To jsou informace verejne zname.
> 2, Na platebni karte je Valid Thru: 10/99 - znamena to ze bude platna
> VCETNE rijna 98 nebo do konce zari?
Ano, platebni karta plati do posledniho dne mesice uvedeneho na karte.
> P.S. Vubec nechapu jak vlastne muze fungovat placeni platebni kartou
> pres Internet. Ted jsem to tak cvicne zkousel (music CD z USA). CD doslo
> v pohode za10 dnu - vypis z banky jeste nemam, tak jsem na to zvedav.
Ja to chapu velmi dobre :-))) Funguje to, neboj se, penize ti budou
odecteny u uctu.
> Ale prekvapuje mne, ze stacilo pouze vyplnit cislo karty, platnost a
> jmeno (zadny PIN, zadne schvaleni bankovni operace apod.).
Vsak tak to chodi - tak si u me neco objednej na kartu, treba
tady: http://www.clexpert(tec)cz/software/localize/objednavka.asp
> Desi me moznost, ze napr. zaplatim za veceri v restauraci kartou (coz uz
> jsem delal), pingl si ji odnese k pultu a za chvilku mi ji prinese i s
> uctem, ktery mu podepisu a on mi vrati kartu. Ovsem nic mu nebrani, aby
> si opsal (zapamatoval) cislo karty, jmeno a platnost a hura na nakupy na
> Internetu. To je fakt tak strasne zneuzitelne????
1. Nikde neni napsano, ze tomu pinglovi musis kartu pujcit tak, aby
si ji nekam odnesl, muzes trvat na tom, aby on prinesl imprinter
k tobe nebo jit s nim k terminalu.
2. Ale i v pripade podvodne transakce muzes platbu reklamovat, pokud
se jedna o podvod, castka ti bude vracena. To se da zjistit jednoduse,
pokud si pingl neco objedna na tebe, uvede svou adresu, aby to prislo
jemu a ne tobe...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Merge
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 26.10.1998 20:21:33
Ahojte
Existuje nekde komponenta pro operace s daty jako umi napr.
funkce "merge" z PC FANDu nebo v SQL "Group by" "SUM" .
Diky za jakekoliv info Kontrolni kod platebnich karet
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 26.10.1998 20:56:57
Diky za informace.
Petr Zahradnik wrote:
> Vsak tak to chodi - tak si u me neco objednej na kartu, treba
> tady: http://www.clexpert(tec)cz/software/localize/objednavka.asp
:-) Ten uz samozrejme mam ;-)
> 1. Nikde neni napsano, ze tomu pinglovi musis kartu pujcit tak, aby
> si ji nekam odnesl, muzes trvat na tom, aby on prinesl imprinter
> k tobe nebo jit s nim k terminalu.
Jiste. Ale pokud se nepletu, tak existovaly i takove udelatka, ktere otiskly
kartu na kus papiru (kopiraku) ci co a tim padem to cislo karty i jmeno maji.
To bylo mysleno jenom jako priklad ...
> 2. Ale i v pripade podvodne transakce muzes platbu reklamovat, pokud
> se jedna o podvod, castka ti bude vracena. To se da zjistit jednoduse,
> pokud si pingl neco objedna na tebe, uvede svou adresu, aby to prislo
> jemu a ne tobe...
A co kdyz si to nekdo objedna na nejaky P.O.Box (teda nevim jestli se da
majitel P.O.Boxu zjistit, ale asi ano).
To existuje nejaka dohoda mezi bankou a napr. dodavatelem zbozi? Dejme tomu,
ze si u tebe koupim druhy Lokalizator (aby mel Zbysek na chleba ;-) a uvedu
cislo karty nekoho jineho. Ty dostanes penize, ale onen potrefeny to bude
reklamovat v bance. Co potom? Kdo bude sjednavat napravu (krome policie
samozrejme)? Bude chtit po tobe banka penize zpet a ty po tom lumpovi (cili po
mne?) nebo je po mne bude chtit banka?
Mac
Telefonni tarifikator z modemu?
[*] Zdenek Drvota <zds(zv)pce.fairnet(tec)cz> - 26.10.1998 21:59:02
Uz jsem se pred casem ptal, zadna odezva, tak to zkousim znovu...
> Dobry den,
> potrebuji sledovat spojeni na modemu v Delphi 1 (ukonceni spojeni na
> aktivni lince). Je mozne ziskat nekde funkcni priklad nebo demo ? D�kuji.
Mimochodem, existuje moznost sledovat pomoci modemu,
jestli se z paralelniho telefonniho pristroje (pruchozi modem
nebo rozdvojka) vytaci nejake cislo (a jake), jestli doslo
ke spojeni, jak dlouho trvalo, atd. ???
Proste takovy maly spion na telefonni lince :-) ,
tarifikator z obycejneho modemu.
Jestli ano, JAK? (pro D3 ev.D1)
*-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: drvota(zv)zds(tec)cz (Win1250/ISO-8859-2)
http://www.zds(tec)cz
Podporujeme akci
Internet proti monopolu > http://www.bojkot(tec)cz/
*-----------------------------------------------*Telefonni tarifikator z modemu?
[*] Micrel <micrel(zv)micrel(tec)cz> - 26.10.1998 22:46:38
Ahoj,
Telefonni tarifikator je k dispozici, pouze pro sledovani linky zatim nemam modul
Jaroslav Bene�
Micrel dev.
micrel(zv)micrel(tec)cz
-----P�vodn� zpr�va-----
Od: Zdenek Drvota [SMTP:zds(zv)pce.fairnet(tec)cz]
Odesl�no: 26. XI 1998 21:59
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Telefonni tarifikator z modemu?
Uz jsem se pred casem ptal, zadna odezva, tak to zkousim znovu...
> Dobry den,
> potrebuji sledovat spojeni na modemu v Delphi 1 (ukonceni spojeni na
> aktivni lince). Je mozne ziskat nekde funkcni priklad nebo demo ? D�kuji.
Mimochodem, existuje moznost sledovat pomoci modemu,
jestli se z paralelniho telefonniho pristroje (pruchozi modem
nebo rozdvojka) vytaci nejake cislo (a jake), jestli doslo
ke spojeni, jak dlouho trvalo, atd. ???
Proste takovy maly spion na telefonni lince :-) ,
tarifikator z obycejneho modemu.
Jestli ano, JAK? (pro D3 ev.D1)
*-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: drvota(zv)zds(tec)cz (Win1250/ISO-8859-2)
http://www.zds(tec)cz
Podporujeme akci
Internet proti monopolu > http://www.bojkot(tec)cz/
*-----------------------------------------------*Kontrolni kod platebnich karet
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.10.1998 23:14:43
> Diky za informace.
Nemas zac. Na ostatni dotazy neodpovidam verejne do konference,
protoze (a) to neni o Delphi a (b) to nejsou verejne informace,
jsou mezi mnou a bankou. Nejsem si jist, zda bych je mel sirit.
Muzeme o tom popovidat soukromou postou...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Kontrolni kod platebnich karet - Off topic
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 26.10.1998 23:49:03 pst
>From: "Mirun" <forcom(zv)telecom(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Subject: Re: Kontrolni kod platebnich karet
>Date: Thu, 26 Nov 1998 19:35:54 +0100
>Reply-To: delphi-l(zv)fwd(tec)cz
>
>Pro drtivou vetsinu firem bude asi daleko dulezitejsi povest, nez
>nejakych par dolaru, ktere by si z kreditni karty vycucli. To by asi
>musela byt poradne tlusta kreditka, aby se to nekomu vyplatilo.
>Nehlede na to ze mas pravo nekorektni prevod z banky do 30dnu
>stornovat, pokud ten kdo si penize nauctoval neni schopen dokazat, ze
>k tomu ma tve svoleni. (coz pri platbe pres internet nema nikdy, ani
>kdyz si neco objednas...)
>
>Mirun
>
Ted je to malinko mimo predmet teto konference. Za to se velice
omlouvam, ale problemy je treba resit.
Toto je mozna teorie, ve skutecnosti jsem mel podobne problemy a nebyl
jsem schopen se s uredniky jedne nejmenovane velke banky v jednom
nejmenovanem velkem meste domluvit jak tento problem resit.
Nakonec to dopadlo zrusenim karty - pro jistotu.
Pokud mate nekdo zkusenosti, nebo vite o obecnych podminkach takovychto
prevodu tak dejte vedet.
Karel Vlcek
tel.: +420 602 264812
poskytovani software
Vlcekk(zv)hotmail.com
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Problem s BDE
[*] Radek Hladik <rhladik(zv)tfc(tec)cz> - 27.10.1998 02:19:17
Date sent: Thu, 26 Nov 1998 09:39:26 +0100
From: Johnny Walker <johnny(zv)atlas(tec)cz>
Organization: Taka divna organizacia...
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Problem s BDE
Send reply to: delphi-l(zv)fwd(tec)cz
> Moje skusenosti s BDE padmi:
>
> 1. Nikdy nepouzivam CTRL-F2 ale radsej odklepem vsetky exception's a potom
> program zavrem korektne.
No, ale kdyz tam je treba smycka, a pak to tech hlasek hlasi
300....
> 2. Ked uz sa to stane ze CTRL-F2 pouzijem alebo to padne, je potrebne
> uzavriet vsetky aplikacie
> pouzivajuce BDE (t.j. vecsinou delphi, dbexplorer, prip bdeadmin a
> dalsie...). Je potrebne sa pozriet do task
> managera, ci tam nevisi nejaky proces suvisiaci s bde, napr. dbexplorer a
> ak ano, tak killnut.
Nevim, jestli jsem neco neprehlid, ale rek bych, ze jsem vykiloval
vsechno a presto se mi databaze neotevrela Exclusive.
>
Radek Hlad�k
rhladik(zv)tfc(tec)cz
Kontrolni kod platebnich karet
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 27.10.1998 08:35:09
> Pro drtivou vetsinu firem bude asi daleko dulezitejsi povest, nez
> nejakych par dolaru, ktere by si z kreditni karty vycucli. To by asi
To je pravda...
> musela byt poradne tlusta kreditka, aby se to nekomu vyplatilo.
... treba moje Eurocard/MasteCard GOLD, ze?
> Nehlede na to ze mas pravo nekorektni prevod z banky do 30dnu
> stornovat, pokud ten kdo si penize nauctoval neni schopen dokazat, ze
To je pravda.
> k tomu ma tve svoleni. (coz pri platbe pres internet nema nikdy, ani
> kdyz si neco objednas...)
Tohle neni pravda - ja mam ted smlouvu s bankou, kde takovou jistotu mam.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
SNMP
[*] pcuhel(zv)deltax(tec)cz - 27.10.1998 08:50:21
Zdravim vsechny,
nepotkal jste nekdo na svych toulkach internetem, nebo ve svem sufliku
komponentu
pro SNMP.
Dekuji
Vice navratovych hodnot
[*] Miki Vom��ka����h������� - 27.10.1998 09:19:37
Ahoj vsem,
poradte, muze mit funkce vice navratovych hodnot?
Miki Vomacka
vmiki(zv)atlas(tec)cz
Tvorba dokumentace
[*] Nosek Libor <nosek(zv)ujf.cas(tec)cz> - 27.10.1998 09:50:19
Dobry den.
Nevite nekdo, existuje-li SW pro tvorbu dokumentace k programum v Delphi. Tedy myslim tisk celeho projektu se
zobrazenim formularu atd. popr. moznost exportu do Wordu97.
Diky.
Nosek Libor
OJS
UJF AV CR
Rez u Prahy 250 68
tel: 66173163
fax: 6857003
nosek(zv)ujf.cas(tec)cz
Dll verze
[*] Pavel Kupka t. 4358 <KUPKA(zv)fsv.cvut(tec)cz> - 27.10.1998 09:53:09
Dobry den
Chtel by jsem se zeptat jestli nekdo nevite ja zjistit verzi dll
knihovny.
Pavel Kupka
Vice navratovych hodnot
[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 27.10.1998 10:00:38
Funkce vraci pouze jednu hodnotu, ale tou muze byt i Record, ktery obsahuje
vice hodnot.
Dalsi moznost je procedura, ktera ti meni predavane parametry.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Miki Vom��ka <vmiki(zv)atlas(tec)cz>
Komu: DelphiForum <delphi-l(zv)fwd(tec)cz>
Datum: 27. listopadu 1998 10:33
P�edm�t: Vice navratovych hodnot
Ahoj vsem,
poradte, muze mit funkce vice navratovych hodnot? Miki Vomacka
vmiki(zv)atlas(tec)cz
BDE a language driver
[*] Daniel Jirasek <daniel_jirasek(zv)conel(tec)cz> - 27.10.1998 10:03:29
Zdravim,
nevite nekdo, jak se da zmenit language driver v BDE softwarove. A jestli se da vytvorit nova databaze
s jinym langdriverem nez jaky je nastaven v BDE?
Za kazdou radu moc dik.
Dan Jirasek
Conel s.r.o.
API funkce..
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 27.10.1998 10:08:06
A co treba Win32 API od Unisu ?
Je to v kazdem lepsim knihkupectvi
Radim
-----P�vodn� zpr�va-----
Od: Robert Vanik <hugo(zv)kamarad(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 26. listopadu 1998 9:45
P�edm�t: API funkce..>Zdravim vsechny delphimany i dephimanky,
>
>prosim vas, muzete me nekdo poradit, kde najit (na i-netu nebo v nejake knizce)
>popis API funkci? Nejlepe v cestine.
>Diky predem
>
>Bob
API funkce
[*] Robert Vanik <hugo(zv)kamarad(tec)cz> - 27.10.1998 10:23:53
Zdravim vsechny delphimany i dephimanky,
prosim vas, muzete me nekdo poradit, kde najit (na i-netu nebo v nejake knizce)
popis API funkci? Nejlepe v cestine.
Diky predem
Bob
API funkce
[*] novak(zv)nwit.pedf.cuni(tec)cz - 27.10.1998 11:11:51
> Zdravim vsechny delphimany i dephimanky,
>
> prosim vas, muzete me nekdo poradit, kde najit (na i-netu nebo v nejake knizce)
> popis API funkci? Nejlepe v cestine.
> Diky predem
>
> Bob
Videl jsem celkem dobrou knihu u UNISu (nazev uz nevim) za skoro
tisicovku. Ale byla celkem rozsahla.
Jarda Novak
Delphi 4, INFORMIX-CLI & Informix 7
[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 27.10.1998 11:29:26
Zacnemem poporade:
1) Mas nainstalovane informix_CLI a ICONNECT (treba do c:\Informix)
2) v autoexec.bat :
SET INFORMIXDIR=c:\Informix
SET PATH=%INFORMIXDIR%\BIN;....
3) v c:\windows :
hosts. kde mas pridanou IP adresu vaseho unix.servru napr:
192.108.146.1 sevis
services. kde je pridany radek se servisem (a adresou) napr:
onlinesql 1525/tcp
informix.ini
4) v konfiguraci SetNet32 mas nastavenou cestu INFORMIXDIR=c:\INFORMIX
na karte Environment
(ted me napada, skus to dat do adresare, ktery splnuje DOS
konvenci - jen pokus)
a na karte Server Information:
Informix Server: online
HostName: sevis
Protocolname: onsoctcp
Service Name: onlinesql
5) pres telnet se na unixovy server skusi, zda mas dobre TCP spojeni
A vse by melo fungovat. Ja to takhle instaluju skoro kazdy tyden na
nejaky pocitac
a nemam zadny problem
+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+
-----Original Message-----
From: Flaska Jakub [mailto:jakub.flaska(zv)zps.skoda-auto(tec)cz]
Sent: Thursday, November 26, 1998 4:59 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Delphi 4, INFORMIX-CLI & Informix 7
Pres MS Query se tam taky nedostanu. Nejhorsi je, ze nevim, kde mam
chybu a chybova hlaseni mi v tom take moc nepomahaji. MS Query mi hlasi
"Insufficient Connection information was supplied Driver's
SQLSetConnectAttr failed" (jake informace jeste chce?), ILogin "Memory
allocation failed", Delphi 4 s nativnim driverem "Unable to load locale
categories" a Delphi 4 s ODBC "Invalid configuration parameter".
Nekde mi urcite neco chybi, ale uz netusim co. V Setnet32 mam nastavene:
Environment:
CLIENT_LOCALE=cz_cz {v podstate nezalezi na tom, co sem vrazim -
vzdy se chova stejne}
DB_LOCALE=88592 {na Unixu je LANG=cz_cz.88592}
DBANSIWARN=n
DBNLS=1 {stejne jako na Unixu}
DELIMIDENT=n
INFORMIXDIR=C:\Program Files\informix
INFORMIXSERVER=ONLRM4 {to je dobre :-) }
Server Information:
Informix Server: ONLRM4
HostName: RM400 {to je nazev Unixoveho serveru, kde lezi Informix}
Protocolname: onsoctcp {tady mi neni jasne, co mam doplnit - podle ceho
a co ktera polozka znamena? Sit je tcp-ip}
Service Name: dsaonlrm4 {je mezi services, na serveru je take nastaveny
a funguje bez problemu na View Point}
Uz vazne nevim, co nastavit jinak, aby to chodilo...
Dekuji za jakoukoli pomoc. F.Dll verze
[*] Daniel SICHTA <Sichta(zv)asset.sk> - 27.10.1998 11:29:41
Ak mas D3 tak v adresari bin je subor tdump.exe. Ten by to mohol urobit
Skus takto tdump xxxxxxx.dll |more
% 421-89-542-15
) sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> -----Original Message-----
From: Pavel Kupka t. 4358 [SMTP:KUPKA(zv)fsv.cvut(tec)cz]
Sent: 27. november 1998 9:53
To: delphi-l(zv)fwd(tec)cz
Subject: Dll verze
Dobry den
Chtel by jsem se zeptat jestli nekdo nevite ja zjistit verzi dll
knihovny.
Pavel Kupka
API funkce
[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 27.10.1998 11:31:07
Byl jsem, uz nevim kdy, nekde, uz nevim kde a videl jsem neco uz nevim co.
:-)
Zkus se podivat do archivu konference. Tento dotaz tu byl i vcera.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
Videl jsem celkem dobrou knihu u UNISu (nazev uz nevim) za skoro
tisicovku. Ale byla celkem rozsahla.
Jarda Novak
Kontrolni kod platebnich karet - Off topic
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 27.10.1998 11:32:16
> Toto je mozna teorie, ve skutecnosti jsem mel podobne problemy a nebyl
> jsem schopen se s uredniky jedne nejmenovane velke banky v jednom
> nejmenovanem velkem meste domluvit jak tento problem resit.
> Nakonec to dopadlo zrusenim karty - pro jistotu.
> Pokud mate nekdo zkusenosti, nebo vite o obecnych podminkach takovychto
> prevodu tak dejte vedet.
Ja osobne jsem mel problemy jen 2x, poprve jsem reklamoval asi 23 tisic
korun, ktere mi obchodnik na jednom nejmenovanem ostrove odecetl dvakrat,
po reklamaci samozrejme bylo vraceno. Podruhe mi Microsoft odecetl $10,
ale nic neposlal, tak jsem se na to vykaslal, protoze jsem byl liny
kvuli $10 chodit do banky... Kazdou transakci mas pravo reklamovat
a oni se tim musi zabyvat! Obchodnik musi archivovat doklady, na zaklade
kterych penize pozadoval. Ja pouzivam svou platebni kartu ke sve plne
spokojenosti na platby do zahranici minimalne 1x tydne jiz pekne dlouho.
Opacnym smerem funguji take, samozrejme trochu mene casto, ale take
bez problemu. Pokud mas nejake problemy s bankou a platebni kartou,
doporucuji ti kontaktovat majitele te znacky - tedy spolecnost VISA,
Europay nebo American Express apod. Rozhodne je to poskozuje a budou
to chtit resit.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Outlook Express
[*] Michal �viga <proton(zv)iol(tec)cz> - 27.10.1998 11:37:29
> Zkus Winproxy (myslim ze adresa je www.winproxy(tec)cz), free verze je pro dva
Doporucuji - pro stahovani posty z vice adres nebo pro vice lidi - idealni
Vynikajici je WinRoute (www.winroute(tec)cz) ktera podporuje prakticky
vsechny TCP/IP protokoly (jede pres ni i ICQ)
Winroute ma tyto protokoly jiz preddefinovane, ale ve Winproxy neni problem
protokoly a porty doplnit a pouzivat tak i treba ICQ.
Michal �viga
PROTON
CD KATALOG AMPER '99
http://www.terinvest(tec)cz/cdkatalog/
mailto:proton(zv)iol(tec)cz
ICQ:20510677
tel., fax:02/65 15 052
-----P�vodn� zpr�va-----
Od: Pavel Zichovsky <zichovsky(zv)jesnem(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. listopadu 1998 14:11
P�edm�t: Re: Outlook Express
> Zkus Winproxy (myslim ze adresa je www.winproxy(tec)cz), free verze je pro dva
> ucastniky. Co se tyce posty muzez u nej nastavit interval, jak casto se ma
> stahovat.
> (co hodinu, co den) Tim si rozbijes ty stovky zprav na mensi kusy.
> zapnute PC, spolehlive: spojeni a providera. Jinak je to vynikajici vec,
co
> se tyce
> pristupu na internet prez jeden modem pro vice uzivatelu.
No, je to dobra vec pro pristup vice uzivatelu (max. tak 5 kdyz
pouzivaji IE. S Netscapem ji totalne zahlti (tak ze proxy prestane byt
dostupna) i jeden trochu aktivnejsi uzivatel). Vynikajici rozhodne ne
;))) Vynikajici je WinRoute (www.winroute(tec)cz) ktera podporuje prakticky
vsechny TCP/IP protokoly (jede pres ni i ICQ)
S pozdravem
Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
mobil: pavel.zichovsky(zv)sms.paegas(tec)cz (120 znaku)
PGP podporovano a vitano
Ochrana p�tadevades�tek
[*] Petr Kro�a ml. <pkroca(zv)compact(tec)cz> - 27.10.1998 12:00:00
Ahoj,
zcela to sem nepatri, ale treba se najde nejaka moznosti fixu pomoci delphi.
Nevite nekdo nahodou, jak kontrolovat spoustene soubory a v pripade, ze je
to nepovoleny soubor jeho spusteni zakazat ?
Jde mi totiz o to, ze ve 95 i 98 je podstatna dira v ochrane disku. Pokud
totiz v Poleditu zakazete, aby se ve slozce TENTO POCITAC zobrazily
mechaniky, funguje to. Ale kliknete-li pravym tlacitkem na plochu a zadate
noveho zastupce, disk C se zpristupni v cele sve krase. Na ostatni disky
vlezt nejde, ale prave to systemove C me vadi nejvic. Microsoft samozrejme
nic neresi.
Chtel bych tedy program, ktery povoli spoustet jen dane aplikace a vic nic.
Pokud nekdo neco ma, budu za to vdecny.
Petr Kro�a
Vice navratovych hodnot
[*] Karel Chmel <kchmel(zv)csob(tec)cz> - 27.10.1998 12:15:14
funkce ne, ale porcedura ano
napr.
procedure Vypocet (Vstup1, Vstup2 : string;var Vystup1 String; var Vystup2 longint);
dulezite je tam to var
Karel
----------
> Odes�latel: Miki Vom��ka <vmiki(zv)atlas(tec)cz>
> Komu: DelphiForum <delphi-l(zv)fwd(tec)cz>
> P�edm�t: Vice navratovych hodnot
> Datum: 27. listopadu 1998 9:19
>
> Ahoj vsem,
>
> poradte, muze mit funkce vice navratovych hodnot?
>
>
> Miki Vomacka
> vmiki(zv)atlas(tec)cz
Delphi 4, INFORMIX-CLI & Informix 7
[*] Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz> - 27.10.1998 12:31:53
Mne funguje nasledujici bez problemu:
Mam nainstalovany Informix Online 7.01 pripadne 7.2 na Unixu.
Nainstalovany Informix Connect na Windowsu.
Nainstalovany Informix National Supplement na Unixu a Windowsu.
Na unixu udelany vlastni locale v /usr/lib/lang/czech/czech/isolatin
Na windowsu musite mit nastavenou promenou PATH=tamkdejeinformixclient\bin
a INFORMIXDIR=tamkdejeinformixklient
Pristup funguje i pres Native Driver i pres ODBC driver (Intersolv).
Myslim ze by chyba mohla byt v nesouladu mezi locale na klientu a servru.
Na informixu je v sqlhosts:
netdb ontlitcp mirecek online_
Databaze jsou vytvorene s nastavenym DBNLS a LANG.
Uvadim jak vypada cast exportu do souboru ze setnet32
----------------------------------------------------
[Setnet32]
Format=ESQL for Win32 7.20 TD1
[ENVIRONMENT]
CLIENT_LOCALE=cs_cz.cp1250
COLLCHAR=1
DB_LOCALE=cs_cz.8859-2
INFORMIXDIR=d:\aplik\informix
INFORMIXSERVER=netdb
INFORMIXSQLHOSTS=
LANG=czech_czech.isolatin
LC_COLLATE=czech_czech.isolatin
LC_CTYPE=czech_czech.isolatin
LC_MONETARY=czech_czech.isolatin
LC_NUMERIC=czech_czech.isolatin
LC_TIME=czech_czech.isolatin
[Lists]
INFORMIXSERVERLIST=netdb
[__infx_sqlhost_netdb]
HOST=mirecek
SERVICE=online_
PROTOCOL=onsoctcp
----------------------------------------------------------------------------
--
Protocolname je ne Windowsu vzdy onsoctcp
to znamena on - online nebo se - standart engine
soc - rozhrani socket (jine na windowsu nejede)
tcp - protokol tcp
-----P�vodn� zpr�va-----
Od: Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 27. listopadu 1998 10:46
P�edm�t: RE: Delphi 4, INFORMIX-CLI & Informix 7
>Pres MS Query se tam taky nedostanu. Nejhorsi je, ze nevim, kde mam
>chybu a chybova hlaseni mi v tom take moc nepomahaji. MS Query mi hlasi
>"Insufficient Connection information was supplied Driver's
>SQLSetConnectAttr failed" (jake informace jeste chce?), ILogin "Memory
>allocation failed", Delphi 4 s nativnim driverem "Unable to load locale
>categories" a Delphi 4 s ODBC "Invalid configuration parameter".
>Nekde mi urcite neco chybi, ale uz netusim co. V Setnet32 mam nastavene:
>
>Environment:
>
>CLIENT_LOCALE=cz_cz {v podstate nezalezi na tom, co sem vrazim -
>vzdy se chova stejne}
>DB_LOCALE=88592 {na Unixu je LANG=cz_cz.88592}
>DBANSIWARN=n
>DBNLS=1 {stejne jako na Unixu}
>DELIMIDENT=n
>INFORMIXDIR=C:\Program Files\informix
>INFORMIXSERVER=ONLRM4 {to je dobre :-) }
>
>Server Information:
>
>Informix Server: ONLRM4
>HostName: RM400 {to je nazev Unixoveho serveru, kde lezi Informix}
>Protocolname: onsoctcp {tady mi neni jasne, co mam doplnit - podle ceho
>a co ktera polozka znamena? Sit je tcp-ip}
>Service Name: dsaonlrm4 {je mezi services, na serveru je take nastaveny
>a funguje bez problemu na View Point}
>
>
>Uz vazne nevim, co nastavit jinak, aby to chodilo...
>
>Dekuji za jakoukoli pomoc. F.
>
>
>> -----P�vodn� zpr�va-----
>> Od: Jezek Petr, Ing. (DELVINA) [SMTP:PETR(zv)sevis.sk]
>> Odesl�no: st�eda, listopad 25, 1998 20:46
>> Komu: 'delphi-l(zv)fwd(tec)cz'
>> P�edm�t: RE: Delphi 4, INFORMIX-CLI & Informix 7
>>
>> A to ODBC mas spravne nastavene (dostanes se na Informix pres napr MS
>> Query?)
>>
>> +-------------------------------+
>> | Ing. Petr Jezek |
>> | Delvina, s.r.o |
>> | 010 01 Zilina |
>> + - - - - - - - - - - - - - - - +
>> | tel: +421 (89) 624 344 |
>> | fax: +421 (89) 621 018 |
>> | email: petr(zv)sevis.sk |
>> | web: www.delvina.sk |
>> +-------------------------------+
>>
>>
>> -----Original Message-----
>> From: Flaska Jakub [mailto:jakub.flaska(zv)zps.skoda-auto(tec)cz]
>> Sent: Wednesday, November 25, 1998 5:02 PM
>> To: delphi-l(zv)fwd(tec)cz
>> Subject: Delphi 4, INFORMIX-CLI & Informix 7
>>
>>
>> Zdravicko...
>>
>> Rozbehali jste uz nekdo INFORMIX-CLI na Informixu 7 v Delphi 4 pres
>> ODBC? At se snazim jak se snazim, ILogin Demo u I-CLI mi hlasi error
>> -406 (Memory allocation failed) a kdyz zkusim I-CLI pripojit v Delphi,
>> koncim s hlaskou "Invalid configuration parameter". :-(((
>>
>> Zkousel jsem pouzit i Delphi 4 C/S a jeho SQL Links, lec marne - v
>> tomto
>> pripade mi hlasi "Cannot load an IDAPI service library. File:
>> SQLINF32.DLL". :-(
>>
>> Budu vdecny za jakoukoli pomoc vedouci k rozchozeni propojeni Delphi 4
>> -
>> Informix 7. Dekuji.
>>
>> F.
>>
>> P.S.: Jestli toto propojeni uz nekomu funguje, mohl by mi, prosim,
>> napsat zpusob nastaveni serveru i klienta?
Vice navratovych hodnot
[*] RADIK(zv)p15.monet(tec)cz - 27.10.1998 12:53:00
Funkce muze mit krom navratove hodnoty take parametry volane odkazem
,ktere lze pouzit jako navratovou hodnotu....
Ales
----------
Od: Miki Vom��ka
Komu: DelphiForum
P�edm�t: Vice navratovych hodnot
Datum: 27. listopad 1998 9:19
Ahoj vsem,
poradte, muze mit funkce vice navratovych hodnot?
Miki Vomacka
vmiki(zv)atlas(tec)cz
Dll verze
[*] Petr Brant <pbrant(zv)softhome(tec)net> - 27.10.1998 12:56:15 -0000
Ahoj, pokud umic C++, zvladnes prepis kodu do Pascalu. Pokud ne, v archivu by mely byt na toto tema tusim 2 prispevky.
DWORD dwHandle;
DWORD dwSize = ::GetFileVersionInfoSize("TVOJE.DLL", &dwHandle);
if (dwSize) {
LPBYTE lpData = new BYTE[dwSize];
if (::GetFileVersionInfo("TVOJE.DLL", dwHandle, dwSize, lpData)) {
UINT uiSize = UINT(sizeof(VS_FIXEDFILEINFO));
LPVOID lpData2 = new BYTE[uiSize];
::VerQueryValue(lpData, "\\", &lpData2, &uiSize);
VS_FIXEDFILEINFO* pvs_info = (VS_FIXEDFILEINFO*)lpData2;
CString csVersion;
csVersion.Format("%d.%02d.%02d",
HIWORD(pvs_info->dwProductVersionMS),
HIWORD(pvs_info->dwProductVersionLS),
LOWORD(pvs_info->dwProductVersionLS));
}
delete lpData;
}********************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
-----Puvodni zprava-----
Od: Pavel Kupka t. 4358 [SMTP:KUPKA(zv)fsv.cvut(tec)cz]
Odeslano: 27. listopadu 1998 8:53
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Dll verze
Dobry den
Chtel by jsem se zeptat jestli nekdo nevite ja zjistit verzi dll
knihovny.
Pavel Kupka
slozka windows
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 27.10.1998 13:10:35
Dnes mam nejaky spatny den. Nemuzu si vzpomenout na funkci ktera mi
zjisti slozku Windows a nebo System. Uz to asi hodinu hledam a furt nic
a pri tom uz jsem to x-krat pouzival. Pomozte mi prosim - mam den blbec.
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
Ako zapisat SELECT
[*] Radim Krivanek <rumun(zv)anet-brno(tec)cz> - 27.10.1998 13:22:30
> > SELECT ANIMALS.NAME, ANIMALS.WEIGHT, ANIMALS.SIZE FROM ANIMALS
>
> Aj tak som to skusal, ale nejde ani tento sposob zapisu.
To je divne.
Nasledujici zapis musi fungovat za vsech okolnosti:
SELECT "animals.name", "animals.weight", "animals.size"
FROM "animals" ;
--
** Radim Krivanek (Rumun) ** Telefon 0603 700 307 **
** rumun(zv)anet-brno(tec)cz ** ICQ Online 23045277 **slozka windows
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 27.10.1998 13:26:06
> Dnes mam nejaky spatny den. Nemuzu si vzpomenout na funkci ktera mi
> zjisti slozku Windows a nebo System. Uz to asi hodinu hledam
> a furt nic
> a pri tom uz jsem to x-krat pouzival. Pomozte mi prosim - mam
> den blbec.
GetWindowsDirectory(tmp,1023);
WinDir:=String(tmp);
if Length(WinDir) > 3 then
WinDir:=WinDir+'\';Zobrazenie formulara
[*] Martin =?iso-8859-2?Q?O=E8en=E1=B9?= <mocenas(zv)isternet.sk> - 27.10.1998 13:29:32
Martin O�en� wrote:
Mam problem so zobrazovanim formulara pri roznych
rozliseniach, ale hlavne pri roznom nastaveni Windows Font
Size (Large Fonts, Small Fonts).
Komponenty sa zacnu prekryvat, pripadne cele casti okna nie
je vidno, co je neprijemne hlavne pri dialog oknach.
Nema niekto skusenosti s riesenim tohoto problemu ?
Vdaka
M.Vice navratovych hodnot
[*] Honza Fiala <fala(zv)imc(tec)cz> - 27.10.1998 13:30:14
do definice fce vrazis pred promenou "var"
Pr:
Procedure VratDva(var prvni, druhy : byte);
begin
prvni := 1;
druhy := 2
end;
procedure akce;
var
vysledek1, vysledek2 : Byte;
begin
VratDva(vysledek1, vysledek2);
// tady bude vysledek1 = 1 a vysledek2 = 2
End;
jde to samozrejme pouzit i na funkci
>poradte, muze mit funkce vice navratovych hodnot?
>
>
>Miki Vomacka
>vmiki(zv)atlas(tec)cz
>BDE a language driver
[*] Lubo Fule <fule(zv)sct.sk> - 27.10.1998 13:31:30
Samozrejme, treba pouzit TDatabase objekt a v nom je property Params, ktora
je typu TStrings a v nej je mozne nastavit vsetky nastavania, ktore su
pouzite v BDE pre dany alias napr.:
Database1.Params.Values['Langdriver']:='Pdox ANSI Czech';
Tento objekt vlastne vytvori akysi docastny alias ktoreho meno sa zadava vo
faze navrhu v property DatabaseName a potom v Datasetoch tiez ako
DatabaseName je treba nastavit to iste. Takto vlastne Datasety pojdu cez
docasny alias vytvoreny pomocou objektu TDatabase, ktoreho vlastnosti (napr.
Langdriver) budu nastavene podla Params.
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Daniel Jirasek
> Sent: Friday, November 27, 1998 10:03 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: BDE a language driver
>
>
> Zdravim,
> nevite nekdo, jak se da zmenit language driver v BDE softwarove.
> A jestli se da vytvorit nova databaze
> s jinym langdriverem nez jaky je nastaven v BDE?
>
> Za kazdou radu moc dik.
>
> Dan Jirasek
>
>
> Conel s.r.o.
>
>
Adresar EXE
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 27.10.1998 13:38:19
Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
(Program nepouziva zadne formulare ani jine komponenty a proto nelze
pouzit konstrukci ExtractFileDir(Application.ExeName) !
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
API funkce
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 27.10.1998 13:52:53
UNIS vydal WIN32 API, myslim dva dily.......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Robert Vanik [SMTP:hugo(zv)kamarad(tec)cz]
> Odesl�no: 27. listopadu 1998 10:24
> Komu: 'Konference d'
> P�edm�t: API funkce
>
> Zdravim vsechny delphimany i dephimanky,
>
> prosim vas, muzete me nekdo poradit, kde najit (na i-netu nebo v
> nejake knizce)
> popis API funkci? Nejlepe v cestine.
> Diky predem
>
> Bob
API funkce
[*] Bro�ek Erik <Erik.Brozek(zv)pvt(tec)cz> - 27.10.1998 13:53:50
get delphi-l "Re: ovladani modemu"Instalace BDE 4.01
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 27.10.1998 13:54:07
Jiz dlouho patram po rychlem zpusobu instalace IDAPI tak,
aby program mohl bezet automaticky ihned po vlozeni CD
bez nutnosti slozite instalace BDE.
Mam tyto napady:
* Install Shield :-)
* je to DLL jako kazde jine, takze by jej melo stacit dat
k EXE programu. To bohuzel nejde, protoze DLL si
zacnou tahat informace z registry databaze.
Takze jeste pred natahovanim DLL upravit registry tak,
aby si DLL myslela, ze uz jsou nainstalovane.
Jak ale napred zmenit registry jeste pred nahravanim
DLL?
* BDEINST.DLL s pomoci RegSvr32 nebo primo
registraci. Tohle DLL (v CAB) samo nainstaluje IDAPI
(jenze anglicky, s dialogy a nelze odinstalovat ubranim programu).
Ma nekdo neco jineho?
Martin
Dll verze
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 27.10.1998 13:54:20
Jestli to neni ve vlastnostech (properties), tak tezko, leda bys znal
velikosti jednotlivych verzi.......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Kupka t. 4358 [SMTP:KUPKA(zv)fsv.cvut(tec)cz]
> Odesl�no: 27. listopadu 1998 9:53
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Dll verze
>
> Dobry den
> Chtel by jsem se zeptat jestli nekdo nevite ja zjistit verzi dll
> knihovny.
> Pavel Kupka
Pripojeni dat k exe souboru
[*] RADIK(zv)p15.monet(tec)cz - 27.10.1998 13:56:00
Chtel bych k hotovemu exe souboru pridavat pozdeji nejaka data. Neco
jako to delaji ruzne SFX pokovace, nebo Inno setup. Mate nekdo kratky
namet, nerad bych se vrtal v dlouhem zdrojaku od Inno setupu....
Ales
Vice navratovych hodnot
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 27.10.1998 13:56:48
Ne, proc nepouzijes parametr predavany odkazem?
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Miki Vom��ka [SMTP:vmiki(zv)atlas(tec)cz]
> Odesl�no: 27. listopadu 1998 9:20
> Komu: DelphiForum
> P�edm�t: Vice navratovych hodnot
>
> Ahoj vsem,
>
> poradte, muze mit funkce vice navratovych hodnot?
>
>
> Miki Vomacka
> vmiki(zv)atlas(tec)cz
Adresar EXE
[*] Abion <delphi(zv)abion(tec)cz> - 27.10.1998 14:01:09
Co takhle ParamStr(0) ?
Jarda Eech
-----Puvodni zprava-----
Od: Zdenek Petruj [SMTP:zpetruj(zv)zebra(tec)cz]
Odeslano: 27. listopadu 1998 13:38
Komu: Delphi Konference (el. adresa)
Poedmit: Adresar EXE
Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
(Program nepouziva zadne formulare ani jine komponenty a proto nelze
pouzit konstrukci ExtractFileDir(Application.ExeName) !
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
Adresar EXE
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 27.10.1998 14:04:36
> Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
> (Program nepouziva zadne formulare ani jine komponenty a proto nelze
> pouzit konstrukci ExtractFileDir(Application.ExeName) !
ExtractFilePath(paramstr(0))
==[ eLK(zv) ]=====================================================
http://webhost(tec)cz/elka * mailto:Libor.Krayzel(zv)czech-tv(tec)cz - tel.:
(069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
==============================================================Vice navratovych hodnot
[*] Libor Klicnik <libor_klicnik(zv)aisoft(tec)cz> - 27.10.1998 14:09:11
[P��loha v souboru: vcard.vcf]Adresar EXE
[*] RADIK(zv)p15.monet(tec)cz - 27.10.1998 14:11:00
Paramstr ( 0 )
Ales
----------
Od: Zdenek Petruj
Komu: Delphi Konference (el. adresa)
P�edm�t: Adresar EXE
Datum: 27. listopad 1998 13:38
Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
(Program nepouziva zadne formulare ani jine komponenty a proto nelze
pouzit konstrukci ExtractFileDir(Application.ExeName) !
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
Adresar EXE
[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 27.10.1998 14:11:12
Mozna GetDir ... ?
Vasek
-----P�vodn� zpr�va-----
Od: Zdenek Petruj [mailto:zpetruj(zv)zebra(tec)cz]
Odesl�no: 27. listopadu 1998 13:38
Komu: Delphi Konference (el. adresa)
P�edm�t: Adresar EXE
Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
(Program nepouziva zadne formulare ani jine komponenty a proto nelze
pouzit konstrukci ExtractFileDir(Application.ExeName) !
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
slozka windows
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 27.10.1998 14:42:29
GetSystemDirectory
GetWindowsDirectory
s pozdravem
Michal Cizek
email : starxax(zv)molly.vabo(tec)cz
HP : http://freeweb.coco(tec)cz/starxax
>Dnes mam nejaky spatny den. Nemuzu si vzpomenout na funkci ktera mi
>zjisti slozku Windows a nebo System. Uz to asi hodinu hledam a furt nic
>a pri tom uz jsem to x-krat pouzival. Pomozte mi prosim - mam den blbec.
>
> S pozdravem
> Zdenek Petruj
Adresar EXE
[*] V�t�zslav Gazda������u��n�?��? - 27.10.1998 15:06:01
Muzes pouzit API funkci GetModuleFileName.
Vita
Adresar EXE
[*] Lubo Fule <fule(zv)sct.sk> - 27.10.1998 15:28:17
Je to nulty parameter programu podobne ako v C teda:
ExtractFileDir(ParamStr(0))> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Zdenek Petruj
> Sent: Friday, November 27, 1998 1:38 PM
> To: Delphi Konference (el. adresa)
> Subject: Adresar EXE
>
>
> Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
> (Program nepouziva zadne formulare ani jine komponenty a proto nelze
> pouzit konstrukci ExtractFileDir(Application.ExeName) !
>
> S pozdravem
> Zdenek Petruj
> ____________________________
> adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
> Czech republic
> ____________________________
> tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
> e-mail: zpetruj(zv)zebra(tec)cz
> internet: http://www.zebra(tec)cz
>
>
>
NT a registry
[*] David Hrb�� - 27.10.1998 15:33:29
Muze mi nekdo prosim poradit, jaka prava, programove je treba nastavit abych
mohl cist z registru, programove, pricemz uzivatel programu je jen user nebo
power user. Zkousel jsem nastavit
SeTcbPrivilege Act as part of the operating system
SeSystemEnvironmentPrivilege Modify firmware environment values
a ani jedno nepomohlo.
Za kazdou radu diky
David Hrbac
Ochrana p�tadevades�tek
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 27.10.1998 16:05:08
A co by jako mel MS resit????? Jasne uvadeji, ze kdyz potrebujes lokalni
bezpecnost, tak si nainstaluj NT.
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Petr Kro�a ml. [SMTP:pkroca(zv)compact(tec)cz]
> Odesl�no: 27. listopadu 1998 12:00
> Komu: Delphi KONFERENCE
> P�edm�t: Ochrana p�tadevades�tek
>
> Ahoj,
> zcela to sem nepatri, ale treba se najde nejaka moznosti fixu pomoci
> delphi.
> Nevite nekdo nahodou, jak kontrolovat spoustene soubory a v pripade,
> ze je
> to nepovoleny soubor jeho spusteni zakazat ?
>
> Jde mi totiz o to, ze ve 95 i 98 je podstatna dira v ochrane disku.
> Pokud
> totiz v Poleditu zakazete, aby se ve slozce TENTO POCITAC zobrazily
> mechaniky, funguje to. Ale kliknete-li pravym tlacitkem na plochu a
> zadate
> noveho zastupce, disk C se zpristupni v cele sve krase. Na ostatni
> disky
> vlezt nejde, ale prave to systemove C me vadi nejvic. Microsoft
> samozrejme
> nic neresi.
>
> Chtel bych tedy program, ktery povoli spoustet jen dane aplikace a vic
> nic.
>
> Pokud nekdo neco ma, budu za to vdecny.
>
> Petr Kro�a
Adresar EXE
[*] Lubo Fule <fule(zv)sct.sk> - 27.10.1998 17:07:20
Alebo tiez poskrabat sa pravou rukou za lavym uchom...:-)
Nic v zlom...
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> V�t�zslav Gazda
> Sent: Friday, November 27, 1998 3:06 PM
> To: Delphi konference
> Subject: Re: Adresar EXE
>
>
> Muzes pouzit API funkci GetModuleFileName.
>
> Vita
>
>
Adresar EXE
[*] sup(zv)svitap(tec)cz - 27.10.1998 17:13:08
>Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
>(Program nepouziva zadne formulare ani jine komponenty a proto nelze
>pouzit konstrukci ExtractFileDir(Application.ExeName) !
>
> S pozdravem
> Zdenek Petruj
>____________________________
>adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
> Czech republic
>____________________________
>tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
>e-mail: zpetruj(zv)zebra(tec)cz
>internet: http://www.zebra(tec)cz
>
>
>
Paramstr(0) udava celou cestu spusteneho programu, tj. vcetne filename. Pak
se pouzije:
function ExtractFileDir(const FileName: string): string;,
takze ExtractFileDir(Paramstr(0)) je adresar, kde byl spusen program.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
SVITAVY
Tel: ++420-461-568 202
Fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
Seznam nainstalovanych tiskaren
[*] Petr Vale� <Petr.Vales(zv)gopas(tec)cz> - 27.10.1998 17:35:53
Ahoj,
nevi nahodou nekdo jak zjistit seznam nainstalovanych tiskaren ???
Diik
Petr
repository
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.10.1998 17:45:09
Martin Kleiner wrote:
> delam komponetu XYZ =class(TComponent) a v metode Loaded si na sebe
> presmerovavam nektere udalosti Formu... (Owner as TForm).OnShow := MyShow;
> komponentu XYZ vlozim na formular a pouziji jeji udalost OnABC formular
> vlozim do repozitare a vytvorim novy form jako potomka puvodniho formu.
>
> potud je vse v poradku, ale problem nastane, kdyz na tomto novem formu
> chci pouzit nejakou udalost komponeny XYZ (po spusteni shodi celou
> aplikaci)
To co delas, je velmi nebezpecna zalezitost. Pokud se zapomenes
a ve formu vyvolas OnShow, nadelas si v programu paseku. Spis
bys mel v komponente udelat metodu odchytavajici zpravu
CM_SHOWINGCHANGED, napr. takto:
procedure CMShowingChanged(var Message: TMessage);
message CM_SHOWINGCHANGED;
...
procedure TXYZ.CMShowingChanged(var Message: TMessage);
begin
inherited;
if not (csDesigning in ComponentState) then
begin
...
end;
end;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Kontrolni kod platebnich karet
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.10.1998 17:45:09
Martin Kubecka wrote:
> To existuje nejaka dohoda mezi bankou a napr. dodavatelem zbozi? Dejme
> tomu, ze si u tebe koupim druhy Lokalizator (aby mel Zbysek na chleba ;-)
> a uvedu cislo karty nekoho jineho. Ty dostanes penize, ale onen potrefeny
> to bude reklamovat v bance. Co potom? Kdo bude sjednavat napravu (krome
> policie samozrejme)? Bude chtit po tobe banka penize zpet a ty po tom
> lumpovi (cili po mne?) nebo je po mne bude chtit banka?
OK. Zpravu archivuji. Az k takovemu pripadu dojde, aspon vime,
kam poslat policii.
:-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Seznam nainstalovanych tiskaren
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 27.10.1998 17:47:18
Ahoj,
objekt TPrinter ma vlastnost Printers, coz je seznam tiskaren dostupnych
systemu a metoda GetPrinter vraci aktualni tiskarnu. Specifikace tiskarny
jako aktualni se dela metodou SetPrinter
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Petr Vale� [SMTP:Petr.Vales(zv)gopas(tec)cz]
> Odesl�no: 27. listopadu 1998 17:36
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Seznam nainstalovanych tiskaren
>
>
> Ahoj,
>
> nevi nahodou nekdo jak zjistit seznam nainstalovanych tiskaren ???
>
> Diik
>
> Petr
Seznam nainstalovanych tiskaren
[*] Petr Vale� <Petr.Vales(zv)gopas(tec)cz> - 27.10.1998 18:16:29
Dekuji mnohokrat...moc mi to pomohlo !!!
S pozdravem Petr
> ----------
> Od: Bene� Jaroslav[SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 27. listopadu 1998 17:47
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Seznam nainstalovanych tiskaren
>
> Ahoj,
> objekt TPrinter ma vlastnost Printers, coz je seznam tiskaren
> dostupnych
> systemu a metoda GetPrinter vraci aktualni tiskarnu. Specifikace tiskarny
> jako aktualni se dela metodou SetPrinter
>
> Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Petr Vale� [SMTP:Petr.Vales(zv)gopas(tec)cz]
> > Odesl�no: 27. listopadu 1998 17:36
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > P�edm�t: Seznam nainstalovanych tiskaren
> >
> >
> > Ahoj,
> >
> > nevi nahodou nekdo jak zjistit seznam nainstalovanych tiskaren ???
> >
> > Diik
> >
> > Petr
> Zobrazenie formulara
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 27.10.1998 19:24:31
> Komponenty sa zacnu prekryvat, pripadne cele casti okna nie
> je vidno, co je neprijemne hlavne pri dialog oknach.
> Nema niekto skusenosti s riesenim tohoto problemu ?
Nastav (v Inspektoru Objektu) Form1.Scaled na FALSE.
Tom
Instalace BDE 4.01
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 27.10.1998 19:31:53
> Jiz dlouho patram po rychlem zpusobu instalace IDAPI tak,
> aby program mohl bezet automaticky ihned po vlozeni CD
> bez nutnosti slozite instalace BDE.
BDE neni zase tak slozite nainstalovat, staci napsat neco
do registru... Ale BDE bys nemel instalovat jinak, nez
certifikovanym instalacnim programem, jak pravi Inprise.
Ono uplne nejlepsi je vyhnout se BDE, pokud to lze,
napriklad ruzne nativni knihovny, ktere se linkuji primo
do EXE.
> Jak ale napred zmenit registry jeste pred nahravanim
> DLL?
U BDE je to blbe, protoze to se natahuje hned. Musis pred
tim jeste spustit programek...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Pripojeni dat k exe souboru
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 27.10.1998 19:31:53
> Chtel bych k hotovemu exe souboru pridavat pozdeji nejaka data. Neco
> jako to delaji ruzne SFX pokovace, nebo Inno setup. Mate nekdo kratky
> namet, nerad bych se vrtal v dlouhem zdrojaku od Inno setupu....
Na tom neni nic sloziteho - normalne si to k tomu prikopirujes,
napojis to za EXE a je vyreseno. Pak jde jen o jednu vec - musis
vedet, kde to zacina, abys to umel precist, coz je take trivialni.
Staci si to nejak oznacit - treba pevnym retezcem nebo na konec
si jeste dat adresu pocatku (velikost puvodniho EXE) apod.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Vyber komponent za behu
[*] Roman Toda <normex(zv)mail.pvt.sk> - 27.10.1998 19:52:00
> neresil uzjste nekdo problem vyberu komponent uzivatelem podobne jako
> to jde v navrhu v Delphi nebo treba na plose Win (tahnutim mysi nebo
> shift+sipky)?
> Urcite bude nejaka API funkce pro vyber objektu na zaklade TRect nebo
> pod. ale zatim jsem v hledani nebyl uspesny. Za vsechny odpovedi diky.
Ukoncim Tvoje trapenie a poslem Ti zdojak (je sice pre D1 ale myslim, ze
nevadi) ??
--
Mgr. Roman Toda - developers center
normex(zv)mail.pvt.sk; www.technickenormy.com
Normex - fulltext retrieval information system for technical standard
Langdriver pro MS-SQL + ODBC
[*] Marek Prokop <prokopsw(zv)czn(tec)cz> - 27.10.1998 22:46:27
Pokousim se rozchodit pristup na MS-SQL 6.5 pres BDE a ODBC (Delphi
2). Vytvoril jsem si pokusnou databazi s 1 tabulkou a jednoduchy
program pro jeji editaci. Na prvni pohled je vse v poradku, jenze na
druhy pohled jsou problemy s cestinou.
Pres TQuery v Delphi se diakritika ukazuje dobre, ale udelam-li
SELECT v iSQL, je cestina spatne. Krome toho nefunguje spravne
trideni - nejprve je Z s hackem, pak A, C s hackem je az na konci za
Z. CH je zatrideno kupodivu dobre.
Zajimave je, ze na tomtez SQL serveru mam i jinou databazi, ktera je
obhospodarovana z aplikace v PowerBuilderu a kdyz se pres ODBC a BDE
pripojim na ni, je cestina vcetne trideni v poradku jak v iSQL tak v
Delphi.
Diky za kazdou radu
Marek Prokop
Adresar EXE
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 28.10.1998 00:44:17
Myslim si, ze lze pouzit Paramstr(0), ale radeji to odskousej.
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
----------
> Odes�latel: Zdenek Petruj <zpetruj(zv)zebra(tec)cz>
> Komu: Delphi Konference (el. adresa) <delphi-l(zv)fwd(tec)cz>
> P�edm�t: Adresar EXE
> Datum: 27. listopadu 1998 13:38
>
> Nevite nekdo jak zjistit adresar ze ktereho byl spusten program.
> (Program nepouziva zadne formulare ani jine komponenty a proto nelze
> pouzit konstrukci ExtractFileDir(Application.ExeName) !
>
> S pozdravem
> Zdenek Petruj
> ____________________________
> adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
> Czech republic
> ____________________________
> tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
> e-mail: zpetruj(zv)zebra(tec)cz
> internet: http://www.zebra(tec)cz
> OLE a MSWord 97
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 28.10.1998 09:48:03 pst
Omlouvam se vsem, kteri tetoproblematiky maji uz dost, ale po celodennim
hledani jsem se odhodlal pozadat o pomoc kolegy - delphare.
Pisu aplikaci v Delphi 2.01 a celkem uspesne komunikuji pres OLE s MS
Wordem - vystupni sestavy. Celkem to bezi, ale k uplne spokojenosti mi
chybi par malickosti - napr:
- Pri zavirani dokumentu ve kterem byly provedeny zmeny (slo o to pouze
vytisknout papir) se neustale objevuje dotaz kam ze tento dokument
ulozit, sice jsem to obesel tim, ze dokument pred uzavrenim ulozim nekam
do "smazat.doc", ale to neni tak uplne koser
- Pri volani OLEWord.AppMinimize se okno s wordem jednou minimalizuje a
podruhe zase ukaze normalne - taky se mi to nelibi
Po prochazeni archivem jsem sice neco malo objevil, ale nestaci mi to.
Nebyl by nekdo tak laskav a nemohl mi poradit odkaz , kde najdu
podrobnejsi popis volani funkci a objektu pro takovouto aplikaci.
Moc dekuji
Karel Vlcek
tel.: +420 602 264812
poskytovani software
Vlcekk(zv)hotmail.com
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Outlook Express
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.10.1998 12:13:00
>
>Ma jeste spoustu dalsich nevyhod. Za tu nejvaznejsi povazuji to,
>ze v polozkach To: a From: nezobrazuje skutecne adresy, ale pouze
>to co je uvedeno jako jejich popis. Alespon jsem nikde nenasel moznost
>toto vypnout.
>
>Napr. z hlavicky To: "Nejake jmeno" <nejaky(zv)email(tec)cz> zobrazuje
>pouze "Nejake jmeno". Pri zobrazovani to jeste tak nevadi,
samozrejme - kdo chce znat jak se veci maji ma vzdy moznost zaobrazit si
vlastnosti - tam najdes cely
obsah hlavicky. Zobrazovani jmeno v polozce to ma jednu velkou vyhodu -
funguje doplnovani jmena podle prave psanych znaku - diky tomy prakticky
nemusim lezt do adresare
>ale ze pouziva neuplnou adresu i pri trideni posty je dost hruza.
to je blbost - doslou postu tridim vetsinou vyhradne stylem name(zv) - takze
pouzivam cast skutecne emailove adresy k zatrideni zpravy. Nezkoumal jsem to
do detailu ale logicky by to melo fungovat tak, ze OE veme cely text v TO:
(pripadne jine) hlavicce a hleda v nem vyskyt zadaneho retezce - v tu chvili
ho nezajima, ze by tam mohl byt nejaky popis uzivatele a jeho email adresa -
bere vse jako shluk znaku.
Zdravi
D. Toman
repository
[*] Martin Kleiner <mkleiner(zv)seznam(tec)cz> - 28.10.1998 12:24:15
Martin Kleiner wrote:
> delam komponetu XYZ =class(TComponent) a v metode Loaded si na sebe
> presmerovavam nektere udalosti Formu... (Owner as TForm).OnShow := MyShow;
> komponentu XYZ vlozim na formular a pouziji jeji udalost OnABC formular
> vlozim do repozitare a vytvorim novy form jako potomka puvodniho formu.
>
> potud je vse v poradku, ale problem nastane, kdyz na tomto novem formu
> chci pouzit nejakou udalost komponeny XYZ (po spusteni shodi celou
> aplikaci)
Zbysek Hlinka wrote:
>To co delas, je velmi nebezpecna zalezitost. Pokud se zapomenes
>a ve formu vyvolas OnShow, nadelas si v programu paseku. Spis
>bys mel v komponente udelat metodu odchytavajici zpravu
>CM_SHOWINGCHANGED, napr. takto:
>
> procedure CMShowingChanged(var Message: TMessage);
>message CM_SHOWINGCHANGED;
>...
>procedure TXYZ.CMShowingChanged(var Message: TMessage);
>begin
> inherited;
> if not (csDesigning in ComponentState) then
> begin
> ...
> end;
>end;
Pokud to udelam takhle, tak si chytnu message pro komponentu TXYZ.
Ja ale potrebuji odchytit message pro TForm ale primo z komponenty TXYZ.
Zatim to delam nasledovne ale problem je v tom, kdyz takovychto komponent
vlozim na Form vic a potom je dynamicky odeberu (v jinem poradi nez jsem je
vkladal)
tak se to samozrejme rozsype.
type
TXYZ = class(TComponent)
protected
OldShow : TNotifyEvent;
procedure Loaded; override;
procedure FormShow(Sender: TObject); virtual;
end;
implementation
procedure TXYZ.Loaded;
begin
if not(csDesigning in ComponentState) then
if (Owner as TForm) <> nil then begin
OldShow := (Owner as TForm).OnShow;
(Owner as TForm).OnShow := FormShow;
end;
end;
procedure TXYZ.FormShow(Sender: TObject);
begin
//kod
if Assigned(OldShow) then OldShow(Self);
end;
end.
Martin Kleiner
Kontrolni kod platebnich karet
[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 28.10.1998 13:22:15
> Ale prekvapuje mne, ze stacilo pouze vyplnit cislo karty, platnost a
> jmeno (zadny PIN, zadne schvaleni bankovni operace apod.).
> Desi me moznost, ze napr. zaplatim za veceri v restauraci kartou (coz uz
> jsem delal), pingl si ji odnese k pultu a za chvilku mi ji prinese i s
> uctem, ktery mu podepisu a on mi vrati kartu. Ovsem nic mu nebrani, aby
> si opsal (zapamatoval) cislo karty, jmeno a platnost a hura na nakupy na
> Internetu. To je fakt tak strasne zneuzitelne????
Je to tak. Znamymu se odecita tak cca. $20 kazdej mesic, nevi odkud (ve
vypisech je to silene zmateny, jen vi, ze je to z USA) a nevi za co, asi
mu presne todle nekdo provedl. Vubec nevi, co ma delat :-((((
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Zakazanie zmeny velkosti stlpcov v DBGrid-e
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.10.1998 13:32:13
> > Ahoj,
> >
> > Treba takhle:
> >
> > procedure TForm1.FormCreate(Sender: TObject);
> > begin
> > with TDrawGrid(DBGrid1) do
> > Options := Options - [goColSizing];
> > end;
> Nazdar,
>
> ja som to tak aj robil, ale ako som v tom maile pisal potrebujem
> zachovat "drag-drop" presuvanie stlpcov a takto nastavenym Options sa to
> tiez zakaze.
Ale kdepak, me to fungovalo, zkousel jsi to ?
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Memo a String
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.10.1998 13:32:04
"Pavel M." wrote:
>
> Mam data ulozena v polozce Memo.
> Potrebuji u daneho zaznamu zkopirovar znaky od zacatku az do prvniho Enteru
> do jine polozky typu String.
> Muzete mi poradit ?
Ahoj,
Treba takhle:
procedure TForm1.Button1Click(Sender: TObject);
var
S: String;
I: Integer;
begin
S := Table1Notes.AsString;
I := Pos(#13, S);
if I > 0 then S := Copy(S, 1, I - 1);
ShowMessage(S);
end;
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
repository
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.10.1998 13:34:14
Martin Kleiner wrote:
> Pokud to udelam takhle, tak si chytnu message pro komponentu TXYZ.
> Ja ale potrebuji odchytit message pro TForm ale primo z komponenty TXYZ.
> Zatim to delam nasledovne ale problem je v tom, kdyz takovychto komponent
> vlozim na Form vic a potom je dynamicky odeberu (v jinem poradi nez jsem je
> vkladal)
> tak se to samozrejme rozsype.
Ahoj,
Zkus vic priblizit co to ma delat. Predpokladam ze se jedna o nevizualni
komponentu.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Outlook Express
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 28.10.1998 13:35:37
Clovece, vidis prece, ze nema cenu se rozcilovat.... Kdyz nekdo CHCE
hazet spinu na MS, tak ji bude hazet stejne. Treba ho plati
konkurence....
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Dalibor Toman [SMTP:dtoman(zv)fortech(tec)cz]
> Odesl�no: 28. listopadu 1998 12:13
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Outlook Express
>
>
> >
> >Ma jeste spoustu dalsich nevyhod. Za tu nejvaznejsi povazuji to,
> >ze v polozkach To: a From: nezobrazuje skutecne adresy, ale pouze
> >to co je uvedeno jako jejich popis. Alespon jsem nikde nenasel
> moznost
> >toto vypnout.
> >
> >Napr. z hlavicky To: "Nejake jmeno" <nejaky(zv)email(tec)cz> zobrazuje
> >pouze "Nejake jmeno". Pri zobrazovani to jeste tak nevadi,
>
> samozrejme - kdo chce znat jak se veci maji ma vzdy moznost zaobrazit
> si
> vlastnosti - tam najdes cely
> obsah hlavicky. Zobrazovani jmeno v polozce to ma jednu velkou vyhodu
> -
> funguje doplnovani jmena podle prave psanych znaku - diky tomy
> prakticky
> nemusim lezt do adresare
>
> >ale ze pouziva neuplnou adresu i pri trideni posty je dost hruza.
> to je blbost - doslou postu tridim vetsinou vyhradne stylem name(zv) -
> takze
> pouzivam cast skutecne emailove adresy k zatrideni zpravy. Nezkoumal
> jsem to
> do detailu ale logicky by to melo fungovat tak, ze OE veme cely text v
> TO:
> (pripadne jine) hlavicce a hleda v nem vyskyt zadaneho retezce - v tu
> chvili
> ho nezajima, ze by tam mohl byt nejaky popis uzivatele a jeho email
> adresa -
> bere vse jako shluk znaku.
>
>
> Zdravi
> D. Toman
>
>
> RA KOMPONENTA
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.10.1998 13:36:40
"Ing. J�n Kuch�r" wrote:
> Mam otazku, nestretol sa z Vas niekto, alebo nema z Vas niekto komponentu pre prehravanie
> RA suborov ?
Ahoj,
uz se to tu parkrat probiralo. Muzes si importovat RA prehravac jako ActiveX
control do Delphi.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************Outlook Express
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.10.1998 14:39:57
>Clovece, vidis prece, ze nema cenu se rozcilovat.... Kdyz nekdo CHCE
>hazet spinu na MS, tak ji bude hazet stejne. Treba ho plati
>konkurence....
ja se nerozciluju - me to bavi :-(
PS aby bylo jasno - nejsem zaprisahly zastance zadneho systemu ci programu -
kdyz se mi neco libi je mi jedno od koho to je.
Zdravi
D. Toman
Outlook Express
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.10.1998 20:00:32
> Clovece, vidis prece, ze nema cenu se rozcilovat.... Kdyz nekdo CHCE
> hazet spinu na MS, tak ji bude hazet stejne. Treba ho plati
> konkurence....
O me je vseobecne znamo, ze jsem zastancem produktu Microsoft,
je mi celkem jedno, kdo software naprogramoval, kdo ho prodava,
kdo je napsany na krabici, hlavne kdyz funguje. Od Microsoftu
mam koupenou celou radu softwaru pocinaje operacnimi systemy
pres kancelarsky software az po vyvojove nastroje. Investoval
jsem do Microsoftu desitky tisic. Myslim, ze maji velmi dobry
software, mimochodem take pouzivam Internet Explorer, na ktery
nedam dopustit, prestoze jsem si i _koupil_ Netscape Navigator,
kdyz se jeste prodaval. Ale presto si dovolim tvrdit, ze
Microsoft Outlook i Outlook Express jsou programy, ve kterych
je prilis mnoho chyb a to dost zasadnich. Pokud toto tvrdim,
neznamena to, ze hazim spinu na Microsoft, ale pouze na tento
produkt. A rikam to proto, ze s nim mam zkusenost jak vlastni,
tak moji zakaznici. Pronajimam WWW prostor a mam kvanta
zakazniku. Volaji mi vetsinou dva druhy zakazniku, kteri maji
problemy. Za prve to jsou zakaznici, kteri jsou pripojeni pres
Telecom, a hlasi, ze se nemohou casto dostat na server. Za druhe
to jsou uzivatele Outlooku, kteri obcas nemohou prijmout nejaky
mail nebo maji problemy s odesilanim (nejen z nasich serveru,
ale take ze serveru svych provideru). Outlook je verejne znam
timto svym problemem (ne jedinym), staci dany mail prijmout
kterymkoliv jinym mailerem a nebo vymazat, pak to chodi dal.
Nerikam, ze Outlook je cely blby, ale pokud je blba zakladni
vec, pak je to smutne...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Kontrolni kod platebnich karet
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.10.1998 20:00:32
> Je to tak. Znamymu se odecita tak cca. $20 kazdej mesic, nevi odkud (ve
> vypisech je to silene zmateny, jen vi, ze je to z USA) a nevi za co, asi
> mu presne todle nekdo provedl. Vubec nevi, co ma delat :-((((
Prosimte, nemohl bys mi napsat cislo karty a dobu platnosti toho
tveho znameho? Totiz kdyz mu nevadi, ze mu nekdo strhava kazdy
mesic $20, tak ja bych si od nej take kazdy mesic neco strhaval.
Nezlob se na me, ale to je peknej trouba, kdyz nevi, co ma delat
v takovychto pripadech. Nebo si to proste vymyslel, aby byl
zajimavejsi. I kdyz docela bych veril, ze je to trouba, kdyz
rika, ze "ve vypisech je to silene zmateny". Kdo vi, jestli ma
vubec platebni kartu - jestli to neni karta Planeta N(zv)va :-)))
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Seznam nainstalovanych tiskaren
[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 29.10.1998 00:33:51
Hi,
uses
Printers;
var
Printer: TPrinter;
begin
Printer:= TPrinter.Create;
ListBox1.Items := Printer.Printers; {do ListBoxu nasype seznam vsech
nainstalovanych tiskaren}
Printer.Free;
end;
S pozdravem
================================
> Pavel Malinsky; Spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================
-----P�vodn� zpr�va-----
Od: Petr Vale� <Petr.Vales(zv)gopas(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 27. listopadu 1998 21:11
P�edm�t: Seznam nainstalovanych tiskaren
>
>Ahoj,
>
>nevi nahodou nekdo jak zjistit seznam nainstalovanych tiskaren ???
>
>Diik
>
>Petr
Zjisteni CP
[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 29.10.1998 00:37:26
Ahoj,
chtel bych se zeptat, zda jste nekdo neresil problem
zjisteni kodove stranky textoveho souboru. Resp.
jak zjistit kodovou stranku obecneho
textoveho souboru aniz bych ji musel vizuelne spatrit. S pozdravem a diky za jakekoli nakopnuti jak by to slo udelat
================================
> Pavel Malinsky; Spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================
repository
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 29.10.1998 09:34:09
Martin Kleiner wrote:
> >To co delas, je velmi nebezpecna zalezitost. Pokud se zapomenes
> >a ve formu vyvolas OnShow, nadelas si v programu paseku. Spis
> >bys mel v komponente udelat metodu odchytavajici zpravu
> >CM_SHOWINGCHANGED, napr. takto:
> >
> > procedure CMShowingChanged(var Message: TMessage);
> >message CM_SHOWINGCHANGED;
> >...
> >procedure TXYZ.CMShowingChanged(var Message: TMessage);
> >begin
> > inherited;
> > if not (csDesigning in ComponentState) then
> > begin
> > ...
> > end;
> >end;
>
>
> Pokud to udelam takhle, tak si chytnu message pro komponentu TXYZ.
> Ja ale potrebuji odchytit message pro TForm ale primo z komponenty TXYZ.
> Zatim to delam nasledovne ale problem je v tom, kdyz takovychto komponent
> vlozim na Form vic a potom je dynamicky odeberu (v jinem poradi nez jsem
> je vkladal) tak se to samozrejme rozsype.
>
> type
> TXYZ = class(TComponent)
> protected
> OldShow : TNotifyEvent;
> procedure Loaded; override;
> procedure FormShow(Sender: TObject); virtual;
> end;
>
> implementation
>
> procedure TXYZ.Loaded;
> begin
> if not(csDesigning in ComponentState) then
> if (Owner as TForm) <> nil then begin
> OldShow := (Owner as TForm).OnShow;
> (Owner as TForm).OnShow := FormShow;
> end;
> end;
Nezapomnel jsi na inherited Loaded?
>
> procedure TXYZ.FormShow(Sender: TObject);
> begin
> //kod
> if Assigned(OldShow) then OldShow(Self);
> end;
>
Tak si napis CMShowingChanged primo ve Formu, a posli nejakou
jinou zpravu komponente. Ale zprava CM_SHOWINGCHANGED
projde pres Form a pak jde i na komponentu, takze IMHO by to
melo fungovat stejne.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ