Archív konference Delphi

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

DBComboBox

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 27.9.2000 12:42:02

Ahoj

Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
a povolit jen vyber hodnot se seznamu?

DBComboBox

[*] daniel.hrna(zv)sme(tec)cz - 27.9.2000 13:36:24

vlastniost ComboBoxu; Styles := csDropDownList;

-----Original Message-----
From: Bednar��k Dalibor [mailto:dalibor(zv)torola(tec)cz]
Sent: Wednesday, September 27, 2000 12:42 PM
To: forum
Subject: DBComboBox


Ahoj

Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
a povolit jen vyber hodnot se seznamu?

prace se stringem ...

[*] Milan ��ek - 27.9.2000 13:51:11

ahoj, mam opet jeden dotaz (asi primitivni)...

rekneme, ze mam nejaky string, ktery jsem precetl ze souboru pomoci Readln.
Ma format: "string1","string2","string3",integer,"string4","string5"
Vsechny radky souboru maji stejny tvar, nyni potrebuji vsechny radky dostat
treba do:

pole: array of record str1,str2,str3,str4,str5: string1; int: integer; end;

Tak, aby kazdy radek souboru byl jedna polozka v poli. Ted o co mi jde: da
se nejakym zpusobem sikovne vytridit jednotlive polozky stringu do pole?
Jiz nekolikrat jsem se s necim podobnym setkal, vzdy jsem to resil pomoci
fci Copy,Pos a Delete... V�dy jsem si zkop�roval ��st �et�zce (t�eba k
n�sleduj�c� ��rce), pak tuto samou oblast vymazal pomoc� delete. Opakoval
jsem to a� do Eoln.

Jde to nejak lepe??

S pozdravem Milan Cizek, amatersky programator, D5 Ent
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

Jak ziskat bitmapu a pracovat s ni jako s pointere

[*] <jgr(zv)centrum(tec)cz> - 27.9.2000 13:56:51

Ahoj,

Nevim jak pracovat s bitmapou tak, abych k mi mohl pristupovat
jako k polozce array popr. pointer. Potrebuji s bitmapou
pracovat velmi rychle a to jak vyhledavat tak psat do ni.
Jelikoz jsem cerstve presel z pascalu na Delphi, budte prosim
konkretnejsi budte prosim moc konkretnejsi pri vysvetleni postupu
jak zhruba toto udelat. Dik Honza

K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz


DBComboBox

[*] Ale� Va���ek�����"q��y�&���w�3 - 27.9.2000 14:05:08

No nevim jak u DBComboboxu, ale v normalni comboboxu das do style property
csDropDownList ==>
ComboBox1.Style := csDropDownList;

Ales

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Bednar��k Dalibor
> Sent: Wednesday, September 27, 2000 12:42 PM
> To: forum
> Subject: DBComboBox
>
>
> Ahoj
>
> Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
> a povolit jen vyber hodnot se seznamu?
>
>
>

COMBOBOX

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 27.9.2000 14:08:21

> potrebuji otevrit combo pomoci
> stisku nejake klavesy treba F3 a jak na to ??
>
> TRT

Lze to treba takto:

procedure TForm1.ComboKeyDown(Sender: TObject;var Key: Word; Shift:
TShiftState);
begin
if Key=vk_F3 then
if SendMessage(Combo.Handle,CB_GETDROPPEDSTATE,0,0)=0 then begin
Key:=0;
SendMessage(Combo.Handle,CB_SHOWDROPDOWN,1,0)
end
end;

Tomas


Casove kriticke operace ve Win

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 27.9.2000 14:08:32

V te callback fci provadim pouze prekresleni komponenty - je to takovy infor
macni panel a pro rychly a plynuly beh jsem potreboval podstatne mensi prodl
evu nez je 55ms.

Milan Tomes

>
> Pri takovemto rozliseni se uz ale musi davat pozor na to, co se v callback
> funkci casovace provadi, protoze takto uz je to dost narocne na system a
> muze se stavat, ze to pozastavuje dalsi bezici veci s nizssi prioritou.
>
> Ondrej Malecek
>
> > A jde jim nastavit mnohem vetsi rozliseni nez 55ms - mam odzkouseno. V
> pohod
> > e mi chodi i 1ms. Je ukryty v jednotce MMSystem.

COMBOBOX

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 27.9.2000 14:16:27

> > potrebuji otevrit combo pomoci
> > stisku nejake klavesy treba F3 a jak na to ??

Ahoj, nevim jestli to neni uplne mimo misu, ale combo se standardne
rozbaluje pomoci Alt+sipka dolu...

Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

Prace s komplexnimi cisly

[*] delphi konference <delphi(zv)energotek(tec)cz> - 27.9.2000 14:36:31

Dobry den

Nemate nekdo prosim k dispozici, nebo nevite nekdo o unite, podporujici praci s komplexnimi cisly, v lepsim pripade podporujici i operatory pro pro komplexni cisla? Mam aplikaci obsahujici dost slozite vypocty v komplexich cislech a uz me nebavi to vsechno rozepisovat rucne. Za tipy predem dekuji.

Petr Blau software developer
mail to: petrbl(zv)energotek(tec)cz

DBAware komponenty nebo rucni obsluha

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.9.2000 15:00:52

On 27 Sep 2000, at 9:35, Jaroslav Nadhera wrote:

> > > Tady jde o to, ze napr. 10 lidi pod tlakem cely den busi do
> > > tabulky zaznam za zaznamem. Tech 100 000 zaznamu udelaji za 100
> > > dni.
> >
> > Pokud maji lidi busit nova data pod tlakem, pak se ani s oteviranim
> > nejakeho blazniveho datasetu vubec neobtezuji (to jen zdrzuje),
> > pouze volam ulozenou proceduru pro vkladani. Delat neco takoveho v
> > DBGridu nad otevrenym datasetem je cira zoufalost. :-)
> >
>
> Uznavam, ze je to cira zoufalost, ale oni jeste chteji prohlizet to,
> co tam nabusili a ruzne si to behem prace filtrovat, prohlizet, hledat
> ruzne zaznamy,.... Samozrejme by bylo lepsi a rychlejsi udelat jenom
> neco na vkladani novych zaznamu, kde by se objevil vstupni formular a
> ten by pak data poslel do databaze. Ale oni okamzite chteji videt, jak
> se zazanm objevi v gride (asi neveri, ze tam skutecne je) a pokud
> mozno i zaznamy, co tam nabusi ostatnich 9 lidi.

Hm, nas zakaznik, nas pan. :-) Ja osobne bych to asi resil nejak
takto: Male datasety (cca stovky zaznamu nejvyse) bych
refreshoval cele, tam celkem o nic nejde. Velke datasety (od tisicu
zaznamu), pokud by zakaznik trval na tom, ze chce videt vse, bych
organizoval zcela jinak. Prvni dataset bych natahl do nejakeho
sveho ne-db gridu a pote bych ho zavrel. Uzivatel by porizoval ci
listoval, to je jedno. Namisto refreshe celeho datasetu bych vzdy
nacetl pouze zmeny, kterymi bych obnovil grid. K tomu by ovsem
musela byt vhodne navrzena tabulka, abych mel moznost zachytit
vsechny zmeny od posledniho dotazu, vcetne zaznamu zrusenych.

Je to sice programatorsky ponekud pracne, ale proc bych to delal:
kazdy refresh celeho datasetu si vyzada preskupeni kursoru,
vlastne se vytvareji znovu, pokud vim. To samozrejme vyzaduje
nejakou rezii na strane serveru, urcite vetsi, nez dotaz na par
poslednich zmen. Timto postupem jsem schopen zajistit tak velkou
rychlost zmen, ze uzivatel v podstate ani nepostrehne prodlevu
odezvy. Trideni v gridu pak provadim primo ve sve RAMce, coz mi
zajisti vysokou rychlost. Mno, ale radeji bych zkusil neco takoveho
uzivateli radeji rozmluvit. :-)

Pokud tohle budu delat pres ADO, musim pocitat s tim, ze ADO si
vytvori svuj vlastni buffer, z ktereho to preleju k sobe. Pokud pujdu
primo pres OLE DB, usetrim si zbytecnou tvorbu mezi-bufferu.


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


COMBOBOX

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 27.9.2000 15:17:40

> > > potrebuji otevrit combo pomoci
> > > stisku nejake klavesy treba F3 a jak na to ??
>
> Ahoj, nevim jestli to neni uplne mimo misu, ale combo se standardne
> rozbaluje pomoci Alt+sipka dolu...
>
> Ing. Jiri Foldyna


V obsluhe OnKeyDown skus napisat:

if Key = VK_F3 then
ComboBox1.DroppedDown := True;
Peter


DBComboBox

[*] novacek(zv)vanicek(tec)cz - 27.9.2000 13:31:51

Zdar a silu!

> Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
> a povolit jen vyber hodnot se seznamu?
Podivej se na property Style toho comba. Potrebna hodnota je tusim
csDropDownList.

Zdar!

Vladimir Novacek

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


COMBOBOX

[*] Tu�ek Roman (M� Praha 15) - 27.9.2000 15:37:36

Ano to je pravda
ale ja bych chtel abych zmacknul treba nejake tlacitko a abyse to rozvinulo
nebo napr. zmacknul jen F3 a arozvinulo se to


TRT


> -----P�vodn� zpr�va-----
> Od: Ji�� Foldyna [SMTP:jiri.f(zv)avizo(tec)cz]
> Odesl�no: 27. z��� 2000 14:16
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: COMBOBOX
>
> > > potrebuji otevrit combo pomoci
> > > stisku nejake klavesy treba F3 a jak na to ??
>
> Ahoj, nevim jestli to neni uplne mimo misu, ale combo se standardne
> rozbaluje pomoci Alt+sipka dolu...
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
>

COMBOBOX

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 27.9.2000 15:44:46

Ahoj,

COMBOBOX sa vo Windows standardne otvara na klavesu F4, neviem ci je rozumne
to menit.

Pavol Stolc
pstolc(zv)sc.sknet.sk

----- Original Message -----
From: Tu�ek Roman (M� Praha 15) <TucekR(zv)p15.mepnet(tec)cz>
To: LIST delphi-l(zv)fwd. cz (el. adresa) <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 11:35 AM
Subject: COMBOBOX


> potrebuji otevrit combo pomoci
> stisku nejake klavesy treba F3 a jak na to ??
>
> TRT


DBAware komponenty nebo rucni obsluha

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 27.9.2000 16:05:35

> > Ahoj,
> >
> > a co pouzit TClientDataSet ?
> >
> > Petr Vones, amatersky programator
> >
>
> To je ovsem "Enterprise only".
>

Me by moc zajimaly nazory na pouziti TClientDataSet, jestli to nekdo
zkousel, jestli je to pouzitelne. Nevadi, ze je to Enterprise only.

J. N�dhera

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

COMBOBOX

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 27.9.2000 16:08:01

ComboBox ma tuto vlastnost:
property DroppedDown: Boolean;

Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Tomas Grepl
> Sent: Wednesday, September 27, 2000 2:08 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: COMBOBOX
>
>
> > potrebuji otevrit combo pomoci
> > stisku nejake klavesy treba F3 a jak na to ??
> >
> >
> > TRT
>
> Lze to treba takto:
>
> procedure TForm1.ComboKeyDown(Sender: TObject;var Key: Word; Shift:
> TShiftState);
> begin
> if Key=vk_F3 then
> if SendMessage(Combo.Handle,CB_GETDROPPEDSTATE,0,0)=0 then begin
> Key:=0;
> SendMessage(Combo.Handle,CB_SHOWDROPDOWN,1,0)
> end
> end;
>
> Tomas
>

Standardni dialog s memo

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 27.9.2000 16:30:27

Ahoj,

chci se pozeptat, zda-li nekdo nevite, existuje-li podobny dialog pro
zadavani textu, jako je napr. v property s TStrings (memo a par tlacitek)?
Diky
Jaro B.

Instalace DAO3.5

[*] Erik Salaj <winsoft(zv)napri.sk> - 27.9.2000 16:55:45

