Archív konference Delphi

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

mail

[*] Ji�� Fait���}���6���3 - 11.4.2000 06:01:01

No jak jde zaroven timto prikazem odeslat take soubor jako prilohu?

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Virag, Ivan
Sent: Monday, April 10, 2000 5:54 PM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: RE: mail


jednoduche poslani mailu:


ShellExecute(Application.Handle, NIL, 'mailto:franta(zv)seznam(tec)cz', NIL,NIL,
SW_SHOWNOACTIVATE);

Ivan Virag
---
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

Info o otevrenem souboru

[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 11.4.2000 06:57:38


Ahoj vsichni,

existuje nejaka jednoducha cesta jak zjistit, ktery uzivatel ma ze ktereho
pocitace otevreny konkretni soubor?

Jinymi slovy - pomoci funkce FileOpen(FN, fmOpenRead) zjistim, ze soubor se
pouziva (vrati -1) a potreboval bych vedet alespon jmeno PC, ze ktereho je
soubor otevren. Zkousel jsem to najit v projektu LAN Manager od Petra
Vonese, ale je to prilis rozsahle na me casove moznosti. Nicmene kdyz to
jinak nepujde...

Sit je Peer-to-peer IPX/SPX W95/8/NT Work

Diky Mira


IB a Numeric 9,2

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 07:34:32

On 10 Apr 00, at 12:54, Radek KALA wrote:

> 1. Problem neni v SW, protoze kdyz to neni na IB 4.0 ale na 5.6
> tak to chodi dobre
> 2. Jak snad plyne z textu pouzivam primy pristup z delphi 5.0
> 3. Do ted jsem si myslel, ze 9.2 je jeste integer a az 10 a vice ulozi
> jako DOUBLE. Proto jsem chtel pouzivat 9.2 abych to mel rychlejsi a
> mensi, pokud tam dam 10.2 tak uz to fuguje vsude.

Pokud chces double i pro 9.2, musis si zapnout BCD.


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


NVarchar a MSSQL7

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 07:34:32

On 10 Apr 00, at 13:11, Ren� Otisk wrote:

> D3, MS SQL7.0, RxLib2.75, MODBC
>
> Po spusteni "EXEC sp_helprotect NULL, dbo" mi to vrati jen sloupce,
> ktere nejsou v UNICODE. Jenze ja bych potreboval dostat i Ownera,
> Object a Grantora (sysname - nvarchar(128)). Japa na to?

Jestli myslis ownerem to same co ja, pak zkus SUSER_SNAME().


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


Konfview a PDOXUSRS.LCK

[*] Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz> - 11.4.2000 08:23:28

Slab�, Petr (Pilsen), 11.04.2000 08:22:53
Jan Naiser wrote:

>> ...
>> Nezjistil jsem zatim, jak to souvisi s nastavenim BDE. Ktere parametry na to
>> mohou mit vliv. (LOCAL SHARE ??) Pokrocil jste nekdo dale?
>>
>> A co tedy ovlivnuje velikost (narustani) souboru PDOXUSRS.LCK a jak se to da
>>ohlidat?

U Borlandu maji presne na toto tema jedno techinfo. Nechce se mi to ted hledat, takze nemuzu rict jmeno souboru, ale rika se v nem zhruba toto:

Zabranit nadmernemu narustani PDOXUSRS.LCK lze:

1) Nastavenim local share na false
2) Tim, ze db soubory jsou v jinem adresari nez program
3) Pred spustenim velkeho mnozstvi query je nutno zavrit veskere TTable, ktere pracuji na stejne databazi.

Vyzkousel jsem kombinaci 2 a 3 a podarilo se mi naimportovat veskera data.

Best regards,
PS.

Konfview a PDOXUSRS.LCK

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 11.4.2000 08:31:10


Ahoj,

tak Borland o tom pise v TI2993 Removing "Lock file has grown too large"
Error

1) The Executable is in the same directory as the table.
2) The Private Directory is not correctly set or not set
at all.
3a) Delphi: Having a TTable open on a paradox table and
then performing multiple TQuery operations.

3b) C / C++: Having a table open with DbiOpenTable and
then performing multiple queries with DbiQExec and/or
DbiQExecDirect.
4) LOCAL SHARE set to true in the BDE Configuration
Utility on the System page.


To solve the problem, make sure that your application has
done ALL of the following:

1) Under the directory where the executable is, create
three new directories: TABLES, PRIV, and NET. Place
all the tables for the application into the TABLES
directory.
2) Set the session's private directory to the PRIV
directory. Take the following steps according to
the software you are using.

DELPHI:
Session.PrivateDir := ExtractFilePath(ParamStr(0)) + 'PRIV';

C / C++:
DbiSetPrivateDir(szPath);
// szPath is the fully qualified path (not relative)
// to the PRIV directory.

3) Set the session's network directory to the NET
directory. Take the following steps according to
the software you are using.

DELPHI:
Session.NetFileDir := ExtractFilePath(ParamStr(0)) + 'NET';

C / C++:
DbiSetProp(hSes, sesNETFILE, (UINT32)szPath);
// szPath is the fully qualified path (not relative)
// to the NET directory.

// hSes is the current session handle. This can be

// retrieved using the DBiGetCurrSession function.

4) If LOCAL SHARE is set to true and you are not sharing
tables between different applications at the same time,
change LOCAL SHARE to false.

The above steps will correct the Lock File Too Large error.


To jsou rady, co ? Ja osobne doporucuju mazat, mazat, mazat.

Martin


----- Original Message -----
> konecne jsem se dostal pred casem k tomu, abych zacal pouzivat take
> konfview. Jak uz tu pred casem probehlo, nastal pad pri nacitani
DELPHI.TXT
> na zaznamu 1532. Zjistil jsem, ze pad se deje pote, co se soubor
> PDOXUSRS.LCK naplni na hranici neco pres 26MB. Pote to zahlasi tu znamou
> chybu "Invalid parametr". Kdysi jsem v programu uz podobny zadrhel mel.
> Tehdy jsem musel optimalizovat (redukovat) pouziti SELECTU v Query. Zda
se,
> ze nekolikanasobne pouzivani vede k rapidnimu zvetseni jmenovaneho souboru
a
> nakonec k padu. Pokud se sekce na kotrolu duplicity pri nacitani
vyblokuje,
> nacte se vse v pohode a LCK se nezvetsuje. Staci si nastavit breaky po 500
> zaznamech a podivat se na velikost LCK.
> Po ukonceni formu pro nacitani se velikost LCK opet redukuje na unosnou
> velikost.
>
> Nezjistil jsem zatim, jak to souvisi s nastavenim BDE. Ktere parametry na
to
> mohou mit vliv. (LOCAL SHARE ??) Pokrocil jste nekdo dale?

NVarchar a MSSQL - 2

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

Ahoj,

to jadro problemu, ktere by i me zajimalo, neni, jak nejakou oklikou
ziskat ownera apod. (to je reply na Zbyskovu odpoved, kterou jsem
omylem smazal), ale proc MSSQL vubec nevrati sloupce typu
nvarchar. Resp. je mozna vrati, ale aplikace je nevidi. Zajimave je,
pouha zmena typu na char problem resi - tj. zda se mi, ze jde o
nejakou chybu SQL serveru.

David


Web aplikace ISAPI

[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 11.4.2000 09:06:02

--=======3A33169F=======
Content-Type: text/plain; charset=iso-8859-1; format=flowed; x-avg-checked=avg-ok-15CF1DD3
Content-Transfer-Encoding: quoted-printable

dekuji za prispevky k tomuto tematu. Chvili mi to trvalo, nez jsem to=20
zprovoznil, ale tohle mi fakt pomohlo a povazuji to za reseni.
btw: o programu msconfig jsem slysel poprve a mohu rict, ze se mi libi. je=
=20
lepsi nez sysedit.

At 14:13 7.4.2000 +0200, you wrote:

>Mne se osvedcilo nastavit PWS tak, aby se automaticky nespoustel pri startu
>pocitace - pak se totiz chova tak, jak popisujete.
>
>MSCONFIG -> Spusteni pri startu -> tam vypnout.
>
>PWS se musi spoustet jako prirazena aplikace pri debugovani sam. NEPOUSTET
>RUCNE!
>
>Pak debugovani funguje presne tak, jak je popsano v helpu Delphi (D4 C/S) o
>debugovani ISAPI a NSAPI aplikaci.
>
>Honza.
>
> > REM BEGIN
> > net stop "World Wide Web Publishing Service"
> > net stop "IIS Admin service"
> > net start "World Wide Web Publishing Service"
> > REM END
> >
> > pokud mate CZ Web server, podivejte se do sluzeb a prepiste si
> > tento batch pro vase nazvy. Nepamatuju si to presne, ale cesky se=
jmenuji
> > myslim nejak jako:
> > "Sluzba publikovani na siti WWW" a
> > "Sluzba spravce systemu IIS" (samozrejme s diakritikou a v 852)
> >
> > Jura
>
>
>---
>P=F8=EDchoz=ED zpr=E1va neobsahuje viry.
>Zkontrolov=E1no antivirov=FDm syst=E9mem AVG (http://www.grisoft(tec)cz).
>Verze: 6.0.127 / Virov=E1 b=E1ze: 60 - datum vyd=E1n=ED: 21.2.2000

--=======3A33169F=======
Content-Type: text/plain; charset=us-ascii; x-avg-checked=avg-ok-15CF1DD3


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

--=======3A33169F=======--


Enable BCD & Oracle

[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 11.4.2000 09:11:14

--=======61D96EB=======
Content-Type: text/plain; charset=us-ascii; format=flowed; x-avg-checked=avg-ok-15CF1DD3

Ahojte,
chtel bych se zeptat, jakym zpusobem resite problemy desetinych mist v
databazi. Ja jsem zjistil, ze na interbasi potrebuji mit nastavene enable
bcd na true (jinak to TDbEdit nelze zapsat desetinna cast). Potom jsem
program instaloval na Oracle a tam to fungovalo presne naopak. Problem by
neni ani tak v nastaveni BDE, ale spis
pri tvorbe programu. Pokud mam nastavene enable bcd na true, tak se mi
vsude vkladaji fieldy jak TBCDField.

chtel bych poradit, jakym zpusobem mam vytvaret aplikaci aniz bych musel
drzet dve verze s (TFloatField/TBCDField)?

Dik
--=======61D96EB=======
Content-Type: text/plain; charset=us-ascii; x-avg-checked=avg-ok-15CF1DD3


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

--=======61D96EB=======--


problem s TTable.Emptytable

[*] petr.palicka(zv)atlas(tec)cz - 11.4.2000 09:19:47

tak tedy

-----P�vodn� zpr�va-----
Od: Delphi [SMTP:delphi(zv)dcomm(tec)cz]
Odesl�no: 29. b�ezna 2000 11:35
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: problem s TTable.Emptytable

Tohle jsem resil taky.
Myslim, ze nejdulezitejsi je nemit tabulku nastavenou na Table.active = true
uz v navrhu programu (tzn. v nastaveni table v modulu), ale otevrit ji rucne
az za behu. Rozdil je v tom, ze nasledne prikazy ala Table1.active := True,
False nebudou ignorovany, ale provedou se. Proc to tak je netusim.... ale
takhle jsem to nakonec rozbehal...

nejsou ignorovany, normalne se provedou, ale v delfach jsou ty tabulky prece stale otevreny ne?
zatimco pokud v designeru nastavis active na False, tak jsou zavreny, a muzes si je potom klidne vymazat.
tedy za predpokladu, ze je oteviras exclusive:

Table1.Exclusive:=True;
Table1.Open;
Table1.EmptyTable;
Table1.Close;
Table1.Exclusive:=False;

:-)

dekuji peca


Seznam funkc� Delphi

[*] petr.palicka(zv)atlas(tec)cz - 11.4.2000 09:20:26

hmm,
a co takhle object pascal help?
nekde jsem to mezi helpy od delf videl...

dekuji
peca

-----P�vodn� zpr�va-----
Od: Pavel �ern� [SMTP:cerny(zv)cerny-ps(tec)cz]
Odesl�no: 10. dubna 2000 10:16
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Seznam funkc� Delphi

Zdravim zkusene, kteri maji v maliku Delphi dokumantaci

Da se nekde najit kompletni seznam funkci a procedur, ktere jsou
v Delphi k dispozici ?

Nemyslim tim metody objektu, ale samostatne procedury a funkce.
Potesil by nejaky tematicky organizovany seznam nebo aspon
abecedni seznam.

Prochazel jsem helpy, ale nic takoveho jsem nenasel.
Dik za odpoved.

Pavel �ern�
email: pavel(zv)cerny-ps(tec)cz


Zatuhnuti aplikace v D5

[*] petr.palicka(zv)atlas(tec)cz - 11.4.2000 09:21:07

nazdarek,
delam neco podobnyho,
ale de mi to jak psovi pastva, vetsinou nemam cas,
nekdy se mi proste nechce, nebo delam neco jineho...

ty image jsou podle me kravina (bez urazky, je to muj soukr. nazor),
ja mam nasledujici ideu:

jeden TImage, do kteryho se kresli;
v tabulce (paradox, ale je mozne jakekoliv vlastni reseni) mam ulozene jednotlive obrazky (textury);
ikdyz ja tam mam klic do jine tabulky, ve ktere je to ulozeno jako blob;
to aby pro vsecky vyskyty jednoho obrazku (textury) se o ukladalo do abulky jen jednou;
no a jsou tam take souradnice obrazku a rozmery (o. je mozne to roztanout ci smrsknout);
je pravda, ze pouzivam hexovou (sestiuhelnikovou) sit, takze kdyz user ukaze nekam do mapy tak vym na co ukazuje

nicmene je mozne, ze delame (nebo spis ty delas, ja se loudam) oba totez,
chtel bych udelat hexovy/ctvereckovy editor map pro hry na hrdiny;

pokud to neni tajne, tak se ozvi, treba navazem spolupraci...

teda az dodelam soucasny projekt...

dekuji
peca

-----P�vodn� zpr�va-----
Od: Martin Pe�ek [SMTP:pesek.martin(zv)mymail(tec)cz]
Odesl�no: 10. dubna 2000 12:06
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Zatuhnuti aplikace v D5

Zdravim!
Jak uz jsem psal tak delam editor map pro moji budouci hru. Takze si muzes
vybrat texturu a usadit ji na mapu (to jsou TImage vedle sebe a tvori jakoby
celek - mapu). Nenapada me jak bych to mohl udelat do jednoho TImage. Mozna
pomoci canvasu, ale to bych potom asi nezjistil co na kterym poli je a tim
padem bych to asi neulozil (ted to delam tak, ze i s tou texturou predam
parametr TAG, a pak to cyklem projizdim a ukladam).

S pozdravem Martin Pesek, amatersky programator
D5 Ent., W98

From: Martin Pe�ek <pesek.martin(zv)mymail(tec)cz>
>Mozna to zpusobuje pocet komponent TImage (cca 566).

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Uff! Proc jich tam mas tolik, neslo by to vyresit nejak jinak ? Vzdyt staci
mit
napriklad jen jeden TImage a do neho nahravat obrazky dle potreby.

Petr Vones, amatersky programator


Delphi days a MSDE

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 11.4.2000 09:38:09

Financne se mi vyplatilo se mi koupit VB Learning a pak upgrade na
Professional. Uspora si 5k Kc.

ing. Michal K�s
TANGO software s.r.o.
pokladn� syst�my pro restaurace a obchody
Krymsk� 42
360 01 Karlovy Vary
017/32 264 68, 32 258 86
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz


> Miroslav �ipel
>
>
> MSDE je sou��st� Office 2000 Premium (bez mo�nosti voln�ho ���en�) a
> Developer Edition (v�etn� licence typu "Runtime" pro jeho
> voln� ���en�).
> D�le si ho mohou zdarma st�hnout z Webu (nebo objednat za manipula�n�
> poplatek instala�n� CD) majitel� licence na Visual Studio 6.0
> Professional
> nebo Enterprise nebo kter�koliv v�vojov� n�stroj v n�m obsa�en�:
> Visual StudioTM 6.0, verze Professional a Enterprise
> Visual BasicR 6.0, verze Professional a Enterprise
> Visual C++R 6.0, verze Professional a Enterprise
> Visual InterDevTM 6.0, verze Professional
> Visual J++TM 6.0, verze Professional
> Visual FoxProTM 6.0, verze Professional
>
> stazeno z http://msdn.microsoft(tec)cz/MSDE/
>

Dec

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 11.4.2000 09:41:29

Preju hezky den,

trivialni dotaz: jak dostanu z precteneho bytu binarni hodnotu (napr f =
1111)?

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


PageControl & TabSheet s Imege

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 11.4.2000 09:42:52

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.

Ahoj,

doporucite mi prosim nekdo nejakou komponentu
PageControl a TabSheet, kde by slo jednoduse pres
ImageList a ImageIndex na tech ouskach zobrazovat
obrazky (D3) ?

Diky...
...Dobra

(Ve VgLib je sice vgPageControl, ktera ma vlastnost
ImageList, ale pouziva normalni TabSheet-y a ja nevim
jak do nich ty obrazky umistit. Zousel jsem to pres
OwnerDraw, ale potom neni zase videt delsi text u toho
ouska.)

BTW: Vazne nikdo nevi, jak schovat "cizi" ikonu z tray-e?

Seznam =?iso-8859-2?q?funkc=ED?= Delphi

[*] iturcan(zv)gamo.sk - 11.4.2000 09:43:10


>Zdravim zkusene, kteri maji v maliku Delphi dokumantaci
>Da se nekde najit kompletni seznam funkci a procedur, ktere jsou
>v Delphi k dispozici ?
>
>Nemyslim tim metody objektu, ale samostatne procedury a funkce.
>Potesil by nejaky tematicky organizovany seznam nebo aspon
>abecedni seznam.
>
>Prochazel jsem helpy, ale nic takoveho jsem nenasel.

hmm,

funkcie objekt pascalu - vid. objekt pascal prirucka

zoznam rutin je v Delphi helpe, konkretne v indexe
"Routines,quick reference, by category"

funkcie Windowsu - vid. Win32 help alebo MSDN


Ivan Turcan


MDAC 2.5

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


> > To samozrejme mam. Vis presne, co je treba upravit? Zjistil jsi to
> > metodou pokus-omyl, nebo je to rada od MS?

presne tak jak pise Petr, udelal jsem to uz pred casem stejne jako on (s
MDAC 2.5 , zjevne tam zpomeli vyjmout ten setup-part-program a zustal v
registrech) a vse mi chodi, pro Tvoji informaci jsem na Novell siti 5.0SP1
pres kterou routuju TCP/IP, MSDE mam SP2, vse chodi OK.


Heretic-X, SOFTWARE specialist

Zatuhnuti aplikace v D5

[*] iturcan(zv)gamo.sk - 11.4.2000 09:48:44


nie som sice odbornik na hry a animacie pod Win32, ale nebolo by
rozumnejsie pouzit na takyto ucel DirectX od Mrkvosoftu ktory je priamo
predurceny na stavanie hier.


Ivan Turcan


petr.palicka(zv)
atlas(tec)cz To: <delphi-l(zv)fwd(tec)cz>
Sent by: cc:
owner-delphi- Subject: RE: Zatuhnuti aplikace v D5
l(zv)fwd(tec)cz


11.04.2000
09:21
Please
respond to
delphi-l



nazdarek,
delam neco podobnyho,
ale de mi to jak psovi pastva, vetsinou nemam cas,
nekdy se mi proste nechce, nebo delam neco jineho...

ty image jsou podle me kravina (bez urazky, je to muj soukr. nazor),
ja mam nasledujici ideu:

jeden TImage, do kteryho se kresli;
v tabulce (paradox, ale je mozne jakekoliv vlastni reseni) mam ulozene
jednotlive obrazky (textury);
ikdyz ja tam mam klic do jine tabulky, ve ktere je to ulozeno jako blob;
to aby pro vsecky vyskyty jednoho obrazku (textury) se o ukladalo do abulky
jen jednou;
no a jsou tam take souradnice obrazku a rozmery (o. je mozne to roztanout
ci smrsknout);
je pravda, ze pouzivam hexovou (sestiuhelnikovou) sit, takze kdyz user
ukaze nekam do mapy tak vym na co ukazuje

nicmene je mozne, ze delame (nebo spis ty delas, ja se loudam) oba totez,
chtel bych udelat hexovy/ctvereckovy editor map pro hry na hrdiny;

pokud to neni tajne, tak se ozvi, treba navazem spolupraci...

teda az dodelam soucasny projekt...

dekuji
peca

-----P�vodn� zpr�va-----
Od: Martin Pe?ek [SMTP:pesek.martin(zv)mymail(tec)cz]
Odesl�no: 10. dubna 2000 12:06
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Zatuhnuti aplikace v D5

Zdravim!
Jak uz jsem psal tak delam editor map pro moji budouci hru. Takze si muzes
vybrat texturu a usadit ji na mapu (to jsou TImage vedle sebe a tvori
jakoby
celek - mapu). Nenapada me jak bych to mohl udelat do jednoho TImage. Mozna
pomoci canvasu, ale to bych potom asi nezjistil co na kterym poli je a tim
padem bych to asi neulozil (ted to delam tak, ze i s tou texturou predam
parametr TAG, a pak to cyklem projizdim a ukladam).

S pozdravem Martin Pesek, amatersky programator
D5 Ent., W98

From: Martin Pe?ek <pesek.martin(zv)mymail(tec)cz>
>Mozna to zpusobuje pocet komponent TImage (cca 566).

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Uff! Proc jich tam mas tolik, neslo by to vyresit nejak jinak ? Vzdyt staci
mit
napriklad jen jeden TImage a do neho nahravat obrazky dle potreby.

Petr Vones, amatersky programator


DCOM

[*] Juraj Skotnicky <juraj.skotnicky(zv)jdsoftware.sk> - 11.4.2000 09:50:14

Ahojte,

pri inicializacii DCOM Automation objektu na vzdialenom pocitaci sa vyvola
vynimka
"The exception unknown software exception (0x0eedfade) occured in the
application at location 0x77f1d479."
a v klientskom programe sa vyvola vynimka "Server execution failed".
Neviete v com by mohol byt problem? Treba nieco nastavit? Co je to vlastne
za vynimka?


siet s Win NT4 (SP3, SP5, SP6), D5Ent.

Dik Juraj


Windows 2000 server

[*] bigzero(zv)post(tec)cz - 11.4.2000 10:48:57

Zdar !

Zalozit na serveru konto pro kazdeho uzivatele je urcite mozne, ale take pracne (zejmena nasledna sprava) takze se
vyplati jen tehdy, ma-li mit kazdy uzivatel ruzna prava k pristupu na server.

V ostatnich pripadech je urcite lepsi vyuzit moznosti, ktere k tomuto ucelu W2K nabizeji. Je to uzivatel Guest pres ktereho se k serveru pripoji kazdy uzivatel, ktery nema na serveru sve vlastni konto. Tento uzivatel je po instalaci W2K standardne zablokovany - staci jej jen aktivovat.

Samozrejme je nutne omezit pristupy k sdilenym prostredkum tak, aby Guest \"videl\" jen tam kam ma.

Honza
-------

> mel jsem stejny problem se sdilenim disku na W2000 Profi. Pomohlo zalozit na
> nich kazdemu uzivateli konto a kdyz se ze stanic uzivatele prihlasovali do
> svych Windows pod timto jmenem a heslem, sdileni zacalo fungovat lepe nez
> kdy predtim.
>
> Lubos
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > Pavel Medek
> > Sent: Monday, April 10, 2000 8:59 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: OT: Windows 2000 server
> >
> >
> > Nainstaloval jsme na nas podnikovy server Windows 2000 server a v
> > ten moment
> > prestaly sitove bezet
> > vsechny stanice, ktere nemaji W98 t.j. maji W95 nebo W95 OSR2. Na stanice
> > lze pingnout, ale v sitovem
> > okoli tyto stanice nevidi nic. S NT 4 to bezelo vsechno OK.
> >
> > Tusite nekdo co s tim ? Pro kazdeho e-mailova schranka zdarma na:
*** http://POST.CZ

Dec

[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 11.4.2000 10:49:38

Ahoj,

nevim, jstli na to primo neexistuje nejaka funkce, ale napriklad takto,

Bin: array[0..7] of byte;
i: integer;
cislo: byte;

cislo:= ......
for i:= 0 to 7 do begin
if (cislo and 1) then
Bin[i]:= 1
else
Bin[i]:= 0;
cislo:= cislo shr 1;
end;

----- Original Message -----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 11, 2000 9:41 AM
Subject: Dec


> Preju hezky den,
>
> trivialni dotaz: jak dostanu z precteneho bytu binarni hodnotu (napr f =
> 1111)?
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
>

Property a promenna objektu

[*] Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz> - 11.4.2000 10:56:26

Ahoj,
nemohl by mi nekdo rici, jestli je v dusledku nejaky rozdil nasledujicich
zapisu:

1.
TMojeKomponenta = class(TComponent)
private
FXXX : String;
public
property XXX: String read FXXX write FXXX;
end;

2.
TMojeKomponenta = class(TComponent)
public
XXX: String;
end;

Jaroslav Sipek
e-mail: jaroslav.sipek(zv)idea(tec)cz

Dec

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.4.2000 11:01:57

>
>trivialni dotaz: jak dostanu z precteneho bytu binarni hodnotu (napr f =
>1111)?


postupnym delenim 2. Pokud je (x mod 2) > 0 pises 1 jinak 0.

Zdravi
D. Toman

Konfview a PDOXUSRS.LCK

[*] Jan Naiser <tua(zv)ltm(tec)cz> - 11.4.2000 11:05:03

Ahoj,

(W98SE, D4.03S, BDE5.1)
takze staci opravdu jenom mala uprava Konfview - pridat TSession a nastavit
AutoSessionName na true a PrivateDir treba na %TEMP% (standartne
c:\windows\temp) a potom uz jde vse hladce a LCK zustane v patricnych mezich
a tech temer 29 tis. zaznamu se da v pohode naimporotvat. Bez opravy se
stejna chyba vyskytne vzdy, pokud bude pridavanych zaznamu vice jak 1531.

(LOCAL SHARE jsem nechal na i nadale na TRUE)

Honza.

----- Original Message -----
From: Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz>
To: Delphi Forum <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 11, 2000 8:23 AM
Subject: Re: Konfview a PDOXUSRS.LCK


> U Borlandu maji presne na toto tema jedno techinfo. Nechce se mi to ted
hledat, takze nemuzu rict jmeno souboru, ale rika se v nem zhruba toto:
>
> Zabranit nadmernemu narustani PDOXUSRS.LCK lze:
>
> 1) Nastavenim local share na false
> 2) Tim, ze db soubory jsou v jinem adresari nez program
> 3) Pred spustenim velkeho mnozstvi query je nutno zavrit veskere TTable,
ktere pracuji na stejne databazi.
>
> Vyzkousel jsem kombinaci 2 a 3 a podarilo se mi naimportovat veskera data.
>
> Best regards,
> PS.
>
>

