Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Komponenta
[*] Miroslav Mares <mares(zv)sct(tec)cz> - 9.12.1998 11:31:20
Diky moc. Ja jsem je mel ty property editory spatne zaregistrovany :-((
Miroslav Mares
-----P�vodn� zpr�va-----
Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 4. prosince 1998 17:57
P�edm�t: Re: Komponenta
No, spis bych rekl, ze krapitko zmateny jsi ty. :-) Takze
podorobneji:
Vytvoris si _dve_ tridy, odvozene od TStringProperty, napr. TDirProperty
a TFilesProperty. Potom si udelas property
property DirectoryName: TDirectoryName read FDirectoryName ...
propert FileName: TFileName read FFileName ...
a zaregistrujes je nejak takto:
RegisterPropertyEditor(TypeInfo(TComponent), TTvojeTrida,
'DirectoryName', TDirProperty);
RegisterPropertyEditor(TypeInfo(TComponent), TTvojeTrida,
'FileName', TFilesProperty);
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Delphi 4
[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 9.12.1998 11:38:57
Jeden urcite. Penize za Upgrade...
Jirka
> -----P�vodn� zpr�va-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odesl�no: 9. prosince 1998 9:55
> Komu: '*** Delphi'
> P�edm�t: Delphi 4
>
> Zdravim,
>
> je nejaky zasadni problem pri prechodu z Delphi 3 na Delphi 4?
>
>
> ==[ eLK(zv) ]===================================================
> http://webhost(tec)cz/elka * mailto:Libor.Krayzel(zv)czech-tv(tec)cz - (069)
> 6201375
> http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
> ============================================================Jak kreslit / podvlnkovatet RichEdit?
[*] honzajl(zv)email(tec)cz - 9.12.1998 11:49:09
Zdravim,
-Potrebuju v TRichEditu udelat neco jako je v MSWordu vlnkovity podtrhnut�
neznameho - spatneho slova.
Co s t�m?
-Drive sem se zabejval s TPanelem. Udelal sem potomka s TCanvas, ale cokoli
sem na ten Canvas vykreslil se pri jakymkoli refresnuti zapomelo a byl zase
cistej. Jde me prevazne o to,
JAK VYTESAT caru tak, aby se refresi nezapomela?
Presusovanej ramecek kolem TPAnelu na ten Canvas kreslim pri kazdym
refresi (je soucasti komponenty) , ale co kdyz potrebuju na nekterej ten
panylek jednu carecku kamsi do prostredka?
Prosim o radu, jakeho dlata pouzit :-)
Predem moc diky za pomoc
........by
....................Honza
>Nadavno byla myslim v konferenci zminka o komponente, ktera umi
>pracovat s databazi SpellCheckeru z Wordu. Komponenta je nekde na DSP.
>Filip Jirsak*************************************************
-nic takoveho tam neni nebo je muj zrak nedostacujici
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Delphi - dotaz do konference
[*] TP+ <tpplus(zv)zasova(tec)cz> - 9.12.1998 11:53:49
Jestli jsem to dobre pochopil:
TQuery.RecNo / TQuery.RecordCount
=
(cislo aktualni vety)/(celk.pocet vet)
Bye
Tom Balusek
-----P�vodn� zpr�va-----
Od: Jindriska Kubatova <kubatova(zv)nym.pvt(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 9. prosince 1998 11:25
P�edm�t: (Fwd) Fw: Delphi - dotaz do konference
------- Forwarded Message Follows / N�sleduje p�edan� dopis -------
From: "Jolana Kotatkova" <kotatko(zv)nym.pvt(tec)cz>
To: "" <kubatova(zv)nym.pvt(tec)cz>
Ahoj,
potrebovala bych zjistit aktualni pozici vety v TQuery tak, abych na
obrazovku mohla napsat
informaci "aktualni veta/celkovy pocet vet".
Zatim se mi to podarilo pouze pomoci sekvencniho prohledavani od
prvni vety, coz mi nepripada prilis efektivni.
Nemel uz nekdo podobny problem a pokud ano, jak ho vyresil ?
Dekuji, Kotatkova
---------------------------------------------------
Jindriska Kubatova
PVT Kolinska 20 288 18 Nymburk
kubatova(zv)nym.pvt(tec)cz
---------------------------------------------------
Ulozeni hesla
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 9.12.1998 12:25:34
co treba neco jako
hexstring := IntToHex(StrToInt(decstring), 2)
decstring := IntToStr(StrToInt('$' + hexstring))
M.
-----P�vodn� zpr�va-----
Od: Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 9. prosince 1998 11:25
P�edm�t: RE: Ulozeni hesla
No, kdyz ma napr. znak "A" ascii hodnotu 65, tak staci 65 vydelit 16, to
je 4 a
zbytek je 1, takze ulozis 41. Prevod z/do 16 kove soustavy snad neni nic
tezkeho,
udelej si dve funkce, pro prevod (nerikam, ze by to neslo nejak lepe a
radostneji
- je to jenom takova mala rozcvicka poranu :-))) takze tam asi napraskam
chyby... )
Spis to ber jenom jako "navrh"...
function DecToHex(WDec : longint) : string;
var S : string;
const HexChars : string[16] = '0123456789ABCDEF';
begin
S:='';
repeat
Insert(HexChars[WDec mod 16 +1],S,1);
WDec:=WDec div 16;
until WDec=0;
DecToHex:=S;
end;
function DecToHex(WDec : longint) : string;
var S : string;
const HexChars : string[16] = '0123456789ABCDEF';
begin
S:='';
repeat
Insert(HexChar[WDec mod 16 +1],S,1);
WDec:=WDEec div 16;
until WDec=0;
DecToHex:=S;
end;
function StrToHex(WStr: string) : string;
function LZero(WStr: string) : string;
begin
if Length(WStr)=1 then LZero:='0'+WStr
else LZero:=WStr;
end;
var I : byte;
S : string;
begin
S:='';
for I:=1 to Length(WStr) do
S:=S+LZero(DecToHex(Ord(WStr[I])));
StrToHex:=S;
end;
function HexToStr(WStr :string) : string;
var I : byte;
S : string;
begin
S:='';
for I:=1 to (Length(WStr) div 2) do
S:=S+Chr(HexToDec(WStr[2*I-1]+WStr[2*I]));
HexToStr:=S;
end;
Dobra.
> ----------
> Od: Jan Nov�k[SMTP:csobta(zv)mbox.vol(tec)cz]
> Odesl�no: 9. prosince 1998 7:34
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Ulozeni hesla
>
> "Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> retezce
> ukladal v HEXA-soustave" ........ atd.
>
> Zajimalo by mne jak se da udelat , aby se kazdy znak retezce ukladal
> v hexadecimalni soustave . Jak prevest znak do hexadecimalni soustavy
> ?
> Dekuji za radu .
>
> -----P�vodn� zpr�va-----
> Od: Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 7. prosince 1998 13:54
> P�edm�t: RE: Ulozeni hesla
>
>
> Zpusobu je spusta, zalezi vsak hlavne na tom, zda chces to heslo
> zase dostavat zpet, ci Ti staci jen overit, zda nejake jine
> (napr. uzivatelem zadane) heslo odpovida ulozenemu. Napsal jsem
> na toto tema jednou par stranek (nic moc, ale jako voditko by Ti
> to mozna mohlo stacit). Snad to najdu, tak jestli chces...
>
> Ale jen na okraj : velmi ucinnou a hlavne velmi bezpecnou metodou
> je scitani dvou retezcu. Jednim je heslo, druhym je nejaky klic.
> Ovsem bezpecnost teto metody rapidne klesa pouzitim stejneho klice
> vicekrat. Scitanim myslim secist Ord(Heslo[1])+Ord(Klic[1]),...
>
> Dalsi metodou je metoda Startovaciho, Aditivniho a Multiplikacniho
> klice (mnou pracovne nazyvana metoda seminek), kdy nastavis puvodni
> hodnoty a dalsi hodnoty jsou vypocitavany z predchozich (klici).
>
> {--------------------------------------------------------------------}
> function EnCode1(W : string; Key0, Key1, Key2 : LongInt ) : string;
> { Funkce pracuje tak, ze meni hodnotu klice. Prvni klic je startovaci,
> druhy multiplikativni, treti je aditivni }
> var I : byte;
> Pom : string;
> begin
> Pom:='';
> W[1]:=Chr( Ord(W[1]) - Key0);
> { Aby i prvni znak byl vice zavisly na Key, protze
> pro Key<256 zustane stejny, pro 256<=Key<512 by byl
> jen o jednu vetsi atd... }
> for I := 1 to Length(W) do
> begin
> Pom:=Pom+Chr(Ord(W[I]) xor (Key0 shr 8));
> Key0 := (Ord(Pom[I]) + Key0) * Key1 + Key2;
> end;
> EnCode1:=Pom;
> end;
>
> {--------------------------------------------------------------------}
> function DeCode1(W : string; Key0, Key1, Key2 : LongInt ) : string;
> var I : byte;
> Pom : string;
> Keyx : word;
> begin
> Keyx:=Key0;
> Pom:='';
> for I := 1 to Length(W) do
> begin
> Pom:=Pom+Chr(Ord(W[I]) xor (Key0 shr 8));
> Key0 := (Ord(W[I]) + Key0) * Key1 + Key2;
> end;
> Pom[1]:=Chr( Ord(Pom[1]) + Keyx);
> { Viz EnCode1 }
> DeCode1:=Pom;
> end;
>
> Nevyhodou teto metody je to, ze existuje nekonecne mnoho klicu, pomoci
> kterych je mozne retezec zpet dekodovat, ale rekl bych, ze je to
> casove
> velmi narocne (prokombinovat vlastne LongInt^3).
>
> Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> retezce
> ukladal v HEXA-soustave, protoze se tim vyhnes problemum s ukladanim
> znaku
> s Ord<32 a Ord>126.
>
> Dobra.
>
> > ----------
> > Od: Lukas Voborsky[SMTP:xvobl03(zv)sorry.vse(tec)cz]
> > Odesl�no: 7. prosince 1998 12:28
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Ulozeni hesla
> >
> > Cau, mam programek, ktery si uklada nejaka hesla do registru. Ja
> > je tam ukladam vselijak zaxorovany, coz by se zrejme dalo celkem
> lehce
> > rozkodovat. Resili jste nekdo takovy problem? Jak?
> > zdar
> > __ _ Lukas
> > / `-' ) ,,,
> > |=|=()|||||||[:::}
> > \__.-._) ```
> > tel. 855 10 40-9 l. 393
> > ICQ: 21084410
> >
> >
> >
> >
>
>
>
>
Ulozeni hesla
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 9.12.1998 12:25:34
On Wed, 9 Dec 1998, [iso-8859-2] Jan Nov�k wrote:
> "Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> retezce
> ukladal v HEXA-soustave" ........ atd.
>
> Zajimalo by mne jak se da udelat , aby se kazdy znak retezce ukladal
> v hexadecimalni soustave . Jak prevest znak do hexadecimalni soustavy ?
> Dekuji za radu .
Myslim, ze kolega mel na mysli neco podobneho:
s: string[20];
Reg: TRegistry;
.........
.........
WriteBinaryData('blabla', s, Length(s)+1);
.........
ReadBinaryData('blabla', s, SizeOf(s));
ahoj
__ _ Lukas
/ `-' ) ,,,
|=|=()|||||||[:::}
\__.-._) ```
tel. 855 10 40-9 l. 393
ICQ: 21084410
Jak kreslit / podvlnkovatet RichEdit?
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 9.12.1998 12:58:28
1.) nevim
2.) musis prepsat metodu paint
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
> -----P�vodn� zpr�va-----
> Od: honzajl(zv)email(tec)cz [SMTP:honzajl(zv)email(tec)cz]
> Odesl�no: 9. Dezember 1998 11:49
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Jak kreslit / podvlnkovatet RichEdit?
>
> Zdravim,
>
> -Potrebuju v TRichEditu udelat neco jako je v MSWordu vlnkovity
> podtrhnut�
> neznameho - spatneho slova.
>
> Co s t�m?
>
> -Drive sem se zabejval s TPanelem. Udelal sem potomka s TCanvas, ale
> cokoli
> sem na ten Canvas vykreslil se pri jakymkoli refresnuti zapomelo a byl
> zase
> cistej. Jde me prevazne o to,
>
> JAK VYTESAT caru tak, aby se refresi nezapomela?
>
> Presusovanej ramecek kolem TPAnelu na ten Canvas kreslim pri kazdym
> refresi (je soucasti komponenty) , ale co kdyz potrebuju na nekterej
> ten
> panylek jednu carecku kamsi do prostredka?
>
> Prosim o radu, jakeho dlata pouzit :-)
>
> Predem moc diky za pomoc
>
> ........by
> ....................Honza
>
> >Nadavno byla myslim v konferenci zminka o komponente, ktera umi
> >pracovat s databazi SpellCheckeru z Wordu. Komponenta je nekde na
> DSP.
> >Filip Jirsak*************************************************
>
> -nic takoveho tam neni nebo je muj zrak nedostacujici
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
SQL - 2 files
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 9.12.1998 13:17:03
D�ky za pomoc
mohl bych dostat bli��� popis p�ikazu
outer join a jim podobnych
v helpu u Paradoxu toho moc neni
Jiri Heinisch H-trading
Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
-----P�vodn� zpr�va-----
Od: Marek Repisk� <mrepisky_zl(zv)zsnp.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 3. prosince 1998 7:52
P�edm�t: Re: SQL - 2 files
>Pre Paradox by to mohlo vyzerat asi takto:
>
>Select Hn002.suau,Hc012.NazevSUAU,Hn002.kalskup as KS,Hn002.PsMd as PsMD,
> Hn002.PsDal as PsDAL, Hn002.CelkObrMd as MD, Hn002.CelkObrDal as DAL
>from HC012 left outer join Hn002 on HN002.SUAU=HC012.SUAU
Zvukova karta - OFF TOPIC
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 9.12.1998 13:23:27
ahoj
Nevi nekdo kdo je vyrobce zvukove karty ESS ES1869
eventualne kde sehnat ovladac
diky
Kdyz tak to dejte na privatni mail
Jiri Heinisch H-trading
Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
Delphi 4
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 9.12.1998 13:35:55
> Jeden urcite. Penize za Upgrade...
O penezich nebyla rec. Jde mi o verzi Standard. Spise me zajima, jestli
mi pojedou vsechny stare aplikace napsane v trojce.Jak kreslit / podvlnkovatet RichEdit?
[*] Petr Brant <p.brant(zv)samo.pvtnet(tec)cz> - 9.12.1998 14:01:48 -0000
> -----P�vodn� zpr�va-----
> Od: honzajl(zv)email(tec)cz [SMTP:honzajl(zv)email(tec)cz]
> Odesl�no: 9. prosince 1998 10:49
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Jak kreslit / podvlnkovatet RichEdit?
>
> Zdravim,
>
> -Potrebuju v TRichEditu udelat neco jako je v MSWordu vlnkovity
> podtrhnut�
> neznameho - spatneho slova.
>
> Co s t�m?
[Petr Brant] Tohle bohuzel nevim, resp. nemam cas se tim
zabyvat :-(
> -Drive sem se zabejval s TPanelem. Udelal sem potomka s TCanvas, ale
> cokoli
> sem na ten Canvas vykreslil se pri jakymkoli refresnuti zapomelo a byl
> zase
> cistej. Jde me prevazne o to,
>
> JAK VYTESAT caru tak, aby se refresi nezapomela?
>
> Presusovanej ramecek kolem TPAnelu na ten Canvas kreslim pri kazdym
> refresi (je soucasti komponenty) , ale co kdyz potrebuju na nekterej
> ten
> panylek jednu carecku kamsi do prostredka?
>
[ Petr Brant]
Dlato cislo 1: Udelej si v pameti bitmapu TBitmap, do ktere
budes kreslit to, co by melo byt na tom panelu. A pri kazde refresi
prekopiruj tu bitmapu na ten canvas, ktery potrebujes.Bude to bez
blikani - na rozdil od primeho kresleni.
Dlato cislo 2: Odvod si tu komponentu od TImage, jejiz canvas se
pamatuje automaticky. Vsechno vsak bude o neco pomalejsi.
>
POZOR, TATO ADRESA JE JEN DOCASNA, BUDE PLATIT ASI DO POLOVINY PROSINCE
!!!
********************************************************
Petr Brant [p.brant(zv)samo.pvtnet(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> Delphi 4
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 9.12.1998 14:01:18
A me by zajimalo, zda mohu pouzit DCU z trojky nebo zda je musim mit zase
prekompilovane. Diky. Jaro B.
> -----P�vodn� zpr�va-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odesl�no: 9. prosince 1998 13:36
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Delphi 4
>
> > Jeden urcite. Penize za Upgrade...
>
> O penezich nebyla rec. Jde mi o verzi Standard. Spise me zajima, jestli
> mi pojedou vsechny stare aplikace napsane v trojce.Computer Press a Delphi 3
[*] Radim Kunz <ekservis(zv)ova(tec)comp(tec)cz> - 9.12.1998 14:20:06
Auto uz dorazilo :-))
Po prvnim prolistovani se mi knizka hodne libi.
Radim
----------
> Odes�latel: Zdenek Petruj <zpetruj(zv)zebra(tec)cz>
> Komu: Delphi Konference (el. adresa) <delphi-l(zv)fwd(tec)cz>
> P�edm�t: Computer Press a Delphi 3
> Datum: 9. prosince 1998 10:38
>
> Tak kniha je skutecne na svete. Protoze jsem z Ostravy, volal jsem
> osobne na ostravsky Computer Press. Kniha vysla pred dvema dny. Co se
> tyce Ostravy tak auto pro knihy vyrazilo do Brna dnes rano a jeste
> nedorazilo. Az dorazi bude kniha v ostravskem Computer Pressu k
> dispozici. Stoji 995 kc a koupit nebo objednat v Ostrave je mozno na
> adrese:
>
> Computer Press
> Frani Sramka 5
> 709 00 OSTRAVA - Marianske hory
> telefon: (069) 6634734
>
> Jak je to jinde a v knihkupectvich nevim.
>
> S pozdravem
> Zdenek Petruj
> ____________________________
> adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
> Czech republic
> ____________________________
> tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
> e-mail: zpetruj(zv)zebra(tec)cz
> internet: http://www.zebra(tec)cz
Mistrovstvi v Delphi 3
[*] Chmelar, Ladislav <chmelar(zv)dcb(tec)cz> - 9.12.1998 14:26:11
kniha existuje uz ji mam.
objednat (koupit) se da v
knihkupectvi MARECEK
Botanicka 68a
BRNO
tel.: 05/41 51 24 35
e-mail: marecek(zv)elnet(tec)cz
> -----P�vodn� zpr�va-----
> Od: Radoslav Krehlik [SMTP:heretic(zv)softok(tec)cz]
> Odesl�no: 9. prosince 1998 9:48
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Mistrovstvi v Delphi 3
>
> >Od 8.12.1998 konecne k dispozici
>
> Nutne potrebuju, nevis kde bych to mohl objednat? tnx
>
>
> Heretic
Jak kreslit / podvlnkovatet RichEdit?
[*] Filip Jirsak <JIRSAK(zv)gymnacel(tec)cz> - 9.12.1998 14:37:28
> From: honzajl(zv)email(tec)cz
> Date sent: Wed, 9 Dec 1998 11:49:09 +0100
> To: delphi-l(zv)fwd(tec)cz
> Subject: Jak kreslit / podvlnkovatet RichEdit?
> Send reply to: delphi-l(zv)fwd(tec)cz
>
> Zdravim,
>
> -Potrebuju v TRichEditu udelat neco jako je v MSWordu vlnkovity podtrhnut=
> =ED=20
> neznameho - spatneho slova.
>
> Co s t=EDm?
>
> >Nadavno byla myslim v konferenci zminka o komponente, ktera umi=20
> >pracovat s databazi SpellCheckeru z Wordu. Komponenta je nekde na DSP.
> >Filip Jirsak*************************************************
>
> -nic takoveho tam neni nebo je muj zrak nedostacujici
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
Tak ja se podivam nekde doma, doufam, ze to najdu -:) .
Filip Jirsak
> -------------nWlrBbmQBhCDarzOwKkYHIDdqSCD--
>
> *************************************************
Filip Jirsak
e-mail: Jirsak(zv)gymnacel(tec)cz (do 31.6.1998)
e-mail: Jirsak(zv)mujmail(tec)cz
autor www stranek Gymnazia Celakovice www.gymnacel(tec)cz
Ulozeni hesla
[*] Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 9.12.1998 15:14:34
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Jeeeeee, o fci IntToHex jsem doted nemel ani poneti, ale
neni mi uplne jasne, jak bych takto prevedl string 'AHOJ'
na string '41484F4A'
Dobra.
> ----------
> Od: Mirek �ipel[SMTP:miroslav.cipel(zv)oku-tu(tec)cz]
> Odesl�no: 9. prosince 1998 12:25
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Ulozeni hesla
>
> co treba neco jako
>
> hexstring := IntToHex(StrToInt(decstring), 2)
>
> decstring := IntToStr(StrToInt('$' + hexstring))
>
>
> M.
>
>
> -----P�vodn� zpr�va-----
> Od: Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 9. prosince 1998 11:25
> P�edm�t: RE: Ulozeni hesla
>
>
> No, kdyz ma napr. znak "A" ascii hodnotu 65, tak staci 65 vydelit 16,
> to
> je 4 a
> zbytek je 1, takze ulozis 41. Prevod z/do 16 kove soustavy snad neni
> nic
> tezkeho,
> udelej si dve funkce, pro prevod (nerikam, ze by to neslo nejak lepe a
> radostneji
> - je to jenom takova mala rozcvicka poranu :-))) takze tam asi
> napraskam
> chyby... )
> Spis to ber jenom jako "navrh"...
>
> function DecToHex(WDec : longint) : string;
> var S : string;
> const HexChars : string[16] = '0123456789ABCDEF';
> begin
> S:='';
> repeat
> Insert(HexChars[WDec mod 16 +1],S,1);
> WDec:=WDec div 16;
> until WDec=0;
> DecToHex:=S;
> end;
>
> function DecToHex(WDec : longint) : string;
> var S : string;
> const HexChars : string[16] = '0123456789ABCDEF';
> begin
> S:='';
> repeat
> Insert(HexChar[WDec mod 16 +1],S,1);
> WDec:=WDEec div 16;
> until WDec=0;
> DecToHex:=S;
> end;
>
> function StrToHex(WStr: string) : string;
>
> function LZero(WStr: string) : string;
> begin
> if Length(WStr)=1 then LZero:='0'+WStr
> else LZero:=WStr;
> end;
>
> var I : byte;
> S : string;
> begin
> S:='';
> for I:=1 to Length(WStr) do
> S:=S+LZero(DecToHex(Ord(WStr[I])));
> StrToHex:=S;
> end;
>
> function HexToStr(WStr :string) : string;
> var I : byte;
> S : string;
> begin
> S:='';
> for I:=1 to (Length(WStr) div 2) do
> S:=S+Chr(HexToDec(WStr[2*I-1]+WStr[2*I]));
> HexToStr:=S;
> end;
>
> Dobra.
>
> > ----------
> > Od: Jan Nov�k[SMTP:csobta(zv)mbox.vol(tec)cz]
> > Odesl�no: 9. prosince 1998 7:34
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: Ulozeni hesla
> >
> > "Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> > retezce
> > ukladal v HEXA-soustave" ........ atd.
> >
> > Zajimalo by mne jak se da udelat , aby se kazdy znak retezce ukladal
> > v hexadecimalni soustave . Jak prevest znak do hexadecimalni
> soustavy
> > ?
> > Dekuji za radu .
> >
> > -----P�vodn� zpr�va-----
> > Od: Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz>
> > Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> > Datum: 7. prosince 1998 13:54
> > P�edm�t: RE: Ulozeni hesla
> >
> >
> > Zpusobu je spusta, zalezi vsak hlavne na tom, zda chces to heslo
> > zase dostavat zpet, ci Ti staci jen overit, zda nejake jine
> > (napr. uzivatelem zadane) heslo odpovida ulozenemu. Napsal jsem
> > na toto tema jednou par stranek (nic moc, ale jako voditko by Ti
> > to mozna mohlo stacit). Snad to najdu, tak jestli chces...
> >
> > Ale jen na okraj : velmi ucinnou a hlavne velmi bezpecnou metodou
> > je scitani dvou retezcu. Jednim je heslo, druhym je nejaky klic.
> > Ovsem bezpecnost teto metody rapidne klesa pouzitim stejneho klice
> > vicekrat. Scitanim myslim secist Ord(Heslo[1])+Ord(Klic[1]),...
> >
> > Dalsi metodou je metoda Startovaciho, Aditivniho a Multiplikacniho
> > klice (mnou pracovne nazyvana metoda seminek), kdy nastavis puvodni
> > hodnoty a dalsi hodnoty jsou vypocitavany z predchozich (klici).
> >
> >
> {--------------------------------------------------------------------}
> > function EnCode1(W : string; Key0, Key1, Key2 : LongInt ) : string;
> > { Funkce pracuje tak, ze meni hodnotu klice. Prvni klic je
> startovaci,
> > druhy multiplikativni, treti je aditivni }
> > var I : byte;
> > Pom : string;
> > begin
> > Pom:='';
> > W[1]:=Chr( Ord(W[1]) - Key0);
> > { Aby i prvni znak byl vice zavisly na Key, protze
> > pro Key<256 zustane stejny, pro 256<=Key<512 by byl
> > jen o jednu vetsi atd... }
> > for I := 1 to Length(W) do
> > begin
> > Pom:=Pom+Chr(Ord(W[I]) xor (Key0 shr 8));
> > Key0 := (Ord(Pom[I]) + Key0) * Key1 + Key2;
> > end;
> > EnCode1:=Pom;
> > end;
> >
> >
> {--------------------------------------------------------------------}
> > function DeCode1(W : string; Key0, Key1, Key2 : LongInt ) : string;
> > var I : byte;
> > Pom : string;
> > Keyx : word;
> > begin
> > Keyx:=Key0;
> > Pom:='';
> > for I := 1 to Length(W) do
> > begin
> > Pom:=Pom+Chr(Ord(W[I]) xor (Key0 shr 8));
> > Key0 := (Ord(W[I]) + Key0) * Key1 + Key2;
> > end;
> > Pom[1]:=Chr( Ord(Pom[1]) + Keyx);
> > { Viz EnCode1 }
> > DeCode1:=Pom;
> > end;
> >
> >
> > Nevyhodou teto metody je to, ze existuje nekonecne mnoho klicu,
> pomoci
> > kterych je mozne retezec zpet dekodovat, ale rekl bych, ze je to
> > casove
> > velmi narocne (prokombinovat vlastne LongInt^3).
> >
> > Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> > retezce
> > ukladal v HEXA-soustave, protoze se tim vyhnes problemum s ukladanim
> > znaku
> > s Ord<32 a Ord>126.
> >
> > Dobra.
> >
> > > ----------
> > > Od: Lukas Voborsky[SMTP:xvobl03(zv)sorry.vse(tec)cz]
> > > Odesl�no: 7. prosince 1998 12:28
> > > Komu: delphi-l(zv)fwd(tec)cz
> > > P�edm�t: Ulozeni hesla
> > >
> > > Cau, mam programek, ktery si uklada nejaka hesla do registru. Ja
> > > je tam ukladam vselijak zaxorovany, coz by se zrejme dalo celkem
> > lehce
> > > rozkodovat. Resili jste nekdo takovy problem? Jak?
> > > zdar
> > > Lukas
> > > / `-' ) ,,,
> > > |=|=()|||||||[:::}
> > > \ .-. ) ```
> > > tel. 855 10 40-9 l. 393
> > > ICQ: 21084410
> > >
> > >
> > >
> > >
> >
> >
> >
> >
> >
>
>
>
>
>
> Delphi 4
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 9.12.1998 15:15:19
> O penezich nebyla rec. Jde mi o verzi Standard. Spise me zajima, jestli
> mi pojedou vsechny stare aplikace napsane v trojce.
Pokud jsi drive nemel Delphi 3 Client/Server a pokud nepouzivas
nejake komponenty, ktere jsou jen pro Delphi 3, tak by teoreticky
vsechno melo jet - jsou tam jen nektere zmeny datovych typu apod.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Cross Table
[*] Ji�� Heinisch <HeiJu(zv)sol(tec)cz> - 9.12.1998 16:22:12
Ahoj
Nevi nekdo jak vytvorit k��ovou tabulku pomoci SQL
�i jinak
diky
Jiri Heinisch H-trading
Danovy a ekonomicky servis
Vyvoj a tvorba ekonomickeho software
http://www.mujweb(tec)cz/www/heinisch/
HeiJu(zv)sol(tec)cz
VCL -> ActiveX
[*] kelleon(zv)nnsk.sk - 9.12.1998 16:24:50
> Viete niekto ako transformovat komponent odvodeny od TWinControl na
> ActiveX objekt, alebo ako sa to sarlatanstvo vola ? Viem to dostat do
> modulu OCX, aj do IE 4.0, ale nedari sa mi to dostat do Wordu - menu
> INSERT - OBJECT, resp to iste Excel. Ako na to ?
Na http://pw2.netcom.com/~cherrman/d4new.htm som narazil na zmienku o tom,
ze "ActiveX controls support IDataObject for embedding into Office apps."
Z toho vyplyva: bud upgrade na Delphi 4, alebo sa pozri na IDataObject a
skus to spravit sam.
Ondrej Kelle
kelleon(zv)nnsk.sk
Nove property formulare
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 9.12.1998 16:52:49
Zdenek Petruj wrote:
> Diky, funguje to. Jen se mi zda trosku divne ze se ten predek musi
> prepsat rucne a pak tak divne refresovat. Mohlo to byt aspon tak ze se
> takto nove registrovany formular objevi v nejakem "uchu" repozitory. Navic
> jsem nikde v helpu o RegisterCustomModule nenasel ani slovo. Nebo jsem
> spatne hledal? Mohl bys mi sdelit kde ty jsi na to prisel?
:-)) Samozrejme muzes takovy formular zaradit mezi wizardy (kam
patri), jak se to dela se muzes inspirovat v Demos\Experts, nebo v
Expert ToolKit (www.tempest-sw.com), nebo v XDK
(www.geocities.com/SiliconValley/Way/9006/index.html). Nebo se
muzes prihlasit na skoleni komponent u Inprise, kde to rozebiram.
:-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Jak kreslit / podvlnkovatet RichEdit?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 9.12.1998 16:52:49
honzajl(zv)email(tec)cz wrote:
> -Drive sem se zabejval s TPanelem. Udelal sem potomka s TCanvas, ale
> cokoli sem na ten Canvas vykreslil se pri jakymkoli refresnuti zapomelo a
> byl zase cistej. Jde me prevazne o to,
>
> JAK VYTESAT caru tak, aby se refresi nezapomela?
Zkus prepsat metodu Paint.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Ulozeni hesla
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 9.12.1998 16:52:49
Jan Nov�k wrote:
> "Pro praci s registrem vsak jeste doporucuji aby jsi si kazdy znak
> retezce
> ukladal v HEXA-soustave" ........ atd.
>
> Zajimalo by mne jak se da udelat , aby se kazdy znak retezce ukladal
> v hexadecimalni soustave . Jak prevest znak do hexadecimalni soustavy ?
Zkus se inspirovat funkci BinToHex z Classes.pas.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Delphi 4
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 9.12.1998 17:19:04
> A me by zajimalo, zda mohu pouzit DCU z trojky nebo zda je musim mit zase
> prekompilovane. Diky. Jaro B.
Jisteze je musis prekompilovat.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Naozaj treba Patch?
[*] ri(zv)spse.adlerka.schools.sk - 9.12.1998 18:12:52
Cau, delphini,
uz sa tu hodne popisalo o tom, ze prva verzia
Delphi4 je plna chyb a ze je vhodne pouzit na
nu Update Pack #2.
Chcem sa opytat, ci v neupravenej D4-Standard
zle funguju aj take zakladne veci, ako je napr.
- pouzivanie matematickych operacii +-*/...,
- praca s mnohomegabajtovymi arrays,
- zakladne graficke operacie (putpixel, get-
pixel a zobrazovanie bitmap),
- R/W operacie s file of urceny_typ
a podobne.
T.j., ak clovek nepouziva SQL, ActiveX, zlozi-
tejsie "objektovanie" apod. (cize povazuje D4
len za akysi upgrade TurboPascalu), zide sa aj
jemu ten Update Pack?
A este na inu temu:
Inprise.com ponuka spomenuty "apdejt" na CD-ROMe
za $9.95 for shipping&handling,
Inprise(tec)cz ponuka to iste za 690 Kc.
Pytam sa, odkedy je 1$ za 70 Kc?
Alebo chce niekto pekne zarobit na "zarucnej o-
prave", ktora by snad mohla byt aj zadarmo (resp.
len za postovne a "vylisne")?
Ahoj. Jano
.Mistrovstvi v Delphi 3
[*] Patrik Sl�de�ek�����%g��jgr� - 9.12.1998 19:13:08
na Vltav� ji lze z�skat se stokorunovou slevou (v�t�� ��st slevy ale z�ejm�
schlamstne po�tovn�)
-----P�vodn� zpr�va-----
Od: Chmelar, Ladislav <chmelar(zv)dcb(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 9. prosince 1998 14:30
P�edm�t: RE: Mistrovstvi v Delphi 3
kniha existuje uz ji mam.
objednat (koupit) se da v
knihkupectvi MARECEK
Botanicka 68a
BRNO
tel.: 05/41 51 24 35
e-mail: marecek(zv)elnet(tec)cz
> -----P�vodn� zpr�va-----
> Od: Radoslav Krehlik [SMTP:heretic(zv)softok(tec)cz]
> Odesl�no: 9. prosince 1998 9:48
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Mistrovstvi v Delphi 3
>
> >Od 8.12.1998 konecne k dispozici
>
> Nutne potrebuju, nevis kde bych to mohl objednat? tnx
>
>
> Heretic
TMemo
[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 9.12.1998 19:42:37
Mam problemecek, jak docilit aby se TMemo neprekresloval pri vkladani hodne radku textu, ale po dokonceni
dik
Serbajlo Pavel
ICQ: 20849973
email: serb(zv)mikulov.sol(tec)cz
www: www.nemamstranky(tec)cz
Zvukova karta - OFF TOPIC
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 9.12.1998 19:54:55
> Nevi nekdo kdo je vyrobce zvukove karty ESS ES1869
> eventualne kde sehnat ovladac
Ja ti ho poslu (ne do konference, samozrejme), pokud chces...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
delphi chat
[*] Erik Salaj <erik(zv)dodo.sk> - 9.12.1998 21:50:35
Kniznica mso97rt.dll ziadny DLLRegisterServer neexportuje, cize
ani neobsahuje ziadnu autoregistraciu. Je teda logicke a uplne
korektne, ze to neide registrovat.
Erik Salaj
erik(zv)dodo.sk
-----Original Message-----
From: Radoslav Krehlik <heretic(zv)softok(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: Wednesday, December 09, 1998 10:20 AM
Subject: Re: delphi chat
>>* nebo pomoci RxLib je tam RegisterDLL nebo tak neco myslim v
>> VCLUTILS.Pas
>Nejlepsi jsou nektere knihovny microsoftu, ktere v sobe Autoregistraci sice
>obsahuji (DLLRegisterServer), ale kdyz to zavolas, tak to v lepsim pripade
>napise, ze to nemohlo najit vstupni bod te procedury, v horsim uplne
>zhrouti windoze. Prikladem je napriklad mso97rt.dll :) O mlhave registraci
>typovych knihoven Microsoftu ani nemluvim.
>
> Heretic <www.nt(tec)cz>Zvukova karta - OFF TOPIC
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 9.12.1998 23:58:49
> Nevi nekdo kdo je vyrobce zvukove karty ESS ES1869
> eventualne kde sehnat ovladac
Jestli jeste nekdo chcete tento ovladac (par lidi se
ozvalo), tak ho na par dni davam sem:
http://www.clexpert(tec)cz/download/1869_nt40.zip (asi 70 kB)
http://www.clexpert(tec)cz/download/1869_w95.zip (asi 70 kB)
http://www.clexpert(tec)cz/download/1869_w95rac.zip (asi 950 kB)
http://www.clexpert(tec)cz/download/1869_w95swt.zip (asi 950 kB)
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
TMemo
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 10.12.1998 05:01:44
Memo1.BeginUpdate;
.
vkladani radku
.
Memo1.EndUpdate;
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
Komu: Delphi cz <delphi-l(zv)fwd(tec)cz>
Datum: 9. prosince 1998 20:57
P�edm�t: TMemo
Mam problemecek, jak docilit aby se TMemo neprekresloval pri vkladani hodne
radku textu, ale po dokonceni
dik
Serbajlo Pavel
ICQ: 20849973
email: serb(zv)mikulov.sol(tec)cz
www: www.nemamstranky(tec)cz
Ulozeni hesla
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 10.12.1998 06:23:25
> Jeeeeee, o fci IntToHex jsem doted nemel ani poneti, ale
> neni mi uplne jasne, jak bych takto prevedl string 'AHOJ'
> na string '41484F4A'
Nazdar,
no problem:
function StrToHex(s:string):string;
var
i:integer;
begin
for i:=1 to length(s) do Result:=Result+IntToHex(ord(s[i]),2);
end;
Marek Repisky
mrepisky_zl(zv)zsnp.sk
text z Win do Lat
[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 10.12.1998 07:51:58
Prijemny den,
nevite nekdo o komponente (nechci psat jiz napsane), ktere by se predhodil
kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si to
napisu. :-(
Dekuji
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP==============
TMemo a WIN95
[*] Jan Janecek <stoupa(zv)vos-sps-jicin(tec)cz> - 10.12.1998 08:14:29
Uspesny den preji,
potkal me mensi problemecek...
Pod Win NT 4.0 muzu do komponenty TMemo ulozit vice jak 32768 radku, ale
pod Win95 toto nelze...
BTW: Pomoci Richedit to funguje, ale to nepotrebuju... je to pomale i kdyz
to nastavim sebelepe...
Prosim pomozte... uvitam radu jak toto omezeni obejit nebo i nejakou
komponentu...
-------------------------------------
Jan Janecek - STOUPA
Spravce pocitacove site na:
VOS_SPS
Pod Kozeluhy 100
Jicin 50601
EMAIL:stoupa(zv)vos-sps-jicin(tec)cz
stoupik(zv)xoommail.com
jan.janecek(zv)post(tec)cz
WEB: HTTP://members.xoom.com/stoupik
ICQ: 12364149
-------------------------------------
Ulozeni hesla
[*] Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 10.12.1998 08:24:32
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible. >> Jeeeeee, o fci IntToHex jsem doted nemel ani poneti, ale
>> neni mi uplne jasne, jak bych takto prevedl string 'AHOJ'
>> na string '41484F4A'
>
>Nazdar,
>
>no problem:
>
>function StrToHex(s:string):string;
>var
> i:integer;
>begin
> for i:=1 to length(s) do Result:=Result+IntToHex(ord(s[i]),2);
>end;
Jak to udelat ja vim, ale nekdo radil toto :
>co treba neco jako
>
>hexstring := IntToHex(StrToInt(decstring), 2)
>
>decstring := IntToStr(StrToInt('$' + hexstring))
A tam mi to jaxi moc jasny neni.
D.
Naozaj treba Patch?
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.12.1998 08:59:59
> T.j., ak clovek nepouziva SQL, ActiveX, zlozi-
> tejsie "objektovanie" apod. (cize povazuje D4
> len za akysi upgrade TurboPascalu), zide sa aj
> jemu ten Update Pack?
Je snad nejaky problem stahnout si par mega z Internetu?
> A este na inu temu:
> Inprise.com ponuka spomenuty "apdejt" na CD-ROMe
> za $9.95 for shipping&handling,
> Inprise(tec)cz ponuka to iste za 690 Kc.
> Pytam sa, odkedy je 1$ za 70 Kc?
> Alebo chce niekto pekne zarobit na "zarucnej o-
> prave", ktora by snad mohla byt aj zadarmo (resp.
> len za postovne a "vylisne")?
Ono to bude tim, ze z USA je trosku vetsi postovne,
a asi take chteji stovku za praci, co s tim maji...
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Tla� grafu cez Quick report
[*] Pavol Griga <paly(zv)sct.sk> - 10.12.1998 08:59:51
Nevie mi niekto povedat, ci mozem nejakym sposobom vyuzit
graf triedy TChar z formulara v tlacovej zostave Quick report.
Ide mi o to, aby som nemusel 2x vytvarat graf aj na forme
aj v zostave. Viem, ze TChar ma priamo metodu Print a Preview,
ale ja potrebujem spolu s grafom vytlacit aj dalsie udaje.
Za pomoc velmi pekne vopred vdaka
text z Win do Lat
[*] David Hrb�� - 10.12.1998 09:05:47
Mohu poslat.
David
-----P�vodn� zpr�va-----
Od: Richard Valny <richard.valny(zv)oku-st(tec)cz>
Komu: 'DELPHI Distribution List (el. adresa 2)' <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 08:20
P�edm�t: text z Win do Lat
>Prijemny den,
>nevite nekdo o komponente (nechci psat jiz napsane), ktere by se predhodil
>kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
>O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
>Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si to
>napisu. :-(
>
>Dekuji
>
>===========mozno pouzit PGP==============
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>===========mozno pouzit PGP==============
>
>Tla� grafu cez Quick report
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.12.1998 09:15:37
> Nevie mi niekto povedat, ci mozem nejakym sposobom vyuzit
> graf triedy TChar z formulara v tlacovej zostave Quick report.
> Ide mi o to, aby som nemusel 2x vytvarat graf aj na forme
> aj v zostave. Viem, ze TChar ma priamo metodu Print a Preview,
> ale ja potrebujem spolu s grafom vytlacit aj dalsie udaje.
No vzdyt tam mas primo komponentu pro QuickReport, copak ji nevidis?
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Cross Table
[*] Hubert <mneu3246(zv)ss1000.ms.mff.cuni(tec)cz> - 10.12.1998 09:16:59
Hello Ji��,
st�eda, 9 prosinec 98, you wrote to me:
JH> Ahoj
JH> Nevi nekdo jak vytvorit k��ovou tabulku pomoci SQL
JH> �i jinak
JH> diky
JH> Jiri Heinisch H-trading
JH> Danovy a ekonomicky servis
JH> Vyvoj a tvorba ekonomickeho software
JH> http://www.mujweb(tec)cz/www/heinisch/
JH> HeiJu(zv)sol(tec)cz
V MS ACCESS je SQL prikaz TRANSFORM ci nejak tak.
Best regards,
Michal Neuwirth mailto:mneu3246(zv)ss1000.ms.mff.cuni(tec)cz
TMemo a WIN95
[*] Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 10.12.1998 09:19:45
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
V knize Mistrovstvi v Delphi 2, M. Cantu pise, ze toto neni
omezeni Delphi, ale windows.
Dobra.
PS: Martine F., nez se na me zase vrhnes, ze kydam spinu na Windouse,
tak vez, ze to v te knize opravdu je.
> ----------
> Od: Jan Janecek[SMTP:stoupa(zv)vos-sps-jicin(tec)cz]
> Odesl�no: 10. prosince 1998 8:14
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: TMemo a WIN95
>
> Uspesny den preji,
>
> potkal me mensi problemecek...
> Pod Win NT 4.0 muzu do komponenty TMemo ulozit vice jak 32768 radku,
> ale
> pod Win95 toto nelze...
> BTW: Pomoci Richedit to funguje, ale to nepotrebuju... je to pomale i
> kdyz
> to nastavim sebelepe...
> Prosim pomozte... uvitam radu jak toto omezeni obejit nebo i nejakou
> komponentu...
>
> -------------------------------------
> Jan Janecek - STOUPA
> Spravce pocitacove site na:
> VOS SPS
> Pod Kozeluhy 100
> Jicin 50601
>
> EMAIL:stoupa(zv)vos-sps-jicin(tec)cz
> stoupik(zv)xoommail.com
> jan.janecek(zv)post(tec)cz
> WEB: HTTP://members.xoom.com/stoupik
> ICQ: 12364149
> -------------------------------------
>
>
> text z Win do Lat
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 10.12.1998 09:27:01
Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro konverzi
ruznych kodu. Jaro B.
> -----P�vodn� zpr�va-----
> Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
> Odesl�no: 10. prosince 1998 7:52
> Komu: 'DELPHI Distribution List (el. adresa 2)'
> P�edm�t: text z Win do Lat
>
> Prijemny den,
> nevite nekdo o komponente (nechci psat jiz napsane), ktere by se predhodil
>
> kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
> O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
> Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si
> to
> napisu. :-(
>
> Dekuji
>
> ===========mozno pouzit PGP==============
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> ===========mozno pouzit PGP==============
> Computer Press a Delphi 3
[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 10.12.1998 09:42:10
Je to od Pacheco & Teixeira?
To je prelozeny do cestiny?
Napis mi presny nazev (i v anglictine)+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+text z Win do Lat
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 10.12.1998 10:06:22
Dovoluji si upozornit, ze k tomu lze snadno pouzit funkci z BDE
AnsiToNative a NativeToAnsi. Tam uz to nekdo udelal, a je to docela bez
prace, jen si musis udelat tabulku v tom kodovani, jake potrebujes (L2).
Z ni potom pouzivas jen Language Descriptor. Taaaady daaada, a to je vse
prateleee.
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: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 10. prosince 1998 9:27
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: text z Win do Lat
>
> Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro
> konverzi
> ruznych kodu. Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
> > Odesl�no: 10. prosince 1998 7:52
> > Komu: 'DELPHI Distribution List (el. adresa 2)'
> > P�edm�t: text z Win do Lat
> >
> > Prijemny den,
> > nevite nekdo o komponente (nechci psat jiz napsane), ktere by se
> predhodil
> >
> > kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
> > O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne
> pruvodky) ve
> > Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni,
> tak si
> > to
> > napisu. :-(
> >
> > Dekuji
> >
> > ===========mozno pouzit PGP==============
> > Richard Valny richard.valny(zv)oku-st(tec)cz
> > Okresni urad Strakonice tel. 0342-441 l. 216
> > Smetanova 533 fax. 0342-21208
> > 386 22 STRAKONICE FiDoNet 2:423/35
> > ===========mozno pouzit PGP==============
> > text z Win do Lat
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 10.12.1998 10:09:02
da se pouzit funkce CharToOem viz. WIN32 API
ve Windows.pas je to takhle
function CharToOem(lpszSrc: PChar; lpszDst: PChar): BOOL;
jinak zdravim kolegu z OkU
M.
-----P�vodn� zpr�va-----
Od: Richard Valny <richard.valny(zv)oku-st(tec)cz>
Komu: 'DELPHI Distribution List (el. adresa 2)' <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 8:11
P�edm�t: text z Win do Lat
>Prijemny den,
>nevite nekdo o komponente (nechci psat jiz napsane), ktere by se predhodil
>kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
>O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
>Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si to
>napisu. :-(
>
>Dekuji
>
>===========mozno pouzit PGP==============
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>===========mozno pouzit PGP==============
>
>
>
Konverze cestiny (bylo RE: text z Win do Lat)
[*] Svatopluk Vit <vit(zv)ardo(tec)cz> - 10.12.1998 10:15:38
Zdravim!
Muzu byt tak drzy a pozadat o umisteni nize popsanych konverznich programku
na ftp teto konference? Myslim ze by nas to vyuzilo vic. Ja napriklad to uz
asi 14 dni vyrabim a jako zacatecnikovi mi to moc nejde. Na velkych
strankach jako je Torri a spol jsem nic takoveho nenasel a u nas to taky
nikdo nenabizi.
Pokud by to neslo umistit na ftp moc prosim vlastniky podobnych veci
ochotnych se o toto podelit aby mi je zaslali na muj soukromy mail (viz
nize).
Nebo mozna jeste lepe vsem do teto konference :-))))))
V souvislosti s tim mne napada jeste dotaz. Protoze mame ucetni program
vytvoreny ve FOXPRO pouzivajici samozrejme soubory *.DBF a potrebuji pouzit
jeden soubor s ciselnikem obchodnich partneru nastava u mne problem s
cestinou. Program striktne pouziva kodovani Kamenicky a v Delphi samozrejme
zobrazuje nesmysly v cestine (i po nastaveni v BDE adminu). Pouzil jsem
proto jiz drive napsanou radu o pouziti Database Desktopu a nastaveni Table
Language a vse je v poradku. Vysvetlete vsak praci s DBD prostemu
uzivateli. Pidil jsem se o prepinani Table Language programove a nic jsem
nenasel. Prisel jsem na nasledujici fintu :
Jeden soubor jsem zkopiroval, nacetl do DBD a upravil Table Language a
ulozil. Tyto dva "identicke" soubory jsem porovnal a zjistil jsem, ze se
lisi v hlavice a konkretne na 30 bajtu. Svuj program jsem upravil tak, ze
si vytvorim kopii pozadovaneho souboru, nactu prvnich 29 bajtu, pak 30 bajt
zmenim a zbytek prekopiruju. A ted dotaz :
Mate nekdo zkusenost s tim, ze je to skutecne vse, co je treba udelat? Na
prvni pohled to chodi. Druhy vsak nemusi byt spravny. Abych se tomu vyhnul,
pouzil bych nejakou konverzni funkci. Jak jsem vsak jiz rekl jeste jsem ji
nevytvoril.
Howgh...
Svatopluk Vit
East Trading Company s.r.o. Karvina (www.ardo(tec)cz)
spravce pocitacove site - network administrator
zacinajici delphista - beginner in Delphi
E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
tel : +420 69 63 06 085
ICQ : 11455617
...sem si dovolil....svesticky z moji zahradky...
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
Odesl�no: 10. prosince 1998 9:27
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: text z Win do Lat
Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro konverzi
ruznych kodu. Jaro B.
> -----P�vodn� zpr�va-----
> Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
> Odesl�no: 10. prosince 1998 7:52
> Komu: 'DELPHI Distribution List (el. adresa 2)'
> P�edm�t: text z Win do Lat
>
> Prijemny den,
> nevite nekdo o komponente (nechci psat jiz napsane), ktere by se
predhodil
>
> kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
> O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
> Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si
> to
> napisu. :-(
>
> Dekuji
>
> ===========mozno pouzit PGP==============
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> ===========mozno pouzit PGP==============
>
Tlac grafu cez Quick report
[*] Pavol Griga <paly(zv)sct.sk> - 10.12.1998 10:42:38
>> Nevie mi niekto povedat, ci mozem nejakym sposobom vyuzit
>> graf triedy TChar z formulara v tlacovej zostave Quick report.
>> Ide mi o to, aby som nemusel 2x vytvarat graf aj na forme
>> aj v zostave. Viem, ze TChar ma priamo metodu Print a Preview,
>> ale ja potrebujem spolu s grafom vytlacit aj dalsie udaje.
>No vzdyt tam mas primo komponentu pro QuickReport, copak ji nevidis?
>S pozdravem
> Petr Zahradnik, pocitacovy expert
Tu komponentu QRChart vidim, len v helpe je pisane, ze cez jej
vlastnost
'Chart' sa da k nej prilinkovat uz vytvoreny graf priamo z ineho formulara
(aspon tak som to pochopil) ale ked jej chcem priradit komponentu
triedy TChart, ktora je vytvorena na inom forme, tak piskuje, ze je
Read only.
Viem ze s tou komponentou mozem robit ako s komponentou
TChart, ale vadi mi to, ze musim vlastne naplnat 2x grafy, jeden
pre form na obrazovku a druhy pre vystupnu zostavu, chcel by
vo vystupnej zostave (QReport) vyuzit ten graf, ktory uz mam
vytvoreny na forme pre obrazovkovy vystup.
Mozno som prilis narocny na Delphi, ale preco nie
Konverze cestiny (bylo RE: text z Win do Lat)
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 10.12.1998 10:44:26
Ahoj,
zrovna moje knihovna je umistena na Torry.
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Svatopluk Vit [SMTP:vit(zv)ardo(tec)cz]
> Odesl�no: 10. prosince 1998 10:16
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Konverze cestiny (bylo RE: text z Win do Lat)
>
> Zdravim!
>
> Muzu byt tak drzy a pozadat o umisteni nize popsanych konverznich
> programku
> na ftp teto konference? Myslim ze by nas to vyuzilo vic. Ja napriklad to
> uz
> asi 14 dni vyrabim a jako zacatecnikovi mi to moc nejde. Na velkych
> strankach jako je Torri a spol jsem nic takoveho nenasel a u nas to taky
> nikdo nenabizi.
>
> Pokud by to neslo umistit na ftp moc prosim vlastniky podobnych veci
> ochotnych se o toto podelit aby mi je zaslali na muj soukromy mail (viz
> nize).
>
> Nebo mozna jeste lepe vsem do teto konference :-))))))
>
>
> V souvislosti s tim mne napada jeste dotaz. Protoze mame ucetni program
> vytvoreny ve FOXPRO pouzivajici samozrejme soubory *.DBF a potrebuji
> pouzit
> jeden soubor s ciselnikem obchodnich partneru nastava u mne problem s
> cestinou. Program striktne pouziva kodovani Kamenicky a v Delphi
> samozrejme
> zobrazuje nesmysly v cestine (i po nastaveni v BDE adminu). Pouzil jsem
> proto jiz drive napsanou radu o pouziti Database Desktopu a nastaveni
> Table
> Language a vse je v poradku. Vysvetlete vsak praci s DBD prostemu
> uzivateli. Pidil jsem se o prepinani Table Language programove a nic jsem
> nenasel. Prisel jsem na nasledujici fintu :
>
> Jeden soubor jsem zkopiroval, nacetl do DBD a upravil Table Language a
> ulozil. Tyto dva "identicke" soubory jsem porovnal a zjistil jsem, ze se
> lisi v hlavice a konkretne na 30 bajtu. Svuj program jsem upravil tak, ze
> si vytvorim kopii pozadovaneho souboru, nactu prvnich 29 bajtu, pak 30
> bajt
> zmenim a zbytek prekopiruju. A ted dotaz :
>
> Mate nekdo zkusenost s tim, ze je to skutecne vse, co je treba udelat? Na
> prvni pohled to chodi. Druhy vsak nemusi byt spravny. Abych se tomu
> vyhnul,
> pouzil bych nejakou konverzni funkci. Jak jsem vsak jiz rekl jeste jsem ji
>
> nevytvoril.
>
> Howgh...
>
> Svatopluk Vit
> East Trading Company s.r.o. Karvina (www.ardo(tec)cz)
>
> spravce pocitacove site - network administrator
> zacinajici delphista - beginner in Delphi
>
> E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
> tel : +420 69 63 06 085
> ICQ : 11455617
>
> ...sem si dovolil....svesticky z moji zahradky...
>
>
>
>
> -----P�vodn� zpr�va-----
> Od: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 10. prosince 1998 9:27
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: text z Win do Lat
>
> Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro
> konverzi
> ruznych kodu. Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
> > Odesl�no: 10. prosince 1998 7:52
> > Komu: 'DELPHI Distribution List (el. adresa 2)'
> > P�edm�t: text z Win do Lat
> >
> > Prijemny den,
> > nevite nekdo o komponente (nechci psat jiz napsane), ktere by se
> predhodil
> >
> > kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
> > O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
> > Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si
> > to
> > napisu. :-(
> >
> > Dekuji
> >
> > ===========mozno pouzit PGP==============
> > Richard Valny richard.valny(zv)oku-st(tec)cz
> > Okresni urad Strakonice tel. 0342-441 l. 216
> > Smetanova 533 fax. 0342-21208
> > 386 22 STRAKONICE FiDoNet 2:423/35
> > ===========mozno pouzit PGP==============
> >
> Table is full
[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 10.12.1998 10:55:17
Nevite nekdo co bych mohl udelat aby mi proslo pridani jedne polozky
do jiz existujici tabulky napr. v DB Desktopu. Tabulka ma nejakych 15
MB, na vsech discich je min. 4x vice mista, v PRIV a WORK adresarich
jeste mnohem vic, kdyz vsak dam Restrukture (v DBD z Delphi1, ale i z
Paradoxu 8) pracuje asi 15 minut a potom vyhodi hlaseni Table is
full. Neradte mi vsak reseni typu udelat novou tabulku a pridat data.
Mam tam polozky typu Autoinkrement a pres ne propojene jine tabulky.
Diky za kazdou pomoc.
S pozdravem
J. Nagy
NH-TRANS, spol. s r.o.
Podebradova 28
702 00 Ostrava
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
Konverze cestiny (bylo RE: text z Win do Lat)
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 10.12.1998 11:19:14
Ako sa da nieco umiestnit na ftp konf.?
TUNGLI Jan
tungli(zv)pvt.sk
----------
> Od: Svatopluk Vit <vit(zv)ardo(tec)cz>
> Pre: 'delphi-l(zv)fwd(tec)cz'
> Predmet: Konverze cestiny (bylo RE: text z Win do Lat)
> D�tum: 10. december 1998 10:15
>
> Zdravim!
>
> Muzu byt tak drzy a pozadat o umisteni nize popsanych konverznich programku
> na ftp teto konference? Myslim ze by nas to vyuzilo vic. Ja napriklad to uz
> asi 14 dni vyrabim a jako zacatecnikovi mi to moc nejde. Na velkych
> strankach jako je Torri a spol jsem nic takoveho nenasel a u nas to taky
> nikdo nenabizi.
>
> Pokud by to neslo umistit na ftp moc prosim vlastniky podobnych veci
> ochotnych se o toto podelit aby mi je zaslali na muj soukromy mail (viz
> nize).
>
> Nebo mozna jeste lepe vsem do teto konference :-))))))
>
>
> V souvislosti s tim mne napada jeste dotaz. Protoze mame ucetni program
> vytvoreny ve FOXPRO pouzivajici samozrejme soubory *.DBF a potrebuji pouzit
> jeden soubor s ciselnikem obchodnich partneru nastava u mne problem s
> cestinou. Program striktne pouziva kodovani Kamenicky a v Delphi samozrejme
> zobrazuje nesmysly v cestine (i po nastaveni v BDE adminu). Pouzil jsem
> proto jiz drive napsanou radu o pouziti Database Desktopu a nastaveni Table
> Language a vse je v poradku. Vysvetlete vsak praci s DBD prostemu
> uzivateli. Pidil jsem se o prepinani Table Language programove a nic jsem
> nenasel. Prisel jsem na nasledujici fintu :
>
> Jeden soubor jsem zkopiroval, nacetl do DBD a upravil Table Language a
> ulozil. Tyto dva "identicke" soubory jsem porovnal a zjistil jsem, ze se
> lisi v hlavice a konkretne na 30 bajtu. Svuj program jsem upravil tak, ze
> si vytvorim kopii pozadovaneho souboru, nactu prvnich 29 bajtu, pak 30 bajt
> zmenim a zbytek prekopiruju. A ted dotaz :
>
> Mate nekdo zkusenost s tim, ze je to skutecne vse, co je treba udelat? Na
> prvni pohled to chodi. Druhy vsak nemusi byt spravny. Abych se tomu vyhnul,
> pouzil bych nejakou konverzni funkci. Jak jsem vsak jiz rekl jeste jsem ji
> nevytvoril.
>
> Howgh...
>
> Svatopluk Vit
> East Trading Company s.r.o. Karvina (www.ardo(tec)cz)
>
> spravce pocitacove site - network administrator
> zacinajici delphista - beginner in Delphi
>
> E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
> tel : +420 69 63 06 085
> ICQ : 11455617
>
> ...sem si dovolil....svesticky z moji zahradky...
>
>
>
>
> -----P�vodn� zpr�va-----
> Od: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 10. prosince 1998 9:27
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: text z Win do Lat
>
> Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro konverzi
> ruznych kodu. Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
> > Odesl�no: 10. prosince 1998 7:52
> > Komu: 'DELPHI Distribution List (el. adresa 2)'
> > P�edm�t: text z Win do Lat
> >
> > Prijemny den,
> > nevite nekdo o komponente (nechci psat jiz napsane), ktere by se
> predhodil
> >
> > kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
> > O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
> > Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si
> > to
> > napisu. :-(
> >
> > Dekuji
> >
> > ===========mozno pouzit PGP==============
> > Richard Valny richard.valny(zv)oku-st(tec)cz
> > Okresni urad Strakonice tel. 0342-441 l. 216
> > Smetanova 533 fax. 0342-21208
> > 386 22 STRAKONICE FiDoNet 2:423/35
> > ===========mozno pouzit PGP==============
> >
>
> Drag & Drop na TDBgrid
[*] Triblax (Bilbo) <triblax(zv)pobox.sk> - 10.12.1998 11:41:04
Zdravim
Mohol by mi niekto prosim pomoc-poradit ako mam postupovat pri "tahani"
poloziek z DBGridu napr. do listboxu???
skusal som vsetko co ma napadlo, ale ak nastavim ze dbgrid ma manualne
Drag&Drop nemozem dosiahnut aby vobec zacat "tahat", tato komponenta nema
ani OnMouse...
Pokial dam automatiku, nemozem sa posuvat po polozkach v DBGride...
Diki za kazdu radu
Juraj
Konverze cestiny (bylo RE: text z Win do Lat)
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 10.12.1998 12:00:47
-----P�vodn� zpr�va-----
Od: Svatopluk Vit <vit(zv)ardo(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 10:40
P�edm�t: Konverze cestiny (bylo RE: text z Win do Lat)>Zdravim!
>
>Muzu byt tak drzy a pozadat o umisteni nize popsanych konverznich programku
>na ftp teto konference? Myslim ze by nas to vyuzilo vic. Ja napriklad to uz
>asi 14 dni vyrabim a jako zacatecnikovi mi to moc nejde. Na velkych
>strankach jako je Torri a spol jsem nic takoveho nenasel a u nas to taky
>nikdo nenabizi.
>
>Pokud by to neslo umistit na ftp moc prosim vlastniky podobnych veci
>ochotnych se o toto podelit aby mi je zaslali na muj soukromy mail (viz
>nize).
>
>Nebo mozna jeste lepe vsem do teto konference :-))))))
>
>
>V souvislosti s tim mne napada jeste dotaz. Protoze mame ucetni program
>vytvoreny ve FOXPRO pouzivajici samozrejme soubory *.DBF a potrebuji pouzit
>jeden soubor s ciselnikem obchodnich partneru nastava u mne problem s
>cestinou. Program striktne pouziva kodovani Kamenicky a v Delphi samozrejme
>zobrazuje nesmysly v cestine (i po nastaveni v BDE adminu). Pouzil jsem
>proto jiz drive napsanou radu o pouziti Database Desktopu a nastaveni Table
>Language a vse je v poradku. Vysvetlete vsak praci s DBD prostemu
>uzivateli. Pidil jsem se o prepinani Table Language programove a nic jsem
>nenasel.
doporucuju BDE API help - soucast instalace Delphi - a zvlast kapitolu
"Getting and setting properties", DbiSetProp a DbiGetProp - jsou tam i
priklady
M.
> Prisel jsem na nasledujici fintu :
>
>Jeden soubor jsem zkopiroval, nacetl do DBD a upravil Table Language a
>ulozil. Tyto dva "identicke" soubory jsem porovnal a zjistil jsem, ze se
>lisi v hlavice a konkretne na 30 bajtu. Svuj program jsem upravil tak, ze
>si vytvorim kopii pozadovaneho souboru, nactu prvnich 29 bajtu, pak 30 bajt
>zmenim a zbytek prekopiruju. A ted dotaz :
>
>Mate nekdo zkusenost s tim, ze je to skutecne vse, co je treba udelat? Na
>prvni pohled to chodi. Druhy vsak nemusi byt spravny. Abych se tomu vyhnul,
>pouzil bych nejakou konverzni funkci. Jak jsem vsak jiz rekl jeste jsem ji
>nevytvoril.
>
>Howgh...
>
>Svatopluk Vit
>East Trading Company s.r.o. Karvina (www.ardo(tec)cz)
>
>spravce pocitacove site - network administrator
>zacinajici delphista - beginner in Delphi
>
>E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
>tel : +420 69 63 06 085
>ICQ : 11455617
>
>...sem si dovolil....svesticky z moji zahradky...
>
>
>
>-----P�vodn� zpr�va-----
>Od: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
>Odesl�no: 10. prosince 1998 9:27
>Komu: 'delphi-l(zv)fwd(tec)cz'
>P�edm�t: RE: text z Win do Lat
>
>Mohu Ti poskytnout obecnou knihovnu retezcu, kde je tez funkce pro konverzi
>ruznych kodu. Jaro B.
>
>> -----P�vodn� zpr�va-----
>> Od: Richard Valny [SMTP:richard.valny(zv)oku-st(tec)cz]
>> Odesl�no: 10. prosince 1998 7:52
>> Komu: 'DELPHI Distribution List (el. adresa 2)'
>> P�edm�t: text z Win do Lat
>>
>> Prijemny den,
>> nevite nekdo o komponente (nechci psat jiz napsane), ktere by se
>predhodil
>>
>> kus textu v kodovani Win1250 a ono to vypadlo v Latin2 ?
>> O co mi jde. Z meho softiku vypadne slozenka typu H (vcetne pruvodky) ve
>> Windowsim kodovani a Ceska posta to chce v Latin2. Pokud to neni, tak si
>> to
>> napisu. :-(
>>
>> Dekuji
>>
>> ===========mozno pouzit PGP==============
>> Richard Valny richard.valny(zv)oku-st(tec)cz
>> Okresni urad Strakonice tel. 0342-441 l. 216
>> Smetanova 533 fax. 0342-21208
>> 386 22 STRAKONICE FiDoNet 2:423/35
>> ===========mozno pouzit PGP==============
>>
>
>
>
SQL - 2 files
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 10.12.1998 12:04:41
Ji�� Heinisch wrote:
> mohl bych dostat bli��� popis p�ikazu
> outer join a jim podobnych
>
> v helpu u Paradoxu toho moc neni
Podivej se do helpu k InterBase.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
PRUZKUM
[*] Ing. Miroslav Ond��ek <bonnel(zv)telecom(tec)cz> - 10.12.1998 12:26:13
Ne, ja mam ENTF :-))))))
M�ra
-----P�vodn� zpr�va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 12:16
P�edm�t: PRUZKUM
Ahoj!
Delam pruzkum - jake kdo pouzivate klavesnice - mate tam vsichni
PRUZKUM
[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 10.12.1998 12:30:45
ne ja tady zadnou nemam - nebo bych potreboval nejakeho pocitacoveho
experta aby me ji ukazal :-) ted vazne: je tahle konference o Delphi nebo o
pruzkumech ?
M.
-----P�vodn� zpr�va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 12:12
P�edm�t: PRUZKUM
Ahoj!
Delam pruzkum - jake kdo pouzivate klavesnice - mate tam vsichni
klavesu DELETE nebo aspon DEL? Vypada to, ze na nekterych
klavesnicich chybi, nebo nekteri programatori nevedi, co se
s ni dela... a pak to vypada tak, ze nekdo odpovida na mail,
pripise 2 radky a necha tam jako ocas za sebou 4 quotovane
predchozi zpravy o delce 100 radku. Nebo jste opravdu tak lini
ten kus textu oznacit a zmacknout DELETE?
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Table is full-odp
[*] tomas.mazurek(zv)vitkovice(tec)cz - 10.12.1998 12:34:03
Hello,
proc ne novou tabulku a pridat data s vetsim block size. Problem s
Autoinc. se da vyresit pres LongInt. Novou tabulku udelejte misto
Autoinc. LongInt., pote pridejte data a tabulku restrukt. na Autoinc.
S cislovanim zaznamu to, dle mych zkusenosti, nic neudela...
Tomas
Naozaj treba Patch?
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 10.12.1998 13:51:29
Odpoved je nize u jednotlivych dotazu.
From: ri(zv)spse.adlerka.schools.sk
To: delphi-l(zv)fwd(tec)cz
Date sent: Wed, 9 Dec 1998 18:12:52
Subject: Naozaj treba Patch?
Copies to: ri(zv)spse.adlerka.schools.sk
Send reply to: delphi-l(zv)fwd(tec)cz
> Cau, delphini,
>
> uz sa tu hodne popisalo o tom, ze prva verzia
> Delphi4 je plna chyb a ze je vhodne pouzit na
> nu Update Pack #2.
>
> Chcem sa opytat, ci v neupravenej D4-Standard
> zle funguju aj take zakladne veci, ako je napr.
> - pouzivanie matematickych operacii +-*/...,
> - praca s mnohomegabajtovymi arrays,
> - zakladne graficke operacie (putpixel, get-
> pixel a zobrazovanie bitmap),
> - R/W operacie s file of urceny_typ
> a podobne.
>
> T.j., ak clovek nepouziva SQL, ActiveX, zlozi-
> tejsie "objektovanie" apod. (cize povazuje D4
> len za akysi upgrade TurboPascalu), zide sa aj
> jemu ten Update Pack?
>
Vyplati se kazdemu, protoze je spraveno spousta chyb v IDE.
> A este na inu temu:
> Inprise.com ponuka spomenuty "apdejt" na CD-ROMe
> za $9.95 for shipping&handling,
> Inprise(tec)cz ponuka to iste za 690 Kc.
> Pytam sa, odkedy je 1$ za 70 Kc?
> Alebo chce niekto pekne zarobit na "zarucnej o-
> prave", ktora by snad mohla byt aj zadarmo (resp.
> len za postovne a "vylisne")?
>
> Ahoj. Jano
> .
Inprise(tec)cz se tvari, ze je 690 Je cena za vylisovani. Jinak, ale vse
lze stahnout z internetu zdarma. Potom nemusis nic kupovat.
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
TRichEdit - zakladni dotazy
[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 10.12.1998 13:51:27
1.) Jak se daji zadavat do TRichEdit ridici znaky formatu RTF. Jedna se
o nastavovani vlastnosti(textu,odstavce), ktere nejsou dostupne pomoci
vlastnosti. - napr.pro horni,dolni indexy jsem zadne vlasnosti nenasel.
2). Jak se da zjistit seznam vsech podporovanych ridicich slov(znaku)Konverze cestiny (bylo RE: text z Win do Lat)
[*] =?Default?Q?Marek_Repisk=FD?= <mrepisky_zl(zv)zsnp.sk> - 10.12.1998 13:51:54
> Ako sa da nieco umiestnit na ftp konf.?
Nazdar,
hladaj odkaz v archive konferencie pod heslom >>tedy pro klid moderatora<<
:-)
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Drag & Drop na TDBgrid
[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 10.12.1998 14:43:11
Ja jsem to taky resil, tak jsem pouzil trochu tvrdou metodu OnDblClick a dal
jsem BeginDrag(False);
Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
Mius a.s. (http://www.mius(tec)cz)
Dlouha 2940
415 01 TEPLICE
Czech Republic
> -----P�vodn� zpr�va-----
> Od: Triblax (Bilbo) [SMTP:triblax(zv)pobox.sk]
> Odesl�no: 10. prosince 1998 11:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Drag & Drop na TDBgrid
>
> Zdravim
> Mohol by mi niekto prosim pomoc-poradit ako mam postupovat pri "tahani"
> poloziek z DBGridu napr. do listboxu???
> skusal som vsetko co ma napadlo, ale ak nastavim ze dbgrid ma manualne
> Drag&Drop nemozem dosiahnut aby vobec zacat "tahat", tato komponenta nema
> ani OnMouse...
> Pokial dam automatiku, nemozem sa posuvat po polozkach v DBGride...
> Diki za kazdu radu
> Juraj
> quoting & Tregistry
[*] Radoslav Krehlik <heretic(zv)softok(tec)cz> - 10.12.1998 14:44:33
Hi all,
>predchozi zpravy o delce 100 radku. Nebo jste opravdu tak lini
>ten kus textu oznacit a zmacknout DELETE?
kdo byl ve FIDO a koukam ze vas je tu dost, tak si urcite pamatujete, jak
jakysi Heretic vyhazoval lidi z konferenci za to, ze byli tak lame, ze neumeli
ani quotovat, proc zrovna zde se trpi takove prasarny? :) Tim smutnejsi mi
to pripadne, ze sem pisou programatori :(
Heretic-X
BTW : abych nebyl totalne offtopic, nemate nekdo nejake priklady k
TRegistry, sice jsem uz na vetsinu veci prisel, ale i tak. Respektivne
mate nekdo zkusenosti s obnovou registru? (zaloha zajiste problem neni)
Prirazovani glyphu
[*] Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz> - 10.12.1998 14:55:26
Ahoj Delphisti,
mam takovyto problem :
Potrebuji v programu pouzivat vetsi mnozstvi (cca 50) uzivatelsky
definovatelnych tlacitek. Z toho duvodu mam jejich definici
ulozenou v samostatnem souboru (vcetne Glyphu). No a prave s tim
glyphem je problem. Tech 50 tlacitek tozit spolkne pres 25% GDI
zdroju. Pritom, kdyz mam ta sama tlacitka vytvorena jiz v prostredi
Delphi, tak to zdaleka tolik nesezere.
problem je 100% v tom glyphu. Vypada to asi takto :
...
NoveTlacitko.Glyph := DefiniceTlacitka.Glyph;
...
Pokud tento radek vynecham, tak to nesezere skoro nic.
Zkousel jsem metody Dormant a FreeImage. FreeImage ma
vliv spise na pamet a Dormant to zlepsi pouze nepatrne.
Take jsem zkousel to prirazeni provest metodou Assign,
ale vysledek je zcela stejny.
Nevite nekdo, jak tlacitku spravne priradit bitmapu,
aby to spolklo co nejmene resourcu ?
Diky
Vojtech Semecky
PRUZKUM
[*] Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz> - 10.12.1998 15:01:35
>... a pak to vypada tak, ze nekdo odpovida na mail,
> pripise 2 radky a necha tam jako ocas za sebou 4 quotovane
> predchozi zpravy o delce 100 radku. Nebo jste opravdu tak lini
> ten kus textu oznacit a zmacknout DELETE?
Souhlasim. Z puvodni zpravy by se melo nechavat pouze nutne
minimum, aby bylo jasne, na co se odpovida.
Vojtech Semecky
Registry
[*] Milan Fiedler <milanf(zv)rts(tec)cz> - 10.12.1998 15:03:35
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Mel bych dotaz, zapisovani do registru,
udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do registru ani precist, mam zapis a cteni do HKEY LOCAL MACINE, nekdo mi rika ze mam zapisovat do HKEY CURRENT USER a jiny zase ze to mam dobre.
Rad by bych se zeptal na Vase nazory !!!
Diky
Milan Fiedler
milanf(zv)rts(tec)cz
Interbase OIT OAT
[*] Marcel Langr <ivar(zv)ivar(tec)cz> - 10.12.1998 15:26:40
Potykame se s nasledujicim problemem.
Pouzivame Interbase server 4.2 na NT v aplikaci ve ktere se sbiraji data z relativne velkeho mnozstvi terminalu
(zaznamy o pruchodech atd). Denne se zapise rekneme okolo 30000 databazovych vet. Krome toho jsou v databazi
i dalsi data (seznamy uzivatelu apod), ale objem techto dat je relativne maly.
Problem je v tom, ze pri behu aplikace dochazi ke zvetsovani rozdilu mezi OIT a Next transaction.
( zjisteno pri vypsani statistiky v IB server manageru napr.
.....
Oldest transaction 225604
Oldest active 225605
Next transaction 455760
.... )
Postupne pak dochazi k zpomalovani cele prace s databazi, vzrusta zatizeni serveru az na 100 % odezva databaze je neunosna. Provedeni akce SWEEP nepomaha. Pomuze pouze backup /restore.
Mate s tim nekdo nejake zkusenosti? Nevite nekdo, jak zjistit ktera transakce zustava "viset" popr. co
muze byt pricinou techto problemu ?
S pozdravem
ing. Marcel Langr
mlangr(zv)ivar(tec)cz
Registry
[*] Bro�ek Erik <Erik.Brozek(zv)pvt(tec)cz> - 10.12.1998 15:38:35
> Mel bych dotaz, zapisovani do registru,
> udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do
> registru ani precist, mam zapis a cteni do HKEY_LOCAL_MACINE, nekdo mi
> rika ze mam zapisovat do HKEY_CURRENT_USER a jiny zase ze to mam dobre.
> �
> Rad by bych se zeptal na Vase nazory !!!
>
Pokud jde o parametry, ktere se tykaji pouze jednoho uzivatele,
pak jej zapisujte do HKEY_CURRENT_USER, (automatciky se
zapise i do HKEY_USERS/uzivatel) )ale nektere parametry
jsou pouze v HKEY_LOCAL_MACHINE.
S NT jsem mel problem, kdyz jsem chtel detekovat zda-li naintslovan
modem a ve Windows 95 je to jinde nez ve Windows NT. Podivejte
se do registru jestli takovy klic vubec existuje.
Erik.Registry
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.12.1998 15:45:50
> udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do =
> registru ani precist, mam zapis a cteni do HKEY_LOCAL_MACINE, nekdo mi =
> rika ze mam zapisovat do HKEY_CURRENT_USER a jiny zase ze to mam dobre.
To asi delas neco spatne, protoze to normalne chodi a musi chodit.
Ja jsem zjistil jen jeden problem - nevim z jakeho duvodu, ale
Delphi 4 (starsi jiz nemam nainstalovane) mi nezapise a dokonce
ani neprecte nekde z jedne vetve registru - ja to tam vidim, ale
Delphi to nevidi.
Jinak to ale pracuje. HKEY_LOCAL_MACHINE je urcen pro udaje pro
cely pocitac, tedy pro vsechny uzivatele. Sem tedy zapsat to, co
je spolecne. HKEY_CURRENT_USER je urcen pro prave pracujiciho
uzivatele, tedy napr. jeho rozlozeni pracovni plochy apod.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Pomoooc MYS
[*] pcuhel(zv)deltax(tec)cz - 10.12.1998 16:36:59
Zdravim vsechni,
bohuzel jsem v koncich.
Mam problem potreboval bych odchytit udalost mysi pro cela windows.
Pokud budou souradnice v pozadovanem rozsahu udelat nejakou akci.
Pokud ne nechat zpravu zpracovat tim komu byla urcena. Dale bych
potreboval presunou mys na zadanou pozici.
Dekuji vsem messageovym odbornikum a expertum.
PC
Spusteni NT Services
[*] pcuhel(zv)deltax(tec)cz - 10.12.1998 16:40:53
Dekuji za odpoved.
D4 bohuzel nemam. Nicmene neni na spusteni sevices nejaka API funkce ?
> ZH pise
Pokud mas D4, tak v Developer's Guide je na to primo jednoduchy
priklad. Jestli mas verzi Professional, musis si nejdrive nekde
zaregistrovat tridu, ktera je v SvcMgr -
RegisterCustomModule(TService, TCustomModule);
potom vytvoris formular DataModule a prepises tridu na TService.RichEdit - podvlnkovani
[*] honzajl(zv)email(tec)cz - 10.12.1998 16:53:20
Zdar,
D�ky vsem za navrhy a rady.
Co se tyce panelu, ted na nej nemam cas, ale zanedlouho to udelam s tim
TImagem.
Probl�m je s t�m podvlnkov�n�m (odli�en�m), ur�it�ch slov.
Konponenta Spellers.pas m� v tomto smeru nepomohla, ale je zaj�mav� - d�ky
za ni.
-dotaz : Nazahledl jste nekdo alespon nejakej program se zdrojema (D3), kde
by se syntaxe resila?
s pozdravem
................Honza
PS: Ajajaj, zacina to horet
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Drag & Drop na TDBgrid
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 10.12.1998 17:29:24
Triblax (Bilbo) wrote:
> Mohol by mi niekto prosim pomoc-poradit ako mam postupovat pri "tahani"
> poloziek z DBGridu napr. do listboxu??? skusal som vsetko co ma napadlo,
> ale ak nastavim ze dbgrid ma manualne Drag&Drop nemozem dosiahnut aby
> vobec zacat "tahat", tato komponenta nema ani OnMouse... Pokial dam
> automatiku, nemozem sa posuvat po polozkach v DBGride... Diki za kazdu
> radu Juraj
>
Mno, je to takovy problem udelat si potomka DBGrid a vytahnout si
OnMouse... a dalsi potrebnosti na svetlo Bozi - eh - do published?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
TMemo
[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 10.12.1998 19:41:37
dik moc
-----P�vodn� zpr�va-----
Od: Jan Fiala <fiala(zv)infos(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 5:56
P�edm�t: Re: TMemo
>Memo1.BeginUpdate;
>.
>vkladani radku
>.
>Memo1.EndUpdate;
>
>-----------------------------------------------------------------
>ing. Jan Fiala jan.fiala(zv)iname.com
>Prog-Soft s.r.o.
>INFOS - informa�n� system pro n�poj��e
>---------------------------------------------------------------
>-----P�vodn� zpr�va-----
>Od: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
>Komu: Delphi cz <delphi-l(zv)fwd(tec)cz>
>Datum: 9. prosince 1998 20:57
>P�edm�t: TMemo
>
>
>Mam problemecek, jak docilit aby se TMemo neprekresloval pri vkladani hodne
>radku textu, ale po dokonceni
>
>dik
>
>Serbajlo Pavel
>ICQ: 20849973
>email: serb(zv)mikulov.sol(tec)cz
>www: www.nemamstranky(tec)cz
>
>
>Delphi - dotaz do konference
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.12.1998 20:44:23
Ovsem pouze pro Paradox ;-)
TP+ wrote:
> Jestli jsem to dobre pochopil:
>
> TQuery.RecNo / TQuery.RecordCount
> =
> (cislo aktualni vety)/(celk.pocet vet)
>
> Bye
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Zvukova karta - OFF TOPIC
[*] Zdenek Drvota <zds(zv)pce.fairnet(tec)cz> - 10.12.1998 21:06:24
> Nevi nekdo kdo je vyrobce zvukove karty ESS ES1869
> eventualne kde sehnat ovladac
Tenhle chip pouzivaji ruzni vyrobci,
ale snad nejvetsi seznam ruznych ovladacu
je na www.windrivers.com - doporucuji si tuhle
adresu ulozit do bookmarku :-)
hodi se!
> diky
>
> Kdyz tak to dejte na privatni mail
>
> Jiri Heinisch H-trading
> Danovy a ekonomicky servis
> Vyvoj a tvorba ekonomickeho software
> http://www.mujweb(tec)cz/www/heinisch/
> HeiJu(zv)sol(tec)cz
>
>
> *-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: drvota(zv)zds(tec)cz (Win1250/ISO-8859-2)
http://www.zds(tec)cz
Podporujeme akci
Internet proti monopolu > http://www.bojkot(tec)cz/
*-----------------------------------------------*Modem a hang up
[*] MiSSoftware <missoftware(zv)lanskrounsko(tec)cz> - 10.12.1998 21:06:07
Ahoj vsichni,
nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz to tady bastlim dva dny a zadnej vysledek ...
Za nakopnuti diky...
Milan Schembera
MiSSoftware
Vancurova 149, Lanskroun
tel/fax 0467/521555, 0602/463353
mailto:missoftware(zv)lanskrounsko(tec)cz
http://www.lanskrounsko(tec)cz/missoftware
EuroSMS 2.0 - freeware pro posilani kratkych textovych zprav na mobilni telefony a pagery v CR
Modem a hang up
[*] Lubor Kult <kult(zv)rkc(tec)czn(tec)cz> - 10.12.1998 21:21:04
Poslete na port ATZ
Zdravi Lubor Kult
****************************************************
PC-Datacode s.r.o.
U stadionu 925
516 01 Rychnov nad Kneznou
e-mail: kult(zv)pc-datacode(tec)cz
Tel.(GSM): +420-603-423 359
-----P�vodn� zpr�va-----
Od: MiSSoftware [SMTP:missoftware(zv)lanskrounsko(tec)cz]
Odesl�no: 10. prosince 1998 21:06
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: Modem a hang up
Ahoj vsichni,
nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz to tady bastlim dva dny a zadnej vysledek ...
Za nakopnuti diky...
Milan Schembera
MiSSoftware
Vancurova 149, Lanskroun
tel/fax 0467/521555, 0602/463353
mailto:missoftware(zv)lanskrounsko(tec)cz
http://www.lanskrounsko(tec)cz/missoftware
EuroSMS 2.0 - freeware pro posilani kratkych textovych zprav na mobilni telefony a pagery v CR
Registry
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 10.12.1998 21:29:59
Par procedur pre pracu s registrom.
uses Registry;
function GetStrValRegKey(HK:HKey;Kluc,Hod:string;var Vrat:string):boolean;
var
r:TRegistry;
begin
try
r:=TRegistry.Create;
with r do
begin
rootkey:=HK;
Result:=OpenKey(Kluc,false) and ValueExists(Hod) and (GetDataType(Hod)=rdString);
if Result then Vrat:=ReadString(Hod);
closekey;
destroy;
end;
except
Result:=false;
end;
end;
function DeleteRegKey(HK:HKey;Kluc:string):boolean;
var
r:TRegistry;
begin
r:=TRegistry.Create;
try
with r do begin
rootkey:=HKey(HK);
Result:=DeleteKey(kluc);
end;
finally
r.destroy;
end;
End;
function SetStrValRegKey(HK:HKey;Kluc,Hod:string;Co:string):boolean;
var
r:TRegistry;
mS:String;
begin
try
r:=TRegistry.Create;
with r do begin
CreateKey(Kluc);
rootkey:=HKey(HK);
Result:=OpenKey(Kluc,false);
if ValueExists(Hod) and (GetDataType(Hod)<>rdString) then Result:=false;
if Result then WriteString(Hod,Co);
closekey;
destroy;
end;
except
Result:=false;
end;
end;
TUNGLI Jan
tungli(zv)pvt.sk
----------
> Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: Re: Registry
> D�tum: 10. december 1998 15:45
>
> > udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do =
> > registru ani precist, mam zapis a cteni do HKEY_LOCAL_MACINE, nekdo mi =
> > rika ze mam zapisovat do HKEY_CURRENT_USER a jiny zase ze to mam dobre.
>
> To asi delas neco spatne, protoze to normalne chodi a musi chodit.
> Ja jsem zjistil jen jeden problem - nevim z jakeho duvodu, ale
> Delphi 4 (starsi jiz nemam nainstalovane) mi nezapise a dokonce
> ani neprecte nekde z jedne vetve registru - ja to tam vidim, ale
> Delphi to nevidi.
>
> Jinak to ale pracuje. HKEY_LOCAL_MACHINE je urcen pro udaje pro
> cely pocitac, tedy pro vsechny uzivatele. Sem tedy zapsat to, co
> je spolecne. HKEY_CURRENT_USER je urcen pro prave pracujiciho
> uzivatele, tedy napr. jeho rozlozeni pracovni plochy apod.
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> Autorizovany dealer TurboPower Software... knihovny pro Delphi
> ==============================================================
> === Petr Zahradnik - Computer Laboratory ===
> === Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
> === telefon: 047-5500610, telefon/fax: 047-5501627 ===
> === mobilni telefon GSM (hotline): 0602-409601 ===
> === http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
> ==============================================================
> ICQ: 21215917
> delphi chat
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.12.1998 21:38:44
> Nejlepsi jsou nektere knihovny microsoftu, ktere v sobe Autoregistraci sice
> obsahuji (DLLRegisterServer), ale kdyz to zavolas, tak to v lepsim pripade
> napise, ze to nemohlo najit vstupni bod te procedury, v horsim uplne
> zhrouti windoze. Prikladem je napriklad mso97rt.dll :) O mlhave registraci
> typovych knihoven Microsoftu ani nemluvim.
Ale ne vsechny DLL knihovny jsou ActiveX, takze jaksi neni
co registrovat. Bezna DLL knihovna, at uz je Microsoftu nebo
kohokoliv jineho, se vubec neregistruje.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Modem a hang up
[*] peterrus(zv)intesys(tec)cz (Peter Rus) - 10.12.1998 22:01:44
Ahoj,
nekdy davno v dosovych programech se nejdrive poslal neco jako "init string" (ne v tom pravem smyslu) - to bylo
vetsinou "+++" modem pak cekal na prikaz. Pak se napsalo "ATH" a bylo to.
Snad to pomuze,
Peter Rus ml.
-----
MiSSoftware wrote:
> nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz to tady bastlim dva dny a zadnej vysledek ...Computer Press a Delphi 3
[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 10.12.1998 22:15:08
Hi,
dnes jsem ji privez a nazev
zni: Mistrovstvi v Delphi 3 a jako autori jsou
uvedeni Todd Miller, David Powell a kolektiv. S pozdravem
================================
> Pavel Malinsky; Spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================
-----P�vodn� zpr�va-----
Od: Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 10:07
P�edm�t: RE: Computer Press a Delphi 3
>Je to od Pacheco & Teixeira?
>To je prelozeny do cestiny?
>Napis mi presny nazev (i v anglictine)
>
>+-------------------------------+
>| Ing. Petr Jezek |
>| Delvina, s.r.o |
>| 010 01 Zilina |
>+ - - - - - - - - - - - - - - - +
>| tel: +421 (89) 624 344 |
>| fax: +421 (89) 621 018 |
>| email: petr(zv)sevis.sk |
>| web: www.delvina.sk |
>+-------------------------------+
>Modem a hang up
[*] Karel Kalivoda <K.Kalivoda(zv)sh.cvut(tec)cz> - 10.12.1998 22:25:20
Jinak....
Modem se muze nachazet ve 2 stavech. (fax a voicemodemy ve vice)
Prikazovy mod, kdy komunikuje modem s pocitacem a datovy, kdy prochazi
prenasena data.
Z datoveho modu do prokazoveho se dostanete tak, ze na seriove lince bude 1s
klid pak se posle retezec "+++'' a po nem opet 1s klid. Modem by mel poslat
retezec OK nebo ekvivalentni cislene hlaseni. (myslim ze 0).
Zaveseni modemu po te se provede prikazem ATH. (ATZ nebo ATZ0 je reset do
profilu 0, pravda taky to po nem zavesi....).
Karel
----- Original Message -----
From: Peter Rus <peterrus(zv)intesys(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 10, 1998 10:01 PM
Subject: Re: Modem a hang up
>Ahoj,
>
>nekdy davno v dosovych programech se nejdrive poslal neco jako "init
string" (ne v tom pravem smyslu) - to bylo
>vetsinou "+++" modem pak cekal na prikaz. Pak se napsalo "ATH" a bylo to.
>
>Snad to pomuze,
>
>Peter Rus ml.
>
>
>-----
>MiSSoftware wrote:
>
>> nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz to
tady bastlim dva dny a zadnej vysledek ...
>Modem a hang up
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 22:26:37
MiSSoftware wrote:
>
> Ahoj vsichni,
>
> nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz to tady bastlim dva dny a zadnej vysledek ...
Ahoj,
Pokud mas otevreny seriovy port tak se nastavi DTR. U modemu lze nastavit
ze po shozeni DTR dojde k rozpojeni (a vetsinou toto byva ve vychozim
profilu nastaveno - prikaz AT&Dx). Dalsi moznost je prepnout modem do
command rezimu (vetsinou zaslanim sekvence +++) a pote prikazem ATH0
zavesit a pockat na odpoved OK ci 0 (podle nastaveni result kodu).
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
SQL - 2 files
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 22:27:13
"Ji�� Heinisch" wrote:
>
> D�ky za pomoc
>
> mohl bych dostat bli��� popis p�ikazu
> outer join a jim podobnych
>
> v helpu u Paradoxu toho moc neni
Ahoj,
popis LocalSQL prikazu najdes v helpu - localsql.hlp
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Delphi - dotaz do konference
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 22:27:05
Jindriska Kubatova wrote:
> Ahoj,
>
> potrebovala bych zjistit aktualni pozici vety v TQuery tak, abych na
> obrazovku mohla napsat
> informaci "aktualni veta/celkovy pocet vet".
> Zatim se mi to podarilo pouze pomoci sekvencniho prohledavani od
> prvni vety, coz mi nepripada prilis efektivni.
>
> Nemel uz nekdo podobny problem a pokud ano, jak ho vyresil ?
Ahoj,
Zalezi na tom jakou pouzivas databazi.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Pomoooc MYS
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 22:31:28
pcuhel(zv)deltax(tec)cz wrote:
>
> Zdravim vsechni,
>
> bohuzel jsem v koncich.
> Mam problem potreboval bych odchytit udalost mysi pro cela windows.
Ahoj,
to lze udelat pomoci hook funkci, podivej se do Win32 API helpu tam to
mas popsane. Tady mas podobny priklad, ale s klavesnici:
http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\jul\02\dlfaaabz.htm
> Pokud budou souradnice v pozadovanem rozsahu udelat nejakou akci.
> Pokud ne nechat zpravu zpracovat tim komu byla urcena. Dale bych
> potreboval presunou mys na zadanou pozici.
To muzes udelat pomoci API funkce SetCursorPos, nebo pomoci metody
globalniho objektu Mouse (TMouse)
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Naozaj treba Patch?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 22:34:19
> uz sa tu hodne popisalo o tom, ze prva verzia
> Delphi4 je plna chyb a ze je vhodne pouzit na
> nu Update Pack #2.
Ano, ten patch je opravdu dobre pouzit. Ne ze by se tim odstranily vsechny
chyby, ale dostanes tak D4 na uroven chybovosti predchozich verzi Delphi.
Puvodni D4 je totiz opravdu dost zabugovane.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Re[2]: TMemo a WIN95
[*] Hubert <mneu3246(zv)ss1000.ms.mff.cuni(tec)cz> - 10.12.1998 22:52:44
MD> V knize Mistrovstvi v Delphi 2, M. Cantu pise, ze toto neni
MD> omezeni Delphi, ale windows.
MD> Dobra.
MD> PS: Martine F., nez se na me zase vrhnes, ze kydam spinu na Windouse,
MD> tak vez, ze to v te knize opravdu je.
Zadnou spinu nehazes. Todle neni chyba Windows, ale Win9x, proste tak
fungujou. To ze do Memo lze dat max 32 kb se pise i v MSDN. Pokud
nekdo chce pod Win9x pouzivat texty > 32 Kb, tak bud musi pouzit
Richtext ci si napsat vlastni komponentu.
Best regards,
Michal Neuwirth mailto:mneu3246(zv)ss1000.ms.mff.cuni(tec)cz
Mark-Release
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 23:02:11
Bene� Jaroslav wrote:
>
> Ahoj,
> Chtel jsem se zeptat, zda existuje v Delphi nejaka obdoba prikazu
> MARK a RELEASE pro spravu bloku pameti. Kdyz jsem prepisoval komprimacni
Pokud vim tak neni. Navic tyto dva prikazy ve me vyvolavaly hruzu uz v
klasickem pascalu a radeji jsem to nikdy nepouzival. Nehlede na to, ze
i v helpu nebylo doporuceno to pouzivat s "klasickymi" prikazy pro
alokaci pameti.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
TTreeView && Print
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 10.12.1998 23:17:06
Zdravim vsechny.
Prosim poradte, mam naplneny veliky TTreeView a potreboval bych
ho dostat na tisk�rnu, alespon s tema carkama, nejlepe i s
obrazkama. ( Samozrejme plne rozbalenej, to ale umim ).
Potrebuji to delat v programu, takze predem dekuji za rady typu
Alt+PrintScreen. S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Table is full
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1998 23:17:07
Jirka wrote:
>
> Nevite nekdo co bych mohl udelat aby mi proslo pridani jedne polozky
> do jiz existujici tabulky napr. v DB Desktopu. Tabulka ma nejakych 15
> MB, na vsech discich je min. 4x vice mista, v PRIV a WORK adresarich
> jeste mnohem vic, kdyz vsak dam Restrukture (v DBD z Delphi1, ale i z
> Paradoxu 8) pracuje asi 15 minut a potom vyhodi hlaseni Table is
> full. Neradte mi vsak reseni typu udelat novou tabulku a pridat data.
> Mam tam polozky typu Autoinkrement a pres ne propojene jine tabulky.
Ahoj,
uz se to tu resilo, musis zvetsit hodnotu BLOCKSIZE u Paradox driveru
a tabulku restrukturalizovat:
http://www.delphi(tec)cz/soubor.asp?dir=\archiv\1998\jun\29\dlfaaabx.htm
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************Delphi 4
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 11.12.1998 00:06:49
Aplikace Ti pojedou, na zadny problem jsem nenarazil,
bohuzel ale ta stabilta prostredi ... !!!
I s druhym patchem nic moc (D4Prof).
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
----------
> Odes�latel: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Delphi 4
> Datum: 9. prosince 1998 13:35
>
> > Jeden urcite. Penize za Upgrade...
>
> O penezich nebyla rec. Jde mi o verzi Standard. Spise me zajima, jestli
> mi pojedou vsechny stare aplikace napsane v trojce.TMemo
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 11.12.1998 00:57:46
On Thu, 10 Dec 1998, Jan Fiala wrote:
> Memo1.BeginUpdate;
> .
> vkladani radku
> .
> Memo1.EndUpdate;
>
> -----------------------------------------------------------------
> ing. Jan Fiala jan.fiala(zv)iname.com
> Prog-Soft s.r.o.
> INFOS - informa�n� system pro n�poj��e
> ---------------------------------------------------------------
Cim to je, ze mi to Delphi 4 nesezraly?????
__ _ Lukas
/ `-' ) ,,,
|=|=()|||||||[:::}
\__.-._) ```
tel. 855 10 40-9 l. 393
ICQ: 21084410
Rotacia
[*] �irip Peter <psoft(zv)ke.telecom.sk> - 11.12.1998 07:33:26
[P��loha v souboru: vcard.vcf]
Zdravim,
viete mi niekto poradit, ako vytvorit graficky komponent, ktory by nebol
normalne otoceny obdlznik, ale mal by vlastnost uhol, podla ktorej by
menil svoje natocenie. Nechcem vykreslovat v ramci komponentu iny
otoceny obdlznik. Bol by som rad, keby sa dal spravit komponent, ktory
ma ma body na zvacsovanie v IDE naozaj v rohoch otoceneho obdlznika. Da
sa cosi take ?
Peter.
Grid
[*] mlibra(zv)post(tec)cz - 11.12.1998 07:39:10
Cau vsichni,
potrebuji zobrazit data v nejakem Gridu. V komponente TGrid (standardne dodavana) se mi ale nezarovnava text. Potrebuji, aby, kdy� text presahuje sirku policka, byl zarovnany do vice radku (v ramci jednoho policka). Klasicky grid mi udela presah (vidim treba jenom 10 znaku, zbytek je dostpny jenom pri klepnuti na policko a posunutim kurzoru). Jestli to nezvlada TGrid, tak kde sehnat komponentu s temito vlastnostmi? Diky. adresa: mlibra(zv)post(tec)cz
TMemo a WIN95 (2)
[*] Jan Janecek <stoupa(zv)vos-sps-jicin(tec)cz> - 11.12.1998 08:05:14
Diky moc za odpoved .
Nevite teda nekdo o nake komponente, ktera by se chovala stejne rychle,
mela stejne vlastnosti, ale nemela tyto omezeni ve win 9x????
Dekuji za odpovedi.
-------------------------------------
Jan Janecek - STOUPA
Spravce pocitacove site na:
VOS_SPS
Pod Kozeluhy 100
Jicin 50601
EMAIL:stoupa(zv)vos-sps-jicin(tec)cz
stoupik(zv)xoommail.com
jan.janecek(zv)post(tec)cz
WEB: HTTP://members.xoom.com/stoupik
ICQ: 12364149
-------------------------------------
Spusteni NT Services
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.12.1998 08:11:34
pcuhel(zv)deltax(tec)cz wrote:
> Dekuji za odpoved.
> D4 bohuzel nemam. Nicmene neni na spusteni sevices nejaka API funkce ?
Nevim, v D3 jsem se servisy nezabyval. Az je budu nutne
potrebovat delat, koupim si D4.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Registry
[*] Petr Brant <p.brant(zv)samo.pvtnet(tec)cz> - 11.12.1998 08:42:48 -0000
Ahoj,
ne ze bych s tim mel nejake zkusenosti, ale nesouvisi to s tim, jaka
jsou momentalne nastavena prava ? Nejsem si jist, ale myslim, ze v NT
neni problem zakazat zapis/cteni registru !
POZOR, TATO ADRESA JE JEN DOCASNA, BUDE PLATIT ASI DO POLOVINY PROSINCE
!!!
********************************************************
Petr Brant [p.brant(zv)samo.pvtnet(tec)cz]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
> -----P�vodn� zpr�va-----
> Od: Milan Fiedler [SMTP:milanf(zv)rts(tec)cz]
> Odesl�no: 10. prosince 1998 14:04
> Komu: Konference
> P�edm�t: Registry
>
> Mel bych dotaz, zapisovani do registru,
> udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do
> registru ani precist, mam zapis a cteni do HKEY_LOCAL_MACINE, nekdo mi
> rika ze mam zapisovat do HKEY_CURRENT_USER a jiny zase ze to mam
> dobre.
> �
> Rad by bych se zeptal na Vase nazory !!!
> �
> Diky
> Milan Fiedler
> milanf(zv)rts(tec)cz <mailto:milanf(zv)rts(tec)cz>Tlac grafu cez Quick report
[*] muher(zv)csas(tec)cz - 11.12.1998 08:52:46
... chcel by
vo vystupnej zostave (QReport) vyuzit ten graf,
ktory uz mam
vytvoreny na forme pre obrazovkovy vystup.
Mozno som prilis narocny na Delphi,
ale preco nie
... ne, nejsi prilis narocny. Zrovna jsem to sem
chtel napsat.
Mam stejny problem a doufam, ze uz to n�kdo vyresil,
proto�e
ja uz si stim hraju tyden a ztracim nervy.
Martin UHER
delphi chat
[*] Radoslav Krehlik <heretic(zv)softok(tec)cz> - 11.12.1998 08:56:17
hi
>Ale ne vsechny DLL knihovny jsou ActiveX, takze jaksi neni
>co registrovat. Bezna DLL knihovna, at uz je Microsoftu nebo
>kohokoliv jineho, se vubec neregistruje.
To si mi neporozumel :P
Ja mel na mysli takove knihovy (at uz typove nebo jine) ktere se
registrovat nejakym zpusobem musi, tedy pokud nechces rucne do registru
dodavat tuny CLSID apod. Napriklad, pokud chces zabezpecit
vlastni instalaci Runtime access97 nebo MSGraph, chtel bych videt, jak by
si tyhle 'bezne' knihovny,
na ktere jsou na tyto aplikace vazany pouzival neregistrovane :)
Heretic-X
Langdriver pro MS-SQL + ODBC
[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 11.12.1998 08:56:45
ODBC m��e (a nemus�) m�t nastavenu vlastn� konverzi znakov�ch sad. M� tak vlastn� 3 konverze. Prvn� je v MSSQL Client configuration utility (najde� v menu windows), druh� v ODBC a t�et� v BDE. Je jasn�, �e pokud konvertuje� �e�tinu v ODBC i v BDE, pak nebude v po��dku. Skus si s t�m trochu pohr�t a p�esv�d�it ho, aby �e�tinu konvertoval jen jeden z nich. Pop�em��lej tak� nad t�m, jakou znakovou sadu pou��v� v serveru, i tam se znakov� sada nastavuje a nen� bez v�znamu. J� pou��v�m 1250, do budoucna se mo�n� prosad� UNICODE.
-----P�vodn� zpr�va-----
Od: Marek Prokop [SMTP:prokopsw(zv)czn(tec)cz]
Odesl�no: 9. prosince 1998 5:27
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: Langdriver pro MS-SQL + ODBC
Pokousim se rozchodit pristup na MS-SQL 6.5 pres BDE a ODBC (Delphi
2). Vytvoril jsem si pokusnou databazi s 1 tabulkou a jednoduchy
program pro jeji editaci. Na prvni pohled je vse v poradku, jenze na
druhy pohled jsou problemy s cestinou.
Pres TQuery v Delphi se diakritika ukazuje dobre, ale udelam-li
SELECT v iSQL, je cestina spatne. Krome toho nefunguje spravne
trideni - nejprve je Z s hackem, pak A, C s hackem je az na konci za
Z. CH je zatrideno kupodivu dobre.
Zajimave je, ze na tomtez SQL serveru mam i jinou databazi, ktera je
obhospodarovana z aplikace v PowerBuilderu a kdyz se pres ODBC a BDE
pripojim na ni, je cestina vcetne trideni v poradku jak v iSQL tak v
Delphi.
Diky za kazdou radu
Marek Prokop
MS-SQL a BDE
[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 11.12.1998 09:03:26
Tuhle hl�ku v�d�m. P���iny mohou b�t n�sleduj�c�: 1.nen� nainstalov�n klient SQL, 2.nen� spr�vn� nastaven s�ov� protokol (protokol v SQL client configuration utility je jin� ne� v Setings - Netwok). Mysl�m, �e je to ta druh� z nich. Je�t� existuje t�et� mo�n� probl�m, ale ten se projevuje asi jinak: 3. Protokol na SQL serveru je jin�, ne� protokol na SQL Client configuration utility.
P.S. V�ele doporu�uji TCP/IP (NetBEUi je sice rychlej��, ale zamyk� tabulky)
-----P�vodn� zpr�va-----
Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
Odesl�no: 9. prosince 1998 6:44
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: MS-SQL a BDE
Ahoj,
narazil jsem na problem, ktery jsem nedokazal u zakaznika
vyresit. Maji SQL Server 6.5, SP3, zaplatu na Bloby. Nainstaloval
jsem BDE 4.51, nativni link pro MSSQL. SQL Client se nainstaloval
v poradku a spoji se se serverem. Problem nastal, kdyz jsem
zavedl v BDE Alias, na nekterych pocitacich to slape jako hodinky,
na nekterych (a jako na potvoru na tech nejdulezitejsich) pokus o
otevreni databaze (uz z BDE) vraci chybu
"General SQL Error: Db-library network communication layer not
loaded. Alias: ...".
Nesetkal jste se s necim takovym uz nekdo? Hledal jsem nejake
info u Inprise, ale nic jsem nenasel. Na obou pocitacich, kde to
neslo, maji nainstalovane Quatro pro Wokna - mozna by to mohlo
mit vliv, mozna ne.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Spusteni NT Services
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 11.12.1998 09:09:16
Samozrejme ze se to spousti API funkci, jak jinak. Jde o to, ze v D4 k
tomu jsou (zrejme) nejake podporne prostredky. V Builderu to jde uz od
v1.0 a drive jsem to zkousel i BC++ 5.02 takze zadny problem (akorat ze
tomu jeste moc nerozumim:-)
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: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> Odesl�no: 11. prosince 1998 8:12
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Spusteni NT Services
>
> pcuhel(zv)deltax(tec)cz wrote:
>
> > Dekuji za odpoved.
> > D4 bohuzel nemam. Nicmene neni na spusteni sevices nejaka API funkce
> ?
>
> Nevim, v D3 jsem se servisy nezabyval. Az je budu nutne
> potrebovat delat, koupim si D4.
>
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
> Tel.: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
rychla grafika
[*] ri(zv)spse.adlerka.schools.sk - 11.12.1998 09:23:14
Zdravim.
V starom Pascale existovali nejake softwarove
prostriedky na zistenie, ci sa prave odohrava
vertikalne zatemnovacie obdobie (niekolko ms
alebo us, ked sa prave skoncilo vykreslenie
obrazovky, a luc (samozrejme zoslabeny) sa vra-
cia nahor); suviselo to aj so SnowChecking.
Dnes by sa mi to zislo na iny ucel:
Predstavme si aplikaciu, ktora ma v realnom ca-
se zobrazit napr. presne 25 alebo presne 50 ob-
razkov/s. Ak bude aktualna snimkova frekvencia
monitora nesudelitelna s 50Hz (napr. 60 alebo
85 Hz), bude viditelne /-----\
sekanie (napr. objekt I o o I
rychlo sa hybuci vodo- ___ (I A I) ___
rovne bude pravidelne I \_/ I
vyzerat takto: \_____/
Preto by som na to isiel dvoma krokmi:
1.nastavit snimkovu f na N * 50Hz (napr. 100),
2.kvoli presnemu casovaniu pouzit funkciu zis-
tujucu, ci je prave vertikalny spetny beh
(a ak by sa dalo, tak aj poradove cislo pra-
ve kresleneho riadku).
Po dlohom intro prichadzaju otazky:
1. Viete o nejakej funkcii/sluzbe Delphi alebo
aspon Win32API, ktora dava taketo "in-deep" in-
formacie o grafickom subsysteme.
2. Subory bmp a podobne sa (z hladiska pisania
kodu) daju zobrazovat celkom lahko, ale co s
bitmapami vytvorenymi pocas runtajmu ulozenymi
ako array[0..xmax,0..ymax] of RgbColor (bolo by
totiz velmi neefektivne najprv tie data ulozit
do suboru bmp a potom ho horespomenutym sposo-
bom natahovat - ved vieme ake su Win "vhodne"
na narocne realtime-aplikacie, napr. zobrazo-
vanie zivych obrazkov).
3. Myslite, ze by sa dala pomocou pocitania
snimkov grafickej karty vyrobit alternativa
casovania pomocou CMOS-casu alebo 18hertzo-
veho tikadla? Poskytuju gr.karty nejake pro-
striedky na zistenie poradoveho cisla prave
vykreslovaneho snimku (ak za 0. povazujeme
napr. ten prvy po nastaveni daneho X*Y*F)?
Budem vdacny za kazdu dobru radu.
Jano.zakaz swapovania
[*] ri(zv)spse.adlerka.schools.sk - 11.12.1998 09:38:06
Zdar.
Z dovodov zarucenia rychlosti behu aplikacie
by som potreboval zarucit, ze niektore (alebo
vsetky) datove struktury tejto aplikacie budu
permanentne pritomne vo fyzickej RAMke (nebudu
swapovane na disk). Jednoduchou cestou je do-
porucit uzivatelovi, aby si zakazal virtualnu
pamet, ale to by ho mohlo obmedzovat pri pou-
zivanych inych programov.
Preto hladam nejaku cestu, ako niektorym dato-
vym strukturam programovo prikazat neswapovatel-
nost (samozrejme, ak je fyzicka RAM dost velka,
aby sa ta aplikacia vobec dala spustit).
Napada niekoho riesenie?
Dik.
Jano
.Modem a hang up
[*] Mal� Dobromil <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 11.12.1998 09:43:29
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Posli na modem +++ (tim si vynutis jeho pozornost) a potom mu posli ATH.
D.
> ----------
> Od: MiSSoftware[SMTP:missoftware(zv)lanskrounsko(tec)cz]
> Odesl�no: 10. prosince 1998 21:06
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Modem a hang up
>
> Ahoj vsichni,
>
> nemate nekdo zkusenosti s tim, jak zavesit programove modem ??? Ja uz
> to tady bastlim dva dny a zadnej vysledek ...
>
> Rotacia
[*] ri(zv)spse.adlerka.schools.sk - 11.12.1998 09:59:47
Peter,
neviem, ci to chces robit na "objektovacej" urovni
("3_x_click + 1_row_write a hotovo"), alebo seriozne
graficky. Pre druhy pripad tu mam par rad:
Transformacia suradnic moze vyzerat napriklad takto:
Xnove := Xnove0 +
+ A * ( Xstare * cos(uhol) - Ystare * sin(uhol) )
Ynove := Ynove0 +
+ A * ( Xstare * sin(uhol) + Ystare * cos(uhol) ),
(prepocet XYstare := fnc(XYnove) - tzv. spetna trans-
formacia - by vyzeral velmi podobne)
kde A je koeficient zvecsenia (ak staci povodna vel-
kost, tak A=1),
uhol vyjadruje (asi v radianoch) otocenost noveho ob-
jektu voci staremu v proti-hodinovom smere, a
Xnove0,Ynove0 su suradnice noveho pociatku (ale pozor:
v napisanych rovniciach smeruje Y nahor, preto to
bude treba rozumne preminusovat).
Komponent by sa nenatocene mohol vykreslovat na nejakom
skrytom formulari (alebo posunutom mimo viditelne surad-
nice) a potom s pouzitim vnoreneho 2-dim cyklu for a ope-
racii get- a put-pixel kreslit na cielovu lokaciu.
Ak by sa tito "natocenci" mali vykreslovat castejsie, tak
si na to sprav procedurku.
[ Hoci sa este len chystam robit v Delphi (zatial len ci-
tam manual), veeelmi pochybujem o moznosti existencii na-
tocenych (a pritom pozeratelnych) komponent alebo okien
v Delphi alebo vo Win (kym si ich clovek nevyrobi sam). ]
Samozrejme, ze realne cisla by bolo treba zaokruhlovat na
cele (suradnice pixelov), co by bol prvy krok ku spatnemu
vyzoru vysledku (taketo "kreacie" vidime dennodenne v "pro-
fesionalne" vyrobenych reklamach a teleshoppingoch "hyria-
cich" tucnym aliasingom);
a druhym dovodom osklivosti by mohlo byt pouzivanie
menej_ako_24bitovych farieb (naozaj neviem, naco este
v roku 1998 niektori pisu aplikacie pre 4,8 alebo 16-bito-
ve palety),
takze za kvalitu vopred nerucim.
Ak by s tym boli problemy, mozem poskytnut blizsie info
o antialiasingu, nadvzorkovani a inych metodach serioz-
nych tvorcov grafiky.
Cau. Jano.
.Prava na sdileni
[*] Ales Zeleny <zelenya-l(zv)mlp(tec)cz> - 11.12.1998 10:02:44
DDV,
mate nekdo v delphi napsanou proceduru na nastavni prava na sdileni.
Preci jen je to ponekud komplikovane a z helpu jesem toho mnoho nepochopil -
nejsem tak zcela schopen jejich postup pouzit v delphi.
Ukazkova procedura by byla idealni.
Diky a.+------------------------+ +---------------------------+
|Ales Zeleny OK1UUE| |Ales Zeleny OK1UUE|
|Mestska knihovna v Praze| |Municipal Library of Prague|
|Marianske nam. 1 | |Marianske nam. 1 |
|115 72 | |115 72 |
| | | |
|Tel.: (420)(2)22113 452 | |Tel.: (420)(2) 22113 452 |
|E-mail:zelenya(zv)mlp(tec)cz | |E-mail:zelenya(zv)mlp(tec)cz |
|MIME: ISO-8859-2 OK! | |MIME: ISO-8859-2 OK! |
+------------------------+ +---------------------------+
Multitasking, to je kdyz se aplikace mohou hroutit paralelne.
Multitasking means that applications can crash simultaneously.Spusteni NT Services
[*] David Hrb�� - 11.12.1998 10:05:25
Panove, trochu se smutkem pozoruji beh na teto konferenci. Uz to opravdu
neni to co bejvalo. Odpovedi na dotaz ve smyslu kup si novejsi verzi, se mi
zdaji trochu az moc off-topic a mam pocit, ze na teto konferenci je cim dal
tim mene odbornych dotazu a odpovedi a velka cast prispevku je abych tak
rekl non-Delphi.
Ale ted k Delphi
Samozrejme, ze sluzby (services) se daji ovladat z Delphi a to klasicky pres
API.
Trochu teorie, kazda sluzba ma sve jmeno, jedno dlouhe, ktere se zobrazuje v
ovladacim panelu -> sluzby a druhe interni, kterym je volame a pod kterym je
take zapsana v registrech viz
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services
Pro praci se sluzbami je nutne pouzit knihovnu Winscv.
Nasledujici ukazka kontroluje, zda je spustena sluzba DHCP klient, ktera ma
interni nazev DHCP
procedure TForm1.Ukazka(Sender: TObject);
var
FManagerHandle : SC_HANDLE;
FServiceHandle : SC_HANDLE;
FServiceSatus : TServiceStatus;
FMachineName : array [0..MAX_COMPUTERNAME_LENGTH] of char;
FSize : Integer;
FArg : PChar;
begin
FSize := sizeof (FMachineName);
GetComputerName (FMachineName, FSize);
FManagerHandle:= OpenSCManager(FMachineName, Nil, SC_MANAGER_ALL_ACCESS);
// otevreni managera sluzeb
if FManagerHandle<>0 then
begin
FServiceHandle
:=OpenService(FManagerHandle,PChar('DHCP'),SERVICE_ALL_ACCESS);
// pristup ke konretni sluzbe
if schService<>0 then
begin
QueryServiceStatus(FServiceHandle ,FServiceSatus);
// stav sluzby, bezi, zastavena, prerusena a pod.
if FServiceSatus.dwCurrentState=SERVICE_STOPPED then
// pokud zastavena
if Windows.MessageBox(Handle,PChar('Sluzba zastavena.
Spustit?'),PChar('Pozor'), MB_YESNO+MB_ICONQUESTION)=IDYES then
StartService(FServiceHandle ,0,FArg);
// spust sluzbu, FArg je zde jen pro ukazku, pro poslani argumentu sluzbe,
standardne tam muze byt Null
end;
CloseServiceHandle(FServiceHandle);
end;
CloseServiceHandle(FManagerHandle);
end;
Pisu to jen tak z hlavy, takze doufam, ze jsem se moc nesekl. Pokud se
podivate podrobneji na kod, zjistite, ze je prakticky mozne kontrolovat
sluzby i na jinem nez lokalnim pocitaci.
Pekny den
David Hrbac
Deadlock v Interbase
[*] OLEJNIK Andrej <olej(zv)asset.sk> - 11.12.1998 10:10:01
Nemate niekto skusenosti s deadlock-mi v Interbase 4.2 a 5.0 ?
Viac aplikacii pristupuje k jednej baze a vsetci su prihlaseni pod jednym
userom
Potom staci malo a Interbase sa chova divne
olej
Registry
[*] David Hrb�� - 11.12.1998 10:17:29
Chyba neni u NT, ale v Delphinach. Je to docela proste, jakozto
administrator, mas vsechna prava, co se tyce vsech klicu v registrech.
Ostatni typy uzivatelu maji uz jista omezeni, dle jejich typu. T.z. jako
administrator muzes cist i zapisovat prakticky kam chces i do
HKEY_LOCAL_MACINE, ale pokud se prihlasis treba jako PowerUser, tak uz
nemusis mit pristup do teto vetve, respektive abych byl presnejsi, tak
standardne mas pouze pravo cist ale uz ne zapisovat. A jsme u problemu veci
pokud das OpenKey tak vzdy dostanes chybove hlaseni. Viz zdrojak Inprise:
function TRegistry.OpenKey(const Key: string; CanCreate: Boolean): Boolean;
var
TempKey: HKey;
S: string;
Disposition: Integer;
Relative: Boolean;
begin
S := Key;
Relative := IsRelative(S);
if not Relative then Delete(S, 1, 1);
TempKey := 0;
if not CanCreate or (S = '') then
begin
Result := RegOpenKeyEx(GetBaseKey(Relative), PChar(S), 0,
KEY_ALL_ACCESS, TempKey) = ERROR_SUCCESS;
!!!!! tady je ten zakopany pes Inprise pozaduje KEY_ALL_ACCESS, to znamena
zapis i cteni at se deje cokoliv
end else
Result := RegCreateKeyEx(GetBaseKey(Relative), PChar(S), 0, nil,
REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, nil, TempKey, (zv)Disposition) =
ERROR_SUCCESS;
if Result then
begin
if (CurrentKey <> 0) and Relative then S := CurrentPath + '\' + S;
ChangeKey(TempKey, S);
end;
end;
Spust regedt32 a schvalne se podivej, jak je to s temi pravy uzivatelu na
jednotlivych vetvich a budes hned v obraze.
David Hrbac
-----P�vodn� zpr�va-----
Od: Milan Fiedler <milanf(zv)rts(tec)cz>
Komu: Konference <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1998 15:40
P�edm�t: Registry
Mel bych dotaz, zapisovani do registru,
udelal jsem program v Delphi 3 a na NT mi nefunguje, nemuze zapsat do
registru ani precist, mam zapis a cteni do HKEY_LOCAL_MACINE, nekdo mi rika
ze mam zapisovat do HKEY_CURRENT_USER a jiny zase ze to mam dobre.
Rad by bych se zeptal na Vase nazory !!!
Diky
Milan Fiedler
milanf(zv)rts(tec)cz
Spusteni NT Services
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.12.1998 10:20:05
>Dekuji za odpoved.
>D4 bohuzel nemam. Nicmene neni na spusteni sevices nejaka API funkce ?
>
samozrejme - musis se naucit komunikovat se SeviceManagerem. Nasledujici
ilustracni kod by mel zastavit service jehoz jmeno je ulozeno v
c_ServiceName. Pokud neznas dopredu jmeno sluzby je nutne zjistit jmena
bezicich sluzeb (pomoci EnumServicesStatus).
Procedure StopService;
VAR
schService : TSC_HANDLE;
schManager : TSC_HANDLE;
begin
schManager := OpenSCManager(NIL,NIL,SC_MANAGER_ALL_ACCES);
if schManager = 0 then
begin
{$IFDEF DEBUGLOG}
DebugLog.Write('CHYBA : OpenSCManager',['']);
{$ENDIF}
end
else
begin
schService := OpenService(schManager,c_ServiceName,SERVICE_ALL_ACCESS);
if schService = 0 then
begin
{$IFDEF DEBUGLOG}
DebugLog.Write('CHYBA : OpenService',['']);
{$ENDIF}
end
else
begin
if ControlService(schService,SERVICE_CONTROL_STOP,ssStatus) then
begin
While QueryServiceStatus(schService,ssStatus) do
begin
if ssStatus.dwCurrentState = SERVICE_STOP_PENDING then
begin
Sleep(1000);
end
else
Break;
end;
if ssStatus.dwCurrentState = SERVICE_STOPPED then
begin
end
else
begin
{$IFDEF DEBUGLOG}
DebugLog.Write('Error : Stop failed',['']);
{$ENDIF}
end;
end
else
begin
{$IFDEF DEBUGLOG}
DebugLog.Write('Error : ControlService',['']);
{$ENDIF}
end;
CloseServiceHandle(schService);
end;
CloseServiceHandle(schManager);
end;
end;
Zdravi
D. Toman
Delphi 4
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 11.12.1998 10:35:10
>Aplikace Ti pojedou, na zadny problem jsem nenarazil,
>bohuzel ale ta stabilta prostredi ... !!!
>
>I s druhym patchem nic moc (D4Prof).
>
>S pozdravem Zdenek
>
Mam taky D4Prof a po nainstalovani SP2 jedou Delphi bez problemu ....
Od jeho nainstalovani bez jedineho spadnuti, a to mi predtim padaly tak 3 x
denne.
S pozdravem M. Cizek
Spusteni NT Services
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 11.12.1998 10:41:31
Priklady jak spoustet NT services a hromada dalsich veci k Delphi & NT je na
tehle
adrese zkuste se mrknout .... http://www.jgsoftware.com/nt.htm
s pozdravem M. Cizek
rychla grafika
[*] Michal Cizek <starxax(zv)molly.vabo(tec)cz> - 11.12.1998 11:07:20
Jde li ti o rychlou grafiku pod Windows da snad odpovedet jen jedno :
DirectX. :-)
s pozdravenm M. Cizek
RichText
[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 11.12.1998 11:07:41
S TRichEdit jsem si dost u�il, ale nev�m, jestli mu u� dost rozum�m. Skus se pt�t.
-----P�vodn� zpr�va-----
Od: Hubert [SMTP:mneu3246(zv)ss1000.ms.mff.cuni(tec)cz]
Odesl�no: 9. prosince 1998 8:11
Komu: Delphi
P�edm�t: RichText
Ahoj!
Prosim vas neni tu nekdo kdo se vyzna v komponente na praci s RTF
(TRichText). Potrebuju nutne pomoct. Vim, ze ohledne RTF probehlo
uz dost diskuze, ale na archivu konference na www.delphi(tec)cz jsem
nenasel odpovedi na sve problemy.
Pokud tu nekdo takovy je a byl by mi ochoten pomoct, tak at se
ozve.
Predem diky.
Best regards,
Michal Neuwirth mailto:mneu3246(zv)ss1000.ms.mff.cuni(tec)cz
zakaz swapovania
[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 11.12.1998 11:12:12
Chlivny nazor byvaleho uzivatele 286/4MB RAM - postav si tam ramdisk. (nebude to
tak rychle jak operacka, ale melo by to byt jistejsi nez riziko swapaku.
he he ... akorat ... pokud tam pobezi jine aplikace, tak kvuli nim (!!) se
stejne bude swapovat (pokud by k tomu melo dojit) a zastavi se i Vase aplikace
ikdyz kompletne jeji struktury budou v pameti.
// nebo se predpoklada beh na bezne sestave pro koncove uzivatele - 2xP II
450MHz , 0.5GB RAM, 18GB Seagate's cheetah....... :-)
(teda ramdisk - jeste ve w95 to slo - nevim co ty dalsi bestie)
Teno navrh je vsak spise provokativni. Pokud mi nekdo bude chtit za obsah
vynadat, radeji na mail nez do konference.
Mti.
( neprofesionalni kratky podpis :-) ... viz "pruzkum"
-----P�vodn� zpr�va-----
>Z dovodov zarucenia rychlosti behu aplikacie
>by som potreboval zarucit, ze niektore (alebo
>vsetky) datove struktury tejto aplikacie budu
>permanentne pritomne vo fyzickej RAMke (nebudu
>swapovane na disk). Jednoduchou cestou je do-
>porucit uzivatelovi, aby si zakazal virtualnu
>pamet, ale to by ho mohlo obmedzovat pri pou-
>zivanych inych programov.
>Preto hladam nejaku cestu, ako niektorym dato-
>vym strukturam programovo prikazat neswapovatel-
>nost (samozrejme, ak je fyzicka RAM dost velka,
>aby sa ta aplikacia vobec dala spustit).Bitmapa
[*] V�t�zslav Gazda������u��n�?��? - 11.12.1998 11:27:47
Potrebuji nahradit urcitou barvu v bitmape jinou barvou. Vim, ze si musim
vytvorit nejakou maskovaci bitmapu pozitim nejake ROP operace, a potom to
nejak zkombinovat, ale nevim jak na to. Muze mi nekdo poradit ?
Diky Vita
"rychla" grafika
[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 11.12.1998 11:31:39
To, ze existovaly ve starem dobrem pascalu prostredky na zjisteni zpetneho behu
.... to vraci uz graficka karta. - pristup na porty.
Dost informaci se da najit v SYSMANu, pripadne vydala to g(k)rada "programovani
obrazovych adapteru" (asi pred tremi lety).
Nejsem si jist, jestli pod windows bude realne chtit delat neco "presne".
Co se tyce ziskani casove zakladny - jo, ale negeneruje to preruseni, musi si to
clovek hlidat sam (treba zpetny bech paprsku), a navic - nekdo si odswapne a
.... za tech 200-400ms co bude potrebovat, ti jich par zdrhne. A navic to zavisi
na snimkove freq. monitoru.
To ze si nastavis nasobek 50 jako snimkovou freq. znamena, ze v 30% pripadu to
bude *1 a v par pripadech *0. (nebo pocitas s uzivateli, co maji neco lepsiho
nez 15" monitorky za 6kkc? - 85 -90MHz strop?) (+par uzivatelu konfigurace ve
stylu intel pent. 100MHz, 16MB ram, 1GB Hdd, 16bit. Trident
(0.5MBram)......:-) - znam osobne.
K TOMU RGB - neco jsem s tim blbnul.
Pokud si vytvoris image a jeho "Tbitmape" reknes
image1.picture.bitmap.pixelformat:=pf24bit (truecolor)... muzes pouzit funkci
api setbitmapbits.
(a je tam i getbitmap...)
SetBitmapBits(Image1.Picture.Bitmap.Handle, sizeof(q^), q);
akorat az to budes chtit zobrazit, zavolas si image1.refresh;
poznamky :
- Ten pixel format je celkem dobre pouzit, protoze jinak si bitmapa veme
aktualni rozlisovacku.
- cim lepsi rozlisovacku mu das, tim pomalej se bude hybat
- Timage neblika, pokud neni castecne necim prekryty !!
Mti.
-----P�vodn� zpr�va-----
>Zdravim.
>
>V starom Pascale existovali nejake softwarove
>prostriedky na zistenie, ci sa prave odohrava
>vertikalne zatemnovacie obdobie (niekolko ms
>alebo us, ked sa prave skoncilo vykreslenie
>obrazovky, a luc (samozrejme zoslabeny) sa vra-
>cia nahor); suviselo to aj so SnowChecking.
>Dnes by sa mi to zislo na iny ucel:
>
>Predstavme si aplikaciu, ktora ma v realnom ca-
>se zobrazit napr. presne 25 alebo presne 50 ob-
>razkov/s. Ak bude aktualna snimkova frekvencia
>monitora nesudelitelna s 50Hz (napr. 60 alebo
>85 Hz), bude viditelne /-----\
>sekanie (napr. objekt I o o I
>rychlo sa hybuci vodo- ___ (I A I) ___
>rovne bude pravidelne I \_/ I
>vyzerat takto: \_____/
>Preto by som na to isiel dvoma krokmi:
>1.nastavit snimkovu f na N * 50Hz (napr. 100),
>2.kvoli presnemu casovaniu pouzit funkciu zis-
> tujucu, ci je prave vertikalny spetny beh
> (a ak by sa dalo, tak aj poradove cislo pra-
> ve kresleneho riadku).
>
>Po dlohom intro prichadzaju otazky:
>1. Viete o nejakej funkcii/sluzbe Delphi alebo
>aspon Win32API, ktora dava taketo "in-deep" in-
>formacie o grafickom subsysteme.
>2. Subory bmp a podobne sa (z hladiska pisania
>kodu) daju zobrazovat celkom lahko, ale co s
>bitmapami vytvorenymi pocas runtajmu ulozenymi
>ako array[0..xmax,0..ymax] of RgbColor (bolo by
>totiz velmi neefektivne najprv tie data ulozit
>do suboru bmp a potom ho horespomenutym sposo-
>bom natahovat - ved vieme ake su Win "vhodne"
>na narocne realtime-aplikacie, napr. zobrazo-
>vanie zivych obrazkov).
>3. Myslite, ze by sa dala pomocou pocitania
>snimkov grafickej karty vyrobit alternativa
>casovania pomocou CMOS-casu alebo 18hertzo-
>veho tikadla? Poskytuju gr.karty nejake pro-
>striedky na zistenie poradoveho cisla prave
>vykreslovaneho snimku (ak za 0. povazujeme
>napr. ten prvy po nastaveni daneho X*Y*F)?
>
>Budem vdacny za kazdu dobru radu.
>Jano.Naozaj treba Patch?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.12.1998 11:52:36
Petr Vones wrote:
> > uz sa tu hodne popisalo o tom, ze prva verzia
> > Delphi4 je plna chyb a ze je vhodne pouzit na
> > nu Update Pack #2.
>
> Ano, ten patch je opravdu dobre pouzit. Ne ze by se tim odstranily vsechny
> chyby, ale dostanes tak D4 na uroven chybovosti predchozich verzi Delphi.
> Puvodni D4 je totiz opravdu dost zabugovane.
Mno, muzeme zustat v klidu. Ted zjistuji neco kolem
PowerBuilderu (z hlediska lokalizaci), a jeden programator mi
napsal, ze PB je pro programovani nevhodne, protoze se tam
predevsim resi, jak obejit chyby prostredi, nez vlastni problem. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Rotacia
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.12.1998 11:52:37
�irip Peter wrote:
> viete mi niekto poradit, ako vytvorit graficky komponent, ktory by nebol
> normalne otoceny obdlznik, ale mal by vlastnost uhol, podla ktorej by
> menil svoje natocenie. Nechcem vykreslovat v ramci komponentu iny otoceny
> obdlznik. Bol by som rad, keby sa dal spravit komponent, ktory ma ma body
> na zvacsovanie v IDE naozaj v rohoch otoceneho obdlznika. Da sa cosi take
Zkus si pohrat s funkcemi CreatePolygonRgn a CombineRgn.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
DBGrid & ScrollBars
[*] Radoslav Jal� <pronet(zv)ke.telecom.sk> - 11.12.1998 12:23:34
Cest praci ...
Najde sa niekto kto mi poradi, ako najjednoduchsie zakazat scrollbary v DBGride ?
Bohuzial to nefunguje standardne ako v StringGride. - Grid.Scrollbars := ssNone
Vdaka
SQL a Paradox a BDE
[*] Administrator <Administrator(zv)rosoft.sk> - 11.12.1998 12:25:10
Mam problem:
V Delphi 4 Prof. mam napisane taketo SQL
SELECT DISTINCT V.ID,V.text
FROM Slovo.DB K
INNER JOIN Tvar.db V ON V.ID=K.ID,
Skratka.db S
INNER JOIN Tvar.db V2 ON V2.ID=S.ID
ORDER BY Text
Znamena to: v dvoch tabulkach chcem najst take recordy, ktore maju
spojenie na hlavnu tabulku.
Query trva presne 1min.
Ta ista databanka to iste SQL a ten isty vysledok trva v M$ Access 2
sec.
Robim nieco zle, alebo to BDE je pomalsie ako DAO?
zakaz swapovania
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 11.12.1998 13:22:35
Podivej se do helpu API na funkci GlobalAlloc.
From: ri(zv)spse.adlerka.schools.sk
To: delphi-l(zv)fwd(tec)cz
Date sent: Fri, 11 Dec 1998 09:38:06
Subject: zakaz swapovania
Send reply to: delphi-l(zv)fwd(tec)cz
> Zdar.
>
> Z dovodov zarucenia rychlosti behu aplikacie
> by som potreboval zarucit, ze niektore (alebo
> vsetky) datove struktury tejto aplikacie budu
> permanentne pritomne vo fyzickej RAMke (nebudu
> swapovane na disk). Jednoduchou cestou je do-
> porucit uzivatelovi, aby si zakazal virtualnu
> pamet, ale to by ho mohlo obmedzovat pri pou-
> zivanych inych programov.
> Preto hladam nejaku cestu, ako niektorym dato-
> vym strukturam programovo prikazat neswapovatel-
> nost (samozrejme, ak je fyzicka RAM dost velka,
> aby sa ta aplikacia vobec dala spustit).
>
> Napada niekoho riesenie?
> Dik.
> Jano
> .
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
rychla grafika
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 11.12.1998 13:22:35
Toto podporuje Direct X.
From: ri(zv)spse.adlerka.schools.sk
To: delphi-l(zv)fwd(tec)cz
Date sent: Fri, 11 Dec 1998 09:23:14
Subject: rychla grafika
Send reply to: delphi-l(zv)fwd(tec)cz
> Zdravim.
>
> V starom Pascale existovali nejake softwarove
> prostriedky na zistenie, ci sa prave odohrava
> vertikalne zatemnovacie obdobie (niekolko ms
> alebo us, ked sa prave skoncilo vykreslenie
> obrazovky, a luc (samozrejme zoslabeny) sa vra-
> cia nahor); suviselo to aj so SnowChecking.
> Dnes by sa mi to zislo na iny ucel:
>
> Predstavme si aplikaciu, ktora ma v realnom ca-
> se zobrazit napr. presne 25 alebo presne 50 ob-
> razkov/s. Ak bude aktualna snimkova frekvencia
> monitora nesudelitelna s 50Hz (napr. 60 alebo
> 85 Hz), bude viditelne /-----\
> sekanie (napr. objekt I o o I
> rychlo sa hybuci vodo- ___ (I A I) ___
> rovne bude pravidelne I \_/ I
> vyzerat takto: \_____/
> Preto by som na to isiel dvoma krokmi:
> 1.nastavit snimkovu f na N * 50Hz (napr. 100),
> 2.kvoli presnemu casovaniu pouzit funkciu zis-
> tujucu, ci je prave vertikalny spetny beh
> (a ak by sa dalo, tak aj poradove cislo pra-
> ve kresleneho riadku).
>
> Po dlohom intro prichadzaju otazky:
> 1. Viete o nejakej funkcii/sluzbe Delphi alebo
> aspon Win32API, ktora dava taketo "in-deep" in-
> formacie o grafickom subsysteme.
> 2. Subory bmp a podobne sa (z hladiska pisania
> kodu) daju zobrazovat celkom lahko, ale co s
> bitmapami vytvorenymi pocas runtajmu ulozenymi
> ako array[0..xmax,0..ymax] of RgbColor (bolo by
> totiz velmi neefektivne najprv tie data ulozit
> do suboru bmp a potom ho horespomenutym sposo-
> bom natahovat - ved vieme ake su Win "vhodne"
> na narocne realtime-aplikacie, napr. zobrazo-
> vanie zivych obrazkov).
> 3. Myslite, ze by sa dala pomocou pocitania
> snimkov grafickej karty vyrobit alternativa
> casovania pomocou CMOS-casu alebo 18hertzo-
> veho tikadla? Poskytuju gr.karty nejake pro-
> striedky na zistenie poradoveho cisla prave
> vykreslovaneho snimku (ak za 0. povazujeme
> napr. ten prvy po nastaveni daneho X*Y*F)?
>
> Budem vdacny za kazdu dobru radu.
> Jano.
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Folder enumerators
[*] Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz> - 11.12.1998 13:39:16
Ahjo Delphisti,
nevite nekdo o nejakych dobrych komponentach, ktere by umely totez
co TFileListBox, TDirectoryListBox a TDriveComboBox, ale ve stylu
Win95 ?
Diky
Vojtech Semecky
Bitmapa
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 11.12.1998 13:40:35
Tak jsem to nezkousel, ale jednu velmi jednoduchou metodu, i kdy
je trosku pomala. Projdes si bitmapu ( je to vlastne dvou rozmerny
pole, kde kazdy prvek obsahuje cislo barvy) a vymenis si to sam
po pixelech).
From: "V�t zslav Gazda" <softda(zv)mbox.vol(tec)cz>
To: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
Subject: Bitmapa
Date sent: Fri, 11 Dec 1998 11:27:47 +0100
Send reply to: delphi-l(zv)fwd(tec)cz
> Potrebuji nahradit urcitou barvu v bitmape jinou barvou. Vim, ze si musim
> vytvorit nejakou maskovaci bitmapu pozitim nejake ROP operace, a potom to
> nejak zkombinovat, ale nevim jak na to. Muze mi nekdo poradit ?
>
> Diky Vita
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Opravnena kritika PB
[*] Jarome Svoboda <svoboda(zv)okfas(tec)cz> - 11.12.1998 13:41:02
Panove nemam sice D4,ale PB6.
Ze zkusenosti mohu rici ze PB dokaze resetovat Windows bez
priciny jen to frci....
Celkove hodnoceni - pro mne neprijemne GUI, nestabilita,... jiste
ma i vyhody v datawindow objektu...ale D je D.
S pozdravem
J. Svoboda
>Mno, muzeme zustat v klidu. Ted zjistuji neco kolem
>PowerBuilderu (z hlediska lokalizaci), a jeden programator mi
>napsal, ze PB je pro programovani nevhodne, protoze se tam
>predevsim resi, jak obejit chyby prostredi, nez vlastni problem. :-)
>S pozdravem
>Zbysek Hlinka
zakaz swapovania
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 11.12.1998 14:31:14
Napada me jenom to, ze tohle neni mozne. Sprava virtualni pameti je ve
Windows tvrde zakodovana. Mozna zkusit nejaky parametr GlobalAlloc.
Ondrej Krajicek
ri(zv)spse.adlerka.schools.sk wrote:
>
> Zdar.
>
> Z dovodov zarucenia rychlosti behu aplikacie
> by som potreboval zarucit, ze niektore (alebo
> vsetky) datove struktury tejto aplikacie budu
> permanentne pritomne vo fyzickej RAMke (nebudu
> swapovane na disk). Jednoduchou cestou je do-
> porucit uzivatelovi, aby si zakazal virtualnu
> pamet, ale to by ho mohlo obmedzovat pri pou-
> zivanych inych programov.
> Preto hladam nejaku cestu, ako niektorym dato-
> vym strukturam programovo prikazat neswapovatel-
> nost (samozrejme, ak je fyzicka RAM dost velka,
> aby sa ta aplikacia vobec dala spustit).
>
> Napada niekoho riesenie?
> Dik.
> Jano
> .Deadlock v Interbase
[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 11.12.1998 14:50:57
OLEJNIK Andrej wrote:
> Viac aplikacii pristupuje k jednej baze a vsetci su prihlaseni pod jednym
> userom
> Potom staci malo a Interbase sa chova divne
caves
skus si precitat co si napisal a potom sa prestan cudovat :)))
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
Sit Microsoft - Najit pocitac ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.12.1998 15:14:25
Ahoj,
Potrebuji najit pocitac v siti Microsoft a zjistit o nem informaci - umisteni
a komentar, tak jako je to mozne ve Win95: Start -> Hledat -> Pocitac. Zkousel
jsem to pomoci funkci WNetOpenEnum, WNetEnumResource, (...) ale tak zjistim jen
seznam sdilenych prostredku daneho pocitace (ktery je zadan IP adresou), ale ne
jeho umisteni a komentar.
Dekuji.
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************Bitmapa
[*] ri(zv)spse.adlerka.schools.sk - 11.12.1998 15:42:41
Ak by islo o vymenu farby priamo v subore Bmp,
tak tu je odpoved:
Struktura *.bmp je nasledovna:
od offsetu 0: hlavicka,
od offestu P: paleta
ako array[0..pf-1] of bgr0,
kde pf je pocet farieb
a bgr0 je stvorbajt hodnot B,G,R a 0,
zabera teda 4*pf bytov,
od offsetu P+4pf: samotne data, riadok po riadku,
kazdy pixel spotrebuje 1,4,8 alebo 16 bitov,
a kazdy riadok je doplneny (ak uz taku dlzku
nema) na dlzku 4N bytov,
napr. kolko zaberie 270x160x4b?:
270*4/8 = 135, po zaokruhleni na nasobok 4
je to 136B, a 160*136 = 21760B.
Nepamatam si to cislo P (malo by byt okolo 54; do-
dam ho nabuduce), takze od realnej dlzky suboru
treba odratat velkost "surovych dat" a 4*pf, a ma-
me P. V uvedenom poli treba potom zmenit patricnu
polozku.
Na druhu stranu, ak ide o manipulaciu bitmapy na
nejakom formulari pocas rantajmu, tak riesenie si-
ce neviem, ale doporucujem najprv sa zahlbit do uva-
hy (s pouzitim literatury, of course), kolko roz-
nych paliet existuje (kazdy *.bmp moze mat svoju,
Wokna a aplikacie tiez, ...) a v akom su vzajomnom
vztahu.
Jano
.Pohledy (views) v Paradoxu
[*] TP+ <tpplus(zv)zasova(tec)cz> - 11.12.1998 15:48:59
V Helpu k Local SQL jsem se do�etl, �e je mo�no definovat pohledy i v Paradoxu za pomoci n�jak�ho CDR (client data repository) ?. Bohu�el se mi to neda�� a v aplikaci bych to dosti pot�eboval.
D�ky Tom� Sikora
SQL a Paradox a BDE
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 11.12.1998 15:56:04
Jedna se o totoznou databazi? (nepises vubec o jakou ;-). Pokud se jedna
o jinou DB tak bych se mrknul, jestli tam jsou indexy apod.
Mac
Administrator wrote:
> Query trva presne 1min.
>
> Ta ista databanka to iste SQL a ten isty vysledok trva v M$ Access 2
> sec.
>
> Robim nieco zle, alebo to BDE je pomalsie ako DAO?
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
zakaz swapovania
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.12.1998 17:26:51
>Napada me jenom to, ze tohle neni mozne.
to je blbost. Existuji veci, ktere to vyzaduji - obsluhy preruseni atd
>Sprava virtualni pameti je ve
>Windows tvrde zakodovana. Mozna zkusit nejaky parametr GlobalAlloc.
GlobalLock, VirtualLock,...
Zdravi
D> Toman
MS-SQL a BDE
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.12.1998 17:42:39
Bardon wrote:
> Tuhle hl�ku v�d�m. P���iny mohou b�t n�sleduj�c�: 1.nen� nainstalov�n
> klient SQL, 2.nen� spr�vn� nastaven s�ov� protokol (protokol v SQL client
> configuration utility je jin� ne� v Setings - Netwok). Mysl�m, �e je to ta
> druh� z nich. Je�t� existuje t�et� mo�n� probl�m, ale ten se projevuje asi
> jinak: 3. Protokol na SQL serveru je jin�, ne� protokol na SQL Client
> configuration utility. P.S. V�ele doporu�uji TCP/IP (NetBEUi je sice
> rychlej��, ale zamyk� tabulky)
Kdyz selhaly vsechny pokusy, precetl jsem si manual... :-( A tam
jsem se docetl, ze instalace klienta ve W95 uklada cestu do
autoexecu (sic!). I podival jsem se tam, a problem byl "pouze" v
tom, ze na onech "problematickych" pocitacich meli deleny
autoexec, a cesta se samozrejme ulozila na nevhodne misto.
Takze problem byl schovan pod bodem 4. :-)
Pakarna!
>
> -----P�vodn� zpr�va-----
> Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
>
> narazil jsem na problem, ktery jsem nedokazal u zakaznika
> vyresit. Maji SQL Server 6.5, SP3, zaplatu na Bloby. Nainstaloval
> jsem BDE 4.51, nativni link pro MSSQL. SQL Client se nainstaloval
> v poradku a spoji se se serverem. Problem nastal, kdyz jsem
> zavedl v BDE Alias, na nekterych pocitacich to slape jako hodinky,
> na nekterych (a jako na potvoru na tech nejdulezitejsich) pokus o
> otevreni databaze (uz z BDE) vraci chybu
> "General SQL Error: Db-library network communication layer not
> loaded. Alias: ...".
> Nesetkal jste se s necim takovym uz nekdo?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Cestina v. NT40
[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 11.12.1998 22:13:26
Ahoj,
nemate nekdo tuseni cim by mohl byt zavinen
tento problem? >
Muj program napsany v D1 pouziva ve W311 font Arial CE.
Pokud pracuje pod W95 (zrejme i pod W NT 3.51),
pouzije se z WIN.INI sekce [FontSubstitutes]
nahradou font Arial s prislusnym smerovanim a vse je v poradku.
Pod W NT 4.0 je misto toho tato nahrada v registru,
presto to na nekterych pocitacich nepise spravne cesky
i kdyz je tato substituce nastavena stejne jako na tech na
kterych to chodi. Zatim to resim tak ze tam,
kde to nechodi nainstaluju Arial CE z W311.Pak to chodi,
ale neni to tak prog. cisty.
Nevite nekdo, v cem je problem ? S pozdravem a diky za zkusenosti
================================
> Pavel Malinsky; Spiderland(zv)usa.net <
>==============================<
> ...The Truth Is Out There... <
================================TMemo
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 00:07:53
Lukas Voborsky wrote:
>
> On Thu, 10 Dec 1998, Jan Fiala wrote:
>
> > Memo1.BeginUpdate;
> > .
> > vkladani radku
> > .
> > Memo1.EndUpdate;
> Cim to je, ze mi to Delphi 4 nesezraly?????
Ahoj,
Protoze metody BeginUpdate a EndUpdate jsou ve tride TStrings a ne TMemo.
TMemo ma vlastnost Lines typu TStrings, takze by to melo vypadat takhle:
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
Memo1.Lines.BeginUpdate;
try
for I := 1 to 1000 do
Memo1.Lines.Add(Format('Tady prave vidite radek c.%d', [I]));
finally
Memo1.Lines.EndUpdate;
end;
end;
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Tlac grafu cez Quick report
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 00:07:09
Pavol Griga wrote:
> Tu komponentu QRChart vidim, len v helpe je pisane, ze cez jej
> vlastnost
> 'Chart' sa da k nej prilinkovat uz vytvoreny graf priamo z ineho formulara
> (aspon tak som to pochopil) ale ked jej chcem priradit komponentu
> triedy TChart, ktora je vytvorena na inom forme, tak piskuje, ze je
> Read only.
Ahoj,
TeeChart prilis nepouzivam, dival jsem se do helpu a take jsem to pochopil tak,
ze by to melo jit priradit do te vlastnosti. Zkusil jsem to tedy jinak, do
QuickReportu dam TQRImage a do nej to pak v udalosti OnBeforePrint vykreslim.
procedure TQuickReport2.QuickReport2BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
Form1.DBChart1.DrawToMetaCanvas(QRImage1.Canvas, QRImage1.ClientRect);
end;
Vyse uvedenou metodu TDBChart.DrawToMetaCanvas jsem nasel "nahodou" pomoci Code
Insight (v helpu neni) takze presne nevim jak ma fungovat :-) Je to spise namet
k reseni, muze to mit nejake skryte problemy. Pouzite soucastky: D4, TeeChart 4.0,
QuickReport 3.0.3
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
TMemo a WIN95 (2)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 00:08:01
Jan Janecek wrote:
>
> Diky moc za odpoved .
>
> Nevite teda nekdo o nake komponente, ktera by se chovala stejne rychle,
> mela stejne vlastnosti, ale nemela tyto omezeni ve win 9x????
Ahoj,
Pokud potrebujes editor ktery pracuje pouze s jednim fontem s pevnou
sirkou (podobne jako TMemo), tak muzes pouzit jiz zmineny RichEdit.
Neni sice nejrychlejsi, ale pokud se ti zda prilis pomaly tak si dany
soubor nejdrive otevri ve WordPadu a pak srovnej s TRichEdit. Prijde mi,
ze ta pomalost byva nekdy zpusobena spise diky "zakomponentovani" do VCL,
nez vlastnim Richeditem. Dalsi moznost je pouzit editor ktery je soucasti
baliku komponent Orpheus, ale neni to zadarmo. Posledni moznost by byla
nejaky takovy editor napsat, ale neni to zrovna jednoduche a predevsim
dost casove narocne na ladeni. Nicmene by o nej treba byl zajem, takze
by se prace nakonec vyplatila :-)
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Dalsi chyba v Delphi 4 ... ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 00:27:05
Ahoj,
Prave jsem narazil na dalsi problem v D4, tyka se to typu promenne BOOL a jejiho
pouziti jako navratove hodnoty callback funkce volane z API funkce. V Delphi 2
to funguje, ale stejny kod nefunguje po prekladu v D4. Rozdil lze najit pomoci
toho prikladu:
var
B: BOOL;
begin
B := True;
Delphi 2 to prelozi (spravne) jako
MOV EAX, $1
Ale Delphi 4 jako
OR EAX, $-1
to bude sice fungovat "uvnitr" Delphi protoze test se provadi na nenulovou
hodnotu, ale uz ne v API funkcich pro ktere byl patrne typ BOOL zaveden.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
componenta DB with source
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 00:30:54
> Petr Ham�k wrote:
>
> Ahoj všichni,
> nev�te n�kdo o komponent� (nutn� se zdroj�kem), kter� by um�la ��st DB soubor bez pou�it�
> BDE? Pot�ebuji to do CGI aplikace.
Ahoj,
DB souborem myslis asi Paradox format. Neco takoveho zacal delat Martin Nedopil,
najdes to v jeho Kuchyni (http://kuchyn.delphi(tec)cz) a jmenuje se TParadoxStream.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************Cestina v. NT40
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 12.12.1998 02:21:52
> Muj program napsany v D1 pouziva ve W311 font Arial CE.
> Pokud pracuje pod W95 (zrejme i pod W NT 3.51),
> pouzije se z WIN.INI sekce [FontSubstitutes]
> nahradou font Arial s prislusnym smerovanim a vse je v poradku.
> Pod W NT 4.0 je misto toho tato nahrada v registru,
> presto to na nekterych pocitacich nepise spravne cesky
Ano take mam tento problem. Podarilo se mi vysledovat ze to chodi na NT SP1
a zacne blbout po nainstalovani SP3.
Microsoft hotline se k tomu vyjadril v tom smyslu ze program pouzivajici
Arial CE neni urcen pro beh pod Windows NT. Typicke ze ?
Bohuzel sem to nevyresil a musel dodelat vyber charsetu fontu a nastavit ho
na stredoevropsky ..
McLEI
SQL
[*] Matej Prochazka <harnod(zv)atlas(tec)cz> - 12.12.1998 08:02:49
Ahoj,
mam takovy zacatecnicky problem...
mam tri tabulky .DB a potrebuji, aby se hlavni tabulka (knihy.db) vypsala cela a k ni se
dopsaly zbytkove udaje z ostatnich tabulek. Ale ty udaje nejsou pro kazdy zaznam. Potrebuji
tedy, aby se vypsaly v�echny knihy a pokud jsou, tak i zbytkove udaje.
propojeny jsou pomoci
knihy.pujceno
lidi.pujceno
knihy.kategorie
kategorie.kategorie
Pomoci TQuery.... Jak napsat SQL???? diky moc
Vsechno, co jsem dosud vymysle, vyhodilo vetsinou prazdny Grid
Diky
Matej Prochazka
Sit Microsoft - Najit pocitac ?
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 12.12.1998 08:38:18
Podivej se na "Server Functions" ve Win32 SDK Helpu, jmenovite NetServerEnum. Funkce prebira mj. parametr ServerType, kterym je bitovou maskou a umoznuje specifikovat ruzne typy hledanych pocitacu. No a jinak na tohle tusim existuji i nejake free komponenty.
Ondrej Krajicek
development(zv)promedia(tec)cz
-----P�vodn� zpr�va-----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 11. prosince 1998 18:16
P�edm�t: Sit Microsoft - Najit pocitac ?>Ahoj,
>
>Potrebuji najit pocitac v siti Microsoft a zjistit o nem informaci - umisteni
>a komentar, tak jako je to mozne ve Win95: Start -> Hledat -> Pocitac. Zkousel
>jsem to pomoci funkci WNetOpenEnum, WNetEnumResource, (...) ale tak zjistim jen
>seznam sdilenych prostredku daneho pocitace (ktery je zadan IP adresou), ale ne
>jeho umisteni a komentar.
>
>Dekuji.
>
>Internet proti monopolu. Petr Vones, amatersky programator
>* http://www.bojkot(tec)cz *
>* protestni akce *
>************************
>Opravnena kritika PB
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 12.12.1998 08:43:30
No ja osobne bych se rad pridal s kritikou IDE Visual basicu 5, protoze tady o tom nekdo psal ve vztahu k Delphi. Pokud si clovek da tu praci a vytiskne si seznam funkcnich klaves Delphi, cili dokaze toto IDE plne vyuzit, tak je to to nejlepsi co muze byt. Ve Visual Basicu 5 se okna do nekonecna pletou tam kam nemaji, a kdyz si clovek rozbali to co potrebuje do dostatecne velikosti, tak se opravdu nechyta. V Delphi staci F11 a Object Inspector se objevi, F11 a zmizi, F12 . . .
Jinak tedka psali na Inprise, ze Delphi umi zaznamenavat klavesova makra. Zaznam se spousti a ukoncuje Ctrl-Shift-R a prehrava Ctrl-Shift-P. Pisu to sem jen proto, ze sem si nevsiml, ze by to bylo nekde zdokumentovano.
Ondrej Krajicek
-----P�vodn� zpr�va-----
Od: Jarome Svoboda <svoboda(zv)okfas(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 11. prosince 1998 18:55
P�edm�t: Opravnena kritika PB
Panove nemam sice D4,ale PB6.
Ze zkusenosti mohu rici ze PB dokaze resetovat Windows bez
priciny jen to frci....
Celkove hodnoceni - pro mne neprijemne GUI, nestabilita,... jiste
ma i vyhody v datawindow objektu...ale D je D.
S pozdravem
J. Svoboda
>Mno, muzeme zustat v klidu. Ted zjistuji neco kolem
>PowerBuilderu (z hlediska lokalizaci), a jeden programator mi
>napsal, ze PB je pro programovani nevhodne, protoze se tam
>predevsim resi, jak obejit chyby prostredi, nez vlastni problem. :-)
>S pozdravem
>Zbysek Hlinka
zakaz swapovania
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 12.12.1998 08:44:54
-----P�vodn� zpr�va-----
Od: Dalibor Toman <dtoman(zv)fortech(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 11. prosince 1998 19:02
P�edm�t: Re: zakaz swapovania
>
>>Napada me jenom to, ze tohle neni mozne.
>to je blbost. Existuji veci, ktere to vyzaduji - obsluhy preruseni atd
A myslis ze nekdo takovehle veci pise v Delphi ?
>
>>Sprava virtualni pameti je ve
>>Windows tvrde zakodovana. Mozna zkusit nejaky parametr GlobalAlloc.
>
>GlobalLock, VirtualLock,...
>
>Zdravi
>D> Toman
>
>
>Dalsi chyba v Delphi 4 ... ?
[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 12.12.1998 08:48:37
Momentalne nemam k dispozici Delphi 2, ale neni tam nahodou rozdil v deklaraci tohoto typu. Pokud vim, tak v Delphi 4 je to type Longbool.
Ondrej Krajicek
-----P�vodn� zpr�va-----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 12. prosince 1998 1:07
P�edm�t: Dalsi chyba v Delphi 4 ... ?>Ahoj,
>
>Prave jsem narazil na dalsi problem v D4, tyka se to typu promenne BOOL a jejiho
>pouziti jako navratove hodnoty callback funkce volane z API funkce. V Delphi 2
>to funguje, ale stejny kod nefunguje po prekladu v D4. Rozdil lze najit pomoci
>toho prikladu:
>
>var
> B: BOOL;
>begin
> B := True;
>
>Delphi 2 to prelozi (spravne) jako
> MOV EAX, $1
>
>Ale Delphi 4 jako
> OR EAX, $-1
> to bude sice fungovat "uvnitr" Delphi protoze test se provadi na nenulovou
> hodnotu, ale uz ne v API funkcich pro ktere byl patrne typ BOOL zaveden.
>
>--
>
>Internet proti monopolu. Petr Vones, amatersky programator
>* http://www.bojkot(tec)cz *
>* protestni akce *
>************************
>
>Bitmapa
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 12.12.1998 14:03:05
To je blbost to bude pomale, ale myslim kdyz se podivas do helpu
na ty binarni operace tak se to bude dat nejak zkombinovat - to znamena
pomoci prekryvani bitmapy maskou ruznymi kombinacemi binarnich operaci.
>Tak jsem to nezkousel, ale jednu velmi jednoduchou metodu, i
kdy
>je trosku pomala. Projdes si bitmapu ( je to vlastne dvou
rozmerny
>pole, kde kazdy prvek obsahuje cislo barvy) a vymenis si to sam
>po pixelech).
> Potrebuji nahradit urcitou barvu v bitmape jinou barvou. Vim,
ze si musim
> vytvorit nejakou maskovaci bitmapu pozitim nejake ROP operace,
a potom to
> nejak zkombinovat, ale nevim jak na to. Muze mi nekdo poradit
?
>GSM : + 420 603 85 75 15
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
Dalsi chyba v Delphi 4 ... ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1998 14:32:38
Ondrej Krajicek wrote:
>
> Momentalne nemam k dispozici Delphi 2, ale neni tam nahodou rozdil v deklaraci tohoto typu. Pokud vim, tak v Delphi 4 je to type Longbool.
V D2 je to taky LongBool, ale pokud pouzivaji BOOL jako typ v prepisu hlavicek
API funkci, tak by to meli pouzit takovy typ aby to fungovalo. Vyplyva z toho,
ze asi nejjistejsi bude pretypovani na DWORD a zapsani hodnoty 1, coz ponekud
degraduje smysl typu BOOL.
--
Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
* protestni akce *
************************
Integrace MSIE
[*] Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz> - 12.12.1998 16:11:55
Nenapada vas prosim nekoho,
jak integrovat do vlastni aplikace MSIE ?
Diky
Vojta
VerzeDelphi
[*] Miki Vom��ka����h������� - 12.12.1998 16:16:22
Pekny den vsem,
poradte,jak lze upgradovat verzi D4 z 5.33 na 5.37?
Miki