Archív konference Delphi

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

Error pri TForm.Print - RESENI !

[*] Jan Kirchner <imconr(zv)volny(tec)cz> - 17.2.2000 17:09:24

Naposled Ahoj !

Protoze si mym dotazem par lidi lamalo hlavu, pisi kde jsem udelel banalni
(pochopitelne) chybu, treba to nekomu pomuze:
Metodu Print jsem volal zpusobem: Form.Print z tela formulare. Toto
pochopitelne funguje pokud u MDI aplikace nechame Delphi vytvorit
automaticky formular pri startu. Jenze pokud formular MDi vytvarim za behu
takto:
with TFNastaveniMereni.Create(Self) do
try
ShowModal;
finally
Free;
end;
zadna promena Form pochopitelne vytvorena neni, takze jsem volal Print od
vlastne neexistujiciho formulare - proto chyba poruseni ochrany (ja jsem ale
v.. !!!).
Spravne tedy ve formulari ktery se ma tisknout staci volat Print a je to !

Jak je to jednoduche, kdyz vime v cem byl problem !

Jan Kirchner, program�tor amat�r
imconr(zv)volny(tec)cz


----- Original Message -----
From: Jan Kirchner <imconr(zv)volny(tec)cz>
To: DELPHI Forum <delphi-l(zv)fwd(tec)cz>
Sent: Monday, February 14, 2000 11:32 PM
Subject: Error pri TForm.Print


> Ahoj znalci !
>
> m�m zarputil� probl�m kter� se mi vyskytuje v jedne aplikaci pri tisku
> metodou Print formulare.
> Pouze vyjede prazdna stranka a program hlasi klasickou chybu: 'Access
> violation ...'.
>
> V jine aplikaci mi metoda Print funguje bez problemu.
>
> Jak to mam odladit ? Je potreba formular pro tisk nejak zvlast pripravit ?
> Mate nejake zkusenosti s touto metodou tisku formulare ?
>
> Diky za ukazani jak na to jit.
>
> Jeste doplneni: D5, W98, tisk�rna HP PS1000, (na PIC printer to udela tu
> stejnou chybu, ovladace na jine tiskarny jsem nezkousel)
>
> Jan Kirchner, program�tor amat�r
> imconr(zv)volny
>
>
>
>
>

Error pri TForm.Print

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 17.2.2000 17:31:29

Cele to vyzera na nejake podivne volanie metody Print. Nevolas ju nahodou
napriklad cez FNastaveniMereni.Print namiesto samotneho Print? Potom by
totiz logicky pri automaticky vytvorenom formulari objekt FNastaveniMereni
existoval a prvy sposob by bol v poriadku, zatialco pri vytvoreni dynamicky
tak ako si to napisal by objekt FNastaveniMereni neodkazoval nikam a tak by
samozrejme FNastaveniMereni.Print skoncil s Access violation. Druhy sposob
je funkcny v oboch pripadoch.
Skus poslat aj samotny fragment kodu kde prebieha Print, chyba je totiz
zrejme v nom.

----- Original Message -----
From: Jan Kirchner <imconr(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, February 17, 2000 4:47 PM
Subject: Re: Error pri TForm.Print


> Ahoj,
> Diky za reakci.
> kus prilozeneho kodu je na ukazku. V nem vytvarim instanci formulare
> TFNastaveniMereni a zobrazuji ho (tento konkretni modalne). Volani metody
> Print je ale v ramci tohoto vytvoreneho formulare, takze neni mozne abych
> volal Print po Free.
> Navic, jak jsem uvedl Chyba se objevuje jen kdyz formular neni v seznamu
> automaticky vytvarenych formularu.
>
> Porad jeste nemam reseni. Poradite nekdo?
>
> Zdravim
> Jan Kirchner, program�tor amat�r
> imconr(zv)volny(tec)cz
>
> ----- Original Message -----
> From: Foldyna Ji�� <jiri.f(zv)avizo(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, February 17, 2000 9:33 AM
> Subject: RE: Error pri TForm.Print
>
>
> ...
> > > // Vyvol�n� okna nastaven� parametr� m��en�
> > > procedure TMainForm.Pednastavenparametrmen1Click(Sender: TObject);
> > > begin
> > > with TFNastaveniMereni.Create(Self) do
> > > try
> > > ShowModal;
> > > finally
> > > Free;
> > > end;
> > > end;
> > >
> ...
>
> > Ahoj,
> > mozna idiotska pripominka, neznam cely kontext diskuse, ale nevolas
> nahodou
> > metodu TFNastaveniMereni.Print az po vykonani TFNastaveniMereni.Free ?
> >
> > Ing. Jiri Foldyna
> > mailto:jiri.f(zv)avizo(tec)cz
> >
>
>

Error pri TForm.Print

[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 17.2.2000 17:41:09

>kus prilozeneho kodu je na ukazku. V nem vytvarim instanci formulare
>TFNastaveniMereni a zobrazuji ho (tento konkretni modalne). Volani metody
>Print je ale v ramci tohoto vytvoreneho formulare, takze neni mozne abych
>volal Print po Free.
>Navic, jak jsem uvedl Chyba se objevuje jen kdyz formular neni v seznamu
>automaticky vytvarenych formularu.

Ahoj,

problem mas asi az uvnitr TFNastaveniMereni.
Zkus toto:

procedure TMainForm.Pednastavenparametrmen1Click(Sender: TObject);
begin
FNastaveniMereni:=TFNastaveniMereni.Create(Self)
with FNastaveniMereni do
try
ShowModal;
finally
Free;
FNastaveniMereni:=nil;
end;
end;

FNastaveniMereni je definovana v souboru s TFNastaveniMereni.

S pozdravem
Miloslav Skacel
skacel(zv)stereo(tec)cz
www.stereo(tec)cz

Vliv BDE na ODBC

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 17.2.2000 19:17:17

On 17 Feb 00, at 13:30, David Lebeda wrote:

> -otevreni Query s dotazem select * from xxx
>
> Databaze je na MSSQL7.
> [...]
>
> Zato pri praci s Query jsem nezjistil zadny rozdil, oba zpusoby
> trvaly stejne dlouho, a to i navzdory tomu, ze tentokrat mODBC
> vygenerovalo podstatne delsi log (BDE - 23 kB, mODBC - 87 kB).
>
> Trochu me to prekvapuje, nebot v konferenci jsem se docetl, ze
> BDE zachazi s ODBC strasne neefektivne. Mne se misto toho zda,
> ze prvotni otevreni databaze je v BDE sice neefektivni, ale dalsi
> prace s dotazy se jiz nezda byt nejak spatna.

Mno - delal jsem si testy na hrubou silu vykonu, to jest brutalni
zapis hromady zaznamu a pak vycteni cele tabulky. Pri techto
testech byl vykon BDE+ODBC mirne lepsi nez ve variante
BDE+nativni link (D5 E, MSSQL7). Samozrejme, pri jinem
sestaveni ulohy a zateze mohou vysledky vypadat jinak.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Access a OleDB Delphree komponenty

[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 17.2.2000 19:51:39

Ahojte,
nejak se mi nedari pripojit pres OleDB komponenty z Delphree pripojit na
Accessovskou databazi. Je vubec mozne se na ni pripojit?
Provider nastavim na "Microsoft.Jet.OLEDB.4.0", nastavim UserID, Password.
Kdyz kliknu na property Database, tak v dialogu nastavim

DataSource: datab.mdb
UserName: Admin
Password:
Provider string: Provider=Microsoft.Jet.OLEDB.4.0;Data Source=datab.mdb
Open mode: DB_MODE_READWRITE

Dostanu Error: Authentication failed: Initialize - InitDatabaseList.
heeelp
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano


Prace s COMy, padani na konci (problem s OleUninit

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 17.2.2000 21:50:22

Ahoj
Tak jsme dneska tu zaludnou chybu nasli.
Pred uvolnovanim COMu, ktere pouzivali Adonisovsky TRDSRemoteObject pro RDS
pripojeni
k jinemu COMu, jsem nastavovali RDSRemoteObject.Connected := false;
(V nasi metode "BeforeUnload".)
To probehlo bez problemu.
Ale v dusledku toho na konci cely system zkolaboval.
Pripada mi to jako magie. Na jednom miste neco nastavime a pak v dusledku
toho mnohem pozdeji system zhavaruje.
(Kdyz rucne nastavujeme RDSRemoteObject.Connected := true; tak bych ocekaval
za slusnost zavolat
RDSRemoteObject.Connected := false;).

Eriku, netusis cim je to zpusobeno?

S pozdravem, Ladislav Nagy


> > Mam problem s padem programu. Program se sklada z nekolika (6) in-proc
COM
> > objektu.
> > V vetsine z nich pouzivam VCL. Objekty maji 2 vlastni interface (jeden
je
> > pro vsechny stejny a jeden je specificky).
> > Vytvareny jsou jako ciMultiInstance, ThrMod = tmSingle nebo tmApartment.
> > Cela aplikace je tedy singlethread.
> >
> > Prace s programem probiha bez problemu, ale na zaver se objevi chyba s
> > temito informacemi:
> >
> > MujEXE caused an invalid page fault in
> > module KERNEL32.DLL at 015f:bff9dba7.
> > Registers: ...
> >
> > Po zoufalych pokusech jsem zjistil, ze za to nejspis muze finalization u
> > OLECtnrs.
> > Nepredpokladam, ze by byla chyba v ni, proto se ptam, cim by to mohlo
byt
> > zpusobene.
> > Domnivam se, ze delam nejakou chybu pri praci s COMama.
>
> Nemas tam globalnu premennu typu interface? Ja som v takej premennej
> drzal smernik na COM object a vo finalization unitu som ho rusil
(priradenim
> nil). Problem bol v tom, ze Delphi este predtym zavolalo CoUninitialize
> (aj ked mi nie je jasne preco), toto volanie vsetky COM objekty zrusilo
> ale moja premenna stale niekde ukazovala a po jej priradeni na nil (Delphi
> vtedy implicitne zavola Release) to davalo chybovu hlasku.
>
> Erik Salaj

RDS, ModifiedOnly, Adonis

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 17.2.2000 22:00:13

Ahoj
zjistili jsme, ze nastaveni MarshalOptions := cModifiedOnly v Adonisovske
ADOQuery nestaci,
museli jsme si tuto vlastnost nastavit o vrstvu niz (RecordSet as
ADO.RecordSet).MarshalOptions := cModifiedOnly.
Znamena to, ze nektere property Adonisovskych komponent (MyADODataSet) pri
nastaveni RecordSetu zpusobem MyADODataSet.ADORecordSet := MyADORecordSet
nefunguji ?

S pozdravem, Ladislav Nagy



----- P�vodn� zpr�va -----
Od: Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Kopie: <fm(zv)bcpraha.com>
Odesl�no: 15. �nora 2000 9:28
P�edm�t: RDS, ModifiedOnly, Adonis


> Ahoj,
>
> 1. Na klientovi mame nekolik COMu, z nichz jen jeden (CRediretor) je
> pripojen smerem k Middle COMu (MRedirector), ktery dal distribuuje data
> ostatnim Middle COMum.
> CRediretor vytvori MRedirector pres RDS (standardne pres Adonis
komponenty).
> Kdyz uzivatel zmeni v nejakem klientskem COMu data, tak se zavola
"osizenym"
> zpusobem z OnTransferRecords (viz bod 2.) metodu CRedirectoru, ta zavola
> metodu MRedirectoru a odtud se vola metoda prislusneho middle COMu (=ve
hre
> jsou 4 COMy).
> Problem je, ze v takovem pripade se do MRedirector dostanou vzdy vsechny
> zaznamy z RecordSetu, nejenom modifikovane (vsechno mam nastavene presne
> jako v Examplech Adonisu, ktere mi funguji spravne).
> Snazil jsem se najit ve zdrojacich Adonisu, jakym zpusobem se zajisti, ze
se
> poslou na middle COM je modifikovana data, ale dospel jsem k zaveru, ze to
> neni vec Adonisu, ale ze se o to stara RDS od Microsoftu samo. Myslel jsem
> si, ze RDS funguje tak, ze jakmile pres nej posilam Recordset, ktery ma
> nastaveno ModifiedOnly, tak automaticky zajisti, ze se pres RDS spojeni
> poslou jen zmenena data.
> Takze, to ze se z klientskeho COMu do CRedirectoru dostanou vsechny
zaznamy
> bych ocekaval, ale kdyz posilam data dal volanim nejake metody
MRedirectoru,
> tak bych ocekaval, ze se automaticky poslou jen zmenena data. (Do
> CRedirectoru se dostanu data i s RecordStatus. Po zmene jednoho zaznamu
jsou
> vsechny hodnoty RecordStatus = 8, jen u toho jednoho zaznamu =1.)
>
> 2. Mozna, ze je problem 1. zpusoben tim, ze jsem si zkusil prepsat chovani
> Adonisu tak, abych mohl pouzivat OnTransferRecord i v klientskyh modulech,
> ktere nejsou pripojeny pres RDS k jinemu objektu. Zda se mi to moc
sikovne.
> Clovek pak pracuje s beznymi metodami Open, Close, Edit, ApplyUpdates, ...
> Eriku nebylo by mozne Adonisy takto rozsirit? Zda se Ti to smysluplne?
> V soucasne dobe se vola OnTransferRecord jen kdyz je prirazen
RemoteObject.
> (Jednoduchou zmenu kodu jak by to slo prepsal jsem jiz Erikovi posilal
> drive.)
> Je moznost si udelat vlastni metody a pak vsude volat jen tyto metody, ale
> na uhlidani toho, kdy vzdy reagovat mi prijde mnohem jednodussi a
> konzistentnejsi vyuzit OnTransferRecord.
>
> Dekuji za rady a tipy, Ladislav Nagy
>
> PS: Dekuji Eriku za tip ohledne "Re: Prace s COMy, padani na konci
(problem
> s OleUninitialize ???)", ale zda se, ze chyba bude v nasem pripade jeste
> nekde jinde. Jiz zadne globalni odkazy na COMy nemame a presto nam to na
> konci pada ...
> Je to hrozny, protoze odchytit se ta chyba nikde neda ... (jen na konci se
> pri debugovani objevi odpovidajici kod assembleru) Debugovani vsak znamena
> nutny restart PC ... :-((. Asi vse prepiseme do Basicu :-)).
>
> ===========================================
> Mgr. Ladislav Nagy
> MFF UK & Baader Computer spol. s r.o.
> tel. : 02 / 24941962, -63, -65 fax : -64
> lnag7384(zv)mail.kolej.mff.cuni(tec)cz , Ladislav.Nagy(zv)bcpraha(tec)cz
> ICQ: 40948953
>

TDBEdit - readonly

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 17.2.2000 22:09:55

Jeste jeden poznatek. I SQL select s ORDER BY nelze editovat, a taky staci jedine agragovane pole a prima editace je taky v ...

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

Sitova databaze

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 17.2.2000 22:14:45

Je fakt, ze PARADOX je asi sam o sobe asi nejstabilnejsi z dekstopovych
databazi. Problemem je totiz dle meho nazoru BDE :-)) jakoz to
konfigurovatelny prostrednik pro
pristup do databaze.

Ale mi osobne se velmi zamlouva nativni pristup pro MSAccess pres DAO 3.5.

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

> -----P�vodn� zpr�va-----
> Od: Jaroslav Nadhera [SMTP:nadhera(zv)csh(tec)cz]
> Odesl�no: 16. �nora 2000 9:37
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Sitova databaze
>
> Podle meho nazoru to neni s Paradoxem zas az tak hrozne, jak z nekterych
> prispevku vyplyva. My jej pouzivame uz asi 2,5 roku a pokud se dodrzi
urcita
> pravidla, o kterych zde jiz bylo mnohokrat psano, funguje to dobre.
Jedine,
> co nas trapi je rychlost pri vetsim objemu dat (radove desetitisice
zaznamu
> v tabulce). Jedine kvuli tomu se snazime aplikaci udelat pod SQL
serverem.
> Takze pokud nebude databaze prilis rozsahla a pristup bude jen ze 2-3
> stanic, Paradoxu bych se nebal. Ony totiz tyto problemy asi budou se
vsemi
> desktop databazemi.
>
> J. N�dhera
>
> CSH spol. s r.o.
> Velflikova 10, 160 00 Praha 6
> tel: 02/2431 2344-5, fax: 02/652 28 92
> Nedbalova 14, 701 00 Ostrava
> tel: 069/663 56 87
> e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
>
> ----- Original Message -----
> From: Milan Kotaska <mkotaska(zv)atlas(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, February 16, 2000 7:27 AM
> Subject: Sitova databaze
>
>
> > Ahoj.
> > Mam aplikaci s vyuzitim pristupu na databazi (tabulky Paradox 7, zadny
> > index, zadna ref. integrita).
> > Nyni chci, aby aplikace pracovala na vicero pocitacich v siti (2-3) a
> > samozrejme sdilela data na jednem z nich.
> > V archivu konference jsem se docetl, ze s tabuklami Paradox jsou jiste
> > problemy (poskozeny index, poskozena tabulka). Prosim muzete mi nekdo
> > poradit, jakou databazi (desktopovou) pouzit ?
> >
> > Dekuji vsem za odpoved
> >
> > Milan KOTASKA
> > mkotaska(zv)atlas(tec)cz
> >
> >
> >
> >
> >
>
>

Sitova databaze

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 17.2.2000 22:14:36

Co takhle FlashFiller a SQL dotaz??:-)))

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

> -----P�vodn� zpr�va-----
> Od: p. Jirman [SMTP:jim.design(zv)iol(tec)cz]
> Odesl�no: 16. �nora 2000 19:58
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Sitova databaze
>
> Doporucuji FlashFiller, ktery je spolehlivy/jednoduchy i pro vice stroju,
> ale take stoji 6990Kc (www.dev-shop(tec)cz).
>
> M.Jirman
>
> From: Milan Kotaska <mkotaska(zv)atlas(tec)cz>
> > Ahoj.
> > Mam aplikaci s vyuzitim pristupu na databazi (tabulky Paradox 7, zadny
> > index, zadna ref. integrita).
> > Nyni chci, aby aplikace pracovala na vicero pocitacich v siti (2-3) a
> > samozrejme sdilela data na jednem z nich.
> > V archivu konference jsem se docetl, ze s tabuklami Paradox jsou jiste
> > problemy (poskozeny index, poskozena tabulka). Prosim muzete mi nekdo
> > poradit, jakou databazi (desktopovou) pouzit ?
> >
> > Dekuji vsem za odpoved
> >
> > Milan KOTASKA
> > mkotaska(zv)atlas(tec)cz
> >
> >
> >
> >
> >
>
>
>
>
>
>

SaveDialog a OpenDialog

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 17.2.2000 22:20:46

Omyl panove, nekdo to tady poslal a spravilo to volani dvou API funkci.

Autor se nebude zlobit, kdyz toto v jeho jmene zopakuji :

Na SaveDialog.OnTypeCHange je potreba povesit toto :

procedure TFMain.SaveDialogTypeChange(Sender: TObject);
//Zm�na filtru
var
S : string;
_FileName : string;
C : array[0..255] of char;
HndPom : THandle;
begin
inherited;
//ExtZFiltru je moje funkce, ktera dle FilterIndex vraci priponu. Tu muzu poslat taky
S := ExtZFiltru( SaveDialog.Filter, SaveDialog.FilterIndex);

if ( S <> '') and ( S <>'*') then begin
_FileName := ReplaceStr( SaveDialog.FileName,
ExtractFileExt( SaveDialog.FileName),
'.'+S, True);
_FileName := ExtractFileName( _FileName);

HndPom := FindWindowEx( GetParent( Savedialog.handle), 0, 'Edit', nil);
GetWindowText( HndPom, c, SizeOf(c)-1);{tim se ziska puvodni text}
{tady si ho zmenis}
StrPCopy( (zv)c, _FileName);
SetWindowText( HndPom, c);
end;
end;


A PRECE TO FUNGUJE

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

> -----P�vodn� zpr�va-----
> Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
> Odesl�no: 13. �nora 2000 23:09
> Komu: Konference Delphi
> P�edm�t: Re: SaveDialog a OpenDialog
>
> From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
> > > To je trosku problem, pokud jsem si vsiml tak to ve vetsine
> > > aplikaci nefunguje,
> > > tedy se pripona po zmene filtru uz nezmeni.
> >
> > Treba takovy Word, nebo PaintShopPro to umi.
>
> Ahoj,
>
> Word s nejvetsi pravdepodobnosti nepouziva standartni dialogy, proto to funguje.
>
> Petr Vones, amatersky programator
>
>

Prace s COMy, padani na konci (problem s OleUninit

[*] Michal Kop��ek - 17.2.2000 22:44:51

pot�eboval bych help,

jsem absolutni zacatecnik a potrebuju spustit aplikaci ale aby se
nezobrazilo okno formulare ale pouze aby se zobrazil TrayIcon.

V soucasnosti se mi zobrazi formular a TrayIcon ale nevim jak schovat
formular.

Dik

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************

Prace s COMy, padani na konci (problem s OleUninit

[*] Michal Kop��ek - 17.2.2000 23:37:14

U� jsem na to p�i�el,ale m�m je�t� jeden probl�m.

V komponent� kbmMemTable se mi v datab�zi u z�znamu ukl�d� jen 20 znak� a ne
v�ce.(pole v table jsou nastavena na 50)

d�k

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Michal Kop��ek
Sent: Thursday, February 17, 2000 10:45 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Prace s COMy, padani na konci (problem s OleUninitialize
???)


pot�eboval bych help,

jsem absolutni zacatecnik a potrebuju spustit aplikaci ale aby se
nezobrazilo okno formulare ale pouze aby se zobrazil TrayIcon.

V soucasnosti se mi zobrazi formular a TrayIcon ale nevim jak schovat
formular.

Dik

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************

---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000

Prace s COMy, padani na konci (problem s OleUninit

[*] Erik Salaj <winsoft(zv)napri.sk> - 18.2.2000 00:08:54

[P��loha v souboru: RDS.ZIP]
Sorry, zabudol som poslat novy RDSRemoteObject, tam je ten problem
s globalnou premennou, ktory som spominal. Posielam to teraz.

Pozdravuje

Erik Salaj

----- Original Message -----
From: "Ladislav Nagy" <lnag7384(zv)mail.kolej.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, February 17, 2000 9:50 PM
Subject: Re: Prace s COMy, padani na konci (problem s OleUninitialize ???)> Ahoj
> Tak jsme dneska tu zaludnou chybu nasli.
> Pred uvolnovanim COMu, ktere pouzivali Adonisovsky TRDSRemoteObject pro
RDS
> pripojeni
> k jinemu COMu, jsem nastavovali RDSRemoteObject.Connected := false;
> (V nasi metode "BeforeUnload".)
> To probehlo bez problemu.
> Ale v dusledku toho na konci cely system zkolaboval.
> Pripada mi to jako magie. Na jednom miste neco nastavime a pak v dusledku
> toho mnohem pozdeji system zhavaruje.
> (Kdyz rucne nastavujeme RDSRemoteObject.Connected := true; tak bych
ocekaval
> za slusnost zavolat
> RDSRemoteObject.Connected := false;).
>
> Eriku, netusis cim je to zpusobeno?
>
> S pozdravem, Ladislav Nagy
>
>
> > > Mam problem s padem programu. Program se sklada z nekolika (6) in-proc
> COM
> > > objektu.
> > > V vetsine z nich pouzivam VCL. Objekty maji 2 vlastni interface (jeden
> je
> > > pro vsechny stejny a jeden je specificky).
> > > Vytvareny jsou jako ciMultiInstance, ThrMod = tmSingle nebo
tmApartment.
> > > Cela aplikace je tedy singlethread.
> > >
> > > Prace s programem probiha bez problemu, ale na zaver se objevi chyba s
> > > temito informacemi:
> > >
> > > MujEXE caused an invalid page fault in
> > > module KERNEL32.DLL at 015f:bff9dba7.
> > > Registers: ...
> > >
> > > Po zoufalych pokusech jsem zjistil, ze za to nejspis muze finalization
u
> > > OLECtnrs.
> > > Nepredpokladam, ze by byla chyba v ni, proto se ptam, cim by to mohlo
> byt
> > > zpusobene.
> > > Domnivam se, ze delam nejakou chybu pri praci s COMama.
> >
> > Nemas tam globalnu premennu typu interface? Ja som v takej premennej
> > drzal smernik na COM object a vo finalization unitu som ho rusil
> (priradenim
> > nil). Problem bol v tom, ze Delphi este predtym zavolalo CoUninitialize
> > (aj ked mi nie je jasne preco), toto volanie vsetky COM objekty zrusilo
> > ale moja premenna stale niekde ukazovala a po jej priradeni na nil
(Delphi
> > vtedy implicitne zavola Release) to davalo chybovu hlasku.
> >
> > Erik Salaj


ADO 2.5

[*] Erik Salaj <winsoft(zv)napri.sk> - 18.2.2000 00:15:20

Nove MDAC 2.5 je uz k dispozicii na http://www.microsoft.com/ado

Erik SAlaj


W2000 a D5 & testy

[*] Jaro <jaro(zv)sinea(tec)cz> - 17.2.2000 20:36:17 -0800

> ...a taky mi neni jasne, nac muze byt dobry/nutny
> programatorovi k PROGRAMOVANI vykon AGP 4x
>

No kdyz se mi nedari program, tak se jdu odreagovat do Quake III
a predstavuji si, ze ty priserky jsou zakaznici :)))

Ne vazne. Kolega napr. programuje graficky vysoce narocne projekty
a take kazdy pocitac nemusi byt vyuzit jen na programovani.

Jaro


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 18.2.2000 07:23:35

Ahoj
pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou aplikaci.
Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze mit
svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet nejaky
dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
aplikace samozrejme nema. Nevite nekdo jak to vyresit ?

predem diky


servisn� aplikace

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.2.2000 08:14:56

>Ahoj
>pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou
aplikaci.
>Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze
mit
>svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet
nejaky
>dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
>aplikace samozrejme nema. Nevite nekdo jak to vyresit ?
>


obycejny service samozrejme muze mit sve vlastni okno (pro prijem zprav).

Problemy vznikaji teprve kdyz ma byt to okno videt.

Zdravi
D. Toman


Barva pisma v ToolButton

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 18.2.2000 08:24:51

Ahoj vsichni,

mam jednoduchou otazku. Chtel bych vytvorit ToolBar s nekolika
Toolbuttony obsahujicimi ikonu a text, ale rad bych, aby kazdy z
tech buttonu mel jinou barvu fontu. Existuje zpusob, jak to udelat?
Mam D4 C/S.

Dik.
David


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 18.2.2000 08:27:43

aha no takze kdyz bude visible = false tak je to OK ?
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/freevideo/

----- P�vodn� zpr�va -----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 18. �nora 2000 8:14
P�edm�t: Re: servisn� aplikace


> >Ahoj
> >pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou
> aplikaci.
> >Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze
> mit
> >svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet
> nejaky
> >dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
> >aplikace samozrejme nema. Nevite nekdo jak to vyresit ?
> >
>
> obycejny service samozrejme muze mit sve vlastni okno (pro prijem zprav).
>
> Problemy vznikaji teprve kdyz ma byt to okno videt.
>
> Zdravi
> D. Toman
>
>
>

servisn� aplikace

[*] Lubos Hubka <hubka(zv)trenkwalder.sk> - 18.2.2000 08:28:07

> pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou aplikaci.
> Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze mit
> svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet nejaky
> dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
> aplikace samozrejme nema. Nevite nekdo jak to vyresit ?

Tiez som robil servisnu aplikaciu, ktora spustala ine programy. Mas vela
moznosti.
1) Mozes dat namiesto handle NULL
2) pouzijes ShellExecute
3) pouzijes CreateProcess
4) puzijes DOS prikazy spawn
Urcite som este na nejake zabudol...
--
\LH

