Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Soubory pot�ebn� ke sput�n� aplikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.3.2000 00:54:13
From: Marek Soukup <marek(zv)comberg(tec)cz>
> Existuje program Dependency Walker, kterej vypisuje u dll a exe soubory
> dalsi zavislosti. Mozna by stalo za to se na nej mrknout, je to myslim nekde
> na MS strankach.
Ahoj,
Podobna aplikace se da udelat i v Delphi. Problem je, ze takto zjistis jen
staticky linkovane DLL. Knihovny ale muzou byt linkovany i dynamicky, navic
dana aplikace muze pouzivat COM objekty apod. Zkratka jediny spolehlivy
zpusob je vycist to z dokumentace.
Petr Vones, amatersky programator
Odstreleni aplikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.3.2000 00:54:26
From: Hurricane <hurricane(zv)iol(tec)cz>
> Tusim, ze se to tady uz probiralo, ale nepotreboval sem to a tak sem to
> nesledoval. delam CD Player a potrebuju osetrit vicenasobny spusteni.
Ahoj,
podivej se tady:
http://ww6.borland.com/codecentral/ccweb.exe/listing?id=13315
Petr Vones, amatersky programator
IB: Error reading data from the connection. - Upre
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.3.2000 01:46:40
Zdravim.
Mam dve PC s konfiguraciou:
PC 1: AMD K6-2 300, 128 MB Ram,... Windows 98 Pan, TCP/IP spojenie
PC 2: Pentium 166 MMX, 32 MB Ram,... Windows 98 SK SE, TCP/IP spojenie
(skusal som aj Win95 CZ OSR 2)
Kabel FTP(category 5} zapojeny ako twisted pair na spojenie.
PC1 ma instalovany IB 5.6 Server( skuska som aj 6 a to iste), ale... Ak sa
pripojim z PC 2 na tabulku na
serveri trochu vacsiu (konkretne 6800 records), tak mi vypisuje "Error
reading data from the connection".
Ale.. ak ich vymenim medzi sebou (PC2 is server) tak sa chyba neobjavi.
Co s tym ?
PS: Uz som dostal info ze sa to aj inemu stavalo, ked mal kable blizko
napajania vysoko odberoveho zariadenia, ale ja tam mam zapojene blizko el.
zasuvky len tieto dve PC. Skusal som aj RG 58 kabel, koli lepsiemu
odruseniu, ale nic sa nezmenilo.
Moj log na serveri je:
----------------------------------------------------------------------------
---------------------------------------
1 (Client) Mon Mar 27 23:31:55 2000
Guardian starting: C:\Program Files\Borland\InterBase\bin\ibserver.exe
1 (Server) Mon Mar 27 23:38:47 2000
INET/inet_error: send errno = 10054
1 (Server) Tue Mar 28 00:12:34 2000
INET/inet_error: read errno = 10054
1 (Server) Tue Mar 28 00:12:38 2000
INET/inet_error: read errno = 10054
1 (Server) Tue Mar 28 00:12:39 2000
INET/inet_error: read errno = 10054
1 (Server) Tue Mar 28 00:12:39 2000
INET/inet_error: read errno = 10054
1 (Server) Tue Mar 28 00:12:39 2000
INET/inet_error: read errno = 10054
1 (Server) Tue Mar 28 00:35:46 2000
INET/inet_error: send errno = 10054
1 (Server) Tue Mar 28 00:35:46 2000
INET/inet_error: read errno = 10038
1 (Client) Tue Mar 28 00:39:14 2000
Guardian starting: C:\Program Files\Borland\InterBase\bin\ibserver.exe
1 (Server) Tue Mar 28 00:58:13 2000
INET/inet_error: send errno = 10054
1 (Server) Tue Mar 28 00:58:14 2000
INET/inet_error: read errno = 10038
----------------------------------------------------------------------------
---------------------------------------
Hi. Roland.
IB 5.6 to IB 6 beta
[*] J�n Tungli - 28.3.2000 07:12:19
Ja som instaloval IB6 beta pre Windows NT ale potom mi prestal fungovat
IB5.0.
Ani databazu som nevedel urobit pod IB6 pomocou ISQL.
Moj postup bol:
ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
Username: USERNAME
Password: password
Default Character set WIN1250
Skusal som aj takto:
ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
Username: SYSDBA
Password: masterkey
Default Character set WIN1250
Kde je zrada?
J�n TUNGLI , Datapac. s.r.o.
Email: tungli(zv)datapac.sk
tel: 07 / 5565096 -8 kl.102, 07/55410372
fax: 07 / 55410384
----- Original Message -----
From: Lu�ek Tenkr�t <tenkrat(zv)mvcr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, March 27, 2000 3:10 PM
Subject: Re: IB 5.6 to IB 6 beta
> >Prechod na IB 6 by mel by bez problemu (zkousel jsem obnovit DB
> >z IB 5.6 a bylo to bez problemu), co se tyka prepisovani aplikaci,
> >zde by melo stacit pouze nastavit verzi.
>
> Take jsem zkousel a fungovalo to.
>
> P.S. Nemate nekdo zkusenost s UDF? Mam funkci vracejici retezec. S IB 5.6
mi
> Delphi udelaji TStringField delky 11, s IB 6 TStringField delky 12 (v
> databazi je navratova hodnota jako CSTRING(12) ). Je to moje chyba nebo
> nekde jinde?
>
> S pozdravem
> Honza Seifert
>MIDAS po�adavky
[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 28.3.2000 07:23:51
Ahoj
Potreboval bych zjistit jake naroky ma MIDAS na systemove prostredky pro
aplikacni server. Zajimalo by me jestli nemate nekdo zkusenosti s realnou
aplikaci ktera vyuziva MIDAS pod D5 Enterprise. Jake ma naroky na pamet
serveru v zavislosti na velikosti prenasenych dat, poctu aktualne
pripojenych uzivatelu (resp. poctu connections). Pouzivam MIDAs pres TCP/IP
(TSocketConnections, SocketServer). Mozna by to zajimalo i ostatni. Predem
dekuji tem kteri se podeli o sve zkusenosti.
Jaromir Cermak
Komponenta pro WML
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 28.3.2000 07:42:03
> From: Ale? Va?��ek <vasicek(zv)ecommerce(tec)cz>
> > nevite nekdo o nejake komponente, ktera umi zobrazit WML (WAP)?
> > [Asi chci moc, ze :-)]
> > Staci mi i nejake linky, kde bych mohl najit nejake informace.
Mrkni na http://www.waptop(tec)cz/waptor. Tam uvidis hotove reseni.
==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
==============================================
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
Kopirovanie otvoreneho suboru v inej aplikaciii
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 28.3.2000 08:02:43
Ahoj,
coz zkusit nastavit sdileni pro cteni?
FileMode:=OF_SHARE_DENY_WRITE;
Jaro B.
P.S. V D2 to nejak nefungovalo dobre (ale existuje aktualizace SYSTEM.TPU).
> -----P�vodn� zpr�va-----
> Od: kinekus [SMTP:kinekus(zv)nextra.sk]
> Odesl�no: 27. III 2000 6:54
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Kopirovanie otvoreneho suboru v inej aplikaciii
>
> Zdravim,
>
> kto by mi vedel poradit ako pri kopirovani suboru prekopirovat subor,
> ktory je otvoreny v inej aplikacii. Ked pouzijem CopyFile, ide to len
> vtedy, ked kopirovany subor je volny.
> Dakujem Mr.IB 5.6 to IB 6 beta
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 28.3.2000 08:47:23
Problem bude asi ve WIN1250. Ja jsem vcera dal IB6 na Linux (RedHat6 -
Hedwig) a nesla mi udelat databaze s WIN1250 (z W98 pres ISQL). Kdyz
jsem vynechal WIN1250, tak databaze byla vytvorena, ale po napumpovani
testovacich dat, kde je pouzita cestina, ta tabulka v databazi nesla
otevrit. Takze je to mozna tim. Nebo ma nekdo jiny nazor (a reseni) ?
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: J�n Tungli [SMTP:tungli(zv)datapac.sk]
>
> Ja som instaloval IB6 beta pre Windows NT ale potom mi prestal
> fungovat
> IB5.0.
> Ani databazu som nevedel urobit pod IB6 pomocou ISQL.
> Moj postup bol:
> ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
> Username: USERNAME
> Password: password
> Default Character set
> WIN1250
>
> Skusal som aj takto:
> ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
> Username: SYSDBA
> Password: masterkey
> Default Character set
> WIN1250
>
> Kde je zrada?
>
> IB a Numeric a Decimal
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 28.3.2000 09:02:23
Precetl jsem si navod a stale nechapu rozdil mezi numeric a
decimal. Muzete mi to nekdo tupci vysvetlit.
Dekuji.
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
TEXT parameter v CREATE PROCEDURE
[*] Marian Hatala <emha(zv)mailbox.sk> - 28.3.2000 08:04:35
D4, MS SQL 7, W98
Zdravicko.
Neviem si poradit s jednym problemom. Potreboval by som ako vystupny
parameter ulozenej procedury preniest parameter type TEXT. Neviem vsak
akym sposobom je mozne do takehoto parametra zapisat nejaku hodnotu.
Skusal som
UPDATETEXT NazovProcedury.[(zv)NazovParametra]
(zv)PtrTxt
NULL
NULL
'pokusny text'
Takyto zapis je sice syntakticky spravny, ale pri vyvolani procedury
dostanem chybu, ze objekt "NazovProcedury" je neznamy.
Ked som skusil iba nazov premennej tak to nepreslo ani syntakticky -
zrejme je tam natvrdo kontrola na existenciu tabulky
(zv)PtrTxt je pointer na textovy parameter (zv)NazovParametra ziskany
funkciou PTRTEXT
Podla SQL BOL je parameter typu TEXT pre proceduru mozny, nikde som
vsak nenasiel priklad ako sa to da spravit.
Skusal ste niekto take nieco take, neviete ako by slo urobit ? eMHa
emha(zv)mailbox.sk
Clipboard...
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 28.3.2000 09:06:37
Nebo takhle:
if Form1.ActiveControl is TEdit
then (Form1.ActiveControl as TEdit).CopyToClipboard;
Dobra.
> ----------
> Od: p. Jirman[SMTP:jim.design(zv)iol(tec)cz]
>
> tak projed pole komponent editu a zjisti kterej ma neco oznaceno
>
> for I:=0 to form1.ComponentCount - 1 do
> if form1.Components[I] is TEdit then
> if (form1.Components[I] as TEdit).Sellength <> '' then
> clipboard.AsText:=(form1.Components[i]asTEdit).Seltext;
>
> ...nebo tak nejak
>
> M.Jirman
>
>
> From: Robert Zak <nrsys(zv)psn.sk>
>
>
> co ale vtedy ak neviem v ktorom z tych editov je ten text selectnuty ? Ide
> mi o to aby som mal z menu v zalozke edit moznost Cut, Copy a Paste.
>
> ENTER a ESC na TEdit
[*] Petr Fischer <petr.fischer.dk(zv)email(tec)cz> - 28.3.2000 09:23:34
No jo, ale jak v OnKeyPress eventuelne otestuju klavesy Shift, Alt a Ctrl
(ShiftState, ktery je v OnKeyDown)???
Petr Fischer
E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
> Zkus to udelat v OnKeyPress,
> ale dej tam Key:=#0
> Dobra.
> > ----------
> > Od: Petr Fischer[SMTP:petr.fischer.dk(zv)email(tec)cz]
> >
> > mam na TEdit.OnKeyDown toto:
> >
> > if Key in [VK_ENTER, VK_ESC] then
> > begin
> > Key := 0;
> > // a nejaka dalsi akce
> > end;
> >
> > klavesy zareaguji, to je OK, ale vzdy po stisku Enter nebo Esc se ozve
> > pipnuti. Proc?
> >
> >
Form image
[*] Petr Fischer <petr.fischer.dk(zv)email(tec)cz> - 28.3.2000 09:29:10
Zdravim,
jsem schopen dostat do TBitmap obsach formulare (celeho formulare, vcetne
titulku), jeste predtim, nez ho zobrazim (jeste kdyz je Visible = False)? I
kdyz je formular zobrazen (Visible = True) a jeho kus je mimo obrazovku,
funkce BitBlt a ji podobne presunou do bitmapy stejne jen tu viditelnou cast
a ne cely obsah formu? Jak na to? Za kazdou radu a inspiraci dik.
Petr Fischer
E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
Dependency Walker
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 28.3.2000 09:31:21
Ahoj,
koukal jsem na MS stranky na Dependecy Walker, ale pro jeho
stazeni je treba byt clenem cehosi. Nemam cas to te studovat:
muzete mi prosim nekdo sdelit podminky, za nichz lze tento
program ziskat nebo - pokud je free - mi ho poslat na privatni mail?
Dik moc.
Lebeda(zv)comarr(tec)cz
IB 5.6 to IB 6 beta
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 28.3.2000 09:33:41
[Slavomir Skopalik]
Po instalaci skutecne prestane fungovat stara verze (a nepomuze ani odnistalovat novou),
Na vytvareni DB by mela slouzit IBConsole, ale ta je zatim prolezla chybamy (instaloval jsem
do jineho, nez defaultniho adresare).
Ale vytvorit DB z backupu se mi podarilo snadno, horsi to bylo z pripojenim se na DB
(Nejaka chyba ve stylu List Index out of bounds).
Dale nefungoval korektne replikator (hledal cosi v defautnim adresari, kde byla stara verze).
Jakou chybu to hlasilo tobe ?
Slavek
PS: Pro opetovne pouzivani IB 5.6 jsem musel vsechno odinstalovat a smazat vsechny
soubory. Pak znovu nainstalovat.
PS2: Jako jmeno a heslo jsem pouzival SYSDBA a masterkey a fungovalo.
Ja som instaloval IB6 beta pre Windows NT ale potom mi prestal fungovat
IB5.0.
Ani databazu som nevedel urobit pod IB6 pomocou ISQL.
Moj postup bol:
ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
Username: USERNAME
Password: password
Default Character set WIN1250
Skusal som aj takto:
ISQL > Create database > Server: C:\ISMOW\ISMOW.GDB
Username: SYSDBA
Password: masterkey
Default Character set WIN1250
Kde je zrada?
ENTER a ESC na TEdit
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 28.3.2000 09:58:09
To preci muzes testovat i nadale v OnKeyDown,
v OnKePress testuj jen ten Enter/Escape
(+ pripadne nejaky priznak, nastavovany
v OnKeDown, ...)
Dobra.
> ----------
> Od: Petr Fischer[SMTP:petr.fischer.dk(zv)email(tec)cz]
>
> No jo, ale jak v OnKeyPress eventuelne otestuju klavesy Shift, Alt a Ctrl
> (ShiftState, ktery je v OnKeyDown)???
>
> > Zkus to udelat v OnKeyPress,
> > ale dej tam Key:=#0
>
> > > ----------
> > > Od: Petr Fischer[SMTP:petr.fischer.dk(zv)email(tec)cz]
> > >
> > > mam na TEdit.OnKeyDown toto:
> > >
> > > if Key in [VK_ENTER, VK_ESC] then
> > > begin
> > > Key := 0;
> > > // a nejaka dalsi akce
> > > end;
> > >
> > > klavesy zareaguji, to je OK, ale vzdy po stisku Enter nebo Esc se ozve
> > > pipnuti. Proc?
> > >
> > >
>
>
>
>
>
> Komponenta NMPOP3 a vlastnost host pri pripojovani
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 28.3.2000 11:39:17
> -----P�vodn� zpr�va-----
> Od: Petr Ku�era [mailto:kucera(zv)vri(tec)cz]
> Odesl�no: 28. b�ezna 2000 11:43
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Komponenta NMPOP3 a vlastnost host pri pripojovani
> na volny(tec)cz
>
>
> Dobry den,
>
> ja bych si chtel napsat takovy jednoduchy programek na
> stahovani posty z volny(tec)cz. Zkousel jsem jej na jinym postovnim
> serveru, kde fungoval celkem spravne. Pak jsem se zkusil pripojit na
> volny(tec)cz. Vlastnost host jsem nastavil na volny(tec)cz, UserID na moje
> prihlasovaci jmeno a Password na moje prihlasovaci heslo. Pak jsem se
> zkusil pripojit a po chvili mi program zobrazil chybovou hlasku:
Tu komponentu pouzivat neumim, ale nemela by byt adresa nahodou
pop3.volny(tec)cz?
Jura
Nastaveni fontu
[*] garalda <garalda(zv)mail(tec)cz> - 28.3.2000 11:40:53
Ahoj,
Nezkouseli jste nekdo nastavovat font u Hintu?
Mam napsanou aplikaci, kterou kdyz spustim pod Anglickymi Win, tak ma
domrsenou cestinu. Pridal jsem moznost nastaveni typu fontu pro jednotlive
komponenty - Label, Memo, Edit... Lze ale nastavit font i pro Hinty ev
hlavicky Formulare?
Diky
Komponenta NMPOP3 a vlastnost host pri pripojovani
[*] Petr Ku�era <kucera(zv)vri(tec)cz> - 28.3.2000 10:43:29
Dobry den,
ja bych si chtel napsat takovy jednoduchy programek na
stahovani posty z volny(tec)cz. Zkousel jsem jej na jinym postovnim
serveru, kde fungoval celkem spravne. Pak jsem se zkusil pripojit na
volny(tec)cz. Vlastnost host jsem nastavil na volny(tec)cz, UserID na moje
prihlasovaci jmeno a Password na moje prihlasovaci heslo. Pak jsem se
zkusil pripojit a po chvili mi program zobrazil chybovou hlasku:
Null Remote adress
Prosim Vas, nevite nekdo nahodou, kde delam chybu? Kdyz jsem
tam mel jineho hosta, tak vse bylo v poradku.
Dekuji.
Petr Kucera
Komponenta NMPOP3 a vlastnost host pri pripojovani
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 28.3.2000 11:48:36
Pouzij pop3.volny(tec)cz (pri predavani na server
smtp.volny(tec)cz)
Dobra.
> ----------
> Od: Petr Ku> �era[SMTP:kucera(zv)vri(tec)cz]
>
> ja bych si chtel napsat takovy jednoduchy programek na
> stahovani posty z volny(tec)cz. Zkousel jsem jej na jinym postovnim
> serveru, kde fungoval celkem spravne. Pak jsem se zkusil pripojit na
> volny(tec)cz. Vlastnost host jsem nastavil na volny(tec)cz, UserID na moje
> prihlasovaci jmeno a Password na moje prihlasovaci heslo. Pak jsem se
> zkusil pripojit a po chvili mi program zobrazil chybovou hlasku:
> Seznam MS-SQL serveru
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 28.3.2000 11:49:00
> > Nev�te jak ziskat seznam MS-SQL serveru v siti?
>
> Je na to funkce NetServerEnum.
> Parametrem servertype nastav na SV_TYPE_SQLSERVER.
> Vice informaci najdes v MS SDK.
Ahoj,
jak ale vyresit nasledujici problemy?
1) Jak zjistit seznam SQL serveru ze stroje s W95 (W98)?
2) V jake to je unite?
3) V pripade prebytku casu - sel by poslat kratky usek kodu, jak
se to pouziva?
Diky,
David
Jak udelat: Nacteni dotazu a editace vysledku jen
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 28.3.2000 11:52:06
On 27 Mar 00, at 22:37, Ladislav Nagy wrote:
> > > Mimochodem, jak funguje predavani Rowsetu pres DCOM?
> >
> > Nerozumim otazce. I v OLE DB mas moznost nastavit si klientsky
> > nebo serverovsky kursor. Co se deje uvnitr vsak nevim.
>
> Myslim u trivrstve architektury. Middle vrstva ziska data se serveru
> (=Rowset) a ten potrebuji predat na klientskou vrstvu. Mysl, ze pri
> praci s OleDB si clovek musi RecordSet zabalit, poslat a rozbalit sam,
> coz uz nelze rozbalit do Rowsetu, ale data musi nacist do nejakeho
> objektu, jako je Tvuj Grid.
Mno, u vicevrstveho architektury mam smisene pocity. Napriklad
idea tlusteho serveru a tenkych klientu se mi dvakrat nezamlouva.
Pokud se vetsina zateze necha na serveru, pak lze za urcitych
okolnosti snadno pretizit i velmi vykonny stroj. Tato idea muze byt
vhodna pro web, kde je treba maximalne setrit na prenosech dat,
ale ve firemni siti bych naopak radeji zatizil klienty a ulevil serveru.
Zde mas tedy na vyber - muzes pouzit RDS spolu s ADO, nebo si
to pomoci OLE DB udelat uplne po svem - tedy usit na miru. Coz
muze i znamenat, ze velky balik na serveru zkomprimujes, posles
klientu, ktery si ho rozbali. :-)
> > :-) Neni pak prece jen vyhodnejsi nalit data do nejakeho pole a pak
> > pracovat jen s tim polem? Je s tim sice vic rucni prace, ale
> > uzivatele ti nevymrou na nudu.
>
> Veril jsem, ze nejaky Zbysek nebo Erik rekne "to je preci jednoduchy
> ..." :-)).
Tvuj sen se splnil. :-))
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
Komponenta NMPOP3 a vlastnost host pri pripojovani
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 28.3.2000 12:34:13
Nevim presne ale tuto chybu mi to hlasilo kdyz se nepodarilo
pripojit k internetu
> Dobry den,
>
> ja bych si chtel napsat takovy jednoduchy programek na
> stahovani posty z volny(tec)cz. Zkousel jsem jej na jinym postovnim
> serveru, kde fungoval celkem spravne. Pak jsem se zkusil pripojit na
> volny(tec)cz. Vlastnost host jsem nastavil na volny(tec)cz, UserID na moje
> prihlasovaci jmeno a Password na moje prihlasovaci heslo. Pak jsem se
> zkusil pripojit a po chvili mi program zobrazil chybovou hlasku:
>
> Null Remote adress
>
> Prosim Vas, nevite nekdo nahodou, kde delam chybu? Kdyz jsem
> tam mel jineho hosta, tak vse bylo v poradku.
>
> Dekuji.
>
> Petr Kucera
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
IB a Numeric a Decimal
[*] Pavel Cisar \(Inprise CZ\) <pcb(zv)atlas(tec)cz> - 28.3.2000 12:40:07
Haj hou!
U InterBase je rozdil mezi SQL datovymi typy NUMERIC a DECIMAL pouze v
internim ulozeni. Interni ulozeni si urcuje server sam podle hodnot
precision (celkovy pocet cislic) a scale (pocet desetinych cisel). Tabulka
prevodu je nasledujici:
NUMERIC -> INTEGER
NUMERIC(4) -> SMALLINT
NUMERIC(9) -> INTEGER
NUMERIC(10) -> DOUBLE PRECISION
NUMERIC(4,2) -> SMALLINT
NUMERIC(9,3) -> INTEGER
NUMERIC(10,4) -> DOUBLE PRECISION
DECIMAL -> INTEGER
DECIMAL(4) -> INTEGER
DECIMAL(9) -> INTEGER
DECIMAL(10) -> DOUBLE PRECISION
DECIMAL(4,2) -> INTEGER
DECIMAL(9,3) -> INTEGER
DECIMAL(10,4) -> DOUBLE PRECISION
Lidove receno, bez specifikace je to vzdy INTEGER. Pri rozahu mensim nez 5
je NUMERIC ulozen jako SMALLINT. Pri rozsahu 10 a vetsim se ztraci presna
kontrola nad celkovym poctem cislic i poctem desetinych cisel (ulozeno jako
DOUBLE PRECISION a provadi se prepocet z exp. tvaru) u obou typu, proto se
prilis nedoporucuje definovat cisla s vetsim poctem cislic u polozek, nad
kterymi je provaden vypocet (SUM apod.) protoze nemusi byt zcela presny. IB
6.0 by tento problem mela resit protoze podporuje INT64.
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
From: "Radek KALA" <Kala(zv)atlas(tec)cz>> Precetl jsem si navod a stale nechapu rozdil mezi numeric a
> decimal. Muzete mi to nekdo tupci vysvetlit.
StringGrid
[*] Ondrej Slama <slama(zv)internet(tec)cz> - 28.3.2000 13:20:58
Ahojda vsici,
potreboval bych poradit s TStringGrid.
Ve stringGridu mam seznam polozek, ktery je delsi
nez vyska okna StringGridu. Kdyz provadim search
v bunkach stringgridu a vysledek je TRUE tak radek obsahujici
text SELEKTUJU. Ovsem posuvnik se neposune aby byl selektovanej radek vydet.
Prozatim sem neprisel na to jak list donutit aby se posunul na urcitou
polozku.
Muzete mi nekdo pomoct.
Dik
Memo s moznostou "Highlighting syntax"
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 28.3.2000 13:49:01
Ahoj!
Moze mi prosim niekto z vas doporucit na zaklade osobnych skusenorti nejaku
komponentu %subj% ?
btw:Ak je to mozne tak aj presnu adresu, pripadne mi to mozete zaslat na
mail. Diky!
Pavol Kaka�ka
paka(zv)aktis(tec)cz
Memo s moznostou "Highlighting syntax"
[*] Pavel Polak <pavelp(zv)bnsoft(tec)cz> - 28.3.2000 14:37:02
Zdravim!
No podle me je docela dobry mwEdit (http://17slon.com/gp/mw/mwedit.htm) a to
proto ze umi hodne typu syntaxe - nemusi se nic psat dalsiho , ma neomezenou
velikost editovaneho textu a hlavne je zadarmo
S pozdravem
Pavel Polak - pavelp(zv)bnsoft(tec)cz
---------------------------------------------------
Golden HTML Editor - www.oknet(tec)cz/lide/pavelp/ghe
> Ahoj!
>
> Moze mi prosim niekto z vas doporucit na zaklade osobnych skusenorti
nejaku
> komponentu %subj% ?
>
> btw:Ak je to mozne tak aj presnu adresu, pripadne mi to mozete zaslat na
> mail. Diky!
>
> Pavol Kaka�ka
> paka(zv)aktis(tec)cz
Seznam MS-SQL serveru
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 28.3.2000 14:42:38
> > Nev�te jak ziskat seznam MS-SQL serveru v siti?
>
> Je na to funkce NetServerEnum.
> Parametrem servertype nastav na SV_TYPE_SQLSERVER.
> Vice informaci najdes v MS SDK.
Jukni se na http://www.jgsoftware.com/nt.htm
a stahni si napriklad soubor lanman.zip
Daniel
pouzitie TFileStream v D4
[*] Miroslav <miroslav(zv)pobox.sk> - 28.3.2000 15:44:00
Mam taky zaciatocnicky problem: Ako ukladat objekty do suboru cez filestream.
Mohli by ste napisat aj daky jednoduchy kod na Load a Save. A este jedna otazka: da sa do jedneho suboru ulozit viac typov objektov v lubovolnom poradi(A,B,B,A,B,...)?
Dik
Miro
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Divny Hook...
[*] Majo Petrik <zajodelphi(zv)hotmail(tec)com> - 28.3.2000 13:58:18 gmt
Zdravim!
Neviete niekto ci sa da nejako vytvorit
(najlepsie globalny) hook, ktory by zaznamenaval
zapis a citanie na/z disku(aj by urcil subor),a zapis
a citanie z registrov????
Mnohokrat dakujem...
Majo Petrik
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
OT: Nabidka prace
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 28.3.2000 16:00:29
Omlouvam se za off-topic, ale pokud ma nekdo zajem, tak se ozvete.
Hledame programatora v Delphi 5 pro vyvoj databazovych aplikaci
(client-server i DBFa MDB). Znalost problematiky programovani ActiveX,
ISAPI, FTP klientu, mail klientu a dalsich veci kolem Internetu vitany.
Na hlavni pracovni pomer. Nastup co nejdrive. Protoze je ale potreba na
jednom projektu zacit co nejdrive, v pripade, ze byste nemohli nastoupit
behem dubna, uvitali bychom do doby nastupu na HPP alespon externi
spolupraci.
Dalsi podminky, pozadavky sdelim osobne e-mailem.
Nepiste do konference, ale primo na mou adresu.
================================
Ing. Petr Slovak
e-mail: petr(zv)trilog(tec)cz
url: http://www.trilog(tec)cz
tel: 0603 / 501 642
SMS: +420603501642(zv)sms.paegas(tec)cz
================================
Kopirovanie otvoreneho suboru v inej aplikaciii
[*] Pavel �ern� - 28.3.2000 16:06:21
Ahoj,
tady jde o sluzby systemu. Pokud ma nekdo jiny otevreny soubor,
zalezi na tom, v jakem modu. Pokud v modu sdilenem ( aspon pro
cteni ), tak mam sanci to otevrit a neco s tim delat (treba obsah
"presypat" nekam jinam). Pokud to ma nekdo otevreno
zcela exclusiv, pak podle mne maji vsichni ostatni smulu.
Pavel �ern�
email: pavel(zv)cerny-ps(tec)cz
tel: 0616/25268
>>> "p. Jirman" <jim.design(zv)iol(tec)cz> 27.3.2000 23:29:40 >>>
ahoj,
zkousel jsi i prikladek v Delphi Help
- je zde pouzita promena File (open, reset, close)
M.Jirman
----- Original Message -----
From: kinekus
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, March 27, 2000 6:53 AM
Subject: Kopirovanie otvoreneho suboru v inej aplikaciii
Zdravim,
kto by mi vedel poradit ako pri kopirovani suboru prekopirovat subor, ktory je otvoreny v inej aplikacii. Ked pouzijem CopyFile, ide to len vtedy, ked kopirovany subor je volny.
Dakujem Mr.Jmeno z IP
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 28.3.2000 19:51:15
DD,
netusi nekdo zda je mozne na Windows siti zjistit jmeno prihlaseneho
uzivatele v pripade, ze znam pouze IP adresu klientova pocitace? Nejaky
dotaz na domain controler ?? Prevod pomoci MAC adresy???
Zdravi
D. Toman
Problem s rotaci obrazku
[*] Ji�� Schindler - 28.3.2000 20:26:46
Dobry den,
mam nasledujici problem mam v TImage obrazek a potrebuji ho nechat rotovat okolo sve vlastni osy a staci mi to provadet po 90 stupnich, nejsem profik a momentalne bych privital kdyby mi mohl nekdo poskytnout nejakou radu ci komponentku ci info kde bych ji nasel. Za kazdou radu jsem velice a velice vdecen.
Moc diky. Jirka
E-mail: jiri.schindler(zv)volny(tec)cz
IB 6 dokumentacia
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.3.2000 21:23:46
Zdravim
Kde najdem dokumentaciu k IB 6, hladal som na interbase.com ale nenasiel
som.
dakujem
roland.ENTER a ESC na TEdit
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.3.2000 22:04:38
----- Original Message -----
From: Petr Fischer <petr.fischer.dk(zv)email(tec)cz>
To: DELPHI-KONFERENCE <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, March 28, 2000 9:23 AM
Subject: RE: ENTER a ESC na TEdit
>
> No jo, ale jak v OnKeyPress eventuelne otestuju klavesy Shift, Alt a Ctrl
> (ShiftState, ktery je v OnKeyDown)???
>
Ale KeyPress sa vykona az po KeyDown, t.j. Petr Vones myslel, ze v KeyDown
otestujes a vykonas co chces a v KeyPress nastavis key na #0 aby neposlal
poziadavky na pipnutie. ( moj nazor)
Najlepsie ak chces zamedzit pipnutie na vsetkych komponentach na forme tak
to daj do eventov formu a nastav form1.keypreview:=true, ale ma to nejake
obmedzenia (RXDateEdit,DateEdit...)
Roland.> Petr Fischer
> E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
> > Zkus to udelat v OnKeyPress,
> > ale dej tam Key:=#0
>
> > Dobra.
>
> > > ----------
> > > Od: Petr Fischer[SMTP:petr.fischer.dk(zv)email(tec)cz]
> > >
> > > mam na TEdit.OnKeyDown toto:
> > >
> > > if Key in [VK_ENTER, VK_ESC] then
> > > begin
> > > Key := 0;
> > > // a nejaka dalsi akce
> > > end;
> > >
> > > klavesy zareaguji, to je OK, ale vzdy po stisku Enter nebo Esc se ozve
> > > pipnuti. Proc?
> > >
> > >
>
>
>
>
>
IB: Exclusive access
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.3.2000 22:14:26
Zdravim
Ako zabezpecim excluzivny pristup k databazy, poste potrebujem aby nebolo
mozne sa prihlasit v danom momente inym uzivatelom.
Dakujem.
Roland.Autosize columns na StatusBare.
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 29.3.2000 00:11:04
Ahoj,
Nevim jestli je to to prave, ale ja pouzivam TdfsStatusBar a potrebuji, aby
se sirka prvniho panel ridila podle sirky formulare.
Reaguji na udalost OnResize prislusneho StatusBaru, nasledovne:
procedure TFrmMain.StatusBarResize(Sender: TObject);
var
NewW: integer;
i: integer;
begin
NewW:= 0;
for i:= 1 to StatusBar.Panels.Count-1 do
NewW:= NewW + StatusBar.Panels[i].width;
NewW:= StatusBar.Width - NewW - StatusBar.Panels.Count*6;
if NewW < 0 then NewW:= 0;
StatusBar.Panels[0].width:= NewW;
end;"To nastavi sirku prvniho panelu akorattak, aby se tam ostani vesly."
Pokud o nebude jasne, rad upresnim
Karel Vlcek
----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, March 26, 2000 4:12 AM
Subject: Autosize columns na StatusBare.> Hi.
>
> Ako by som urobil Autosize columns na StatusBare.
>
> Dakujem.
>
> Roland.
>
>Problem s rotaci obrazku
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:13:23
From: Ji�� Schindler <jiri.schindler(zv)volny(tec)cz>
> mam nasledujici problem mam v TImage obrazek a potrebuji ho nechat rotovat okolo
> sve vlastni osy a staci mi to provadet po 90 stupnich, nejsem profik a momentalne
> bych privital kdyby mi mohl nekdo poskytnout nejakou radu ci komponentku ci info
> kde bych ji nasel. Za kazdou radu jsem velice a velice vdecen.
Ahoj,
podivej se tady:
http://www.efg2.com/Lab/ImageProcessing/Default.htm
Petr Vones, amatersky programator
Pouziti interface
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:13:59
From: Tom� Br�dle <t.bradle(zv)pvtnet(tec)cz>
> chci se zeptat jestli je "legalni" takovahle konstrukce objektu
> (TNejakyObjekt) :
>
> INejakyInterface=interface
> [..intf ID..]
> .
> .
> .
> end;
>
> TNejakyObjekt=class(TEdit, INejakyInterface)
> .
> .
> .
> end;
>
> Misto TEdit muze byt jina vizualni komponenta.
Ahoj,
mozne to je, podobny pripad najdes treba v Delphi Enterprise v tride TDataSet.
Petr Vones, amatersky programator
Komponenta NMPOP3 a vlastnost host pri pripojovani
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:13:32
From: Petr Ku�era <kucera(zv)vri(tec)cz>
> ja bych si chtel napsat takovy jednoduchy programek na
> stahovani posty z volny(tec)cz. Zkousel jsem jej na jinym postovnim
> serveru, kde fungoval celkem spravne. Pak jsem se zkusil pripojit na
> volny(tec)cz. Vlastnost host jsem nastavil na volny(tec)cz, UserID na moje
Ahoj,
musis pouzit nastaveni posty tak, jak jej pozaduje dany provider. V pripade
VOLneho je asi nejjednodussi se podivat primo na stranky tech.podpory:
http://www.volny(tec)cz/cz/info/techsup/setting/index.html
Petr Vones, amatersky programator
IB 6 dokumentacia
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:13:19
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Kde najdem dokumentaciu k IB 6, hladal som na interbase.com ale nenasiel
> som.
Ahoj,
zkus se podivat tady:
http://www.interbase2000.org/ib_doc.htm
Petr Vones, amatersky programator
Connection Points
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:23
From: jemeto <jemeto(zv)volny(tec)cz>
> Nemohl by me nekdo poradit, popr napsat odkazy na stranky WWW nebo priklady na
> vytvoreni eventy v programu pouzivajici COM/DCOM pres Connection Points.
Ahoj,
Zkus se podivat tady:
http://www.intac.com/~bly/com/
Pokud te to zajima vic, tak nedavno vysla kniha "Delphi COM programming"
(Eric Harmon), kde je toto popsane i s priklady.
Petr Vones, amatersky programator
Button a barva
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:06
From: Pavel Vasek <pavel.vasek(zv)wige-mic(tec)cz>
> mohl by mi nekdo prosim vas rici, proc button nemuze mit barvu (libovolnou)?
Ahoj,
Toto je dano Windows, standartni button nemuze mit jinou barvu. Lze to ale
udelat v BS_OWNERDRAW rezimu, ktery pouziva treba TBitBtn. Komponenta je
ke stazeni napriklad tady:
http://www.kopr(tec)cz/delphi/k-delphi.htm#KColBtn
Petr Vones, amatersky programator
Nastaveni fontu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:40
From: garalda <garalda(zv)mail(tec)cz>
> Nezkouseli jste nekdo nastavovat font u Hintu?
> Mam napsanou aplikaci, kterou kdyz spustim pod Anglickymi Win, tak ma
> domrsenou cestinu. Pridal jsem moznost nastaveni typu fontu pro jednotlive
> komponenty - Label, Memo, Edit... Lze ale nastavit font i pro Hinty ev
> hlavicky Formulare?
Ahoj,
podstatna informace, pro jakou verzi Delphi ?
Petr Vones, amatersky programator
Invalid handle
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:34
From: Ivo HERR <ih(zv)safar(tec)cz>
> Mam nasledujici problem :
> Do boardu mam pichnutou IR hlavicku (ACTiSYS IR L210). Mam nainstalovany
> ovladace. Ty sedi na COM4. Kdyz v programu provedu nasledujici :
>
> hCom:=CreateFile((zv)Com[1], GENERIC_READ + GENERIC_WRITE, 0, nil,
> OPEN_Existing, FILE_ATTRIBUTE_NORMAL, 0); file://v Com je retezec 'COM4'
>
> priradi mi to skutecne nejaky handle (konkretne 24). S nim mohu delat
> temer vse (napr. SetupComm, SetCommState, ...), ALE:
> TransmitCommChar se mi neprovede (GetLastError vraci hodnotu 6, tedy
> Invalid handle) a
> WriteFile se rovnez neprovede (GetLastError vraci 21, tedy zarizeni neni
> pripraveno)
Ahoj,
Tezko rict, jelikoz se s nejvetsi pravdepodobnosti jedna o virtualni
port, tak treba nezvladli napsat dobre ovladace, popripade se s tim
musi zachazet trochu jinak nez s klasickym seriovym portem. Je k tomu
nejaka dokumentace ?
Petr Vones, amatersky programator
Divny Hook...
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:10
From: Majo Petrik <zajodelphi(zv)hotmail.com>
> Neviete niekto ci sa da nejako vytvorit
> (najlepsie globalny) hook, ktory by zaznamenaval
> zapis a citanie na/z disku(aj by urcil subor),a zapis
> a citanie z registrov????
Ahoj,
Uz se to tu probiralo, viz archiv:
http://www.delphi(tec)cz/soubor.asp?rok=2000&mesic=Jan&den=12&first=46&soubor=dlfaaacg.htm
Petr Vones, amatersky programator
Kopirovani v Delphi + ShellExecute
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 01:14:18
From: Delphi <delphi(zv)dcomm(tec)cz>
> 2, z meho prg. spoustim
> ShellExecute(Application.Handle,'open',PChar(ExcelFileName),Nil,PChar(ExcelF
> ilePath),SW_ShowMaximized);
> lec misto kyzeneho dokumentu vidim plochu, ktera byla na tom miste kde se
> Excel otevrel. Myslel jsem, ze se jedna o chybu ve stylu Excel - neni
> odpoved, ale nabidky a fce normalne funguji. Jen ten dokument nevidim :o(((
Ahoj,
Nemam moznost to odzkouset, ale zkus jako posledni parametr SW_SHOWDEFAULT.
Taky zkontroluj jestli ti to nevraci nejakou chybu, Excel vetsinou pouziva
DDE pro predavani prikazu ze shellu.
Petr Vones, amatersky programator
Nastaveni fontu
[*] garalda <garalda(zv)mail(tec)cz> - 29.3.2000 07:28:12
>> Nezkouseli jste nekdo nastavovat font u Hintu?
>> Mam napsanou aplikaci, kterou kdyz spustim pod Anglickymi Win, tak ma
>> domrsenou cestinu. Pridal jsem moznost nastaveni typu fontu pro
jednotlive
>> komponenty - Label, Memo, Edit... Lze ale nastavit font i pro Hinty ev
>> hlavicky Formulare?
>
>podstatna informace, pro jakou verzi Delphi ?
>
Pro verzi D4 Pro. (Ja hlava dubova. :-)
Rychost animace TreeView
[*] Ivo Janalik <janalik(zv)nam(tec)cz> - 29.3.2000 07:40:46
Nevi nekdo kde se nastavuje rychost animace TreeView ve Windows NT
Workstation ? Po nejakem SP se to nastavilo a rozklikavani je desne pomale.
Dik.
Preji hezky den
Ivo Janalik
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.71 / Virova baze: 38 - datum vydani: 26.7.1999
Jmeno z IP
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 29.3.2000 07:55:01
var lpname,lpusername:array[0..255] of char;
lpName:='192.168.1.47';
lpsize:=256;
WNetGetUser((zv)lpname,(zv)lpusername,lpSize);
No a ocekavej jmeno prihlaseneho uzivatele.
Pokud to chces naopak (znas klienta neznas jeho stroj)
budes muset pravdepodobne proskakat s pomoci
WNetEnum vsechny viditelne compy a u kazdeho
hodit dotaz na jmeno prihlaseneho uzivatele.
Martin
----- Original Message -----
> netusi nekdo zda je mozne na Windows siti zjistit jmeno prihlaseneho
> uzivatele v pripade, ze znam pouze IP adresu klientova pocitace? Nejaky
> dotaz na domain controler ?? Prevod pomoci MAC adresy???
IS a BDE
[*] Dalibor Honus <dhonus(zv)iname(tec)com> - 29.3.2000 07:58:21
Napiste mi prosim korektni postup, jak korektne nainstalovat BDE (partial
instalation - jen paradox) pomoci Install Shiled dodavanym s Delphi 4. Vim ,
ze je tam nekde chyba, ale nemohu se dopatrat jak ji odstaranit.
Predem diky
____________________________________________
Dalibor Honus
Foto Morava s.r.o.
kancelar : 0656 - 721 190 kl.45
mobil : 0602 - 591341
domu : 0656 - 802 835
e-mail : dhonus(zv)fotomorava(tec)cz (dhonus(zv)iname.com)
____________________________________________
transparentni proxy v Delphi ?
[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 29.3.2000 08:47:18
Ahoj
zkouseli jste nekdo delat jiz neco podobneho v delphi ? Stahl jsem si
isniffer komponentu, ktera zachytava pakety a umi je i odesilat (je to
napsane v C jako vxd driver + dll + unit v Delphi) - funguje to ale jen ve
win95,98. Pokousim se z toho vycarovat transparentni proxy pomoci NAT. Nema
k NAT nekdo podrobnejsi popis jak to PRESNE funguje?TOpenDialog
[*] SPELZA s.r.o. <spelza(zv)spelza(tec)cz> - 29.3.2000 08:48:31
Ahoj Delphici,
mam takovy dojem, ze muj dotaz se jaksi nedostal na misto urceni a tak
prominte objevi-li se tady dvakrat.
Mam v aplikaci TOpenDialog a potreboval bych k tomuto dialogu prilepit jeste
jiny vlastni dialog s tim, ze se oba budou chovat jako jeden celek (budou se
pohybovat spolu). Nevim ovsem jak zjistit polohu TOpenDialog (Left, Top,
Height, Width). Poradte prosim.
Mam D4Std.
Dik. Jara.
Error reading data from the connection. - Upresnen
[*] Rostislav Podmanicky <rosta(zv)trias92(tec)cz> - 29.3.2000 08:53:49
Zdravim
Podobne problemy a stejnou chybu jsem mel take. Chyba se vyskytovala
nepravidelne. Priciny byly dve (nezavisle na sobe):
1) Spatny ovladac sitove karty
Reseni: novy ovladac nebo sitova karta
2) Kolize s Netware Clientem verze 3.00 a vyssi a InterBase clientem.
Netware Client nahradil nektere DLL knihovny a ty pak nebyly
v souladu s InterBase clientem - vysledkem byla rada podivnych
chybovych hlaseni pri komunikaci s SQL serverem.
Reseni: Reinstalace InterBase clienta z instalacniho CD
Puvodne jsem take podezrival kabelaz nebo ruseni ale nebylo tomu tak....
Rosta Podmanicky
Trias 92 s.r.o.
Jicin
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Roland Tur�an (RoTurSoft)
Sent: Tuesday, March 28, 2000 1:47 AM
To: Delphi CZ konferencia
Subject: IB: Error reading data from the connection. - Upresnen�
nechteny dialog "Pripojeni k Internetu"
[*] MJsoft <mjsoft(zv)rychnov(tec)cz> - 29.3.2000 09:28:31
Dobry den
Kdyz se chci na server IB pripojit z klienta a tam je nainstalov�no pripojen� k internetu, tak se nejprve otevre dialog "Pripojeni k internetu". Mohl by me nekdo poradit, jak se tohoto dialogu zbavim.
predem diky
Jindra
IS a BDE
[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 29.3.2000 09:59:19
>Napiste mi prosim korektni postup, jak korektne nainstalovat BDE (partial
>instalation - jen paradox) pomoci Install Shiled dodavanym s Delphi 4. Vim
,
>ze je tam nekde chyba, ale nemohu se dopatrat jak ji odstaranit.
Na partial instalation BDE radeji zapomen.
Pusobi to na pocitacich uzivatelu vice skody nez uzitku, viz help.
S pozdravem
Miloslav Skacel
skacel(zv)stereo(tec)cz
www.stereo(tec)cz
transparentni proxy v Delphi ?
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.3.2000 10:16:29
>Ahoj
>zkouseli jste nekdo delat jiz neco podobneho v delphi ? Stahl jsem si
>isniffer komponentu, ktera zachytava pakety a umi je i odesilat (je to
>napsane v C jako vxd driver + dll + unit v Delphi) - funguje to ale jen ve
>win95,98. Pokousim se z toho vycarovat transparentni proxy pomoci NAT. Nema
>k NAT nekdo podrobnejsi popis jak to PRESNE funguje?
NAT a transparentni proxy jsou dve ruzne technologie.
Princip NAT (Network address translation) je relativne jednoduchy - pakety
prijate z lokalnich stanic jso modifikovany tak, ze se zmanei IP adresa
odesilatele (lokalni IP se nahradi verejnou IP pocitace s NATem). Pritom se
zameni i source port za nejakou vysokou hodnotu (> 60000), ktera se pouzije
jako index do tabulky pro zpetny prevod. Tato tabulka se pouzije pokud
prijde odpoved z Internetu - podle ciloveho portu (pripadne i cilove IP
adresy paketu) se urci zaznam v tabulce. Tim je urcen lokalni stroj na ktery
se ma paket odeslat (pred tim se prepise cilova IP lokalni IPCkem).
Transparentni proxy je vetsinou HTTP proxy , ktera odchytava vsechny
pozadavky smerujici na HTTP port (80), takze uzivatel s browserem nema sanci
ji obejit (ani nemusi nic nastavovat aby proxy pouzil). Je treba si
uvedomit, ze jako transparentni proxy neni mozne pouzit normalni HTTP
proxy - protoze ta ocekava jisty tvar HTTP hlavicek (full URL k dokumentu)
Zdravi
D. Toman
dataset.insertrecord
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 29.3.2000 10:46:51
Zdravim,
ako pouzijem TDataSet.InsertRecord na pole s PrimaryKey, Autoincrementom,
not Allowed null, unique.
Paradox, W98, D5
PS: V D3 mit to slo ze som vlozil prazdny string a on mi vygeneroval cislo.
Ale v D5 pise chybu, ze id nemoze byt menene.
Dik, Miso
Jmeno z IP
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.3.2000 11:03:18
>
>var lpname,lpusername:array[0..255] of char;
>lpName:='192.168.1.47';
>lpsize:=256;
>WNetGetUser((zv)lpname,(zv)lpusername,lpSize);
>
>No a ocekavej jmeno prihlaseneho uzivatele.
Jenze to zrejme funguje jen v pripade, ze se tato funkce vola na stroji na
ktery se uzivatel prihlasil. A pokud ji volam caseji na stejne IP
vraci obcas (nekdy dost casto) chybovy 2250 (ERR_NOT_CONNECTED).
Zdravi
D. Toman
Tisk obalek - co pouzit?
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 29.3.2000 11:32:39
Preji hezky den,
potrebuju nejak inteligentne vyrobit tisk na obalky. Nedelal jste nekdo neco
takoveho? Jde mi o to, aby bylo mozno zvolit orientaci pismen a umisteni na
strance podle potreby.
Moc diky
Mac
IB 5.6 to IB 6 beta
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 29.3.2000 11:33:40
Tak jsem to prozkoumal vice, a vysledek je asi takovy:
Pokud se v ceste k databazi na Linuxu (pri tvorbe - CREATE DATABASE)
pouzije obracene lomitko(\), tak sice GDB vznikne, nicmene neni mozne
pri jeji tvorbe pouzit parametr DEFAULT CHARACTER SET. Pokud pouzijeme
normalni lomitko (/), tak ano. Linux nativni je (/), ale proc se tedy
vytvori GDB pri pouziti (\)?
Najde se nekdo, kdo o tom vi vic?
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
problem s TTable.Emptytable
[*] Delphi <delphi(zv)dcomm(tec)cz> - 29.3.2000 11:34:33
Tohle jsem resil taky.
Myslim, ze nejdulezitejsi je nemit tabulku nastavenou na Table.active = true
uz v navrhu programu (tzn. v nastaveni table v modulu), ale otevrit ji rucne
az za behu. Rozdil je v tom, ze nasledne prikazy ala Table1.active := True,
False nebudou ignorovany, ale provedou se. Proc to tak je netusim.... ale
takhle jsem to nakonec rozbehal...
Hippy
-----Original Message-----
From: Filip [mailto:delphi007(zv)angelfire.com]
Sent: Friday, March 24, 2000 1:18 PM
To: delphi-l(zv)fwd(tec)cz
Subject: problem s TTable.Emptytable
Zdar!
Mam ted takovy problem, ktery se sice da jednoduse obejit, ale to neni
samozrejme to prave. Pri zavolani TTable.Emptytable se ozve hlaska "...table
is busy.". Predtim jsem samozrejme tabulku zavrel. Tak co s tim??
Pouzivam D5, ale stavalo se mi to i pod D3.
---
Filip, student
Angelfire for your free web-based e-mail. http://www.angelfire.com
Barva pri disabled
[*] Pavel K�ehula <pavel(zv)mas(tec)cz> - 29.3.2000 12:40:29
Zdravicko,
potrebuji zmenit barvu textu v disabled editu, nevite nekdo jak na to?
Pavel
IP adresa a jmeno stroje
[*] Miroslav Dolecek <xdolecek(zv)informatics.muni(tec)cz> - 29.3.2000 13:38:30
Zdarec,
potrebuji zjistit IP adresu a jmeno stroje na kterem spoustim program
vytvoreny v D5. To jmeno bych jeste dokazal vytahnout z registru, ale tu
IP nevim. Urcite vite jak na to?
Dik
Mirek Dolecek
StringGrid
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 29.3.2000 13:49:41
> potreboval bych poradit s TStringGrid.
> Ve stringGridu mam seznam polozek, ktery je delsi
> nez vyska okna StringGridu. Kdyz provadim search
> v bunkach stringgridu a vysledek je TRUE tak radek obsahujici
> text SELEKTUJU. Ovsem posuvnik se neposune aby byl selektovanej radek
vydet.
> Prozatim sem neprisel na to jak list donutit aby se posunul na urcitou
> polozku.
StringGrid.TopRow
Daniel
StringGrid
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.3.2000 13:57:49
Pri hledani zjistis index radku, pak staci StringGrid.Row := index;
Jan Fiala
----- Original Message -----
From: Ondrej Slama <slama(zv)internet(tec)cz>> Ahojda vsici,
>
> potreboval bych poradit s TStringGrid.
> Ve stringGridu mam seznam polozek, ktery je delsi
> nez vyska okna StringGridu. Kdyz provadim search
> v bunkach stringgridu a vysledek je TRUE tak radek obsahujici
> text SELEKTUJU. Ovsem posuvnik se neposune aby byl selektovanej radek vydet.
> Prozatim sem neprisel na to jak list donutit aby se posunul na urcitou
> polozku.
> Muzete mi nekdo pomoct.
>
> Dik
>
> Detail - QuickReport
[*] Ivo HERR <ih(zv)safar(tec)cz> - 29.3.2000 15:09:31
Zdravim!
Je mozne zprovoznit v jednom reportu vice Detailu? Na formular se nam
povedlo umistit 2, ale vytiskne se jen jeden. V podstate mi jde o to,
vytisknout v ramci jednoho reportu vysledek dvou query (jsou neprazdne a
na sobe zcela nezavisle). Delphi 5 Prof.
Diky
I.transparentni proxy v Delphi ?
[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 29.3.2000 15:12:39
Jo NAT je mi celkem jasny, az na to, jak osetrit uvolnovani tech portu v
tabulce po ukonceni spojeni (u TCP bych to videl tak ze po ukonceni session
se ten port (zaznam) uvolni take z te tabulky) horsi to je napr u UDP nebo
jinych nekonektivne orientovanych protokolu, zeby se to resilo pres timeout
, kdyz na ten NAT po urcitou dobu neprijde zadnej paket s danym portem (at
uz z lokalni site nebo z internetu) tak se ten zaznam v tabulce smazne ?
----- P�vodn� zpr�va -----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 29. b�ezna 2000 10:16
P�edm�t: Re: transparentni proxy v Delphi ?>Ahoj
>zkouseli jste nekdo delat jiz neco podobneho v delphi ? Stahl jsem si
>isniffer komponentu, ktera zachytava pakety a umi je i odesilat (je to
>napsane v C jako vxd driver + dll + unit v Delphi) - funguje to ale jen ve
>win95,98. Pokousim se z toho vycarovat transparentni proxy pomoci NAT. Nema
>k NAT nekdo podrobnejsi popis jak to PRESNE funguje?
NAT a transparentni proxy jsou dve ruzne technologie.
Princip NAT (Network address translation) je relativne jednoduchy - pakety
prijate z lokalnich stanic jso modifikovany tak, ze se zmanei IP adresa
odesilatele (lokalni IP se nahradi verejnou IP pocitace s NATem). Pritom se
zameni i source port za nejakou vysokou hodnotu (> 60000), ktera se pouzije
jako index do tabulky pro zpetny prevod. Tato tabulka se pouzije pokud
prijde odpoved z Internetu - podle ciloveho portu (pripadne i cilove IP
adresy paketu) se urci zaznam v tabulce. Tim je urcen lokalni stroj na ktery
se ma paket odeslat (pred tim se prepise cilova IP lokalni IPCkem).
Transparentni proxy je vetsinou HTTP proxy , ktera odchytava vsechny
pozadavky smerujici na HTTP port (80), takze uzivatel s browserem nema sanci
ji obejit (ani nemusi nic nastavovat aby proxy pouzil). Je treba si
uvedomit, ze jako transparentni proxy neni mozne pouzit normalni HTTP
proxy - protoze ta ocekava jisty tvar HTTP hlavicek (full URL k dokumentu)
Zdravi
D. Toman
StringGrid
[*] Ivo HERR <ih(zv)safar(tec)cz> - 29.3.2000 15:22:02
Nejsem si uplne jist, ale neni to vlastnost TopRow?
I.
Ondrej Slama wrote:
> Ahojda vsici,
>
> potreboval bych poradit s TStringGrid.
> Ve stringGridu mam seznam polozek, ktery je delsi
> nez vyska okna StringGridu. Kdyz provadim search
> v bunkach stringgridu a vysledek je TRUE tak radek obsahujici
> text SELEKTUJU. Ovsem posuvnik se neposune aby byl selektovanej radek vydet.
> Prozatim sem neprisel na to jak list donutit aby se posunul na urcitou
> polozku.
> Muzete mi nekdo pomoct.
>
> Dik
transparentni proxy v Delphi ?
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.3.2000 16:11:35
>Jo NAT je mi celkem jasny, az na to, jak osetrit uvolnovani tech portu v
>tabulce po ukonceni spojeni (u TCP bych to videl tak ze po ukonceni session
>se ten port (zaznam) uvolni take z te tabulky) horsi to je napr u UDP nebo
>jinych nekonektivne orientovanych protokolu, zeby se to resilo pres timeout
>, kdyz na ten NAT po urcitou dobu neprijde zadnej paket s danym portem (at
>uz z lokalni site nebo z internetu) tak se ten zaznam v tabulce smazne ?
resi se to timeoutem.
K studiu lze pouizit IP_maskaradu z Linuxu. V pripade nekterych znamych
protokolu se vyplati koukat do paketu a pokud se zjisti, ze jde napriklad o
data z FTP ci ICQ zaridit dalsi potrebne veci (open port pro FTP data
transfer atd)
Zdravi
D. Toman
IP adresa a jmeno stroje
[*] Lubos Hubka <hubka(zv)trenkwalder.sk> - 29.3.2000 16:34:09
> potrebuji zjistit IP adresu a jmeno stroje na kterem spoustim program
> vytvoreny v D5. To jmeno bych jeste dokazal vytahnout z registru, ale tu
> IP nevim. Urcite vite jak na to?
taktiez v registroch:
HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0001\IPAddress
Pozor na to "0001" je to poradove cislo zariadenia. Ja mam napriklad IR port
ako 0001, sietovu kartu ako 0002 a modem ako 0003.
Zatial som neprisiel na to ako programom zistit, ktore zariadenie je sietova
karta.
/LH
--
"NSA GCHQ KGB CIA nuclear conspiration war weapon spy agent... Hi Echelon!"
IP adresa a jmeno stroje
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.3.2000 17:24:44
>> potrebuji zjistit IP adresu a jmeno stroje na kterem spoustim program
>> vytvoreny v D5. To jmeno bych jeste dokazal vytahnout z registru, ale tu
>> IP nevim. Urcite vite jak na to?
>
>taktiez v registroch:
>HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0001\IP
Address
doporucuji pouzit radeji funkce:
GetHostName()
GetHostByName() - pozor v pripade, ze stroj ma vice sitovych karet nebo
alias IPcek vraci seznam IP adres
Zdravi
D. Toman
Barva pri disabled
[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 29.3.2000 17:04:22
Ahoj,
Disablovani editu (i jinych komponent) dosahnes i tak,
ze jejich Parenta (napr. TPanel) disablujes. Vysledek
je ten, ze komponenta nezesedne. Barvu si pak nastav sam.
Tomas Bihary
----- Original Message -----
From: Pavel K�ehula <pavel(zv)mas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, March 29, 2000 11:40 AM
Subject: Barva pri disabled
> Zdravicko,
>
> potrebuji zmenit barvu textu v disabled editu, nevite nekdo jak na to?
>
> Pavel
>
>Ukonceni screensaveru
[*] fejfarj(zv)atlas(tec)cz - 29.3.2000 18:22:17
Ahoy vsichni ...
potreboval bych nakopnout spravnym smerem, jak z delphi aplikace ukoncit bezici screensaver ...
diky moc za kazdej namet k premejsleni ...
Jirka
Detail - QuickReport
[*] Miroslav Evj�k <evjak(zv)atlas(tec)cz> - 29.3.2000 20:53:10
Ahoj,
je potreba pouzit 2x SubDetail namisto Detail a nastavit jejich vlastnost
Master na QReport. Blizsi informace v QR tutorialu ci jak se ta mrcha
jmenuje (na webu QuSoftu)."Mirecek" Evjak
evjak(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 Ivo HERR
> Sent: Wednesday, March 29, 2000 3:10 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Detail - QuickReport
>
>
> Zdravim!
> Je mozne zprovoznit v jednom reportu vice Detailu? Na formular se nam
> povedlo umistit 2, ale vytiskne se jen jeden. V podstate mi jde o to,
> vytisknout v ramci jednoho reportu vysledek dvou query (jsou neprazdne a
> na sobe zcela nezavisle). Delphi 5 Prof.
>
> Diky
> I.
>Detail - QuickReport
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 29.3.2000 21:11:19
----- Original Message -----
From: Ivo HERR <ih(zv)safar(tec)cz>
Sent: Wednesday, March 29, 2000 3:09 PM
Subject: Detail - QuickReport
> Zdravim!
> Je mozne zprovoznit v jednom reportu vice Detailu? Na formular se nam
> povedlo umistit 2, ale vytiskne se jen jeden. V podstate mi jde o to,
> vytisknout v ramci jednoho reportu vysledek dvou query (jsou neprazdne a
> na sobe zcela nezavisle). Delphi 5 Prof.
>
> Diky
> I.
Ano, ale musis si sam davkovat data v udalosti OnNeedData a property DataSet
nastavit na nil.
Palo.
pstolc(zv)sc.sknet.sk
Rychost animace TreeView
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 22:21:27
From: Ivo Janalik <janalik(zv)nam(tec)cz>
> Nevi nekdo kde se nastavuje rychost animace TreeView ve Windows NT
> Workstation ? Po nejakem SP se to nastavilo a rozklikavani je desne pomale.
Ahoj,
Rychlost se asi nastavit neda, ale nastesti se to da uplne vypnout. Stejne
hrozne je to totiz u ListView. Ve Win95 staci nastavit v registru nasledujici
polozku na 0 (DWORD), u NT to snad bude podobne.
HKEY_CURRENT_USER\Control Panel\desktop\SmoothScroll
Z MS webu se da stahnout utilita TweakUI, pomoci ktere se daji pohodlne
podobne blbosti povypinat. U snad existuje beta i pro W2000.
Petr Vones, amatersky programator
TOpenDialog
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.2000 22:22:54
From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
> Mam v aplikaci TOpenDialog a potreboval bych k tomuto dialogu prilepit jeste
> jiny vlastni dialog s tim, ze se oba budou chovat jako jeden celek (budou se
> pohybovat spolu). Nevim ovsem jak zjistit polohu TOpenDialog (Left, Top,
Ahoj,
a nebylo by lepsi spise rozsirit stavajici dialog ?
Petr Vones, amatersky programator
Winbase 602 6.1 a d2
[*] iturcan(zv)gamo.sk - 29.3.2000 23:46:41
>Pri pokuse o pripojenie k Winbase 602 6,1, mi D2 Standard vypisu
nasledujucu chybovu
>hlasku
�>�� Your applikacion is not enabled for use with this driver Alias: wbsql
>
>da sa s tym v mojej situacii nieco robit
>ako je mozne vyuzivat odbc bez bde lebo driver s odbc mi vobec neponukne
�Delphi vo verzii Standard neumoznuje pripojenie na ODBC zdoje. Tato
vlastnost je podporovana az
od verzii Professional.
Mas niekolko moznosti ako spolupracovat s WB:
1. pohladas na internete komponenty umoznujuce pripojenie cez ODBC mimo BDE
(pre D2 to uz mozno bude aj
problem)
2. kupis si vyssiu verziu Delphi (minimalne Pro)
3. pouzijes nativne komponenty WDE na pripojenie do WB602, tie ale pracuju
az od verzii Delphi 3 (aj v Delphi standard). web ->
www.software602(tec)cz/wde
S pozdravom
Ivan Turcan
Spusteni programu jako sluzby
[*] Lud�k P�ral - 29.3.2000 23:57:38
Mam D3S,
prosim o radu , jak po spusteni programu jej smazat ze seznamu spustenych programu a dat jej do sluzby. Zaroven nevim, jak pri instalaci zaridit moznost dat do slozky PoStartu (nebo po spusteni).
Dekuji a jsem s pozdravem
Ludek Paral
ludek.paral(zv)telecom(tec)cz
Tisk obalek - co pouzit?
[*] Jaro <jaro(zv)sinea(tec)cz> - 29.3.2000 18:16:06 -0800
Vyzkousej generator tiskovych sestav Sinea, viz www.sinea(tec)cz
Umoznuje uzivatelskou editaci predloh pro tisk obalek
vcetne uzivatelske definice rozmenu i orientace obalek.
Jaro
> Preji hezky den,
>
> potrebuju nejak inteligentne vyrobit tisk na obalky. Nedelal jste nekdo
neco
> takoveho? Jde mi o to, aby bylo mozno zvolit orientaci pismen a umisteni
na
> strance podle potreby.
>
> Moc diky
>
> Mac
>Winbase 602 6.1 a d2
[*] Peter ROZIM <prozim(zv)pollux.sk> - 30.3.2000 07:20:05
Pri pokuse o pripojenie k Winbase 602 6,1, mi D2 Standard vypisu nasledujucu chybovu
hlasku
Your applikacion is not enabled for use with this driver Alias: wbsql
da sa s tym v mojej situacii nieco robit
ako je mozne vyuzivat odbc bez bde lebo driver s odbc mi vobec neponukne
Vdaka
Peter
TOpenDialog
[*] SPELZA s.r.o. <spelza(zv)spelza(tec)cz> - 30.3.2000 08:34:20
To by bylo, ale pripada mi to slozitejsi. Snazil jsem se jit tou lehci
cestou. Takze pokud by slo rozsirit stavajici dialog, predstavoval bych si
to tak, ze v nem bude jeden TPanel a v nem asi 10 TLabelu, ktere zmeni obsah
na zaklade vyberu souboru. Pokud mas reseni, uvitam jakykoliv napad.
Dik. Jara.
----- P�vodn� zpr�va -----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 29. b�ezna 2000 22:22
P�edm�t: Re: TOpenDialog
> From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
> > Mam v aplikaci TOpenDialog a potreboval bych k tomuto dialogu prilepit
jeste
> > jiny vlastni dialog s tim, ze se oba budou chovat jako jeden celek
(budou se
> > pohybovat spolu). Nevim ovsem jak zjistit polohu TOpenDialog (Left, Top,
>
> Ahoj,
>
> a nebylo by lepsi spise rozsirit stavajici dialog ?
>
> Petr Vones, amatersky programator
>
>
>Ikona aplikace
[*] SPELZA s.r.o. <spelza(zv)spelza(tec)cz> - 30.3.2000 08:42:43
Ahij Delphici,
mam malicky dotazek. Mam aplikaci ktere je prirazena vlastni ikona jak v
Project/Options/Application/Load Icon tak v property Icon hlavniho
formulare. Pokud ale neudelam ve FormCreate Application.Icon.LoadFromFile(),
tak se mi tato ikona neobjevi v liste aplikace kdyz ji minimalizuji. Chtel
bych aby soubor icony (.ico) nemusel byt na disku ale aby ikona byla
soucasti .exe. Jde to nejak udelat?
Dik. Jara.Barva pri disabled
[*] Pavel K�ehula <pavel(zv)mas(tec)cz> - 30.3.2000 08:47:42
On Wed, 29 Mar 2000 17:04:22 +0100, Tomas Bihary wrote:
| Ahoj,
| Disablovani editu (i jinych komponent) dosahnes i tak,
| ze jejich Parenta (napr. TPanel) disablujes. Vysledek
| je ten, ze komponenta nezesedne. Barvu si pak nastav sam.
Hm, je to dost dobrej napad a fakt to funguje, ale ja potrebuju udelat tohle do komponenty a pridavat
panel jako podklad kazdyho editu se mi zda trochu pritazeny za vlasy.
Pavel
Odstreleni aplikace
[*] Pavel Sommer <p.sommer(zv)volny(tec)cz> - 30.3.2000 10:46:07
Nejjednodussi zpusob je pridat podminku primo do zdroje projektu (.dpr).
.......
....
.....
var hHandle: THandle;
begin
hHandle:= FindWindow('nazev tridy (muze byt nil)', 'titulek okna (v tvem
pripade asi CD Player)');
If hHandle <> 0 Then Exit
Else
begin
Application.Initialize;
...atd
Application.Run;
end;
end;
To by melo naprosto spolehlive fungovat.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Hurricane
Sent: Saturday, March 25, 2000 8:29 PM
To: Delphi Forum
Subject: Odstreleni aplikace
Zdravim
Tusim, ze se to tady uz probiralo, ale nepotreboval sem to a tak sem to
nesledoval. delam CD Player a potrebuju osetrit vicenasobny spusteni.
Jednoduse, kdyz se spusti znova, tak najde sam sebe uz spustenyho a hned se
zavre. Vim, ze k tomu potrebuju Handle ty spusteny aplikace, ale nedari se
mi ho zjistit. Mam tento priklad
StartHandle := FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button',
nil);
a podle nej se pokousim najit ten CD Player.
zkousel sem misto Shell_TrayWnd dat CDPlayer (tak se menuje project)
a misto 'button' dat 'Application'
Ale vzdy byla vysledkem nula.
Zkousel sem i Form1, 'Form', ale nic.
Diky za odpoved
Jeste jedno male upozorneni, pokud si budete zrizovat pripojeni RazDva, tak
pozor na ten skript, totalne vam rozhaze nastaveni IT, zejmena bacha na
nastaveni postovnich uctu v Outlooku.
----------------------------------
Hurricane
hurricane(zv)iol(tec)cz
http://web.telecom(tec)cz/LUNASoft
Connection Points
[*] jemeto <jemeto(zv)volny(tec)cz> - 30.3.2000 10:50:13
> Pokud te to zajima vic, tak nedavno vysla kniha "Delphi COM programming"
> (Eric Harmon), kde je toto popsane i s priklady.
>
> Petr Vones, amatersky programator
>
>
>
>
kde se da tato kniha koupi
Ukonceni screensaveru
[*] Pavel Sommer <p.sommer(zv)volny(tec)cz> - 30.3.2000 11:04:33
priklad>
procedure xxx; (nejlepe event OnTimer komp. TTimer)
var hHandle: THandle;
begin
hHandle:= FindWindow('WindowsScreenSaverClass', nil);
If hHandle <> 0 Then SendMessage(hHandle, WM_CLOSE, 0, 0);
end;
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
fejfarj(zv)atlas(tec)cz
Sent: Wednesday, March 29, 2000 5:22 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Ukonceni screensaveru
Ahoy vsichni ...
potreboval bych nakopnout spravnym smerem, jak z delphi aplikace ukoncit
bezici screensaver ...
diky moc za kazdej namet k premejsleni ...
Jirka
OT: Instalace RxLib2.75 do D4 std
[*] Honza <honl(zv)seznam(tec)cz> - 30.3.2000 11:07:33
Ahoj,
snazim se nainstalovat RxLib2.75 do D4 std. presne tak jak je pospsano v popisu instalace, ale bohuzel se mi neobjevi zalozka RX DBAware, objevi se pouze Rx Controls a Rx Tools. Prosim poradte mi jak nainstalovat i komponenty s Rx DBAware. Lze to vubec do D4 std?
Dekuji.
S pozdravem
HonzaL
-- http://email.seznam(tec)cz
-- email zdarma na cely zivot
nefunguje mi MenuItem.Add - proc?
[*] Pavel Sommer <p.sommer(zv)volny(tec)cz> - 30.3.2000 11:36:38
Nevim proc, ale v D5 je problem v tom, ze menuitem s caption '-' tedy
separator nelze pridat do zadne jine menuitem polozky,
pokud ji tam pridavas jako prvni.
zkus>
var MyMenuItem: Array [0..1] of TMenuItem;
begin
MyMenuItem[0]:= TMenuItem.Create(Self);
MyMenuItem[0]:= 'lkjlkj';
Pokus1.Add(MyMenuItem[0]);
MyMenuItem[1]:= TMenuItem.Create(Self);
MyMenuItem[1]:= '-';
Pokus1.Add(MyMenuItem[1]);
end;
- bude to fungovat, ale budes mit pred tim separatorem jeste jednu polozku.
Pokud ji tam nechces, zkus nastavit visible na False.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Ren�
Otisk
Sent: Saturday, January 01, 2000 2:38 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: nefunguje mi MenuItem.Add - proc?
Hi,
tusim, neni treba zadat parenta?
NewItem.Parent := ...
Sroub
> Zdravim,
>
> potreboval bych za behu programu vytvaret polozky menu. Ale ono mi to
nejde, pritom snad pouzivam standardni kod (dokonce opsany z helpu):
>
> var
> NewItem: TMenuItem;
> begin
> { first create the separator }
> NewItem := TMenuItem.Create(Self);
> NewItem.Caption := '-';
> { add the new item to the Windows menu }
> pokus1.Add(NewItem);
> end;
>
> "pokus1" je TMenuItem. Kdyz kod vykonam, kde nic tu nic. Nevite cim to
muze byt? Pouzivam D5 C/S a toto je jedina metoda v nove aplikaci.
>
> S pranim hezkeho dne
>
> Daniel Martinec
>
> Btw, takovych problemu mam vic, ze nechodi veci co jsou deklarovane v
helpu, napr. nefunkcnost parametru v udalosti onLogin u TIBDatabase nebo
nefunkcnost locate u TIBQuery.
sp_AddLogin
[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 30.3.2000 11:37:18
Mam program napsany v D5 enterprise SP1, a MS SQL 7 SP1. Pro pristup k
databazi pouzivam SQL linky dodavane Borlandem. Z Delphi volam pres
komponentu TQuery nasledujic posloupnost SQL prikazu:
USE Master
sp_AddLogin ....
v konfiguraci D3, MS SQL 6.5 vse fungovalo. V nove konfiguraci se
sp_AddLogin neprovede.
V tracu od SQL se objevi
USE Master
nasledovany radou vypisu
sp_addlogin was found in the text of this event
The text has been replaced with this comment for security reasons
V�ce�adkov� DB Grid
[*] Radek Janu� <janus(zv)foresta(tec)cz> - 30.3.2000 11:43:42
Ahoj pot�eboval bych poradit jak napsat DBGrid, kter� by moh m�t v jedn�
bu�ce v�ce ��dk�.
D�ky za ka�d� typ a odkaz Radek
TMessage
[*] Pavel Sommer <p.sommer(zv)volny(tec)cz> - 30.3.2000 12:02:19
Nastav na form keypreview na true a obsluhuj udalost onkeydown pouze na
form.
Bude ti to tak odchytavat stisky z jakekoli komponenty, kterou na ty form
mas.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Jiri Toman
Sent: Monday, March 20, 2000 2:02 PM
To: Konference
Subject: TMessage
Ahoj vsici vespolek.
Mam jeden dotaz ohledne odchytavani zprav.
Podotykam, ze jde jen o cvicny priklad bez konkretniho vyuziti.
Chtel bych odchytavat napr. message WM_KEYDOWN v ramci cele
aplikace. Tedy i ve vsech komponentach na Formu. Pokud Form
nema zadnou komponentu (napr. Memo) tak pri stisku klavesy
odchytnu udalost WM_KEYDOWN v pohode takto.
..........
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
procedure zprava(var mess:TMessage); message WM_KEYDOWN;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.zprava(Var mess:TMessage);
Begin
If mess.Msg = WM_KEYDOWN then
Begin
If mess.WParam = 13 then
showmessage('Enter stisknul');
End;
inherited;
End;
End.
Jak dam ,ale na Form treba Memo tak pri spusteni aplikace ma Focus Memo
a kdyz stisknu Enter tak ta zprava jde do Mema a nechytnu ji.
Jde mi o to jak udelat obsluhu nejake zpravy (nemusi byt WM_KEYDOWN),
abych ji mohl chytat v ramci cele aplikace. Je mi jasne, za treba Memo
ma OnKeyDown
a tam si mohu chytat jakoukoli klavesu, ale tak to delat nechci.
Taky by se to dalo vyresit takto, ale to bych musel pro kazdou
komponentu psat
proceduru na zpravu.
type
TMujMemo = Class(TMemo)
protected
private
procedure zpravaMemo(var mes:TMessage); message WM_KEYDOWN;
End;
TForm1 = class(TForm)
Memo1:TMemo;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
Memo2:TMujMemo;
implementation
{$R *.DFM}
procedure TMujMemo.zpravaMemo(Var mes:TMessage);
begin
If mes.Msg = WM_KEYDOWN then
begin
If mes.WParam = 13 then
showmessage('Enter stisk');
end;
inherited;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Memo2:=TmujMemo.Create(Self);
Memo2.Parent:= Self;
Memo2.Left:=70;
Memo2.Width:= 200;
Memo2.Height:=200;
end;
end.
Urcite se to da resit nejak elegantneji.
Predem dekuji za jakykoliv namet ci reseni.
Jirka T.Form�t Excel souboru ?
[*] Radek Janu� <janus(zv)foresta(tec)cz> - 30.3.2000 12:04:42
Potreboval bych nekde sehnat form�t excel souboru
*.xls - nev�te nekdo kde by se to dalo spla�it ?
D�ky Radek
TOpenDialog
[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 30.3.2000 11:50:57
Mrkni do archivu konference:
http://www.delphi(tec)cz/soubor.asp?rok=1998&mesic=Feb&den=26&first=16&soubor=dl
faaaat.htm
----- Original Message -----
From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, March 30, 2000 7:34 AM
Subject: Re: TOpenDialog
> To by bylo, ale pripada mi to slozitejsi. Snazil jsem se jit tou lehci
> cestou. Takze pokud by slo rozsirit stavajici dialog, predstavoval bych si
> to tak, ze v nem bude jeden TPanel a v nem asi 10 TLabelu, ktere zmeni
obsah
> na zaklade vyberu souboru. Pokud mas reseni, uvitam jakykoliv napad.
>
> Dik. Jara.
> >
> > Ahoj,
> >
> > a nebylo by lepsi spise rozsirit stavajici dialog ?
> >
> > Petr Vones, amatersky programator
> >
> >
> >Form�t Excel souboru ?
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 30.3.2000 13:15:14
opet a zas hledej na http://www.wotsit.org
zadej xls a stiskni Search
Pavel
----- Original Message -----
From: Radek Janus <janus(zv)foresta(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, March 30, 2000 12:04 PM
Subject: Form�t Excel souboru ?> Potreboval bych nekde sehnat form�t excel souboru
> *.xls - nev�te nekdo kde by se to dalo splasit ?
> D�ky Radek
>
>Ikona aplikace
[*] Karel Klime� <kchodl(zv)email(tec)cz> - 30.3.2000 13:25:18
> Ahij Delphici,
> mam malicky dotazek. Mam aplikaci ktere je prirazena vlastni ikona jak v
> Project/Options/Application/Load Icon tak v property Icon hlavniho
> formulare. Pokud ale neudelam ve FormCreate Application.Icon.LoadFromFile(),
> tak se mi tato ikona neobjevi v liste aplikace kdyz ji minimalizuji. Chtel
> bych aby soubor icony (.ico) nemusel byt na disku ale aby ikona byla
> soucasti .exe. Jde to nejak udelat?
>
> Dik. Jara.
Ahoj,
nejdrive si pomoci "Image editoru" vytvor novy RES soubor, ve kterem vytvoris
svou ikonu (i vice). Do jednotky, za deklaraci "implementation" potom pridas
direktivu {$R nazev.RES}. Potom lze:
...
...
procedure TForm1.Button1Click(Sender: TObject);
var
Icon : HIcon;
begin
Icon:=LoadIcon(HInstance,'ICON'); //nacte ikonu z resource
if Icon=0 then
raise Exception.Create('Error load icon');
Application.Icon.Handle:=Icon; //priradi ikonu
end;
...
...
Progr-Amather -Kchodl-(r) 1989-2000
V�ce�adkov� DB Grid
[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 30.3.2000 13:33:49
Napriklad ExDbGrid je FW a je k dohledani na www.delphipages.com (hledat
string "exdb").
Ales
> Ahoj pot�eboval bych poradit jak napsat DBGrid, kter� by moh m�t v jedn�
> bu�ce v�ce ��dk�.Pouziti interface
[*] Tom� Br�dle������i�^����? - 30.3.2000 13:52:46
>
> Ahoj,
>
> mozne to je, podobny pripad najdes treba v Delphi Enterprise v tride
TDataSet.
>
> Petr Vones, amatersky programator
>
>
Dival jsem se tam a mam doplnujici otazecku: ten IProviderSupport nema
Intf.Id.
Proc? Asi ho tedy pokazde mit nemusi, ale kdy?
Diky
Tomas
t.bradle(zv)pvtnet(tec)cz
Ukonceni screensaveru
[*] fejfarj(zv)atlas(tec)cz - 30.3.2000 13:53:09
>procedure xxx; (nejlepe event OnTimer komp. TTimer)
>var hHandle: THandle;
>begin
> hHandle:= FindWindow('WindowsScreenSaverClass', nil);
> If hHandle <> 0 Then SendMessage(hHandle, WM_CLOSE, 0, 0);
>end;
zkousel jsem to ... ve Win95 je to OK, ale ve WinNT to nefunguje ...
nevite nekdo co s tim ... ?
diky Jirka ...handle komponenty
[*] Pavel Kahle <kahle(zv)atlas(tec)cz> - 30.3.2000 14:09:56
Zdravim,
1. pokousim se pomoci setcapture v komponente zdedene z z TGraphicControl
zachytit udalosti mysi,
ale neznam handle komponenty, jak se da zjistit ?
2. nepracuje mi ani DrawFocusRect(Canvas.handle , XRect);
Mam zadavat Canvas.handle ?
Diky P.Kahle
Kontrola polo�iek datab�zy
[*] Martin Klepoch <klepoch(zv)trexima.sk> - 30.3.2000 15:24:54
Neviete mi niekto poradi� ako by som po�as zad�vania d�t do tabu�ky z�rove� kontroloval aj ich spr�vnu hodnotu, napr. pri zad�van� I�A aby program kontroloval �i je to I�O v��ie ako 0. Chcel by som to ov�em spravi� tak aby som zoznam t�ch kontr�l mal v externej tabu�ke a pri �tarte aplik�cie by som ich nejako potreboval natiahn�� do programu a aktivova�. Ja som zatia� v helpe na�iel nie�o ako constraints ale neviem sa z toho dosta�, neviem to zrealizova�.
Za ka�d� radu vopred �akujem.
Martin Klepoch
Adoexpres
[*] Martin <geoplan(zv)pp.sinet.sk> - 30.3.2000 15:39:08
Dobry,
mam jednu tabulku. Na nu som napojeny pomocou komponent AdoExpress z D5.
Jedna komponenta AdoTable je napojena na tuto tabulku a taktiez jedna AdoQuery. Ak zmenim nieco cez komponentu AdoTable, v AdoQuery mam stale stary stav. Skusal som to obnovit ze po zmene v AdoTable spravim na ADoQuery aktive false a true, ale DBGRID napojeny na ADoQuery mi preblikne. Ako na to ist ?
MArtin
TEXT parameter v CREATE PROCEDURE
[*] Marian Hatala <emha(zv)mailbox.sk> - 30.3.2000 14:57:32
D4, MS SQL 7, W98
Zdravicko.
Neviem si poradit s jednym problemom. Potreboval by som ako vystupny
parameter ulozenej procedury preniest parameter type TEXT. Neviem vsak
akym sposobom je mozne do takehoto parametra zapisat nejaku hodnotu.
Skusal som
UPDATETEXT NazovProcedury.[(zv)NazovParametra]
(zv)PtrTxt
NULL
NULL
'pokusny text'
Takyto zapis je sice syntakticky spravny, ale pri vyvolani procedury
dostanem chybu, ze objekt "NazovProcedury" je neznamy.
Ked som skusil iba nazov premennej tak to nepreslo ani syntakticky -
zrejme je tam natvrdo kontrola na existenciu tabulky
(zv)PtrTxt je pointer na textovy parameter (zv)NazovParametra ziskany
funkciou TEXTPTR
Podla SQL BOL je parameter typu TEXT pre proceduru mozny, nikde som
vsak nenasiel priklad ako sa to da spravit.
Skusal ste niekto take nieco take, neviete ako by slo urobit ? eMHa
emha(zv)mailbox.sk
ADONIS - jak zjistit jakou chybu serveru
[*] Michal K�s <kus(zv)tangosw(tec)cz> - 30.3.2000 16:18:36
Dobry den,
Asi trivialni dotaz.
SQL serveru se nelibi nejaka data, a ja bych potreboval
zjistit co se mu nelibi, abych mohl nejak rozumne reagovat.
Je nejaka jina moznost ne� rozebirat text message u vyjimky?
ing. Michal K�s
TANGO software s.r.o.
pokladn� syst�my pro restaurace a obchody
Krymsk� 42
360 01 Karlovy Vary
017/32 264 68, 32 258 86
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz
problem s Delphi debugerem ??
[*] Michal Levy <M.Levy(zv)sh.cvut(tec)cz> - 30.3.2000 16:40:29
Zdravim Delfaci
Mam takovy problem, snad nekdo z vas bude vedet, cim je zpusobeny.
Naimportoval jsem si do Delph activeX komponentu Windows Media Player, hodil
na form ctyri panely, do nich po jednom playeru, nastavil par propert atd
atd. Nic sloziteho ani zaludneho. Jenze kdyz tenhle programek pustim v
Delphach a zacnu si hrat s ovladacimi prvky tech prehravacu, tak drive nebo
pozdeji Delphi ten program zastavi a vyhodi message box "Invalid thread
number: xxx". Kdyz se ho pokusim zastavit, tak Delphi vytuhnou takovym
zpusobem, ze je musim sestrelit z task manageru. Casto po sobe ten programek
ani nezavrou ;-( Dela to vzdy, kdyz je tech prehravacu vice nez jeden.
Jenze kdyz ten program pustim mimo Delphi, tak jede uplne v pohode !!!!!!!!
Takze proto jsem zvolil %subj% prave takhle.
Nevi nekdo co s tim ?? Nemuzu to ladit !!!!!!!!!!!! ;-(
Tohle vsechno se deje v D4 i v D5. U obou mam posledni service pack.
Operacni system W2000 Pro final.
Mel bych tedy jeste jeden dotaz. Kdyz odstrelim Delphi a oni nechaji
otevreny ten program, tak nejde sestrelit z task managera. Vzdy pise ze
proces je laden a ze na to nema prava atd. Windows ale musi mit nejaky
mechanismus, jak ho odstrelit, protoze kdyz je restartnu, tak ho ukonci.
Nevite jak ten program odstrelit ?? Nefunguje ani programek "kill", ktery je
v Microsoft Platform SDK (zadny MS figl ;-(( .......skoda).
Diky za vas cas
Michal Levy
HWND Aplikace
[*] Libor Junek <libor(zv)thsoft(tec)cz> - 30.3.2000 17:15:14
Nevite nekdo jak bych mohl zjistit v DLL handle aplikace ktera ji vola?
Pokud jsem mel tuto knihovnu pod D4 tak to slo kdyz jsem si v knihovne zadal Application.Title a pak FindWindow. Primo pres Application.Handle to neslo vracelo mi to 0. Jenze ted jsem tu knihovnu prelozil
do D5 a tam mi Application.Title vraci nesmysl (nazev souboru bez pripony).
Muzete mi teda nekdo poradit jak by se to dalo nejak obejit?
Predem diky.
Libor Junek
Adoexpres
[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 30.3.2000 17:27:44
S AdoExpresom som sice nepracoval, ale predpokladam, ze komponenty su odvodene od TDataSet a tym padom maju metody DisableControls a EnableControls. Takze staci pred Active:= False dat DisableControls a po Active:= True EnableControls a DBGrid nebude preblikavat (este by sa zislo vystavit sa na povodny zaznam cez Locate).
mam jednu tabulku. Na nu som napojeny pomocou komponent AdoExpress z D5.
Jedna komponenta AdoTable je napojena na tuto tabulku a taktiez jedna AdoQuery. Ak zmenim nieco cez komponentu AdoTable, v AdoQuery mam stale stary stav. Skusal som to obnovit ze po zmene v AdoTable spravim na ADoQuery aktive false a true, ale DBGRID napojeny na ADoQuery mi preblikne. Ako na to ist ?
MArtin
Exclusive access
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 30.3.2000 18:09:50
----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
Sent: Tuesday, March 28, 2000 10:14 PM
Subject: IB: Exclusive access
> Zdravim
>
> Ako zabezpecim excluzivny pristup k databazy, poste potrebujem aby nebolo
> mozne sa prihlasit v danom momente inym uzivatelom.
>
IB Server Manager: Menu Maintenance/Database Shutdown...
- zaruci, ze pristup k databaze bude iba administratorovi. Predpoklada sa
ovsem, ze ostatni uzivatelia nepoznaju heslo pre administratorsky pristup
:-))
Pavol Stolc
pstolc(zv)sc.sknet.sk
JPEG v DOSu
[*] Gadourek <gadourek(zv)centrum(tec)cz> - 30.3.2000 18:12:27
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj,
nevite nekdo o kusu programu v Borlan Pascalu 7 pro zobrazovani JPEG obrazku?
Diky Pert Gadourek
TIBDatabase OnLogin - Proc to v D5 nechodi?
[*] danikonf(zv)atlas(tec)cz - 30.3.2000 18:20:22
Zdravim,
pokud pouzivam komponentu TDatabese, muzu si na
udalost OnLogin teto komponenty navesit vlastni
prihlasovaci dialog (moje verze v nejjednodussi
variante):
procedure TDataModule2.Database1Login(Database:
TDatabase;
LoginParams: TStrings);
var
lstUserName : string;
lstPasswd : string;
begin
lstUserName := 'SYSDBA';
lstPasswd := 'masterkey';
LoginParams.Values['USER NAME'] := lstUserName;
LoginParams.Values['PASSWORD'] := lstPasswd;
end;
Pokud se o to same pokusim u komponenty
TIBDatabese, prihlaseni se mi nepovede
(kompilace probehen bez problemu, ale za behu se
ohlasi chyba, ze "Your user name and passwd are
not defined ...). Nevite nekdo co stim? (U
TIBDatabese je LoginParams.Values['USER NAME']
predefinovano na
LoginParams.Values['USER_NAME'].)
Diky za radu, s pranim hezkeho dne
Daniel Martinec
FileVersion at runtime
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 30.3.2000 18:29:33
Zdravim !
Prosim o radu, jak zjistit a v programu zobrazit hodnotu FileVersion
nastavenou v Project/Options zalozka Version Info. (Delphi 4, Win NT 4.0
wks)
Dekuji.
Martin Dietl
TOpenDialog
[*] Jan Votava <djsoft(zv)top(tec)cz> - 30.3.2000 18:38:07
> > Mam v aplikaci TOpenDialog a potreboval bych k tomuto dialogu prilepit
jeste
> > jiny vlastni dialog s tim, ze se oba budou chovat jako jeden celek
(budou se
> > pohybovat spolu). Nevim ovsem jak zjistit polohu TOpenDialog (Left, Top,
>
> Ahoj,
>
> a nebylo by lepsi spise rozsirit stavajici dialog ?
>
To by mne taky zajimalo. A jak na to?
Honza
OT: format Macromedia Flash
[*] Jan Votava <djsoft(zv)top(tec)cz> - 30.3.2000 18:40:47
Ahoj,
nemate nekdo popis formatu .swf prinalezejic programu Macromedia Flash? Nebo
nejaky odkaz na program, ktery by jej dokazal dynamicky modifikovat /
generovat? Vim o moznosti predavat hodnoty promennych do plug-inu, ale nekdy
se hodi radeji generovani.
Honza.FileVersion at runtime
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.3.2000 18:42:37
Ahoj,
moznosti mas nekolik. Jedna je na
http://atrey.karlin.mff.cuni(tec)cz/~rk/fileversion.shtml (komponenta
cetne zdroje).
Slavek
> Zdravim !
>
> Prosim o radu, jak zjistit a v programu zobrazit hodnotu FileVersion
> nastavenou v Project/Options zalozka Version Info. (Delphi 4, Win NT 4.0
> wks)
>
> Dekuji.
> Martin Dietl
>
>
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
QuickReport - prevod ze stare verze
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 30.3.2000 18:55:42
Mam aplikaci vytvorenou v Delphi 2, kde jsem mel QuickReport verze 1.1
Chtel jsem aplikaci prevect do Delphi 5. Nebojacne jsem se na to vrhnul v
ocekavani, ze mi to nezabere vice nez pul hodiny vzhledem k tomu, ze v
aplikaci pouzivam jen standardni komponenty a nic specialniho tam nemam.
Otevrel jsem ji v Delphi 5 a zacal kompilovat ... Jenze rana pod pas. V
Delphi 5 je QuickReport ve verzi 3.0 a to je uplne neco jineho. Jine nazvy
komponent (misto TQuickReport tam je TQuickRep), uplne jina prace s TQRBand.
Vsechny komponenty maji uplne jine property a eventy. Proste to vubec nejde
prevest. Jedine cele udelat znovu. Co s tim? Existuje nejake reseni nebo
fakt budu muset vsechny tiskove sestavy vyrabet znovu a moje predpokladana
pulhodina se roztahne na pulmesic?
================================
Ing. Petr Slovak
e-mail: petr(zv)trilog(tec)cz
url: http://www.trilog(tec)cz
tel: 0603 / 501 642
SMS: +420603501642(zv)sms.paegas(tec)cz
================================
Track bar komponenta
[*] Michal Levy <M.Levy(zv)sh.cvut(tec)cz> - 30.3.2000 21:37:39
Zdravim
Potreboval bych nejakou komponentu, jako je track bar ve Windows Media
Player.
Standardni Windowsovska v Delphach mi nevyhovuje. Potrebuju trochu vic
messagu behem dragu (jako BeginDrag, EndDrag, MouseMove atd).
Prohledal jsem dost sajt, ale nikde nic kloudnyho a nechce se mi to psat.
Nevite o necem ? Klidne i ActiveX.
Diky moc
Michal Levy Connection Points
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:57:52
From: jemeto <jemeto(zv)volny(tec)cz>
> > Pokud te to zajima vic, tak nedavno vysla kniha "Delphi COM programming"
> > (Eric Harmon), kde je toto popsane i s priklady.
> kde se da tato kniha koupi
Ahoj,
Treba tady. U nas by to mohla mit Vltava, ale nenasel jsem to tam a navic to
vetsinou maji i dost drahe. Nejakou zahranicni literaturu taky nabizi tusim
Inprise CZ (vzhledem k ne vzdy zrovna jednoduche dostupnosti), zkus se tam
taky podivat.
http://www.newriders.com/
http://www.amazon.co.uk/
http://www.fatbrain.com/
Petr Vones, amatersky programator
nefunguje mi MenuItem.Add - proc?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:37
From: Pavel Sommer <p.sommer(zv)volny(tec)cz>
> Nevim proc, ale v D5 je problem v tom, ze menuitem s caption '-' tedy
> separator nelze pridat do zadne jine menuitem polozky,
> pokud ji tam pridavas jako prvni.
Ahoj,
V Delphi5 ma TMenu novou vlastnost AutoLineReduction. Pokud je nastavena
na maAutomatic (vychozi), tak jsou ostranovany "zbytecne" separatory.
Nastavenim na maManual toto vypnes.
Petr Vones, amatersky programator
TOpenDialog + neco zabavy na vikend :-)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:45
From: Jan Votava <djsoft(zv)top(tec)cz>
> > a nebylo by lepsi spise rozsirit stavajici dialog ?
> To by mne taky zajimalo. A jak na to?
Ahoj,
Priklad najdes treba tady:
ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Api/DelphiDays99_DialogTemplate.zip
A ted ta zabava:
http://pes.eunet(tec)cz/cgi-bin/rb_getpriloha.pl?ostatni/legrace/2000/03/30/priloha20000330ast4
Petr Vones, amatersky programator
problem s Delphi debugerem ??
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:18
From: Michal Levy <M.Levy(zv)sh.cvut(tec)cz>
> atd. Nic sloziteho ani zaludneho. Jenze kdyz tenhle programek pustim v
> Delphach a zacnu si hrat s ovladacimi prvky tech prehravacu, tak drive nebo
> pozdeji Delphi ten program zastavi a vyhodi message box "Invalid thread
> number: xxx". Kdyz se ho pokusim zastavit, tak Delphi vytuhnou takovym
> zpusobem, ze je musim sestrelit z task manageru. Casto po sobe ten programek
> ani nezavrou ;-( Dela to vzdy, kdyz je tech prehravacu vice nez jeden.
> Jenze kdyz ten program pustim mimo Delphi, tak jede uplne v pohode !!!!!!!!
Ahoj,
Podobne zkusenosti mam pri ladeni kodu u standartnich dialogu, puvodne jsem
myslel ze je to problem Win95, ale jak vidim, tak se to stava i na W2000.
Pokud se ti ta chyba objevuje *VZDY* tak by s tim slo mozna neco delat.
Mas nejaky co nejjednodussi priklad, kdy se to pokazde projevi ?
> mechanismus, jak ho odstrelit, protoze kdyz je restartnu, tak ho ukonci.
> Nevite jak ten program odstrelit ?? Nefunguje ani programek "kill", ktery je
> v Microsoft Platform SDK (zadny MS figl ;-(( .......skoda).
Obavam se, ze v tomto pripade jde o tak "zavaznou" chybu, ze restart bude
jedinym resenim. Tak je tomu u Win95, i kdyz u NT bych predpokladal vetsi
robustnost.
Petr Vones, amatersky programator
Pouziti interface
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:32
From: Tom� Br�dle <t.bradle(zv)pvtnet(tec)cz>
> Dival jsem se tam a mam doplnujici otazecku: ten IProviderSupport nema
> Intf.Id.
> Proc? Asi ho tedy pokazde mit nemusi, ale kdy?
Ahoj,
Nemusi, ale tento pristup neni prilis vhodny. Pak totiz nemuzes pouzivat
metodu GetInterface a operator as (pro dotaz na interface). Pokud budes
definovat vlastni interface, mel by jsi jim IID vzdy priradit. Delphi
editor umi primo generovat GUIDy na Ctrl+Shift+G, takze je to docela
pohodlne.
Petr Vones, amatersky programator
handle komponenty
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:26
From: Pavel Kahle <kahle(zv)atlas(tec)cz>
> 1. pokousim se pomoci setcapture v komponente zdedene z z TGraphicControl
> zachytit udalosti mysi,
> ale neznam handle komponenty, jak se da zjistit ?
Ahoj,
TGraphicControl neni potomkem TWinControl, takze nema ani Handle. Tyto
komponenty si obsluhuje VCL svym vlastnim zpusobem.
> 2. nepracuje mi ani DrawFocusRect(Canvas.handle , XRect);
> Mam zadavat Canvas.handle ?
Takhle to funguje:
type
TMyGraphicControl = class(TGraphicControl)
protected
procedure Paint; override;
end;
{ TMyGraphicControl }
procedure TMyGraphicControl.Paint;
begin
DrawFocusRect(Canvas.Handle, ClientRect);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
with TMyGraphicControl.Create(Self) do
begin
SetBounds(10, 10, 100, 50);
Parent := Self;
end;
end;
Petr Vones, amatersky programator
Nastaveni fontu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:02
From: garalda <garalda(zv)mail(tec)cz>
> >> Nezkouseli jste nekdo nastavovat font u Hintu?
> Pro verzi D4 Pro. (Ja hlava dubova. :-)
Ahoj,
Nemam ted moznost to zkusit v D4, ale mohlo by to jit takhle:
type
TMyHintWindow = class(THintWindow)
public
constructor Create(AOwner: TComponent); override;
end;
{ TMyHintWindow }
constructor TMyHintWindow.Create(AOwner: TComponent);
begin
inherited;
Canvas.Font.Size := 15; // nastaveni fontu
end;
initialization
HintWindowClass := TMyHintWindow;
end.
Petr Vones, amatersky programator
Form�t Excel souboru ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.3.2000 23:58:21
From: Radek Janu? <janus(zv)foresta(tec)cz>
> Potreboval bych nekde sehnat form�t excel souboru
> *.xls - nev�te nekdo kde by se to dalo spla�it ?
Ahoj,
XLS soubory jsou OLE Structured Storage, ale blizsi popis dat v nem ulozenych
budes muset asi hledat nekde na Internetu.
Petr Vones, amatersky programator
Connection Points
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 31.3.2000 00:13:10
>From: jemeto <jemeto(zv)volny(tec)cz>
>> > Pokud te to zajima vic, tak nedavno vysla kniha "Delphi COM programming"
>> > (Eric Harmon), kde je toto popsane i s priklady.
>> kde se da tato kniha koupi
>
>Ahoj,
>
>Treba tady. U nas by to mohla mit Vltava, ale nenasel jsem to tam a navic to
>vetsinou maji i dost drahe. Nejakou zahranicni literaturu taky nabizi tusim
>Inprise CZ (vzhledem k ne vzdy zrovna jednoduche dostupnosti), zkus se tam
>taky podivat.
>
>http://www.newriders.com/
>http://www.amazon.co.uk/
>http://www.fatbrain.com/
>
>Petr Vones, amatersky programator
>
Ptal jsem se na tuhle knizku u Starmana, a tam mi sdelili, ze by ji
dovezli za 2132 Kc.
http://www.starman.net
Radim Kunz
FileVersion at runtime
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 31.3.2000 07:12:58
Taky muzes zkusit http://home.worldonline(tec)cz/~cz142548/
----- P�vodn� zpr�va -----
Od: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 30. b�ezna 2000 18:42
P�edm�t: Re: FileVersion at runtime
> Ahoj,
>
> moznosti mas nekolik. Jedna je na
> http://atrey.karlin.mff.cuni(tec)cz/~rk/fileversion.shtml (komponenta
> cetne zdroje).
>
> Slavek
>
> > Zdravim !
> >
> > Prosim o radu, jak zjistit a v programu zobrazit hodnotu FileVersion
> > nastavenou v Project/Options zalozka Version Info. (Delphi 4, Win NT 4.0
> > wks)
> >
> > Dekuji.
> > Martin Dietl
> >
> >
>
>
> -------------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> -------------------------------------------------
> http://www.swnet(tec)cz
> Magazin informacne vyspelych jedincu
> -------------------------------------------------
>QuickReport - prevod ze stare verze
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 31.3.2000 07:27:48
Ahoj,
Tenhle problem mam take. Zkusil jsem to nejprve p�ev�st do Delphi 3, kter�
um� jist�m zp�sobem konvertovat QR1.1 do QR2. Kazdy muj QRLabel je ale
obalen do SHAPE (jsou to v podstate tistene formulare) a i kdyz se prevod
povedl a formular byl v QR2, tak mi to znicilo vsechny SHAPE (resp.
postavilo je to do vychozich rozmeru). Tak jsem to zatim odlozil, protoze to
predelavat je hruza (jen SHAPE je na 600 v jednom formulari).
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Petr Slovak [SMTP:petr(zv)trilog(tec)cz]
> Odesl�no: 30. III 2000 18:56
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: QuickReport - prevod ze stare verze
>
> Mam aplikaci vytvorenou v Delphi 2, kde jsem mel QuickReport verze 1.1
> Chtel jsem aplikaci prevect do Delphi 5. Nebojacne jsem se na to vrhnul v
> ocekavani, ze mi to nezabere vice nez pul hodiny vzhledem k tomu, ze v
> aplikaci pouzivam jen standardni komponenty a nic specialniho tam nemam.
> Otevrel jsem ji v Delphi 5 a zacal kompilovat ... Jenze rana pod pas. V
> Delphi 5 je QuickReport ve verzi 3.0 a to je uplne neco jineho. Jine nazvy
> komponent (misto TQuickReport tam je TQuickRep), uplne jina prace s
> TQRBand.
> Vsechny komponenty maji uplne jine property a eventy. Proste to vubec
> nejde
> prevest. Jedine cele udelat znovu. Co s tim? Existuje nejake reseni nebo
> fakt budu muset vsechny tiskove sestavy vyrabet znovu a moje predpokladana
> pulhodina se roztahne na pulmesic?
>
> ================================
> Ing. Petr Slovak
> e-mail: petr(zv)trilog(tec)cz
> url: http://www.trilog(tec)cz
> tel: 0603 / 501 642
> SMS: +420603501642(zv)sms.paegas(tec)cz
> ================================
>
> TEXT parameter v CREATE PROCEDURE
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.3.2000 07:40:07
On 30 Mar 00, at 14:57, Marian Hatala wrote:
> Neviem si poradit s jednym problemom. Potreboval by som ako vystupny
> parameter ulozenej procedury preniest parameter type TEXT. Neviem vsak
> akym sposobom je mozne do takehoto parametra zapisat nejaku hodnotu.
> Skusal som
>
> UPDATETEXT NazovProcedury.[(zv)NazovParametra]
> (zv)PtrTxt
> NULL
> NULL
> 'pokusny text'
>
> ...
Zkus sem poslat celou proceduru vcetne deklarace tabulky, se
kterou procedura pracuje, resp. podstatny vyrez tehoz. Aby se to
dalo vzit a primo odzkouset.
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
HWND Aplikace
[*] Libor Junek <libor(zv)thsoft(tec)cz> - 31.3.2000 07:45:25
Tak to nebylo tim ze jsem to prevedl do D5 ale ze jsem zmenil nazev aplikace ktera vola knihovnu.
Do te doby to fungovalo protoze nahodou jsem mel stejny popisek a nazev exe.
Ale problem mam teda stejny. Jak zjistit v DLL Handle aplikace ktera ji vola?.
Slo by to resit tak ze bych z alikace Handle zapsal do souboru a v DLL ho pak precetl
jenomze to je dost nesikovne.
Libor Junek
Nevite nekdo jak bych mohl zjistit v DLL handle aplikace ktera ji vola?
Pokud jsem mel tuto knihovnu pod D4 tak to slo kdyz jsem si v knihovne zadal Application.Title a pak FindWindow. Primo pres Application.Handle to neslo vracelo mi to 0. Jenze ted jsem tu knihovnu prelozil
do D5 a tam mi Application.Title vraci nesmysl (nazev souboru bez pripony).
Muzete mi teda nekdo poradit jak by se to dalo nejak obejit?
Predem diky.
Libor Junek
problem s Delphi debugerem ??
[*] Ing. �ubom�r G�L - 31.3.2000 07:45:31
Windows Media Player je velmi agresivna a sebecka aplikacia (:-o)
LuGa
***************************
Lubomir "Levec" GAL, -LuGa
O.T.I., KR PZ Nitra, SK
mailto:gal(zv)minv.sk
***************************
handle komponenty
[*] Pavel Kahle <kahle(zv)atlas(tec)cz> - 31.3.2000 09:24:39
> > 1. pokousim se pomoci setcapture v komponente zdedene z z
TGraphicControl
> > zachytit udalosti mysi,
> > ale neznam handle komponenty, jak se da zjistit ?
>
> Ahoj,
>
> TGraphicControl neni potomkem TWinControl, takze nema ani Handle. Tyto
> komponenty si obsluhuje VCL svym vlastnim zpusobem.
Vim ze TGraphicsControl nema handle, ale muzu ji (resp. te komponente)
handle priradit ?
myslim, ze jsem nekde neco takoveho videl.
P.Kahle
OT: format Macromedia Flash
[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 31.3.2000 09:41:38
Popisy ruznych formatu jsou tusim na
www.worsite.org
### Jan Votava napsal dne 30 Mar 00, v 18:40 :
> nemate nekdo popis formatu .swf prinalezejic programu Macromedia Flash?
> Nebo nejaky odkaz na program, ktery by jej dokazal dynamicky modifikovat /
> generovat? Vim o moznosti predavat hodnoty promennych do plug-inu, ale
> nekdy se hodi radeji generovani.
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
Form�t Excel souboru ?
[*] Robert Kindl <rob(zv)exec(tec)cz> - 31.3.2000 09:51:18
Myslim, ze v tomto pripade je nejlepsi podivat se do MSDN Library,
kde je kompletni popis primo od Microsoftu.
Rob
> Potreboval bych nekde sehnat form�t excel souboru
> *.xls - nev�te nekdo kde by se to dalo splasit ?
> D�ky Radek
sp_AddLogin
[*] Robert Kindl <rob(zv)exec(tec)cz> - 31.3.2000 09:51:24
> Mam program napsany v D5 enterprise SP1, a MS SQL 7 SP1. Pro pristup k
> databazi pouzivam SQL linky dodavane Borlandem. Z Delphi volam pres
> komponentu TQuery nasledujic posloupnost SQL prikazu:
>
> USE Master
> sp_AddLogin ....
>
> v konfiguraci D3, MS SQL 6.5 vse fungovalo. V nove konfiguraci se
> sp_AddLogin neprovede.
> V tracu od SQL se objevi
>
> USE Master
>
> nasledovany radou vypisu
> sp_addlogin was found in the text of this event
> The text has been replaced with this comment for security reasons
To je celkem OK, nebot jednim z parametru je i password a
je jen dobre, ze ne kazdy si v trace toto heslo muze precist.
Neni problem spise v tom, ze volas explicitne proceduru
bez pouziti EXEC tedy:
USE Master
EXEC sp_addLogin ....
Rob
zarovnanie cisel
[*] Robert Zak <nrsys(zv)psn.sk> - 31.3.2000 09:58:58
Ako docielit aby boli v TEdit cisla zarovnane doprava. Ide mi o to aby cisla
ako (1500.20, 30.50) mali v dvoch editoch pod sebou zarovnanu desatinnu
bodku. Rovnako mi to nejde ani v TLabel.
Dakujem
Robo
Pouziti MSOE.DLL
[*] Dalibor Honus <dhonus(zv)iname(tec)com> - 31.3.2000 10:22:50
Nemate nekdo zkusenosti s pouzitim MSOE.dll pro ovladani Outlook Expresu
(msoeobj_tlb).
Nevim jak zacit.
Potrebuji cist zpravy z uciteho folderu. Diky za kazdou radu
____________________________________________
Dalibor Honus
Foto Morava s.r.o.
kancelar : 0656 - 721 190 kl.45
mobil : 0602 - 591341
domu : 0656 - 802 835
e-mail : dhonus(zv)fotomorava(tec)cz (dhonus(zv)iname.com)
____________________________________________
Zjisteni beziciho procesu
[*] Petr Ku�era <kucera(zv)vri(tec)cz> - 31.3.2000 09:42:05
Dobry den,
prosim Vas, da se nejak zjistit, zda nejaky proces spusteny z
aplikace pomoci WinExec, resp. CreateProcess, ci. ShellExecute je
stale aktivni (nekde je stale v cinnosti), popr. kdyz skoncil, jaky
ma ERRORLEVEL.
Dekuji.
Petr Kucera
Zistenie Login Name na MSSQL
[*] Miroslav Hro��o�����,�(�j�Z��3 - 31.3.2000 10:55:42
Dobry,
Potreboval by som poradit, ako zistit pocas behu programu, pod akym menom som prihlasen� k databaze.
Najlepsia by bola nejaka funkcia, alebo aj SQL pr�kaz.
Pracujem v WIN98, D5 a server je WINNT , MSSQL 7.0 .
Miro.DCOM
[*] Miroslav Hro��o�����,�(�j�Z��3 - 31.3.2000 11:03:58
Dobry,
Zhanam nejake informacie o DCOM-e najlepsie v elektronickej podobe aj s pr�kladmi.
Potrebujem take nieco z coho sa da nastudovat t�to forma programovania s vyuzitim na 3-vrstvovu aplikaciu.
Dalej sa chcem opytat ci niekto nevie ako je to s jej licenciou. Lebo tato komponenta sa v D5 nachadza v skupine komponent Midas (tie su trocu pridrahe) , ale pocul som zasa aj, ze je zadarmo. Takze sa chcem spytat ako to vlastne je v skutocnosti ?
Miro.HWND Aplikace
[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 31.3.2000 10:10:22
No, pokud jeste muzes zmenit parametry volani
te funkce, tak zkus tohle:
function Funkce(AHandle: THandle;...
begin
Application.Handle := AHandle;
...
Application.Handle := 0;
end;
AHandle bude samozrejme handle volajici aplikace -:)
Ahoj
Tomas Bihary
----- Original Message -----
From: Libor Junek
To: Konference Delphi
Sent: Thursday, March 30, 2000 4:15 PM
Subject: HWND Aplikace
Nevite nekdo jak bych mohl zjistit v DLL handle aplikace ktera ji vola?
Pokud jsem mel tuto knihovnu pod D4 tak to slo kdyz jsem si v knihovne zadal
Application.Title a pak FindWindow. Primo pres Application.Handle to neslo
vracelo mi to 0. Jenze ted jsem tu knihovnu prelozil
do D5 a tam mi Application.Title vraci nesmysl (nazev souboru bez pripony).
Muzete mi teda nekdo poradit jak by se to dalo nejak obejit?
Predem diky.
Libor Junek
FileVersion at runtime
[*] Foldyna Jir� <jiri.f(zv)avizo(tec)cz> - 31.3.2000 11:58:41
> > > Prosim o radu, jak zjistit a v programu zobrazit hodnotu
> FileVersion
> > > nastavenou v Project/Options zalozka Version Info.
> (Delphi 4, Win NT 4.0
> > > wks)
Ahoj,
ja pouzivam tohle:
(**********************************************************************)
{* GetVersionText *}
(**********************************************************************)
function GetVersionText : string;
var
V1, V2, V3, V4: word;
VerInfoSize: DWORD;
VerInfo: Pointer;
VerValueSize: DWORD;
VerValue: PVSFixedFileInfo;
Dummy: DWORD;
begin
VerInfoSize := GetFileVersionInfoSize(PChar(ParamStr(0)), Dummy);
if VerInfoSize = 0 then
begin
Result := 'unknown';
end
else
begin
GetMem(VerInfo, VerInfoSize);
GetFileVersionInfo(PChar(ParamStr(0)), 0, VerInfoSize, VerInfo);
VerQueryValue(VerInfo, '\', Pointer(VerValue), VerValueSize);
with VerValue^ do begin
V1 := dwFileVersionMS shr 16;
V2 := dwFileVersionMS and $FFFF;
V3 := dwFileVersionLS shr 16;
V4 := dwFileVersionLS and $FFFF;
end;
FreeMem(VerInfo, VerInfoSize);
Result := Format('%d.%d.%d.%d', [V1, V2, V3, V4]);
end;
end;
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Windows registers
[*] Ing. Jiri Novacek <JNovacek(zv)spst(tec)cz> - 31.3.2000 12:00:09
Ahoj lidi.
Potrebuji nejak prohlednout vsechny registry windows.
Neco jako cyklus od prvniho do posledniho a najit ten kde je obsa�en
prislusny retezec.
Kdyz znam "OpenKey" tak uz jednotlive registry projdu, ale kdyz ja nevim
kde vsude hledany retezec je.
Predem dekuji za pomoc
--
Jirka
Jak udelat: Nacteni dotazu a editace vysledku jen
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.3.2000 12:01:51
On 30 Sep 00, at 12:04, Erik Salaj wrote:
> > Mno, u vicevrstveho architektury mam smisene pocity. Napriklad
> > idea tlusteho serveru a tenkych klientu se mi dvakrat nezamlouva.
> > Pokud se vetsina zateze necha na serveru, pak lze za urcitych
> > okolnosti snadno pretizit i velmi vykonny stroj. Tato idea muze byt
> > vhodna pro web, kde je treba maximalne setrit na prenosech dat, ale
> > ve firemni siti bych naopak radeji zatizil klienty a ulevil serveru.
>
> Netreba to asi brat prilis doslovne. Z urciteho hladiska (napr.
> bezpecnost, spolahlivost, jednoduchost udrzby) je vyhodne mat udaje
> ulozene a spracovavane na kvalitnejsich serveroch. Urcite operacie
> vsak moze vykonavat aj client (prezeranie a zadavanie udajov a
> jednoduche operacie, ktore s tym suvisia, povedzme nejaky filter,
> triedenie, hladanie v mnozine dat na klientovi vtedy nie je potrebne
> zatazovat server). Pokial sa najde vhodny kompromis, t.j. zatazit
> server len na nevyhnutnu dobu a prenasat co najmenej udajov, tak to
> moze byt dobre riesenie i pre web i pre firemnu siet. ADO tieto
> myslienky podporuje a poskytuje mechanizmy ako klientsky kurzor
> (zakladne operacie na klientovi), disconnected recordset a remote
> recordset (prenos dat medzi klientom a serverom). MIDAS tiez poskytuje
> v principe rovnake moznosti.
Jiste. Protoze jsem ADO ani MIDAS v tomto smeru detailne
nestudoval, nevim, jak velkou flexibilitu nabizeji. Nicmene pokud si
chces ridit rozlozeni zateze mezi klienta a server opravdu do
dusledku, myslim, ze se stejne rucni praci nevyhnes ani s temito
technologiemi.
> > Zde mas tedy na vyber - muzes pouzit RDS spolu s ADO, nebo si
> > to pomoci OLE DB udelat uplne po svem - tedy usit na miru. Coz
> > muze i znamenat, ze velky balik na serveru zkomprimujes, posles
> > klientu, ktery si ho rozbali. :-)
>
> Zda sa mi jednoduchsie a vyhodnejsie pouzit RDS ako si komprimovat a
> prenasat udaje vlastnym sposobom.
Jednodussi urcite. A pro radu reseni nejspis i vyhodnejsi. Ovsem
pak obcas musis resit problem, proc to tak dlouho trva a ten cas
ztratis stejne. :-)
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
handle komponenty
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 31.3.2000 12:23:06
> > > 1. pokousim se pomoci setcapture v komponente zdedene z z
> TGraphicControl
> > > zachytit udalosti mysi,
> > > ale neznam handle komponenty, jak se da zjistit ?
> >
> > TGraphicControl neni potomkem TWinControl, takze nema ani Handle. Tyto
> > komponenty si obsluhuje VCL svym vlastnim zpusobem.
>
> Vim ze TGraphicsControl nema handle, ale muzu ji (resp. te komponente)
> handle priradit ?
> myslim, ze jsem nekde neco takoveho videl.
>
> P.Kahle
>
>
Handle lze vytvorit pomoci:
FHandle := AllocateHWnd(WndProc);
DeallocateHWnd(FHandle);
Inspiraci lze nalezt napriklad ve zdrojovem textu komponenty
TTimet v unitu ExtCtrls.
Vaclav Krmela
zarovnanie cisel
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 31.3.2000 12:35:00
Kouni na http://www.kopr(tec)cz/delphi/k-delphi.htm
>
> Ako docielit aby boli v TEdit cisla zarovnane doprava. Ide mi o to aby
cisla
> ako (1500.20, 30.50) mali v dvoch editoch pod sebou zarovnanu desatinnu
> bodku. Rovnako mi to nejde ani v TLabel.
>
> Dakujem
>
> Robo
>Heterogenni dotazy a nahrady BDE
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 31.3.2000 12:47:53
Mam pred sebou nekolik problemu spojenych s vyberem dat z jedne DB na zaklade druhe DB.
Dve modelove situace:
mam dve DB stejneho typu (IB), lze knim pristupovat zaraz jinak nez s pomoci BDE ?
mam dve DB ruzneho typu (IB a Informix, je nejaka jina nahrada, nez BDE ?
Jedna se predevsim o synchronizaci dat (ne replikaci).
Slavek
ing. Slavomir Skopalik DEL a.s.
Olomoucka 355 Marianske udoli 783 75
----------------------------------------------
Tel: 068 535 35 48
Fax: 068 535 23 64
e-mail:skopalik(zv)atlas(tec)cz
Z Mema do Suboru
[*] Miroslav Hro��o�����,�(�j�Z��3 - 31.3.2000 12:47:33
Dobry,
Mam jeden problem. Mam v databaza MSSQL 7.0 v poli typy Text ulozeny textovy subor. A ja potebujem co najefektivnejsie (vzhladom na pamet) dostat obsah text-oveho pola na disk ako subor. A po skoncen� prace so suborom ho zasa vratit naspat do databazi do pola typu Text.
Prosim poradte mi ako na to bez pouzitia premennych typu TMemo, TString, Widestring.
Miro.format excel souboru *.xls
[*] Koten Alexandr, Ing. <Koten(zv)CZUB.CZ> - 31.3.2000 12:53:25
Ahoj,
Podivej se na www.wotsit.org a hledej xls.
A. Koten