DCOM

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 11.4.2000 11:07:17

Nejsem si uplne jisty, ale k problemum muze dojit, kdyz se pri zavadeni
provadeji akce, ktere mohou trvat dlouho. Nedojde li k zavedeni objektu dost
rychle system ho nezavede a ohlasi chybu.

Jaromir Cermak

-----Original Message-----
From: Juraj Skotnicky [mailto:juraj.skotnicky(zv)jdsoftware.sk]
Sent: Tuesday, April 11, 2000 9:50 AM
To: delphi-l(zv)fwd(tec)cz
Subject: DCOM


Ahojte,

pri inicializacii DCOM Automation objektu na vzdialenom pocitaci sa vyvola
vynimka
"The exception unknown software exception (0x0eedfade) occured in the
application at location 0x77f1d479."
a v klientskom programe sa vyvola vynimka "Server execution failed".
Neviete v com by mohol byt problem? Treba nieco nastavit? Co je to vlastne
za vynimka?


siet s Win NT4 (SP3, SP5, SP6), D5Ent.

Dik Juraj


DCOM

[*] Kejval <petr.kejval(zv)worldonline(tec)cz> - 11.4.2000 11:10:27

Ahoj,
poradil by mi nekdo, zda lze nekde (a kde) sehnat nativni komponenty pro pristup z D1 na MS Access 2.0.
Za odpovedi dekuji.

Petr Kejval
e-mail:petr.kejval(zv)worldonline(tec)cz


Komunikace DOS - Windows

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 11.4.2000 11:12:56

Vi nekdo jak zaridit komunikaci mezi programy, jeden je DOS, druhy je
Windows, oba bezi na jednom pocitaci?

ing. Michal K�s
TANGO software s.r.o.
pokladn� syst�my pro restaurace a obchody
Krymsk� 42
360 01 Karlovy Vary
017/32 264 68, 32 258 86
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz


MDAC 2.5

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 11:58:39

On 10 Apr 00, at 23:14, Petr Vones wrote:

> > To samozrejme mam. Vis presne, co je treba upravit? Zjistil jsi to
> > metodou pokus-omyl, nebo je to rada od MS?
>
> Nemam rad kdyz se mi po startu spousti neco, co se spoustet nema :-)

:-) To ja take ne...

> Tech mist kde to muze byt ulozeno zase tolik neni, takze pak uz staci
> je prohledat. Na M$ jsem k tomuto nic nenasel.

Otazka spise zni, proc se to spousti? Jestli to neni treba proto, ze
se neco radne nenainstalovalo? Bedary se daji take potlacit
mastickami, ale pokud se budu nadale spatne stravovat, pricinu
bedaru neodstranim. :-)


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


Jak udelat: Nacteni dotazu a editace vysledku jen

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 11:58:39

On 10 Apr 00, at 20:15, Erik Salaj wrote:

> Este ma napada moznost pouzit Visual C++ Externsions for ADO, kde nie
> je potrebne konvertovat hodnoty na Variant-y. Ked som to skusal, tak
> zrychlenie bolo okolo 30%. Mozno v tomto pripade by to dost pomohlo,
> aj ked sa to trochu pracnejsie programuje a pouziva. Pripravim a
> poslem Ti (na sukromny mail) priklad. Princip spociva v tom, ze si pre
> recordset nadefinujes sktrukturu popisujucu polozky (typ, pametove
> miesto, kde ma byt hodnota polozky, ....). Hodnoty poloziek sa potom
> pri prechadzani recordsetu ukladaju na zadane miesto, plus je mozne
> pridavat a udatovat zaznamy.
>
> V ADO by sa zisla nejaka priama podpora pre batch operacie,
> mozno sa snad objavi v buducich verziach.

:-) Pokud chces vsechny moznosti, ktere nabizi OLE DB, tak
pouzij primo OLE DB. ADO nech VBasikarum.:-)


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


DCOM

[*] Juraj Skotnicky <juraj.skotnicky(zv)jdsoftware.sk> - 11.4.2000 11:58:14

Dik za odpoved.

Je to mozne, ale tato chyba sa vyvola okamzite po zavolani
CreateRemote(MachineName). Zistil som zaujimavu vec, ked je server na NT4.0
SP3, tak vsetko funguje OK, ale ked je server na NT4.0 SP6, tak to nebeha.
Moze to mat nejaku suvislost? Nastavenia v DCOMCNFG su pre obidve stanice
rovnake. Juraj

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
CERMAK
Sent: Tuesday, April 11, 2000 11:07 AM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: RE: DCOM


Nejsem si uplne jisty, ale k problemum muze dojit, kdyz se pri zavadeni
provadeji akce, ktere mohou trvat dlouho. Nedojde li k zavedeni objektu dost
rychle system ho nezavede a ohlasi chybu.

Jaromir Cermak

-----Original Message-----
From: Juraj Skotnicky [mailto:juraj.skotnicky(zv)jdsoftware.sk]
Sent: Tuesday, April 11, 2000 9:50 AM
To: delphi-l(zv)fwd(tec)cz
Subject: DCOM


Ahojte,

pri inicializacii DCOM Automation objektu na vzdialenom pocitaci sa vyvola
vynimka
"The exception unknown software exception (0x0eedfade) occured in the
application at location 0x77f1d479."
a v klientskom programe sa vyvola vynimka "Server execution failed".
Neviete v com by mohol byt problem? Treba nieco nastavit? Co je to vlastne
za vynimka?


siet s Win NT4 (SP3, SP5, SP6), D5Ent.

Dik Juraj


DbiQInstantiateAnswer, language driver