servisn� aplikace

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 18.2.2000 08:53:47

Ak mas na mysli ShellExecute (nieco ako RunShell nepoznam) tak to mozes
volat aj takto:
ShellExecute(0, 'open', 'calc.exe', nil, nil, SW_RESTORE);
to znamena hwnd = 0. Doteraz som s takymto volanim nemal ziadne problemy.

----- Original Message -----
From: Milos Sula <crkstrobe(zv)geocities.com>
To: delphi konference <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 18, 2000 7:23 AM
Subject: servisn� aplikace


> Ahoj
> pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou
aplikaci.
> Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze
mit
> svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet
nejaky
> dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
> aplikace samozrejme nema. Nevite nekdo jak to vyresit ?
>
> predem diky
>
>

ADO 2.5

[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 18.2.2000 09:12:08

At 00:15 18.2.2000 +0100, you wrote:
>Nove MDAC 2.5 je uz k dispozicii na
><http://www.microsoft.com/ado>http://www.microsoft.com/ado

Nemuzu to zaboha stahnout
http://mssjus.www.conxion.com/download/dasdk/install/2.50.4403.12/w9xnt4/en-
us/mdac_typ.exe - mi proste nejde :(

nemate to nekdo uz v CZ/SK ?

hx

ToolBar a velikost tlacitek

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 18.2.2000 09:12:26

Ahoj,

nevim, jestli se mi podarilo odeslat minuly dotaz, tak se budu
mozna castecne opakovat.

Mam 2 problemy s toolbarem:

1) Chtel bych toolbar s toolbuttony vyplnenymi ikonou a textem,
pricemz text by mel mit v kazdem buttonu jinou barvu. V archivu
jsem nasel prispevek od tusim Petra Vonese, ktery popisoval, jak
barvu nastavit primo v canvasu; nevim, jak v D5, ale v D4, ktere
mam ja, Canvas neni ve tride TToolBar ani TToolButton pristupny,
identifikator Canvas neni definovan (to pise). Neexistuje nejaky jiny
zpusob, jak to zajistit?

2) Umistim na Form ToolBar, do nej par toolbuttonu a u nich rucne
nastavim velikost. Kdyz pak zapnu ShowCaptions, toolbuttony se
zmensi na nejmensi moznou velikost tak, aby cely obsah byl videt,
ale nejde jiz zpatky zvetsit. To si opravdu nemuzu ty tlacitka nejak
prizpusobit?
Chtel jsem Toolbarem nahradit dosud pouzivane SpeedButtony,
event. BitButtony kvuli uzirani zdroju, ale prave kvuli vyse
uvedenym problemum mi to neprijde jako idealni cesta.

David


W2000 a D5 & testy

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 18.2.2000 09:15:15

> > ...a taky mi neni jasne, nac muze byt dobry/nutny
> > programatorovi k PROGRAMOVANI vykon AGP 4x
> >
>
> No kdyz se mi nedari program, tak se jdu odreagovat do Quake III
> a predstavuji si, ze ty priserky jsou zakaznici :)))
>
> Ne vazne. Kolega napr. programuje graficky vysoce narocne projekty
> a take kazdy pocitac nemusi byt vyuzit jen na programovani.
>
> Jaro

...a to pak vsichni nadavame, ze se ten software na
prumernych (=ne spickovych hi-tech) strojich neda prakticky
pro jejich narocnost provozovat :-)))

Asi by i Windows vypadaly jinak, (mene paradicek
a vice funkcnosti) kdyby jejich programatori
povinne programovali a testovali na te MS
_minimalni konfiguraci_ ;-)
Prestoze je tohle asi obecny problem temer veskereho
softwaru, uz bychom asi tehle diskuse meli nechat,
aspon tady...

-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


servisn� aplikace

[*] Kalivoda Jozef <KaliJ(zv)spas.sk> - 18.2.2000 09:46:57

skus to cez ShellExecute

Inak tento sposob execute je v samples ktore ma D4 , D5 ma vsak jednu
nevihodu neda sa vytvoreny proces nijak dalej kontrolovat... apon som na to
zatial nerisiel...

-----Original Message-----
From: Milos Sula [mailto:crkstrobe(zv)geocities.com]
Sent: Friday, February 18, 2000 7:24 AM
To: delphi konference
Subject: servisn� aplikace


Ahoj
pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou aplikaci.
Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze mit
svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet nejaky
dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
aplikace samozrejme nema. Nevite nekdo jak to vyresit ?

predem diky


TDateTimePicker ako TDBEdit

[*] Ad�mi Jaromil <adami(zv)axa.sk> - 18.2.2000 09:51:13

Ahoj!
Mam problem, ktory bude asi pre vacsinu dost trivialny.
Mam formular, na ktorom mam komponenty TDBGrid a TDateTimePicker a chcem
aby mi to fungovalo ako TDBEdit. Skusal som na udalost onchange komponenty
TDateTimePicker priradit do aktivneho riadku hodnotu TDateTimePicker->Date,
problem je vsak v tom, ze pri zistovani aktivneho riadku pomocou RecNo mi
vzdy
vyhodi cislo riadku -1.Neviem ci idem na to zo spravneho konca.
Mohol by ma niekto postricit dalej.
***************************************************
Jaromil Adami
adami(zv)axa.sk
***************************************************

Sitova databaze

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 18.2.2000 09:56:51

Reseni
- komponenta FFSQLExtension free
- txQuery (nebo tak nejak) 50$ (dela SQL na klientovi ale umi toho hodne)
- pockat na verzi 2, kde bude SQL implementovano.

Pavel

----- Original Message -----
From: Martin Lasevic <vyvoj(zv)atlascon(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, February 17, 2000 10:14 PM
Subject: RE: Sitova databaze


> Co takhle FlashFiller a SQL dotaz??:-)))
>
> P�kny den a pilotum mnoho stastnych pristani...
> ====================================

servisn� aplikace

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.2.2000 10:08:03

>aha no takze kdyz bude visible = false tak je to OK ?


no, ja bych v service v zadnem pripade nepouzival VCL -prvni co bych udelal
je vyhodit FORM unit z projektu :-) takze okno je treba vytvorit pomoci
WinAPI (RegisterClass, CreateWindow,...)

Zdravi
D. Toman

RDS, ModifiedOnly, Adonis

[*] Erik Salaj <winsoft(zv)napri.sk> - 18.2.2000 10:12:39

MarshalOptions sa aplikuje iba na klientsky recordset a tento recordset
musi byt otvoreny.

Erik Salaj

----- Original Message -----
From: "Ladislav Nagy" <lnag7384(zv)mail.kolej.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, February 17, 2000 10:00 PM
Subject: Re: RDS, ModifiedOnly, Adonis


> Ahoj
> zjistili jsme, ze nastaveni MarshalOptions := cModifiedOnly v Adonisovske
> ADOQuery nestaci,
> museli jsme si tuto vlastnost nastavit o vrstvu niz (RecordSet as
> ADO.RecordSet).MarshalOptions := cModifiedOnly.
> Znamena to, ze nektere property Adonisovskych komponent (MyADODataSet) pri
> nastaveni RecordSetu zpusobem MyADODataSet.ADORecordSet := MyADORecordSet
> nefunguji ?
>
> S pozdravem, Ladislav Nagy


try except end

[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 18.2.2000 10:13:59



Ahoj,

v delphi pouzivam konstrukci try except end pro odchytavani pripadnych chyb
pri StrToInt ale ted bych chtel neco podobneho napsat v C++ Builderu.
Objevil jsem tam try catch a trow ale totalne nechapu jak se to pouziva. Jak
teda jednoduse prevest try except end do C++ Builderu ?

M.

ToolBar a velikost tlacitek

[*] Michal Kop��ek - 18.2.2000 10:31:50

doporucuji komponentu RX.

Je tam asi 60-70 komponent SUPER vyu�iteln� a mimo jin� toolbar se speed
buttony a jde zde nastvit vskutku v�echno na co si vzpomene� vc. skupin
talc�tek aj.

************************************
Michal Kop�cek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Lebeda
Sent: Friday, February 18, 2000 9:12 AM
To: delphi-l(zv)fwd(tec)cz
Subject: ToolBar a velikost tlacitek


Ahoj,

nevim, jestli se mi podarilo odeslat minuly dotaz, tak se budu
mozna castecne opakovat.

Mam 2 problemy s toolbarem:

1) Chtel bych toolbar s toolbuttony vyplnenymi ikonou a textem,
pricemz text by mel mit v kazdem buttonu jinou barvu. V archivu
jsem nasel prispevek od tusim Petra Vonese, ktery popisoval, jak
barvu nastavit primo v canvasu; nevim, jak v D5, ale v D4, ktere
mam ja, Canvas neni ve tride TToolBar ani TToolButton pristupny,
identifikator Canvas neni definovan (to pise). Neexistuje nejaky jiny
zpusob, jak to zajistit?

2) Umistim na Form ToolBar, do nej par toolbuttonu a u nich rucne
nastavim velikost. Kdyz pak zapnu ShowCaptions, toolbuttony se
zmensi na nejmensi moznou velikost tak, aby cely obsah byl videt,
ale nejde jiz zpatky zvetsit. To si opravdu nemuzu ty tlacitka nejak
prizpusobit?
Chtel jsem Toolbarem nahradit dosud pouzivane SpeedButtony,
event. BitButtony kvuli uzirani zdroju, ale prave kvuli vyse
uvedenym problemum mi to neprijde jako idealni cesta.

David


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virov� b�ze: 58 - datum vyd�n�: 31.1.2000

Ikony v exaci

[*] Lubos Hubka <hubka(zv)trenkwalder.sk> - 18.2.2000 10:34:44

> Mam tento problem: Udelal jsem si programek, ktery mi v tasbaru ukaze ikonku
> s cislem dne v mesici. Bohuzel nevim, jak ty ikonky nacpat do toho exace a
> mam je v externim adresari. Nevite nekdo, jak je do toho souboru dostat a
> jak je pak volat?

To sa uz v konferencii preberalo, pozri sa do archivu konferencie
www.delphi(tec)cz, alebo www.serge(tec)cz
--
\LH

TDateTimePicker ako TDBEdit

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 18.2.2000 10:45:41

Jakou mas databazi? Pokud vim ze svych zkusenosti, tak RecNo mi spolehlive
vraci pouze PARADOX ( ani IB, ani MSAccess mi to nevraceji a taky stale
pisou -1).

Jinak mame napsanou primo komponentu TDBDateTimePicker, takze Ti ji muzu
poslat.

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

> -----P�vodn� zpr�va-----
> Od: Ad�mi Jaromil [SMTP:adami(zv)axa.sk]
> Odesl�no: 18. �nora 2000 9:51
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: TDateTimePicker ako TDBEdit
>
> Ahoj!
> Mam problem, ktory bude asi pre vacsinu dost trivialny.
> Mam formular, na ktorom mam komponenty TDBGrid a TDateTimePicker a chcem
> aby mi to fungovalo ako TDBEdit. Skusal som na udalost onchange
komponenty
> TDateTimePicker priradit do aktivneho riadku hodnotu
TDateTimePicker->Date,
> problem je vsak v tom, ze pri zistovani aktivneho riadku pomocou RecNo mi
> vzdy
> vyhodi cislo riadku -1.Neviem ci idem na to zo spravneho konca.
> Mohol by ma niekto postricit dalej.
> ***************************************************
> Jaromil Adami
> adami(zv)axa.sk
> ***************************************************
>
>

Sitova databaze

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 18.2.2000 10:46:06

Jasne.