> neslo by poslat ten link ? Ja na MS strankach vzdycky zabloudim :-(((

Link neviem, mozem poslat iba subor (ma to 30kB).

Erik Salaj, WINSOFT


Rada s Access - komprimace tabulky

[*] Erik Salaj <winsoft(zv)napri.sk> - 27.9.2000 16:58:01

> nevite nahodou nekdo jak pres ADO nebo ODBC udelat komprimaci databaze?.

Pomocou JRO objektov, priklad je sucastou Adonis komponentov.

Erik Salaj, WINSOFT


COMBOBOX

[*] Tu�ek Roman (M� Praha 15) - 27.9.2000 17:08:44

a nevis jak se to da udelat s DBLOOKUPCOMBOBOXem ?? na combo to funguje v
pohode ale na dblookkup ne....> -----P�vodn� zpr�va-----
> Od: Tomas Grepl [SMTP:delphi(zv)kapsw(tec)cz]
> Odesl�no: 27. z��� 2000 14:08
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: COMBOBOX
>
> Lze to treba takto:
>
> procedure TForm1.ComboKeyDown(Sender: TObject;var Key: Word; Shift:
> TShiftState);
> begin
> if Key=vk_F3 then
> if SendMessage(Combo.Handle,CB_GETDROPPEDSTATE,0,0)=0 then begin
> Key:=0;
> SendMessage(Combo.Handle,CB_SHOWDROPDOWN,1,0)
> end
> end;
>
> Tomas


COMBOBOX

[*] Tu�ek Roman (M� Praha 15) - 27.9.2000 17:12:37

Ten BDLOKKUP jsem uz zjistil jsem blbec


TRT


Vlastni komponenty v opendialogu

[*] Ladis <bartal(zv)vfu(tec)cz> - 27.9.2000 18:09:12

jak dodat do OpenDialogu vlastni button ci neco jineho a osetrit udalost
onClick ?
diky Ladis


DBAware komponenty nebo rucni obsluha

[*] Pavel �ern� - 27.9.2000 18:54:17

Tohle snad neni pravda. Ten prazdny radek se nevytvori v databazi,
ale v datasetu. A DB aware komponenty s nim mohou pracovat.
Do databaze putuje az pri provedeni POST.

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

>>> "David Lebeda" <david.lebeda(zv)comarr(tec)cz> 26.9.2000 12:03:04 >>>
> Dobre, toto je vhodne pro pristup, kdyz jednou za cas chci delat neco
> s jednim zaznamem, dlouho si s nim hrat a pak jej poslat zpet na
> server. Ale v pripade, ze potrebuji busit do databaze zaznam za
> zaznamem, stare opravovat, ruzne to neustale filtrovat, tridit - neni
> pak lepsi mit tabulku porad otevrenou a treba i pouzit DB aware
> komponenty? Pro tuto aplikaci je rozhodujici rychlost, jak se nacte
> zaznam pro editaci, jak rychle se ulozi ci zalozi novy.

OK, ja urcite netvrdim, ze pristup pres db-aware komponenty je tak
spatny, ze by se nemel nikdy pouzivat. Umim si predstavit situace,
kdy db-aware komponenty jsou dobra vec, stejne jako situace, kdy
db-aware trochu komplikuji situaci. Napr. mas hlavni form, na nem
dbgrid a buttonek, ktery vyvola form pro vlozeni noveho zaznamu.
Pokud ten form bude resen pomoci db-aware komponent, bude se
muset pred zavolanim formu vytvorit prazdny radek v tabulce, aby o
nej ty db-aware komponenty (dbedity apod.) mohly byt opreny.
Pokud ti behem editace spadne pocitac, zustane v tabulce prazdny
radek. Nejde ted o to, jak snadne nebo nesnadne je toto ohlidat -
jde o to, ze to je komplikace, s kterou je treba pocitat.


David


OT: TCP/IP pres COM/LPT

[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 27.9.2000 20:02:44

Ahojda lidickove, nevite nahodou negdo o nejakym sikovnym free
programku,
kterej by simuloval TCP/IP sit pres LPT nebo COM port pod Windows 95/98?
Potrebuju pripojit do site notebook, ve kterym nefacha PCMCIA a tudiz se
tam neda dat sitova karta... Za vsechny informace predem dik.
--
Martin Pe�ava

/--------------------------------------------------------------\
| http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
| |
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/

DLL - Delphi vs VisualC

[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 27.9.2000 20:10:04

Tak tahle mi to nechodi...

Lauko �tefan wrote:
>
> Ahoj,
> len doplnim kod (ja to tak pouzivam) mozno to pomoze...
> Lauko.
> >
> > exports Ahoj,Ahoj2;
> >
> BEGIN
> > end.
> >
--
Martin Pe�ava

/--------------------------------------------------------------\
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
| WebMaster of |
| http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
\--------------------------------------------------------------/

COMBOBOX

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 27.9.2000 20:14:02

V D5 je na to metoda DropDown (pravdepodobne je tam jiz od drivejsich verzi
Delphi).

Na combo box se da pouzit jednodussi verze nez ne nize uvedena (property
DroppedDown), nefunguje vsak ve starych verzich Delphi.
Ja to obvykle pouzivam ve spojeni s vk_DOWN, aby uzivatele nemuseli mackat
prilis mnoho klaves.

Tomas

> a nevis jak se to da udelat s DBLOOKUPCOMBOBOXem ?? na combo to funguje v
> pohode ale na dblookkup ne....
>
> > Lze to treba takto:
> >
> > procedure TForm1.ComboKeyDown(Sender: TObject;var Key: Word; Shift:
> > TShiftState);
> > begin
> > if Key=vk_F3 then
> > if SendMessage(Combo.Handle,CB_GETDROPPEDSTATE,0,0)=0 then begin
> > Key:=0;
> > SendMessage(Combo.Handle,CB_SHOWDROPDOWN,1,0)
> > end
> > end;
> >

C++ dotaz

[*] Milan Jir�sek <Milan.Jirasek(zv)worldonline(tec)cz> - 27.9.2000 20:47:33

Ahoj

dnes popisu svuj problem trochu jinak.
SetWorldTransform(hDC, &xForm); tuto fonkci chci pouzit v delphi.
prikladam kus kodu v C++


switch (iTransform) {
case SCALE: /* Scale to 1/2 of the original size. */
xForm.eM11 = (FLOAT) 0.5;
xForm.eM12 = (FLOAT) 0.0;
xForm.eM21 = (FLOAT) 0.0;
xForm.eM22 = (FLOAT) 0.5;
xForm.eDx = (FLOAT) 0.0;
xForm.eDy = (FLOAT) 0.0;
SetWorldTransform(hDC, &xForm);
break;

nedari se mi nahradit &xForm tak aby kompilator neplakal.
ted muj pokus v delphi
Takhle typuju xform
type
pxform=^txform;
txform =record
eM11: single;
eM12: single;
eM21: single;
eM22: single;
ebx: single;
eDy : single;
end; // Zkousel jsem i real

takhle nakrmim
const
kxform: txform = (eM11:1.0;em12:0.0;em21:0.0;em22:1.0;ebx:0.0;edy:0.0);

a takhle volam funkci
SetWorldTransform(nejakej_canvas.handle,kxform )

a kompilator zarve incompatible type TXform and txform

Prosim tedy nejakou chytrou hlavu o pomoc.

Dekuji. Amatersky mUcednik

SetWorldTransform

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.9.2000 20:56:44

From: "Milan Jir�sek" <Milan.Jirasek(zv)worldonline(tec)cz>
> Zkousim windousovskou funkci
> SetWorldTransform(
> XFORM typuju takto
>
> type
> xfor =record
> kompilator vsak zahlasi ze xform je nekompatibilni.

Ahoj,

tento typ je jz definovan ve Windows.pas (TXForm), takze jej muzes (musis)
pouzit.

Petr Vones, amatersky programator

prace se stringem ...

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.9.2000 21:03:00

> rekneme, ze mam nejaky string, ktery jsem precetl ze souboru pomoci Readln.
> Ma format: "string1","string2","string3",integer,"string4","string5"
> Vsechny radky souboru maji stejny tvar, nyni potrebuji vsechny radky dostat
> treba do:
> pole: array of record str1,str2,str3,str4,str5: string1; int: integer; end;
> Tak, aby kazdy radek souboru byl jedna polozka v poli. Ted o co mi jde: da
> se nejakym zpusobem sikovne vytridit jednotlive polozky stringu do pole?
> Jiz nekolikrat jsem se s necim podobnym setkal, vzdy jsem to resil pomoci
> fci Copy,Pos a Delete... V�dy jsem si zkop�roval ��st �et�zce (t�eba k
> n�sleduj�c� ��rce), pak tuto samou oblast vymazal pomoc� delete. Opakoval
> jsem to a� do Eoln.
> Jde to nejak lepe??

No, tak jak to uvadis to snad lepe nepude, mozna jeste tak nacist cely radek a
pak ho znak po znaku nasackovat do tech promennych. Ten soubor asi nevytvaris
sam ze? Idealni by bylo pouzit typovy soubor...

Roman


Jak ziskat bitmapu a pracovat s ni jako s pointere

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.9.2000 21:14:53

> Ahoj,
>
> Nevim jak pracovat s bitmapou tak, abych k mi mohl pristupovat
> jako k polozce array popr. pointer. Potrebuji s bitmapou
> pracovat velmi rychle a to jak vyhledavat tak psat do ni.

Muzes pouzit objekt TBitmap, ten mas k dispozici ihned nebo pak nejaky TDIB, ten
jen dispozici tusim v DelphiX nebo muzes pracovat primo s API /tomu se beztak
nevyhnes/.
Pouziti TBitmap je nejjednodusii, ma property Canvas, pomoci niz muzes
pristupovat k obsahu, nebo take pomoci property ScanLine, coz je rychlejsi
/obdrzis primo jeden radek bitmapy/.
A co bys chtel do te bitmapy psat? Nejvhodnejsi je pouzivat pomocnou bitmapu, do
te vzdy neco vykreslit a pak to bud zobrazit /doublebuffer/ nebo pomoci nejake
operace /and,or/ to pridat do te puvodni.
Mozna bys mohl uvest priklad, co bys s tou bitmapou chtel konkretne udelat,
nektere operace jsou rychle vzdycky, jindy je lepsi DX.

Roman


DBAware komponenty nebo rucni obsluha

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.9.2000 21:24:41

> To je ovsem "Enterprise only".
>
> Nebo by slo editovany radek stahnout do neceho jako je TRxMemoryData - s
> tim lze pracovat se standardnimi DBedit komponentami a posleze to - pomoci
> stored prc (ci jak jinak chcete) supnout na server.

Presne tak, to tady nikdo tenhle zpusob nepouziva? Na formulari je MemoryTable,
uzivatel pracuje jen s ni, kdyz je editace /pridavani/ ukoncena, tak se udaje z
tabulky v pameti presunou do tabulky v databazi a smytec. Kdyz dojde k chybe a z
nejakeho duvodu nelze zapisovat, porad jsou ty udaje v MemoryTable a jak si to
poresim je uz moje vec. Nevim proc se tak zuby nehty branit pouziti
db-komponent, uz tak zjistuju, ze toho z vcl pouzivam cim dal min... :-)))

Roman


prace se stringem ...

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 27.9.2000 22:30:52

Ahoj,

mrkni sa na TStringList a jeho property Strings a CommaText.

Pavol Stolc
pstolc(zv)sc.sknet.sk

----- Original Message -----
From: Milan ��ek <cizek.milan(zv)seznam(tec)cz>
To: Delphi konference <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 1:51 PM
Subject: prace se stringem ...


ahoj, mam opet jeden dotaz (asi primitivni)...

rekneme, ze mam nejaky string, ktery jsem precetl ze souboru pomoci Readln.
Ma format: "string1","string2","string3",integer,"string4","string5"
Vsechny radky souboru maji stejny tvar, nyni potrebuji vsechny radky dostat
treba do:

pole: array of record str1,str2,str3,str4,str5: string1; int: integer; end;

Tak, aby kazdy radek souboru byl jedna polozka v poli. Ted o co mi jde: da
se nejakym zpusobem sikovne vytridit jednotlive polozky stringu do pole?
Jiz nekolikrat jsem se s necim podobnym setkal, vzdy jsem to resil pomoci
fci Copy,Pos a Delete... V�dy jsem si zkop�roval ��st �et�zce (t�eba k
n�sleduj�c� ��rce), pak tuto samou oblast vymazal pomoc� delete. Opakoval
jsem to a� do Eoln.

Jde to nejak lepe??

S pozdravem Milan Cizek, amatersky programator, D5 Ent
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

Corrupt index v Px tabulce

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 27.9.2000 23:59:02

Zdravim vsechny,

potreboval bych poradit, jak vyresit nabourany index v paradox tabulce.

diky predem

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

DBAware komponenty nebo rucni obsluha

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 00:13:14

From: "Jaroslav Nadhera" <nadhera(zv)csh(tec)cz>
> Me by moc zajimaly nazory na pouziti TClientDataSet, jestli to nekdo
> zkousel, jestli je to pouzitelne. Nevadi, ze je to Enterprise only.

Ahoj,

ja osobne ne (jako ostatne vse co se tyka databazi ;-) ale treba tady je o tom
clanek: http://community.borland.com/article/0,1410,20567,00.html

Petr Vones, amatersky programator


DLL - Delphi vs VisualC

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 28.9.2000 00:17:59

Zdravim,

ja si myslim, ze by mohlo jit o to, ze C a Delphi pouzivali jiny zpusob
volani procedur a funkci. Cecko pouziva cdecl, Delphi myslim safecall.
Jestli chces definovat externi(DLL) procedury napojovat dynamicky(to je to
LoadLibrary), tak to nevim, ale pokud ti to staci staticky, podivej se napr
do zrojaku knihovny "Windows.pas", tam je fura napojeni na DLL-ka, ktera
jsou soucasti operacniho systemu (ty jsou v konvenci volani stdcall), To by
Ti pro predstavu mohlo stacit.

Tomas

----- Original Message -----
From: Martin Pe�ava <jimx(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, September 26, 2000 8:51 PM
Subject: DLL - Delphi vs VisualC


> Ahojda lidickove, byl jsem postaven pred ukol spojit kod vice vyvojaru z
> Delphi 4 a Visual C. Jako nejlepsi verze se mi jevi pres DLLko, ale
> zadnym zpusobem se mi nepodarilo spojit Ceckovy DLLko s Delphi programem
> ani naopak (Delphi DLL s Ceckovym programem).
> Delphi DLL, VC program:
> - behem programu je vsechno v poradku (aspon to tak vypada)
> - pri FreeLibrary (z VC) to v DLLku v procedure nazvane ExitDLL RETne
> na spatnou adresu (nekam kolek 100MB); asi v dusledku predchoziho
> spatneho ulozeni nejakym parametru na stack.
> VC DLL, Delphi program:
> - Pri volani fce ProcAdress z programu to vrati 0 ( = procedura
> daneho jmena neex.)
> Radsi bych potreboval rozchodit tu prvni verzi...
>
> Jestli jste nekdo neco podobnyho delal, tak mi prosim poradte, co delam
> spatne... Ja bych rek, ze to preci fungovat musi, tak proc mi to
> nejde??? Co delam spatne???
>
> Jinak jestli chcete videt kod, tak:
> Program:
>
> program JIMTEST;
> uses windows;
> var
> h : HINST;
> type
> TAhoj = function:Integer;
> TAhoj2 = function(i:Integer):Integer;
> var
> Ahoj : TAhoj; Ahoj2 : TAhoj2;
> i,x : Integer; s1,s2 : String;
> begin
> h:=LoadLibrary(PChar('JIM.DLL'));
> Ahoj :=GetProcAddress(h,PChar( 'Ahoj'));
> Ahoj2:=GetProcAddress(h,PChar('Ahoj2'));
>
> Str(Ahoj,s1);
> MessageBox(0,PChar('Ahoj: '+s1),PChar('JIMTEST'),MB_OK);
>
> for i:=1 to 4 do begin
> Str(i,s1);
> x:=Ahoj2(i);
> Str(x,s2);
> MessageBox(0,PChar('Ahoj2('+s1+'): '+s2),PChar('JIMTEST'),MB_OK);
> end;
>
> FreeLibrary(h);
> end.
>
> DLLko:
> library JIM;
>
> uses windows;
>
> function Ahoj:Integer; stdcall;
> begin
> Result:=10;
> end;
>
> function Ahoj2(i:Integer):Integer; stdcall;
> begin
> Result:=i+1;
> end;
>
> exports Ahoj,Ahoj2;
>
> end.
>
> Spolu to takhle chodi, ale kdyz pouziju DLLko (resp. program) v VC, tak
> to nefachci. Za vsechny rady predem moc dik.
> --
> Martin Pesava
>
> /--------------------------------------------------------------\
> | http://www.volny(tec)cz/jimx - Neoficialni stranka MISS |
> | |
> | E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
> \--------------------------------------------------------------/
>
>

DBComboBox

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 28.9.2000 00:29:13

Co tak nastavit na csDropDownList ?


roland.
----- Original Message -----
From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
To: "forum" <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 12:42 PM
Subject: DBComboBox


> Ahoj
>
> Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
> a povolit jen vyber hodnot se seznamu?
>
>
>

Corrupt index v Px tabulce

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.9.2000 07:08:26

Zkopirovat tabulku jinam, vytvorit novout prazdnou a naapendovat do ni
data z te nakople. V tomto pripade narusene indexy nevadi. Jinak
existuji nejake nastroje na opravu tabulek.

Jan Fiala

----- Original Message -----
From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>> Zdravim vsechny,
>
> potreboval bych poradit, jak vyresit nabourany index v paradox
tabulce.
>
> diky predem
>
> Tomas Bradle
> t.bradle(zv)pvtnet(tec)cz
>
>
>

konekt na zaheslovanu MS Access databazu

[*] Ren� Piz�r - 28.9.2000 07:50:27

Dobry den,

mam takyto problem, chcem sa pomocou
AdoConnection (Microsoft Jet 4.0 OLE DB Provider)
napojit na MS Access databazu, ktora ma nastavene heslo.
Ked dam Test connection, program hlasi chybu, ze:
Workgroup information file is missing alebo ze je databaza
exkluzivne otvorena inym uzivatelom (co nie je).

Ak heslo pre databazu zrusim, Test connection je uspesny.

Dakujem za rady,

Rene Pizur


TCP/IP pres COM/LPT

[*] Slavomir Tomascik <tomascik_slavomir(zv)vse.sk> - 28.9.2000 07:17:06

Zdar.

Este je moznost pripojit ho cez sietovy adapter na LPT.
Vid. napr. vyrobcovia D-LINK a dalsi.

Slavo Tomascik.
>Ahojda lidickove, nevite nahodou negdo o nejakym sikovnym free
programku,
kterej by simuloval TCP/IP sit pres LPT nebo COM port pod Windows 95/98?
Potrebuju pripojit do site notebook, ve kterym nefacha PCMCIA a tudiz se
tam neda dat sitova karta... Za vsechny informace predem dik.
--
Martin Pe�ava

/--------------------------------------------------------------\
| http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
| |
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/

Casove kriticke.... thready - TimeCritical

[*] Ota Maly <maly(zv)space(tec)cz> - 28.9.2000 09:16:01

Ahoj,
jasne, ze v threadu, spis bych chtel radu od nekoho, kdo podobnou vec uz
resil. Treba zkusenosti s nastavenim priority na TimeCritical atp.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.pap-el(tec)cz


> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Hynek Svato�
> Sent: Tuesday, September 26, 2000 10:46 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Casove kriticke operace ve Win
>
>
> Jedina asi rozumna odpoved zni: Thready.
>
> To nacitani dat by melo (podle me) bezet v separatnim vlakne.
>
> Keep mailing :-)
> =======================
> Hynek Svato�
> svatos(zv)kam(tec)czu(tec)cz
> hynek.svatos(zv)atlas(tec)cz
> =======================
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > Ota Maly
> > Sent: Tuesday, September 26, 2000 8:04 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Casove kriticke operace ve Win
> >
> >
> > Ahoj,
> > kolega resi komunikaci s ISA (PCI) kartou ve Windows, jedna se v
> > podstate o
> > AD prevodnik, z cehoz plyne potreba prenosu pomerne velkych baliku dat v
> > realnem case. Karta ma svuj vlastni buffer, ktery je vsak potreba vybrat
> > alespon jednou za 0.5 sec.
> > Komunikovat s kartou se mu dari v pohode, jen je problem s
> casem, pokud se
> > vezme za okno te aplikace, tak se OnTimer pochopitelne nevyvola
> > (respektive
> > vyvola pozdeji) a tim dochazi ke ztrate merenych dat..
> > Jak se vrhnout na takovou aplikaci ?
> >
> > S pozdravem
> > Ota Maly
> >
> > PaPouch elektronika
> > http://www.pap-el(tec)cz
> >
> >
>
>

Referencna integrita v Database Desktop

[*] Ad�mi Jaromil <adami(zv)axa.sk> - 28.9.2000 09:37:49

Ahoj,
Mam CB 5.
V Database Desktop som si vytvoril tabulky (Paradox 7). Dalej som si
vytvoril referencnu integritu medzi dvoma tabulkami presne podla helpu.
Update rule mam nastaveny na cascade. Problem je, ze to nefunguje tak ako by
som si predstavoval. Ak chcem vymazat zaznam v rodicovskej tabulke, pre
ktory existuje odkaz v child tabulke, database desktop vyhlasi "Master has
detail records. Cannot delete or modify."
Dakujem za
kazdu radu.

****************************************
Jaromil Adami
adami(zv)axa.sk
****************************************

TCP/IP pres COM/LPT

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 28.9.2000 11:35:16

From: "Martin Pe�ava" <jimx(zv)volny(tec)cz>> Ahojda lidickove, nevite nahodou negdo o nejakym sikovnym free
> programku,
> kterej by simuloval TCP/IP sit pres LPT nebo COM port pod Windows 95/98?
> Potrebuju pripojit do site notebook, ve kterym nefacha PCMCIA a tudiz se
> tam neda dat sitova karta... Za vsechny informace predem dik.
> --

Pro jednoduche jednosmerne dvoupocitacove reseni neni nutne
chodit daleko. Ve Windows staci doinstalovat:
- telefonni adapter
- TCP/IP protokol na telefonnim adapteru
- Prislusenstvi / Komunikace / Prime propojeni kabelem
- oba pocitace umistit do stejne pracovni skupiny
Potom to ze strany hostujiciho pocitace (napriklad notebook)
na hostitele (PC) funguje.
Jde mi na tom PING i moje vlastni TCP/IP aplikace.
Lze pouzit LPT i COM porty.

Vaclav Krmela

TCP/IP pres COM/LPT

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.9.2000 11:42:41



> Ahojda lidickove, nevite nahodou negdo o nejakym sikovnym free
> programku,
> kterej by simuloval TCP/IP sit pres LPT nebo COM port pod Windows 95/98?
> Potrebuju pripojit do site notebook, ve kterym nefacha PCMCIA a tudiz se
> tam neda dat sitova karta... Za vsechny informace predem dik.
> --

prez serika b y to mwelo jit bez problemu - pouzitim NULL modem driveru (bud
toho od MS nebo existuje i na Inetu) propojis ty stanice jakoby mezi nimi
byly modemy...
Ovsem netusim jestli na Win9x stanici v siti rozebehnes routing do site...


D. Toman

Corrupt index v Px tabulce

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 28.9.2000 12:19:32

Me by zajimaly spis ty nastoje, protoze ta tabulka je pomerne komplikovana,
moc fieldu a indexu a neni do myho programu, takze bych asi na neco zapomel
co by tam chybelo, atd....

dik

Tomas


----- Original Message -----
From: Jan Fiala <jan.fiala(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 7:08 AM
Subject: Re: Corrupt index v Px tabulce


> Zkopirovat tabulku jinam, vytvorit novout prazdnou a naapendovat do ni
> data z te nakople. V tomto pripade narusene indexy nevadi. Jinak
> existuji nejake nastroje na opravu tabulek.
>
> Jan Fiala
>
> ----- Original Message -----
> From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
>
> > Zdravim vsechny,
> >
> > potreboval bych poradit, jak vyresit nabourany index v paradox
> tabulce.
> >
> > diky predem
> >
> > Tomas Bradle
> > t.bradle(zv)pvtnet(tec)cz
> >
> >
> >
> >
>
>

Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 28.9.2000 12:19:11

----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 12:40 AM
Subject: Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm ?> Zdravim.
>
> %subj%, ale aby naprekryval TForm.FormStyle:=fsMDIChild ?
>
> Dakujem.
>
> Roland.
>

musis tomu panelu dat align:=alTop (nebo alLeft, alRight, alBottom)

Tomas

Casove kriticke.... thready - TimeCritical

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 28.9.2000 12:45:47

Zdravim,

Muj nazor na to je takovy, ze pokud behem tech 500ms das tak 250ms ostatnim
aplikacim a vlaknum, tak Ti to bude fungovat. Mam zkusenost takovou, ze
staci jedno vlakno v aplikaci, ktere ma lehce zvysenou prioritu (+1), a je
takrikajic nenazrany, totalne zaseka beh systemu, ze potom nejde skoro nic -
zasekne se to. Rekl bych IMHO, ze je takova urcita hranice OS, na kterou ho
lze vytizit aby nenastaly problemy (muj ohad je cca 80%). Muzes si nasekat
furu vlaken TimeCritical nebo jedno nenazrany a je Ti to stejne nahouby,
proto�e ten vykon si tim z prstu nevycucas.

Vlakno by melo dejme tomu cyklicky kazdych 500ms nacist data. Je potreba su
nejdriv zjistit jak dlouho to nacitani trva. Jestli to je 300ms a vice, sel
bych od toho a resil to uplne jinak (napr. jina karta prevodniku, ...).Dalsi
vec je si uvedomit, co se stane kdyz nahodou nejaka data utecou. Potom
zkusit misto 500ms cyklu treba 400ms, aby tam byla nejaka rezerva.
Pokud to potrebuje upne presne, tak to bude nejlepsi pomoci preruseni, ale
to nevim jak se dela, ja na to mel vzdycky driver (ten mel i tu obsluhu
preruseni).

Takze pokud vis, ze ty cykly budou vyhovovat, udelej thread, kterej bude v
cyklu nacitat ty data, po nacteni dej sleep(ms), to ms je pocet ms na pauzu
mezi nacitanimi (idealne >250ms z tech 500ms), ta da ostatnim vlaknum "sve
misto na slunci".

hodne zdaru

Tomas

----- Original Message -----
From: Ota Maly <maly(zv)space(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 9:16 AM
Subject: RE: Casove kriticke.... thready - TimeCritical


> Ahoj,
> jasne, ze v threadu, spis bych chtel radu od nekoho, kdo podobnou vec uz
> resil. Treba zkusenosti s nastavenim priority na TimeCritical atp.
>
> S pozdravem
> Ota Maly
>
> PaPouch elektronika
> http://www.pap-el(tec)cz
>
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > Hynek Svato�
> > Sent: Tuesday, September 26, 2000 10:46 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: RE: Casove kriticke operace ve Win
> >
> >
> > Jedina asi rozumna odpoved zni: Thready.
> >
> > To nacitani dat by melo (podle me) bezet v separatnim vlakne.
> >
> > Keep mailing :-)
> > =======================
> > Hynek Svato�
> > svatos(zv)kam(tec)czu(tec)cz
> > hynek.svatos(zv)atlas(tec)cz
> > =======================
> >
> > > -----Original Message-----
> > > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > > Ota Maly
> > > Sent: Tuesday, September 26, 2000 8:04 AM
> > > To: delphi-l(zv)fwd(tec)cz
> > > Subject: Casove kriticke operace ve Win
> > >
> > >
> > > Ahoj,
> > > kolega resi komunikaci s ISA (PCI) kartou ve Windows, jedna se v
> > > podstate o
> > > AD prevodnik, z cehoz plyne potreba prenosu pomerne velkych baliku dat
v
> > > realnem case. Karta ma svuj vlastni buffer, ktery je vsak potreba
vybrat
> > > alespon jednou za 0.5 sec.
> > > Komunikovat s kartou se mu dari v pohode, jen je problem s
> > casem, pokud se
> > > vezme za okno te aplikace, tak se OnTimer pochopitelne nevyvola
> > > (respektive
> > > vyvola pozdeji) a tim dochazi ke ztrate merenych dat..
> > > Jak se vrhnout na takovou aplikaci ?
> > >
> > > S pozdravem
> > > Ota Maly
> > >
> > > PaPouch elektronika
> > > http://www.pap-el(tec)cz
> > >
> > >
> >
> >
>
>

BDE

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 28.9.2000 14:25:16

Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale dovedel, ze mu to hlasi pri instalaci toto:
Merging The Configuration File Has Failed. Config File: .......\idapi32.cnf
Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3, Initialization Failed.
Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam 5.01), ale jen Delphi 3.
Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu fungovalo? Uvitam polopatickou radu.
MUDr. Miloslav Neuzil


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


DragDrop pro TreeView

[*] Hynek Svatos <svatos(zv)kam(tec)czu(tec)cz> - 28.9.2000 14:31:22

Mrkni se na metodu GetNodeAt(X, Y).

Keep mailing :-)
=======================
Hynek Svatos
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Kuzelka Filip
> Sent: Thursday, September 28, 2000 4:23 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: DragDrop pro TreeView
>
>
> Zdravim,
> nemate nekdo zkusenosti s Drag and Dropem napr. nad TreeView ?
> Jde mi o zjisteni Node, nebo alespon neceho lepsiho, nez souradnic
> mista, kam se to pusti ...
>
> dekuji za napady,
>
> Filip Kuzelka
>
>

Barva textu v console app

[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 28.9.2000 14:57:58

Ahojda lidicky, tak jsem tu zase. Nevite nahodou jak v D4Prof console
aplikace nastavit barvu textu, kterej pisu pres Write (reps. WriteLn).
Zjistil jsem, ze existuje API fce SetConsoleTextAttribute, ale tam ma
jako jeden parametr handle console, kterou nevim jak zjistit. Zkusil
jsem tam dat handle okna (zjisteno pomoci FindWindow), ale s tim to
nefacha. Za vsechny rady predem dik.
--
Martin Pe�ava

/--------------------------------------------------------------\
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
| WebMaster of |
| http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
\--------------------------------------------------------------/

Prace s komplexnimi cisly

[*] Jan Najv�rek <najvarek(zv)seznam(tec)cz> - 28.9.2000 16:13:27

Delpji 6 bude podporovat komplexni cisla....:).. melo by prijit na trh tento rok.
Jestli spechas, podival bych se na ruzne Delphi www stranky .....

Honza Najvarek

> Nemate nekdo prosim k dispozici, nebo nevite nekdo o unite,
> podporujici praci s komplexnimi cisly,

DragDrop pro TreeView

[*] Kuzelka Filip <kuzelka(zv)access-it(tec)cz> - 28.9.2000 10:22:35 -0400

Zdravim,
nemate nekdo zkusenosti s Drag and Dropem napr. nad TreeView ?
Jde mi o zjisteni Node, nebo alespon neceho lepsiho, nez souradnic
mista, kam se to pusti ...

dekuji za napady,

Filip Kuzelka

BDE

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 28.9.2000 16:26:43

No uz to tady bylo. Tyhle problemy odstranil InstallShield z D5.

Martin Lasevic


-----Puvodni zprava-----
Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
Odeslano: 28. zaoi 2000 14:25
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: BDE

Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly
program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale
dovedel, ze mu to hlasi pri instalaci toto:
Merging The Configuration File Has Failed. Config File: .......\idapi32.cnf
Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3,
Initialization Failed.
Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam 5.01),
ale jen Delphi 3.
Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu
fungovalo? Uvitam polopatickou radu.
MUDr. Miloslav Neuzil


---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.189 / Virova baze: 90 - datum vydani: 1.9.2000
<<Soubor: ATT00009.html>>

CD-ROM

[*] Marek Barbo��k <marek.barborik(zv)worldonline(tec)cz> - 28.9.2000 17:34:56

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj Lidi,

potreboval bych vedet, jakym zpusobem lze softwarove otevrit a zavrit CD mechaniku.

Poradte pliiis.

Marr Barr


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


Prace s komplexnimi cisly

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 28.9.2000 18:39:38

> Nemate nekdo prosim k dispozici, nebo nevite nekdo o unite, podporujici
praci s >komplexnimi cisly, v lepsim pripade podporujici i operatory pro pro
komplexni cisla? Mam >aplikaci obsahujici dost slozite vypocty v komplexich
cislech a uz me nebavi to vsechno >
>rozepisovat rucne. Za tipy predem dekuji.

unit cplx;
interface
type
PReal = ^TReal;
TReal = extended;
PComplex = ^TComplex;
TComplex = record
r : TReal;
i : TReal;
end;
function MakeComplex(x, y: TReal): TComplex;
function Sum(x, y: TComplex) : TComplex;
function Difference(x, y: TComplex) : TComplex;
function Product(x, y: TComplex): TComplex;
function TimesReal(x: TComplex; y: TReal): TComplex;
function PlusReal(x: TComplex; y: TReal): TComplex;
function EiT(t: TReal):TComplex;
function ComplexToStr(x: TComplex): string;
function AbsSquared(x: TComplex): TReal;

implementation

uses SysUtils;

function MakeComplex(x, y: TReal): TComplex;
begin
with result do begin r:=x;i:= y;end;
end;

function Sum(x, y: TComplex) : TComplex;
begin
with result do begin r:= x.r + y.r;i:= x.i + y.i;end;
end;

function Difference(x, y: TComplex) : TComplex;
begin
with result do begin r:= x.r - y.r;i:= x.i - y.i;end;
end;

function EiT(t: TReal): TComplex;
begin
with result do begin r:= cos(t);i:= sin(t);end;
end;

function Product(x, y: TComplex): TComplex;
begin
with result do begin r:= x.r * y.r - x.i * y.i;i:= x.r * y.i + x.i * y.r;end;
end;

function TimesReal(x: TComplex; y: TReal): TComplex;
begin
with result do begin r:= x.r * y;i:= x.i * y;end;
end;

function PlusReal(x: TComplex; y: TReal): TComplex;
begin
with result do begin r:= x.r + y;i:= x.i;end;
end;

function ComplexToStr(x: TComplex): string;
begin
result:= FloatToStr(x.r)+' + '+FloatToStr(x.i)+'i';
end;

function AbsSquared(x: TComplex): TReal;
begin
result:= x.r*x.r + x.i*x.i;
end;

end.

Roman


BDE

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 28.9.2000 18:40:51

V�en� Milane,
moc d�kuji, jsi hodn�. J� jsem tu nov� a proto to nev�m. Nev�d�l bys, kde
m�m ten Install Shield z�skat? Pokud to nen� mo�n� bez koup� D5, jde to
n�jak o�idit i se star�m IS, nebo s jin�m programem, nebo je�t� jinak? Jsem
z toho opravdu zoufal�.
S pozdravem
MUDr. Miloslav Neu�il
----- Original Message -----
From: "Martin Lasevic" <vyvoj(zv)atlascon(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 4:26 PM
Subject: RE: BDE


> No uz to tady bylo. Tyhle problemy odstranil InstallShield z D5.
>
> Martin Lasevic
>
>
> -----Puvodni zprava-----
> Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
> Odeslano: 28. zaoi 2000 14:25
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: BDE
>
> Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly
> program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale
> dovedel, ze mu to hlasi pri instalaci toto:
> Merging The Configuration File Has Failed. Config File:
.......\idapi32.cnf
> Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3,
> Initialization Failed.
> Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam
5.01),
> ale jen Delphi 3.
> Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu
> fungovalo? Uvitam polopatickou radu.
> MUDr. Miloslav Neuzil
>
>
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.189 / Virova baze: 90 - datum vydani: 1.9.2000
> <<Soubor: ATT00009.html>>
>
>


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


CD-ROM

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 28.9.2000 19:21:19

Ahoj Marku,
tady je text:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, MMSystem, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
mciSendString('Set cdaudio door open', nil, 0, hinstance);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
mciSendString('Set cdaudio door closed wait', nil, 0, handle);
end;
end.

Nev�, kde bych sehnal InstallShield z Delphi 5 co nejlevneji, nebo nev� o programu, kter� um� nainstalovat BDE verzi 5.1?
S pozdravem
MUDr. Miloslav Neu�il
----- Original Message -----
From: Marek Barbo��k
To: Delphi konference
Sent: Thursday, September 28, 2000 5:34 PM
Subject: CD-ROM


Ahoj Lidi,

potreboval bych vedet, jakym zpusobem lze softwarove otevrit a zavrit CD mechaniku.

Poradte pliiis.

Marr Barr


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


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


D4S a Access 2000

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 28.9.2000 19:24:47

Ahoj,
muzu se nejak pripojit z Delphi4 Stand. k databazi Access 2000?
Pokud ano, co k tomu budu potrebovat? Pokud ne, tak to radeji take napiste, at
vim. Hledal jsem vsude mozne, ale nikde nic a dokumentovane zpusoby funguji az
od D4Profess. vyse...

Diky
Roman

BDE

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 19:35:48

From: "MUDr.Neu�il" <drneuzil(zv)razdva(tec)cz>
> moc d�kuji, jsi hodn�. J� jsem tu nov� a proto to nev�m. Nev�d�l bys, kde
> m�m ten Install Shield z�skat? Pokud to nen� mo�n� bez koup� D5, jde to
> n�jak o�idit i se star�m IS, nebo s jin�m programem, nebo je�t� jinak? Jsem

Ahoj,

viz BDE FAQ: http://community.borland.com/article/0,1410,18727,00.html

zkus take instalovat update INI souboru pro InstallShield Express, jsou tady:
http://www.borland.com/devsupport/delphi/downloads/

Dalsi moznost by mohla byt pouziti jineho instalacniho programu, napriklad
InnoSetup: http://www.jrsoftware.org/isinfo.htm

Petr Vones, amatersky programator

jak setridit array of record

[*] Milan ��ek - 28.9.2000 19:53:58

ahoj,
potreboval bych poradit, jak abecedne setridit zaznamy v poli... pole:
array of record

ID,Name: string; Size: integer;

end;

potrebuju podle ID soucasne s Name... Jde mi hlavne o nejaky algoritmus na
trizeni pole... Predem diky.

S pozdravem Milan Cizek, amatersky programator, D5 Ent
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

CD-ROM

[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 28.9.2000 20:24:08

Cauec,

uvedene funkce mam v extra DLL knihovne, proto ty exporty. Preber si, co
muzes.

Bye Ludan


//******************* OpenCD *************************
//
// Otev�e dv��ka CD mechaniky
function OpenCD(Drive: char): boolean; stdcall; export;
var Res: MCIError;
OpenParm: TMCI_Open_Parms;
Flags: DWORD;
S: string;
DeviceID: word;
begin
Result := False;
S := Drive + ':';

Flags := mci_Open_Type or mci_Open_Element;
with OpenParm do begin
dwCallback := 0;
lpstrDeviceType := 'CDAudio';
lpstrElementName := PChar(S);
end;

Res := mciSendCommand(0, mci_Open, Flags, Longint((zv)OpenParm));
if Res <> 0 then
Exit;

DeviceID := OpenParm.wDeviceID;
try
Res := mciSendCommand(DeviceID, MCI_SET, MCI_SET_DOOR_OPEN, 0);
if Res = 0 then
Exit;

Result := True;
finally
mciSendCommand(DeviceID, mci_Close, Flags, Longint((zv)OpenParm));
end;
end;//******************* CloseCD *************************
//
// Zav�e dv��ka CD mechaniky
function CloseCD(Drive: char): boolean; stdcall; export;
var Res: MCIError;
OpenParm: TMCI_Open_Parms;
Flags: DWORD;
S: string;
DeviceID: word;
begin
Result := False;
S := Drive + ':';

Flags := mci_Open_Type or mci_Open_Element;
with OpenParm do begin
dwCallback := 0;
lpstrDeviceType := 'CDAudio';
lpstrElementName := PChar(S);
end;

Res := mciSendCommand(0, mci_Open, Flags, Longint((zv)OpenParm));
if Res <> 0 then
Exit;

DeviceID := OpenParm.wDeviceID;
try
Res := mciSendCommand(DeviceID, MCI_SET, MCI_SET_DOOR_CLOSED, 0);
if Res = 0 then
Exit;

Result := True;
finally
mciSendCommand(DeviceID, mci_Close, Flags, Longint((zv)OpenParm));
end;
end;


----- Original Message -----
From: Marek Barbo��k
To: Delphi konference
Sent: Thursday, September 28, 2000 5:34 PM
Subject: CD-ROM


Ahoj Lidi,

potreboval bych vedet, jakym zpusobem lze softwarove otevrit a zavrit CD
mechaniku.

Poradte pliiis.

Marr Barr

BDE

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 28.9.2000 21:06:44

D�kuju, moc jsi mi pomohl, zkus�m to. Nebo si na�et��m na D5, nebo 6
S pozdravem
MUDr. Miloslav Neu�il
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 7:35 PM
Subject: Re: BDE


> From: "MUDr.Neu�il" <drneuzil(zv)razdva(tec)cz>
> > moc d�kuji, jsi hodn�. J� jsem tu nov� a proto to nev�m. Nev�d�l bys,
kde
> > m�m ten Install Shield z�skat? Pokud to nen� mo�n� bez koup� D5, jde to
> > n�jak o�idit i se star�m IS, nebo s jin�m programem, nebo je�t� jinak?
Jsem
>
> Ahoj,
>
> viz BDE FAQ: http://community.borland.com/article/0,1410,18727,00.html
>
> zkus take instalovat update INI souboru pro InstallShield Express, jsou
tady:
> http://www.borland.com/devsupport/delphi/downloads/
>
> Dalsi moznost by mohla byt pouziti jineho instalacniho programu, napriklad
> InnoSetup: http://www.jrsoftware.org/isinfo.htm
>
> Petr Vones, amatersky programator
>
>


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


Zamknuti klavesnice

[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 28.9.2000 21:15:07

Ahoj Delphinaci, potrebuju pomoct. Jak mam uplne v D5 zamknout celou klavesnici (nebo jen urcitou skupinu klaves) ??? A jeste podobny problem: Potrebuju nahradit prave stisknutou klavesu nejakou jinou. (tedy stisknu A a potrebuju, aby vysledek byl B). Oba problemy potrebuju resit v celych W9x - nejen v provadeci apliakci (tam je to brnkacka).

Diky Mirek Drancak


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


Bitmap image is not valid

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

From: "Krayzel Libor" <Libor.Krayzel(zv)czech-tv(tec)cz>
> Tahle hlaska se mi zcistajasna objevila pri spousteni Delphi (4 prof). Kdyz
> ji odklepnu, Delphi se nespusti, ale v Task listu visi.

Ahoj,

ta chyba vznika obecne pri nejakych problemech s formatem dat v TBitmap. Zkus
odstranit vsechny balicky od tretich stran, dale pak zkontroluj jestli mas
nastavenou barevnou hloubku zobrazeni alespon 16bit High Color.

Petr Vones, amatersky programator

jak setridit array of record

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:58:54

From: "Milan ��ek" <cizek.milan(zv)seznam(tec)cz>
> potreboval bych poradit, jak abecedne setridit zaznamy v poli... pole:
> array of record

Ahoj,

pouzij radeji TList/TObjectList kde si pak muzes nadefinovat vlastni tridici
funkce, ktere pak volas pomoci TList.Sort

Petr Vones, amatersky programator

AsyncFree

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

From: "Martin Dietl" <dietl(zv)4USE(tec)cz>
> a mam dotaz. Existuje nejaky ne prilis slozity zpusob, jakym lze nastavit
> COM port (TAfComPort) parametry ulozenymi v INI souboru? napr. ve tvaru:
> '"baud=9600 parity=n data=8 stop=1 TO=OFF"

Ahoj,

lze to pomoci API funkce BuildCommDCB kde ziskas strukturu DCB kterou pak
predas do komponenty.

Petr Vones, amatersky programator

DLL - Delphi vs VisualC

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:03

From: "Martin Pe�ava" <jimx(zv)volny(tec)cz>
> VC DLL, Delphi program:
> - Pri volani fce ProcAdress z programu to vrati 0 ( = procedura
> daneho jmena neex.)

Ahoj,

problem muze byt v tom, ze jsi ve Ceckove verzi DLL nezadal vypnout 'komoleni'
nazvu, musis tam pridat extern "C" nebo tak nejak. Dale si zkontroluj jestli
pouzivas spravne volaci konvence (tedy stdcall nebo cdecl).

Petr Vones, amatersky programator

Chyba v TTreeView ? - kde je Update #1 ?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:10

From: "Da�a Petr" <Petr.Dana(zv)pvt(tec)cz>
> no, to prave nemam, protoze pry je nutny i #1. Ta je na nejakem CD a nevim,
> kde ji sehnat. Pred nejakou dobou ji tu nekdo nabizel, ja mu psal, ale

Ahoj,

zkus se obratit na Borland CZ (http://www.borland(tec)cz)

Petr Vones, amatersky programator

potize s kompilaci

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:30

From: "Tom�s Vlad�k" <tom.vladik(zv)swadvice(tec)cz>
> Jo, to mi dela taky D5 Pro - pri te kompilaci ani tak ne acces violation,
> jako sem tam Internal Error ...

Ahoj,

za prve se podivej jestli mas nainstalovany UpdPack #1. Dale muze byt problem
v HW pocitace nebo v tom, ze mas treba spusteny nejaky rezidentni antivirus ci
podobne blbiny. Take zkus docasne odstranit vsechny balicky (komponenty) ktere
nejsou primo soucasti Delphi.

Petr Vones, amatersky programator

Jak ziskat bitmapu a pracovat s ni jako s pointere

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:06

From: <jgr(zv)centrum(tec)cz>
> Nevim jak pracovat s bitmapou tak, abych k mi mohl pristupovat
> jako k polozce array popr. pointer. Potrebuji s bitmapou
> pracovat velmi rychle a to jak vyhledavat tak psat do ni.

Ahoj,

podivej se na vlastnost TBitmap.ScanLine

Petr Vones, amatersky programator

Vlastni komponenty v opendialogu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:36

From: "Ladis" <bartal(zv)vfu(tec)cz>
> jak dodat do OpenDialogu vlastni button ci neco jineho a osetrit udalost
> onClick ?

Ahoj,

mohlo by ti pomoct tohle:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=14732

Petr Vones, amatersky programator

Barva textu v console app

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:57

From: "Martin Pe�ava" <jimx(zv)volny(tec)cz>
> Zjistil jsem, ze existuje API fce SetConsoleTextAttribute, ale tam ma
> jako jeden parametr handle console, kterou nevim jak zjistit. Zkusil

Ahoj,

pomoci GetStdHandle.

Petr Vones, amatersky programator

Casove kriticke operace ve Win

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:53

From: "Ota Maly" <maly(zv)space(tec)cz>
> kolega resi komunikaci s ISA (PCI) kartou ve Windows, jedna se v podstate o
> AD prevodnik, z cehoz plyne potreba prenosu pomerne velkych baliku dat v
> realnem case. Karta ma svuj vlastni buffer, ktery je vsak potreba vybrat
> alespon jednou za 0.5 sec.
> Komunikovat s kartou se mu dari v pohode, jen je problem s casem, pokud se
> vezme za okno te aplikace, tak se OnTimer pochopitelne nevyvola (respektive
> vyvola pozdeji) a tim dochazi ke ztrate merenych dat..
> Jak se vrhnout na takovou aplikaci ?

Ahoj,

jedine spolehlive reseni je cist data v kernel modu, tedy napsat vlastni VxD,
WDT ci kernel driver (dle verze OS na kterem to ma bezet). Na urovni aplikace
toto neni jiz z principu operacniho systemu mozne. Drivery vsak nelze psat v
Delphi.

Petr Vones, amatersky programator

Okno exploreru na formulari

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:00

From: "Leo �t�p�n" <stepan(zv)orbit(tec)cz>
> mam aplikaci do ktere chci zabudovat v jedne casti formulare standardni
> Explorer (pruzkumnik). Nechci si vytvaret zadny vlastni spravce programu.

Ahoj,

viz nekolik odkazu:
http://www.gexperts.com/GXExplorer/
http://www.plasmatech.com/shellctl.htm
http://www.turbopower.com/products/systools/

Petr Vones, amatersky programator

Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.2000 22:59:41

From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> %subj%, ale aby naprekryval TForm.FormStyle:=fsMDIChild ?

Ahoj,

a co ma byt cilem ? Pokud chces pridat do aplikace toolbar tak pouzij
TToolBar.

Petr Vones, amatersky programator

rozostupy ikon v ListView

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

From: "Mari�n Goryl" <goryl(zv)insdata.sk>
> Daju sa nastavit rozdielne rozostupy ikon v ListView ako je nastavene v
> systeme.

Ahoj,

prirad k ListView ImageList a u neho nastav vysku a sirku.

Petr Vones, amatersky programator

Delphi 5 & Windows 2000 CZ

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

From: "Peter �IRIP" <psoft(zv)ke.telecom.sk>
> Doslaka, mal si pravdu. Dakujem. Naozaj som mal v mene C s makcenom. Tak to
> je Windows riadny shit .... co si mam zmenit rodny list ? Nemozem zato, ze

Ahoj,

v tomhle pripade je to spis problem InstallShieldu ...

Petr Vones, amatersky programator

IBX pre IB6

[*] Ivan Kozak <kozaki(zv)atlas(tec)cz> - 28.9.2000 21:33:07 -0700

Neviete niekto, kde by som som mohol stiahnut IBX (componenty pre priamy pristup k IB6) pre IB6? Dik. Ivan

Corrupt index v Px tabulce

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.9.2000 06:35:56

Neco je na webu firmy RKS www.rksolution(tec)cz
Dalsi moznost je primo od borlandu, ale odkaz primo nemam. Hledej
TUtil32.DLL. K teto knihovne byly i priklady se zdrojaky v Delphi (DTutil32)

Jan Fiala

----- Original Message -----
From: Tomas Bradle <t.bradle(zv)pvtnet(tec)cz>> Me by zajimaly spis ty nastoje, protoze ta tabulka je pomerne
komplikovana,
> moc fieldu a indexu a neni do myho programu, takze bych asi na neco
zapomel
> co by tam chybelo, atd....
>
> dik
>
> Tomas
>
>
> ----- Original Message -----
> From: Jan Fiala <jan.fiala(zv)iol(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, September 28, 2000 7:08 AM
> Subject: Re: Corrupt index v Px tabulce
>
>
> > Zkopirovat tabulku jinam, vytvorit novout prazdnou a naapendovat do ni
> > data z te nakople. V tomto pripade narusene indexy nevadi. Jinak
> > existuji nejake nastroje na opravu tabulek.
> >
> > Jan Fiala
> >
> > ----- Original Message -----
> > From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
> >
> >
> > > Zdravim vsechny,
> > >
> > > potreboval bych poradit, jak vyresit nabourany index v paradox
> > tabulce.
> > >
> > > diky predem
> > >
> > > Tomas Bradle
> > > t.bradle(zv)pvtnet(tec)cz
> > >
> > >
> > >
> > >
> >
> >
>
>

DBComboBox

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 29.9.2000 06:57:13

Tak to je ono.....

Diky vsem za odpoved

----- Original Message -----
From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 12:29 AM
Subject: Re: DBComboBox


> Co tak nastavit na csDropDownList ?
>
> roland.
>
>
> ----- Original Message -----
> From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
> To: "forum" <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, September 27, 2000 12:42 PM
> Subject: DBComboBox
>
>
> > Ahoj
> >
> > Nevite nekdo jak v DBComboBoxu nebo i v ComboBoxu, zakazat rucni vstup
> > a povolit jen vyber hodnot se seznamu?
> >
> >
> >
> >
>

BDE

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 29.9.2000 07:30:30

Mo?na zkusit nikde sehnat jiny installShield. Nevim, jsetli se da ten D5 sehnat i jinak .

Martin Lasevic

-----Puvodni zprava-----
Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
Odeslano: 28. zaoi 2000 18:41
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: BDE

Va?eny Milane,
moc dikuji, jsi hodny. Ja jsem tu novy a proto to nevim. Nevidil bys, kde
mam ten Install Shield ziskat? Pokud to neni mo?ne bez koupi D5, jde to
nijak o?idit i se starym IS, nebo s jinym programem, nebo je?ti jinak? Jsem
z toho opravdu zoufaly.
S pozdravem
MUDr. Miloslav Neu?il
----- Original Message -----
From: "Martin Lasevic" <vyvoj(zv)atlascon(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 4:26 PM
Subject: RE: BDE


> No uz to tady bylo. Tyhle problemy odstranil InstallShield z D5.
>
> Martin Lasevic
>
>
> -----Puvodni zprava-----
> Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
> Odeslano: 28. zaoi 2000 14:25
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: BDE
>
> Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly
> program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale
> dovedel, ze mu to hlasi pri instalaci toto:
> Merging The Configuration File Has Failed. Config File:
.......\idapi32.cnf
> Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3,
> Initialization Failed.
> Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam
5.01),
> ale jen Delphi 3.
> Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu
> fungovalo? Uvitam polopatickou radu.
> MUDr. Miloslav Neuzil
>
>
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.189 / Virova baze: 90 - datum vydani: 1.9.2000
> <<Soubor: ATT00009.html>>
>
>


---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.189 / Virova baze: 90 - datum vydani: 1.9.2000

Corrupt index v Px tabulce

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 29.9.2000 08:14:13

Primo v Paradoxy existuje nastroj Table Repair Utility, ale pokud je problem
i tu tabulku otevrit tak nepomuze ani to - jedine:
1. sehnat nenabouranou tabulku s jakymikoliv daty
2. zrusit (smazat z disku) vsechny soubory .yg?, .xg? a .px (popr. .val)
3. Otevrit tu tabulku (ted uz by mela jit, protoze byly odstranene vsechny
indexy) a z te nenabourane vycist deklaraci tech indexu a vytvoreni znovu

Milan Tomes

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Tomas Bradle
> Sent: Thursday, September 28, 2000 12:20 PM
> To: Delphi Konference
> Subject: Re: Corrupt index v Px tabulce
>
>
> Me by zajimaly spis ty nastoje, protoze ta tabulka je pomerne
> komplikovana,
> moc fieldu a indexu a neni do myho programu, takze bych asi na
> neco zapomel
> co by tam chybelo, atd....
>
> dik
>
> Tomas
>
>
> ----- Original Message -----
> From: Jan Fiala <jan.fiala(zv)iol(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, September 28, 2000 7:08 AM
> Subject: Re: Corrupt index v Px tabulce
>
>
> > Zkopirovat tabulku jinam, vytvorit novout prazdnou a naapendovat do ni
> > data z te nakople. V tomto pripade narusene indexy nevadi. Jinak
> > existuji nejake nastroje na opravu tabulek.
> >
> > Jan Fiala
> >
> > ----- Original Message -----
> > From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
> >
> >
> > > Zdravim vsechny,
> > >
> > > potreboval bych poradit, jak vyresit nabourany index v paradox
> > tabulce.
> > >
> > > diky predem
> > >
> > > Tomas Bradle
> > > t.bradle(zv)pvtnet(tec)cz
> > >
> > >
> > >
> > >
> >
> >
>

Referencna integrita v Database Desktop

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 29.9.2000 08:19:14

Zdravim,

Podle mych zkusenosti s Paradoxem (tabulkami i prostredim) je vice nez
vhodne tuto funkci nevyuzivat. My jsme ref. integritu pouzivali a byly s tim
tak velke problemy (velmi casto padaly tabulky), ze jsme od toho rychle
upustili a v soucasne dobe si ref. integritu resime programove.

Milan Tomes

> Ahoj,
> Mam CB 5.
> V Database Desktop som si vytvoril tabulky (Paradox 7). Dalej som si
> vytvoril referencnu integritu medzi dvoma tabulkami presne podla helpu.
> Update rule mam nastaveny na cascade. Problem je, ze to nefunguje
> tak ako by
> som si predstavoval. Ak chcem vymazat zaznam v rodicovskej tabulke, pre
> ktory existuje odkaz v child tabulke, database desktop vyhlasi "Master has
> detail records. Cannot delete or modify."
> Dakujem za
> kazdu radu.
>
> ****************************************
> Jaromil Adami
> adami(zv)axa.sk
> ****************************************
>

BDE

[*] Lauko �tefan <lauko(zv)salamon.sk> - 29.9.2000 08:53:51

BDE je mozne instalovat aj bez IS. Je tam subor BDEInst.cab - po rozpakovani BDEInst.DLL. Tento subor staci nakopirovat na PC kde chcem instalovat BDE a do prikazoveho riadku napisat REGSVR32 BDEINST.DLL - spusti sa instalacia alebo UpGrade, UpDate. Toto ma zatial nesklamalo. BDEInst.cab je mozne ziskat aj na Internete (uz sa nepamatam kde).
Lauko.
----- Original Message -----
From: MUDr.Neu�il
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, September 28, 2000 2:25 PM
Subject: BDE


Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale dovedel, ze mu to hlasi pri instalaci toto:
Merging The Configuration File Has Failed. Config File: .......\idapi32.cnf
Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3, Initialization Failed.
Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam 5.01), ale jen Delphi 3.
Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu fungovalo? Uvitam polopatickou radu.
MUDr. Miloslav Neuzil


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


Okno exploreru na formulari

[*] Ale� Va���ek�����"q��y�&���w�3 - 29.9.2000 09:07:29

Ahoj,

je to presne ono, ale neco free by nebylo? :-)

Ales
>
> From: "Leo �t�p�n" <stepan(zv)orbit(tec)cz>
> > mam aplikaci do ktere chci zabudovat v jedne casti formulare standardni
> > Explorer (pruzkumnik). Nechci si vytvaret zadny vlastni spravce
> programu.
>
> Ahoj,
>
> viz nekolik odkazu:
> http://www.gexperts.com/GXExplorer/
> http://www.plasmatech.com/shellctl.htm
> http://www.turbopower.com/products/systools/
>
> Petr Vones, amatersky programator
>
>
>

IBX pre IB6

[*] Patrik Tesar <tesar(zv)rainside.sk> - 29.9.2000 09:53:41

Skus www.interbase.com
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ivan Kozak
Sent: Friday, September 29, 2000 6:33 AM
To: delphi-l(zv)fwd(tec)cz
Subject: IBX pre IB6


Neviete niekto, kde by som som mohol stiahnut IBX (componenty pre priamy
pristup k IB6) pre IB6? Dik. Ivan


Delphi 6

[*] delphi konference <delphi(zv)energotek(tec)cz> - 29.9.2000 09:55:39

Dobry den

kdyz jsem u toho D6 pry tam take bude zabudovana moznost psat program
smichany z pascalu a C++ codu. Nevite o tom neco blizsiho? Mozna se ptam
zbytecne, INVEX se blizi a Inprise/Borland nam k tomu jiz za par dni jiste
rekne vice.


Petr Blau software developer

Delpji 6 bude podporovat komplexni cisla....:).. melo by prijit na trh tento
rok.
Jestli spechas, podival bych se na ruzne Delphi www stranky .....

Honza Najvarek


Referencna integrita v Database Desktop

[*] Ren� Otisk - 29.9.2000 09:56:53

Hi,

navic jsem ziskal dojem, ze kaskadova integrita je tam implementovana jen
pro update a pro uz delete ne

Sroub
> Zdravim,
>
> Podle mych zkusenosti s Paradoxem (tabulkami i prostredim) je vice nez
> vhodne tuto funkci nevyuzivat. My jsme ref. integritu pouzivali a byly s
tim
> tak velke problemy (velmi casto padaly tabulky), ze jsme od toho rychle
> upustili a v soucasne dobe si ref. integritu resime programove.
>
> Milan Tomes
>
> > Ahoj,
> > Mam CB 5.
> > V Database Desktop som si vytvoril tabulky (Paradox 7). Dalej som si
> > vytvoril referencnu integritu medzi dvoma tabulkami presne podla helpu.
> > Update rule mam nastaveny na cascade. Problem je, ze to nefunguje
> > tak ako by
> > som si predstavoval. Ak chcem vymazat zaznam v rodicovskej tabulke, pre
> > ktory existuje odkaz v child tabulke, database desktop vyhlasi "Master
has
> > detail records. Cannot delete or modify."
> > Dakujem za
> > kazdu radu.
> >
> > ****************************************
> > Jaromil Adami
> > adami(zv)axa.sk
> > ****************************************
> >

Delphi 6

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 29.9.2000 10:10:47

Ahoj,

delphi 6 (pro Windows) budou v prvnim ctvrtleti pristiho roku, Delphi pro Linux
kolem listopadu. Wiz zprava z Kylix RoadShow:
http://swnet(tec)cz/article.php?id=13571

Slavek

> Delpji 6 bude podporovat komplexni cisla....:).. melo by prijit na trh tento rok.
> Honza Najvarek


Application.OnMessage

[*] Lauko �tefan <lauko(zv)salamon.sk> - 29.9.2000 10:40:23

Ahojte,
chcem obsluzit kliknutie na componenty vlozene do TFormu. Mam tento kod:

*****************
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := AppMessage;
end;

procedure TForm1.AppMessage(var Msg: TMsg; var Handled: Boolean);
Var
begin
if (Msg.message = WM_LBUTTONDOWN) then
begin
Caption:=IntToStr(Msg.hwnd);
{Obsluha udalosti - kliknutie}
Handled := True;
end;
end;
******************
Funguje to dobre ale ked kliknen na niektore typy napr. TLabel tak v
Msg.hwnd = Form1.Handle nie handle TLabel. Preco niektore TControls
nevracaju pri kliknuti svoj handle ? Ako mam zistit na co bolo kliknute ked
nechcem vyuzit OnMouseDown?
Za nakopnutie vopred dakujem.

Lauko.

Delphi 6

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 29.9.2000 11:29:57

> delphi 6 (pro Windows) budou v prvnim ctvrtleti pristiho roku, Delphi pro Linux
> kolem listopadu. Wiz zprava z Kylix RoadShow:
***Samozrejme listopadu tohoto roku.

S.
> http://swnet(tec)cz/article.php?id=13571
>
> Slavek
>
> > Delpji 6 bude podporovat komplexni cisla....:).. melo by prijit na trh tento rok.
> > Honza Najvarek
>

iterace vysledku SELECTU

[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 29.9.2000 11:37:39

Ahoj,
jestli jsem dobre pochopil dotaz, tak staci nadefinovat corsor pro select.
pro MSSQL asi nejak takhle

declare (zv)pole1 int
declare (zv)pole2 int

declare testcursor cursor for select pole1, pole2 from tabulka where.....

open testcursor
fetch next from testcursor into (zv)pole1, (zv)pole2
while (zv)(zv)FETCH_STATUS = 0 begin
nejaky kod
fetch next from testcursor into (zv)pole1, (zv)pole2
end
close testcursor
deallocate testcursor

Ales
----- Original Message -----
From: Jiri Kral <admin(zv)printo(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, September 26, 2000 12:48 PM
Subject: iterace vysledku SELECTU


>
> vedel by nekdo jestli jde (obecne nebo primo na MS SQL7) udelat toto:
>
> ve storedproc mam SELECT ktery vraci cca 5-10 radku. no.
> a mi by se libilo kdybych umel zaiterovat prez vsechny radky vysledku a
> sloucit si je do jedineho vetsiho output parametru.
> at to nemusim delat v aplikaci. objemove to neni problem. vysledek bude
mit
> par desitek charu.
>
> diky
>
> JK
>
>

IBX pre IB6

[*] Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 29.9.2000 12:54:04

Vse k IB6 se da stahnout odtud:
http://www.borland.com/interbase/downloads/
http://www.interbase.com/open/downloads/download.html

Ing. Igor Vodi�ka
informa�n� syst�my

Nakladatelstv� Sagit, Horn� 1, 700 30 Ostrava-Hrab�vka
Tel.: 069 353 062, Fax: 069 357 758
Mailto:vodicka(zv)sagit(tec)cz
Http:\\www.sagit(tec)cz\

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ivan Kozak
Sent: Friday, September 29, 2000 6:33 AM
To: delphi-l(zv)fwd(tec)cz
Subject: IBX pre IB6


Neviete niekto, kde by som som mohol stiahnut IBX (componenty pre priamy
pristup k IB6) pre IB6? Dik. Ivan
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.157 / Virov� b�ze: 73 - datum vyd�n�: 31.5.2000



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

Instalace DAO3.5

[*] Marek Soukup <marek(zv)comberg(tec)cz> - 29.9.2000 13:10:28

OK,
ja nebudu jednou linej a misto, abych nekoho votravoval, tak to tam
vystracham.

M.S. (neplest s MS)

> Link neviem, mozem poslat iba subor (ma to 30kB).
>
> Erik Salaj, WINSOFT
>

konekt na zaheslovanu MS Access databazu

[*] Erik Salaj <winsoft(zv)napri.sk> - 29.9.2000 14:42:33

> mam takyto problem, chcem sa pomocou
> AdoConnection (Microsoft Jet 4.0 OLE DB Provider)
> napojit na MS Access databazu, ktora ma nastavene heslo.
> Ked dam Test connection, program hlasi chybu, ze:
> Workgroup information file is missing alebo ze je databaza
> exkluzivne otvorena inym uzivatelom (co nie je).

Access podporuje dva urovne ochrany heslom:
1. share level (jednoduche priradenie hesla databaze)
2. user level (moznost definovat uzivatelov a skupiny
a priradit im opravnenia na db objekty)

V pripade 1. sa heslo zadava do connection stringu,
viz http://www.cybermagic.co.nz/winsoft/adofaq.htm#Q29

Erik Salaj, WINSOFT


Internal error BC2241

[*] Ale� Va���ek�����"q��y�&���w�3 - 29.9.2000 15:01:55

Zdravim,

obcas se mi stava, ze po kompilaci projektu v D5 (Upd1, W2000 Adv. Server)
kompilator vyhodi interni chybu %subj%. Zajimave je, ze ji IMHO vyhazuje
opravdu velmi nahodne (snad podle pocasi...)... Vysledna aplikace se chova
na prvni pohled uplne normalne, ale ta chyba me znervoznuje. Nevite negdo co
je to za chybu?

Ales


Dynamicka registrace trid.

[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 29.9.2000 15:13:17

Zdravim,
je mozne si dynamicky zaregistrovat tridu jejiz nazev mam ve stringu?

s:='TEdit'

a potrebuji zavolat neco jako

RegisterClass(

kde by parametr byl string.

Zvo.

Delphi 5 ENT, ADO + MSSQL2000

[*] Michal HAMPL \(Delphi\) <delphi(zv)wsc(tec)cz> - 29.9.2000 15:55:10

Zdravim vsechny Delphare.

Prave testujeme novy MSSQL2000 a narazili jsme na jeden problem tykajici se
pripojeni pres ADO komponenty dodavane s Delphi 5 Enterprise. Jedna se o
nasledujici:

(DELPHI 5 ENT, MSSQL2000, WIN2000Prof)

Mam ADOConnection1: TADOConnection
ConnectionString = 'Provider=SQLOLEDB.1;Persist Security Info=False;
User ID=sa;Initial Catalog=DATABAZE;Data Source=(local)'
Dale ADOQuery1: TADOQuery
Connection = ADOConnection1
SQL.Text = 'SELECT * FROM TABULKA'

Ostatni property jsou vychozi

Nasledujici kod zpusobi chybu:

ADOQuery1.Open;
while not ADOQuery1.EOF do
ADOQuery1.Next;
ADOQuery1.Close; // Tady nastane chyba
Either BOF or EOF is True, or the current record has been deleted.
Requested operation requires a current record.

Je jasne, ze mu vadi, ze ADOQuery je v pozici EOF, ale v predchozi verzi
MSSQL to nevadilo a vse fungovalo tak jak melo(?). Pomuze umisteni
ADOQuery1.First nebo podobneho prikazu pred provedeni Close, ale to podle
mne neni univerzalni reseni.

Dalsi postrehy: stejna chyba nastane i pri pouziti komponenty TADOTable nebo
pri pouziti ADO komponent treba s providerem Microsoft.Jet.OLEDB.4.0, coz
znamena, ze chyba neni v MSSQL, ale asi v ADO OCX, ktere dodava Microsoft S
MSSQL2000.

Predem diky za kazdou radu

Michal HAMPL
HAMPL(zv)WSC.CZ

Rada s Access - komprimace tabulky

[*] Milan Bursik <delphi(zv)advnet(tec)cz> - 29.9.2000 16:06:09

Bohuzel jsem priklad nenasel, a mam i dema pro ADO, ktere dodava Borland.
Muzete mi prosim poslat nazev prikladu. Pripadne pokud se jedna o jineho
vyrobce ADO muzete uvest kontakt na download dema?

Dekuji Milan Bursik

----- Original Message -----
From: Erik Salaj <winsoft(zv)napri.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 4:58 PM
Subject: Re: Rada s Access - komprimace tabulky


> > nevite nahodou nekdo jak pres ADO nebo ODBC udelat komprimaci databaze?.
>
> Pomocou JRO objektov, priklad je sucastou Adonis komponentov.
>
> Erik Salaj, WINSOFT
>

sender

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 29.9.2000 17:20:22

Ahoj,
Mam jeden problem. Kdyz umistim na formular tlacitko, tak se mi v objektu form1 v sekci published automaticky definuje objekt reprezentujici tlacitko s nazvem napr. Button1 a take procedura OnClick s parametrem SENDER. K cemu ale tento parametr SENDER vlastne slouzi, kdys se z tela procedury OnClick muzu na metody nebo data instance vlozeneho tlacitka odkazovat i pomoci jiz zmineneho Button1 a navic nemusim pretypovat ukazatel , coz se v pripade SENDERU vetsinou vyzaduje ?
Dekuji za vase odpovedi.
S pozdravem
Jan Neuzil


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


BDE

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 29.9.2000 17:23:28

To je ono, ja taky nevim kde to najit, ale tohle jsem nevedel a dekuju za pomoc Stefane.
S pozdravem
MUDr. Miloslav Neuzil
----- Original Message -----
From: Lauko �tefan
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, September 29, 2000 8:53 AM
Subject: RE: BDE


BDE je mozne instalovat aj bez IS. Je tam subor BDEInst.cab - po rozpakovani BDEInst.DLL. Tento subor staci nakopirovat na PC kde chcem instalovat BDE a do prikazoveho riadku napisat REGSVR32 BDEINST.DLL - spusti sa instalacia alebo UpGrade, UpDate. Toto ma zatial nesklamalo. BDEInst.cab je mozne ziskat aj na Internete (uz sa nepamatam kde).
Lauko.
----- Original Message -----
From: MUDr.Neu�il
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, September 28, 2000 2:25 PM
Subject: BDE


Nejsem moc zkuseny a chtel bych vas poprosit o radu. Udelal jsem maly program s instalaci BDE. U mne to funguje dobre, od znameho jsem se ale dovedel, ze mu to hlasi pri instalaci toto:
Merging The Configuration File Has Failed. Config File: .......\idapi32.cnf
Pak se objevi dalsi hlaska Failed in adding alias: The error Number Is 3, Initialization Failed.
Program pak nelze spustit. Tusim, ze to mozna bude ve verzi BDE (mam 5.01), ale jen Delphi 3.
Moc prosim, jak to opravit a jak to delat spravne, aby to kazdemu fungovalo? Uvitam polopatickou radu.
MUDr. Miloslav Neuzil


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


Application.OnMessage

[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 29.9.2000 18:03:08

> Msg.hwnd = Form1.Handle nie handle TLabel. Preco niektore TControls
> nevracaju pri kliknuti svoj handle ?

Protoze ho nemaji nebot nejsou potomci TWinControl . Napr.
TLabel je odvozen od TGraphicControl.

Jiri Binder


IBX pre IB6

[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 29.9.2000 18:14:00

> Neviete niekto, kde by som som mohol stiahnut IBX (componenty pre
> priamy pristup k IB6) pre IB6? Dik. Ivan
>

Je treba update momentalne na verzi 4.3
(podminkou nainstalovany update 5.1 na D5). Posledni verze jsou
vzdy na http://community.borland.com/ v Code Central.

Jiri Binder

Pridani menu do aplikace

[*] Hurricane <hurricane(zv)email(tec)cz> - 29.9.2000 19:07:10

Zdravim

> > > MainMenu.Add(NewItem('Blah', 0, false, true, MainForm.Click, 0,
> > > 'Bububu'));
> >
> > Toto funguje na aplikaci vytvorenou mnou. Ja ale potrebuji pridat menu
do
> > aplikace uplne jine. Priklad: moje aplikace Pridejmenu prida nabidku do
> > aplikace NetscapeCommunicator. Z teto aplikace po stisknuti meho menu
pak
> > bude volan kod napsany mnou.
> >
>
> obavam se ze toto nepujde. Pokud to v nejake aplikaci uvidis pak je to
> reseno na bazi nejakeho plugin interface. I kdybys pridal polozku do menu
> stejne prislusnou udalost bude obsluhovat dana aplikace a nikoliv tvuj
kod.

No, ja bych nerek, ze to bude naprosto neresitelne. Pridat menu do resourcu
te aplikace a zkompilovat ji by IMHO nemel byt problem (viz. ResourceHacker
(link uz nemam, sorry)). Spis bude problem, jak z toho menu volat procedury
v jine aplikaci nebo knihovne. To bohuzel vidim jako temer nerealne.

Hurricane


Klavesnice

[*] Robert Plz�k <rpdap(zv)atlas(tec)cz> - 29.9.2000 19:33:55

Pokus


Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 29.9.2000 19:42:19

Nieco take ako bolo umiestnenie obrazkov tile na fsMDIForm. ale chcel by som
tam dat TPanel alebo TGroupBox.

Roland.


----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, September 28, 2000 10:59 PM
Subject: Re: Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm ?> From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> > %subj%, ale aby naprekryval TForm.FormStyle:=fsMDIChild ?
>
> Ahoj,
>
> a co ma byt cilem ? Pokud chces pridat do aplikace toolbar tak pouzij
> TToolBar.
>
> Petr Vones, amatersky programator
>
>
>

O.T. velikost exe souboru

[*] Hurricane <hurricane(zv)email(tec)cz> - 29.9.2000 19:50:45

Zdravim

> Autori uvadi, ze komprimovany soubor se pri spusteni rozbaluje do pameti a
> udajne by to v nekterych pripadech melo byt i rychlejsi.

Mno, ja mam presne opacne informace. IMHO bych rekl, kdyz se neco rozbaluje
do pameti a potom se to spusti, tak je to pomalejsi, nez kdyz se to primo
spusti.

Hurricane

Konvertor RTF do HTML

[*] Hurricane <hurricane(zv)email(tec)cz> - 29.9.2000 19:51:07

Zdravim

mwCustomEdit (dnes mwSynEdit) ma Export do HTML i RTF. RTF to umi i nacist,
takze to de i exportovat. Ale pri mych pokusech exportovat PlainText do HTML
to nedopadlo moc dobre. V tom exporteru je rada chyb, ale melo by je jit
opravit.

Hurricane
----- Original Message -----
From: Spider
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, September 15, 2000 5:02 PM
Subject: Konvertor RTF do HTML


Ahoj, nev�te n�kdo o n�jak� unit� (pro Delphi 5) nebo DLL knihovn� kter� um�
konvertovat RTF do HTML ?
d�k

Spider

Workgroup name nebo neco takoveho

[*] Honza Kachlik <honza.kachlik(zv)worldonline(tec)cz> - 29.9.2000 20:02:21

To je divny j� to tady v W98 m�m. Tak to skuste nekde naj�t v Registrech.

S pozdravem Kachlik Jan


----- Original Message -----
From: Miroslav Novosad <mirnov(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 27, 2000 1:48 AM
Subject: Re: Workgroup name nebo neco takoveho


> Nic ve zlem, ale neco takoveho v registru neni. Alespon teda u me ve
> WinNT.
>
> ----- Original Message -----
> From: honza-world <honza.kachlik(zv)worldonline(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Sunday, September 24, 2000 6:56 PM
> Subject: Re: Workgroup name nebo neco takoveho
>
>
> > podivej se do registru na tohle je tam i user a popis PC + pracovn�
> skupina
> >
> > HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\VxD\VNETSUP
> >
> > S pozdravem
> > Kachlik Jan
> > Milovn�k dobr�ho v�na a registru :)
> > HAVE A NICE DAY
> >
> > ----- Original Message -----
> > From: <mirnov(zv)atlas(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Friday, September 22, 2000 10:28 PM
> > Subject: Workgroup name nebo neco takoveho
> >
> >
> > > Ahoj,
> > >
> > > Jeden OT: Kde najdu jmeno pracovni skupiny? Hledam to uz 2 dny a
> rikam si,
> > ze to tam ani snad neni.
> > >
> > > (D4/WinNT)
> > >
> > >
> > > Mirek
> > >
> >
>
>

Application.OnMessage

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 29.9.2000 23:06:43

Zrejme to bude tim, ze TLabel neni na rozdil od vetsiny vizualnich komponent
"okno" (neni potomkem TWinControl). Misto TLabel lze pouzit TStaticText, ale
to je pomerne znacne mrhani prostredky.

Tomas

> Ahojte,
> chcem obsluzit kliknutie na componenty vlozene do TFormu. Mam tento kod:
>
> *****************
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Application.OnMessage := AppMessage;
> end;
>
> procedure TForm1.AppMessage(var Msg: TMsg; var Handled: Boolean);
> Var
> begin
> if (Msg.message = WM_LBUTTONDOWN) then
> begin
> Caption:=IntToStr(Msg.hwnd);
> {Obsluha udalosti - kliknutie}
> Handled := True;
> end;
> end;
> ******************
> Funguje to dobre ale ked kliknen na niektore typy napr. TLabel tak v
> Msg.hwnd = Form1.Handle nie handle TLabel. Preco niektore TControls
> nevracaju pri kliknuti svoj handle ? Ako mam zistit na co bolo kliknute
ked
> nechcem vyuzit OnMouseDown?
> Za nakopnutie vopred dakujem.
>
> Lauko.

OT: COM Port

[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 29.9.2000 23:13:32

�auec lidi,

tak jsem se �irou n�hodou dostal k vy�e�en� n�e popsan�ho probl�mu. Nen� to sice �e�eno softwarov�, ale hardwarov�. Sch�ma zapojen� n�e.

Bye Lu�an


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



Nazdarek,

Odpoved na mail z Friday, October 08, 1999:

BD> Ahoj

BD> Jde se nejak napichnout na jiz pouzivany COM Port.
BD> Presneji: chtel bych se napichnout na port modemu a sledovat vsechno co na nej chodi....
BD> Predem dik

BD> Dalibor.....


Uz sem si s tim hral kdysi ... NEJDE ...
Dokonce, kdyz sem si ho otevrel sam s parametrem
Share, tak sem pak na nej druhou aplikaci taky nemoh.

Pro sledovani pouzij RAS.

P.S. Pokud nekdo vi, ze to opravdu de, tak to chci taky vedet ! ;)

Cus,
Petrik mailto:petrik(zv)geocities.com


Rada s Access - komprimace tabulky

[*] Erik Salaj <winsoft(zv)napri.sk> - 29.9.2000 23:47:36

> Bohuzel jsem priklad nenasel, a mam i dema pro ADO, ktere dodava Borland.
> Muzete mi prosim poslat nazev prikladu. Pripadne pokud se jedna o jineho
> vyrobce ADO muzete uvest kontakt na download dema?

http://www.cybermagic.co.nz/winsoft (Adonis komponenty)

Erik Salaj, WINSOFT

OT: COM Port

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 00:16:57

From: "Ing. Lud�k Florian" <Ludek.Florian(zv)bluerose(tec)cz>
> tak jsem se �irou n�hodou dostal k vy�e�en� n�e popsan�ho probl�mu. Nen�
> to sice �e�eno softwarov�, ale hardwarov�. Sch�ma zapojen� n�e.

Ahoj,

a k cemu jsou tam ty diody ? RS232 je puvodne +/-12V, takze by to melo byt
zapojeno primo.

Petr Vones, amatersky programator

OT: COM Port

[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 30.9.2000 05:56:08

Nazd�rek,

>
> a k cemu jsou tam ty diody ? RS232 je puvodne +/-12V, takze by to melo byt
> zapojeno primo.

M��e� sou�asn� odposlouch�vat oba sm�ry. Kdy� tam ty diody nebudou, tak to,
co ti p�ijde od jednoho sm�ru, se vr�t� p�es sp�na�e i do druh�ho sm�ru a
nastane chaos. T�mto m� zaru�eno, �e se to nestane.

Bye Ludan

sender

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 30.9.2000 09:18:38

Metody (resp. obsluhy udalosti) lze prirazovat i v run-time a to nekolika
komponentam jen jedinou metodu a parametr Sender potom slouzi jako objekt.
ktery udalost vyvolal.

Milan Tomes



Ahoj,
Mam jeden problem. Kdyz umistim na formular tlacitko, tak se mi v objektu
form1 v sekci published automaticky definuje objekt reprezentujici tlacitko
s nazvem napr. Button1 a take procedura OnClick s parametrem SENDER. K cemu
ale tento parametr SENDER vlastne slouzi, kdys se z tela procedury OnClick
muzu na metody nebo data instance vlozeneho tlacitka odkazovat i pomoci jiz
zmineneho Button1 a navic nemusim pretypovat ukazatel , coz se v pripade
SENDERU vetsinou vyzaduje ?
Dekuji za vase odpovedi.
S pozdravem
Jan Neuzil


sender

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

Pokud se v?e korektni vola, tak v parameteru Sender je objekt ( komponenta,
ktera tuto udalost ) onClick) vyvolala.

Nikdy to mu?e? mit tak, ?e onClick ma? na manu item a toeba na button a pak
nevi? , kdo to stisknul. Sender Ti to oekne.

Martin

Pekny den a pilotum stastne pristani ...
============================
ML Software - Martin Lasevie
Budovatelska 459
708 00 Ostrava-Poruba
tel., fax.: +420 ( 69) 691 85 11
mobil : +420 (603) 338 765
OK2 CLM
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
============================

-----Puvodni zprava-----
Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
Odeslano: 29. zaoi 2000 17:20
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: sender

Ahoj,
Mam jeden problem. Kdyz umistim na formular tlacitko, tak se mi v objektu
form1 v sekci published automaticky definuje objekt reprezentujici tlacitko
s nazvem napr. Button1 a take procedura OnClick s parametrem SENDER. K cemu
ale tento parametr SENDER vlastne slouzi, kdys se z tela procedury OnClick
muzu na metody nebo data instance vlozeneho tlacitka odkazovat i pomoci jiz
zmineneho Button1 a navic nemusim pretypovat ukazatel , coz se v pripade
SENDERU vetsinou vyzaduje ?
Dekuji za vase odpovedi.
S pozdravem
Jan Neuzil


---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.189 / Virova baze: 90 - datum vydani: 1.9.2000
<<Soubor: ATT00001.html>>

Application.OnMessage

[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 30.9.2000 10:16:58



> > Msg.hwnd = Form1.Handle nie handle TLabel. Preco niektore TControls
> > nevracaju pri kliknuti svoj handle ?
>
> Protoze ho nemaji nebot nejsou potomci TWinControl . Napr.
> TLabel je odvozen od TGraphicControl.
>
> Jiri Binder
>

Pro tyto ucely by mel jit pouzit TStaticText (zalozka Additional)


S pozdravem Heinisch Jiri

www.deis(tec)cz
www.drnholec(tec)cz - brana do sveta :-)

POZOR firma DAMELLO prodava neschvalene faxmodemy ZOLTRIX bez jakehokoliv
upozorneni

Delphi 5 ENT, ADO + MSSQL2000

[*] Erik Salaj <winsoft(zv)napri.sk> - 30.9.2000 11:51:38

> Nasledujici kod zpusobi chybu:
>
> ADOQuery1.Open;
> while not ADOQuery1.EOF do
> ADOQuery1.Next;
> ADOQuery1.Close; // Tady nastane chyba
> Either BOF or EOF is True, or the current record has been deleted.
> Requested operation requires a current record.
>
> Je jasne, ze mu vadi, ze ADOQuery je v pozici EOF, ale v predchozi verzi
> MSSQL to nevadilo a vse fungovalo tak jak melo(?). Pomuze umisteni
> ADOQuery1.First nebo podobneho prikazu pred provedeni Close, ale to podle
> mne neni univerzalni reseni.
>
> Dalsi postrehy: stejna chyba nastane i pri pouziti komponenty TADOTable
nebo
> pri pouziti ADO komponent treba s providerem Microsoft.Jet.OLEDB.4.0, coz
> znamena, ze chyba neni v MSSQL, ale asi v ADO OCX, ktere dodava Microsoft
S
> MSSQL2000.

Je to chyba ADOExpress komponentov, ktora sa prejavuje u ADO 2.6 (vola
sa tam CancelUpdate metoda, pritom nic sa neupdatovalo) . Adonis chodi
s ADO 2.6 korektne.

Erik Salaj, WINSOFT


Okno exploreru na formulari

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 30.9.2000 12:03:48

ahoj,

GXexplorer je prece free i se zdrojakama

M.Jirman

----- Original Message -----
From: Ale� Va���ek <vasicek(zv)ecommerce(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, September 29, 2000 9:07 AM
Subject: RE: Okno exploreru na formulari


Ahoj,

je to presne ono, ale neco free by nebylo? :-)

Ales
>
> From: "Leo �t�p�n" <stepan(zv)orbit(tec)cz>
> > mam aplikaci do ktere chci zabudovat v jedne casti formulare standardni
> > Explorer (pruzkumnik). Nechci si vytvaret zadny vlastni spravce
> programu.
>
> Ahoj,
>
> viz nekolik odkazu:
> http://www.gexperts.com/GXExplorer/
> http://www.plasmatech.com/shellctl.htm
> http://www.turbopower.com/products/systools/
>
> Petr Vones, amatersky programator
>
>
>

O.T. velikost exe souboru

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 30.9.2000 12:22:11

29.9.2000 Hurricane napsal:

> Zdravim

>> Autori uvadi, ze komprimovany soubor se pri spusteni rozbaluje do pameti a
>> udajne by to v nekterych pripadech melo byt i rychlejsi.

> Mno, ja mam presne opacne informace. IMHO bych rekl, kdyz se neco rozbaluje
> do pameti a potom se to spusti, tak je to pomalejsi, nez kdyz se to primo
> spusti.

> Hurricane


S tou rychlosti nemusis mit pravdu. Prace s pameti je mnohem rychlejsi
nez nacitani z HDD a jeste k tomu napr. po siti.
Na druhou stranu komprimovane EXE se hodi pouze pro jednoduche
veci, kde je pouze EXE a nic vic.

Jan Fiala

InstalallCz

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 30.9.2000 15:27:42

Nevite nekdo o instalacnim programu v cestine, ktery umi nainstalovat i BDE 5.1. Free ma prednost, ale neco bych za nej klidne dal taky. Diky za tip
Miloslav Neuzil


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


OT: shanim manual k 286

[*] Hurricane <hurricane(zv)email(tec)cz> - 30.9.2000 15:45:17

Zdravim

Omlouvam se za OT, ale shanim manual k notebooku (jestli se ta 10kg vec da
tak nazvat) CAF ProLite 286/16. Nevite nekdo o nejakem miste, kde by se dal
sehnat? Jde mi predevsim o 10 DIPu, ktere jsou na zadni strane, zatim sem
zjistil, ze se jimi zapina klavesnice, graficka, prepina radkovani monitoru,
ale potreboval bych nejaky presnejsi popis. Dost mozna, ze na jinem stroji
to bude podobne.

Diky vsem, kdo poradi

Hurricane


Refresh registru

[*] <bejcek(zv)centrum(tec)cz> - 30.9.2000 17:10:32

Ahoj potreboval bych zase poradit, nevite nekdo jak provedu
refresh registru? Jde mi o to, ze nektere veci mi funguji, nebo
naopak se jich zbavim az po restartu, potreboval bych neco, co by
znovu nacetlo registry, nejakou fkci, taky bych bral nejakej
slusnej pokec o win registrech, kazdou informaci ocenim(bohuzel
jen ustni pochvalou),

predem dekuji

Aldik (Talpa) amater vsech amateru

K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz


Jmeno pocitace na siti

[*] <bejcek(zv)centrum(tec)cz> - 30.9.2000 17:11:37

Jen bych se chtel preptat, protoze me to take zajima, tohle asi
zjisti jmeno
PC na kterem prave uzivatel dela? Mozna je to OT, Ale me by spis
zajimalo
jak zjistim Pocitace pripojene v siti a pouzivajici dany soft,
napr. OFFICE,
da se to nejak jednoduse vysvetlit laikovi, ktery nema ani tuseni
jak to
udelat? Neslo by se nejak propingat? Myslim ze se vraci jmeno PC
a pak nejak
pokracovat, nebo jak na to?
Bodla by i nejaka ukazka, jsem mirne natvrdly a analfabet, tudiz
mi ukazka
rekne vic.
Aldik Pavel alias Talpa Amater vsech Amateru Kral
----- Original Message -----
From: Roman �ev��k <roman(zv)coseto(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, September 08, 2000 9:31 AM
Subject: RE: Jmeno pocitace


> Ja pouzivam toto:
>
> function GetName: string;
> var
> user: PChar;
> l: DWord;
> begin
> l := 1024;
> user := StrAlloc(Succ(l));
> if GetComputerName(User, l) then
> Result := StrPas(user)
> else
> Result := '1';
> StrDispose(User);
> end;
>
>
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
Behalf Of
> Vojtek Jiri
> Sent: Friday, September 08, 2000 7:45 AM
> To: Delphi prispevky
> Subject: Jmeno pocitace
>
>
> Omlouvamse za tak primitivni dotaz, ale potrebuju zjistit jmeno
> pocitace na kterem bezi muj program. Dostal jsem tip, ze na
Torry's Delphi
> Page
> takova komponenta existuje. Nemuzu ji ale najit. Pokud nekdo
vite jak se
> jmenuje
> tak se prosim podelte. Nejlepsi by bylo pokud ji nekdo pouzil a
vi jak
> funguje a posle popis:-) Diky. J. Vojt
>
>


K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz


Rezident

[*] <bejcek(zv)centrum(tec)cz> - 30.9.2000 17:12:36

Ahoj zase neco,

Jak udelam aby se mi neco provedlo po stisku horkych klaves i
kdyz neni dana aplikace aktivni, take bych potreboval tuto
aplikaci schovat doprava do listy!

Je to trivialnost ja vim ale nejak se mi nedari

Moc diky Aldik Pavel (Talpa) amater vsech amateru

K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz


O.T. velikost exe souboru

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 17:19:55

From: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> >> Autori uvadi, ze komprimovany soubor se pri spusteni rozbaluje do pameti
a
> >> udajne by to v nekterych pripadech melo byt i rychlejsi.

Ahoj,

problem je ale prave v tom 'komprimovany soubor', musi se totiz do pameti
rozbalit cely. Pri pouziti normalniho souboru se treba vyuzije jen mala cast
jeho obsahu, takze zbyla cast se vubec nemapuje do pametoveho prostoru.

Petr Vones, amatersky programator

OT: COM Port

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 17:20:37

From: "Ing. Lud�k Florian" <Ludek.Florian(zv)bluerose(tec)cz>
> M��e� sou�asn� odposlouch�vat oba sm�ry. Kdy� tam ty diody nebudou, tak to,

Ale to jen v pripade, ze na nich neprobiha soucasne komunikace v obou smerech.

Petr Vones, amatersky programator


Okno exploreru na formulari

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 17:38:15

From: "Ale� Va���ek" <vasicek(zv)ecommerce(tec)cz>
> je to presne ono, ale neco free by nebylo? :-)

GXExplorer je free pokud vim.

Petr Vones, amatersky programator


O.T. velikost exe souboru

[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 30.9.2000 17:53:36

Caute

Nevravim, ze komprimacia je idealne riesenie, ale jedna vec je na tom celom
pekna:
- pri pouziti napr Asprotect sa stazi desifrovanie exe
- pri jednoduchej komunikacii mozes update posielat mailom (samozrejme nie
vsetkym zakaznikom)
- jednoducha psychologicka finta, ze zmensis velkost exe (na mna to plati)

Ale nevyhod je viac, cize packovanie treba pouzivat VELMI opatrne.
Niektore starsie aniviry (neviem ktore) zevraj rozpoznaju packovany exe ako
virus
a tazko vysvetlis neznamemu zakaznikovi, ze tvoj exe urcite neni zavireny -
to uz je
pomaly o strate dovery.

Patrik

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Jan
Fiala
Sent: Saturday, September 30, 2000 12:22 PM
To: Hurricane
Subject: Re: O.T. velikost exe souboru


29.9.2000 Hurricane napsal:

> Zdravim

>> Autori uvadi, ze komprimovany soubor se pri spusteni rozbaluje do pameti
a
>> udajne by to v nekterych pripadech melo byt i rychlejsi.

> Mno, ja mam presne opacne informace. IMHO bych rekl, kdyz se neco
rozbaluje
> do pameti a potom se to spusti, tak je to pomalejsi, nez kdyz se to primo
> spusti.

> Hurricane


S tou rychlosti nemusis mit pravdu. Prace s pameti je mnohem rychlejsi
nez nacitani z HDD a jeste k tomu napr. po siti.
Na druhou stranu komprimovane EXE se hodi pouze pro jednoduche
veci, kde je pouze EXE a nic vic.

Jan Fiala

InstalallCz

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 30.9.2000 18:11:35

My pouzivame InstallShield Express a update na CZ (uz nevim od koho to bylo,
ale stalo to asi 1400,-). BDE se instaluje uplne v pohode - staci oznacit so
ubory, ktere se maji registrovat.

Milan Tomes

P.S.: Priste prosim pouze plain text


Nevite nekdo o instalacnim programu v cestine, ktery umi nainstalovat i BDE
5.1. Free ma prednost, ale neco bych za nej klidne dal taky. Diky za tip
Miloslav Neuzil


InstalallCz

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 18:23:19

From: "Milan Tome�" <Milan.Tomes(zv)haida(tec)cz>
> My pouzivame InstallShield Express a update na CZ (uz nevim od koho to bylo,
> ale stalo to asi 1400,-). BDE se instaluje uplne v pohode - staci oznacit so

Ahoj,

pokud vim tak to dela Sinea (http://www.sinea(tec)cz/sinea.asp?src=cenik)

Petr Vones, amatersky programator


pamet

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 30.9.2000 18:32:41

Ahoj,
Mel bych jeden odborny dotaz. Potrebuju zkopirovat data z heapu do video pameti, ale nevim jak to udelat, protoze nevim jak Delphi pamet vyuzivaji. Nevite nekdo ?
dekuji
Jan Neuzil


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


pamet

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 18:51:32

From: "MUDr.Neu�il" <drneuzil(zv)razdva(tec)cz>
> Mel bych jeden odborny dotaz. Potrebuju zkopirovat data z heapu do video
pameti,
> ale nevim jak to udelat, protoze nevim jak Delphi pamet vyuzivaji. Nevite
nekdo ?

Ahoj,

toto se spise podoba pristupu v DOSu. Ve Windows nemas pristup k videopameti
(snad jen s vyjimkou DirectX), mas k dispozici pouze klientskou oblast okna.
Pokud mas nejaka specificka data (treba z mericiho pristroje ktera jsou ve
forme bitmapy) tak pouzij TImage nebo TBitmap a TPaintBox ve kterem budes
bitmapu vykreslovat. Je to ono ?

Petr Vones, amatersky programator

Ako umiestnim TPanel na TForm.FormStyle:=fsMDIForm

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 18:54:39

From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> Nieco take ako bolo umiestnenie obrazkov tile na fsMDIForm. ale chcel by som
> tam dat TPanel alebo TGroupBox.

Ahoj,

takze chces umistit nejaky control na plochu MDI formu, ale aby jej bylo mozne
prekryt MDI child oknem ?

Petr Vones, amatersky programator

pristup k objektu pres Handle

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 18:57:14

From: <nosoblat(zv)email(tec)cz>
> existuje prosim nejaky postup jak pristoupit k objektu pres jeho handle.
Jedna
> se mi konkretne o objekt TEdit z jineho okna. Kdyz se pokusim cist jeho
text
> pres API funkci funguje to, ale narazil jsem na jeden Edit, na ktery to
nefungovalo
> a nevratilo mi to nic. Program od Borlandu na sledovani oken WS32 (nevim

Ahoj,

a nebyl ten edit v password rezimu ?

Petr Vones, amatersky programator


Kl�vesnice

[*] Robert Plz�k <rpdap(zv)atlas(tec)cz> - 30.9.2000 18:58:42

Zdravim vsechny profiky.

Potreboval bych pomoci s jednim problemem.
Mam program ukryty v tray, ktery by mel umet sledovat stisknute klavesy
(Win98)
a podle toho provadet nejakou akci. Nevite nekdo jak na to ?
Dekuji predem za kazdou radu.

S uctou
R.Plz�k


jak setridit array of record

[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 30.9.2000 19:45:11

type TZaznam = record
Pole: array [1..10] of string[50];
ID: integer;
end;

var Zaznam: array [1..x] of TZaznam;

...


procedure SeradZaznamy(Klic: integer);
var pZaz: TZaznam;
a: integer;
t: Boolean;

procedure Vymena;
begin
pZaz:=Zaznam[a];
Zaznam[a]:=Zaznam[a+1];
Zaznam[a+1]:=pZaz;
t:=false;
end;

begin
t:=false;
while t=false do begin
t:=true;
for a:=1 to PocetZaznamu-1 do begin
case Smer of
1: if Zaznam[a].Pole[Klic]>Zaznam[a+1].Pole[Klic] then Vymena;
{Seradit VZEstupne}
2: if Zaznam[a].Pole[Klic]<Zaznam[a+1].Pole[Klic] then Vymena;
{Seradit SEstupne}
end;
end;
end;
ShowMessage('Hotovo...');
end;

A muzu Ti poslat i kod na serazeni zaznamu primo v souboru.

Mirek


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


OLE a ruzne verze Excelu

[*] Karel Kral <kral(zv)purus(tec)cz> - 30.9.2000 19:45:49

Dobry den,
potreboval bych poradit, jak zajistit, aby pri ovladani Excelu pres OLE
s pouzitim rozhrani (viz nize) pracovala aplikace dobre s ruznymi
verzemi Excelu.

V Delphi jsou dve type library: Excel97 a Excel2000. Zjistil jsem, ze
kdyz pouziji v uses Excel97, pak vetsina funkci pracuje i na Excelu
2000, ale napr. udalosti OnSheetChange se nevyvolavaji. Jak takovou vec
resite?


uses Excel97;
...

try
XlApp.Connect;
except
MessageDlg('Na tomto po��ta�i nen� nainstalov�n Excel', mtError,
[mbOk], 0);
Exit;
end;
XlApp.Visible[0]:=True;
XlApp.SheetsInNewWorkbook[0]:= 1;
WorkBook:= XlApp.Workbooks.Add(EmptyParam, 0);
XlSheet.ConnectTo(WorkBook.WorkSheets.Item[1] as ExcelWorksheet);
XlSheet.Name:= 'Data';
AddData;
try
XlSheet.Disconnect;
XlApp.Disconnect;
except
end;

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


Vytvoreni Access databaze pomoci Adonis komponent

[*] Martin Falta <martin.falta(zv)atlas(tec)cz> - 30.9.2000 20:33:41

Ahoj,

mam problem se %subj%. Kdyz postupuju podle Adonis FAQ, tak dostanu vzdycky
chybovou hlasku, ze Trida neni registrovana. Jaka trida? Predem diky za
odpoved.

Martin Falta

Win2000, D5Pro SP1, Adonis, ADO 2.5


InstalallCz

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 30.9.2000 21:31:47

Diky, ale ja si nejsem vedom, ze bych zaslal neco jineho? (viz P.S.)
Miloslav Neuzil


> My pouzivame InstallShield Express a update na CZ (uz nevim od koho to
bylo,
> ale stalo to asi 1400,-). BDE se instaluje uplne v pohode - staci oznacit
so
> ubory, ktere se maji registrovat.
>
> Milan Tomes
>
> P.S.: Priste prosim pouze plain text
>
>
> Nevite nekdo o instalacnim programu v cestine, ktery umi nainstalovat i
BDE
> 5.1. Free ma prednost, ale neco bych za nej klidne dal taky. Diky za tip
> Miloslav Neuzil
>


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


pamet

[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 30.9.2000 21:38:27


> > Mel bych jeden odborny dotaz. Potrebuju zkopirovat data z heapu do video
> pameti,
> > ale nevim jak to udelat, protoze nevim jak Delphi pamet vyuzivaji.
Nevite
> nekdo ?
>
> Ahoj,
>
> toto se spise podoba pristupu v DOSu. Ve Windows nemas pristup k
videopameti
> (snad jen s vyjimkou DirectX), mas k dispozici pouze klientskou oblast
okna.
> Pokud mas nejaka specificka data (treba z mericiho pristroje ktera jsou ve
> forme bitmapy) tak pouzij TImage nebo TBitmap a TPaintBox ve kterem budes
> bitmapu vykreslovat. Je to ono ?
>
> Petr Vones, amatersky programator
>
> Jo, dik.
>


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


Rezident

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.2000 22:03:37

From: <bejcek(zv)centrum(tec)cz>
> Jak udelam aby se mi neco provedlo po stisku horkych klaves i
> kdyz neni dana aplikace aktivni, take bych potreboval tuto

http://www.delphi(tec)cz/soubor.asp?rok=2000&mesic=mar&den=02&soubor=dlfaaacw.htm

Petr Vones, amatersky programator


Tlist a tridici fce

[*] thf1 <thf1(zv)intrastore.cdc(tec)com> - 30.9.2000 22:17:53

Ahoj, poradte jak napsat tridici fci pro tlist.sort. Hledal jsem v konferenc
i, ale asi jsem slepej. Napiste mi prosim nekdo kde je priklad. Dik. T.

CD-ROM

[*] Marek Barbo��k <marek.barborik(zv)worldonline(tec)cz> - 30.9.2000 22:49:07

Moc se omlouvam za to potvrzovani o prectemi.
Diky vsem za pomoc.
Marr Barr

**Nev�, kde bych sehnal InstallShield z Delphi 5 co nejlevneji, nebo nev�
o programu, kter� um� nainstalovat BDE verzi 5.1?
S pozdravem
MUDr. Miloslav Neu�il

-Opravdu nevim, pouzivam stale Delphi 3 :-)
Marr Barr

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

OT: COM Port

[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 30.9.2000 23:08:48

Bude-ly, ale full-duplex komunikace, tak bude mit chaos ten odposlech
:-))...
Mimo jine, napeti za D bude pouze max. +12V a do zaporna to nepoleze.. Viz
charakteristika diod...
Je mozne, ze ten odposlech v pripade nepritomnosti napeti (obe diody
uzavreny) to vyhodnoti jako -12V, ale lze tomu verit?

S pozdravem
Zdenek

----- Original Message -----
From: Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, September 30, 2000 5:56 AM
Subject: Re: OT: COM Port


Nazd�rek,

>
> a k cemu jsou tam ty diody ? RS232 je puvodne +/-12V, takze by to melo byt
> zapojeno primo.

M��e� sou�asn� odposlouch�vat oba sm�ry. Kdy� tam ty diody nebudou, tak to,
co ti p�ijde od jednoho sm�ru, se vr�t� p�es sp�na�e i do druh�ho sm�ru a
nastane chaos. T�mto m� zaru�eno, �e se to nestane.

Bye Ludan


OT: COM Port

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

From: "Zdenek Janish" <medusa(zv)brajan(tec)cz>
> Bude-ly, ale full-duplex komunikace, tak bude mit chaos ten odposlech
> :-))...

Prave ;-)

> Je mozne, ze ten odposlech v pripade nepritomnosti napeti (obe diody
> uzavreny) to vyhodnoti jako -12V, ale lze tomu verit?

Nove prijimace RS232 (tusim od 16450) lze pouzit i na RS423, tedy staci +5V
jako '1' a 0V jako '0'.

Petr Vones, amatersky programator

Tlist a tridici fce

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 1.10.2000 00:33:54

> Ahoj, poradte jak napsat tridici fci pro tlist.sort. Hledal jsem v
konferenc
> i, ale asi jsem slepej. Napiste mi prosim nekdo kde je priklad. Dik. T.

Treba takto:

function TestCompare(Item1, Item2: Pointer): Integer;
begin
if TNejakyTypPtr(Item1)^ = TNejakyTypPtr(Item2)^ then
Result := 0
else

if TNejakyTypPtr(Item1)^ < TNejakyTypPtr(Item2)^ then
Result := -1
else
Result := 1
end;

pak uz staci pouze
MujList.Sort(TestCompare);

Samozrejme implementace trideni zavisi hlavne na tom, jake ukazatele jsou v
TListu ulozene (objekty nebo pouze ukazatele na data)...

Tomas

O.T. velikost exe souboru

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 1.10.2000 01:01:15



> Zdravim
>
> > Autori uvadi, ze komprimovany soubor se pri spusteni rozbaluje do pameti a
> > udajne by to v nekterych pripadech melo byt i rychlejsi.
>
> Mno, ja mam presne opacne informace. IMHO bych rekl, kdyz se neco rozbaluje
> do pameti a potom se to spusti, tak je to pomalejsi, nez kdyz se to primo
> spusti.

Predstav si aplikaci, ktera ma v EXEkaci spoustu bitmap, textu ci neceho podobne
dobre komprimovatelneho, v idelanim pripade bys pak nacital min. 10x mene dat z
disku, nez ktere by si rozbaloval do pameti...

Roman

OT: on-line aktualizace menove casti prevodniku fr

[*] Adam Feistner <feistna(zv)volny(tec)cz> - 1.10.2000 06:09:41

Zdravim,

soucasti me free kalkulacky bude i rychly prevodnik ruznych jednotek, men, atd. V ramci men by bylo vyborne, kdyby jejich
kurzy byly aktualni, cehoz lze dosahnout on-line aktualizaci. Zde bych vydel tato reseni:

kalkulacka pri startu nacte data ze souboru, ktery bude vytvoren pomoci
- nejakeho free programu, ktery doporucim v napovede kalkulacky (implementovat lze i spolupraci s vice programy)
- sveho programu, ktery bude vyuzivat nejakou dll nebo komponentu a ktery stahne pouze data, ktera si uzivatel zvoli v
kalkulacce

V oblasti on-line aktualizace kurzovniho listku se nevyznam a uvitam tak jakekoli nasmerovani ci doporuceni free dll /
komponenty / programu. Hadam, ze se bude jednat o analogii k vyuziti timeserveru. Pokud mate nejake propominky jako potencialni
budouci uzivatele, rad si je prectu. Diky

Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm

Trideni CH v Interbase

[*] Delphi <delphi(zv)aitix(tec)cz> - 1.10.2000 08:03:33

Ahoj,

Dva dotaz k Interbase (cili lehce off-topic):
z vlastnich testu i prispevku v archivu jsem overil, ze IB 6 netridi
korektne cesky, presneji ze nezatridi CH mezi H a I.
Je to dost problem pri nasazeni v IS, jak to resite vy?

A z podobneho soudku:
chci-li vicejazycnou verzi (treba) katalogu mam asi dve moznosti:
mohu bud pro kazdy jazyk stanovit samostatny sloupec (tabulku, databazi) a
pridelit mu charset (a collate).
Cistsi reseni se mi zda pouzit Unicode resp. charset UNICODE_FSS.
Tam dam cestinu, rustinu nemcinu, spanelstinu a mam to obecne rozsiritelne
pomoci dalsi polozky urcujici charset.
Jenze to nejde tridit jinak nez Unicodove coz je zase problem.

Zajistit nejak
SELECT polozka (charset UNICODE) FROM katalog
WHERE jazyk="CZ"
ORDER BY polozka COLLATE PXW_CSY
asi nejde?

Diky
Leos


InstalallCz

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 1.10.2000 08:58:06

Staci si pouzit standardni InstallShield Expressa od Sinei ( www.sinea(tec)cz)
si koupit lokalizovane knihovny (za pakatel).

Pekny den a pilotum stastne pristani ...
============================
ML Software - Martin Lasevie
Budovatelska 459
708 00 Ostrava-Poruba
tel., fax.: +420 ( 69) 691 85 11
mobil : +420 (603) 338 765
OK2 CLM
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
============================
-----Puvodni zprava-----
Od: MUDr.Neu?il [SMTP:drneuzil(zv)razdva(tec)cz]
Odeslano: 30. zaoi 2000 15:28
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: InstalallCz

Nevite nekdo o instalacnim programu v cestine, ktery umi nainstalovat i BDE
5.1. Free ma prednost, ale neco bych za nej klidne dal taky. Diky za tip
Miloslav Neuzil


---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virova baze: 93 - datum vydani: 19.9.2000
<<Soubor: ATT00001.html>>

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