[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 11.4.2000 12:11:39

Ahoj,

nevite nekdo jak ovlivnit language driver tabulky vytvorene
pomoci DbiQInstantiateAnswer ( krome nastaveni hodnoty
LanguageDriver v BDEAdmin)?

function QueryExec(AhTmpDb: hDBIDB; ATblName, ASQL: string): Longint;
var
hStmt: hDBIStmt;
hQryCur, hNewCur: hDBICur;
begin
hQryCur:=nil;
hNewCur:=nil;
hStmt:=nil;
try
Check(DbiQAlloc(AhTmpDb, qrylangSQL, hStmt));
Check(DbiQPrepare(hStmt, PChar(ASQL)));
Check(DbiQExec(hStmt, (zv)hQryCur));
Check(DbiQInstantiateAnswer(hStmt, hQryCur, PChar(ATblName), szPARADOX,
TRUE, (zv)hNewCur));
--------------
QueryExec(Table1.DBHandle, 'QUERY2.DB', 'SELECT * FROM CUSTOMER');

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

Dec

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 11.4.2000 12:13:14

Napriklad takto :

function DecToBin(Decimal : longint) : string;
const BinChar : string[2] = '01';
var S : string;
begin
S:='';
repeat
Insert(BinChar[Decimal mod 2 +1],S,1);
Decimal:=Decimal div 2;
until Decimal=0;
DecToBin:=S;
end; {DecToBin}> ----------
> Od: Krayzel Libor[SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
>
> trivialni dotaz: jak dostanu z precteneho bytu binarni hodnotu
> (napr f =1111)?
>

Property a promenna objektu

[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 11.4.2000 12:15:41

Ahoj,

v tomto priklade asi neni, ale pokud budes potrebovat na nasteveni nebo na
cteni property pouzit nejakou funkci, tak je. Write nebo read funkci
deklarujes jako private a ta je zavolana pri nastaveni nebo cteni property.
Jestli to tak neni, tak me delfini nekamenujte.

Ales
----- Original Message -----
From: Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 11, 2000 10:56 AM
Subject: Property a promenna objektu


> Ahoj,
> nemohl by mi nekdo rici, jestli je v dusledku nejaky rozdil nasledujicich
> zapisu:
>
> 1.
> TMojeKomponenta = class(TComponent)
> private
> FXXX : String;
> public
> property XXX: String read FXXX write FXXX;
> end;
>
> 2.
> TMojeKomponenta = class(TComponent)
> public
> XXX: String;
> end;
>
> Jaroslav Sipek
> e-mail: jaroslav.sipek(zv)idea(tec)cz
>
>

XML DOM implementace

[*] Jan Vomlel <Jan.Vomlel(zv)aip(tec)cz> - 11.4.2000 12:44:35

Existuje nejaka pro vyvojare v Delphi ci C++ Builderu rozumnejsi
implementace DOM nez jakou nabizi microsoft v exploreru? (Chybi mi vyjimky,
stringy a pod.)
Honza


XML DOM implementace

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 11.4.2000 13:03:44

> -----P�vodn� zpr�va-----
> Od: Jan Vomlel [mailto:Jan.Vomlel(zv)aip(tec)cz]
> Odesl�no: 11. dubna 2000 12:45
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: XML DOM implementace
>
>
> Existuje nejaka pro vyvojare v Delphi ci C++ Builderu rozumnejsi
> implementace DOM nez jakou nabizi microsoft v exploreru?
> (Chybi mi vyjimky,
> stringy a pod.)
> Honza

Je toho spousta, muzes zacit hledat treba zde:
http://www.xmlephant.com/pages/Tools/Parsers/

Nic z toho jsem nezkoumal, jenom jsem si kdysi chtel udelat prehled,
kolik toho je :-)

Ted jsem se tam mrkl a zajimava by asi mohla byt
XML Parser Component pro delphi - free a se zdrojakama:
http://www.icom-dv.de/products/xml_tools/uk_xml_tools.php3

Jura


XML DOM implementace

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 11.4.2000 13:06:08


> Ted jsem se tam mrkl a zajimava by asi mohla byt
> XML Parser Component pro delphi - free a se zdrojakama:
> http://www.icom-dv.de/products/xml_tools/uk_xml_tools.php3
>
> Jura

Sorry, zdrojaky jsou za penize.

Jura

TabControl - vyvolani udalosti OnChange

[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 11.4.2000 12:08:50

Ahoj!
Nic prece nebrani tomu, aby si pri nastavovani
TabIndexu zavolal udalosti sam:

var AllowChange: Boolean;
...
AllowChange := True;
if Assigned(OnChanging) then OnChanging(TabControl1, AllowChange);
if AllowChange then
begin
TabControl1.TabIndex := 12;
if Assigned(OnChange) then OnChange(TabControl1);
end;

----- Original Message -----
From: Mirek Melichar <xmelich(zv)informatics.muni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, April 10, 2000 6:28 PM
Subject: TabControl - vyvolani udalosti OnChange


> Zdravim,
> pri praci s TabControl jsem narazil na (snad resitelny) problem:
> Potreboval bych zajistit, aby kdyz u TabControl zmenim TabIndex, aby se mi
> vyvolala udalost OnChange (OnChanging), ktera se nyni vyvola, jen pokud
> TabIndex zmeni uzivatel kliknutim na Tab.
> Za kazde naznaceni reseni moc dekuji.
>
> Jo a este mam takovou pochybnost: Kdyz mi v Delphi spusteny program
> skonci, obcas se stane (zvlast kdyz v bezici aplikaci zkousim kde co),
> ze Delphi maji v titulku jeste treba 7 sekund text "[Running]" (a odmitaji
> pracovat), zatimco obvykle okamzite po skonceni aplikace je text
> "Running" zrusen a vse funguje normalne. Nevim cim to je, mozna nekde v
> programu zapominam uvolnovat pamet, nebo zapominam na Query1.UnPrepare
> (pracuji predevsim s lokalni databazi Paradox a dynamickymi poli).
> Ma jiz s tim nekdo nejake zkusenosti??? V souvislosti s tim by me
> zajimalo, jestli se dynamicka pole po skonceni aplikace automaticky
> dealokuji nebo je treba je nastavit na "nil" (0). (Zvlast kdyz jde o pole
> recordu a v tom recordu je jedna z polozek opet dyn. pole)
> Na zaver podotykam, ze jde o D4, WIN98, K6/300(?)MHz.
> Diky za kadou radu, staci mi nakopnout.
>
> Mirek Melichar


Drag & Drop

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 11.4.2000 13:32:21

Ahoj

na to lze napr. pouzit "Drag and Drop Component Suite":

http://www.melander.dk

Z.Fryz

> -----P�vodn� zpr�va-----
> Od: �ampulka Ji��
> Odesl�no: 11.04.2000 14:44
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Drag & Drop
>
> Cau,
>
> Problem:
> Mam listbox, kterej je naplnenej nazvama souboru, a ja
> potrebuju aby z toho listboxu slo soubor pret�hnout mysi
> treba do exploreru (zkop�rovat, presunout)... Jak na to?
>
> d�k Jirka.
>
>
__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.

next focus

[*] Robert Zak <nrsys(zv)psn.sk> - 11.4.2000 13:58:20

Da sa vo vnutri metody TEdit.OnExit zistit, kam smeruje focus? .... Po
kliknuti inam potrebujem bud povolit alebo nepovolit odchod z editu.

Zatuhnuti Delphi pri startu aplikace

[*] Radek Zhasil <Radek.Zhasil(zv)seznam(tec)cz> - 11.4.2000 14:00:19

Jak se zda tak problem se zatuhnutim Delphi pri spusteni aplikace jsi jiz vyresil instalaci W2K, presto bych ale rad prispel svou zkusenosti. Narazil jsem na tentyz problem u jedne sve aplikace. Protoze jsem, pokud mozno, potreboval zachovat stavajici konfiguraci PC (D3 C/S,W95 IE5), zkousel jsem r�zn� varianty a zjistil nasledujici:

Nefungujici konfig. :
D3 C/S, Win95 IE5;
D3 C/S, Win98;
D4 C/S, Win95 IE5;

Funguje :
D3 C/S, Win95 IE4 a nizsi;

Pravdepodobne dochazi k nejake nestastne kombinaci komponent pouzivajicich COMCTL32.DLL.

Radek



-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


EXEC

[*] Jan Fryscak <fryscak(zv)scio(tec)cz> - 11.4.2000 14:25:38

Ahoj lidi,
potrebuji spoustet dosovske programy. Pokud si dobre pamatuji, tak se to
ve starem Pascalu delalo pomoci Exec. Zminku o tom, jsem nasel i v
archivu, ale nejsem schopen najit potrebnou knihovnu.
Mimochodem jak obecne postupovat v techto situacich?

Diky
Honza


EXEC

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 11.4.2000 14:34:03

WinExec
ShellExecute
CreateProcess

unit ShellAPI

D.

> ----------
> Od: Jan Fryscak[SMTP:fryscak(zv)scio(tec)cz]
>
> potrebuji spoustet dosovske programy. Pokud si dobre pamatuji, tak se to
> ve starem Pascalu delalo pomoci Exec. Zminku o tom, jsem nasel i v
> archivu, ale nejsem schopen najit potrebnou knihovnu.
> Mimochodem jak obecne postupovat v techto situacich?
>
>

Drag & Drop

[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 11.4.2000 14:44:19

Cau,

Problem:
Mam listbox, kterej je naplnenej nazvama souboru, a ja
potrebuju aby z toho listboxu slo soubor pret�hnout mysi
treba do exploreru (zkop�rovat, presunout)... Jak na to?

d�k Jirka.

Informace o FlashFileru

[*] Karel Kral <kral(zv)purus(tec)cz> - 11.4.2000 14:46:25

Nejsem primo odbornik ale pouze uzivatel, takze zodpovim, co budu moct.
Nejlepsi na tyto dotazy je primo konference Flash Filer na
news.turbopower.com.

novacek(zv)vanicek(tec)cz wrote:
> V popisu se pravi, ze pro spravnou funkci cestiny (hlavne trideni) ve
> FF je nutne nastavit stejnou kodovou stranku na serveru a vsech
> klientech. Jak mnoho zalezi na verzi Windows (ceske resp. anglicke) a

Mam vsude ceske Win nebo NT, takze zkusenosti nemam. Ale myslim, ze je
to pravda, protoze pri indexaci se na serveru pouziva systemove rutiny
na porovnavani retezcu.

> Je mozne vyvijet i sitovou (= klient/server) aplikaci s FF na jednom
> pocitaci, tj. aniz by vyvijena aplikace musela komunikovat s nejakym
> serverem? Popripade s jakymi omezenimi nebo podminkami.

Jasne, pustis si FF server na stejnem stroji jako je aplikace.

> Jak bude fungovat "singleEXE" aplikace s FF (FF prilinkovany primo do
> EXE) spustena na tomze pocitaci vicekrat? Priklad: program UCET.EXE
> pro jednoduche ucetnictvi, ktery ma nekolik databazi/tabulek pro
> ruzna ucetni obdobi nebo uctovane firmy. Pokud bude UCET.EXE spusten
> vicekrat, pak: dalsi instance nebudou fungovat, protoze FF nedovoli
> vicenasobny pristup k databazi, budou fungovat, ale dve ruzne

Dve instance neotevrou 2x stejnou tabulku. Tam by bylo jedinym resenim
spustit lokalne samostatny FF server.

Trial verze FF neexistuje. :(((.--
______________________________________________________
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
______________________________________________________


TreeView a Drag&Drop

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 11.4.2000 14:58:49

Neviem, ale mne DropTarget funguje v podstate korektne aj pri DragOver, iba
je nutne pridat podmienku
"if TreeView1.DropTarget = nil then Exit;" pretoze DropTarget je obcas rovny
nil.

Cely kod by teda bol napriklad:
procedure TForm1.TreeView1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept:= False;
if TreeView1.DropTarget = nil then
Exit;
if not(Sender is TTreeView) then
Exit;
if TreeView1.DropTarget.Text = 'aaa' then
Accept:= True;
end;

----- Original Message -----
From: Roman Budinec <roman(zv)ttc-telecom.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, April 10, 2000 5:23 PM
Subject: TreeView a Drag&Drop


> Pri presuvani poloziek v TreeView pomocou Drag&Drop potrebujem v
> udalosti OnDragOver odchytit, nad ktorou polozkou sa nachadzam, kvoli
> akceptacii(Selected a Focused ukazuje na Source).
> TTreeView(Sender).DropTarget funguje len pri OnDragDrop a to uz je
> neskoro.
> Nema s tym niekto skusenosti?
>
> --
> mailto:budinec_roman(zv)ttc-telecom.sk
>

Zatuhnuti aplikace v D5 - reseni (?)

[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 11.4.2000 14:59:28

Zdravim !

odpoved na e-mail od Petra Vonese:
Update pack #1 nemam :( Jak jsem se dival na stranky Borlandu tak je to
celkem objemnej macek a jelikoz jsem modemista tak to asi jen tak nesosnu
(treba jsem se dival spatne). Na ten update od Microsoftu se podivam, diky.
Mam (podle systemu v ovladacich panelech) W98, druhe vydani 4.10.2222 A.
Zdaji se me celkem stabilni. A barevnou hloubku mam 32 bitu True Color.

odpoved na e-mail od Petra Palicka:
No, databze nepouzivam, protoze mam problemy s jejim sirenim. Pokud by jsi
bylo ochoten mi s timto pomoci, tak se mi prosim ozvi na muj e-mail. O hre
se vice dozvis na strankach Gamemakeru - http://gm1.miesto.sk

odpoved na e-mail od Ivana Turcana:
DirectX chci pouzit az primo do hry. Pouzivam k tomu DelphiX. Bohuzel jsem
jeste neprisel na to, jak zjistit, ze uzivatel klikl treba na nejakou
jednotku atd. Pokud to nekdo vi tak ho prosim, aby mi poradil. Diky.

Dale jsem se chtel zeptat jak kreslit jen na jeden TImage, abych vedel kam
to mam presne posadit, a abych vedel pri ukladani kde co je. Teda pokud jsem
pochopil ty navrhy (viz. e-mail od: P. Vonese, J. Benese, P. Palicka).
Nechci vsak zadnou cizi komponentu, rad bych si to udelal sam jen se
zakladnima vecma v Delphi. Dekuji za odpovedi.

S pozdravem Martin Pesek, amatersky programator.

===============================
[ Martin Pe�ek
[ pesek.martin(zv)mymail(tec)cz
[ gm1.miesto.sk
[ www.samuel(tec)cz/~markm
[ http://board.jinak(tec)cz

[ Info
[ Delphi 5 Ent., W98
===============================

TabControl - vyvolani udalosti OnChange

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 11.4.2000 15:11:51

A co ti brani pri kazdej rucnej zmene TabIndexu zavolat tu metodu zavesenu
na OnChange explicitne ?

----- Original Message -----
From: Mirek Melichar <xmelich(zv)informatics.muni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, April 10, 2000 7:28 PM
Subject: TabControl - vyvolani udalosti OnChange


> Zdravim,
> pri praci s TabControl jsem narazil na (snad resitelny) problem:
> Potreboval bych zajistit, aby kdyz u TabControl zmenim TabIndex, aby se mi
> vyvolala udalost OnChange (OnChanging), ktera se nyni vyvola, jen pokud
> TabIndex zmeni uzivatel kliknutim na Tab.
> Za kazde naznaceni reseni moc dekuji.
>
> Jo a este mam takovou pochybnost: Kdyz mi v Delphi spusteny program
> skonci, obcas se stane (zvlast kdyz v bezici aplikaci zkousim kde co),
> ze Delphi maji v titulku jeste treba 7 sekund text "[Running]" (a odmitaji
> pracovat), zatimco obvykle okamzite po skonceni aplikace je text
> "Running" zrusen a vse funguje normalne. Nevim cim to je, mozna nekde v
> programu zapominam uvolnovat pamet, nebo zapominam na Query1.UnPrepare
> (pracuji predevsim s lokalni databazi Paradox a dynamickymi poli).
> Ma jiz s tim nekdo nejake zkusenosti??? V souvislosti s tim by me
> zajimalo, jestli se dynamicka pole po skonceni aplikace automaticky
> dealokuji nebo je treba je nastavit na "nil" (0). (Zvlast kdyz jde o pole
> recordu a v tom recordu je jedna z polozek opet dyn. pole)
> Na zaver podotykam, ze jde o D4, WIN98, K6/300(?)MHz.
> Diky za kadou radu, staci mi nakopnout.
>
> Mirek Melichar
>
>

Vlozenie btimapy do bitmapy 2

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 11.4.2000 15:29:16

Zdravim,

cez Image2.Picture.Bitmap.Canvas.CopyRect(R, Image1.Picture.Bitmap.Canvas,
R);
to ide. Vlozi mi to ale v realnej velkosti. Lenze ja mam image1
stretch:=true; t.j. jeho realna velkost je vacsia (resp. mensia). No a ja to
chcem vlozit vo velkosti, ktoru mam nadstavenu.


Dik, Miso

Jak zjistit stav okna?

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 11.4.2000 15:34:06

Skus funkciu API GetWindowPlacement (v strukture WINDOWPLACEMENT je atribut
showCmd ktory obsahuje aktualny stav okna)

----- Original Message -----
From: Petr Smol�k <psmolik(zv)fides(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, April 07, 2000 10:08 AM
Subject: Jak zjistit stav okna?> Pekny den.
> Nemohu se dopatrat jak zjistit stav okna za behu (potomek TForm, je-li
> Normal, Minimized nebo Maximized).
> WindowState je jen pri startu a ve FormState neni co potrebuji.
>
> Nevite to nekdo? Dik.
>
> Petr Smol�k
> psmolik(zv)fides(tec)cz
>
>

Komunikace DOS - Windows

[*] L. ZITA <konference(zv)sales(tec)cz> - 11.4.2000 15:45:34

Behalf Of Michal K�s

> Vi nekdo jak zaridit komunikaci mezi programy, jeden je DOS, druhy je
> Windows, oba bezi na jednom pocitaci?
>

Jiz jsem se necim podobnym zabyval. Trochu upresni problem.
Ludek ZITA
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000


TabControl - vyvolani udalosti OnChange

[*] Pavel Vasek <pavel.vasek(zv)wige-mic(tec)cz> - 11.4.2000 15:46:59

Podle mne je nutne udelat novou komponentu, ktera bude mit definovana
property TabIndex.
Pak to funguje.
Asi takhle:

type
TTabControl_index = class(TTabControl)
private
function GetTabIndex: integer;
procedure SetTabIndex(const Value: integer);

published
property TabIndex: integer read GetTabIndex write SetTabIndex;
end;

{ TTabControl_index }

function TTabControl_index.GetTabIndex: integer;
begin
Result:= inherited TabIndex;
end;

procedure TTabControl_index.SetTabIndex(const Value: integer);
var Can: Boolean;
begin
Can:= True;
if Assigned(OnChanging) then OnChanging(Self,Can);
if Can then
begin
inherited TabIndex:= Value;
if Assigned(OnChange) then OnChange(Self);
end;
end;

----- Original Message -----
From: Mirek Melichar <xmelich(zv)informatics.muni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, April 10, 2000 7:28 PM
Subject: TabControl - vyvolani udalosti OnChange


> Zdravim,
> pri praci s TabControl jsem narazil na (snad resitelny) problem:
> Potreboval bych zajistit, aby kdyz u TabControl zmenim TabIndex, aby se mi
> vyvolala udalost OnChange (OnChanging), ktera se nyni vyvola, jen pokud
> TabIndex zmeni uzivatel kliknutim na Tab.
> Za kazde naznaceni reseni moc dekuji.
>
> Jo a este mam takovou pochybnost: Kdyz mi v Delphi spusteny program
> skonci, obcas se stane (zvlast kdyz v bezici aplikaci zkousim kde co),
> ze Delphi maji v titulku jeste treba 7 sekund text "[Running]" (a odmitaji
> pracovat), zatimco obvykle okamzite po skonceni aplikace je text
> "Running" zrusen a vse funguje normalne. Nevim cim to je, mozna nekde v
> programu zapominam uvolnovat pamet, nebo zapominam na Query1.UnPrepare
> (pracuji predevsim s lokalni databazi Paradox a dynamickymi poli).
> Ma jiz s tim nekdo nejake zkusenosti??? V souvislosti s tim by me
> zajimalo, jestli se dynamicka pole po skonceni aplikace automaticky
> dealokuji nebo je treba je nastavit na "nil" (0). (Zvlast kdyz jde o pole
> recordu a v tom recordu je jedna z polozek opet dyn. pole)
> Na zaver podotykam, ze jde o D4, WIN98, K6/300(?)MHz.
> Diky za kadou radu, staci mi nakopnout.
>
> Mirek Melichar


Dalsi TFont property v TStringGrid

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 11.4.2000 16:01:19

Co je zle na teto komponente (pokud ji dam na form a snazim se nastavit
FixedFont property, tak po zavreni Font dialog dostanu access violation a
pri pokusu o rozbaleni property FixedFont dostanu hlasku Unable to expand):

unit Test;

interface

uses
SysUtils, WinTypes, WinProcs, Messages, Classes, Controls, Menus,
Buttons,
Forms, Dialogs, StdCtrls, Graphics, ToolEdit, Grids;

type
TFixedFontStringGrid = class(TStringGrid)
private
FFixedFont : TFont;
procedure SetFixedFont(Value: TFont);
protected
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
property FixedFont: TFont read FFixedFont write SetFixedFont;
end;

procedure Register;

implementation

constructor TFixedFontStringGrid.Create(AOwner: TComponent);

//--------------------------------------------------------------------------
----
begin
inherited Create(AOwner);
FFixedFont := TFont.Create;
FFixedFont.Assign(Font);
end;

destructor TFixedFontStringGrid.Destroy;

//--------------------------------------------------------------------------
----
begin
if Assigned(FFixedFont) then begin
// FreeAndNil(FFixedFont);
FFixedFont.Free;
FFixedFont := nil;
end;
inherited Destroy;
end;

procedure TFixedFontStringGrid.SetFixedFont(Value: TFont);

//--------------------------------------------------------------------------
----
begin
if FFixedFont <> Value then begin
FFixedFont := Value;
end;

procedure Register;

//--------------------------------------------------------------------------
----
begin
RegisterComponents('Test', [TFixedFontStringGrid]);
end;
Petr


StringGrid a ListView

[*] Keder <keder(zv)atlas(tec)cz> - 11.4.2000 16:06:43

Ahoj

potreboval by som poradit s dvoma problemami (D5 Enterprise SP1, W2000) :

1) Pouzival ListView styl vsReport. Mam 19 stlpcov. Kedze zobrazovacia plocha ListView je mensia ako suma jednotlivych stlpcov, potreboval by som po stlaceni klavesy End resp. Home dostat sa na prvy stlpec resp. posledny stlpec v danom zazname. Standardne Home a End sluzia na prechod na prvy a posledny zaznam. Nie je problem odchytit klavesy, problem je presunut sa na koniec resp. zaciatok zaznamu. Riesenim by asi bolo emulovat pohyb scrollbarom. Ale neviem ako na to.

2) Potreboval by som v StringGride formatovat text podla stlpcov. Kedze obsah v gride je vysledok dotazu samozrejme, som pouzil DBGrid. Potom som pouzil RXDBGrid z RXLibrary, s vysledkom som bol spokojny, avsak problem nastal ked som zacal formatovat hodnoty vkladane do gridu. Pri pokuse o formatovanie retazca mi oznami chybu, ze DataSet nie je v Edit mode. Ja vsak som nechcel editovat polozky. Cely grid ma sluzit len na prehladavanie zaznamov, len niektore polozky potrebujem formatovat pri zobrazeni. Takze som sa vratil k StringGridu, kde mozem formatovat bunky ako mena, cislo bez des. miest, 2 des. miesta, oddelovace tisicov, ...podla vyberu zakaznika. Lenze potom neviem zarovnat bunku. Skusil som nasledujuci kod ktory vie to co potrebujem (z konferencie), ale text vzdy formatuje zlava, teda aj pri zarovnani taRightJustify nie vsetky posledne znaky su pod sebou, ale prve znaky su pod sebou a napr. koniec dlhych cisiel ani nie je ani vidiet.
napr.
123,00
12345,00

procedure TfrmCennik.StringGrid1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
var C: array[0..255] of Char; S: string; del : integer;
begin
if (ACol=7) and (ARow>0) then
begin
s := StringGrid1.Cells[ACol,ARow];
del :=(Rect.Right-Rect.Left) div 2;
SetTextAlign(StringGrid1.Canvas.Handle,TA LEFT);
ExtTextOut(StringGrid1.Canvas.Handle, Rect.Left+del, Rect.Top+2, ETO CLIPPED OR ETO OPAQUE,
(zv)Rect, StrPCopy(C, S),Length(S), nil);
end;
end;

A este jedna otazka na zaver. Pri pouzivani D5 SP1 a Win 2000 pri ukoncovani Delphi (najcastejsie) Delphi zoberie 100 % vykonu a zastavi sa na dost dlhu dobu. Dalej pokracuje normalne, avsak zda sa mi to tak trochu divne. Vo Win 98 ani NT 4.0 som take chovanie nespozoroval.
Diky za Vasu pomoc.

Vlado


Informace o FlashFileru

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 11.4.2000 16:43:17

Ahoj,

prave jsem dostal instalacni CD FlashFiler, ale nebyla k nemu zadna prirucka
jako napr. k Orpheusu 3. To je zamer nebo odkaz na dokumenty v CD?

Jaro B.

> -----P�vodn� zpr�va-----
> Od: Karel Kral [SMTP:kral(zv)purus(tec)cz]
> Odesl�no: 11. IV 2000 14:46
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Informace o FlashFileru
>
>

Komunikace DOS - Windows

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 11.4.2000 17:17:02

Ahoj,
tak ja bych se z dovolenim pridal. A jak na to, kdyz bezi na ruznych
pocitacich spojenych siti? Zatim pouzivam komunikaci pres souborovy
system a to je hodne pomale. Ten DOS program dela server.
Dik
Vaclav Sazima

"L. ZITA" wrote:
>
> Behalf Of Michal K�s
>
> > Vi nekdo jak zaridit komunikaci mezi programy, jeden je DOS, druhy je
> > Windows, oba bezi na jednom pocitaci?
> >
>
> Jiz jsem se necim podobnym zabyval. Trochu upresni problem.
>
> Ludek ZITA
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000


ODBCe - UNICODE

[*] Lubo Fule <fule(zv)sct.sk> - 11.4.2000 17:36:53

"Vypustil" som novu verziu ODBCe. Uz plne podporuje UNICODE. Zatial stale
iba D4... zial, D5 nemam.
http://www.sct.sk/~fule/ODBCe/ODBCe.zip

L.

Nativni komponenty pro Access

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 11.4.2000 17:43:12

Neco mozna najdes tady, ale pro D1 dost pochybuju:

http://www.kylecordes.com/bag/listbytype.html

Mac

P.S. Zkus prosim te priste psat nejaky subject (plati i pro ostatni 'experty' ;-). Zpravy bez subjectu obvykle hned mazu ... ;-)
----- Original Message -----
From: Kejval

poradil by mi nekdo, zda lze nekde (a kde) sehnat nativni komponenty pro pristup z D1 na MS Access 2.0.

RichEdit a formatovani MessageDlg

[*] Zapl�k���ͪe�?�Y��̿ - 11.4.2000 18:04:30

Krasny den.

Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a tento
soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu pridat
na konec souboru.

Dik.

W98, D5Pro


Zapletal Martin
zaplik(zv)volny(tec)cz

next focus

[*] Josef Zlomek <zlomj9am(zv)artax.karlin.mff.cuni(tec)cz> - 11.4.2000 18:09:36

> Da sa vo vnutri metody TEdit.OnExit zistit, kam smeruje focus? .... Po
> kliknuti inam potrebujem bud povolit alebo nepovolit odchod z editu.

Pokud primo nepotrebujes zjistit, na ktere komponente focus je, ale chces
pouze, aby neslo vyskocit treba z Editu, zmeny focusu dosahnes volanim
metody FocusControl v objectu TForm, napr:

Form1.FocusControl(Edit1); //focus nasmeruje na Edit1


Josef Zlomek
student MFF UK


MDAC 2.5

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 18:10:32

On 11 Apr 00, at 9:44, Radoslav Krehl�k wrote:

> > > To samozrejme mam. Vis presne, co je treba upravit? Zjistil jsi to
> > > metodou pokus-omyl, nebo je to rada od MS?
>
> presne tak jak pise Petr, udelal jsem to uz pred casem stejne jako on
> (s MDAC 2.5 , zjevne tam zpomeli vyjmout ten setup-part-program a
> zustal v registrech) a vse mi chodi, pro Tvoji informaci jsem na
> Novell siti 5.0SP1 pres kterou routuju TCP/IP, MSDE mam SP2, vse chodi
> OK.

To je sice hezke, ale uz vidim, jak budu skolit prodejce, ze po
instalaci u jejich zakaznika maji restartovat pocitac, a v 95 otevrit
registr a smazat tu a tu polozku. :-)))
Mno, asi radeji pockam na opravene MDAC...


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


Enable BCD & Oracle

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 18:10:32

On 11 Apr 00, at 9:11, Honza Fiala wrote:

> chtel bych se zeptat, jakym zpusobem resite problemy desetinych
> mist v
> databazi. Ja jsem zjistil, ze na interbasi potrebuji mit nastavene
> enable bcd na true (jinak to TDbEdit nelze zapsat desetinna cast).
> Potom jsem program instaloval na Oracle a tam to fungovalo presne
> naopak. Problem by neni ani tak v nastaveni BDE, ale spis pri tvorbe
> programu. Pokud mam nastavene enable bcd na true, tak se mi vsude
> vkladaji fieldy jak TBCDField.
>
> chtel bych poradit, jakym zpusobem mam vytvaret aplikaci aniz bych
> musel drzet dve verze s (TFloatField/TBCDField)?

Tohle jsem tu nedavno psal. Mas v podstate dve moznosti - budto
tyto fieldy vubec nezavadet do programu (pripadne je tvorit
dynamicky az za behu programu), nebo prejit na komponenty,
ktere se neodvozuji od TDataSet a maji lepe vyreseny prechody
mezi datovymi typy.


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


NVarchar a MSSQL - 2

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.4.2000 18:10:32

On 11 Apr 00, at 8:34, David Lebeda wrote:

> to jadro problemu, ktere by i me zajimalo, neni, jak nejakou oklikou
> ziskat ownera apod. (to je reply na Zbyskovu odpoved, kterou jsem
> omylem smazal), ale proc MSSQL vubec nevrati sloupce typu nvarchar.
> Resp. je mozna vrati, ale aplikace je nevidi. Zajimave je, pouha zmena
> typu na char problem resi - tj. zda se mi, ze jde o nejakou chybu SQL
> serveru.

MSSQL nvarchar vraci a velice dobre. Ja pracuji s nvarchar temer
vylucne ke sve plne spokojenosti. Jenze asi pouzivas spatne
komponenty, nebo je nepouzivas dobre.
BTW - BDE komponenty maji s widestringy urcite problemy.


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


NVarchar a MSSQL - 2

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 11.4.2000 18:18:10

Ale houby chyba MS SQL serveru, takhle lehce se z toho Delphi nevykrouti
;-). Problem je v Delphi, resp. v komponentach Delphi (popr. v komponentach
MODBC co pouziva Sroub - aspon se domnivam ze jsou to nejake ODBC
komponenty). Patrne nepodporuji NTEXT. A chyba bude patrne opravdu v tech
komponentach, protoze ODBC tyto hodnoty vraci - testoval jsem to pres OLEDB
provider pro ODBC a to slape. Pouzite komponenty netradicne Adonis ;-) To ze
to v Adonisu funguje i pres OLEDB pro MS SQL providera je snad jasne ;-)

Mac
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================

----- Original Message -----
From: "David Lebeda" <david.lebeda(zv)comarr(tec)cz>
>
> to jadro problemu, ktere by i me zajimalo, neni, jak nejakou oklikou
> ziskat ownera apod. (to je reply na Zbyskovu odpoved, kterou jsem
> omylem smazal), ale proc MSSQL vubec nevrati sloupce typu
> nvarchar. Resp. je mozna vrati, ale aplikace je nevidi. Zajimave je,
> pouha zmena typu na char problem resi - tj. zda se mi, ze jde o
> nejakou chybu SQL serveru.
>
> David
>

Kontrola jedinecnosti v IB - riesenie

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 11.4.2000 18:35:59

----- Original Message -----
From: "Roland Turcan (RoTurSoft)" <rotursoft(zv)nextra.sk>
To: "Delphi CZ konferencia" <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, April 08, 2000 2:48 AM
Subject: Kontrola jedinecnosti v IB


> Zdravim.
>
> Mam tabulku s poliami
>
> PredBU varchar(6),
> CisloBU varchar(10) not null,
> KodBanky varchar(4) not null,
> SpecSymb varchar(10)
>
> tato tabulka sa pouziva na definovanie bankovych uctov partnerov, ale pri
> vytvoreni:
>
> ALTER TABLE BANKSPOJ
> ADD CONSTRAINT BANKSPOJ_UCET UNIQUE (PREDBU,CISLOBU,KODBANKY,SPECSYMB)
>
> som pochopil ze chce aby boli polia PredBU a SpecSymb definovane ako not
> null, ale nie kazdy bankovy ucet vyzaduje predcislie a specificky symbol a
> ked su ako not null, tak nie je samozrejme mozne zadat dva ucty bez napr.
> predcislia bankoveho uctu.
>
> Je to mozne riesit na urovni databazy, alebo ist cez :
>
> Select count(*)
> from bankSpoj
> where
> PredBU='123456' and
> CisloBU='1234567890' and
> KodBanky='1234' and
> SpecSymb='1234567890'
>
> Dakujem za kazdy nazor.
>
> Roland.

Takze riesenie tejto veci bola nakopnute na zaklade navrhov rieseni:

Upravil som vsetky polia (PredBU,CisloBU,KodBanky,SpecSymb) na NOT NULL a
pri zapise do tabulky som do prazdnych zapisal len prazdne retazce t.j.
editbox bol prazdny a aj som mu predal text nasledovne
"ib1.parambyname('PredBU').asstring:=e1.text;"

PS: Snad to niekomu pomoze v buducnosti.

S pozdravom Roland Turcan.

Odchytavani packetu ....

[*] Martin Polehla <polehla(zv)ssakhk(tec)cz> - 11.4.2000 19:28:18

Pracuji na programu ktery ma blokovat hry na lokalni siti a proto potreboval
bych radu jak odchytavat a vysilat packety.
Predem Dekuji Polehla .

Acrobat a DELPHI

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 11.4.2000 20:30:08

Ahoj,

Existuje jeste Adobe InDesign, kterej umi s PDF vse, ale jeste neni moc zabehnut.

M.Jirman
----- Original Message -----
From: Miroslav Topol��
To: delphi-l(zv)fwd(tec)cz
Sent: Saturday, April 08, 2000 8:27 PM
Subject: Acrobat a DELPHI

Zdravim vas.
Mam jeden velky problem. Potrebuji ve vlastnim programu zobrazovat PDF soubory.

Co se povedlo:
1. Pomoci ACTIVEX komponenty Acrobat Readeru jsem zobrazil PDFko

S cim nemuzu hnout:
1. Netusim jak zjistit aktualni stranku v otevrenem PDF. ACTIVEX komponenta povoluje pouze nastavovat aktualni stranku a ne ji cist. K reseni meho problemu je ovsem znalost aktualni stranky nutna !!!

Moc vas vsechny prosim, jestli vite jak zjistit aktualni stranku, ci nejaky zpusob jak by se ji slo dopatrat, ci znate jiny zobrazovac PDF nez Acrobat Reader, poradte prosim.

Predem velice dekuji, M.Topolar


IceLock v 1.0 a 2.0

[*] Marian Winkler <ag.art(zv)cmail(tec)cz> - 11.4.2000 21:30:21

Ahoj,

nemate, prosim nekdo free komponentu od B. Walkera IceLock v 1.0?
Rad bych se mrknul na prilozene demo. Poprosil bych o link nebo o zaslani
na soukromy mail.

Diky za vas cas.

Marian Winkler
ag.art(zv)cmail(tec)cz
GSM: +420 604 880 555


Zatuhnuti aplikace v D5 - reseni (?)

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 11.4.2000 21:37:41

>From: Martin Pe�ek <pesek.martin(zv)mymail(tec)cz>
>Subject: Re: Zatuhnuti aplikace v D5 - reseni (?)
>

>odpoved na e-mail od Petra Palicka:
>No, databze nepouzivam, protoze mam problemy s jejim sirenim. Pokud by >jsi
>bylo ochoten mi s timto pomoci, tak se mi prosim ozvi na muj e-mail. O hre
>se vice dozvis na strankach Gamemakeru - http://gm1.miesto.sk

Pouziti databazi bude podle me pri dalsi tvorbe nevyhnutelne
a nejrychlejsi reseni. Se sirenim souborove databaze by to melo
bejt v pohode.

>DirectX chci pouzit az primo do hry. Pouzivam k tomu DelphiX. Bohuzel jsem
>jeste neprisel na to, jak zjistit, ze uzivatel klikl treba na nejakou
>jednotku atd. Pokud to nekdo vi tak ho prosim, aby mi poradil. Diky.

Co treba TMouse.CursorPos (vraci TPoint) a projed si (na tohle by se hodila
databaze) co se na tom poli nachazi.Hlavne bys mel rozlisit levy a pravy
tlacitko jako u vsech strategii.

>Dale jsem se chtel zeptat jak kreslit jen na jeden TImage, abych vedel kam
>to mam presne posadit, a abych vedel pri ukladani kde co je. Teda pokud
>jsem
>pochopil ty navrhy (viz. e-mail od: P. Vonese, J. Benese, P. Palicka).
>Nechci vsak zadnou cizi komponentu, rad bych si to udelal sam jen se
>zakladnima vecma v Delphi.

Silne pochybuju o tom, ze kdyz budes na 1 TImage kreslit (treba canvasem)
tak pak budes vedet kde co je.

M.Jirman

P.S.: Hodne stesti. Pri konkurenci AGE OF EMPIRES II a Starcraftu
ho budes potrebovat vic nez dost :-)
P.S: Demo docela jde, jen se mi nelibi to opozdene jezdeni textur s mysi.
(asi to delas pomoci timeru)

Komunikace DOS - Windows

[*] L. ZITA <konference(zv)sales(tec)cz> - 11.4.2000 21:43:04

Behalf Of Vaclav Sazima
> Ahoj,
> tak ja bych se z dovolenim pridal. A jak na to, kdyz bezi na ruznych
> pocitacich spojenych siti? Zatim pouzivam komunikaci pres souborovy
> system a to je hodne pomale. Ten DOS program dela server.
> Dik
> Vaclav Sazima

Uprimne receno , pokud (a to predpokladam) neni moznost ten DOS program
prepsat (jinak by asi nebylo o cem debatovat) tak mne to jinak nez pres
soubory nenapada.
Ja jsem prave vyuzival soubory k "predavani" dat mezi DOS a WIN aplikaci.
Bylo to jednoduche : DOS se startoval pres batch, ktery mne informoval o
nastartovanem DOS programu a zaroven mi dodaval pomocnou informaci pro
vyhledani okna (to resilo problem s vice instancemi DOS programu a se
zmenami titulku okna za chodu) "Prebirani" rizeni do WIN aplikace bylo
takove poloautomaticke a spocivalo v informaci obsluze, ze dokud neukonci
DOS instanci, ktera mela "v praci" potrebna data, tak si WIN nadstavbu
nepusti. No a ta WIN nadstavba, kdyz potrebovala sahnout na data, tak se
koukla pomoci ridiciho souboru a vyhledani okna zda na datech pracuje DOS a
pripadne dala zpravu uzivateli ze potrebuje ukoncit DOS a cekala na ukonceni
prislusne instance DOS a pak teprve pracovala na datech. Pri tom zmenila
batch aby neslo spustit ten DOS program dokud bude potrebovat datove
soubory.

Konkretne slo o nejake DOS ucetnictvi, ktere pracovalo s DBF soubory ovsem
nebylo sitove, takze se na data nedalo za behu sahat.

Bylo to komplikovane a takove "upatlane" ale nakonec to chodilo to bez
problemu a uzivatel mne vynasel do nebe, ze muze pouzivat svoji starou
aplikaci s kterou srostl a pritom si tisknout krasne graficke fakturky a
ruzne sestavy, ktere to jinak samozrejme neumelo. Bylo tam vice dalsich
funkci treba importy a exporty ceniku skladu a pod. do csv atd.
Nakonec mu to stejne rok 2000 zkrecoval a presel na Money.

Ludek ZITA
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000


Tlac zo Sinea Generatora

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 11.4.2000 22:00:38

Zdravim.

Pouzivam v IB smallint type ako nahradu Boolean type (0:=false a 1:=True).

Ako by som donutil Sineu aby mi vytlacila ako "Ano alebo Nie", bez toho aby
som musel pridavat dalsie calculated fields.

Skusam verziu Sinea Sestavy 3.39q ze dne 09.02.2000 demonstracny verze
(myslim ze to je 5.39q len ine pise) a D5.

Roland.

Zjisteni nazvu procedury

[*] Roman �ev��k������Ȥ�*%�̿ - 11.4.2000 23:22:17

Ahoj,
mam vytvorenou proceduru pro obsluhu vyjimek, v te procedure se ulozi popis chyby do souboru s nazvem formulare. Nevite nekdo jak zjisti nazev procedury ve ktere doslo k vyjimce ?


try
...
...

...
except
RSDBSecurity1.HandleException(Exception(ExceptObject));
end;


Dik moc
Roman

Zatuhnuti aplikace v D5 - reseni (?)

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

From: Martin Pe�ek <pesek.martin(zv)mymail(tec)cz>
> Update pack #1 nemam :( Jak jsem se dival na stranky Borlandu tak je to
> celkem objemnej macek a jelikoz jsem modemista tak to asi jen tak nesosnu
> (treba jsem se dival spatne). Na ten update od Microsoftu se podivam, diky.

Ahoj,

Ma to 28M. Pri pouziti 56k modemu dosahnes prumerne rychlosti 5kB/s, coz
je cca 93 minut, pri tarifu I2000 to vyjde v noci na 20.80 Kc.

> Dale jsem se chtel zeptat jak kreslit jen na jeden TImage, abych vedel kam
> to mam presne posadit, a abych vedel pri ukladani kde co je. Teda pokud jsem
> pochopil ty navrhy (viz. e-mail od: P. Vonese, J. Benese, P. Palicka).
> Nechci vsak zadnou cizi komponentu, rad bych si to udelal sam jen se
> zakladnima vecma v Delphi. Dekuji za odpovedi.

Mozna by se ti misto TImage hodilo pouzit TPaintBox, obrazky udrzovat jako
bitmapy a vykreslovat je (ci jejich casti) v paintboxu dle potreby. Cely
TImage neni strucne receno vlastne nic jineho nez bitmapa + paintbox.

Petr Vones, amatersky programator

MDAC 2.5

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

From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> To je sice hezke, ale uz vidim, jak budu skolit prodejce, ze po
> instalaci u jejich zakaznika maji restartovat pocitac, a v 95 otevrit
> registr a smazat tu a tu polozku. :-)))
> Mno, asi radeji pockam na opravene MDAC...

No, jen aby jsi se dockal, Win95 jsou prece jen u Microsoftu trochu mimo
hlavni zajem. Neni spis lepsi si to opravit vlastnimi silami, jsi prece
programator :-) Staci napsat malou utilitu pomoci ktere tu polozku na
Win95 odstranis.

Petr Vones, amatersky programator

Zatuhnuti Delphi pri startu aplikace

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

From: Radek Zhasil <Radek.Zhasil(zv)seznam(tec)cz>
> Jak se zda tak problem se zatuhnutim Delphi pri spusteni aplikace jsi jiz vyresil
> instalaci W2K, presto bych ale rad prispel svou zkusenosti. Narazil jsem na tentyz
> problem u jedne sve aplikace. Protoze jsem, pokud mozno, potreboval zachovat
> stavajici konfiguraci PC (D3 C/S,W95 IE5), zkousel jsem r�zn� varianty a zjistil
> nasledujici:
>
> Nefungujici konfig. :
> D3 C/S, Win95 IE5;
> D3 C/S, Win98;
> D4 C/S, Win95 IE5;

Zvlastni, v te posledni konfiguraci nemam s TCoolBar zadne problemy. Mas u
toho D4 update pack #3?

Petr Vones, amatersky programator

Zatuhnuti aplikace v D5 - reseni (?) OT download

[*] L. ZITA <konference(zv)sales(tec)cz> - 12.4.2000 03:21:48

Behalf Of Petr Vones
> Ma to 28M. Pri pouziti 56k modemu dosahnes prumerne rychlosti 5kB/s, coz
> je cca 93 minut, pri tarifu I2000 to vyjde v noci na 20.80 Kc.
>

Ona vetsinou je brzda nekde na ceste taky se to nekdy rozpadne.
Vrele muzu doporucit sluzbu Video On Line FTP downloader.
Staci si u nich udelat zadarmo konto na volny a pak jim zadas
adresu souboru, ktery chces stahnout. Oni to stahnou na svoje ftp a
daj ti vedet mailem. Pak stahujes uz jenom primo od nich a tim padem
je to opravdu rychly a nejaky zacpy na trase nebo koncovem serveru te uz
nezdrzujou.

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


Zatuhnuti aplikace v D5 - reseni (?)

[*] petr.palicka(zv)atlas(tec)cz - 12.4.2000 07:01:42

> Update pack #1 nemam :( Jak jsem se dival na stranky
> Borlandu tak je to celkem objemnej macek a jelikoz jsem
> modemista tak to asi jen tak nesosnu

na ceskym zastoupeni lze objednat CD s updatem delf, BDE a spoustou zdrojaku a free softu za 250 Kc...

> odpoved na e-mail od Petra Palicka:
> No, databze nepouzivam, protoze mam problemy s jejim
> sirenim. Pokud by jsi bylo ochoten mi s timto pomoci,
> tak se mi prosim ozvi na muj e-mail.odpoved na e-mail od
..
> Dale jsem se chtel zeptat jak kreslit jen na jeden TImage,
> abych vedel kam to mam presne posadit, a abych vedel pri
> ukladani kde co je. Teda pokud jsem pochopil ty navrhy
> (viz. e-mail od: P. Vonese, J. Benese, P. Palicka).
> Nechci vsak zadnou cizi komponentu, rad bych si to udelal
> sam jen se zakladnima vecma v Delphi. Dekuji za odpovedi.

Pokud nechces pouzivat zadnou DB, musis si vymyslet
vlastni zpusob ulozeni dat. Nezapomen, ze se jedna spise o objekty nez o nejaky brazek. Ten si vykreslis podle umisteni tech objektu (zmen textury a mas novou hru :-)).
Takze souradnice zjistis (treba) na OnMouseDown, ale jak si
je ulozis (zpamatujes) je uz jen a jen na tobe.
Proto jsem pouzil tu databazi. Navic DB ti umozni snadno
vyhledavat (podle souradnic, podle typu objektu, podle nazvu...).

Co se tyce spoluprace, ted nemam cas, ale mozna pozdeji...

dekuji peca


Uvolneni threadu pri ukonceni procesu

[*] Karel Klime� <kchodl(zv)email(tec)cz> - 12.4.2000 07:31:57

Ahoj,
mam nekolik threadu, ktere cekaji pomoci WaitForSingleObject(handle,INFNITE)
na ukonceni nejake externi aplikace, predtim vytvorene pomoci CreateProcess.
V tomto okamziku ukoncim vlastni aplikaci. Dojde k uvolneni prostredku? Vim,
ze kazdy process ma svuj vlastni adresovy prostor, lze tedy rict, ze bude
vse "vycisteno", ALE nedojde jen ke korektnimu ukonceni techto cekajicich
threadu (neco jako TerminateThread)?

Progr-Amather -Kchodl-(r) 1989-2000


Dalsi TFont property v TStringGrid

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 12.4.2000 07:43:43

On 11 Apr 00, at 16:01, Jezek Petr, Ing. wrote:

> Co je zle na teto komponente (pokud ji dam na form a snazim se
> nastavit FixedFont property, tak po zavreni Font dialog dostanu access
> violation a pri pokusu o rozbaleni property FixedFont dostanu hlasku
> Unable to expand):

> procedure TFixedFontStringGrid.SetFixedFont(Value: TFont);
> begin
FFixedFont.Assign(Value);
> end;


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


Tlac zo Sinea Generatora

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 12.4.2000 07:49:07

From: Roland Turcan (RoTurSoft) <rotursoft(zv)nextra.sk>
Subject: Tlac zo Sinea Generatora


> Zdravim.
>
> Pouzivam v IB smallint type ako nahradu Boolean type (0:=false a 1:=True).
>
> Ako by som donutil Sineu aby mi vytlacila ako "Ano alebo Nie", bez toho
aby
> som musel pridavat dalsie calculated fields.
>
> Skusam verziu Sinea Sestavy 3.39q ze dne 09.02.2000 demonstracny verze
> (myslim ze to je 5.39q len ine pise) a D5.
>
> Roland.
>

Jenom pomoci generatoru SINEA toho lze dosahnout takto.
Definuje se retezcova uzivatelska funkce, jejiz funkcni vyraz
bude:
IIF(#3=1,'Ano','Nie')
nebo i jednoduseji
IIF(#3,'Ano','Nie')
pokud #3 bude oznaceni te polozky. Samozrejmne je mozne pouzit
misto ciselneho oznaceni oznaceni nazvem polozky:
IIF(#Polozka3,'Ano','Nie')
No a v predloze se pouzije misto polozky tato uzivatelska funkce.

Vaclav Krmela

TTreeView a D5

[*] garalda <garalda(zv)mail(tec)cz> - 12.4.2000 08:27:00

Zdravim vsechny

Vytvarim aplikaci, ktera nacita data z nekolika tabulek (pod Accessem) a
zapisuje je do stromu (TTreeView). Pri kliknuti na uzel stromu, pak zobrazi
odpovidajici data v DBGridu. Puvodne jsem aplikaci napsal pod D4 Pro.
Vsechno chodilo bez problemu. Nacteni dat do stromu trvalo cca 10 sec. Pak
jsem presel na D5 Pro a doslo k rapidnimu poklesu vykonu. Nacteni dat do
stromu se pohybuje radove v HODINACH. Problem bude zrejme v tom strome,
protoze, kdyz jsem vyhodil tvorbu stromu a nechal jen nacitat data z
database, tak nebylo za par sekund co resit. Totez, kdyz jsem misto do
stromu nechal nacist ta data do StringListu. Nacteni do struktury
StringListu trvalo cca 3 sec, kdyz jsem pak chtel ten strom naplnit z tech
StringListu, trvalo to opet nekolik hodin. Momentalne jsem to vyresil tak,
ze jsem v D4 vyexportoval strom do souboru (SaveToFile) a v D5 ho nacitam
(LoadFromFile) (obsah databaze se nemeni) a cele to trva opet jen par
sekund, ale nesetkali jste se s tim nekdo? V cem muze byt problem. Vysek
kodu prikladam.

Diky za kazdou radu

procedure TMainForm.VytvorParStrom;
var trnHlavni, trnHlavni1 : TTreeNodes;
trnNazev, trnNazev1 : TTreeNode;
strNazev : String;
begin
// myMDIChild.trvPar1.LoadFromFile('Par1Tree.txt');
// myMDIChild.trvPar2.LoadFromFile('Par2Tree.txt');
with qryPar1 do
begin
Open;
trnHlavni := myMDIChild.trvPar2.Items;
trnHlavni1 := myMDIChild.trvPar1.Items;
strNazev := FieldByName('Name').AsString;
trnNazev := trnHlavni.AddChild(trnHlavni[0], strNazev + ' - ' +
FieldByName('Number').AsString);
trnNazev1 :=
trnHlavni1.AddChild(trnHlavni1[0],FieldByName('Number').AsString + ' - ' +
strNazev);
trnHlavni.AddChild(trnNazev, FieldByName('Nazev').AsString);
trnHlavni1.AddChild(trnNazev1, FieldByName('Nazev').AsString);
Next;
while not EOF do
begin
if strNazev = FieldByName('Name').AsString then
begin
trnHlavni.AddChild(trnNazev, FieldByName('Nazev').AsString);
trnHlavni1.AddChild(trnNazev1, FieldByName('Nazev').AsString);
end else
begin
strNazev := FieldByName('Name').AsString;
trnNazev := trnHlavni.AddChild(trnHlavni[0], strNazev + ' - ' +
FieldByName('Number').AsString);
trnHlavni.AddChild(trnNazev, FieldByName('Nazev').AsString);
trnNazev1 := trnHlavni1.AddChild(trnHlavni1[0],
FieldByName('Number').AsString + ' - ' + strNazev);
trnHlavni1.AddChild(trnNazev1, FieldByName('Nazev').AsString);
end;
Next;
end;
Close;
myMDIChild.trvPar1.AlphaSort;
end;
end;

Duplicita klicu, Key - Violation

[*] Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz> - 12.4.2000 08:36:30

Ahoj !!!

Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen poradit, jak co
nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v databazi. Pri
vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key - Violation v
momente, kdy v DB existuje zaznam se stejnym klicem. Potreboval bych vedet,
jak teto hlasce predejit a informovat o tom uzivatele. Delam v Delphi 5.

Diky za vsechny maily.

Tom

Mail: tomas.kucera(zv)matsushita(tec)cz.

Komunikace s Wordem

[*] Pavel Bare� <bares(zv)atoll(tec)cz> - 12.4.2000 08:38:45


Nevite nekdo jak vyvolat dotaz na ulozeni dokumentu pri ukonceni Wordu otevreneho z OleContaineru.
Standardne se dokument pri skonceni ulozi automaticky bez dotazu.

dekuji za radu

Pavel Bare�
Atoll s.r.o.

FreeIB komponenty pro IB 6

[*] Pavel Bare� <bares(zv)atoll(tec)cz> - 12.4.2000 08:38:26



Nevite nekdo jestli bude nova verze FreeIB komponent, ktera podporuje IB 6.0.

dekuji

Pavel Bare�
Atoll s.r.o.

Jak zjistit stav okna?

[*] Petr Smol�k <psmolik(zv)fides(tec)cz> - 12.4.2000 08:41:11



>> Nemohu se dopatrat jak zjistit stav okna za behu (potomek TForm, je-li
>> Normal, Minimized nebo Maximized).
>> WindowState je jen pri startu a ve FormState neni co potrebuji.

>Skus funkciu API GetWindowPlacement (v strukture WINDOWPLACEMENT je
>atribut
>showCmd ktory obsahuje aktualny stav okna)

S touto fci. jsem dopadl stejne jako s WindowState.
Pri maximalizovanem okne to vraci dobre, ale v minimalizonanem stavu to
tvrdi, ze je NORMAL.
Nevim proc, ale uz je to jedno. Udelal sem to tak, ze to nepotrebuji.
Ale dik.

Petr Smol�k
psmolik(zv)fides(tec)cz


Datab�ze

[*] garalda <garalda(zv)mail(tec)cz> - 12.4.2000 08:46:37

Ahoj,

podle dotazu soudim, ze jsi zacatecnik ;-). Jako uplne nejjednodussi bych
asi doporucoval spustit database experta, ten by mel vetsi cast toho co
potrebujes vygenerovat sam.

Jinak se podivej do sekce Demos/Db, to by ti melo dostatecne pomoci


Komunikace DOS - Windows

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 12.4.2000 09:05:13

Upresnim.
Jde o komunikaci klient-server. Win program je server, DOS program je
klient.
Protoze jde o databazovou zalezitost, musi to svihat.

Komunikace pres soubory neni mozna, proto�e je zoufale pomala. Zkousel jsem
to.

Vim ze to jde, protoze znam dva produkty ktere presne tohle delaji.


ing. Michal K�s
TANGO software s.r.o.
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz
>
> > Vi nekdo jak zaridit komunikaci mezi programy, jeden je
> DOS, druhy je
> > Windows, oba bezi na jednom pocitaci?
> >
>
> Jiz jsem se necim podobnym zabyval. Trochu upresni problem.
>
>
> Ludek ZITA

Informace o FlashFileru

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 12.4.2000 09:53:04

Jak jsem pred rokem koupil FF, tak jsem dostal velice tenkou knizecku, ale
prece nejakou.
Pavel ZIDEK

----- Original Message -----
From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 11, 2000 4:43 PM
Subject: RE: Informace o FlashFileru


> Ahoj,
>
> prave jsem dostal instalacni CD FlashFiler, ale nebyla k nemu zadna
prirucka
> jako napr. k Orpheusu 3. To je zamer nebo odkaz na dokumenty v CD?
>
> Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Karel Kral [SMTP:kral(zv)purus(tec)cz]
> > Odesl�no: 11. IV 2000 14:46
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: Informace o FlashFileru
> >
> >
>

Vlozenie btimapy do bitmapy 2

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 12.4.2000 10:15:02

Zdravim,

cez Image2.Picture.Bitmap.Canvas.CopyRect(R, Image1.Picture.Bitmap.Canvas,
R);
to ide. Vlozi mi to ale v realnej velkosti. Lenze ja mam image1
stretch:=true; t.j. jeho realna velkost je vacsia (resp. mensia). No a ja to
chcem vlozit vo velkosti, ktoru mam nadstavenu.


Dik, Miso


Komunikace DOS - Windows

[*] DiGi <DiGi(zv)MujMail(tec)cz> - 12.4.2000 10:15:25

Absolutne nevim jak to bylo udelany, ale Dos Navigator (cisty DOS program)
dokazal spolupracovat s Windows schrankou (uz ve staricke verzi 1.4),
takze se urcite da ovlatat i spousta jinych veci z Windows...

DiGi
--- DiGi(zv)MujMail(tec)cz ---------------------------------------------
-------------------------------------------- http://www.qr(tec)cz ---

FreeIB komponenty pro IB 6

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 12.4.2000 10:35:09

Podle toho jak tomu rozim ja tak FreeIB ma nastupce v IBX komponentach,
ktere jsou v Delphi 5 a s novym updatem podporuji IB 6.0. Myslim si, ze
FreeIB se dale aktivne nevyviji.

Pavel

----- Original Message -----
Nevite nekdo jestli bude nova verze FreeIB komponent, ktera podporuje IB
6.0.

FAXovanie

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 12.4.2000 10:51:03

Ahoj,

robil uz niekto z vas program, ktory faxuje nejaky dokument?

Potrebujem asi toto:
Klientovi nainstalovat s programom aj ovladac faxu (nejaky aky ??? a ako
???)
Vystup s programu bude asi v HTML, v reportoch, alebo moze byt v niecom
inom. A teraz potrebujem tu stranku niekam odfaxknut.

To asi "zatial" vse ;-))

Pavol Kaka�ka
paka(zv)aktis(tec)cz


RichEdit

[*] Zapl�k���ͪe�?�Y��̿ - 12.4.2000 11:05:21

>> Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
>> Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a
tento
>> soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu
>> pridat
>> na konec souboru.
>>
>A co tak urobit to "rucne", teda otvorit si dany subor a
>zapisat tam text z RichEditu?

>/LH

Jenze Soubor RTF ma urcitou strukturu a pokud tam vlozim jen holy text, tak
tu strukturu
poskodim. Ne?


Martin Zapletal
zaplik(zv)volny(tec)cz

NVarchar a MSSQL - 2

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 12.4.2000 11:05:32

> Ale houby chyba MS SQL serveru, takhle lehce se z toho Delphi
> nevykrouti ;-). Problem je v Delphi, resp. v komponentach Delphi
> (popr. v komponentach MODBC co pouziva Sroub - aspon se domnivam ze
> jsou to nejake ODBC komponenty). Patrne nepodporuji NTEXT. A chyba
> bude patrne opravdu v tech komponentach, protoze ODBC tyto hodnoty
> vraci - testoval jsem to pres OLEDB provider pro ODBC a to slape.
> Pouzite komponenty netradicne Adonis ;-) To ze to v Adonisu funguje i
> pres OLEDB pro MS SQL providera je snad jasne ;-)> > to jadro problemu, ktere by i me zajimalo, neni, jak nejakou oklikou
> > ziskat ownera apod. (to je reply na Zbyskovu odpoved, kterou jsem
> > omylem smazal), ale proc MSSQL vubec nevrati sloupce typu nvarchar.
> > Resp. je mozna vrati, ale aplikace je nevidi. Zajimave je, pouha
> > zmena typu na char problem resi - tj. zda se mi, ze jde o nejakou
> > chybu SQL serveru.
> >
> > David
> >
>