> -----P�vodn� zpr�va-----
> Od: Pavel Medek [SMTP:Pavel.Medek(zv)talema(tec)cz]
> Odesl�no: 18. �nora 2000 9:57
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Sitova databaze
>
> Reseni
> - komponenta FFSQLExtension free
> - txQuery (nebo tak nejak) 50$ (dela SQL na klientovi ale umi toho hodne)
> - pockat na verzi 2, kde bude SQL implementovano.
>
> Pavel
>
> ----- Original Message -----
> From: Martin Lasevic <vyvoj(zv)atlascon(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, February 17, 2000 10:14 PM
> Subject: RE: Sitova databaze
>
>
> > Co takhle FlashFiller a SQL dotaz??:-)))
> >
> > P�kny den a pilotum mnoho stastnych pristani...
> > ====================================
>
>
>
>
>

None

[*] Michal Kus <kus(zv)tangosw(tec)cz> - 18.2.2000 10:53:40

Dej zakaznikovi novou verzi, lehce nekomapatibilni se starou verzi
a s ni dodej i hardwarovy klic. Ten sice stiji nejake penize,
ale je to jednoduchy a dost spolehlivy.

My je pouzivame a jsme spokojeni.

Michal Kus


> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of petr.palicka(zv)atlas(tec)cz
> Sent: Tuesday, February 15, 2000 8:03 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject:
>
>
> zdravim
>
> nemate nekdo nahodou skusenosti s ochranou proti nelegalnimu
> pouzivani sw
> myslim tim, aby sel sw nainstalovat je z original diskety /
> cd. pripadne na jeden poc, nebo aby se hlidal po siti.
> mam podezreni, ze jden nas zakaznik ma sw nainstalovany
> dvakrat pro ruzna strediska sve firmy
>
> dekuji za pripadne podnety
>
>
>

TDateTimePicker ako TDBEdit

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 18.2.2000 11:15:38

> Mam problem, ktory bude asi pre vacsinu dost trivialny.
> Mam formular, na ktorom mam komponenty TDBGrid a TDateTimePicker a chcem
> aby mi to fungovalo ako TDBEdit. Skusal som na udalost onchange komponenty
> TDateTimePicker priradit do aktivneho riadku hodnotu TDateTimePicker->Date,
> problem je vsak v tom, ze pri zistovani aktivneho riadku pomocou RecNo mi
> vzdy
> vyhodi cislo riadku -1.Neviem ci idem na to zo spravneho konca.
> Mohol by ma niekto postricit dalej.

Nevim, jestli tomu dobre rozumim, ale nezda se mi, ze by bylo
treba RecNo zjistovat. Ono totiz stejne v TTable nebo TQuery
nefunguje. Prislusna funkce vraci -1 a v helpu se pise, ze je treba ji
predefinovat.
Pro zapsani hodnoty do aktualniho radku ale prece staci jen
tokoveho:
Table1.Edit;
Table1.FieldByName('Datum').AsDateTime
:=DateTimePicker1.Date;
Table1.Post;

protoze table je nastavena prave na ten radek, ktery je vybran v
gridu.

Mimoto se da na www.torry.ru stahnout i TDBDateTimePicker,
ktery by mel fungovat jako ten obycejny, ale opreny o databazi,
pripadne v RxLib je tusim neco podobneho.

David


Zjisteni instalace MS Excel

[*] Ale� Va���ek�����"q��y�&���w�3 - 18.2.2000 11:33:35

Zdravim,

potraboval bych vedet, jak zjistim, ze je na pocitaci nainstalovany MS
Excel.

Dik, Ales


ADO 2.5

[*] Kalivoda Jozef <KaliJ(zv)spas.sk> - 18.2.2000 11:58:32

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.

skus


<http://download.microsoft.com/download/dasdk/install/2.50.4403.12/W9xNT4/EN
-US/mdac typ.exe>
http://download.microsoft.com/download/dasdk/install/2.50.4403.12/W9xNT4/EN-
US/mdac typ.exe

ani to mi sice neslo ale mozno mam blby konect na net...

-----Original Message-----
From: Radoslav Krehl�k [mailto:heretic(zv)softok(tec)cz]
Sent: Friday, February 18, 2000 9:12 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: ADO 2.5


At 00:15 18.2.2000 +0100, you wrote:


Nove MDAC 2.5 je uz k dispozicii na http://www.microsoft.com/ado
<http://www.microsoft.com/ado>


Nemuzu to zaboha stahnout
http://mssjus.www.conxion.com/download/dasdk/install/2.50.4403.12/w9xnt4/en-
us/mdac typ.exe
<http://mssjus.www.conxion.com/download/dasdk/install/2.50.4403.12/w9xnt4/en
-us/mdac typ.exe> - mi proste nejde :(

nemate to nekdo uz v CZ/SK ?

hx

TDateTimePicker ako TDBEdit

[*] Ad�mi Jaromil <adami(zv)axa.sk> - 18.2.2000 12:19:07

Tu databazu mam v MSAccess. Ale ako potom v nej zistit cislo aktivneho
riadku?
***************************************************
Jaromil Adami
adami(zv)axa.sk
***************************************************


-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Martin Lasevic
Odesl�no: 18. febru�r 2000 10:46
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: TDateTimePicker ako TDBEdit


Jakou mas databazi? Pokud vim ze svych zkusenosti, tak RecNo mi spolehlive
vraci pouze PARADOX ( ani IB, ani MSAccess mi to nevraceji a taky stale
pisou -1).

Jinak mame napsanou primo komponentu TDBDateTimePicker, takze Ti ji muzu
poslat.

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

> -----P�vodn� zpr�va-----
> Od: Ad�mi Jaromil [SMTP:adami(zv)axa.sk]
> Odesl�no: 18. �nora 2000 9:51
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: TDateTimePicker ako TDBEdit
>
> Ahoj!
> Mam problem, ktory bude asi pre vacsinu dost trivialny.
> Mam formular, na ktorom mam komponenty TDBGrid a TDateTimePicker a chcem
> aby mi to fungovalo ako TDBEdit. Skusal som na udalost onchange
komponenty
> TDateTimePicker priradit do aktivneho riadku hodnotu
TDateTimePicker->Date,
> problem je vsak v tom, ze pri zistovani aktivneho riadku pomocou RecNo mi
> vzdy
> vyhodi cislo riadku -1.Neviem ci idem na to zo spravneho konca.
> Mohol by ma niekto postricit dalej.
> ***************************************************
> Jaromil Adami
> adami(zv)axa.sk
> ***************************************************
>
>

Access a OleDB Delphree komponenty

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 18.2.2000 12:30:48

On 17 Feb 00, at 19:51, Lukas Voborsky wrote:

> nejak se mi nedari pripojit pres OleDB komponenty z Delphree pripojit
> na Accessovskou databazi. Je vubec mozne se na ni pripojit? Provider
> nastavim na "Microsoft.Jet.OLEDB.4.0", nastavim UserID, Password. Kdyz
> kliknu na property Database, tak v dialogu nastavim

Access jsem nezkousel, takze nevim, kde muze byt zadrhel. Navic
ted nemam zadny cas se tomu venovat - uz dlouho take nebyla
zadna nova verze. Rozchodil jsem to (se zarukou) zatim pouze pro
MS SQL 7, a to jeste bez blobu.

> DataSource: datab.mdb
> UserName: Admin
> Password:
> Provider string: Provider=Microsoft.Jet.OLEDB.4.0;Data
> Source=datab.mdb Open mode: DB_MODE_READWRITE
>
> Dostanu Error: Authentication failed: Initialize - InitDatabaseList.

Prislusne property plnis rucne, nebo provider vybiras ze seznamu?
Tedy, jestli prislusny provider mas vubec k dispozici? Ale
predpokladam, ze mas.

Pada ti to v TConnect.InitDatabaseList a je evidentni, ze je chyba v
nastaveni nejake property (OLE DB). Sice mi neni jasne, kde jsi
vystrachal Open mode, ale zkus postupne nasledujici:

Uved plnou cestu k databazi.
Nastav primo property v komponente TDFOdbConnect v tomto
poradi: Provider, Server (je-li), UserID, Password (je-li) a Database
(plnou cestu).
Zkus sahnout do jmenovane metody a vnutit mu natvrdo
I2:=DBPROMPT_COMPLETE;

Pokud nic nepomuze, odkrokuj si jmenovanou metodu a napis mi
cislo chyby "h" z tohoto volani:
h := DBInit.Initialize;


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 18.2.2000 12:34:17

nemas nahodou nejakej example pro CreateWindow a jak potom pouzivat prijem
messages ? Je to stejne jako u TFormu ?

jo ta funkce byla samozrejme shellexecute ne runshell (domichal jsem to s
necim jinym, po ranu jsem byl jeste ospalej)
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/freevideo/

----- P�vodn� zpr�va -----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 18. �nora 2000 10:08
P�edm�t: Re: servisn� aplikace


> >aha no takze kdyz bude visible = false tak je to OK ?
>
> no, ja bych v service v zadnem pripade nepouzival VCL -prvni co bych
udelal
> je vyhodit FORM unit z projektu :-) takze okno je treba vytvorit pomoci
> WinAPI (RegisterClass, CreateWindow,...)
>
> Zdravi
> D. Toman
>
>

Sitova databaze II

[*] Milan Kotaska <mkotaska(zv)atlas(tec)cz> - 18.2.2000 12:47:25

Ahoj.
Moje aplikace bezi na vicero pocitacich v siti peer-to-peer a sdili data,
ktera jsou nasdilena na jednom z nich (db Paradox).
Dejme tomu, ze na jedne stanici mam v DBGridu zobrazena data, ktera jsou
vysledkem TQuery - prikaz SELECT.
Na druhem pocitaci si uzivatel chce prohlednout stejnym zpusobem stejna
data - stejny prikaz SELECT.
Jak zajistit, aby uzivatel na druhem pocitaci nemohl zobrazena data editovat
?
Co se stane v pripade, ze provedu zamek tabulky na jednom pocitaci a ten v
prubehu tohoto zamku spadne ?

Diky za kazdy namet.


Milan Kotaska
mkotaska(zv)atlas(tec)cz

ToolBar a velikost tlacitek

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 18.2.2000 13:16:45

> doporucuji komponentu RX.
>
> Je tam asi 60-70 komponent SUPER vyu iteln� a mimo jin� toolbar se speed
> buttony a jde zde nastvit vskutku v echno na co si vzpomene vc. skupin
> talc�tek aj.
>

To jo, ale ja se chci vyhnout Speedbuttonum, protoze komponenty
majici Glyph uziraji resources. Proto me nezajimaji veci, ktere
vypadaji jako TToolBar, ale ktere jsou bud primo potomky
TToolBar, nebo trebas nemaji s TToolBarem nic spolecneho, ale
NEPOUZIVAJI Glyph (tj. nepripada v uvahu BitBtn ani
SPeedButton).

Nebo toolbar z RxLib neni postaven na pouzivani Glyph? Zatim
jsem to nehledal.

David


Zjisteni instalace MS Excel

[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 18.2.2000 14:57:12

Ja bych treba v registrech testoval existenci klice
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App
Paths\Excel.exe
a jeste pripadne zda soubor na ktery ukazuje skutecne existuje.

S pozdravem

Ing. Pavel Kriz


TDS - Technicky a databazovy software
Praha 8, Palaskova 1107/2
tel./fax: 02/ 6891 444
mobil: 0603/ 145613
http://www.tds-technik(tec)cz

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ale� Va���ek
Sent: Friday, February 18, 2000 11:34 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Zjisteni instalace MS Excel


Zdravim,

potraboval bych vedet, jak zjistim, ze je na pocitaci nainstalovany MS
Excel.

Dik, Ales

Chybove hlaseni Out of resources

[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 18.2.2000 15:03:35

Pri vytvareni Bitmapy mi vyskakuje chyba out of resources. Jakym zpusobem je muzu zvetsit?
Je to problem Delphi nebo WIN?


PROSOFT Kromeriz s.r.o.
Soudni 1293
KROMERIZ 767 01
Czech Republic
tel/fax 0420 (0)634 333545
GSM: 0420 (0)602 305919
GSM 0420 (0)602 305920
e-mail: prosoft(zv)prosoft(tec)cz
ICQ:49532930


Chybove hlaseni Out of resources

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 18.2.2000 15:48:57

Bohuzial, :-)) to nejde.vo Windows mas resources obmedezne!!!
Mozes ale lepsie napisat aplikaciu tak aby nezrala tolko resourcu!!!

Pavol Kaka�ka
paka(zv)aktis(tec)cz
Pri vytvareni Bitmapy mi vyskakuje chyba out of resources. Jakym zpusobem je muzu zvetsit?
Je to problem Delphi nebo WIN?

Ikony v exaci

[*] Lubos Hubka <hubka(zv)trenkwalder.sk> - 18.2.2000 16:36:47

> prosim ta ak to v tom archive najdes, daj vediet, mam rovnaky problem a este
> by som rad do toho exaca dostal aj obrazky, co uz obec neviem ako...

O.K.
Tak nieco napisem. Ale ja pouzivam CB, takze si to musite prelozit do
Pascalovciny.
A robil som to len pre AVI, takze si musite zistit klucove slova pre ikony a pre
obrazky.
Takzto z hlavy si myslim ze to bude ICO pre ikony a BMP pre obrazky vo formate
BMP, ale treba si to overit.
Postup:
1) Nakopcim si vsetky obrazky a ikony do zvoleneho adresara
2) Vytvorim si subor MOJ.RC v tom istom adresary.
3) do suboru MOJ.RC napisem: logo AVI "logo.avi", kde prve slovo (logo) je meno,
ktorym budem dane avi volat v programe.
druhe slovo je klucove slovo pre typ resourcu (v mojom pripade AVI) a
posledne slovo je nazov suboru (musi byt v uvodzovkach).
Takze pre vsetky resourcy co potrebujem si urobim do noveho riadku takyto
zaznam.
A som hotovy!
4) CB vie pouzivat aj format RC, ak to delphi nevie, da sa RC subor
prekompilovat do RES suboru pomocou brcc32.exe.
5) natiahnem si moj RC/RES subor do programu: USERC("MOJ.RC") alebo
USERES("MOJ.RES").
!!! Musim to natiahnut v projektovom zdrojaku, teda nie v nejakom formulary
!!!
6) Pouzivam natiahnute resourcy: (pre moj pripad)
Animate1->ResName="logo";
Animate1->Active = True; Obrazky sa daju natiahnut aj do ImageListu a tak pouzivat. Vtedy sa automaticky
doplnia do
default res suboru.
--
\LH

PChar('') <> nil? Takova skolska otazka

[*] Karel Kral <kral(zv)purus(tec)cz> - 18.2.2000 17:59:26

Ahoj,
Clovek by rekl, ze PChar('') je to same jako nil, ale zrejme neni.

Pouzivam tuto funkci na hledani okna v jakemsi planovaci:
Exist:= FindWindow(PChar(SchedItem.FindWndClass),
PChar(SchedItem.FindWndTitle)) <> 0;

Kde SchedItem.FindWndClass a SchedItem.FindWndTitle jsou properties typu
string.
Kdyz je SchedItem.FindWndClass = '', pak se mi okno nenajde, kdyz misto
toho pouziji v parametru nil, pak ano. Neni mi moc jasne, jak tohle
pretypovani u properties funguje.

Samozrejme umim napsat if then else... aby to fungovalo i s prazdnym
retezcem nebo si long string zkopirovat do PChar, ale jde mi o princip a
elegantni reseni

Diky za radu.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


Btrieve

[*] Matula M <asexrm(zv)telecom(tec)cz> - 18.2.2000 18:06:12

> To BDE by mi vubec nevadilo, potrebuju totiz jenom pretahnout data na SQL
> server, cili BDE a Delphi nechci mit nic spolecneho ...

Pokud tomu dobre rozumim, tak mas data v betrievu a chces je soupnout nekam
jinam.

1. DOS aplikace bez DDF souboru(tam je popis struktury dat). Udelas program,
ktery cte datovy file record po recordu. Data ulozis do recordu napr.
xx=record
ID:integer;
jmeno:string[20];
end;
a pak je ukladas kam chces.

2.Mas DDF soubory. pak pracujes s SQL.

Betriev si muzes stahnout z www.pervasive.com pro stanici zdarma. Jinak to
same je na CD Softwarove noviny 9/99. Engin SQL pro stanici a SDK. S touto
vybavou svouj problem urcite vyresis. Aspon me to stacilo. (Je tam Engin,
ODBC, OLE DB, interface pro primy pristup k datum, Nastroj pro definici DDF,
ActiveX pro manipulaci s daty, vcetne generovani DDF )


Mirek

Sitova databaze

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.2.2000 19:07:01

Nejlepsi reseni bude podle me pockat na verzi 2

----- Original Message -----
From: Martin Lasevic <vyvoj(zv)atlascon(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, February 17, 2000 10:14 PM
Subject: RE: Sitova databaze


Co takhle FlashFiller a SQL dotaz??:-)))

Zostavy Sinea - strankovanie

[*] Radovan Popovi� <mksoft(zv)po.psg.sk> - 18.2.2000 19:15:13

Toto je v�ced�ln� zpr�va form�tu MIME.

Ahoj

Pri pouziti generatora zostav Sinea (3.39q 12.2.2000) mam tento problem:
- master zostava obsahuje oddiel telo zostavy - v nom je niekolko poloziek,
detail zostava a opat niekolko poloziek
- detail obsahuje telo zostavy a koniec zostavy
Kde sa da nastavit, aby cely master zaznam bol na jednej strane? Nechcem
vsak kazdy zaznam na samostatnu stranu.
(teraz mi to odstrankuje hocikde v strede detailu, prip. polozky umiestnene
za detailom presunie na dalsiu stranu)

Rado

Ikony v exaci

[*] Zak Robert <nrsys(zv)psn.sk> - 18.2.2000 21:05:28

prosim ta ak to v tom archive najdes, daj vediet, mam rovnaky problem a este
by som rad do toho exaca dostal aj obrazky, co uz obec neviem ako...


Dik

Robo
-----P�vodn� spr�va-----
Od: Lubos Hubka <hubka(zv)trenkwalder.sk>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 18. febru�r 2000 11:16
Predmet: Re: Ikony v exaci


>> Mam tento problem: Udelal jsem si programek, ktery mi v tasbaru ukaze
ikonku
>> s cislem dne v mesici. Bohuzel nevim, jak ty ikonky nacpat do toho exace
a
>> mam je v externim adresari. Nevite nekdo, jak je do toho souboru dostat a
>> jak je pak volat?
>
>To sa uz v konferencii preberalo, pozri sa do archivu konferencie
>www.delphi(tec)cz, alebo www.serge(tec)cz
>--
>\LH
>

Zostavy Sinea - strankovanie

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 18.2.2000 21:06:24

From: Radovan Popovi�

> Ahoj
>
> Pri pouziti generatora zostav Sinea (3.39q 12.2.2000) mam tento problem:
> - master zostava obsahuje oddiel telo zostavy - v nom je niekolko
poloziek,
> detail zostava a opat niekolko poloziek
> - detail obsahuje telo zostavy a koniec zostavy
> Kde sa da nastavit, aby cely master zaznam bol na jednej strane?
> Nechcem vsak kazdy zaznam na samostatnu stranu.
> (teraz mi to odstrankuje hocikde v strede detailu, prip. polozky
> umiestnene za detailom presunie na dalsiu stranu)
>
> Rado

Neni mozne zajistit, aby byl cely master zaznam na jedne strane,
pokud se nevi, jak je dlouhy detail sestavy.

Jestli jsem to spravne pochopil.
Jedna se asi o to, aby se master zaznam zacinal na nove strance,
pokud se cely vcetne detailu nevejde na zbytek stranky.
Toto ale u jednopruchodoveho generatoru (jakym je SINEA)
zajistit nelze, protoze v okamziku tisku prvni casti master zaznamu
jeste neni znamo, jak dlouhy bude detail. Strankuje se az tehdy,
pokud se na zbytek stranky nevejde cele jedno telo detailu,
nebo zbytek master tela pod detailem.

Jedine co lze nastavit je to, aby na nove strance zacinalo
kazde telo master sestavy.

Vaclav Krmela

ADO a skripty

[*] Zak Robert <nrsys(zv)psn.sk> - 18.2.2000 21:53:55

Dobry den,

1. Pouzivam ADOEXPRES, D5 a MSSQL7. Pokial pouzijem komponentu
TADODataSet, neviem ako v nej spustim prikaz ktory nema navratovu hodnotu.
Aka je u tejto komponenty obdoba ADOQuery.ExecSQL? Alebo to neexistuje?

2. Ako poslat takyto skript s vysledkom? :
DECLARE (zv)A CHAR(20)
SET (zv)A=1
DELETE FROM TAB1
select 'VYSLEDOK JE',(zv)A

Ten select mi vrati vysledok iba v pripade, ze vyhodim riadok "DELETE FROM
TAB1", inak dostanem hlasku: "Commandtext does not return a result set".
Skript, aj viacriadkovy prebehne vporiadku, iba nedostanem ten vysledok.
Chcem sa preto spytat, ako je mozne zapisat skript tak, aby som po vykonani
viacerych prikazov (insert,delete ...) dostal aj nejaky vysledok v podobe
select-u!?
Rovnaky problem mam aj u vlozenych procedur...

3. V knizke MSSQL7 som na viacerych miestach videl pouzity prikaz PRINT. On
funguje, dokonca aj vypise hodnotu, ale iba pokial pouzivam Query Analyzer
(mimochodom cez ten prejde aj dany skript s vysledkami).
Da sa nejak tento prikaz pouzit aj pomocou ADO?.. teda dostanem sa nejak k
vypisu toho PRINT-u a vobec k vypisom posielanym servrom?

Mozno sa pytam na veci ktore su vseobecne zname, ale ked oni v tych knizkach
fakt nie su!
Dakujem

Robo


ADO a skripty

[*] Tom� Br�dle������i�^����? - 18.2.2000 23:52:07

Zdravim,

vyzkouseno na MS SQL 7, provider SQLOLEDB.

-----P�vodn� zpr�va-----
Od: Zak Robert <nrsys(zv)psn.sk>>1. Pouzivam ADOEXPRES, D5 a MSSQL7. Pokial pouzijem komponentu
>TADODataSet, neviem ako v nej spustim prikaz ktory nema navratovu hodnotu.
>Aka je u tejto komponenty obdoba ADOQuery.ExecSQL? Alebo to neexistuje?


a) komponentu TADOCommand
b) metodu TADOConnection.execute - tady odzkouseno na delsim skriptu i
stransakcemi

>2. Ako poslat takyto skript s vysledkom? :
>DECLARE (zv)A CHAR(20)
>SET (zv)A=1
>DELETE FROM TAB1
>select 'VYSLEDOK JE',(zv)A
>
>Ten select mi vrati vysledok iba v pripade, ze vyhodim riadok "DELETE FROM
>TAB1", inak dostanem hlasku: "Commandtext does not return a result set".
>Skript, aj viacriadkovy prebehne vporiadku, iba nedostanem ten vysledok.
>Chcem sa preto spytat, ako je mozne zapisat skript tak, aby som po vykonani
>viacerych prikazov (insert,delete ...) dostal aj nejaky vysledok v podobe
>select-u!?
>Rovnaky problem mam aj u vlozenych procedur...


TADODataSet - vyzkouseno i na delsi skripty i declare, transakce apod.
pokud das CommandType:=cmdStoredProc tak to muzes pouzit i na
ulozenou proceduru

>3. V knizke MSSQL7 som na viacerych miestach videl pouzity prikaz PRINT. On
>funguje, dokonca aj vypise hodnotu, ale iba pokial pouzivam Query Analyzer
>(mimochodom cez ten prejde aj dany skript s vysledkami).
>Da sa nejak tento prikaz pouzit aj pomocou ADO?.. teda dostanem sa nejak k
>vypisu toho PRINT-u a vobec k vypisom posielanym servrom?


s tim jsem se jeste nesetkal

============================================================
pro nazornost ukazka - je to vysek z pouzivaneho programu,
ale snad se v tom vyznas

procedure TCTSourceObj.ExecCommand(ACmd: string; AParams: array of const);
var
cmd: string;
begin
cmd:=format(ACmd, AParams);
with TADOCommand.Create(nil) do
try
Connection:=FDataEnv.ConnObjSQL;
CommandText:=cmd;
Execute;
finally
free;
end; {try}
end;

function TCTSourceObj.GetRecordset(ACmd: string; AParams: array of const):
TADODataSet;
var
cmd: string;
begin
cmd:=format(ACmd, AParams);
result:=TADODataSet.Create(nil);
try
result.Connection:=FDataEnv.ConnObjSQL;
result.CommandText:=cmd;
result.CacheSize:=40;
result.Open;
except
result:=nil;
end; {try}
end;


Tomas
t.bradle(zv)pvtnet(tec)cz

XML -> DataSet

[*] Pavel Tomes <tomes(zv)pal.skm.vutbr(tec)cz> - 19.2.2000 00:40:45

Zdravim vsechny,
mam problem -chtel bych z dat ulozenych v DataSetu (napr. TTable)
vygenerovat XML soubor a pak zpetne z tohoto souboru naplnit DataSet. Nezna
nekdo jednoduchy zpusob jak na to?

DBGridSinea versus TIB... componenty

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 19.2.2000 03:49:28

Ako vyfiltrujem riadky oznacene CheckRow na TDBGridSinea ?

Hi. Roland Turcan.

DBgrid a shift

[*] J�n Tungli - 19.2.2000 10:31:20

Dnes dam na svoju stanku komponentu MXDBGrid - ktory dokaze to co zrovna
chces a este nieco naviac ale pracuje iba s Query.

J�n TUNGLI , Datapac. s.r.o.
Email: tungli(zv)datapac.sk
office tel: 07/ 554 103 84
URL: http://free.netlap.hu/4321


----- Original Message -----
From: Martin Koller <koller(zv)gema(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 22, 2000 2:57 PM
Subject: DBgrid a shift


> Ahoj
>
> Potreboval bych napsat aby v DBgridu slo selectovat pomoci mysi a shiftu
> (jako klasicky ve Windows) a aby se pri dragovani s stisknutim shiftem
> tento grid neodselectoval. Dragovani obsluhuji sam.
> Dekuji za pomoc.
>
> Marty


Vytrvale menu

[*] Ondrej Jaura <jaura(zv)datalock.sk> - 19.2.2000 13:25:29

Zdravim :)

Nahlas premyslam nad menu, ktore by sa aj po zvoleni polozky zostavalo
zobrazene.
Nasledne sa zobrazi potomok TForm, pricom menu zostava stale viditelne a po
zatvoreni potomka moze zmiznut i menu.

Mate napad?

Vopred dakujem za zachranne kolesa

Ondrej

[ Ondrej Jaura ] [ jaura(zv)datalock.sk ] [ Datalock a.s. ] [ :) ]

MojMaskEdit nejde a nejde

[*] Ondrej Jaura <jaura(zv)datalock.sk> - 19.2.2000 17:50:57

Zdravim :) Upravil som mask.pas (TMaskEdit) na obraz svoj - teda je z toho uplne
novy subor mojmask.pas (TMojMaskEdit).
Kedze komponentu treba registrovat, pridal som procedure Register a ona
komponentu zaregistrovala - potialto vsetko funguje...
ALE kedze som neregistroval ProperyEditor, pri design-mode mi pri zmene
propery EditMask nevyhodilo pekne okienko, v ktorom sa nastavuje maska
(specialne na to urcene). Nuz som pridal:
RegisterPropertyEditor(TypeInfo(string), TMojMaskEdit, 'EditMask',
TMaskProperty);
To si vsak vyzaduje dva zapisy do uses:
dsgnintf (/Source/Toolsapi) pre TypeInfo
maskprop (???) pre TMaskPropery
A pri maskprop nastava PROBLEM, pretoze maskprop NIKDE v tvare
maskprop.dcu (toboz nie pas) NEEXISTUJE, co pri kompilovani komponenty
TMojMaskEdit nie je nutne (je to v generated package dclstd50.bpl, staci to
hodit do required), ALE je to problem pri kompilovani aplikacie, ktora
pouziva komponentu TMojMaskEdit, kedy Delphi tvdrohlavo po mne ziadaju
maskprop.dcu...

WO CO GO?

Vopred dakujem za zachranne kolesa a vesty


Ondrej
(Delphi 5 Prof)

[ Ondrej Jaura ] [ jaura(zv)datalock.sk ] [ Datalock a.s. ] [ :) ]

Zamky a editace podruhe

[*] novacek(zv)vanicek(tec)cz - 19.2.2000 17:49:04

Zdar a silu vsem!

Vas zajem o me dilko me potesil a trochu i prekvapil, takze zminena
komponenta je k dispozici na internetu na adrese
http://mujweb(tec)cz/web/vanicek/delphi/tbllckv1.zip
Muzete si ji odtamtud stahnout.

Zaroven uvitam Vase namety na vylepseni, reseni chyb, apod.

V reakci na Vase dopisy pripojuji nekolik odpovedi:

> Jestli tomu tedy dobre rozumim, tak metoda Edit zamkne CELOU
> tabulku? Ja myslel, ze jenom zaznam? A tyka se to vsech databazi
> pristupovanych pres BDE nebo jenom nekterych? Jak je na tom Paradox?
Metoda Edit zamyka samozrejme jen jeden aktualni zaznam tabulky.
Omlouvam se za trochu zavadejici formulaci meho dopisu "Zamky a
editace", kde jsem psal ...zamkne tabulku..., ale samozrejme jsem mel
na mysli ...zamkne dany zaznam tabulky...

> Kdy se vyhodi zamky, ktere jiz nikdo nepotrebuje? (treba po
> odpadnuti aplikace, ktera zrovna neco uzamkla)
Pokud si aplikace volanim metody Edit zamkne nejaky zaznam v tabulce
(je jedno, zda v hlavni ci v zamykaci) a pak upadne, tak BDE tento
zamek automaticky zrusi. Ostatni aplikace se o tom vsak dovedi az po
svem dalsim spusteni (nebo mozna po zavreni a otevreni dane tabulky).

> Drobny dotaz - jak resis vycisteni zamykaci tabulky po padu
> klienta?
Mini-li se timto dotazem opustene zamky na zamykaci tabulce po
aplikaci, ktera upadla - viz. predchozi dotaz.
Mini-li se ruseni nepotrebnych zaznamu, pak ve tride TTableWithLck
jsou definovany obsluhy udalosti BeforeDelete, AfterInsert a
AfterPost, takze pridabvani novych zaznamu a ruseni zaznamu probiha
soucasne v hlavni i zamykaci tabulce.

> Popsane reseni mi pripada stejne jako bod 2, ktery jsem zde nechal.
Obe reseni jsou podobna v tom, ze se nekde nejak pamatuje, ze se dany
zaznam prave edituje. Reseni 2) to resi zapisem priznaku do nejakeho
sloupce v tabulce. Ten priznak je tam zapsan dokud ho aplikace zase
nesmaze zapsanim default hodnoty. V pripade padu aplikace je tam
naveky.
Navrzene reseni funguje tak, ze misto zapisovani priznaku se pouze
zamce dany zaznam v zamykaci tabulce. Nic se tedy nikam nepise. Po
padu aplikace se zamek zrusi (viz. predchozi dotaz) a nic nikde
nezustane viset.
> Jenom je atribut editace vety prenesen do jine tabulky. Souhlasim se
> Zbyskem Hlinkou, ze Tvoje reseni neresi hlavni problem, ktery u 2
> uvadis. Vlastnosti obou reseni (Tvoje nove a 2) jsou totozne, jenom
> s novym resenim je vice rezie. Co ale neresi ani jeden z tech
> navrhu, je zamceni zaznamu. Obe reseni pouze definuji jakousi
> konvenci a spolehaji na to, ze ji vsichni vyvojari budou dodrzovat.
Samozrejme, ze jde o dodrzovani konvence. Navrzeno je to pro situaci,
kdy jedna aplikace (nebo vice podobnych aplikaci vzniklych v jedne
dilne) bezi na siti a chteji si zaznam v tabulce zamcit trochu jinak,
tak jak to potrebuji i za cenu dodrzovani konvence. Pokud se do te
tabulky bude dobyvat jina aplikace, ktera nema poneti o nejakem
priznaku (reseni 2) nebo o nejake zamykaci tabulce (moje reseni), tak
ten zaznam v pohode prepise.
Nebylo ovsem cilem tohoto reseni navrhnout "neprustrelny" zamek
noveho typu, ale navrhnout reseni situace, kdy je treba zaznam
zamcit tak, aby zamek neblokoval dalsi aplikace (dodrzujici tutez
konvenci) a zaroven neumoznil soucasnou vicenasobnou editaci tehoz
zaznamu.
Myslim, ze nejlepe pomuze priklad:
Tabulka obsahuje slopce NazevUctu a ZustatekUctu. Chce-li nekdo
editovat nazev uctu, zamkne si zaznam navrzenym zpusobem a edituje
si. Neblokuje tim nikoho, ktery chce menit zustatek uctu "klasickou
metodou" Edit, naplneni hodnoty, Post. A pritom nikdo jiny nazev uctu
editovat uz nemuze.
> V kazdem pripade bych obe doplnil jeste kontrolou optimistickeho
> zamykani (bod 3) kvuli bezpecnosti.
Ve vyse popsane situaci (na kterou je toto reseni "usito") to neni
treba.

> Jestli se mylim a nevidim nejaky rozdil (mezi 2 a novou metodou),
> mohl bys ho blize objasnit?
viz. vyse.

> Taky mam napad - byl by zalozen na optimistickem zamykani (3), ktere
> by bylo aplikovano na vsechny editace. Vytipovane editace, v nich
> dochazi k castym kolizim, by navic pracovaly jako 2) s tim rozdilem,
> ze misto nastaveni zamku by zaznamu nastavily casovou znamku
> prevzeti do editace. A uzivatel by byl varovan v pripade, ze pri
> jeho prevzeti zaznamu k editaci uplynula od posledniho prevzeti
> zaznamu k editaci mensi doba nez nejaky stanoveny interval a bude-li
> pokracovat v editaci, muze dojit ke kolizi (anebo by editaci uplne
> znemoznily). Jinymi slovy - bylo by tam neco jako casovy zamek.
Na prvni pohled mi "vytipovani editace s castymi kolizemi", "hlidani
doby zamceni/editace" a "znemozneni dlouhotrvajicich editaci" (to
jako nasilne ukonceni editace uzivateli pod rukama ??) pripada trochu
slozite, ale za jistych okolnosti snad muze byt. Je to proste dalsi
mozna varianta.

> Jeste bych chtel upozornit na to, ze tyto mechanismy jde obejit
> vzdy, pokud je mozne se k databazi pripojit jinou cestou nez pres
> nami vyvijenou aplikaci (napr. DBExplorerem). Jedinym bezpecnym
> resenim je pouziti skutecnych zamku anebo znemoznit pristup
> jakymkoliv jinym nastrojem a napsat to dobre ve vlastni aplikaci.
viz. vyse.

Podrobnosti viz. READ.ME, pripadne zdrojaky ve vyse uvedenem
TBLLCKV1.ZIP nebo dalsi dotaz na mne :-)).

Zdar a silu.

Vladimir Novacek

VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
Zborovska 15 fax+BBS: 05-41240246
616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
Ceska Republika http://www.vanicek(tec)cz


delphi 5 a RLE bitmap & update pack 1

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 19.2.2000 20:16:22

> > Daniel Rott <roxton(zv)atlas(tec)cz> wrote:
> > Prave jsem zjistil ze D5 nectou komprimovane bitmapy.
> > V D4 to fungovalo OK. To si musim psat komponentu
> > uz i na praci s bitmapou ?

> Petr Fejfar napsal:
> Petr Vones si ale dal tu praci a ten bug nasel, takze si to
> muzes zkusit opravit unit Graphics, radka 5724 nahradit:
> RLEStream.Seek(ImageSize, soFromEnd);
> RLEStream.Seek(-ImageSize, soFromEnd);

Po nainstalovani update pack 1 jiz vysse uvedena oprava
neni potreba, Delphi5 ctou spravne i RLE bitmapy ! :-)
Nicmene oboum Petrum dekuji za prechodne reseni.

Daniel Rott

XML -> DataSet

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 20.2.2000 01:47:27

ahoj,

slo by to pres TDatasetprovider->TXMLBroker->TMidasPageProducer
nevyhodou je ze je to tusim od D5Ent

M.Jirman

From: Pavel Tomes <tomes(zv)pal.skm.vutbr(tec)cz>> Zdravim vsechny,
> mam problem -chtel bych z dat ulozenych v DataSetu (napr. TTable)
> vygenerovat XML soubor a pak zpetne z tohoto souboru naplnit DataSet.
Nezna
> nekdo jednoduchy zpusob jak na to?
>
>

DBGridSinea versus TIB... componenty

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 20.2.2000 13:12:57

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>> Ako vyfiltrujem riadky oznacene CheckRow na TDBGridSinea ?
>
> Hi. Roland Turcan.
>

Napriklad takto:

1. deklarovat private funkci
procedure MyFilterRecord(DataSet: TDataSet; var Accept: Boolean);

2. implementaci teto funkce:
procedure TForm1.MyFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept := DbGridSinea1.IsChecked(DataSet.Fields[0].AsInteger);
end;
pokud klicova polozka bude mit index 0.

3. v OnCreate nebo i jinde pred pouzitim filtrace priradit
IBTable1.OnFilterRecord := MyFilterRecord

4. pak uz jenom zapinat a vypinat Filtered

Jediny rozdil u TIB... komponent je v tom, ze OnFilterRecord
neni deklarovan japo published, ale pouze public.
To by se muselo presunout do published az u nejakeho potomka.

Poznamka: Pokud chcete oznacovat radky pomoci mysi,
musite v unitu DBGridSi z balicku VCL4 odzavorkovat
radky 612 az 614 v procedure MouseDown.

Vaclav Krmela


Outlook Express

[*] bigzero(zv)post(tec)cz - 20.2.2000 15:41:00

Vazeni kolegove !

Mam nasledujici problem: potrebuji z me aplikace nejakym zpusobem ridit aplikaci Outlook Express (vytvorit novy mail, precist dosle maily).

V D5Pro jsou komponenty jen pro \"velky\" Outlook ale ty nefunguji s Expressem (tedy s tim co je soucasti WIN9x).

Moc by mi pomohl nejaky priklad a popis funkci, ktere OE podporuje (neco na zpusob VBA helpu, ktery existuje pro Word a Excel - pro OE jsem zatim nic podobneho nenasel).

Diky

Honza

Pro kazdeho e-mailova schranka zdarma na:
*** http://POST.CZ

IB 5.6 WIN BUG ?