Dobra, dobra, byl to jen nazor. Ale jsem fakt rad, ze se to konecne
uspokojive vysvetlilo.

David


Komunikace DOS - Windows

[*] Radim Ludv�k <radiml(zv)bnsoft(tec)cz> - 12.4.2000 11:16:44

Tohle je delane pomoci INT 2F, kdo by chtel zdroj at mi napise.

S pozdravem

Radim LUDVIK
BN Soft Znojmo
radiml(zv)bnsoft(tec)cz

> Absolutne nevim jak to bylo udelany, ale Dos Navigator (cisty DOS program)
> dokazal spolupracovat s Windows schrankou (uz ve staricke verzi 1.4),

Nativni komponenty pro Access

[*] Kejval <petr.kejval(zv)worldonline(tec)cz> - 12.4.2000 11:28:16

Ahoj,
omlouvam se, ze jsem z nepozornosti zapomnel vyplnit predmet u predchoziho
dotazu.

Je pravda, ze na zminovane adrese jsem pro D1 nic nenasel. Potrebuji se, ale
na Access 2.0 dostat jakymkoliv zpusobem.
Zkousel jsem pristup pres ODBC a driver Access 2.0 for MS Office (*.mdb)
FileName:ODBCJT16.DLL
Description:ODBC driver for Microsoft Access (TM) version 2
Version:1.00.1521
Creation Date:23.11.1994
Size:138480 bytes
Na databazi jsem se napojil, ale pri pokusu o zmenu zaznamu nebo pridani
zaznamu mi vyskakuje nasledujici chyba:
Hlavni chyba SQL
[Microsoft][ODBC Access Jednotkar]Jet error-1003 returned