[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 20.2.2000 16:57:16

Konfigurace: IB 5.6 WIN DELPHI 4.0 Free Interbase Component SP3.0 (testovano i s SP4.0)
Nasel jsem zajimavou a z hlediska bezpecnosti velmi neprijemnou chybu:
Do DBParams jsem pridal
sql_role_name=
a pokud jsem nezadal spravne nazev role, tak to zhroutilo server (IbGuard ho restartoval).
Nevite nekdo jak tomu zamezit ?
Role bych chtel pouzivat, tedy pokud mozno.
Bez IBGuardu se server primo zhroutil.
Podminky:
prihlasovat se jako legitimni uzivatel, ale bez prav, prava mit pridelena prostrednictvim role a
pristupovat na nejaky DB objekt na ktery mam prava jen prostrednictvim ROLE.

Dalsi priznaky:
S delphi 5 a IBExpres se to chovalo stejne, WISQL se chovalo korektne, BDE mam jen 5.01 (jeste provedu testy).

ing. Slavomir Skopalik DEL a.s.
Olomoucka 355 Marianske udoli 783 75
----------------------------------------------
Tel: 068 535 35 48
Fax: 068 535 23 64
e-mail:skopalik(zv)atlas(tec)cz


P�ipojen� k internetu

[*] Michal Kop��ek - 20.2.2000 19:28:07

Zdravim vsechny lidi (hlavne toho, kdo mi poradi),

potreboval bych poradit (priklad je-li to mozne) s fc� kter� zjist� je-li
pocitac pripojen k internetu (modemem) a nen�-li tak aby nav�zal spojen�
pomoci pripojeni xy.

Dik za pomoc

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************

Query & Thread

[*] Jirka Virt <virt(zv)volny(tec)cz> - 20.2.2000 20:08:05

Ahoj,
zkousel jsem to na Dbase a Paradoxu.Ale je pravda, ze tm jsem vyuzival
jenom pruchodu eventem OnServerYield.Pruchod byl skoro kazdou vterinu, takze
jsem mohl
refreshovat aplikaci nebo "indikator prace SQL".Zkratka stroj nevypadal jako
zamrznuty.No a po prevedeni z D3 do D5 jsem o toto prisel.
Jirka Virt

email: virt(zv)volny(tec)cz
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, February 16, 2000 11:37 PM
Subject: Re: Query & Thread


> From: Jirka Virt <virt(zv)volny(tec)cz>
> > BDE sice muze byt zastarale , ale event OnServerYield na komponente
TQuery
> > v D3 byl.A tam se dal spusteny dotaz ukoncit tusim ,ze to bylo
> > AbortQuery.Pak jsem preskocil do D5 a ouha tady neni.Proc, to me neni
jasny.
>
> Ahoj,
>
> A na jake databazi to bylo ? V helpu k BDE se pise, ze lze prerusit akorat
> Sybase query:
>
> cbCANCELQRY
> Allows the user to cancel a long running Sybase query. The installed
callback
> function is called periodically, and the user can return cbrABORT to
cancel.
>
> Obavam se, ze query se v BDE prerusit neda. Zkus hledat ci se zeptat v
newsech
> na Borlandu: http://www.borland.com/newsgroups/
>
> Petr Vones, amatersky programator
>
>
>
>
>

TMemo

[*] Jan Bachor <bachor(zv)iol(tec)cz> - 20.2.2000 21:03:48

dobry den

jak vymazu posledni radek z mema, nebo posledni vlozeny text?

diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------

Editace rodn�ho ��sla v TMaskEdit

[*] Pavel Bl�hovec <pavel.blahovec(zv)atlas(tec)cz> - 20.2.2000 21:13:28

Pot�ebuji editovat rodn� ��slo v TMaskEdit, ale nev�m, jak ud�lat, abych tam m�l lom�tko.

Pou��v�m tento form�t, kde m�sto lom�nka je poml�ka:
000000\-0009;1; -> 770816-1321

Kdy� se tam sna��m d�t lom�tko, st�le mi to tam d�v� odd�lova� pro datum:
000000\/0009;1; -> 770816.0210

P�edem moc d�kuji


P�ipojen� k internetu

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 20.2.2000 21:35:37

Zdravim,
myslim si ze tato tema sa tu uz prejednavala. Skus si pozriet www.delphi(tec)cz

S pozdravom

Michal Hlavac
Spolocnost priatelov deti z detskych domovov
Usmev ako dar

e-mail: 7hlavac(zv)nw.fmph.uniba.sk
web: www.usmev.sk

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

Zdravim vsechny lidi (hlavne toho, kdo mi poradi),

potreboval bych poradit (priklad je-li to mozne) s fc� kter� zjist� je-li
pocitac pripojen k internetu (modemem) a nen�-li tak aby nav�zal spojen�
pomoci pripojeni xy.

Kontrola jedinecnosti na IB

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 20.2.2000 22:04:34

Ako je mozne kontrolovat jedinecnost v databaze, ale bez rozlisovania velke
a male ako v PDX (ixUnique,ixCaseInsensitive).

Hi. Roland Turcan.

Query & Thread

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:29:38

From: Jirka Virt <virt(zv)volny(tec)cz>
> zkousel jsem to na Dbase a Paradoxu.Ale je pravda, ze tm jsem vyuzival
> jenom pruchodu eventem OnServerYield.Pruchod byl skoro kazdou vterinu, takze
> jsem mohl
> refreshovat aplikaci nebo "indikator prace SQL".Zkratka stroj nevypadal jako
> zamrznuty.No a po prevedeni z D3 do D5 jsem o toto prisel.

Ahoj,

dobre, ale pokud si pamatuju, tak tady slo spis o problem preruseni behu
query. Prave to se mi nezda, ze by slo v te udalosti udelat.

Petr Vones, amatersky programator

Chybove hlaseni Out of resources

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:29:49

From: Josef Zvonicek <prosoft(zv)prosoft(tec)cz>
> Pri vytvareni Bitmapy mi vyskakuje chyba out of resources. Jakym zpusobem je muzu
> zvetsit? Je to problem Delphi nebo WIN?

Ahoj,

Nijak. Windows (predevsim 9x) nemaji neomezene prostredky. Patrne se snazis
vytvorit prilis velkou bitmapu, o jake rozmery a barevnou hloubku se jedna ?

Petr Vones, amatersky programator

Outlook Express

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:30:00

From: <bigzero(zv)post(tec)cz>
> Mam nasledujici problem: potrebuji z me aplikace nejakym zpusobem ridit aplikaci
> Outlook Express (vytvorit novy mail, precist dosle maily).
>
> V D5Pro jsou komponenty jen pro \"velky\" Outlook ale ty nefunguji s Expressem
> (tedy s tim co je soucasti WIN9x).

Ahoj,

obavam se, ze OE nelze ovladat pres OLE automation. OE5 sice nabizi jiste funkce,
lze si importovat type library z MSOE.DLL, ale podle nazvu metod to nevypada na
moznost kompletniho ovladani OE.

Petr Vones, amatersky programator

Pristup na dolni cast pameti

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:30:23

From: Ing. Milan �orm <milan.sorm(zv)orgrez(tec)cz>
> prosim o typ na zpusob prepsani 16 bitoveho unitu delphi, kter� slouzil k
> pristupu na dolni cast pameti - adresy okolo $D000, kde sidli merici karta.
> Z jednoduche zalezitosti typu ukazatel na segment, offset se pro me stala
> neresitelna vec. Slysel jsem nejaky pojem DDK, ale nevim, kde se o tom
> neco prehledneho dozvedet.

Ahoj,

Tak to ti vubec nezavidim. Ve Win32 je jedina cesta pomoci vlastniho VxD, WDT
ci kernel driveru (zalezi na verzi Windows). DDK je sada pro vyvoj takovychto
driveru, lze ji prakticky pouzit jen s MSVC++ (a mozna ted i s BCB5). Urcitym
nouzovym resenim je pouziti "univerzalnich" driveru. Ty vsak nejsou nikdy moc
optimalni (pokud ti jde o vykonnost), lze je vsak pouzit i s Delphi. Existuje
knihovna TVicPort (za cca 100$) pro pristup k portum a IRQ, ale otazka je jak
je tomu s pristupem k pameti.

Petr Vones, amatersky programator

registr windows

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:30:40

From: Pavol Kaka�ka <paka(zv)aktis(tec)cz>
> >ale ja to chtel nejak pomoci regeditu nebo *.reg.souboru (jestli umi i
> >odstranovat nejen pridavat sekce)
>
> No, este ma napadlo, ze ak to nechces riesit pomocou Delphi (neviem preco
> :-O ) tak je este moznost pozuzit Windows Scripting Host ("sucast" sucasti
> Windows, ale myslim ze sa standardne neinstaluje ) a priklad je v
> C:\WINDOWS\SAMPLES\WSH\*.*

Ahoj,

Dalsi moznost je pomoci "instalacnich" .INF souboru. Tam lze do prislusne
sekce umistit i odebrani polozek z registru. Popis lze najit na MSDN nebo
odkoukat z nejakeho INF souboru (treba instalace TweakUI).

Petr Vones, amatersky programator

servisn� aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:30:45

From: Milos Sula <crkstrobe(zv)geocities.com>
> nemas nahodou nejakej example pro CreateWindow a jak potom pouzivat prijem
> messages ? Je to stejne jako u TFormu ?

Ahoj,

priklad aplikace psane primo pomoci WinAPI bez VCL mas tady:
ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Api/DelphiDays99_Prezentace.zip

dale pak existuje knihova XCL, odkaz najdes tady:
http://delphree.clexpert.com/pages/supported_projects.htm

Petr Vones, amatersky programator

PChar('') <> nil? Takova skolska otazka

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

From: Karel Kral <kral(zv)purus(tec)cz>
> Clovek by rekl, ze PChar('') je to same jako nil, ale zrejme neni.

Ahoj,

Spravne, neni. PChar('') predstavuje ukazatel na prazdny retezec (tedy na #0).
Pokud predavas nil, tak to neni ukazatel na retezec, ale "nulovy ukazatel".
Tim se pak rozlisuje v konkretni funkci pripad, kdy jsi vlastne chtel vynechat
parametr, ci jinak receno mu nedat zadnou hodnotu.

> Samozrejme umim napsat if then else... aby to fungovalo i s prazdnym
> retezcem nebo si long string zkopirovat do PChar, ale jde mi o princip a
> elegantni reseni

Muzes si napsat takovouto funkci, kterou pak pouzijes misto pretypovani:

function PCharNil(const S: String): PChar;
begin
if Length(S) = 0 then Result := nil else Result := PChar(S);
end;

Petr Vones, amatersky programator

XML -> DataSet

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:36:41

From: Pavel Tomes <tomes(zv)pal.skm.vutbr(tec)cz>
> mam problem -chtel bych z dat ulozenych v DataSetu (napr. TTable)
> vygenerovat XML soubor a pak zpetne z tohoto souboru naplnit DataSet. Nezna
> nekdo jednoduchy zpusob jak na to?

Ahoj,

Pokud pouzivas pristup pres ADO, tak to jiz umi ukladat data i do XML.
V pripade Delphi ADO komponent jsou to metody TADODataSet.SaveToFile
a TADODataSet.LoadFromFile. U ADO komponent od jinych vyrobcu to bude
podobne.

Petr Vones, amatersky programator

ToolBar a velikost tlacitek

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:36:26

From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> 1) Chtel bych toolbar s toolbuttony vyplnenymi ikonou a textem,
> pricemz text by mel mit v kazdem buttonu jinou barvu. V archivu
> jsem nasel prispevek od tusim Petra Vonese, ktery popisoval, jak
> barvu nastavit primo v canvasu; nevim, jak v D5, ale v D4, ktere
> mam ja, Canvas neni ve tride TToolBar ani TToolButton pristupny,
> identifikator Canvas neni definovan (to pise). Neexistuje nejaky jiny
> zpusob, jak to zajistit?

Ahoj,

napriklad prejit na D5 ;-) Lze to samozrejme resit odvozenim nove komponenty
a v ni obsluhou prislusych zprav. Je s tim ale pomerne dost prace. Podivej
se na zdrojak TListView, konkretne obsluhu zpravy CN_NOTIFY -> NM_CUSTOMDRAW.

> 2) Umistim na Form ToolBar, do nej par toolbuttonu a u nich rucne
> nastavim velikost. Kdyz pak zapnu ShowCaptions, toolbuttony se
> zmensi na nejmensi moznou velikost tak, aby cely obsah byl videt,
> ale nejde jiz zpatky zvetsit. To si opravdu nemuzu ty tlacitka nejak
> prizpusobit?

Po nastaveni ShowCaptions z True na False muzes puvodni sirku tlacitek znovu
nastavit pomoci TToolBar.ButtonWidth na hodnotu, ktera tam byla pred tim
(typicky 23).

> Chtel jsem Toolbarem nahradit dosud pouzivane SpeedButtony,
> event. BitButtony kvuli uzirani zdroju, ale prave kvuli vyse
> uvedenym problemum mi to neprijde jako idealni cesta.

Vzdycky je neco za neco. Pouziti ToolBaru se mi jevi z existujicich variant
jako nejlepsi reseni, i pres nektera omezeni dana jednotnosti vzhledu. Uz jen
proto, ze vyuziva kod, ktery je soucasti operacniho systemu misto nabalovani
jeste dalsiho (casto zbytecneho) kodu komponent, ktere se snazi napodobit jeho
funkci. Je plno "velkych" aplikaci, ktere si s vlastnostmi toolbaru vystaci
(MS Office, IE, CakeWalk...). Jedina sporna otazka je jeho zapouzdreni do VCL,
ktere prilis neumoznuje vyuzit na 100% jeho vlastnosti.

Petr Vones, amatersky programator

ToolBar a velikost tlacitek

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:36:35

From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> Nebo toolbar z RxLib neni postaven na pouzivani Glyph? Zatim
> jsem to nehledal.

Ahoj,

Je na nich postaven, proto je nepouzitelny :-) Navic tak do aplikace zcela
zbytecne pridavas dalsi mnozstvi kodu, ktery jiz mas jinak primo ve Windows.

Petr Vones, amatersky programator

Skryti TaskBaru

[*] Va�ek N�vrat���zx"��뢖�z?� - 20.2.2000 23:38:04

Zdarec :o)
to bys netusil, co mi ty DelphiX udelali...nastavil jsem to, jak rikas, po
spusteni se TaskBar schoval, ale formular se neroztahl a zustalo tam prazdne
misto (bylo videt pozadi ve Windows) :-((

Nezna nekdo nejake jinaci komponenty pro pouzivani DirectX v Delphi 4, nez
jsou Delphi X??

Vasek Navrat

----- Original Message -----
From: p. Jirman <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 08, 2000 6:40 PM
Subject: Re: Skryti TaskBaru


kdyz nastavis TForm.Formstyle:=StayOnTop a TForm.WindowState:=wsMaximized
tak nevyleze taskbar ani pri zmeneni rozliseni pomoci DELPHIX

M. Jirman

Registrace komponent (Was: MojMaskEdit nejde a nej

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.2.2000 23:43:56

From: Ondrej Jaura <jaura(zv)datalock.sk>
> A pri maskprop nastava PROBLEM, pretoze maskprop NIKDE v tvare
> maskprop.dcu (toboz nie pas) NEEXISTUJE, co pri kompilovani komponenty
> TMojMaskEdit nie je nutne (je to v generated package dclstd50.bpl, staci to
> hodit do required), ALE je to problem pri kompilovani aplikacie, ktora
> pouziva komponentu TMojMaskEdit, kedy Delphi tvdrohlavo po mne ziadaju
> maskprop.dcu...

Ahoj,

Patrne se jedna o nedodrzeni zasady umisteni registracniho kodu do *SAMOSTATNEHO*
unitu. Uz se to tu probiralo nekolikrat. Nikdy (!!!) by jsi nemel odkazovat primo
ci neprimo na "design-time" unity z "runtime" kodu. Pokud mas tedy umisten kod
registrace ve stejnem unitu jako kod komponenty, tak pri kompilaci se prekladac
snazi najit kod desing-time unitu, ktery ale neexistuje jako DCU (ale jako DCP).
Musis tedy vytvorit novy unit do ktereho umistis registraci komponent a property
editoru. V drivejsich verzich Delphi byla tato zasada spise jen doporucenim, proto
chybne napsany kod registrace prosel, ale od D5 je toto jiz striktne vyzadovano.
Pri prechodu na D5 se tento problem casto vykladal jako chyba Delphi, ale byla to
jen chyba autoru komponent, ktera se vlekla verzemi. V D5 je zatim jeste cely kod
DSGNINTF.PAS, takze to nekdy svadelo k tomu, prelozit tento unit misto oddeleni
registracniho kodu do samostatneho unitu. V D6 by jiz nemel byt ani DSGNINTF.PAS,
ale jen DSGNINTF.INT, takze takoveto "reseni" by opet nikam nevedly. Jedine co
by mel Borland opravit, je sablona zdrojoveho kodu pri File -> New Component,
ktera ponekud zavadejicim zpusobem svadi k chybnemu psani registracniho kodu
komponenty. Soucasny zpusob je prijatelny jen v pripade, ze se neregistrije zadny
property/component editor.

Podobny "prohresek" je i vyuzivani volby kompilatoru "Assignable typed constants",
ktera je v Delphi jen z duvodu jakesi zpetne kompatibility. Tato volba umoznuje
pracovat s konstantami jako s globalnimi promennymi. Konstanta je ale prece od
toho, aby byla konstantni. V budouci verzi Delphi by jiz tato prisernost nemela
byt, proto je dobre jiz ted zacit pouzivat konstanty k tomu, k cemu jsou spravne
urceny.

Petr Vones, amatersky programator


Access a OleDB Delphree komponenty

[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 21.2.2000 00:57:21

On Fri, 18 Feb 2000, Zbysek Hlinka wrote:

Ahoj,

> Prislusne property plnis rucne, nebo provider vybiras ze seznamu?
> Tedy, jestli prislusny provider mas vubec k dispozici? Ale
> predpokladam, ze mas.

:-)

> Pada ti to v TConnect.InitDatabaseList a je evidentni, ze je chyba v
> nastaveni nejake property (OLE DB). Sice mi neni jasne, kde jsi
> vystrachal Open mode, ale zkus postupne nasledujici:
>
> Uved plnou cestu k databazi.
^^^^^^^^^^^^^^^^^^^^^^^^^^^
Jsem ja to ale hlupak, ze me to netrklo :-)> Nastav primo property v komponente TDFOdbConnect v tomto
> poradi: Provider, Server (je-li), UserID, Password (je-li) a Database
> (plnou cestu).
> Zkus sahnout do jmenovane metody a vnutit mu natvrdo
> I2:=DBPROMPT_COMPLETE;
>
> Pokud nic nepomuze, odkrokuj si jmenovanou metodu a napis mi
> cislo chyby "h" z tohoto volani:
> h := DBInit.Initialize;
>
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ

diky
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano


Multi line v palete komponent Delphi 5

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 21.2.2000 01:01:53

Ako nastavim multi line v palete komponent Delphi5 ?

Hi. Roland.

Access a OleDB Delphree komponenty

[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 21.2.2000 01:39:19

On Fri, 18 Feb 2000, Zbysek Hlinka wrote:

> Uved plnou cestu k databazi.
> Nastav primo property v komponente TDFOdbConnect v tomto
> poradi: Provider, Server (je-li), UserID, Password (je-li) a Database
> (plnou cestu).
> Zkus sahnout do jmenovane metody a vnutit mu natvrdo
> I2:=DBPROMPT_COMPLETE;
>
> Pokud nic nepomuze, odkrokuj si jmenovanou metodu a napis mi
> cislo chyby "h" z tohoto volani:
> h := DBInit.Initialize;
>

Sice jsem se pripojil na mdb databazi, ale jen za podminky, ze mam
CompletePrompt=true a Database nenastavenou, resp nastavim ji az
v promptu v okamziku vytvoreni.
Pokud se snazim neco nastavit do property Database, at v runtime nebo
designtime, tak me to po pokusu o pripojeni zhlasi:

.. EOleDbError with message 'IDBProperties.SetProperties FAILED!!:
HResult of 80040E21h (-2147217887) returned
Error Source: Microsoft JET Database Engine
Error Description: Errors occurred

kterazto chyba vznikne zde:
h := DBProperties.SetProperties(Props, PropertySet);
kde
Props=1
PropertySet=($BD3B60, 3, (3367314108, 23795, 4558, (173, 229, 0, 170, 0,
68, 119, 61))
a
$BD3B60 ukazuje na ($E9, 0, (0, 0, 0, (0, 0, 0, 0, 0, 0, 0, 0)))

tak nevim
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano

Access violation

[*] Lumir Karas <lumir.delphi(zv)post(tec)cz> - 20.2.2000 20:21:14 -0800

Ahoj,

mam problem. Kod nize vypisuje v radku While "Access violation at address ... Read of address FFFFFFFF" a ja nevim proc. Myslim si, ze je to dobre. Chyba vznika pri prazdnem retezci s. Funkce ma prevest cisla v retezci oddeleny znakem do ciselne podoby s ohledem na predcasne ukonceni tohoto retezce. Je to delano v D3 C/S. Muze mi nekdo poradit cim by to mohlo byt zpusobeno? Vim, ze bych to mohl osetrit predem tak, ze pri prazdnem retezci bych tuto funkci neprovedl ale myslim si, ze by to melo delat to samy.

PS: Jeste podotykam, ze v WatchListu je s[a]=#11; a=1;

Predem moc dekuji. Lumir.
function TForm1.CtiTime(s: String): Real;
var
a, Hod: Byte;
t: String;
begin
...............
t:='';
a:=1;
While (s[a]>='0') and (s[a]<='9') and (a<=Length(s)) do begin
t:=t+s[a];
Inc(a);
end;
If t<>'' then Hod:=StrToInt(t);
................
end;

Multi line v palete komponent Delphi 5

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.2.2000 06:10:42

Pouzij GExpert, ktery ti umozni jeste spoustu dalsich veci. www.gexpert.com

Jan Fiala

----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>> Ako nastavim multi line v palete komponent Delphi5 ?
>
> Hi. Roland.
>
>

Access violation

[*] Lumir Karas <lumir.delphi(zv)post(tec)cz> - 20.2.2000 21:53:04 -0800

Cau,

tak uz jsem na to prisel. Chybu jsem odstranil tak, ze prvni testuju zda znak jeste lezi v retezci a pak jeho hodnotu. Jenom takovy poddotaz. Ten Access violation byl praci Delphi nebo Woken?

While (a<=Length(s)) and (s[a]>='0') and (s[a]<='9') do begin ...

Lumir.

edit Acces

[*] Martin <geoplan(zv)pp.sinet.sk> - 21.2.2000 07:06:07

Dobry,

Mam databazu Acces a v nej tri tabulky.
1. tabulka fakt
2. tabulka zakazka
3. ciselnik, spajajuci fakt a zakazka.

Chcel by som sa opytat aky je podla Vas najvhodnejsi sposob vkladania a editacie zaznamov. Tabulky chcem pripojit pomocou SQL koponent.
Mam asi taku predstavu.
Tabulky budu prepojene pomocou sql vyrazov s parametrom ako master detail zakazka na ciselnik a ciselnik na fakt.
Prv� formular bude mat komponenty DBEDIT pripojene na fakt. Potom by tam bol aj DBGRID(read only) pripojeny na tabulku zakazky. Na pridavanie a editaciu zakaziek by bol dalsi formular s DBEDIT napojenymi na zakazky.
Je to dobre riesenie alebo sa to da urobit lepsie ? Niekto tu niekedy pisal ze nie je dobre priamo pracovat s udajmi v databaze. Neviem ci tym myslel komponenty DBEDIT alebo FIELDS.
Iba skusam urobit nejaku aplikaciu, nie je to nic komercne.

Martin


Novellovske promenne

[*] Petr Ku�era <kucera(zv)vri(tec)cz> - 21.2.2000 07:10:43

Dobry den,

prosim Vas, jak se daji v Delphi zpracovat novellovske
promenne?

Access, ODBC, Create new database

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 21.2.2000 07:51:47

V ovladacich panelech ODBC lze v dialogu pridat
DSN vytvorit novou databazi (novy MDB soubor).
Lze toto udelat i nejak pres ODBC, treba pres
ConnectionString ? Chtel bych aby moje aplikace
pokud databaze neexistuje tak si ji vytvorila. Nebo
existuje-li nejaky atribut v ConnectionStringu "vytvor
pokud neexistuje" ?
Nyni pouzivam takovyto ConnectionString:
'Driver={Microsoft Access Driver (*.mdb)};'+
'DBQ='+fn+';'+
'Exclusive=0;'+
'UID=admin;';

Dekuji

Daniel Rott

P�ipojen� k internetu

[*] Kalivoda Jozef <KaliJ(zv)spas.sk> - 21.2.2000 08:05:12

zdravim...
v konferencii niesom dlho takze neviem co sa tu uz hovorilo ale skus si
niekde najst AHMTritonTools2000. Mam pocit ze tam boly aj njake komponenty
urcene pre obsluhu modemu a pripojenie na inet...

s pozdravm DODO

-----Original Message-----
From: Michal Kop��ek [mailto:m.kopacek(zv)volny(tec)cz]
Sent: Sunday, February 20, 2000 7:28 PM
To: Delphi-Forum
Subject: P�ipojen� k internetu


Zdravim vsechny lidi (hlavne toho, kdo mi poradi),

potreboval bych poradit (priklad je-li to mozne) s fc� kter� zjist� je-li
pocitac pripojen k internetu (modemem) a nen�-li tak aby nav�zal spojen�
pomoci pripojeni xy.

Dik za pomoc

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************

Access violation

[*] Pavel Hampl <phampl(zv)chmi(tec)cz> - 21.2.2000 07:10:09

<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
<body bgcolor="#FFFFFF">
nazdar,
<br>tohle mi delalo taky, je to prace delfina, kdyz hlida meze promennych.
Ten druhy lepsi kod mimochodem funguje jenom tehdy, kdyz je vypojene plne
vyhodnocovani boolovskych vyrazu. Pokud je prvni podminka false, tak ty
dalsi se uz netestuji. Pokud bys mel zapnute to plne vyhodnocovani (compiler
options...), tak bys to musel napsat jako dva prikazy za sebou:
<p>while (a&lt;=length(s)) do begin
<br>&nbsp;&nbsp;&nbsp;&nbsp; if (s[a]>='0') and (s[a]&lt;'9') then ...
<p>Pavel Hampl, druzicove oddeleni,
<br>cesky hydrometeorologicky ustav
<br>&nbsp;
<p>Lumir Karas wrote:
<blockquote TYPE=CITE><style></style>
<font face="Arial"><font size=-1>Cau,</font></font>&nbsp;<font face="Arial"><font size=-1>&nbsp;
tak uz jsem na to prisel. Chybu jsem odstranil tak, ze prvni testuju zda
znak jeste lezi v retezci a pak jeho hodnotu. Jenom takovy poddotaz. Ten
Access violation byl praci Delphi nebo Woken?</font></font>&nbsp;<font face="Arial"><font size=-1>While
(a&lt;=Length(s)) and (s[a]>='0') and (s[a]&lt;='9') do begin ...</font></font>&nbsp;<font face="Arial"><font size=-1>Lumir.</font></font>
<br>&nbsp;</blockquote>

</body>
</html>

Uvod k databazim

[*] Radek Skokan <skokan(zv)lanprojekt(tec)cz> - 21.2.2000 08:13:36

Preji dobry den,
uz dost dlouhou dobu jsem nedelal nic v Delphi a nikdy jsem nedelal s
databazemi.
Ted si potrebuju udelat neco, co mi z Linuxu (to bude v cecku) bude plnit
SQL a pak to budu dal z webove a windousove platformy zpracovavat. Podle
mych chabych znalosti se mi jako nejjednodsi zda pro tohle Delphi. Nevite
tedy, prosim, o nejakem peknem zakladnim popisu prace v Delphi s SQL na
webu?

(Omlouvam se za zacatecnicky nezazivny dotaz)

Diky
Radek

try except end podruhe

[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 21.2.2000 08:33:27



Ahoj,

v delphi pouzivam konstrukci try except end pro odchytavani pripadnych chyb
pri StrToInt ale ted bych chtel neco podobneho napsat v C++ Builderu.
Objevil jsem tam try catch a trow ale totalne nechapu jak se to pouziva. Jak
teda jednoduse prevest try except end do C++ Builderu ?

M.

ToolBar a velikost tlacitek

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 21.2.2000 08:34:39

> > 2) Umistim na Form ToolBar, do nej par toolbuttonu a u nich rucne
> > nastavim velikost. Kdyz pak zapnu ShowCaptions, toolbuttony se
> > zmensi na nejmensi moznou velikost tak, aby cely obsah byl videt,
> > ale nejde jiz zpatky zvetsit. To si opravdu nemuzu ty tlacitka nejak
> > prizpusobit?
>
> Po nastaveni ShowCaptions z True na False muzes puvodni sirku tlacitek znovu
> nastavit pomoci TToolBar.ButtonWidth na hodnotu, ktera tam byla pred tim
> (typicky 23).

> Petr Vones, amatersky programator

Dekuju za odpovedi. V bode 2 (viz vyse) jsem mel ale na mysli
nastaveni rozmeru tlacitek prave i v rezimu ShowCaptions. Nevim,
proc je v teto situaci nelze menit. Mozna to ma dobry duvod, ale
nejak mi unika.

David


ListView, odchyceni zmeny Checked

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 21.2.2000 08:38:25

Na jakej event se mam povesit pro zachyceni zmeny
CheckBoxu v ListView. OnClick funguje pouze je-li
Focused, OnChange nefunguje vubec.

Jak na to ?

Daniel Rott

WinCE

[*] DELPHI <DELPHI(zv)dingo(tec)cz> - 21.2.2000 07:44:45 gmt

V cem je nejlepsi psat program pro WinCE?
V Delphi to nejde. Tak Visual C++?
Co doporucite?

Bob


P�ipojen� k internetu

[*] Lud�k ZITA - 21.2.2000 08:47:01



Michal Kop��ek
> potreboval bych poradit (priklad je-li to mozne) s fc� kter� zjist� je-li
> pocitac pripojen k internetu (modemem) a nen�-li tak aby nav�zal spojen�
> pomoci pripojeni xy.


Zkus knihovnu RAS od F.Pietteho.

Lud�k Zita


PChar('') <> nil? Takova skolska otazka

[*] Karel Kral <kral(zv)purus(tec)cz> - 21.2.2000 09:03:03

>
> Muzes si napsat takovouto funkci, kterou pak pouzijes misto pretypovani:
>
> function PCharNil(const S: String): PChar;
> begin
> if Length(S) = 0 then Result := nil else Result := PChar(S);
> end;
>
> Petr Vones, amatersky programator

Diky, to je ono. Elegantni a jednoduche.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


Access violation

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 21.2.2000 09:04:44

> tak uz jsem na to prisel. Chybu jsem odstranil tak, ze prvni testuju =
> zda znak jeste lezi v retezci a pak jeho hodnotu. Jenom takovy poddotaz. =
> Ten Access violation byl praci Delphi nebo Woken?
>
> While (a<=3DLength(s)) and (s[a]>=3D'0') and (s[a]<=3D'9') do begin ...

Trochu nerozumim te otazce. V puvodnim kodu pri prazdnem
retezci vychazelo s[a] mimo retezec, tedy do oblasti, jejiz cteni
Tvemu programu neprislusi.
Presunuti testu a <= Length(s) na zacatek podminky je
spravne, protoze pokud je nektery z vyrazu False, se jiz zbytek
podminky nevyhodnocuje (neni-li nastaveno jinak).
Slo tedy o logickou chybu v programu a domnivam se, ze je
celkem jedno, zda se o vyjimku postaraly Wokna nebo Delphi.
Sam bych ji ale pripsal Woknum.
David


try except end podruhe

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 21.2.2000 09:12:19


> -----P�vodn� zpr�va-----
> Od: Miroslav �ipel [mailto:Miroslav.Cipel(zv)oku-tu(tec)cz]
> Odesl�no: 21. �nora 2000 8:33
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: try except end podruhe
>
>
>
>
> Ahoj,
>
> v delphi pouzivam konstrukci try except end pro odchytavani
> pripadnych chyb
> pri StrToInt ale ted bych chtel neco podobneho napsat v C++ Builderu.
> Objevil jsem tam try catch a trow ale totalne nechapu jak se
> to pouziva. Jak
> teda jednoduse prevest try except end do C++ Builderu ?
>

Zkusim odpovedet, i kdyz to neznam z C++ ale z Visual J++,
snad je to stejne.

Doufam, ze nasledujici srovnavaci "priklad" bude srozumitelny.

Delphi VJ++
---------------------------------------------------------------------
try try {
chraneny blok kodu; chraneny blok kodu;
except }
on E: typvyjimky do catch (typvyjimky E) {
raise novavyjimka; throw new novavyjimka();
end }

HTH

Jura


ListView, odchyceni zmeny Checked

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 21.2.2000 09:18:15

> Na jakej event se mam povesit pro zachyceni zmeny
> CheckBoxu v ListView. OnClick funguje pouze je-li
> Focused, OnChange nefunguje vubec.
Tak se omlouvam, pres ten OnChange to chodi
(Change=ctState) a ve vsech ViewStyle. Chyba byla
asi jinde, tipuji to nekde mezi klavesnici a zidli :-)

Daniel Rott

Access violation

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 21.2.2000 09:19:14

tohle mi delalo taky, je to prace delfina, kdyz hlida meze
promennych.
Lumir Karas wrote:
Cau, tak uz jsem na to prisel. Chybu jsem odstranil tak,
ze prvni testuju zda znak jeste lezi v retezci a pak jeho
hodnotu. Jenom takovy poddotaz. Ten Access violation byl
praci Delphi nebo Woken?While (a<=Length(s)) and
(s[a]>='0') and (s[a]<='9') do begin ...Lumir.


Omlouvam se za quotovani. Neverim, ze to je prace Delphi
souvisejici s hlidanim mezi promennych. To by nevznikla
chyba naruseni pristupu, ale chyba rozsahu nebo neco v
tom smyslu. Netvrdim, ze mam pravdu, ale intuitivne se mi
toto nezda pravdive.
David


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 21.2.2000 09:20:59

tak jsem napsal servisni aplikaci, bohuzel mi to hlasi pri startovani -
service did not return any error atd. nevite cim to je ?
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/freevideo/

----- P�vodn� zpr�va -----
Od: Kalivoda Jozef <KaliJ(zv)spas.sk>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 18. �nora 2000 9:46
P�edm�t: RE: servisn� aplikace


> skus to cez ShellExecute
>
> Inak tento sposob execute je v samples ktore ma D4 , D5 ma vsak jednu
> nevihodu neda sa vytvoreny proces nijak dalej kontrolovat... apon som na
to
> zatial nerisiel...
>
> -----Original Message-----
> From: Milos Sula [mailto:crkstrobe(zv)geocities.com]
> Sent: Friday, February 18, 2000 7:24 AM
> To: delphi konference
> Subject: servisn� aplikace
>
>
> Ahoj
> pisu servisni aplikaci, ktera ma pod NT krome jineho poustet jinou
aplikaci.
> Problem je v tom ze servisni aplikace , pokud jsem dobre pochopil nemuze
mit
> svoje vlastni okno, ale API funkce runshell (kterou se snazim poustet
nejaky
> dalsi program) ze servisni aplikace vyzaduje handle okna, coz servisni
> aplikace samozrejme nema. Nevite nekdo jak to vyresit ?
>
> predem diky


MojMaskEdit nejde a nejde

[*] Lubo Fule <fule(zv)sct.sk> - 21.2.2000 09:21:42

Najrozumnejsie by bolo TMajMaskEdit zdedit od TMaskEdit a upravit v nom co
treba aby Ti fungoval ako chces. Potom by mal korektne fungovat aj property
editor.

L.

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ondrej Jaura
> Sent: Saturday, February 19, 2000 5:51 PM
> To: Delphi
> Subject: MojMaskEdit nejde a nejde
>
>
> Zdravim :)
>
> Upravil som mask.pas (TMaskEdit) na obraz svoj - teda je z toho uplne
> novy subor mojmask.pas (TMojMaskEdit).
> Kedze komponentu treba registrovat, pridal som procedure Register a ona
> komponentu zaregistrovala - potialto vsetko funguje...
> ALE kedze som neregistroval ProperyEditor, pri design-mode mi
> pri zmene
> propery EditMask nevyhodilo pekne okienko, v ktorom sa nastavuje maska
> (specialne na to urcene). Nuz som pridal:
> RegisterPropertyEditor(TypeInfo(string), TMojMaskEdit, 'EditMask',
> TMaskProperty);
> To si vsak vyzaduje dva zapisy do uses:
> dsgnintf (/Source/Toolsapi) pre TypeInfo
> maskprop (???) pre TMaskPropery
> A pri maskprop nastava PROBLEM, pretoze maskprop NIKDE v tvare
> maskprop.dcu (toboz nie pas) NEEXISTUJE, co pri kompilovani komponenty
> TMojMaskEdit nie je nutne (je to v generated package
> dclstd50.bpl, staci to
> hodit do required), ALE je to problem pri kompilovani aplikacie, ktora
> pouziva komponentu TMojMaskEdit, kedy Delphi tvdrohlavo po mne ziadaju
> maskprop.dcu...
>
> WO CO GO?
>
> Vopred dakujem za zachranne kolesa a vesty
>
>
> Ondrej
> (Delphi 5 Prof)
>
> [ Ondrej Jaura ] [ jaura(zv)datalock.sk ] [ Datalock a.s. ] [ :) ]
>
>

Vyber databaze

[*] DELPHI <DELPHI(zv)dingo(tec)cz> - 21.2.2000 08:38:58 gmt

Zdravim,

rad bych poprosil o radu. Mam delat databazi,
ktera sice bude obsahovat asi tak 5 tabulek,
ale hlavni z nich bude obsahovat 500 000 zaznamu
za rok a bude to stale nabyvat.
Z techto tabulek se budou delat nejake sestavy
a statistiky.
Potrebuje zajistit zalohovani a bezpecnost dat.
Utahne to Access, nebo radeji doporucite SQL server?
Mam na vyber MSSQL7 nebo Oracle 8.0.5

Diky moc

Bob


Editace rodn�ho ��sla v TMaskEdit

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 21.2.2000 09:46:51

Ja pouzivam TOVCPictureEdit z Orfea a s maskou 999999/9999 to funguje dobre.

J. N�dhera

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

----- Original Message -----
From: Pavel Bl�hovec
To: delphi-l(zv)fwd(tec)cz
Sent: Sunday, February 20, 2000 9:13 PM
Subject: Editace rodn�ho ��sla v TMaskEdit


Pot�ebuji editovat rodn� ��slo v TMaskEdit, ale nev�m, jak ud�lat, abych tam m�l lom�tko.

Pou��v�m tento form�t, kde m�sto lom�nka je poml�ka:
000000\-0009;1; -> 770816-1321

Kdy� se tam sna��m d�t lom�tko, st�le mi to tam d�v� odd�lova� pro datum:
000000\/0009;1; -> 770816.0210

P�edem moc d�kuji


try except end podruhe

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 21.2.2000 09:47:35

>
> v delphi pouzivam konstrukci try except end pro odchytavani pripadnych chyb
> pri StrToInt ale ted bych chtel neco podobneho napsat v C++ Builderu.
> Objevil jsem tam try catch a trow ale totalne nechapu jak se to pouziva. Jak
> teda jednoduse prevest try except end do C++ Builderu ?

C++ jsem mel ve skole, ale jinak v nem neprogramuju. Pokud si
ale pamatuju na prednasku venovanou vyjimkam, tak je to
prakticky stejne jako v delphi, misto except je v C++ catch a
ceckovske trow snad odpovida delphackemu raise. Myslim, ze by v
helpu nemelo byt problem dohledat detaily.
Predpokladam, ze v C++ Builderu to nebude jinak.

David


P�ipojen� k internetu

[*] Michal Kop��ek - 21.2.2000 09:53:47

kde takovou knihovnu najdu?

d�k

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Lud�k ZITA
Sent: Monday, February 21, 2000 8:47 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: P�ipojen� k internetu

____
Zkus knihovnu RAS od F.Pietteho.

Lud�k Zita

try except end podruhe

[*] Lubos Hubka <hubka(zv)trenkwalder.sk> - 21.2.2000 10:05:31

> v delphi pouzivam konstrukci try except end pro odchytavani pripadnych chyb
> pri StrToInt ale ted bych chtel neco podobneho napsat v C++ Builderu.
> Objevil jsem tam try catch a trow ale totalne nechapu jak se to pouziva. Jak
> teda jednoduse prevest try except end do C++ Builderu ?

Toto je z helpu k CB:

// In PROG.C

void func(void) {
// generate an exception
RaiseException( /* specify your arguments */ );
}

// In CALLER.CPP
// How to test for C++ or C-based exceptions.
#include <excpt.h>
#include <iostream.h>

int main(void) {
try
{ // test for C++ exceptions
try
{ // test for C-based structured exceptions
func();
}
__except( /* filter-expression */ )
{
cout << "A structured exception was generated.";

/* specify actions to take for this structured exception */
return -1;
}
return 0;
}
catch ( ... )
{
// handler for any C++ exception
cout << "A C++ exception was thrown.";
return 1;
}

}

servisn� aplikace

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 21.2.2000 10:14:26



>tak jsem napsal servisni aplikaci, bohuzel mi to hlasi pri startovani -
>service did not return any error atd. nevite cim to je ?


nejdulezitejsi vec, kterou musi service podporovat jet odpovidat Service
Manageru na dotazy - cili volat na spravnych mistech SetServiceStatus


Zdravi
D> Toman

Vyber databaze

[*] =?utf-8?B?TWljaGFsIEtvcMOhxI1law==?= <m.kopacek(zv)volny(tec)cz> - 21.2.2000 10:43:18

Hele bobe,

neznáš náhodou nějakého kubu číh...? :)