Kdyz se obdobnym zpusobem na tutez databazi pripojim z D4, ale pres ODBC32
je vse vporadku. Potiz je v tom, ze se na databazi Access 2.0 musim pripojit
z D1, nebod uzivatel je stale vybavem pocitaci s Windows 3.11 a v dohledne
dobe tomu nebude jinak, nebo� by mel upgradovat priblizne 200 pocitacu.

Na www.torry.ru jsem se dozvedel, ze chci-li pristupovat z D1 na Access 2.0
musim
splnovat tyto podminky:
ODBCJT16.DLL dated 11/18/94 or later
ODBCINST.DLL dated 08/17/94 or later
ODBCCTL16.DLL dated 11/18/94 or later
MSAJT200.DLL dated 11/18/94 or later
MSJETERR.DLL dated 11/18/94 or later
MSJETINT.DLL dated 11/18/94 or later
I presto, ze tyto podminky splnuji, tak se mi vyskytuje vyse popsana chyba.

Prosim o nejakou radu, protoze jsem uz naprosto bezradny.

S pozdravem Petr Kejval
e-mail: petr.kejval(zv)worldonline(tec)cz



Neco mozna najdes tady, ale pro D1 dost pochybuju:

http://www.kylecordes.com/bag/listbytype.html

Mac