************************************
Michal Kopáček
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
DELPHI
Sent: Monday, February 21, 2000 9:39 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Vyber databaze


Zdravim,

rad bych poprosil o radu. Mam delat databazi,
ktera sice bude obsahovat asi tak 5 tabulek,
ale hlavni z nich bude obsahovat 500 000 zaznamu
za rok a bude to stale nabyvat.
Z techto tabulek se budou delat nejake sestavy
a statistiky.
Potrebuje zajistit zalohovani a bezpecnost dat.
Utahne to Access, nebo radeji doporucite SQL server?
Mam na vyber MSSQL7 nebo Oracle 8.0.5

Diky moc

Bob


---
Příchozí zpráva neobsahuje viry.
Zkontrolováno antivirovým systémem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.121 / Virová báze: 58 - datum vydání: 31.1.2000

=?utf-8?B?UkU6IFZ5YmVyIGRhdGFiYXpl?=

[*] azeleny(zv)csas(tec)cz - 21.2.2000 10:46:51

To bych videl spise na Oracle, uz jen pro moznost prejit pripadne na jiny
OS...

a.

----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.> -----Original Message-----
> From: DELPHI [mailto:DELPHI(zv)dingo(tec)cz]
> Sent: Monday, February 21, 2000 9:39 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Vyber databaze
>
>
> Zdravim,
>
> rad bych poprosil o radu. Mam delat databazi,
> ktera sice bude obsahovat asi tak 5 tabulek,
> ale hlavni z nich bude obsahovat 500 000 zaznamu
> za rok a bude to stale nabyvat.
> Z techto tabulek se budou delat nejake sestavy
> a statistiky.
> Potrebuje zajistit zalohovani a bezpecnost dat.
> Utahne to Access, nebo radeji doporucite SQL server?
> Mam na vyber MSSQL7 nebo Oracle 8.0.5
>
> Diky moc
>
> Bob
>
>

Windows Millennium - 1. beta je pry na svete

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 21.2.2000 10:54:09

Ahoj,
tak uz je to tady:

1)Dobra (?) zprava

Windows Millennium - 1. beta je pry na svete
uvadi clanek v dnesnim cisle Computer 3/00,
str.12 (Filip Molcan)

2) Spatna (?) zprava

Uz nejde startovat v rezimu DOS, jen
DOS (?) okno.
Je zase vetsi (320MB na typickou instalaci)
Ma DirectX 8.0

Final ma byt dostupne 26.5.2000 (???)

Podle toho clanku bych to tipoval jen
na kosmeticky UPDATE W98...
Co z toho vyplyne pro vyvojare, tezko odhadovat.


-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 21.2.2000 11:08:59

setservicestatus ?
takovou funkci nemuzu najit v helpu ?
muzete mi nekdo poslat nejaky funkcni priklad ?
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/freevideo/

----- P�vodn� zpr�va -----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 21. �nora 2000 10:14
P�edm�t: Re: servisn� aplikace


>
> >tak jsem napsal servisni aplikaci, bohuzel mi to hlasi pri startovani -
> >service did not return any error atd. nevite cim to je ?
>
> nejdulezitejsi vec, kterou musi service podporovat jet odpovidat Service
> Manageru na dotazy - cili volat na spravnych mistech SetServiceStatus
>
>
> Zdravi
> D> Toman
>
>

Outlook Express

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 21.2.2000 11:24:25

From: <bigzero(zv)post(tec)cz>
Sent: Sunday, February 20, 2000 3:41 PM
Subject: Outlook Express


> Mam nasledujici problem: potrebuji z me aplikace nejakym zpusobem ridit
aplikaci Outlook Express (vytvorit novy mail, precist dosle maily).
>

Myslim ze na ten ucel ktory spominas, (vytvorit novu postu, precitat doslu
postu) uplne postacuje funkcnost ukryta v Simple MAPI (unit Mapi). Navyse je
aplikacia flexibilnejsia - spolupracuje nielen s OE ale aj s inymi postovymi
klientami podporujucimi SMAPI. Popis najdes v helpe, pripadne si o kratky
priklad napis na moju adresu.

Palo.

Access violation

[*] Filip Kinsky <delphi007(zv)angelfire(tec)com> - 21.2.2000 02:30:24 -0800

Zdar!
Mam taky D3 C/S a hlaska Access Violatiion se mi objevuje dost casto, ale chyba je asi ve Windowsech, protoze kdyz Delphi zavru a znova pustim, tak uz je to na nejakou dobu v pohode.
---
Filip Kinsky, student, amateur programmer :-))

On Sun, 20 Feb 2000 20:21:14 Lumir Karas wrote:
>Ahoj,
>
>mam problem. Kod nize vypisuje v radku While "Access violation at address ... Read of address FFFFFFFF" a ja nevim proc. Myslim si, ze je to dobre. Chyba vznika pri prazdnem retezci s. Funkce ma prevest cisla v retezci oddeleny znakem do ciselne podoby s ohledem na predcasne ukonceni tohoto retezce. Je to delano v D3 C/S. Muze mi nekdo poradit cim by to mohlo byt zpusobeno? Vim, ze bych to mohl osetrit predem tak, ze pri prazdnem retezci bych tuto funkci neprovedl ale myslim si, ze by to melo delat to samy.
>
>PS: Jeste podotykam, ze v WatchListu je s[a]=#11; a=1;
>
> Predem moc dekuji. Lumir.
>
>
>function TForm1.CtiTime(s: String): Real;
>var
> a, Hod: Byte;
> t: String;
>begin
> ...............
> t:='';
> a:=1;
> While (s[a]>='0') and (s[a]<='9') and (a<=Length(s)) do begin
> t:=t+s[a];
> Inc(a);
> end;
> If t<>'' then Hod:=StrToInt(t);
> ................
>end;
>


Angelfire for your free web-based e-mail. http://www.angelfire.com


ADMIN: FAQ Soutez

[*] Tomas Burger <slune(zv)yahoo(tec)com> - 21.2.2000 02:51:47 -0800 (pst)

DDV,

casto se stava, ze dotazy v nasi konferenci se opakuji
- prave na takoveto (casto) opakujici dotazy se buduji
FAQ sekce. Jednu takovou jsme zacali budovat i na
zaklade prispevku teto konference - najdete ji na
adrese http://delphi(tec)cz/faq.asp (ale to vsichni preci
vite).

A aby nase FAQ sekce byla vetsi a jeste vetsi,
rozhodli jsme se spolu s vyrobcem Delphi vyhlasit

soutez v plneni FAQ sekce.

Vsechny zadane FAQ nakonec slosujeme a desitku vitezu
odmenime. Ale vy se jiste pridate zcela nezistne, ze?
Plna FAQ sekce je v zajmu nas vsech.
(Formular na zadavani - ve dvou verzich - najdete na
adrese http://delphi(tec)cz/addfaq.asp).

Usilovnemu plneni FAQ sekce trikrat hura!

Tomas
-----------------------------
http://www.delphi(tec)cz/
mailto:Tomas.Burger(zv)delphi(tec)cz

__________________________________________________
Do You Yahoo!?
Talk to your friends online with Yahoo! Messenger.
http://im.yahoo.com


servisn� aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 21.2.2000 12:22:27

Jo jeste takovej detail tu service application pisu na zaklade sablony v
Delphi 4. Myslel jsem ze staci pridat do OnExecute to co chci provest a to
je vsechno, ale asi neni :( ???


----- P�vodn� zpr�va -----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 21. �nora 2000 10:14
P�edm�t: Re: servisn� aplikace


>
> >tak jsem napsal servisni aplikaci, bohuzel mi to hlasi pri startovani -
> >service did not return any error atd. nevite cim to je ?
>
> nejdulezitejsi vec, kterou musi service podporovat jet odpovidat Service
> Manageru na dotazy - cili volat na spravnych mistech SetServiceStatus
>
>
> Zdravi
> D> Toman
>
>

Vyber databaze

[*] Bosnis <bosnis(zv)atlas(tec)cz> - 21.2.2000 12:25:56


Rozhodne pouziti MSSQL nebo Oracle je podstatne lepsi nez Access.
MSSQL je jednodussi nez Oracle, jak uz vsechno byva i to je relativni. Ja
osobne po zkusenostech bych hledal databazi umoznujici rodelit databazi na
tabulkove prostory (tablespacey,dbspacey), coz jsou fyzicky samostatne
soubory, v nich jsou ulozeny nejake databazove objekty ( tabulky, indexy ).
Hlavni duvodem proc tabulkove prostory, je oddeleni uzivatelskych dat od
systemovych tabulek a objektu ( = urychleni ). Pokud se jedna o planovane
velke toky dat do jedne tabulky, lze ji umistit do samostatneho tabulkového
prostoru, ktery se umisti na rychly disk ( = dalsi zvyseni vykonu ). Pri
velkych presunech dat dochazi i k velke fragmentaci dat, kterou tabulkove
prostory svou existenci snizuji, ale je mozna tez defragmentace tabulkoveho
prostoru samostatne. O MSSQL Serveru jsem moc necetl, ale nic o tabulkovych
prostorech jsem tam nenasel, jedine co to pripomina je deklarace
databazovych zarizeni ( coz mohou byt take fyzicky samostatne soubory ), ale
z toho co jsem cetl nemaji uzavrenou povahu tak jako tabulkove prostory
uzavrenou povahou myslim to, ze pokud tabulku zalozim v nejakem tabulkovem
protoru, pak data teto tabulky nemohou byt v jinem tabulkovem prostoru ) - z
tohoto hlediska bych se rozhodl pro Oracle, ktery tabulkove prostory ma, i
kdyz bude narocnejsi na HW.

Ing. Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html


-----Původní zpráva-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za uživatele
Jaro
Odesláno: 21. února 2000 19:42
Komu: delphi-l(zv)fwd(tec)cz
Předmět: RE: Vyber databaze


> Zdravim,
>
> rad bych poprosil o radu. Mam delat databazi,
> ktera sice bude obsahovat asi tak 5 tabulek,
> ale hlavni z nich bude obsahovat 500 000 zaznamu
> za rok a bude to stale nabyvat.
> Z techto tabulek se budou delat nejake sestavy
> a statistiky.
> Potrebuje zajistit zalohovani a bezpecnost dat.
> Utahne to Access, nebo radeji doporucite SQL server?
> Mam na vyber MSSQL7 nebo Oracle 8.0.5
>


MS SQL 7 by byl rozhodne vhodnejsi nez Acces.
500 000 zaznamu rocne je hodne. Zalezi take
na tom zda to bude v siti nebo ne.
MS SQl je oproti Oracle levnejsi a ma podstatne
jednodussi administraci vcetne instalace.
Pokud jsi tedy zatim s zadnym serverem nepracoval,
tak je MS SQL 7 ta spravna volba.

Jaro

> Diky moc
>
> Bob
>

rozdielna velkost pri tlaceni BMP

[*] Ing. J�n Kuch�r�����!j��G - 21.2.2000 12:40:20

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

caute
vo svojom programe pouzivam tlac lubovolnej bitmapy, problem je ale v tom, ze
vytlacena bitmapa pomocou mojho programu je strasne malicka, pricom ked ten
isty obrazok vytlacim pomocou ineho grafickeho programu ( bez zmeny velkosti
obrazku ) je vytlaceny obrazok takmer 5 krat vacsi, pre ukazku dokladam aj kod.
>>>>>>>>>>>>>>>>>>>>>>POMOZTE<<<<<<<<<<<<<<<<<<<<<DIK<<<<

uses printers

begin printer.BeginDoc;
Bmp := TBitmap.Create;
Bmp.LoadFromFile('c:\kod.bmp');
printer.Canvas.Draw(10,10,Bmp);
Bmp.Free;
printer.EndDoc;
end;


pre uplnost pouzivam D4 - Win95


Registrace komponent (Was: MojMaskEdit nejde a nej

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 21.2.2000 12:51:07

On 20 Feb 00, at 23:43, Petr Vones wrote:

> Patrne se jedna o nedodrzeni zasady umisteni registracniho kodu do
> *SAMOSTATNEHO* unitu. Uz se to tu probiralo nekolikrat. Nikdy (!!!) by
> jsi nemel odkazovat primo ci neprimo na "design-time" unity z
> "runtime" kodu. Pokud mas tedy umisten kod registrace ve stejnem unitu
> jako kod komponenty, tak pri kompilaci se prekladac snazi najit kod
> desing-time unitu, ktery ale neexistuje jako DCU (ale jako DCP). Musis
> tedy vytvorit novy unit do ktereho umistis registraci komponent a
> property editoru. V drivejsich verzich Delphi byla tato zasada spise
> jen doporucenim, proto chybne napsany kod registrace prosel, ale od D5
> je toto jiz striktne vyzadovano. Pri prechodu na D5 se tento problem
> casto vykladal jako chyba Delphi, ale byla to jen chyba autoru
> komponent, ktera se vlekla verzemi. V D5 je zatim jeste cely kod
> DSGNINTF.PAS, takze to nekdy svadelo k tomu, prelozit tento unit misto
> oddeleni registracniho kodu do samostatneho unitu.

Ted ti nerozumim. DSGNINTF.PAS potrebuji, pokud vytvarim nove
vlastnosti, ktere chci zaregistrovat ke sve komponente. Kam tyto
registrace umistim, je, pravda, vec dalsi, ale zatim me to nezbavuje
potreby uvedene jednotky.

> V D6 by jiz nemel
> byt ani DSGNINTF.PAS, ale jen DSGNINTF.INT, takze takoveto "reseni" by
> opet nikam nevedly.

Pokud bude existovat stavajici uroven dokumentace, povazuji toto
reseni za vice nez nestastne. Kod uvedene jednotky potrbuji proto,
abych se mohl podivat, jak jsou jednotlive vlastnosti
implementovane pro registraci. Bez kodu a dokumentace by mohl
byt znacny problem odvodit svou novou vlastnost.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Access a OleDB Delphree komponenty

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 21.2.2000 12:51:07

On 21 Feb 00, at 1:39, Lukas Voborsky wrote:

> > Uved plnou cestu k databazi.
> > Nastav primo property v komponente TDFOdbConnect v tomto
> > poradi: Provider, Server (je-li), UserID, Password (je-li) a
> > Database (plnou cestu). Zkus sahnout do jmenovane metody a vnutit mu
> > natvrdo
> > I2:=DBPROMPT_COMPLETE;
> >
> > Pokud nic nepomuze, odkrokuj si jmenovanou metodu a napis mi
> > cislo chyby "h" z tohoto volani:
> > h := DBInit.Initialize;
> >
>
> Sice jsem se pripojil na mdb databazi, ale jen za podminky, ze mam
> CompletePrompt=true a Database nenastavenou, resp nastavim ji az v
> promptu v okamziku vytvoreni. Pokud se snazim neco nastavit do
> property Database, at v runtime nebo designtime, tak me to po pokusu o
> pripojeni zhlasi:

Aha, takze to bude asi chybou, ze v TConnect.InitDatabaseList nemam
testovani na CompletePrompt. Zkus tedy namisto kodu

if FProvider='MSDASQL' then
I2:=DBPROMPT_NOPROMPT else
I2:=DBPROMPT_COMPLETE;

napsat

if (FProvider='MSDASQL') or not CompletePrompt then
I2:=DBPROMPT_NOPROMPT else
I2:=DBPROMPT_COMPLETE;

Aby nebylo treba zadavat DBPROMPT_COMPLETE, bylo by asi treba doplnit
dalsi vlastnosti pomoci SetProperty. Popis najdes v dokumentaci k OLE DB
(hledej DBPROPSET_DBINIT), lze to nainstalovat z SDK primo z MS serveru.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Find v Db 3

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 21.2.2000 13:10:27

Zdravim,

bolo mi tu poradene, ze v mam v db hladat cez select * : par veci mi tam
nejde do hlavy. pretoze ked napisem select * from tab where podmienka, tak
mi do dataset da zanamy len vyhovuj�ce. Ale ked skoncim hladanie, chcem
ostat na hladanom zaname (logicky), ale aby v datasete boli zase vsetky
zaznamy. Ako to osetrit?

Mohol by mi nikto napisat zhruba popis toho, co sa ma vykonat po stlaceni
najdi prvy, najdi dalsi a po zatvoreni find dialogu?

Dik moc, Miso


Outlook Express

[*] rdocekal(zv)csas(tec)cz - 21.2.2000 13:11:06

> > Mam nasledujici problem: potrebuji z me aplikace nejakym
> zpusobem ridit
> aplikaci Outlook Express (vytvorit novy mail, precist dosle maily).
> >
>
> Myslim ze na ten ucel ktory spominas, (vytvorit novu postu,
> precitat doslu
> postu) uplne postacuje funkcnost ukryta v Simple MAPI (unit
> Mapi). Navyse je
> aplikacia flexibilnejsia - spolupracuje nielen s OE ale aj s
> inymi postovymi
> klientami podporujucimi SMAPI. Popis najdes v helpe, pripadne
> si o kratky
> priklad napis na moju adresu.
>
> Palo.
>

Hmm, pokud vim, neni pro cinnost OE nutno mit nainstalovane MAPI. Neco
jineho je ovsem Outlook 98 nebo 2000 coby Exchange klient, tam je MAPI
nezbytne. OE je AFAIK pouze pro SMTP postu.

S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367


servisn� aplikace

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 21.2.2000 13:12:24



>setservicestatus ?
>takovou funkci nemuzu najit v helpu ?
ve Win32 helpu je (D5 professional i D3 Professional)

>muzete mi nekdo poslat nejaky funkcni priklad ?

ono to neni tak uplne jednoduche. Ilustrativni jsou ukazky od MS na MSDN
CDckach.....

Zdravi
D. Toman

Podivny focus

[*] Pavel K�ehula <pavel(zv)mas(tec)cz> - 21.2.2000 13:34:56

D5Pro, NT4SP4

Zdravim,

mam problem s nejakym podivnym chovanim focusu ve svoji aplikaci, stava se mi, ze
napriklad kliknu mysi na edit box, kurzor se presune, ale komponenta neprijma zadne
zpravy z klavesnice, takze na edit musim kliknout jeste jednou. Nebo pro preneseni fokusu
musim tlacitko mysi dele drzet. Pri prechazeni mezi prvky pomoci tabulatoru je vse v
poradku.

Nevite nekdo, cim by to mohlo byt?

Dik, Pavel


----------------------------------
Pavel Krehula <pavel(zv)mas(tec)cz>
M and S spol. s r.o. Boskovice
----------------------------------

Find v Db 3

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 21.2.2000 13:54:31


> -----P�vodn� zpr�va-----
> Od: Michal Hlavac [mailto:7hlavac(zv)st.fmph.uniba.sk]
> Odesl�no: 21. �nora 2000 13:10
> Komu: Delphi F�rum
> P�edm�t: Find v Db 3
>
>
> Zdravim,
>
> bolo mi tu poradene, ze v mam v db hladat cez select * : par
> veci mi tam
> nejde do hlavy. pretoze ked napisem select * from tab where
> podmienka, tak
> mi do dataset da zanamy len vyhovuj�ce. Ale ked skoncim
> hladanie, chcem
> ostat na hladanom zaname (logicky), ale aby v datasete boli
> zase vsetky
> zaznamy. Ako to osetrit?
>
> Mohol by mi nikto napisat zhruba popis toho, co sa ma vykonat
> po stlaceni
> najdi prvy, najdi dalsi a po zatvoreni find dialogu?
>

Problem je v tom, ze prikaz select neni pro hledani
ale pro vyber dat.
V datasetu jsou vsechny zaznamy, ktere specifikujes selectem,
tedy, kdyz misto stavajici mnoziny dat chces nacist
vsechna data, odstran podminku. Konkretne misto:

select * from tab where podmienka

napis:

select * from tab

V kazdem pripade je jedine mozne Ti doporucit naucit se alespon
zaklady SQL anebo pouzivat TTable namisto TQuery.

Jura


Outlook Express

[*] caoperator(zv)ozjc.cpost(tec)cz - 21.2.2000 13:57:52

Zdravim,

Mam dotaz - vetsina docela dobrych unit a komponent je v D5, takze my zaostali :) uzivatele D4 a nize mame smulu. Je mozne nejakym zpusobem tyhle komponenty z D5 nejak dostat do D4?
Tahle unita MAPI je soucasti D4? Snazil jsem se to najit v helpu a v souborech, ale nikde nic... Pokud neni soucasti D4, kde se da najit?

Diky za odpoved.

David Viktora

-----Original Message-----
From: pstolc(zv)sc.sknet.sk [mailto:pstolc(zv)sc.sknet.sk]
Sent: Monday, February 21, 2000 11:24 AM
To: <delphi-l(zv)fwd(tec)cz>; caoperator(zv)ozjc.cpost(tec)cz
Subject: RE: Outlook Express


From: <bigzero(zv)post(tec)cz>
Sent: Sunday, February 20, 2000 3:41 PM
Subject: Outlook Express


> Mam nasledujici problem: potrebuji z me aplikace nejakym zpusobem ridit
aplikaci Outlook Express (vytvorit novy mail, precist dosle maily).
>

Myslim ze na ten ucel ktory spominas, (vytvorit novu postu, precitat doslu
postu) uplne postacuje funkcnost ukryta v Simple MAPI (unit Mapi). Navyse je
aplikacia flexibilnejsia - spolupracuje nielen s OE ale aj s inymi postovymi
klientami podporujucimi SMAPI. Popis najdes v helpe, pripadne si o kratky
priklad napis na moju adresu.

Palo.


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000

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


zjisteni bezici aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 21.2.2000 14:08:17

Ahoj
nevite nekdo jak zjistit zda nejaka aplikace bezi ? Napr. znam jmeno exe
souboru services.exe a chci zjistit zda prave bezi nebo ne. Neco jako kdyz
se koukam do task manageru.

zjisteni bezici aplikace

[*] azeleny(zv)csas(tec)cz - 21.2.2000 14:30:16

V Win NT je PS API, ktere vyuziva napriklat ps.exe z Resourcekitu. Bud se to
da napsat na PS API primo, nebo si spust PS (existuji i free implementace) s
presmerovanym vystupem a pak si prohlidnot kyzeny vystupni soubor.

PS API se jmenuje necekane psapi.dll, mozna je to s podtrzitkem...

Snad to nejak pomuze.

----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.> ----------
> Odes�latel: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
> Odpov�di: delphi-l(zv)fwd(tec)cz
> Odesl�no: 21. �nora 2000 14:08
> Komu: delphi konference
> P�edm�t: zjisteni bezici aplikace
>
> Ahoj
> nevite nekdo jak zjistit zda nejaka aplikace bezi ? Napr. znam jmeno exe
> souboru services.exe a chci zjistit zda prave bezi nebo ne. Neco jako kdyz
> se koukam do task manageru.
>
>

Outlook Express

[*] Grubhoffer(zv)software602(tec)cz - 21.2.2000 14:31:02


> Hmm, pokud vim, neni pro cinnost OE nutno mit nainstalovane MAPI. Neco
> jineho je ovsem Outlook 98 nebo 2000 coby Exchange klient, tam je MAPI
> nezbytne. OE je AFAIK pouze pro SMTP postu.
>

Neni treba mit instalovane MAPI a presto lze Simple MAPI pouzivat a navic to bude bez jedine upravy kodu chodit jak s Outlookem Express, tak napr. s Netscape Messengerem a Eudorou - zkratka s libovolnym postovnim klientem, ktery podporuje SimpleMAPI rozhrani. Jak je to mozne a jak na to: Je treba volat Simple MAPI funkce nikoliv "natvrdo" z MAPI32.DLL (jak je to napsano v MAPI.PAS), ale z DLL dodavane s klientem. Kde vzit jeji jmeno - jako hodnotu HKEY LOCAL MACHINE\Software\Clients\Mail\<JMENO KLIENTA - tedy napr. Outlook Express>\DLLPath. Napr. pro Outlook Express to bude skoro jiste C:\PROGRAM FILES\OUTLOOK EXPRESS\MSOE.DLL. Jmeno klienta, ktereho ma user nastaveneho jako defaultniho lze zjistit v HKEY LOCAL MACHINE\Software\Clients\Mail.

JG

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


OT: Interbase 6 FREE

[*] Ladis <delphin.hce(zv)atlas(tec)cz> - 21.2.2000 14:32:15

Dobry den,
chtel bych se zeptat jak to vlastne bude s tou InterBejskou 20
FREE bude server, nebo i klienti. Dokonce jsem slysel, ze by to mnel
bejt opensource.

Diky Ladis


Outlook Express

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.2.2000 14:48:58

Podivej se do helpu k WinAPI (dodavany k Delphi) na funkci MAPISendMail. Kdyz si
z www.tory.ru stahnes komponentu TEmail, mas vse co potrebujes k cteni a
posilani posty.

====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================

----- Original Message -----
From: <caoperator(zv)ozjc.cpost(tec)cz>>Zdravim,

>Mam dotaz - vetsina docela dobrych unit a komponent je v D5, takze my zaostali
:) uzivatele D4 a nize mame smulu. Je >mozne nejakym zpusobem tyhle komponenty z
D5 nejak dostat do D4?
>Tahle unita MAPI je soucasti D4? Snazil jsem se to najit v helpu a v souborech,
ale nikde nic... Pokud neni soucasti D4, >kde se da najit?