P.S. Zkus prosim te priste psat nejaky subject (plati i pro ostatni
'experty' ;-). Zpravy bez subjectu obvykle hned mazu ... ;-)
poradil by mi nekdo, zda lze nekde (a kde) sehnat nativni komponenty pro
pristup z D1 na MS Access 2.0.

Informace o FlashFileru

[*] Karel Kral <kral(zv)purus(tec)cz> - 12.4.2000 11:33:05

Pry vyrabeji novy manual. Ten stary tedy nebyl nic moc, protoze byl k
verzi 1.0. Nedostatek dokumentace je nejvetsim nedostatkem FF. Ale jde
to i bez toho.

Bene� Jaroslav wrote:
>
> Ahoj,
>
> prave jsem dostal instalacni CD FlashFiler, ale nebyla k nemu zadna prirucka
> jako napr. k Orpheusu 3. To je zamer nebo odkaz na dokumenty v CD?
>
> Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Karel Kral [SMTP:kral(zv)purus(tec)cz]
> > Odesl�no: 11. IV 2000 14:46
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: Informace o FlashFileru
> >
> >

--
______________________________________________________
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
______________________________________________________


MDAC 2.5

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 12.4.2000 11:56:45

On 11 Apr 00, at 23:30, Petr Vones wrote:

> > To je sice hezke, ale uz vidim, jak budu skolit prodejce, ze po
> > instalaci u jejich zakaznika maji restartovat pocitac, a v 95
> > otevrit registr a smazat tu a tu polozku. :-))) Mno, asi radeji
> > pockam na opravene MDAC...
>
> No, jen aby jsi se dockal, Win95 jsou prece jen u Microsoftu trochu
> mimo hlavni zajem. Neni spis lepsi si to opravit vlastnimi silami, jsi
> prece programator :-)

Hm, kdyz ja jsem takovy amatersky samouk... :-)

> Staci napsat malou utilitu pomoci ktere tu
> polozku na Win95 odstranis.

Jo, a porad mi take, jak mam zajistit, aby si uzivatel tu utilitku
spustil az po restartu pocitace. Jak znam uzivatele, tak nekteri si
to pusti hned po instalaci, byt budou mit velkym pismenem
napsano, ze maji nejdrive pocitac restartovat. Pak jim nebude
fungovat nic, a mne budou nadavat.


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


FAXovanie

[*] Ji�� Kr�l jr. - 12.4.2000 12:18:38


faxovani je v podstate tisk. Fax je instally jako tiskarna. Ovsem je potreba
zjistit, jak dodat driveru faxove cislo jako parametr, aby to user nas
nejmilejsi nemusel psat sam, ze. Nevim kde to mam hledat.
Nejcastejsi fax driver je MS Fax driver, co je u Woken. Taky byva u modemu
prilozen nej. soft ktery to umi taky, napr. lokalizovany SuperVoice (byva u
GVC, Microcomu, Wellu a jinych)

Vi nekdo jak predat faxu tel. cislo parametrem?

JK

dokumentace k IB6

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 12.4.2000 12:19:31

http://www.interbase.com/open/downloads/ib_download.html
nebo primo a rychleji
ftp://ftp2.interbase.com/pub/products/beta6.0/ib_b60_doc.zip

Pavel

----- Original Message -----
Subject: dokumentace k IB6


> Nedavno kdosi psal o tom, ze lze stahnout dokumentaci k IB6 ve
> formatu PDF vcetn� dokumentace k IBExpresu. Nemuzete me nakopnout
> odkud se to da stahnout?
>
> Milan Dvo��k
> dvorak(zv)gymzn(tec)cz

MDAC 2.5

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 12.4.2000 12:21:32

Tak tu svou utilitku dej do sekce RunOnce
(to je vrchol, uprava registru pro upravu
registru :-) a potom teprve restartuj.

D.

> ----------
> Od: Zbysek Hlinka[SMTP:zhlinka(zv)login(tec)cz]
>
> > Staci napsat malou utilitu pomoci ktere tu
> > polozku na Win95 odstranis.
>
> Jo, a porad mi take, jak mam zajistit, aby si uzivatel tu utilitku
> spustil az po restartu pocitace. Jak znam uzivatele, tak nekteri si
> to pusti hned po instalaci, byt budou mit velkym pismenem
> napsano, ze maji nejdrive pocitac restartovat. Pak jim nebude
> fungovat nic, a mne budou nadavat.
>

FAXovanie

[*] petr.palicka(zv)atlas(tec)cz - 12.4.2000 12:26:58

ahoj

pokud vim, taxe faxy instalujou jako tiskarny,
no a potom bych na to tisknul jako na tiskarnu...
driver by si mel vyzadat faxnumber sam...

dekuji peca

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[ smtp: petr.palicka(zv)atlas(tec)cz ]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

> Potrebujem asi toto:
> Klientovi nainstalovat s programom aj ovladac faxu
> (nejaky aky ??? a ako ???)
> Vystup s programu bude asi v HTML, v reportoch,
> alebo moze byt v niecom inom.
> A teraz potrebujem tu stranku niekam odfaxknut.
> To asi "zatial" vse ;-))

dokumentace k IB6

[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 12.4.2000 11:31:05

Nedavno kdosi psal o tom, ze lze stahnout dokumentaci k IB6 ve
formatu PDF vcetn� dokumentace k IBExpresu. Nemuzete me nakopnout
odkud se to da stahnout?

Milan Dvo��k
dvorak(zv)gymzn(tec)cz


UpdateSQL

[*] olej.jozef(zv)slsp.sk - 12.4.2000 12:38:16


Ahoj,

V D3 mam TQuery->TDataSource->TDBEdit a chcem volzit novy zazam a opravit
existujuci.
Skusil som zadefinovat SQL v UpdateSQL ale neviem ako vyvolat prislusny SQL
a predat parametre.

Dakujem.

Jozo


Ako na filter?

[*] Mari�n Goryl <goryl(zv)insdata.sk> - 12.4.2000 12:48:29

Mam takyto problem:
Robim s px databazou cca 50000 poloziek, ktoru kvoli vypoctom velmi casto
filtrujem a prehladavam. Query boli prilis pomale, tak to robim cez filter
table.
Filtrujem to na dlzku retazca a znaky na poziciach.
Nenasiel som sposob ako do textu filtra zadat meniaci sa string, takze
filter sa robi s pouzitim funkcie Copy a Length v onFilterRecord.

Udaje su indexovane podla secondary indexu, pretoze niektore polozky sa v
poli opakuju. Je to otrasne pomale - jedna filtracia trva 10-15 sekund.

Existuje nejaky sposob na urychlenie? Nastavenie BDE alebo nastavenie
vlastnosti Tabulky alebo finta na filter?

Dakujem za kazdu inspiraciu.

Duplicita klicu, Key - Violation

[*] Delphi <delphi(zv)dcomm(tec)cz> - 12.4.2000 12:52:24

Ahoj,
mam to normalne osetreno pres try...except

Hippy

> -----Original Message-----
> From: Tomas Kucera [mailto:Tomas.Kucera(zv)matsushita(tec)cz]
> Sent: Wednesday, April 12, 2000 8:37 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Duplicita klicu, Key - Violation
>
>
> Ahoj !!!
>
> Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen
> poradit, jak co
> nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v
> databazi. Pri
> vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key - Violation v
> momente, kdy v DB existuje zaznam se stejnym klicem.
> Potreboval bych vedet,
> jak teto hlasce predejit a informovat o tom uzivatele. Delam
> v Delphi 5.
>
> Diky za vsechny maily.
>
> Tom
>
> Mail: tomas.kucera(zv)matsushita(tec)cz.
>

zdeformovany ukazatel pozice

[*] The Myst <mjsoft(zv)rychnov(tec)cz> - 12.4.2000 13:01:00

Dobry den

u jednoho zakaznika jsem nainstaloval program napsany v Delphi4 Pro. Po jeho spusteni byl v DBGridu zdeformovany ukazatel pozice (takovy ten trojuhelnicek na leve strane). To same se stalo i v jednom TreeView ve kterem mam sve obrazky. Nevite v cem je pricina.

diky predem

T.M.

TTreeView a D5

[*] Bohuslav Svancara <softprojekt(zv)iol(tec)cz> - 12.4.2000 13:30:18

Tvuj problem vyresi TTreeView.Items.BeginUpdate a TTreeView.Items.EndUpdate.

S pozdravem

Bohuslav Svancara
softprojekt(zv)iol(tec)cz
----- Original Message -----
From: "garalda" <garalda(zv)mail(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 12, 2000 8:27 AM
Subject: TTreeView a D5


> Zdravim vsechny
>
> Vytvarim aplikaci, ktera nacita data z nekolika tabulek (pod Accessem) a
> zapisuje je do stromu (TTreeView). Pri kliknuti na uzel stromu, pak
zobrazi

Informace o FlashFileru

[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 12.4.2000 13:47:45

Ja jsem kupoval verzi 1.52 a asi 100 strankovou knizecku mam. V techto dnech
by mel TurboPower vydat asi 200 strankovy manual a registrovani uzivatele by
jej meli dostat automaticky postou.

Mira


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Bene� Jaroslav
Sent: Tuesday, April 11, 2000 4:43 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Informace o FlashFileru


Ahoj,

prave jsem dostal instalacni CD FlashFiler, ale nebyla k nemu zadna prirucka
jako napr. k Orpheusu 3. To je zamer nebo odkaz na dokumenty v CD?

Jaro B.

> -----P�vodn� zpr�va-----
> Od: Karel Kral [SMTP:kral(zv)purus(tec)cz]
> Odesl�no: 11. IV 2000 14:46
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Informace o FlashFileru
>
>

Duplicita klicu, Key - Violation

[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 12.4.2000 13:47:43

Udalosti OnPostError (pri vkladani) a OnEditError pri oprave zaznamu.

Jako Action si dej treba Action := daAbort;

Pres E.Message rozlisis, o kterou chybu jde

Mira


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Tomas
Kucera
Sent: Wednesday, April 12, 2000 8:37 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Duplicita klicu, Key - Violation


Ahoj !!!

Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen poradit, jak co
nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v databazi. Pri
vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key - Violation v
momente, kdy v DB existuje zaznam se stejnym klicem. Potreboval bych vedet,
jak teto hlasce predejit a informovat o tom uzivatele. Delam v Delphi 5.

Diky za vsechny maily.

Tom

Mail: tomas.kucera(zv)matsushita(tec)cz.

Ako na filter?

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 12.4.2000 14:05:49

Existuje, nepouzivat Filter, ale zasadne Query, Delam s takovymi
tabulkami velmi casto a Query je vzdy nekolikanasobne rychlejsi.

> Mam takyto problem:
> Robim s px databazou cca 50000 poloziek, ktoru kvoli vypoctom velmi =
> casto
> filtrujem a prehladavam. Query boli prilis pomale, tak to robim cez =
> filter
> table.
> Filtrujem to na dlzku retazca a znaky na poziciach.
> Nenasiel som sposob ako do textu filtra zadat meniaci sa string, takze
> filter sa robi s pouzitim funkcie Copy a Length v onFilterRecord.
>
> Udaje su indexovane podla secondary indexu, pretoze niektore polozky sa =
> v
> poli opakuju. Je to otrasne pomale - jedna filtracia trva 10-15 sekund.
>
> Existuje nejaky sposob na urychlenie? Nastavenie BDE alebo nastavenie
> vlastnosti Tabulky alebo finta na filter?
>
> Dakujem za kazdu inspiraciu.
>
>
> ------=_NextPart_000_0008_01BFA47D.672AF900
> Content-Transfer-Encoding: quoted-printable
> Content-Type: text/html;
> charset="iso-8859-2"
>
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
> <HTML>
> <HEAD>
>
> <META content=3Dtext/html;charset=3Diso-8859-2 =
> http-equiv=3DContent-Type>
> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR>
> </HEAD>
> <BODY bgColor=3D#ffffff>
> <DIV>Mam takyto problem:<BR>Robim s px databazou cca 50000 poloziek, =
> ktoru kvoli=20
> vypoctom velmi casto<BR>filtrujem a prehladavam. Query boli prilis =
> pomale, tak=20
> to robim cez filter<BR>table.<BR>Filtrujem to na dlzku retazca a znaky =
> na=20
> poziciach.<BR>Nenasiel som sposob ako do textu filtra zadat meniaci sa =
> string,=20
> takze<BR>filter sa robi s pouzitim funkcie Copy a Length v=20
> onFilterRecord.<BR><BR>Udaje su indexovane podla secondary indexu, =
> pretoze=20
> niektore polozky sa v<BR>poli opakuju. Je to otrasne pomale - jedna =
> filtracia=20
> trva 10-15 sekund.<BR><BR>Existuje nejaky sposob na urychlenie? =
> Nastavenie BDE=20
> alebo nastavenie<BR>vlastnosti Tabulky alebo finta na =
> filter?<BR><BR>Dakujem za=20
> kazdu inspiraciu.<BR></DIV></BODY></HTML>
>
> ------=_NextPart_000_0008_01BFA47D.672AF900--
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


UpdateSQL

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 12.4.2000 14:11:52

Parametry nepredavas, musis u TQuery nadefinovat UpdateObject
jako TUpdateSQL a pak se chovas k TQuery stejne jako TTable
tzn. pouzivas .Edit, .Post, .Append atd.
v TUpdateSQL napises vsechny SQL prikazy pro insert, delete i
update napr. takto insert ->
insert into tablename
(klic, hodnota1, hodnota2)
VALUES
(:klic, :hodnota1, :hodnota2)

delete ->
delete from tablename
where klic = :old_klic

update ->
update tablename set
klic = :klic,
hodnota1 = :hodnota1,
hodnota2 = :hodnota2
where
klic = :old_klic

Staci ????????????????????????????????

>
> Ahoj,
>
> V D3 mam TQuery->TDataSource->TDBEdit a chcem volzit novy zazam a opravit
> existujuci.
> Skusil som zadefinovat SQL v UpdateSQL ale neviem ako vyvolat prislusny SQL
> a predat parametre.
>
> Dakujem.
>
> Jozo
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Seznam MS-SQL serveru

[*] Erik Salaj <winsoft(zv)napri.sk> - 12.4.2000 14:24:51

> Nev�te jak ziskat seznam MS-SQL serveru v siti?

Napr. pomocou SQL-DMO objektov:

uses SQLDMO_TLB; // importovana kniznica SQLDMO

var i, j: Integer;

with CoApplication_.Create.ServerGroups do
for i := 1 to Count do
begin
ShowMessage('Server group: ' + Item(i).Name);
with Item(i).RegisteredServers do
for j := 1 to Count do
ShowMessage('Server: ' + Item(j).Name);
end

mal by fungovat aj zoznam dostupnych SQL serverov na sieti,
u mna na lokalnom pocitaci to ale nezobrazilo nic:

with CoApplication_.Create.ListAvailableSQLServers do
for i := 1 to Count do
ShowMessage('Available SQL server: ' + Item(i));

Erik


Komunikace DOS - Windows

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 12.4.2000 14:47:11

Tohle je funkcni, ale zoufala pomale.
Kmitocet dotaz-dopoved je cca 5 Hz.
Musi to jit i jinak


ing. Michal K�s
TANGO software s.r.o.
pokladn� syst�my pro restaurace a obchody
Krymsk� 42
360 01 Karlovy Vary
017/32 264 68, 32 258 86
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz
>
> Tohle je delane pomoci INT 2F, kdo by chtel zdroj at mi napise.
>
> S pozdravem
>
> Radim LUDVIK
> BN Soft Znojmo
> radiml(zv)bnsoft(tec)cz
>
> > Absolutne nevim jak to bylo udelany, ale Dos Navigator
> (cisty DOS program)
> > dokazal spolupracovat s Windows schrankou (uz ve staricke
> verzi 1.4),
>
>

Duplicita klicu, Key - Violation

[*] Karel Huda� <KarelH(zv)cashreform(tec)cz> - 12.4.2000 14:52:02

Chtel bych jen doplnit, ze zpusob zjistovani chyby pres E.Message je sice
mozny, ale lze to i elegantneji pres cislo chyby:

procedure TUcet.UcetQPostError(DataSet: TDataSet; E: EDatabaseError; var
Action: TDataAction);
begin
Action:=daAbort;

if E is EDBEngineError Then
begin // Haha
Case (E as EDBEngineError).Errors[0].ErrorCode of
DBIERR_KEYVIOL : ShowMessage('Pokous�te se zalozit jiz existuj�c�
�cet!');
end; // Case
end; // If
end;

Kody chyb jsou uvedeny v BDE.int


KarelH

----- P�vodn� zpr�va -----
Od: Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Kopie: <tomas.kucera(zv)matsushita(tec)cz>
Odesl�no: 12. dubna 2000 13:47
P�edm�t: RE: Duplicita klicu, Key - Violation


> Udalosti OnPostError (pri vkladani) a OnEditError pri oprave zaznamu.
>
> Jako Action si dej treba Action := daAbort;
>
> Pres E.Message rozlisis, o kterou chybu jde
>
> Mira
>
>

MDAC 2.5

[*] L. ZITA <konference(zv)sales(tec)cz> - 12.4.2000 15:14:25

Behalf Of Zbysek Hlinka
> Jo, a porad mi take, jak mam zajistit, aby si uzivatel tu utilitku
> spustil az po restartu pocitace. Jak znam uzivatele, tak nekteri si
> to pusti hned po instalaci, byt budou mit velkym pismenem
> napsano, ze maji nejdrive pocitac restartovat. Pak jim nebude
> fungovat nic, a mne budou nadavat.

Instalacni program do klice
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce
zapise tu registracni utilitu a restartuje

Podivej se do helpu - TRegistry - Example

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


FAXovanie

[*] L. ZITA <konference(zv)sales(tec)cz> - 12.4.2000 15:14:24

Behalf Of Ji�� Kr�l jr.

> faxovani je v podstate tisk. Fax je instally jako tiskarna. Ovsem
> je potreba
> zjistit, jak dodat driveru faxove cislo jako parametr, aby to user nas
> nejmilejsi nemusel psat sam, ze. Nevim kde to mam hledat.
> Nejcastejsi fax driver je MS Fax driver, co je u Woken. Taky byva u modemu
> prilozen nej. soft ktery to umi taky, napr. lokalizovany
> SuperVoice (byva u
> GVC, Microcomu, Wellu a jinych)

Da se na to jit i z druhe strany. Vyzaduje to ovsem aby MS Exchange nebo
Outlook (nakonfigurovan� jako "Podnikov� nebo pracovn� skupina") byl tez
nastaven jako "SIMPLE KLIENT MAPI". Tento pozadavek je pomerne casto splnen.
Pak muzes pomoci fce MapiSendMail poslat fax jako e-mail a to tak, ze misto
mailove adresy das FAX:faxove_cislo.
Ma to vyhodu, ze se da pouzit k odeslani i e-mail.

Ludek

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


Prebudovani sysutils v D3

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 12.4.2000 15:20:10

Ahoj,
mam takovy pro mnohe jiste trivialni dotaz: mam prelozene nektere hlasky v
sysutils a jine konstanty (v Delphi 3), ale nevim jak to prebudovat do
balicku, muzete mi, prosim, nekdo poradit?
Dopredu velmi dekuji
Jaro B.

OT:SQL select

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 12.4.2000 15:35:37

Ahojte
mam napr. takovouto tabulku
jmeno cislo
A 1
A 2
A 6
B 8
C 2
C 3
a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
jednotlivych jmen. tj
A 6
B 8
C 3
nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7


Datab�ze

[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 12.4.2000 15:38:55

> Ahoj lidi, pros�m pomozte za��te�n�kovi v Delphi 4 Prof. Pot�eboval bych
> vytvo�it velmi jednoduchou datab�zi na evidenci adres lid�. Hlavn� form
> by obsahoval grid a n�jak� tla��tka (P�idej, Sma�, ...). Po stisku
> tla��tka P�idej by se otev�elo okno, kde by byly jednotliv� polo�ky
> datab�ze jako EditLiny ... A to je vlastn� v�echno... Pot�eboval bych
> poradit (nebo alespo� nast�nit) zhruba postup p�i tvorb� tohoto
> programu... - jak� v�echny komponenty mus� obsahovat, atd. P�edem d�ky
> za ka�dou pomoc.
>
Treba si zvolit databazu , urobit strukturu a postvat na to wizarda.

/LH


Duplicita klicu, Key - Violation

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 12.4.2000 15:44:36

Nejlepsi je nepouzivat duplicitni klice.
Vetsinou to staci.

(Kdyby byval byl problem konkretneji popsany,
byla by byvala dana konkretnejsi odpoved)

### Tomas Kucera napsal dne 12 Apr 00, v 8:36 :
> Ahoj !!!
>
> Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen poradit, jak co
> nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v databazi.
> Pri vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key - Violation v
> momente, kdy v DB existuje zaznam se stejnym klicem. Potreboval bych
> vedet, jak teto hlasce predejit a informovat o tom uzivatele. Delam v
> Delphi 5.
>
> Diky za vsechny maily.
>
> Tom
>
> Mail: tomas.kucera(zv)matsushita(tec)cz.

-----------------------------------------------
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


FAXovanie

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 12.4.2000 15:49:11

Napriklad Supervoice, ktery se dnes dodava
takrka se vsemi modemy, nainstaluje automaticky
ovladac pro faxovani, ktery se tvari jako tiskarna.
(PIC printer)

### Pavol Kaka�ka napsal dne 12 Apr 00, v 10:51 :
> Ahoj,
>
> robil uz niekto z vas program, ktory faxuje nejaky dokument?
>
> Potrebujem asi toto:
> Klientovi nainstalovat s programom aj ovladac faxu (nejaky aky ??? a ako
> ???) Vystup s programu bude asi v HTML, v reportoch, alebo moze byt v
> niecom inom. A teraz potrebujem tu stranku niekam odfaxknut.
>
> To asi "zatial" vse ;-))
>
> Pavol Kaka�ka
> paka(zv)aktis(tec)cz
>
>


-----------------------------------------------
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


RichEdit a formatovani MessageDlg

[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 12.4.2000 15:51:07

> Poradi nekdo, jak ulozim obsah RichEditu do souboru, ktery uz existuje?
> Pokud ukladam pomoci "RichEdit1.Lines.SaveToFile('report.rtf')", a tento
> soubor uz existuje, tak se prepise. Ja ale potrebuji obsah RichEditu
> pridat
> na konec souboru.
>
A co tak urobit to "rucne", teda otvorit si dany subor a
zapisat tam text z RichEditu?

/LH


DCOM a debug

[*] radomir.chwalek(zv)rtscs(tec)cz - 12.4.2000 15:55:31

Ahoj,

da se nejakym zpusobem krokovat DCOM? Vsude pisou, ze jako standardni
knihovna DLL, ale pokud to tak udelame, nedari se to.
DCOM je MTS objekt, Delphi 5.01, Win NT/95.

Diky


Radek


SQL select

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 12.4.2000 15:57:29

SELECT MAX Cislo
FROM t_table
GROUP BY Jmeno


Dobra.

> ----------
> Od: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
>
> mam napr. takovouto tabulku
> jmeno cislo
> A 1
> A 2
> A 6
> B 8
> C 2
> C 3
> a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> jednotlivych jmen. tj
> A 6
> B 8
> C 3
> nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
>

OT:Re: SQL select

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 12.4.2000 16:19:15

jo ale to mi vrati jen maximalni hodnoty pro jmena, ale ja chci celej
zaznam. vcetne jmena.Kdyz dam SELECT max(cislo),jmeno ... tak to nefunguje

----- P�vodn� zpr�va -----
Od: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 12. dubna 2000 15:57
P�edm�t: RE: SQL select


SELECT MAX Cislo
FROM t_table
GROUP BY Jmeno


Dobra.

> ----------
> Od: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
>
> mam napr. takovouto tabulku
> jmeno cislo
> A 1
> A 2
> A 6
> B 8
> C 2
> C 3
> a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> jednotlivych jmen. tj
> A 6
> B 8
> C 3
> nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
>

SQL select

[*] Bosnis <bosnis(zv)atlas(tec)cz> - 12.4.2000 16:22:05

select jmeno,max(cislo) as cislo
from tabulka
group by jmeno

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
Milos Sula
Odesl�no: 12. dubna 2000 15:36
Komu: delphi konference
P�edm�t: OT:SQL select


Ahojte
mam napr. takovouto tabulku
jmeno cislo
A 1
A 2
A 6
B 8
C 2
C 3
a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
jednotlivych jmen. tj
A 6
B 8
C 3
nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7

OleContainer a Word

[*] Pavel Bare� <bares(zv)atoll(tec)cz> - 12.4.2000 16:23:18

Pomozte mi prosim nekdo.

Potrebuji pouzivat Word jako editor ve sve aplikaci.
Pouzil jsem OleContainer, ale neustale narazim na dva problemy:

1. pri aktivaci Wordu v OleContaineru zmizi menu Soubor a vsechny prikazy, ktere obsahuje jsou nedostupne.
2. pri aktivaci Wordu samostatne (samostatne okno) nedokazu zjistit, kdy uzivatel dokument ulozi, abych jej mohl ulozit do databaze

dekuji za radu pripadne nejaky zdroj informaci o teto problematice

Pavel Bares
Atoll s.r.o.

FAXovanie

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 12.4.2000 16:25:39

> :Da se na to jit i z druhe strany. Vyzaduje to ovsem aby MS Exchange nebo
> Outlook (nakonfigurovan� jako "Podnikov� nebo pracovn� skupina") byl tez
> nastaven jako "SIMPLE KLIENT MAPI". Tento pozadavek je pomerne casto
splnen.
> Pak muzes pomoci fce MapiSendMail poslat fax jako e-mail a to tak, ze
misto
> mailove adresy das FAX:faxove_cislo.
> Ma to vyhodu, ze se da pouzit k odeslani i e-mail.

Vyzera to zaujimavo a ako to ide nastavit?

A co ak ma niekto Netscape, ... ?

Pavol Kaka�ka
paka(zv)aktis(tec)cz

SQL select

[*] JAHODA Jozef <jahoda(zv)asset.sk> - 12.4.2000 16:31:38

> From: Milos Sula [SMTP:crkstrobe(zv)geocities.com]
>
> jmeno cislo
> A 1
> A 2
> A 6
> B 8
> C 2
> C 3
> a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> jednotlivych jmen. tj
> A 6
> B 8
> C 3
>
napr:

SELECT Jmeno, Max(Cislo) FROM tabulka
GROUP BY Jmeno

JJ


SQL select

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 12.4.2000 16:37:05

SELECT jmeno, MAX(cislo) from tabulka GROUP BY jmeno

petr

-----Original Message-----
From: Milos Sula [mailto:crkstrobe(zv)geocities.com]
Sent: Wednesday, April 12, 2000 3:36 PM
To: delphi konference
Subject: OT:SQL select


Ahojte
mam napr. takovouto tabulku
jmeno cislo
A 1
A 2
A 6
B 8
C 2
C 3
a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
jednotlivych jmen. tj
A 6
B 8
C 3
nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7


Duplicita klicu, Key - Violation

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 12.4.2000 16:40:20

Dalsi moznost je prelozit si tuto hlasku primo v BDE

> Udalosti OnPostError (pri vkladani) a OnEditError pri oprave zaznamu.
>
> Jako Action si dej treba Action := daAbort;
>
> Pres E.Message rozlisis, o kterou chybu jde
>
> Mira
>
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Tomas
> Kucera
> Sent: Wednesday, April 12, 2000 8:37 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Duplicita klicu, Key - Violation
>
>
> Ahoj !!!
>
> Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen poradit, jak co
> nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v databazi. Pri
> vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key - Violation v
> momente, kdy v DB existuje zaznam se stejnym klicem. Potreboval bych vedet,
> jak teto hlasce predejit a informovat o tom uzivatele. Delam v Delphi 5.
>
> Diky za vsechny maily.
>
> Tom
>
> Mail: tomas.kucera(zv)matsushita(tec)cz.
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


znovu RichEdit

[*] Zapl�k���ͪe�?�Y��̿ - 12.4.2000 16:41:40

Pratele.

Takze jeste jednou. Soubor RTF bych rad pouzival pro moznou rozmanitost a
barevnost a prehlednost textu,proto vsechno cpu prez RichEdit. Jenze, pokud
obsah RichEditu chci ulozit ve formatu RTF, pomoci SaveToFile tak existujici
soubor do ktereho chci lajny pridat se prepise. Mohl bych jit tak jak nekdo
radil ze si lajny z RE kopnu do treba Mema a tam to uz je jednoduche, ale
tim ztratim veskere formatovani. Jak tedy pridavat do existujiciho RTF aniz
bych musel
tento soubor obstastnovat za znalosti jeho struktury. Je na to snad nejaka
fce nebo co?

Dik kazde chytre hlavicce

Zaplik
zaplik(zv)volny(tec)cz

SQL select

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 12.4.2000 17:02:10

Nemam ted moznost to vyskouset, ale
SELECT Jmeno, Max(Cislo)
FROM t_table
GROUP BY Jmeno

by melo fungovat, ne ?

D.

> ----------
> Od: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
>
> jo ale to mi vrati jen maximalni hodnoty pro jmena, ale ja chci celej
> zaznam. vcetne jmena.Kdyz dam SELECT max(cislo),jmeno ... tak to nefunguje
>
> ----- P> �vodn� zpr�va -----
> Od: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
>
>
> SELECT MAX Cislo
> FROM t_table
> GROUP BY Jmeno
>
> > ----------
> > Od: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
> >
> > mam napr. takovouto tabulku
> > jmeno cislo
> > A 1
> > A 2
> > A 6
> > B 8
> > C 2
> > C 3
> > a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> > jednotlivych jmen. tj
> > A 6
> > B 8
> > C 3
> > nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
> >
>

Interbase a omezeni poctu radek vysledku

[*] delphi(zv)htkpro(tec)cz - 12.4.2000 17:02:56


Dobry den,

zkoumame moznost vyuziti Interbase pro nase aplikace napsane pro Oracle.
Nevite nekdo existuje nejaky ekvivalent funkce rownum v Interbase, nebo
nejaka jina moznost jak lze omezit pocet radek sql dotazu (jeste pred
aplikaci order by).

S pozdravem
Jan Kadlecek
dev-shop(tec)cz
HTK Pro s.r.o.

OT:Re: SQL select

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 12.4.2000 17:07:25

Musi funguvat nasledujici

select jmeno,MAX(Cislo)
from tabulka
group by jmeno

> jo ale to mi vrati jen maximalni hodnoty pro jmena, ale ja chci celej
> zaznam. vcetne jmena.Kdyz dam SELECT max(cislo),jmeno ... tak to nefunguje
>
> ----- P�vodn� zpr�va -----
> Od: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> Odesl�no: 12. dubna 2000 15:57
> P�edm�t: RE: SQL select
>
>
> SELECT MAX Cislo
> FROM t_table
> GROUP BY Jmeno
>
>
> Dobra.
>
> > ----------
> > Od: Milos Sula[SMTP:crkstrobe(zv)geocities.com]
> >
> > mam napr. takovouto tabulku
> > jmeno cislo
> > A 1
> > A 2
> > A 6
> > B 8
> > C 2
> > C 3
> > a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> > jednotlivych jmen. tj
> > A 6
> > B 8
> > C 3
> > nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
> >
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Konference MS SQL 2000

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 12.4.2000 17:13:34

Vazeni,
pokud jste tam nekdo byl, mel bych jeden dotaz.
Sliboval MS ze SQL 2000 bude take ve jako MSDE?

Dekuji
ing. Michal Kus
TANGO software s.r.o.
pokladni systemy pro restaurace a obchody
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz

OT:SQL select

[*] Tomas Burger <slune(zv)yahoo(tec)com> - 12.4.2000 08:14:06 -0700 (pdt)

--- Milos Sula <crkstrobe(zv)geocities.com> wrote:
> mam napr. takovouto tabulku
> jmeno cislo

rekl bych:

select jmeno, max(cislo) from tabulka group by jmeno

Tomas

ps. Ale bacha, kdyz je toho hodne, "max" se muze chovat dost divoce...=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/

__________________________________________________
Do You Yahoo!?
Send online invitations with Yahoo! Invites.
http://invites.yahoo.com


OT:SQL select

[*] Milan Vajda <milanv(zv)ba.sanet.sk> - 12.4.2000 17:16:31

select jmeno, max(cislo) from tabulka group by jmeno

----- Original Message -----
From: Milos Sula <crkstrobe(zv)geocities.com>
To: delphi konference <delphi-l(zv)fwd(tec)cz>
Sent: 12. dubna 2000 15:35
Subject: OT:SQL select


> Ahojte
> mam napr. takovouto tabulku
> jmeno cislo
> A 1
> A 2
> A 6
> B 8
> C 2
> C 3
> a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> jednotlivych jmen. tj
> A 6
> B 8
> C 3
> nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7
>
>

OT:SQL select

[*] Matin Koller <koller(zv)gema(tec)cz> - 12.4.2000 17:23:34

Ahoj

Bude to nejak tak

SELECT Jmeno, MAX(Cislo) FROM Table GROUP BY Jmeno

Martin

> Ahojte
> mam napr. takovouto tabulku
> jmeno cislo
> A 1
> A 2
> A 6
> B 8
> C 2
> C 3
> a chci aby se mi vratily vsechny zaznamy pro maximalni hodnotu cisla
> jednotlivych jmen. tj
> A 6
> B 8
> C 3
> nevite jak sestavit na toto SQL dotaz ? pouzivam MSSQL 7


Problem s kompilaci

[*] Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz> - 12.4.2000 17:27:26

Zdravim vsechny ucastniky konference !

Mam problem s kompilaci. Pokud chci osetrit duplicitu klicu v databazi
pomoci napr.

procedure TMDForm.MDTablePostError(DataSet: TDataSet; E: EDatabaseError;
var Action: TDataAction);
begin
if E.Message = 'Kez violation.' then
begin
ShowMessage('U� je jednou v DB');
Action := daAbort;
end;
end;

pak me tato procedura vubec nezachrani pred hlaskou Key - Violation. Pri
krokovani jsem zjistil, ze se nestaci ani rozjet. Hlaska je rychlejsi. Nevi
nekdo, co je spatne nastaveno, ze se udalost OnPostError nestaci spustit ?
Muj program s touto procedurou zkousel prelozit a spustit jeden z ucastniku
konference a nemel zadny problem. Vse fungovalo OK.

Tom

Mail: tomas.kucera(zv)matsushita(tec)cz


Duplicita klicu, Key - Violation

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 12.4.2000 18:06:43

On 12 Apr 00, at 8:36, Tomas Kucera wrote:

> Chtel bych Vas pozadat, zda-li by mi nekdo nebyl schopen poradit, jak
> co nejlepe a hlavne funkcne osetrit problem s duplicitou klicu v
> databazi. Pri vlozeni noveho zaznamu do DB, se mi zobrazi hlaska Key -
> Violation v momente, kdy v DB existuje zaznam se stejnym klicem.
> Potreboval bych vedet, jak teto hlasce predejit a informovat o tom
> uzivatele. Delam v Delphi 5.

K tomuhle propaguji nasledujici pravidla:

Povazuji za vhodne zasadne se vyhybat prime editaci na "zivymi"
daty, to jest, nepouzivat zadne DB komponenty pro _editaci_
(DBGrid, DBEdit, ...) v pripade, ze jsou pripojene primo k databazi.

Za vhodnejsi povazuji postup, kdy si data editujes nekde mimo a o
komunikaci s databazi se zacnes starat az v okamziku, kdy ji
chces poslat data. Dalsi postup je pak silne zavisly na tom, zda
pouzivas souborovou (v dnesni dobe silne nedoporucuji, pokud k
jejimu pouziti nejsou opravdu zavazne duvody), nebo SQL databazi.
U SQL databaze byva obvykle nejlepsi reseni poslat data pres
ulozenou proceduru a zkontrolovat navratovou hodnotu, jak to
dopadlo.


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


StringGrid a ListView

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 12.4.2000 18:06:43

On 11 Apr 00, at 16:06, Keder wrote:

> A este jedna otazka na zaver. Pri pouzivani D5 SP1 a Win 2000 pri
> ukoncovani Delphi (najcastejsie) Delphi zoberie 100 % vykonu a zastavi
> sa na dost dlhu dobu. Dalej pokracuje normalne, avsak zda sa mi to tak
> trochu divne. Vo Win 98 ani NT 4.0 som take chovanie nespozoroval.

Tohle se mi nekdy stava i behem prace. Obcas mi cele Delphi
"zahadne" klekne a odebere se do nepameti.


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


Jak udelat: Nacteni dotazu a editace vysledku jen

[*] Erik Salaj <winsoft(zv)napri.sk> - 12.4.2000 18:34:08

> > V ADO by sa zisla nejaka priama podpora pre batch operacie,
> > mozno sa snad objavi v buducich verziach.
>
> :-) Pokud chces vsechny moznosti, ktere nabizi OLE DB, tak
> pouzij primo OLE DB. ADO nech VBasikarum.:-)

Poskytuje OLE DB batch operacie?

Erik

Konference MS SQL 2000

[*] Robert Kindl <rob(zv)exec(tec)cz> - 12.4.2000 18:41:28

> Vazeni,
> pokud jste tam nekdo byl, mel bych jeden dotaz.
> Sliboval MS ze SQL 2000 bude take ve jako MSDE?

Sliboval, ale jinak zadne konkretnejsi veci o licencni politice nerikali
(alespon v threadu ktereho jsem se zucastnil).

Rob


Otazka k ServerSocketu

[*] bures <bures(zv)ssakhk(tec)cz> - 12.4.2000 19:11:58

Ahoj mam na vas jeden takovy maly dotaz pokud zaslilam buffer pres ServerSocket.Socket.Connections[0].SendBuf
a buffer je vetsi nez 4380 znaku tak se odesle pouze 4380 znaku. je mozne poslat najednou i vetsi buffer nez 4380 znaku???20
Jeste tady mam upresneni mam Win98cz a Delphi5.

Predem dekuji za radu Vlada

WebBrowser a nacteni dat

[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 12.4.2000 21:02:23

D5Prof, Win98

Nemuzu najit, jak pred nactenim HTML textu do komponenty WebBrowser1 vlastni
HTML pozmenit.

Priklad (viz. ..\Demos\CoolStuf\Webbrows)

1. Zadam URL
2. nekde programove pozmenim htlm text (napr. nahradim vsechny slova
"marginalni" slovem "okrajovy".
3. html text se zobrazi jiz s pozmenenym textem. Tzn. na www strance jsou
vsechna slova "marginalni" nahrazena slovy "okrajovy"

Nemohl jsem to v zadne udalosti najit. Je to tam nebo postupuji spatne.

Diky za kazdy odpich

Ing. Petr Svejda
software specialist


dokumentace k IB6

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 12.4.2000 21:14:53


----- Original Message -----
From: "Milan Dvo��k" <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 12, 2000 12:31 PM
Subject: dokumentace k IB6


> Nedavno kdosi psal o tom, ze lze stahnout dokumentaci k IB6 ve
> formatu PDF vcetn� dokumentace k IBExpresu. Nemuzete me nakopnout
> odkud se to da stahnout?
>
> Milan Dvo��k
> dvorak(zv)gymzn(tec)cz
>

zkus se podivat tady:
http://www.interbase2000.org/ib_doc.htm


Roland


Zatuhnuti aplikace v D5 - reseni (?)

[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 12.4.2000 22:08:34


----- Original Message -----
>Pouziti databazi bude podle me pri dalsi tvorbe nevyhnutelne
>a nejrychlejsi reseni. Se sirenim souborove databaze by to melo
>bejt v pohode.
No, ja prave ze mam s sirenim problemy!

>Co treba TMouse.CursorPos (vraci TPoint) a projed si (na tohle by se hodila
>databaze) co se na tom poli nachazi.Hlavne bys mel rozlisit levy a pravy
>tlacitko jako u vsech strategii.
No, tak tohle jsem moc nepochopil...

>Silne pochybuju o tom, ze kdyz budes na 1 TImage kreslit (treba canvasem)
>tak pak budes vedet kde co je.
To si taky myslim.

>M.Jirman

>P.S.: Hodne stesti. Pri konkurenci AGE OF EMPIRES II a Starcraftu
>ho budes potrebovat vic nez dost :-)
>P.S: Demo docela jde, jen se mi nelibi to opozdene jezdeni textur s mysi.
>(asi to delas pomoci timeru)
Nedelam to pomoci timeru, ale pomoci udalsoti onMouseMove


Odstartovani procedury

[*] Straka Josef <strakaj(zv)hba(tec)czn(tec)cz> - 12.4.2000 22:26:15

Prijemny den,
D4 Standard, W95 OSR2.

Mam dnes jeden problemek. Chtel bych, aby po n�jakem povelu ze zarizeni mimo
PC muj program provedl proceduru, kterou chci. Proste aby na RS232 nebo LPT
kdyz prijde treba 5voltu, tak aby moje procedura udelala. Ale nevim, jak
osetrit traba tech 5voltu na portu. Nemate nekdo nejaky prikladek, jak
Delphi aplikaci takto zvenci vyprovokovat k nejake cinnosti?

Dekuji predem, protoze zadem se v teto konferenci dekovat nesmi.
Zacinajici programator Straka Josef
email: strakaj(zv)hba(tec)czn(tec)cz
www: http://mujweb(tec)cz/www/strakaj/

PageControl & TabSheet s Imege

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.4.2000 22:50:31

From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
> doporucite mi prosim nekdo nejakou komponentu
> PageControl a TabSheet, kde by slo jednoduse pres
> ImageList a ImageIndex na tech ouskach zobrazovat
> obrazky (D3) ?

Ahoj,

napriklad takhle:

uses
CommCtrl;

procedure SetTabControlImages(TabControl: TTabControl; ImageList: TImageList);
var
I: Integer;
TCItem: TTCItem;
begin
TCItem.mask := TCIF_IMAGE;
with TabControl do
begin
for I := 0 to Tabs.Count - 1 do
begin
TCItem.iImage := I;
SendMessage(Handle, TCM_SETITEM, I, Longint((zv)TCItem));
end;
SendMessage(Handle, TCM_SETIMAGELIST, 0, ImageList.Handle);
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
SetTabControlImages(TabControl1, ImageList1);
end;

Petr Vones, amatersky programator

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