>Diky za odpoved.

>David Viktora

TMemo

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 21.2.2000 15:35:51

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.

Je to jednoduche. Posledni radek textu se da smazat prikazem
Memo.Lines.Delete(Memo.Lines.Count-1);

Jaromir Cermak

-----Original Message-----
From: Jan Bachor [mailto:bachor(zv)iol(tec)cz]
Sent: Sunday, February 20, 2000 9:04 PM
To: delphi-l(zv)fwd(tec)cz
Subject: TMemo


dobry den

jak vymazu posledni radek z mema, nebo posledni vlozeny text?

diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb <http://web.pinknet(tec)cz/~johnb> ]=[
john(zv)iol(tec)cz <mailto:john(zv)iol(tec)cz> ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------


Interbase 6 FREE

[*] Pavel Cisar \(Inprise CZ\) <pcb(zv)atlas(tec)cz> - 21.2.2000 15:40:18

nejvice informaci lze dnes ziskat na adrese
www.interbase2000.org


----- Original Message -----
From: Ladis

Dobry den,
chtel bych se zeptat jak to vlastne bude s tou InterBejskou ?
FREE bude server, nebo i klienti. Dokonce jsem slysel, ze by to mnel
bejt opensource.

Vlastni SQL funkce

[*] Michal Motalik <motalik(zv)cross(tec)cz> - 21.2.2000 15:45:05

Ahojte,

nemate nahodou nekdo zkusenosti s vytvarenim vlastnich funkci pro SQL?

Priklad:
SELECT mesic, MujPrumer(hodnota) FROM tabulka WHERE kod>100 GROUP BY mesic

Za jakoukoliv stopu diky

Pavel CABAK
cabak(zv)cross(tec)cz

Find v Db 3

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 21.2.2000 16:09:30

>Problem je v tom, ze prikaz select neni pro hledani
>ale pro vyber dat.
>V datasetu jsou vsechny zaznamy, ktere specifikujes selectem,
>tedy, kdyz misto stavajici mnoziny dat chces nacist
>vsechna data, odstran podminku. Konkretne misto:

>select * from tab where podmienka

>napis:

>select * from tab

Ty sa zase nauc trosku lepsie citat. Ja som hovoril o hladani vo findDialogu

>V kazdem pripade je jedine mozne Ti doporucit naucit se alespon
>zaklady SQL anebo pouzivat TTable namisto TQuery.

SQL vselku ovladam.

Miso


ADO a skripty

[*] Zak Robert <nrsys(zv)psn.sk> - 21.2.2000 16:11:00

Ahoj,

Nepisem do konferencie, ostatni by zase boli nervozni ze som tam nechal stary text a aj tak nik iny nenapisal...

>>1. Pouzivam ADOEXPRES, D5 a MSSQL7. Pokial pouzijem komponentu
>>TADODataSet, neviem ako v nej spustim prikaz ktory nema navratovu hodnotu.
>>Aka je u tejto komponenty obdoba ADOQuery.ExecSQL? Alebo to neexistuje?
>
>
>a) komponentu TADOCommand
>b) metodu TADOConnection.execute - tady odzkouseno na delsim skriptu i
>stransakcemi

Zo vsetkych stran pocujem, ze pokial pouzivam SQL mam pouzit TAdoDataSet, lebo vraj tie ostatne (Query,Command) maju v sebe akesi chyby ohladom nacitavania smernikov a pod. Preto chcem spustat skripty cez AdoDataSet, alebo je to cele blbost a ten AdoCommand nerobi ziadne problemy?

>
>>2. Ako poslat takyto skript s vysledkom? :
>>DECLARE (zv)A CHAR(20)
>>SET (zv)A=1
>>DELETE FROM TAB1
>>select 'VYSLEDOK JE',(zv)A
>>
>>Ten select mi vrati vysledok iba v pripade, ze vyhodim riadok "DELETE FROM
>>TAB1", inak dostanem hlasku: "Commandtext does not return a result set".
>>Skript, aj viacriadkovy prebehne vporiadku, iba nedostanem ten vysledok.
>>Chcem sa preto spytat, ako je mozne zapisat skript tak, aby som po vykonani
>>viacerych prikazov (insert,delete ...) dostal aj nejaky vysledok v podobe
>>select-u!?
>>Rovnaky problem mam aj u vlozenych procedur...
>
>
>TADODataSet - vyzkouseno i na delsi skripty i declare, transakce apod.
>pokud das CommandType:=cmdStoredProc tak to muzes pouzit i na
>ulozenou proceduru


Ak ti to naozaj funguje a ten moj skript ti vrati hodnoty, napis co mas ako nastavene aby po vykonani INSERT a DELETE vratil este aj vysledok selectu! Mne to vrati iba v pripade ze zadefinujem vystupny parameter z prveho skriptu (napr. ten "(zv)a" ) a ten SELECT dam do dalsieho skriptu s tym ze do neho poslem to (zv)A ako vstupny parameter, co sa mi zda dost nepohodlne. Ak ti teda funguje aj to co mam napisane, co mam kde nastavit aby to slo?

Robo


zjisteni bezici aplikace

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 21.2.2000 16:43:29

uz to mam delam to pres TLHelp32 funkce process32first,process32next funguje
to jak pod win 95,98,2000 pod NT zatim netestovano, ale pravdepodobne to
taky pujde

----- P�vodn� zpr�va -----
Od: <azeleny(zv)csas(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 21. �nora 2000 14:30
P�edm�t: RE: zjisteni bezici aplikace


> V Win NT je PS API, ktere vyuziva napriklat ps.exe z Resourcekitu. Bud se
to
> da napsat na PS API primo, nebo si spust PS (existuji i free implementace)
s
> presmerovanym vystupem a pak si prohlidnot kyzeny vystupni soubor.
>
> PS API se jmenuje necekane psapi.dll, mozna je to s podtrzitkem...
>
> Snad to nejak pomuze.
>
> ----------------------------------------------------------------------
> Ale� Zelen�
> �esk� spo�itela a.s
> Na Per�t�n� 1
> 113 98 Praha 1
> Email: azeleny(zv)csas(tec)cz
> ----------------------------------------------------------------------
> Due to technical difficulties tomorrow has been postponed indefinitely.
>
> > ----------
> > Odes�latel: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
> > Odpov�di: delphi-l(zv)fwd(tec)cz
> > Odesl�no: 21. �nora 2000 14:08
> > Komu: delphi konference
> > P�edm�t: zjisteni bezici aplikace
> >
> > Ahoj
> > nevite nekdo jak zjistit zda nejaka aplikace bezi ? Napr. znam jmeno exe
> > souboru services.exe a chci zjistit zda prave bezi nebo ne. Neco jako
kdyz
> > se koukam do task manageru.
> >
> >

rozdielna velkost pri tlaceni BMP

[*] Lauko �tefan <lauko(zv)salamon.sk> - 21.2.2000 16:48:01


Musis vypocitat pomer rozlisenia monitoru a tlaciarne a potom pouzit StretchDraw.
Tlaciaren ma skoro vzdy viacej "PixelsPerInch". Zvycajne (96/300, 96/600).
Napr.

Pomer := GetDeviceCaps(Printer.handle, LOGPIXELSY) div GetDeviceCaps(0, LOGPIXELSY);
Printer.Canvas.StretchDraw(rect(0,0,Bmp.Width * Pomer,Bmp.Height * Pomer),Bmp);


S pozdravom Lauko. ----- Original Message -----
From: Ing. J�n Kuch�r
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, February 21, 2000 12:40 PM
Subject: rozdielna velkost pri tlaceni BMP


caute
vo svojom programe pouzivam tlac lubovolnej bitmapy, problem je ale v tom, ze
vytlacena bitmapa pomocou mojho programu je strasne malicka, pricom ked ten
isty obrazok vytlacim pomocou ineho grafickeho programu ( bez zmeny velkosti
obrazku ) je vytlaceny obrazok takmer 5 krat vacsi, pre ukazku dokladam aj kod.
>>>>>>>>>>>>>>>>>>>>>>POMOZTE<<<<<<<<<<<<<<<<<<<<<DIK<<<<

uses printers

begin printer.BeginDoc;
Bmp := TBitmap.Create;
Bmp.LoadFromFile('c:\kod.bmp');
printer.Canvas.Draw(10,10,Bmp);
Bmp.Free;
printer.EndDoc;
end;


pre uplnost pouzivam D4 - Win95


Delphi 5 Ole Automation servers a Excel

[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 21.2.2000 17:59:56

A mohl by jsi mi (nam) prosim poslat priklad toho, co ti chodi? (pokud to
neni tajne :-)))))

Ing. Petr Svejda
software specialist

> nasel jste prosim nekdo samplik, jak pouzit ty jinak krasne komponenty z
D5
> pro Excel?
> Word mi funguje celkem dobre...
>
> Jakykoliv smalpik vitan...

P�ipojen� k internetu

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 21.2.2000 18:45:57

Ahoj,

Uvedene komponenty se nachazi na http://www.rtfm.be/fpiette

a uz se to tu jednou probiralo viz nize :

Vasek Navrat wrote:

Ahoj !
Mam pro Tebe reseni tohoto problemu. Nasledujici funkce testne, jestli ma v
ten okamzik pocitac umoznen pristup na Internet - myslim, ze by to melo fung
ovat se vsemi druhy netoveho pripojeni, ale na modemu to funguje 100%.

Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved: LongInt)
: Boolean; stdcall; external 'wininet.dll';

implementation

{$R *.DFM}

Function TForm1.Test_Pripojeni (): boolean;
var Flagy: LongInt;
begin
Flagy := 0;
Result := InternetGetConnectedState(Flagy, 0);
end;

{pokud funkce vrati hodnotu TRUE, pocitac je prave pripojen na Net}


S pozdravem...
Vasek Navrat
programator diskmagu Engine

-------------

a pripojis se takhle

C:\WINDOWS\RUNDLL32.EXE RNAUI.DLL,RnaRunImport c:\internet.dun

M.Jirman

--Original Message--
From: Michal Kop��ek <m.kopacek(zv)volny(tec)cz>

kde takovou knihovnu najdu?

d�k

************************************
Michal Kop��ek
http://www.hanatour(tec)cz/mikosoft
m.kopacek(zv)volny(tec)cz
mikosoft(zv)seznam(tec)cz
xkopm13(zv)vse(tec)cz
************************************


-----Original Message-----
>From Lud�k ZITA

____
Zkus knihovnu RAS od F.Pietteho.

Lud�k Zita


Vlastni SQL funkce

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 21.2.2000 18:52:39

Ahoj,

> nemate nahodou nekdo zkusenosti s vytvarenim vlastnich funkci pro SQL?
> Priklad:
> SELECT mesic, MujPrumer(hodnota) FROM tabulka WHERE kod>100 GROUP BY
> mesic
****tohle silne zavisi na pouzitem databazovem stroji.

Slavek

> Pavel CABAK


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------


Vyber databaze

[*] Jaro <jaro(zv)sinea(tec)cz> - 21.2.2000 10:41:54 -0800

> Zdravim,
>
> rad bych poprosil o radu. Mam delat databazi,
> ktera sice bude obsahovat asi tak 5 tabulek,
> ale hlavni z nich bude obsahovat 500 000 zaznamu
> za rok a bude to stale nabyvat.
> Z techto tabulek se budou delat nejake sestavy
> a statistiky.
> Potrebuje zajistit zalohovani a bezpecnost dat.
> Utahne to Access, nebo radeji doporucite SQL server?
> Mam na vyber MSSQL7 nebo Oracle 8.0.5
>


MS SQL 7 by byl rozhodne vhodnejsi nez Acces.
500 000 zaznamu rocne je hodne. Zalezi take
na tom zda to bude v siti nebo ne.
MS SQl je oproti Oracle levnejsi a ma podstatne
jednodussi administraci vcetne instalace.
Pokud jsi tedy zatim s zadnym serverem nepracoval,
tak je MS SQL 7 ta spravna volba.

Jaro

> Diky moc
>
> Bob
>

P�ipojen� k internetu

[*] Lud�k ZITA - 21.2.2000 20:27:17

Michal Kop��ek
> Sent: Monday, February 21, 2000 9:54 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: P�ipojen� k internetu
>
>
> kde takovou knihovnu najdu?
>

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

Lud�k ZITA



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