Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Automaticka lokalizace
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.5.2000 18:39:02
On 3 May 00, at 9:16, SPELZA s.r.o. wrote:
> > Pokud to chces natahovat vzdy, mas dve moznosti. Budto umistit
> > do registru informaci o tom, ktera dll se ma pouzit, nebo dodatecne
> > (od D4 vyse) prohodit resourcy.
> >
> Ja mam D4Std a prave moznost dodatecneho prohozeni resourcu by mne
> zajimala. V helpu Delphi jsem nasel, ze lze pouzit nasledujici
> sekvenci:
>
> uses ReInit;
> ...
> if LoadNewResourceModule((SUBLANG_ENGLISH shl 10) or LANG_ENGLISH) <>
> 0
> then ReinitializeForms;
>
> To mi ale nefunguje, nebot zadnou jednotku REINIT system nenasel. Je
> snad soucasti az verze Profi?
Tahle jednotka je v Demos\RichEdit, pokud jsou u DStd
demopriklady. Mne to vsak zcela nevyhovovalo, proto jsem to
upravil do podoby ktera je v transl.pas (lze pouzit samostatne i bez
Lokalizatoru).
V D5 jsem vsak objevil urcitou chybu, pri ktere automaticke
prohozeni nefunguje. Projevuje se tehdy, kdyz ma komponenta vice
urovni vnorenych prvku. Nevim, zda je stejna chyba i v D4.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
fonty
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.5.2000 18:39:02
On 3 May 00, at 10:02, ShiCola wrote:
> ahoj, mam takovy problem, potrebuju do jednoho komba vyplnit nazvy
> vsech neproporcionalnich (fixed) fontu. Nevite nekdo nahodou jak to
> mam udelat? ja nemam vubec tuseni.................a jeste takova
> vecicka: jak u tech fontu zjistim jaky se mohou pouzit velikosti a
> charsety ?? diky moc za info
Podivej se na TFontDialog, jak to dela pri nastaveni
fdFixedPitchOnly.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chybne zobrazovani pod Win NT
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.5.2000 18:39:02
On 3 May 00, at 9:34, Ing. Petr �vejda wrote:
> Moje aplikace delana pod Win98 se u uzivatele na Win95/98 zobrazuje
> bez problemu, ale jak ji nainstaluji na Win NT 4.0, tak se spatne
> zobrazuje velikost znaku vuci ostatnim objektum. Napr. V listboxu se
> pod Win95/98 zobrazi spravne sada textu, ale pod NT se texty to
> listboxu horizontalne nevejdou.
>
> Jakoby byla pismena o chlup vetsi. ::::-o
Nemas nahodou nastaveny ve Woknech jiny Font Size nez
zakaznici?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
probl�m s MessageDlg
[*] Hurricane <hurricane(zv)email(tec)cz> - 3.5.2000 22:42:17
Zdravim
Reseni je vcelku jednoduche, je totiz potreba spravne pochopit, jak funguje
procedura FormCloseQuery. Des na to z dryhy strany. Kdyz kliknes na ANo,
spustis Form1.Close a tim se spusti znovu i FormCloseQuery a zamotava se to
dokola. Reseni je takoveto:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var Status: integer;
begin
case Status of
0: begin
Form2.ShowModal;
CanClose:=false;
end;
1: begin
CanClose:=true;
if MessageDlg('Opravdu chcete ukoncit tento
program?',mtConfirmation,[mbYes,mbNo],0) = mrNo then CanClose:=false;
end;
end;
BTW jak to mas udelany s tou promennou status. Vzdyt ji deklarujes a hned
potom testujes pomoci case. Ale nikde ji nenastavujes. Mas to nejaky
americky.
Hurricane
----- Original Message -----
Mam takovy maly problem s MessageDlg na zobrazeni dialogoveho okna kdyz
pouziju nasledujici kod:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var Status: integer;
begin
case Status of
0: begin
Form2.ShowModal;
CanClose:=false;
end;
1: begin
CanClose:=true;
if MessageDlg('Opravdu chcete ukoncit tento
program?',mtConfirmation,[mbYes,mbNo],0) = mrYes then
Form1.Close;
end;
Problem mam ve chvili kdy se program zepta na ukonceni, okno se zobrazi, ale
kdyz kliknu na Yes tak se neukonci
program, ale navic se nezavre ani to dialogove okno. Pri kliknuti na No se
ukonci program a tudiz se zavre i ten dialog. Nevite nekdo v cem muze byt
problem?
Instalace Delphi
[*] Hurricane <hurricane(zv)email(tec)cz> - 3.5.2000 22:42:23
Musis si zalohovat adresar s komponentama a vsemi prislusnymi balicky. Potom
to nakopirujes spatky a jenom nainstalujes ty balicky. Delal sem to mockrat.
100% to neni, vzdycky de neco do pryc, ale to vzdycky.
Hurricane
----- Original Message -----
> nevite nekdo, jak mohu co nejjednodussim zpusobem vyresit tuto zalezitost:
> V delphi mam nainstalovano spoustu komponent, jenze nyni jsem nucen
> preinstalovat pocitac a tim padem i delphi. Nejde si nejak zazalohovat
> konfiguraci delphi (ze vsemi komponentami), myslim tim treba zkopirovat
> nejaky adresar, a po instalaci ho tam zase zpet nakopirovat. Nechce se mi
> totiz instalovat zase vsechny komponenty.
Chybne zobrazovani pod Win NT
[*] Vladislav Cadsky <cadskyk1(zv)atlas(tec)cz> - 3.5.2000 22:43:26
Ahoj, to neni odlisnosti win 9x a NT, pouze mas nastavenou jinou velikost
fontu ve vlastnosti obrazovky
Ja pouzivam tuto funkci
function Rozliseni800_600 :Boolean;
begin
result := false;
if Screen.Width < 800 Then begin
ShowMessage('Lituji, ale rozli�en� na va�em PC je men�� jak 800x600
pixel�');
exit;
end;
if (Screen.Width=800) and (Screen.PixelsPerInch <> 96) then begin
ShowMessage('Lituji, ale velikost fontu v nastaveni obrazovky neodpov�d�
96dpi');
exit;
end;
result := true;
end;
Vlada
----- Original Message -----
From: Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz>
To: DELPHI forum <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 03, 2000 9:34 AM
Subject: Chybne zobrazovani pod Win NT
> D5 Prof, Win 98
>
> Mam velky problem a potreboval bych urgentne pomoci.
>
> Moje aplikace delana pod Win98 se u uzivatele na Win95/98 zobrazuje bez
> problemu, ale jak ji nainstaluji na Win NT 4.0, tak se spatne zobrazuje
> velikost znaku vuci ostatnim objektum. Napr. V listboxu se pod Win95/98
> zobrazi spravne sada textu, ale pod NT se texty to listboxu horizontalne
> nevejdou.
>
> Jakoby byla pismena o chlup vetsi. ::::-o
>
> Kdo vi, at prosim pomuze. Dekuji predem, protoze jak kdosi pravil, zadem
je
> to zakazane.
>
> Ing. Petr Svejda
> software specialist
>Pouziti ShellExecute
[*] Lud�k P�ral - 3.5.2000 23:20:20
Mam D3 Standart a nelze kompilovat prikaz Shellexecute - jaky mam pouzit Uses ?
Lud�k P�ral
Sadov� 2/503
352 01 A�
ludek.paral(zv)telecom(tec)cz
UDF na IB6 ----- vyreseno
[*] MJsoft <mjsoft(zv)rychnov(tec)cz> - 3.5.2000 23:30:45
Ahoj
dekuji vsem co se ozvali.
Nevsiml jsem si, ze funkce (*.DLL) se v IB6 davaji do adresare UDF. V petce se to davalo do BIN.
Diky vsem
Jin
Chybne zobrazovani pod Win NT
[*] Hurricane <hurricane(zv)email(tec)cz> - 3.5.2000 23:39:24
Zdravim
Mas na obou PC nainstalovanej ten pouzitej font? Pokud totiz pouzijes
nestandartni, kterej neni vsude, tak se to nekdy muze substituovat nejakym
jinym. Aspon u labelu se mi to stalo.
Hurricane
----- Original Message -----
> D5 Prof, Win 98
>
> Mam velky problem a potreboval bych urgentne pomoci.
>
> Moje aplikace delana pod Win98 se u uzivatele na Win95/98 zobrazuje bez
> problemu, ale jak ji nainstaluji na Win NT 4.0, tak se spatne zobrazuje
> velikost znaku vuci ostatnim objektum. Napr. V listboxu se pod Win95/98
> zobrazi spravne sada textu, ale pod NT se texty to listboxu horizontalne
> nevejdou.
>
> Jakoby byla pismena o chlup vetsi. ::::-o
fonty
[*] Hurricane <hurricane(zv)email(tec)cz> - 3.5.2000 23:54:33
Zdravim
Nainstaluj si RxLib (www.rxlib.com). Zabijes tak mimo tuto i 64 dalsich
much.
Hurricane
----- Original Message -----
> ahoj, mam takovy problem, potrebuju do jednoho komba vyplnit nazvy vsech
> neproporcionalnich (fixed) fontu. Nevite nekdo nahodou jak to mam udelat?
ja
> nemam vubec tuseni.................a jeste takova vecicka: jak u tech
fontu
> zjistim jaky se mohou pouzit velikosti a charsety ??
> diky moc za info
Velikonoce
[*] Podrazsk� Daniel(HZS) - 4.5.2000 04:23:04
Skus sedou kuru mozkovou namahat aspon trochu, velikonoce sou
vzdycky prvni vikend po tom, kdy je mesic v novu a to je docela presnej
cyklus, ne ?
> Nemate nekdo sikovny algoritmus, jak spocitat, kdy jsou Velikonoce? Nechce
> se mi po nich moc namahat sedou kuru.
>
>
> S pozdravem a pranim hezkeho dne
>
> Milan Schembera
> Spravce IT
> SPEKTRUM CZ a.s.
> mailto:spravce(zv)spektrum(tec)cz
> mailto:milan(zv)missoftware(tec)cz
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.142 / Virov� b�ze: 66 - datum vyd�n�: 19.4.2000
Velikonoce
[*] Podrazsk� Daniel(HZS) - 4.5.2000 04:26:17
Sorry, po myslel sem uplnek a ne nov a to prvni jarni ....
> Nemate nekdo sikovny algoritmus, jak spocitat, kdy jsou Velikonoce? Nechce
> se mi po nich moc namahat sedou kuru.
>
>
> S pozdravem a pranim hezkeho dne
>
> Milan Schembera
> Spravce IT
> SPEKTRUM CZ a.s.
> mailto:spravce(zv)spektrum(tec)cz
> mailto:milan(zv)missoftware(tec)cz
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.142 / Virov� b�ze: 66 - datum vyd�n�: 19.4.2000
Zahlavi a zapati u sestav v Sinee
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 4.5.2000 06:55:23
From: Daniel Fojt�k <xfojtik(zv)albert.osu(tec)cz>> Chtel jsem se zeptat na problem, na ktery jsem narazil pri vytvareni
sestavy
> pomoci komponenty fy Sinea:
>
> Potrebuji vytvorit sestavu prezentujici fakturu (ktera muze byt pripadne
> vicestrankova). Nevite nekdo jak zajistit u teto komponenty aby se zapati,
> kde je zesumovana castka k fakturaci, vytiskla jen na posledni strance a
to
> uplne dole????? Uz si s tim hraju asi tak 2 hodiny a porad na to nemohu
> prijit.
> Predem diky za odpoved.
>
> Dan
>
> P.S.: Na konec stranky v detailu nelze nic umistit
>
Detail sestavy nema hlavu ani patu stranky. Ani mit nemuze,
protoze na jedne strance se muze vyskytnout vice ruznych detailu
a neni jasne, ktery z nich by mel mit svoji patu.
Hlavy a paty stranek se generuji vzdy z master sestavy.
Pouziti oddilu hlavy a paty stranky v master/detail sestavach
je dosti omezene, prakticky snad jen na cislovani stranek.
K tisku celkove sumy za sestavu je urcen oddil konce sestavy.
Ja osobne bych preferoval reseni, kdy bude oddil konce
sestavy volitelne zarovnavan budto za posledni telo sestavy,
nebo k pate posledni stranky.
Navic by bylo vhodne umoznit na posledni strance netisknout
patu.
Toto bych bral jako spravne reseni a v tomto smyslu bych tlacil
na autory Sinei.
Vaclav Krmela
velikost Taskbaru
[*] �ampulka Ji�� - 4.5.2000 07:19:39
var H: THandle;
R: TRect;
begin
{takhle najdes handle wokna..... }
H:=FindWindow('Shell TrayWnd', '');
{...a tak zjistis jeho umisteni...}
GetWindowRect(H, R);
----- P�vodn� zpr�va -----
Od: Daniel Krej��
Komu: delphi
Odesl�no: 4. dubna 2000 20:31
P�edm�t: Re: velikost Taskbaru
p�vodni ot�zka:
> Nevite kde by mohly byt zapsany rozmery ( vyska, resp. s�rka ) a umisteni TaskBaru. Nebo jestli na to existuje v D3 > nejaka procedura.
od: �ampulka Ji��
> Taskbar je wokno jako kazdy jiny takze musis najit jeho handle a pak pres nakou API fci zjistis to co potrebujes...
To je sice hezke, ale ja nejsem jeste tak zbehly pres ty handly a anglicky nevladnu natolik abych to nasel v Helpu, tak kdyby se ti chtelo mohl bys mi napsat potrebny kod. D�ky.Probl�m s tiskem bitmapy
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 4.5.2000 07:23:01
Ahoj,
m�m probl�m s tiskem bitmapy, kter� se mi ob�as nevytiskne. Tisknu pomoc�
Printer.Canvas.StretchDraw(); QR jsem nepouzil, prelozeno v D3 V3.02.
Problem nastava na HP LJ, Canon BCJ ale i na jehlickovych a na ruznych PC.
Tento problem nastal pri prechodu z D2 na D3 a projevuje se vicemene
nahodne. Poradite nekdo?
Pri prekladu (Build All) se mi tez nekdy vyskytne Internal error (prekladam
i VCL) a musim prelozit opakovane nebo runtime error v DCC.DLL. Po restartu
pocitace je chvili OK. Balicky nepouzivam. Staci preinstalovat Delphi?
Diky
Jaro B.velikost Taskbaru
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.5.2000 07:39:05
On 3 May 00, at 12:35, Tomas Michal�k wrote:
> > > Uz jsem se tady na to ptal jednou, ale asi jste to prehlidli, tak
> > > to zkousim jeste jednou. Nevite kde by mohly byt zapsany rozmery (
> > > vyska, resp. s�rka ) a umisteni TaskBaru. Nebo jestli na to
> > > existuje v D3 nejaka procedura. Prosim pomozte.
> >
> > Kdyz jsem chtel udelat zobrazeni formularu k Lokalizatoru, narazil
> > jsem prave u D3 na problem, ze jedna standardni komponenta
> > neukladala do DFM vsechny koordinaty, pokud byly defaultni.
>
> treba jsem dobre neporozumel predchozi formulaci, ale hodnota
> property, ktera je specifikovana jako default, se prece do DFM nikdy
> nema ukladat - od toho je klicove slovo default pri definici property
> zavedeno
Jasne. Ale pokud se jedna o koordinaty, caption a podobne
zasadni vlastnosti, je vhodne je ulozit vzdy.
Podival jsem se do zdrojaku VCL D3, a tam je skutecne u TToolBar
property Height default 32;
Co je pekna hovadina. V D5 je tato deklarace take, ale narozdil od
D3 je v Create nastaveno Height:=29. Height s default hodnotou
musim povazovat za bug, protoze to znemoznuje zjistit rozmery
komponenty z DFM.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Velikonoce
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.5.2000 07:39:05
On 3 May 00, at 12:06, Grubhoffer(zv)software602(tec)cz wrote:
> > http://www.softnov(tec)cz/article.php?id=10685
> >
> > > Nemate nekdo sikovny algoritmus, jak spocitat, kdy jsou
> > > Velikonoce?
>
> Ja si trochu zastouram :) V roce 1954 bylo velikonocni pondeli 19.4. a
> uvedeny algoritmus vrati 26.4.
Nechci stourat, ale nebyla chyba spise v despotickem
komunistickem rezimu, nez v algoritmu?
:-))))
Algoritmus jsem si neprohlizel, ale nahledem do stredoskolskych
fyzikalnich tabulek mi vychazi, ze by IMHO mela stacit znalost
obezne doby synodicke Mesice (29 dni, 12 hodin, 44 minut a 2.8
vterin), obezne doby Zeme, konkretni polohy v nejakem konkretnim
case a ze jsou velikonoce prvni nedeli po prvnim uplnku po jarni
rovnodennosti. Jednoducha zalezitost. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chybne zobrazovani pod Win NT
[*] petr.palicka(zv)atlas(tec)cz - 4.5.2000 07:42:52
ahoj,
uvedene reseni povazuji za krajne neslusne a nevhodne.
meli byste me sliset, jak sem rval, kdy z mi toto provedl jisty program na mem compu. myslim, ze o byl ctyrlistek, ale ot je jedno, podstatne je, ze si nehodlam prehazovat rozliseni orazovky podle nejakejch cizich programu.
akceptovatelne je jiste minimalni rozliseni, tech 800x600, ale ne ostatni nastaveni...
> if (Screen.Width=800) and (Screen.PixelsPerInch <> 96) then
> begin
> ShowMessage('Lituji, ale velikost fontu v nastaveni obrazovky neodpov�d� 96dpi');
> exit;
> end;
dekuji peca
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[ smtp: petr.palicka(zv)atlas(tec)cz ]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~VBX
[*] Tibor Galik <tgalik(zv)vsz.sk> - 04.5.2000 07:48:16
Ahoj,
v knihe Mistrovstvi v D3 som cital, ze sa da pridat do D3 aj kniznica VBX. J etam aj popis. Ako vsak dostat komponenty z VBX do D4 ? Hladal som aj v helpe, ale nic som nenasiel (mozno som to prehliadol, alebo D4 to nepodporuje?)
dakujem
tg
S pozdravom / Regards
Tibor Galik
tgalik(zv)vsz.sk
OT: ODBC driver pro FoxPro
[*] Petr Smol�k <psmolik(zv)fides(tec)cz> - 4.5.2000 07:48:24
Dobry den.
Potreboval bych radu.
Mam tabulku ve FoxPro 2.6 kodovani latin2.
Pristupuji k ni pres ODBC.
Pokud pouziji ODBC driver "FoxPro Driver" verze 4.0, tak to
funguje tak jak ma.
Ten se mi ale nainstaloval s Delphi.
Nevite, jak ho nainstalovat na jine PC (bez pouziti Delphi a
InstallShield-u)
nebo kde sehnat instalaci (je zdarma?)?
Diiik.
Petr Smol�k
psmolik(zv)fides(tec)cz
PChar
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 4.5.2000 08:00:22
Prosim o radu.
Do promenne typu PChar nacitam textovy soubor, ktery ma jednotlive radky
oddelene #$D#$A.
Kdyz chci pak pomoci funkce StringReplace nahradit urcitou cast v te
promenne, tak mi to hledanou cast nenajde
CelyText:=StringReplace(CelyText, nalezene, nahradit, [rfReplaceAll]);
Jak se mohu zbavit tech tvrdych koncu radku?==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Mirny OT: Nastaveni vlastniho rozmeru papiru pod W
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 4.5.2000 08:09:33
upresnuji:
v QuickReportu potrebuji nastavit format Custom. Aby to fungovalo, musi byt
i tiskerna v OS WinNT nastavena na Custom. Ale kde to hledat?
> QR3, D4Prof, Win98
>
> V Quick Reportu nastavuji rozmer na Custom a upravuji si svoje rozmery
> papiru pro tisk na traktorovy papir. Nastaveni sveho rozmeru papiru jsem
> provedl i v nastaveni tiskarny ve Windows98.
>
> U uzivatele jsem program reinstaloval na WinNT a ejhle. Nemohl jsem najit,
> kde nastavit vlastni rozmer papiru v systemovem nastaveni
> tiskarny. Zkousel
> jsem instalovat softwarove ruzne tiskarny (ty ktere stoprocentne maji pod
> Win95/98 vlastni nastaveni rozmeru) a nic. Bud jsem slepej, nebo si zitra
> jdu koupit Resource Kit.
>
> Nevite nekdo, kde jsem nechal oci?Chybne zobrazovani pod Win NT
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 4.5.2000 08:09:28
ja mam pri vyvoji nastaveno ve Win98 male pismo, coz je font size 96dpi.
Uzivatel ma na WinNT 4.0 nastaveno male pismo (presnou velikost mi NT
neukazuje).
...to vsak neresi problem. Co kdyz bude mit uzivatel nastaveno velke pismo z
duvodu zacinajici slepoty? :-))> > Moje aplikace delana pod Win98 se u uzivatele na Win95/98 zobrazuje
> > bez problemu, ale jak ji nainstaluji na Win NT 4.0, tak se spatne
> > zobrazuje velikost znaku vuci ostatnim objektum. Napr. V listboxu se
> > pod Win95/98 zobrazi spravne sada textu, ale pod NT se texty to
> > listboxu horizontalne nevejdou.
> >
> > Jakoby byla pismena o chlup vetsi. ::::-o
>
> Nemas nahodou nastaveny ve Woknech jiny Font Size nez
> zakaznici?Chybne zobrazovani pod Win NT
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 4.5.2000 08:09:31
ve sve aplikaci nemohu pouzit takto represivni zakrok. Musim se prizpusobit
a naprogramovat to tak, aby to fungovalo. Rozliseni mensi nez 800*600 by se
dalo akceptovat, ale fontsize musim respektovat. Uzivatel muze spatne videt,
nebo muze mit jine duvody.
> Ahoj, to neni odlisnosti win 9x a NT, pouze mas nastavenou jinou velikost
> fontu ve vlastnosti obrazovky
> Ja pouzivam tuto funkci
>
> function Rozliseni800_600 :Boolean;
> begin
> result := false;
> if Screen.Width < 800 Then begin
> ShowMessage('Lituji, ale rozli�en� na va�em PC je men�� jak 800x600
> pixel�');
> exit;
> end;
>
> if (Screen.Width=800) and (Screen.PixelsPerInch <> 96) then begin
> ShowMessage('Lituji, ale velikost fontu v nastaveni obrazovky
> neodpov�d�
> 96dpi');
> exit;
> end;
>
> result := true;
> end;
> > Moje aplikace delana pod Win98 se u uzivatele na Win95/98 zobrazuje bez
> > problemu, ale jak ji nainstaluji na Win NT 4.0, tak se spatne zobrazuje
> > velikost znaku vuci ostatnim objektum. Napr. V listboxu se pod Win95/98
> > zobrazi spravne sada textu, ale pod NT se texty to listboxu horizontalne
> > nevejdou.
> >
> > Jakoby byla pismena o chlup vetsi. ::::-o
> >
> > Kdo vi, at prosim pomuze. Dekuji predem, protoze jak kdosi pravil, zadem
> je
> > to zakazane.Problem s TMPOP3
[*] Marek Hradil <marekhr(zv)benefitcz(tec)cz> - 04.5.2000 08:13:38
[P��loha v souboru: marekhr.vcf]
Toto je zpr�va z v�ce ��st� ve form�tu MIME.
V delphi 5 jsem narazil na problem s TNMPOP3.
Po prirazeni jakekoliv hodnoty do property AttachFilePath
nasleduje znamy Access Violation ...
V delhi 4 to fungovalo normalne.
Mam napsany projekt a nechtel bych ho prepisovat
s jinymi komponentami.
Dik
ADO
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 4.5.2000 08:14:24
Dobry den,
jak mohu pomoci ADO zjistit vysledek tohoto prikazu "EXEC sp_helpindex
[tabulka]". V "Query Analyzer" mi to ukaze spravny vysledek, ale nevim jak
ho ziskat v Delphi pomoci ADO.
Predem diky za kazdou radu.Chybne zobrazovani fontu !!!
[*] Maly(zv)pds.pce.cdrail(tec)cz - 4.5.2000 08:29:44
Problem eliminuji
vhodnym zvolenim vychoziho fontu - ja pouzivam Arial
rozvrzenim komponent na formulari - test v obou stavech mala x velka pismena
v urcitych pripadech jsem pouzival komponentu FormAutoSize,ta meni i fonty,
mohu zaslat
LM
-----P�vodn� zpr�va-----
Od: Ing. Petr �vejda [mailto:lingvista(zv)lingvista(tec)cz]
Odesl�no: 3. kv�tna 2000 14:30
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Chybne zobrazovani fontu !!!
Zahlavi a zapati u sestav v Sinee
[*] Daniel Fojt�k <xfojtik(zv)albert.osu(tec)cz> - 4.5.2000 08:53:07
Autorum komponenty jsem jiz napsal a ti zvazuji moznost teto upravy v dalsi
verzi. Ovsem muj problem to neresi, ja potrebuji vytvaret pouzitelne faktury
do konce tydne. Takze pokud nekdo narazil na obdobny problem a povedlo se mu
ho vyresit, tak se prosim ozvete
Daniel Fojtik
> Chtel jsem se zeptat na problem, na ktery jsem narazil pri vytvareni
sestavy
> pomoci komponenty fy Sinea:
>
> Potrebuji vytvorit sestavu prezentujici fakturu (ktera muze byt pripadne
> vicestrankova). Nevite nekdo jak zajistit u teto komponenty aby se zapati,
> kde je zesumovana castka k fakturaci, vytiskla jen na posledni strance a
to
> uplne dole?????
Pouziti oddilu hlavy a paty stranky v master/detail sestavach
je dosti omezene, prakticky snad jen na cislovani stranek.
K tisku celkove sumy za sestavu je urcen oddil konce sestavy.
Ja osobne bych preferoval reseni, kdy bude oddil konce
sestavy volitelne zarovnavan budto za posledni telo sestavy,
nebo k pate posledni stranky.
Navic by bylo vhodne umoznit na posledni strance netisknout
patu.Kryptografie v Delphi
[*] Ondrej Krajicek <xkrajic(zv)ics.muni(tec)cz> - 04.5.2000 09:24:22
Mate nekdo odkaz na nejakou hezkou stranku o %subj.
Jde mi o kvalitni open source implementace
sifrovacich a hashovacich algoritmu
v ObjectPascalu (CAST, IDEA, BLOWFISH, SHA-1, RIPEMD-160).
Ondrej Krajicek
--
--------------------------------------------------------------
Ondrej Krajicek mailto:xkrajic(zv)ics.muni(tec)cz
Institute of Computer Science, Masaryk University Brno
-- The new and incredible 32bit intelligent wizard has
obtained a solution to your printing problem: do not print!
--------------------------------------------------------------
knihy
[*] charon / smidek <charon(zv)ipex(tec)cz> - 4.5.2000 09:24:54
Preji hezky den,
mel bych tu dve uplne nove knihy vcetne CD.
M. Cantu - Mistrovstvi v Delphi 2
T. Miller a D. Powell - Mistrovstvi v Delphi 3
Pokud mate nekdo zajem poslete mi e-mail
charon II
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 4.5.2000 09:36:15
Ahoj,
narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim jak
ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k unitam
RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib. Chyby
vypadaly takhle:
{$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
cili direktiva {$ENDIF} presunuta na konec radku a tim padem chybi strednik.
Problem je v tom, ze jsem do tech zdroju nevrtal, pritom vsechny maji oproti
originalnim zdrojum posunute datum na 15.2.2000, cas na 12:50 a jsou o dva
byte delsi (na konci souboru je pridana sekvence CRLF). Nektere zdroje
(napr. RXDBComb, DateUtil, DBUtils, RXTooReg, RXShell aj.) jsou
zmodifikovane nasledujicim zpusobem:
v RXDBComb
ma byt
{$IFNDEF RX_D3} DBTables, {$ENDIF} StdCtrls, DBConsts;
je
{$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
v DateUtil
ma byt
uses SysUtils, {$IFDEF WIN32} Windows, {$ENDIF} Consts, StrUtils;
je
uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
v RXTooReg
ma byt
{$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, {$ENDIF} HintProp;
je
{$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, HintProp;{$ENDIF}
atd.
Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z 0:27
na 1:27), datum zustalo stejne.
Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje nejaky
trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Ukonceni procesu
[*] jof(zv)email(tec)cz - 4.5.2000 09:42:25
Potreboval bych ukoncit bezici proces,
ktery patri ke konkretnimu spustitelnemu souboru
na disku. U procesu vim ProcessId, ale neznam
Handle. Za radu predem dekuji.
-jof-
Zotriedenie podla pocitaneho stlpca v IB6
[*] Jaro <jaro(zv)sinea(tec)cz> - 4.5.2000 00:55:33 -0700
Nevim, zda jsem dobre pochoopil o co jde, ale podle me jediny smysluplny
zpusob trideni
je podle pole "mena". Jak jinak by se to mohlo grupovat podle tehoz pole.
Jaro
>
> Zdravim.
>
> Potreboval by som zotriedit vysledok podla stlpca narast, ale ako ?
>
> priklad:
>
> select mena, min(kurz), avg(kurz), max(kurz), max(kurz)-min(kurz) as
narast
> from kurzlist
> group by mena
> order by 5
> -------------
>
>
>
> "order by narast" neberie.
>
> Dakujem.
>
> Roland.
>Ukonceni procesu
[*] Ondrej Krajicek <xkrajic(zv)ics.muni(tec)cz> - 04.5.2000 10:23:00
OpenProcess a TerminateProcess
jof(zv)email(tec)cz wrote:
>
> Potreboval bych ukoncit bezici proces,
> ktery patri ke konkretnimu spustitelnemu souboru
> na disku. U procesu vim ProcessId, ale neznam
> Handle. Za radu predem dekuji.
> -jof-
--
--------------------------------------------------------------
Ondrej Krajicek mailto:xkrajic(zv)ics.muni(tec)cz
Institute of Computer Science, Masaryk University Brno
-- The new and incredible 32bit intelligent wizard has
obtained a solution to your printing problem: do not print!
--------------------------------------------------------------
Chybne zobrazovani III pod Win NT
[*] delphi konference <delphi(zv)energotek(tec)cz> - 4.5.2000 10:51:00
Dobry den
vazeni podobny problem jsem resil asi pred 2 roky.
Verzi programu jsem udrzoval jednu, ale kdyz se to melo instalovat, tak
jsem vysledny exe kompiloval pod 95 / nebo pod NT4 podle toho co bylo u
zakaznika, a pak uz to problemy nedelalo.
Nejvetsi problemy byl s pismem v TToolButtons tlacitkach.
Jestli mate nekdo nejaky lepsi napad nebo reseni, treba me napada direktiva
pro kompilaci, nebo tak neco tak sem s nim.
Petr Blau software developer
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 4.5.2000 11:06:39
Ahoj,
mohli bychom prosim Te tuhle diskusi presunout do konference ? Po odeslani
mailu jsem totiz zjistil, ze nejde jen o RXLib, ale i o jine veci (TMS,
GXGrid, a to jsem jeste zdaleka neoveril vsechno) a zda se mi, ze by to mohl
byt docela problem - predstav si, ze by to modifikovalo zdrojak tak, ze by
se nevygenerovala chyba syntaxe - stacilo by zmenit konstantu v prirazovacim
prikazu jiz odladene casti aplikace a vse je v pr.... Rekl bych, ze by se
to melo objasnit, mne to docela desi, a vic hlav, vic rozumu. Uz jsem volal
na podporu Alwilu i Inprise, ale nikde nic nevedi.
Pouzivam D5, W2K Prof, Outlook 98, Office 97, nekdy i soubezne, ale snazim
se tomu vyhnout, protoze i kdyz mam PIII/550+128 MB, tak mam pocit, ze mam
malo pameti....
Podarilo se mi casove lokalizovat vznik problemu, muselo se to stat po
17.4.2000, protoze mam aplikaci s RXLib buildovanou 16.4.2000 a ta byla
jeste bez potizi. Kolega vedle mne tenhle problem zatim nema, Outlook s
Delphi pouziva bezne.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav [mailto:JBenes(zv)cpoj(tec)cz]
Odesl�no: 4. kv�tna 2000 10:23
Komu: Foldyna Ji��
P�edm�t: RE: Problem s RXLib - trojsky kun ?
Ahoj,
stalo se mi to take (zmena pismenka v identifikatoru, prohozene radky/
tokeny jako v Tvem pripada aj.) a nejen v RX a hlasilo to spoustu chyb. Z
tohoto duvodu si udrzuji image knihoven za zipce. A mam Delphi 3.02. Stalo
se mi to i u Delphi 2 a tak jsem presel na D3 ale stejna situace uz
nekolikrat nastala i ted. Zjistil jsem, ze se to stava, kdyz soubezne bezi i
Outlook z M$ Off97(zrejme se nejak nesnaseji) a nestava se to vzdy ale
nahodile (stalo se mi to u Orphea ale i u moji knihovny pro zipovani). Stroj
je s Celeronem 380MHz, 128MB RWM, W98+Plus98,IE5.0, Off97-2 a Delphi 3.02
nic vic tady nemam instalovano.
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Foldyna Ji�� [SMTP:jiri.f(zv)avizo(tec)cz]
> Odesl�no: 4. V 2000 9:36
> Komu: Delphi konference
> P�edm�t: Problem s RXLib - trojsky kun ?
>
> Ahoj,
>
> narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim
> jak
> ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k
> unitam
> RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
> pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib.
> Chyby
> vypadaly takhle:
>
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> cili direktiva {$ENDIF} presunuta na konec radku a tim padem chybi
> strednik.
>
> Problem je v tom, ze jsem do tech zdroju nevrtal, pritom vsechny maji
> oproti
> originalnim zdrojum posunute datum na 15.2.2000, cas na 12:50 a jsou o dva
> byte delsi (na konci souboru je pridana sekvence CRLF). Nektere zdroje
> (napr. RXDBComb, DateUtil, DBUtils, RXTooReg, RXShell aj.) jsou
> zmodifikovane nasledujicim zpusobem:
>
> v RXDBComb
> ma byt
> {$IFNDEF RX_D3} DBTables, {$ENDIF} StdCtrls, DBConsts;
> je
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
>
> v DateUtil
> ma byt
> uses SysUtils, {$IFDEF WIN32} Windows, {$ENDIF} Consts, StrUtils;
> je
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> v RXTooReg
> ma byt
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, {$ENDIF} HintProp;
> je
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, HintProp;{$ENDIF}
> atd.
>
> Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z 0:27
> na 1:27), datum zustalo stejne.
>
> Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje
> nejaky
> trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
>
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
>
> Kryptografie v Delphi
[*] martin.falta(zv)atlas(tec)cz - 4.5.2000 12:12:57
Ahoj,
nekde jsem na to stahnul komponenty (tusim, ze z DSP). Je to freeware se zdroji. Jestli mas zajem tak se ozvi.
Tady je vytah z readme:
DEC Part I -----------------------------------------------
Status: Freeware, Version 3.0
Description: Includes variuos basicly Algorithm:
5 Checksum: CRC32, XOR32bit, XOR16bit, CRC16-CCITT, CRC16-Standard
23 Hash: MD4, MD5, SHA (other Name SHS), SHA1,
RipeMD128, RipeMD160, RipeMD256, RipeMD320,
Haval (128, 160, 192, 224, 256) with Rounds,
Snefru, Square, Tiger
Sapphire II (128, 160, 192, 224, 256, 288, 320) 40 Cipher: Gost, Cast128, Cast256, Blowfish, IDEA
Mars, Misty 1, RC2, RC4, RC5, RC6, FROG, Rijndael,
SAFER, SAFER-K40, SAFER-SK40,SAFER-K64, SAFER-SK64,
SAFER-K128, SAFER-SK128, TEA, TEAN, Skipjack, SCOP,
Q128, 3Way, Twofish, Shark, Square, Single DES, Double DES,
Triple DES, Double DES16, Triple DES16, TripleDES24,
DESX, NewDES, Diamond II, Diamond II Lite, Sapphire II
2 RNG: Standard Random Generator, Linear Feedback Shift Register RNG with
variable Period from 2^64-1 to 2^2032-1.
6 Text Formats: Hexadecimal, MIME Base 64, Plain, RFC1760 Six Word, UU Coding, XX Coding
others: * Low Level API to access outside from Delphi and BCB
* Fast implementation (i.E. THash_MD4 > 27Mb/sec, TCipher_Blowfish > 8.0 Mb/sec)
* Stringformat Management, includes:
HEX, MIME Base 64, RFC1760 Six Word, UU and XX Coding String converting and Samples
* Designtime Manager Components for Hash's and Cipher's
* Full and easy objectorientated
* RNG's can be cryptographicaly secure
* Standard Cipher Modes:
CBC - Cipher Block Chaining
CTS - Cipher Text Stealing
CFB - Cipher Feedback
OFB - Output Feedback
ECB - Electronic Code Book
CBCMAC - CBC Message Authentication Code
CTSMAC - CTS Message Authentication Code
CFBMAC - CFB Message Authentication Code
* High optimized Assembler Core
* Progress Gauge Support in all Cipher's, Hash's, CheckSums's
* Self Test Support for all Cipher's, Hash's, CheckSums's to test of
any illegal or incorrect Modification's
* Detailed and full DEMO
* variable HMAC's - Hash Message Authentication Code Support for all THash_XXX Classes,
supports RFC2104 Standard HMAC's
* automatically Compression Support
* Chaining from all THash_XXX, TRandom_XXX, TCipher_XXXX and TCompress_XXX Classes
* En/Decryption/Scrambling/Wipe with all TProtection Classes,
this includes all Hash's, Cipher's, Random's and Compress's Classes
* Internet RFC2289/RFC1760/RFC2444 One Time Password Routines as Component
* many more...
Installation: install \DEC\Source\DECReg.pas in Your Palette
-----Original Message-----
From: "owner-delphi-l(zv)fwd(tec)cz" <owner-delphi-l(zv)fwd(tec)cz> on behalf of "Ondrej Krajicek" <xkrajic(zv)ics.muni(tec)cz>
Sent: Thu, 04 May 2000 09:24:22 +0200
To: "delphi-l(zv)fwd(tec)cz" <delphi-l(zv)fwd(tec)cz>
Subject: Kryptografie v Delphi
Mate nekdo odkaz na nejakou hezkou stranku o %subj.
Jde mi o kvalitni open source implementace
sifrovacich a hashovacich algoritmu
v ObjectPascalu (CAST, IDEA, BLOWFISH, SHA-1, RIPEMD-160).
Ondrej Krajicek
--
--------------------------------------------------------------
Ondrej Krajicek mailto:xkrajic(zv)ics.muni(tec)cz
Institute of Computer Science, Masaryk University Brno
-- The new and incredible 32bit intelligent wizard has
obtained a solution to your printing problem: do not print!
--------------------------------------------------------------
Pouze jedna instance COM objektu ?????
[*] Ond�ej Male�ek - 4.5.2000 12:44:08
Vazeni,
lze nejakym "rozumnym" zpusobem zajistit, aby out of process COM server
vytvarel striktne pouze pouze jednu instanci, ktera by byla sdilena mezi
vice klienty. Jedna se mi o provoz jak lokalne, tak i DCOM. Dopracoval jsem
se k modelu, kdy server obsahuje dve rozhrani, jedno slouzi k pripojovani =>
funkce v nem obsazena vraci instanci druheho rozhrani, ktera je vytvarena
lokalne v aplikaci serveru a druhe rozhrani je vlastni server. Tohle mi ale
nepripada jako nejvhodnejsi, nebot nelze zabranit vytvoreni dalsi instance
serveru z vnejsku. Dale jsem zkousel implementaci IPersistFile a sdilet
pomoci nej instanci serveru, ale narazil jsem na zdrojaky Delphi, kde nejsou
importovany potrebne struktury z API.
Existuje nejaka jina moznost ?
Diky
PChar
[*] delphi(zv)zas-me(tec)cz - 4.5.2000 13:20:06
Melo by jit StringReplace(CelyText, #$D#$A, '', [rfReplaceAll]);
Karel Rys
>Prosim o radu.
>
>Do promenne typu PChar nacitam textovy soubor, ktery ma jednotlive radky
>oddelene #$D#$A.
>
>Kdyz chci pak pomoci funkce StringReplace nahradit urcitou cast v te
>promenne, tak mi to hledanou cast nenajde
>
>CelyText:=StringReplace(CelyText, nalezene, nahradit, [rfReplaceAll]);
>
>Jak se mohu zbavit tech tvrdych koncu radku?
>
>==[ Libor Krayzel ]================================
>http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
>http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
>office: +420-69-620 1375
>GSM: +420-603-937 947
>==============================================
>Kryptografie v Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 4.5.2000 12:40:39
Puvodni zprava, kterou napsal Ondrej Krajicek dne 4 May 00,:
> Mate nekdo odkaz na nejakou hezkou stranku o %subj.
> Jde mi o kvalitni open source implementace
> sifrovacich a hashovacich algoritmu
> v ObjectPascalu (CAST, IDEA, BLOWFISH, SHA-1, RIPEMD-160).
Treba tady neco je:
http://www.scramdisk.clara.net/d_crypto.html
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, PGP vitano
Problem s RXLib - trojsky kun ?
[*] Grubhoffer(zv)software602(tec)cz - 4.5.2000 14:04:54
> stalo se mi to take (zmena pismenka v identifikatoru, prohozene radky/
> tokeny jako v Tvem pripada aj.) a nejen v RX a hlasilo to
> spoustu chyb. Z
Kdysi davno se mi stala podobna vec - zmenena pismenka v identifikatorech ve zdrojacich a to tak ridce (cca 1x za 20 prekladu 1 vyskyt na 100000 radcich), ze to nejprve vypadalo na preklepy. Ale zjistil jsem, ze pismenka jsou zmenena presne o $10. No nebudu to protahovat - nebyl to ani virus, ani pamet/radic/disk/kabely, ale krasne roztekly jeden kondenzator na boardu...
JG
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 4.5.2000 14:12:12
Ahoj,
tohle nevypada na HW problem, protoze si popravde receno neumim predstavit
vadny HW, ktery vyparsuje direktivu {$ENDIF}, presune ji na konec radku, na
konec souboru prida CRLF a zmeni datum a cas u vsech souboru na stejnou
hodnotu. To je skoro stejne pravdepodobne, jako kdyby se nad smetistem
prehnalo tornado, a z komponent slozilo Jumbo Jet. Navic to neni ridky
pripad, mam ted v pocitaci asi 800 zdrojaku, ktere maji stejny datum a cas
(i sve, nejen cizi). Nevim, porad to vidim na SW zalezitost...
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> -----P�vodn� zpr�va-----
> Od: Grubhoffer Jindra
> Odesl�no: 4. kv�tna 2000 14:05
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Problem s RXLib - trojsky kun ?
>
> > stalo se mi to take (zmena pismenka v identifikatoru, prohozene radky/
> > tokeny jako v Tvem pripada aj.) a nejen v RX a hlasilo to
> > spoustu chyb. Z
>
> Kdysi davno se mi stala podobna vec - zmenena pismenka v identifikatorech
> ve zdrojacich a to tak ridce (cca 1x za 20 prekladu 1 vyskyt na 100000
> radcich), ze to nejprve vypadalo na preklepy. Ale zjistil jsem, ze
> pismenka jsou zmenena presne o $10. No nebudu to protahovat - nebyl to ani
> virus, ani pamet/radic/disk/kabely, ale krasne roztekly jeden kondenzator
> na boardu...
>
> JG
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
> tisk pomoci Printer.Canvas.StretchDraw
[*] petr.palicka(zv)atlas(tec)cz - 4.5.2000 14:21:31
ahoj
tentyz problem mam take.
delphi 3p, 5p a 5e
na ruznych verzich woken 95 a 98
proste dam tisknout bitmapu o velikosti tiskove strany, tedy asi 2000x2800 bodu a vyjede mi prazdna stranka...
pokud pouziji Printer.Canvas.StretchDraw() DVAKRAT po sobe, vytiskne se to OK, ale na slabsich masinach to lehne na GDI :-(.
mam podezreni na delphi, ale neumim to dokazat...
pokud jste nekdo neco podobneho resil dejte prosim vedet.
> Ahoj,
> m�m probl�m s tiskem bitmapy, kter� se mi ob�as nevytiskne. Tisknu pomoc�
> Printer.Canvas.StretchDraw(); QR jsem nepouzil, prelozeno v D3 V3.02.
> Problem nastava na HP LJ, Canon BCJ ale i na jehlickovych a na ruznych PC.
> Tento problem nastal pri prechodu z D2 na D3 a projevuje se vicemene
> nahodne. Poradite nekdo?
> Diky
> Jaro B.
dekuji peca
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[ smtp: petr.palicka(zv)atlas(tec)cz ]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~IDENTITY na MSSQL7
[*] Robert Zak <nrsys(zv)psn.sk> - 4.5.2000 14:58:41
Ako zapnem IDENTITY na uz vytvorenej tabulke v MSSQL7?
Pokial identity zapnem kliknutim v "Enterprise mamager", - da sa zapnut.
ALTER TABLE mi ale nefunguje, pokial napisem slovo IDENTITY (1,1) !
Ako sa to robi, a da sa to vobec zo skriptu? - v helpe IDENTITY pri ALTER
TABLE nie je, ale ako to potom dokaze enterprise manager?
Dakujem
Robo
PS: Dakujem za natahovanie parametrov do ADO, problem bol v tom ze string
musi mat vyplnene 'Size', integer to nevyzaduje.Velikonoce
[*] Zdenek Moravec <zmoravec(zv)klet(tec)cz> - 4.5.2000 12:59:47 -0000
Mohu potvrdit, ze tento algoritmus dava spravne vysledky pro 20. i 21. stoleti.
Jestli ma obecnejsi platnost nedokazu rict, ale i pro ostatni stoleti se mi zda
algoritmus spravny. Jedine problemy mohou nastat pred rokem 1582, kdy se
nepouzival gregoriansky, ale juliansky kalendar (ktery se pouziva i dnes v
pravoslavne cirkvi). To se da napravit tak, ze se upravi velikost promennych
Ve_F a Ve_G podle rozdilu obou kalendaru - pozor, tento rozdil se jednou za 100
let meni s vyjimkou let delitelnych 400.
A nezapomente, ze v pripade nejasnosti ma posledni slovo vzdy Vatikan.
Zdenek Moravec
Hvezdarna Klet
----- P�vodn� zpr�va -----
Od: <jdanek(zv)fnbrno(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 3. kv�tna 2000 13:32
P�edm�t: Re: Velikonoce
>
> Posilam algoritmus, ktery je funkcni a nema problemy a tez pocita
> spravne i uvedene Velikonoce v roce 1954.
> Funkce vraci datum Velikonocni nedele.
>
> function Velikonoce(Rok:Word):String;
> var Ve_A, Ve_B, Ve_C, Ve_K, Ve_P, Ve_Q,Ve_F, Ve_G,Ve_D, Ve_E : LongInt;
> Den, Mesic, SRok : String;
> begin
> Ve_A:=Rok mod 19;
> Ve_B:=Rok mod 4;
> Ve_C:=Rok mod 7;
> Ve_K:=Trunc(Rok/100);
> Ve_P:=Trunc(((8 * Ve_K) + 13)/25);
> Ve_Q:=Trunc(Ve_K/4);
> Ve_F:=(15 - Ve_P + Ve_K - Ve_Q) mod 30;
> Ve_G:=(4 + Ve_K - Ve_Q) mod 7;
> Ve_D:=((19 * Ve_A) + Ve_F) mod 30;
> Ve_E:=((2 * Ve_B) + (4 * Ve_C) + (6 * Ve_D) + Ve_G) mod 7;
>
> if (Ve_D + Ve_E) <= 9 then
> begin
> Str(22 + Ve_D + Ve_E,Den);
> Den:=Trim(Den) + '.';
> Mesic:='3.';
> end
> else
> begin
> Str(Ve_D + Ve_E - 9,Den);
> Den:=Trim(Den) + '.';
> Mesic:='4.';
> end;
>
> if (Ve_D = 29) and (Ve_E = 6) then Den:='19.';
>
> if (Ve_D = 28) and (Ve_E = 6) and (Ve_A > 10) then Den:='18.';
>
> Str(Rok:4,SRok);
> Velikonoce:=Den + Mesic + SRok;
> end;
> ------------------------------------------------------------------------------
---------------
>
> zdravi
>
> J.Danek
>
>
> >
> > http://www.softnov(tec)cz/article.php?id=10685
> >
> > Slavek
> >
> > > Nemate nekdo sikovny algoritmus, jak spocitat, kdy jsou Velikonoce?
> >
> > > Milan Schembera
> >
>
> Ja si trochu zastouram :) V roce 1954 bylo velikonocni pondeli 19.4. a
> uvedeny algoritmus vrati 26.4.
>
> J.G.
>
>
>
>Zoznam tabuliek v ADONIS
[*] Robert Zak <nrsys(zv)psn.sk> - 4.5.2000 15:02:06
Ako ziskam zoznam tabuliek pripojenej databazy v ADONIS?
V ADOExpress na to bola metoda 'TADOConnection.GetTableNames', nedari sa mi
ale v ADONIS nic podobne najst.
Dakujem
Robo
Ukonceni procesu
[*] jof(zv)email(tec)cz - 4.5.2000 15:28:47
Zkousel jsem:
HWND:=OpenProcess(PROCESS_ALL_ACCESS, True,PID)
nebo
HWND:=OpenProcess(PROCESS_QUERY_INFORMATION, True,PID)
GetExitCodeProcess(HWND,EC)
TerminateProcess(EC) nebo ExitProcess(EC)
ale vzdy mi to ukonci moji aplikaci a ne tu,
kterou ukoncit chci. OpenProcess mi do promene
HWND vraci nejakou divnou hodnotu (5, 6, 7, ...)
Kde delam chybu?
-jof-
>
> OpenProcess a TerminateProcess
>
> jof(zv)email(tec)cz wrote:
> >
> > Potreboval bych ukoncit bezici proces,
> > ktery patri ke konkretnimu spustitelnemu souboru
> > na disku. U procesu vim ProcessId, ale neznam
> > Handle. Za radu predem dekuji.
> > -jof-
>
> --
> --------------------------------------------------------------
> Ondrej Krajicek mailto:xkrajic(zv)ics.muni(tec)cz
> Institute of Computer Science, Masaryk University Brno
> -- The new and incredible 32bit intelligent wizard has
> obtained a solution to your printing problem: do not print!
> --------------------------------------------------------------
> Velikonoce
[*] novacek(zv)vanicek(tec)cz - 4.5.2000 13:29:55
> Sorry, po myslel sem uplnek a ne nov a to prvni jarni ....
Ono to neni zase tak jednoduche. Diky jistym nepresnostem v obehu
mesice je ten algoritmus celkem netrivialni.
Bylo jich tu vic, ja si take prisadim. Ziskal jsem ho z brnenske
hvezdarny:
Procedure UrciVelikonoce (Var Dd,Mm,Rr : Word);
{Velikonoce pripadaji na prvni pondeli po prvnim jarnim uplnku}
Var
A,D,E,K,Q : Integer;
Function Fce160 (X,Y : Integer) : Integer;
Var
Temp : Double;
Begin {UrciVelikonoce.Fce160}
Temp:=X/Y;
Result:=Trunc ((Temp-Int (Temp+0.001))*Y+0.1);
end; {UrciVelikonoce.Fce160}
Begin {UrciVelikonoce}
If (Rr < 1100) Or (Rr > 2199) Then
Raise EBadYear.Create ('Rok mimo rozsah');
K:=Rr Div 100;
Q:=K Div 4;
A:=Fce160 (Rr,19);
D:=Fce160 (Fce160 (15-((8*K+13) Div 25)+K-Q,30)+19*A,30);
E:=Fce160 (Fce160 (4+K-Q,7)+2*Fce160 (Rr,4)+4*Fce160 (Rr,7)+6*D,7);
Dd:=22+D+E; Mm:=3;
If Dd >= 32 Then
Begin
Dec (Dd,31); Mm:=4;
If Dd >= 25 Then
Begin
If (Dd = 26) Or ((E <> 5) And (A >= 11)) Then Dec (Dd,7);
end;
end;
{Posun z nedele na cervene pondeli}
Inc (Dd);
If (Mm = 3) And (Dd > 31) Then
Begin
Dd:=1; Mm:=4;
end;
end; {UrciVelikonoce}
Zdar a silu.
Vladimir Novacek
VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
Zborovska 15 fax+BBS: 05-41240246
616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
Ceska Republika http://www.vanicek(tec)cz
Chybne zobrazovani fontu !!!
[*] novacek(zv)vanicek(tec)cz - 4.5.2000 13:39:28
> copak nikdo nedelal napr. aplikaci pod Win9x s malym fontem (96) a uzivatel
> mel nastaveny velke fonty (120)?
>
> HELP ME PLEASE!
Taky jsem si s tim nejakou dobu hral, ale nakonec jsem nechal
Form.Scaled:=True at si s tim Delfin udela, co umi.
Nakonec jsem totiz ziskal rozliseni obrazovky a DPI obrazovky, ale
Wokna umoznuji nastavit budto normalni nebo velke fonty (a ikony) a
na tom jsem ztroskotal natolik, ze jsem se na to vybodl.
Delfin to dela tak, ze to vypada i v ruznych rozlisenich aspon trochu
prijatelene, takze jsem to tak nechal.
Pokud neco objevis, dej vedet. Dik.
> zkousel jsem na OnCreate formulare...
> PixelsPerInch := Screen.PixelsPerInch;
> Scaled := True;
Zjistil jsem, ze je jeste nutne nastavit u formulare ScrollBar.Range
(nebo neco takoveho), aby se u formulare, ze ktereho je diky
rozliseni videt jen kousek, ukazaly aspon posuvnitka.
Zdar a silu.
Vladimir Novacek
VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
Zborovska 15 fax+BBS: 05-41240246
616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
Ceska Republika http://www.vanicek(tec)cz
Problem s RXLib - trojsky kun ?
[*] Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz> - 4.5.2000 16:08:55
Ahoj vsichni,
Mam podobny problem. Pred tydnem jsem stahnul komponentu AdvStringGrid od
TMS. Po jejim pouziti v aplikaci se mi stava, ze po nekolikakerem spusteni
programu mne aplikace vytuhne. Jako by mela malo pameti (mam 64 MB, PII 400
MHz). Vypada to asi tak , ze v momente, kdy se problem vyskytne, jsem nucen
pres Ctrl+Alt+Del ukoncit Delphi (5) a spustit je znovu. Pak je opet chvili
vse OK. Za nejakou dobu obdobna situace. Pri spusteni programu mi Delphi
opet vytuhnou. Cim dele jsem od startu PC, tim vice se interval mezi
vypnutim Delph a vytuhnutim aplikace zmensuje.
Tom
mail: tomas.kucera(zv)matsushita(tec)cz
Chybne zobrazovani IV
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.5.2000 17:51:41
Ahoj,
tak jsem si zkusil zmenu velikosti fontu ve Woknech, jak se na to
tvari muj program. Vse beha krasne v pohode - az na jednu
malickost. Mam tam jednu komonentu, kterou vytvarim dynamicky
za behu, kdy uz je formular vytvoreny a zobrazeny. Staci jen
malickost - zavolat ScaleBy na komponentu po jejim vytvoreni.
Jenze ouha - jak zjistit, v jakem pomeru bylo (a zda vubec)
zmeneno vlastni okno? Uz jsem z te VCL na mrtvici...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chybne zobrazovani pod Win NT
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.5.2000 17:51:41
On 4 May 00, at 8:09, Ing. Petr �vejda wrote:
> ja mam pri vyvoji nastaveno ve Win98 male pismo, coz je font size
> 96dpi. Uzivatel ma na WinNT 4.0 nastaveno male pismo (presnou velikost
> mi NT neukazuje).
>
> ...to vsak neresi problem. Co kdyz bude mit uzivatel nastaveno velke
> pismo z duvodu zacinajici slepoty? :-))
Na TForm je property Scaled, ktera obsluhuje zmenu proporci pri
jine velikosti fontu. Dalsi problem se muze vyskytnout tehdy, kdyz
uzivatel nema nainstalovany font, ktery jsi predepsal ty, pak se
pouzije nejaky nejblizsi podobny.
Je proto vhodne vyzkouset jeste doma, jak se program chova pri
zmene proporci, a pokud pouzivas font, ktery uzivatel nemusi mit,
pak je vhodne umoznit i volbu fontu. Nebo navrhnout prvky s urcitou
rezervou pro pripadny "vetsi" font.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Problem s RXLib - trojsky kun ?
[*] Robert Kindl <rob(zv)exec(tec)cz> - 4.5.2000 20:37:16
> narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim
jak
> ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k
unitam
> RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
> pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib.
Chyby
> vypadaly takhle:
>
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
Mam Delphi 3.02 a tohle se mi nikdy nestalo. Nemas nainstalovany nejaky
source formator?
> Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z 0:27
> na 1:27), datum zustalo stejne.
> Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje
nejaky
> trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
> Ing. Jiri Foldyna
Ten casovy posun bych pricetl na vrub Microsoftu.
Mam 100% overeno, ze pri prechodu letni/zimni cas nebo obracene
dojde k posunu casu nekterych (opravdu jen nekterych) souboru o hodinu.
Alespon u mne s WinNT4 SP6 tomu tak bylo nekolik let za sebou (nez jsem
to vypnul a cas si upravuju sam) a take se to opakovene stava
u mnoha nasich zakazniku, kteri nam pak casto volaji.
Rob
Velikonoce
[*] Robert Kindl <rob(zv)exec(tec)cz> - 4.5.2000 20:37:21
> > Ja si trochu zastouram :) V roce 1954 bylo velikonocni pondeli 19.4. a
> > uvedeny algoritmus vrati 26.4.
>
> Nechci stourat, ale nebyla chyba spise v despotickem
> komunistickem rezimu, nez v algoritmu?
> :-))))
> Zbysek Hlinka
Zbysku,
taky nechci stourat, ale myslim, ze komuniste v Cechach neurcovali
kdy bude krestanstvo slavit sve svatky.
Nebo snad cely svet v roce 1954 slavil velikonoce 26.4.
jen v CSSR to bylo 19.4?
No kdyz rijnova revoluce byla v listopadu tak proc nakonec ne, ze?
Rob
Chybne zobrazovani IV
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 4.5.2000 20:54:28
to me teda podrz. Jak to ze ti fo funguje????
vezmeme si trivialni priklad:
1. pro vyvoj mam nastaveno male pismo (96dpi) - bezna situace
2. na novy formular umistim TMemo a do nej napisu 1234567890123456789
2a. na fonty vubec nesaham, necham standardni
3. podivam, kde mi TMemo zawrapuje vlozeny retezec (do se vejde na prvni
radek)
4. prelozim, pro kontrolu spustim a ukoncim program a ukoncim Delphi
5. Prehodim si velky font (120 dpi) - pocitac me vyzve k resetu Win98
6. po opjetovnem spusteni meho programu TMemo vlozeny retezec zarovna jinak
7. KDE JE CHYBA A JAKY KOD VLOZIT NA CREATE FORMULARE, ABY TO FUNGOVALO?
jedine, co mi bezelo, a cim se to srovnalo, byl prikaz:
ScaleBy(100, 94);
...ale proc 94?
Ing. Petr Svejda
software specialist
> tak jsem si zkusil zmenu velikosti fontu ve Woknech, jak se na to
> tvari muj program. Vse beha krasne v pohode - az na jednu
> malickost. Mam tam jednu komonentu, kterou vytvarim dynamicky
> za behu, kdy uz je formular vytvoreny a zobrazeny. Staci jen
> malickost - zavolat ScaleBy na komponentu po jejim vytvoreni.
> Jenze ouha - jak zjistit, v jakem pomeru bylo (a zda vubec)
> zmeneno vlastni okno? Uz jsem z te VCL na mrtvici...LABELy
[*] Hurricane <hurricane(zv)email(tec)cz> - 4.5.2000 21:01:45
Ja potrebuju porovnavat dve barvy a kdyz sou STEJNY, tak aby to hodilo
hlasku, ze sou stejny. Colordialog vraci barvy tak jak sou nadefinovany v
systemu, tzn. ze kdyz si vyberes bilou, tak ti to nevrati clWhite ale
clWindow (krom toho, ja mam nastaveny misto hnusny bili sedivou (podle
windli Silver), zkus to taky, nebolej z toho tak oci). Krom toho mam pocit,
ze pokud mas okna bili, tak ti clWindow<>clWhite vrati false protoze
clWindow je stejna jako clWhite.
Hurricane
----- Original Message -----
Jeste mala konkretni poznamka k problemu.
Nemela by se porovnavat primo vlastnost color, protoze napriklad
clWindow<>clWhite ale oboji je (podle nastaveni systemu) White cili
nekontrastni.
Pokud by to melo byt uplne UF bylo by treba urcit nejakou hranici kontrastu
pomoci skutecne RGB hodnoty dane barvy.Mesic
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 4.5.2000 21:56:08
Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
Problem s RXLib - trojsky kun ?
[*] Hurricane <hurricane(zv)email(tec)cz> - 4.5.2000 21:56:39
Zdravim
Mno, jediny co bys mohl udelat je stahnout si nejnovejsi virovou databazi a
zkontrolovat si hadr. Jinak preju mnoho uspechu a tvurce vire necht stravi
1248597 dni v pekle. (zamerte se na nejakeho C++ Builderaka)
Hurricane
----- Original Message -----
> narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim
jak
> ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k
unitam
> RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
> pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib.
Chyby
> vypadaly takhle:
>
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> cili direktiva {$ENDIF} presunuta na konec radku a tim padem chybi
strednik.
>
> Problem je v tom, ze jsem do tech zdroju nevrtal, pritom vsechny maji
oproti
> originalnim zdrojum posunute datum na 15.2.2000, cas na 12:50 a jsou o dva
> byte delsi (na konci souboru je pridana sekvence CRLF). Nektere zdroje
> (napr. RXDBComb, DateUtil, DBUtils, RXTooReg, RXShell aj.) jsou
> zmodifikovane nasledujicim zpusobem:
>
> v RXDBComb
> ma byt
> {$IFNDEF RX_D3} DBTables, {$ENDIF} StdCtrls, DBConsts;
> je
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
>
> v DateUtil
> ma byt
> uses SysUtils, {$IFDEF WIN32} Windows, {$ENDIF} Consts, StrUtils;
> je
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> v RXTooReg
> ma byt
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, {$ENDIF} HintProp;
> je
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, HintProp;{$ENDIF}
> atd.
>
> Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z 0:27
> na 1:27), datum zustalo stejne.
>
> Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje
nejaky
> trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
ADO
[*] Erik Salaj <winsoft(zv)napri.sk> - 4.5.2000 22:13:04
> jak mohu pomoci ADO zjistit vysledek tohoto prikazu "EXEC sp_helpindex
> [tabulka]". V "Query Analyzer" mi to ukaze spravny vysledek, ale nevim jak
> ho ziskat v Delphi pomoci ADO.
V Adonise nastav
CommandType := clText;
SQL.Text := 'EXEC sp_helpindex tabulka';
Active := True;
Erik
Mesic
[*] Hurricane <hurricane(zv)email(tec)cz> - 4.5.2000 22:35:43
Zdravim
Na www.goocities.com/smidivo je komponenta ktera zobrazuje stav mesice podle
zadanyho dne.
Hurricane
----- Original Message -----
From: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
To: Delphi Forum <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 9:56 PM
Subject: Mesic
Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
Zobrazeni mailu
[*] Hurricane <hurricane(zv)email(tec)cz> - 4.5.2000 22:41:29
Zdravim
To zalezi na nastaveni v adresari. Vsimni si, ze pokud odesilatele nemas a
adresari, tak se zobrazuje jeho email. Proto ti nejspis nezbyva nic jineho
nez prejmenovat vsechny kontakty v adresari na jejich emailovou adresu.
Hurricane
----- Original Message -----
From: Daniel Krej�� <fredycrueger(zv)volny(tec)cz>
To: delphi <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 05, 2000 9:20 PM
Subject: OT: Zobrazeni mailu
Jde nekde v Outlooku Expresu 5 nastavit, aby se mi misto jmena zobrazil jeho
e-mail. Nemohu to nikde najit.
Zobrazeni mailu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:56:53
From: Daniel Krej�� <fredycrueger(zv)volny(tec)cz>
> Jde nekde v Outlooku Expresu 5 nastavit, aby se mi misto jmena zobrazil jeho
> e-mail. Nemohu to nikde najit.
Nejde. Asi to MS povazuje za vyhodne ;-) V OE5 je ale prvni nevyznamny krok
v tom, ze adresa se ti zobrazi alespon ve vlastnostech zpravy. Treba se za
par let tak slozitou vec podari Microsoftu dat prece jen dohromady.
Petr Vones, amatersky programator
Chybne zobrazovani IV
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:56:33
From: Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz>
> vezmeme si trivialni priklad:
>
> 1. pro vyvoj mam nastaveno male pismo (96dpi) - bezna situace
> 2. na novy formular umistim TMemo a do nej napisu 1234567890123456789
> 2a. na fonty vubec nesaham, necham standardni
> 3. podivam, kde mi TMemo zawrapuje vlozeny retezec (do se vejde na prvni
> radek)
> 4. prelozim, pro kontrolu spustim a ukoncim program a ukoncim Delphi
> 5. Prehodim si velky font (120 dpi) - pocitac me vyzve k resetu Win98
> 6. po opjetovnem spusteni meho programu TMemo vlozeny retezec zarovna jinak
> 7. KDE JE CHYBA A JAKY KOD VLOZIT NA CREATE FORMULARE, ABY TO FUNGOVALO?
>
> jedine, co mi bezelo, a cim se to srovnalo, byl prikaz:
>
> ScaleBy(100, 94);
>
> ...ale proc 94?
Ahoj,
Podle me je to korekce chyby ktera vznikne pri prepoctu velikosti fontu.
Problem je spsi v tom jak VCL zachazi s wrapovanim textu. Pokud totiz
v designtime vlozis nejaky text (jako jeden radek) a nastavis WordWrap
na True, tak VCL si ulozi text jako jednotlive radky a pri zmene sirky
komponenty text uz neprerovna. Urcitym resenim by mohlo byt nastavit
WordWrap na True az za behu (v OnCreate formulare) a v designtime zadat
vsechny texty bez CRLF na jeden radek. Zkusil jsem si nekolik pripadu a
napriklad pri pouziti fontu "Courier New" to zarovna vzdy na stejnem
znaku pri zmene DPI, ale u jinych dojde k posunu o znak ci dva.
Petr Vones, amatersky programator
FileList
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:56:59
From: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
> Sorted nastavit nemuzu, protoze pak nejde serazovat podle velikosti, data,
> atd.
Pak mas asi lepsi pouzit TListView kde se da lepsi tridit podle sloupcu a
data muzes mit ulozena i mimo ovl.prvek.
Petr Vones, amatersky programator
Menu v MDI aplikaci
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:32
From: David Adamec <adamecd(zv)volny(tec)cz>
> mam problem s MDI aplikaci s menu.
> Pokud v MDI aplikaci vytvorim dve (a vice) okna (typu mdiChild), pak je
> maximalizuju, tak bezi vse Ok dokud neprepnu okno, pak se menu nejak blbe
> prekresli.
> Dela mi to i u prikladu k Delphi (mam Delphi 5): ../Demos/Doc/TextEdit/...
> (pokud v tom priklade mate maximalizovany 2 klientska okna a prepnete je
> pomoci menu Window na to druhy okno a projede se mysi po menu, cely se to
> ..., aspon u me)
Ahoj,
Je to chyba VCL. Podivej se na Borlandi newsy do borland.public.attachments,
a hledej MDIFixes. Je tam popsano nekolik oprav na MDI ve VCL.
Petr Vones, amatersky programator
Chybne zobrazovani III pod Win NT
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:55
From: delphi konference <delphi(zv)energotek(tec)cz>
> Verzi programu jsem udrzoval jednu, ale kdyz se to melo instalovat, tak
> jsem vysledny exe kompiloval pod 95 / nebo pod NT4 podle toho co bylo u
> zakaznika, a pak uz to problemy nedelalo.
> Nejvetsi problemy byl s pismem v TToolButtons tlacitkach.
Ahoj,
To by prece na vysledny EXE nemelo mit zadny vliv (leda snad mozna chyba v HW
nektereho z pocitacu). Porovnaval jsi ty soubory nekdy pri shodnem nastaveni
vsech direktiv kompilatoru.
> Jestli mate nekdo nejaky lepsi napad nebo reseni, treba me napada direktiva
> pro kompilaci, nebo tak neco tak sem s nim.
Podle popisu to vypada na neaktualni verzi knihovny COMCTL32. Aktualizaci
lze provest bud instalaci IE5 nebo samostatnym updatem, ktery lze ziskat
tady:
http://www.microsoft.com/msdownload/ieplatform/ie/comctrlx86.asp
Petr Vones, amatersky programator
LABELy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:39
From: L. ZITA <konference(zv)sales(tec)cz>
> Jeste mala konkretni poznamka k problemu.
> Nemela by se porovnavat primo vlastnost color, protoze napriklad
> clWindow<>clWhite ale oboji je (podle nastaveni systemu) White cili
> nekontrastni.
Ahoj,
Staci pouzit funkci ColorToRGB.
> P.S Odesilam to do konference dnes uz potreti ale jeste ani jednou to
> nedorazilo
Mam tytez zkusenosti, predchozi odpoved na tento dotaz jsem posilal nakonec
4x a prisla jednou (viz "Fw: LABELy").
Petr Vones, amatersky programator
Velikonoce
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:45
From: Milan Schembera <spravce(zv)spektrum(tec)cz>
> Nemate nekdo sikovny algoritmus, jak spocitat, kdy jsou Velikonoce? Nechce se mi
> po nich moc namahat sedou kuru.
Ahoj,
Podivej se na JCL (http://delphi-jedi.org/Jedi:CODELIBJCL:881901704), tam je
plno datumovych funkci vcetne vypoctu Velikonoc.
Petr Vones, amatersky programator
velikost Taskbaru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:26
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> > treba jsem dobre neporozumel predchozi formulaci, ale hodnota
> > property, ktera je specifikovana jako default, se prece do DFM nikdy
> > nema ukladat - od toho je klicove slovo default pri definici property
> > zavedeno
Ahoj,
Tak to neni, neuklada se pouze v pripade, ze jeji hodnota je shodna s tou,
ktera je uvedena za klicovym slovem default.
> Podival jsem se do zdrojaku VCL D3, a tam je skutecne u TToolBar
> property Height default 32;
> Co je pekna hovadina. V D5 je tato deklarace take, ale narozdil od
> D3 je v Create nastaveno Height:=29. Height s default hodnotou
> musim povazovat za bug, protoze to znemoznuje zjistit rozmery
> komponenty z DFM.
Mozna jsem to nepochopil, ale proc znemoznuje. Pokud je v default uvedeno 32
a v konstruktoru se nastavi 29, pak je 29 vzdy (zbytecne) ulozeno do DFM:
object Form1: TForm1
Left = 192
Top = 103
Width = 544
Height = 375
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 536
Height = 29
Caption = 'ToolBar1'
TabOrder = 0
end
end
Navic ToolBar ma vlastnost AutoSize, takze spravne by vlastnost Height mela
mit jeste stored parametr, kde by prirazena funkce neukladala Height pokud je
AutoSize nastaveno na True.
Petr Vones, amatersky programator
Sirka fontu a kurziva
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:57:03
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Chyba neni ani tak v TextWidth, jako spis v API funkcich. Ted
> prave vytvarim editor pro WideStringy (chce se nekdo pripojit? chci
> docilit stejne funkcnosti jako ma TMemo a TEdit; v nedavnych
> odkazech na muj dotaz nic takoveho nebylo, dodatecne diky za
> ne) a narazil jsem na problem, ze v me konstelaci Woken (cesky,
> MS Sans Serif) pocita funkce GetTextExtentExPointW spatne
> sirku ruskych bukvicek - vzdy mi cpe sirku 3. Pokud prehodim
> prostredi na ruske, je to v poradku.
Ahoj,
Zkus pouzit DrawTextEx a do format options dej DT_CALCRECT.
Petr Vones, amatersky programator
Problem s RXLib - trojsky kun ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:58:24
From: Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz>
> Mam podobny problem. Pred tydnem jsem stahnul komponentu AdvStringGrid od
> TMS. Po jejim pouziti v aplikaci se mi stava, ze po nekolikakerem spusteni
> programu mne aplikace vytuhne. Jako by mela malo pameti (mam 64 MB, PII 400
> MHz). Vypada to asi tak , ze v momente, kdy se problem vyskytne, jsem nucen
> pres Ctrl+Alt+Del ukoncit Delphi (5) a spustit je znovu. Pak je opet chvili
> vse OK. Za nejakou dobu obdobna situace. Pri spusteni programu mi Delphi
> opet vytuhnou. Cim dele jsem od startu PC, tim vice se interval mezi
> vypnutim Delph a vytuhnutim aplikace zmensuje.
Ahoj,
Neni to tim, ze je v ni nejaka chyba ktera vede k neuvolnovani GDI zdroju.
Pokud pouzivas Win9x tak tam dojdou pomerne rychle. Zkus se podivat pomoci
Merice prostredku nebo specielnich nastroju ktere toto umozni odhalit (jako
napriklad MemProof nebo Memory Sleuth).
Petr Vones, amatersky programator
Problem s RXLib - trojsky kun ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:58:11
From: Foldyna Ji�� <jiri.f(zv)avizo(tec)cz>
> tohle nevypada na HW problem, protoze si popravde receno neumim predstavit
> vadny HW, ktery vyparsuje direktivu {$ENDIF}, presune ji na konec radku, na
> konec souboru prida CRLF a zmeni datum a cas u vsech souboru na stejnou
> hodnotu. To je skoro stejne pravdepodobne, jako kdyby se nad smetistem
> prehnalo tornado, a z komponent slozilo Jumbo Jet. Navic to neni ridky
> pripad, mam ted v pocitaci asi 800 zdrojaku, ktere maji stejny datum a cas
> (i sve, nejen cizi). Nevim, porad to vidim na SW zalezitost...
Ahoj,
Virus by to mohl byt, jiz z drivejska existuji viry AntiPascal, ktere vsak
zdrojaky bud mazou nebo kompletne prepisou nejakym nesmyslem. Neni to spis
jen legracka nejakeho kolegy ? :-) Potom, pouzivas nejake rozsireni IDE od
jinych firem ?
Petr Vones, amatersky programator
Velikonoce
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 22:58:41
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Algoritmus jsem si neprohlizel, ale nahledem do stredoskolskych
> fyzikalnich tabulek mi vychazi, ze by IMHO mela stacit znalost
> obezne doby synodicke Mesice (29 dni, 12 hodin, 44 minut a 2.8
> vterin), obezne doby Zeme, konkretni polohy v nejakem konkretnim
> case a ze jsou velikonoce prvni nedeli po prvnim uplnku po jarni
> rovnodennosti. Jednoducha zalezitost. :-)
Koukam ze je v tobe i kus astrologa :-)
Petr Vones, amatersky programator
Zahlavi a zapati u sestav v Sinee
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 4.5.2000 23:02:14
Na www.sinea(tec)cz je k dispozici verze 5.39t ze dne 4.5.2000,
ktera umoznuje zarovnat oddil konce sestavy k pate posledni
stranky.
Do konce tydne je jeste casu dost, nejmene 3 dny :-)
Vaclav Krmela
> Autorum komponenty jsem jiz napsal a ti zvazuji moznost teto upravy v dals
i
> verzi. Ovsem muj problem to neresi, ja potrebuji vytvaret pouzitelne faktu
ry
> do konce tydne. Takze pokud nekdo narazil na obdobny problem a povedlo se
mu
> ho vyresit, tak se prosim ozvete
>
> Daniel Fojtik
>
Ukonceni procesu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2000 23:02:58
From: <jof(zv)email(tec)cz>
> Zkousel jsem:
> HWND:=OpenProcess(PROCESS_ALL_ACCESS, True,PID)
> nebo
> HWND:=OpenProcess(PROCESS_QUERY_INFORMATION, True,PID)
> GetExitCodeProcess(HWND,EC)
> TerminateProcess(EC) nebo ExitProcess(EC)
> ale vzdy mi to ukonci moji aplikaci a ne tu,
> kterou ukoncit chci. OpenProcess mi do promene
> HWND vraci nejakou divnou hodnotu (5, 6, 7, ...)
> Kde delam chybu?
Ahoj,
Funkce OpenProcess vraci handle procesu a ne HWND okna. Process nema zadne
"jedinecne" okno, proto je pomerne slozite ziskat handle "okna aplikace"
(alespon o zadnem zpusobu nevim). Lze sice prochazet seznam oken procesu,
ale tak ziskas seznam vsech oken co maji za parenta desktop (coz je u Delphi
IDE hned nekolik oken). Pokud jde o aplikace psane ve VCL, tak se lze jeste
ridit pomoci tridy okna "TApplication", ale u jinych aplikaci toto jiz nelze
pouzit. Urcitym resenim je zaslat zpravu WM_CLOSE vsech viditelnym oknum
daneho procesu (ale ani to neni uplne idealni). O neco podobneho jsem se
snazil v komponente TJvProcessList:
http://www.volweb(tec)cz/pvones/download/JediVCL_Vones_Mirror.zip
Petr Vones, amatersky programator
Mesic
[*] Zdenek Moravec <zmoravec(zv)klet(tec)cz> - 4.5.2000 21:33:44 -0000
Uplne presne nevim - znameni jako astrologicky prezitek nepouzivam. Mam udelane
procedury na vypocet souradnic Mesice na obloze (v jakem je to znameni/souhvezdi
pro me nema vyznam), ktere mohu zaslat. Bylo by mozne upresnit 1. s jakou
presnosti? 2. opravdu znameni a ne souhvezdi?
Zdenek Moravec
Hvezdarna Klet
----- P�vodn� zpr�va -----
Od: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
Komu: Delphi Forum <delphi-l(zv)fwd(tec)cz>
Odesl�no: 4. kv�tna 2000 19:56
P�edm�t: Mesic
Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
Mesic
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 5.5.2000 00:25:56
Cau, ale nerekne mi ve kterym znameni zverokruhu se prave nachazi.
Navic se na tu stranku nemuzu dostat.
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
----- Original Message -----
From: Hurricane <hurricane(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 10:35 PM
Subject: Re: Mesic
> Zdravim
>
> Na www.goocities.com/smidivo je komponenta ktera zobrazuje stav mesice
podle
> zadanyho dne.
>
> Hurricane
> ----- Original Message -----
> From: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
> To: Delphi Forum <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, May 04, 2000 9:56 PM
> Subject: Mesic
>
>
> Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
>
> Zdravi
> Petr Jel�nek - amat�rsk� program�tor
> http://pjmodos.hyperlink(tec)cz
>
>
>FileList
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 5.5.2000 01:01:55
TListView jsem pouzival driv, jenze pokud mu dam aby se zobrazovalo jako
list a ne jako report nemuzu ho vykreslovat tak jak chci (nevihazuje
proceduru ownerdraw).
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 10:56 PM
Subject: Re: FileList
> From: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
> > Sorted nastavit nemuzu, protoze pak nejde serazovat podle velikosti,
data,
> > atd.
>
> Pak mas asi lepsi pouzit TListView kde se da lepsi tridit podle sloupcu a
> data muzes mit ulozena i mimo ovl.prvek.
>
> Petr Vones, amatersky programator
>
>
>Problem s RXLib - trojsky kun ?
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 5.5.2000 07:38:14
Ahoj,
ano, tento problem se mi vyskytl tez v prubehu minuleho mesice (do te doby
jsem pracoval v D2 a po druhe lavine chyb presel na D3). Puvodne jsem
podezrival D2, ze spatne ukoncily Debug operaci a po padu si zapsaly sem tam
neco na disk, kam je napadlo. V te dobe jsem take presel z RXLib 2.60 na
2.75. Virus jsem nikde zadny nenasel, tak jsem usuzoval na soubezne spusteni
Delphi/Outlook97 (podezrival jsem i HW pocitace). Take jsem zpozoroval ze
prelozene programy vykazovaly jistou nestabilitu a musel jsem je vicekrat
prelozit viz. Pri prekladu (Build All) se mi tez nekdy vyskytne Internal
error (prekladam i VCL) a musim prelozit opakovane nebo runtime error v
DCC.DLL. Po restartu pocitace je chvili OK. Balicky nepouzivam . Tento
problem se mi jevi docela jako zakerny, protoze soubory zustavaji stejne
velike a jejich casove razitko je take stejne. problemy jsem objevil az
detailnim porovnanim pomoci utility file compare (FC). Zajimave je, ze byly
poskozeny i nektere DLL a EXE soubory; napriklad i Delphi32.Exe. Prekryl
jsem je verzi z runimage z CD a spravilo se to
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Foldyna Ji�� [SMTP:jiri.f(zv)avizo(tec)cz]
> Odesl�no: 4. V 2000 11:07
> Komu: Delphi konference
> P�edm�t: RE: Problem s RXLib - trojsky kun ?
>
> Ahoj,
>
> mohli bychom prosim Te tuhle diskusi presunout do konference ? Po odeslani
> mailu jsem totiz zjistil, ze nejde jen o RXLib, ale i o jine veci (TMS,
> GXGrid, a to jsem jeste zdaleka neoveril vsechno) a zda se mi, ze by to
> mohl
> byt docela problem - predstav si, ze by to modifikovalo zdrojak tak, ze by
> se nevygenerovala chyba syntaxe - stacilo by zmenit konstantu v
> prirazovacim
> prikazu jiz odladene casti aplikace a vse je v pr.... Rekl bych, ze by se
> to melo objasnit, mne to docela desi, a vic hlav, vic rozumu. Uz jsem
> volal
> na podporu Alwilu i Inprise, ale nikde nic nevedi.
> Pouzivam D5, W2K Prof, Outlook 98, Office 97, nekdy i soubezne, ale snazim
> se tomu vyhnout, protoze i kdyz mam PIII/550+128 MB, tak mam pocit, ze mam
> malo pameti....
> Podarilo se mi casove lokalizovat vznik problemu, muselo se to stat po
> 17.4.2000, protoze mam aplikaci s RXLib buildovanou 16.4.2000 a ta byla
> jeste bez potizi. Kolega vedle mne tenhle problem zatim nema, Outlook s
> Delphi pouziva bezne.
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
>
>
>
> -----P�vodn� zpr�va-----
> Od: Bene� Jaroslav [mailto:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 4. kv�tna 2000 10:23
> Komu: Foldyna Ji��
> P�edm�t: RE: Problem s RXLib - trojsky kun ?
>
>
> Ahoj,
>
> stalo se mi to take (zmena pismenka v identifikatoru, prohozene radky/
> tokeny jako v Tvem pripada aj.) a nejen v RX a hlasilo to spoustu chyb. Z
> tohoto duvodu si udrzuji image knihoven za zipce. A mam Delphi 3.02. Stalo
> se mi to i u Delphi 2 a tak jsem presel na D3 ale stejna situace uz
> nekolikrat nastala i ted. Zjistil jsem, ze se to stava, kdyz soubezne bezi
> i
> Outlook z M$ Off97(zrejme se nejak nesnaseji) a nestava se to vzdy ale
> nahodile (stalo se mi to u Orphea ale i u moji knihovny pro zipovani).
> Stroj
> je s Celeronem 380MHz, 128MB RWM, W98+Plus98,IE5.0, Off97-2 a Delphi 3.02
> nic vic tady nemam instalovano.
> Jaro B.
>
> > -----P�vodn� zpr�va-----
> > Od: Foldyna Ji�� [SMTP:jiri.f(zv)avizo(tec)cz]
> > Odesl�no: 4. V 2000 9:36
> > Komu: Delphi konference
> > P�edm�t: Problem s RXLib - trojsky kun ?
> >
> > Ahoj,
> >
> > narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim
> > jak
> > ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k
> > unitam
> > RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
> > pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib.
> > Chyby
> > vypadaly takhle:
> >
> > {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> > uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
> >
> > cili direktiva {$ENDIF} presunuta na konec radku a tim padem chybi
> > strednik.
> >
> > Problem je v tom, ze jsem do tech zdroju nevrtal, pritom vsechny maji
> > oproti
> > originalnim zdrojum posunute datum na 15.2.2000, cas na 12:50 a jsou o
> dva
> > byte delsi (na konci souboru je pridana sekvence CRLF). Nektere zdroje
> > (napr. RXDBComb, DateUtil, DBUtils, RXTooReg, RXShell aj.) jsou
> > zmodifikovane nasledujicim zpusobem:
> >
> > v RXDBComb
> > ma byt
> > {$IFNDEF RX_D3} DBTables, {$ENDIF} StdCtrls, DBConsts;
> > je
> > {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> >
> > v DateUtil
> > ma byt
> > uses SysUtils, {$IFDEF WIN32} Windows, {$ENDIF} Consts, StrUtils;
> > je
> > uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
> >
> > v RXTooReg
> > ma byt
> > {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, {$ENDIF} HintProp;
> > je
> > {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, HintProp;{$ENDIF}
> > atd.
> >
> > Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z
> 0:27
> > na 1:27), datum zustalo stejne.
> >
> > Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje
> > nejaky
> > trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
> >
> >
> > Ing. Jiri Foldyna
> > mailto:jiri.f(zv)avizo(tec)cz
> >
> > LABELy
[*] Ren� Otisk - 5.5.2000 08:10:27
Hi,
Onehda jsem si s tim hral a clWindow neni totez co clWhite (kor kdyz si
nastavis svoje barvy pro vokna). Pomohlo mi ColorToRGB(clWindow) porovnat s
ColorToRGB(clWhite)
Sroub
----- Original Message -----
From: Hurricane <hurricane(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 9:01 PM
Subject: Re: LABELy
> Ja potrebuju porovnavat dve barvy a kdyz sou STEJNY, tak aby to hodilo
> hlasku, ze sou stejny. Colordialog vraci barvy tak jak sou nadefinovany v
> systemu, tzn. ze kdyz si vyberes bilou, tak ti to nevrati clWhite ale
> clWindow (krom toho, ja mam nastaveny misto hnusny bili sedivou (podle
> windli Silver), zkus to taky, nebolej z toho tak oci). Krom toho mam
pocit,
> ze pokud mas okna bili, tak ti clWindow<>clWhite vrati false protoze
> clWindow je stejna jako clWhite.
>
> Hurricane
>
> ----- Original Message -----
>
> Jeste mala konkretni poznamka k problemu.
> Nemela by se porovnavat primo vlastnost color, protoze napriklad
> clWindow<>clWhite ale oboji je (podle nastaveni systemu) White cili
> nekontrastni.
> Pokud by to melo byt uplne UF bylo by treba urcit nejakou hranici
kontrastu
> pomoci skutecne RGB hodnoty dane barvy.Omezeni pristupu k souboru
[*] Jakub M�lek <malek(zv)ssakhk(tec)cz> - 5.5.2000 08:24:37
Treba pres ten filesystem... Zatim dik.
Jakub Malek
----- Original Message -----
From: Ondrej Krajicek <xkrajic(zv)ics.muni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 27, 2000 8:19 AM
Subject: Re: Omezeni pristupu k souboru
>
> Naprogramovat si vlastni ovladac pro filesystem ?
>
> Ondrej Krajicek
>
> Jakub M�lek wrote:
> >
> > Ahoj,
> > nevi nekdo z vas jak ve win9x zakazat pristup k souboru, disku... Moc
mi
> > to pomuze dik
> >
> > Jakub M�lek
>
> --
> -----------------------------------------------------------
> Ondrej Krajicek mailto:xkrajic(zv)ics.muni(tec)cz
> Institute of Computer Science, Masaryk University Brno
> You probably know who is the dot in .com, but who
> is the dot in (tec)cz ?
> -----------------------------------------------------------
>
Update RXLib pro D4 a CB5
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 5.5.2000 09:25:57
Ahoj,
na http://www.rxlib.com/ je update pro CB5 a reseny problem pri instalaci
pod Delphi 4
Jaro B.Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 5.5.2000 09:48:54
> Mam Delphi 3.02 a tohle se mi nikdy nestalo. Nemas nainstalovany nejaky
> source formator?
Source formatter nepouzivam
> Ten casovy posun bych pricetl na vrub Microsoftu.
> Mam 100% overeno, ze pri prechodu letni/zimni cas nebo obracene
> dojde k posunu casu nekterych (opravdu jen nekterych) souboru o hodinu.
> Alespon u mne s WinNT4 SP6 tomu tak bylo nekolik let za sebou (nez jsem
> to vypnul a cas si upravuju sam) a take se to opakovene stava
> u mnoha nasich zakazniku, kteri nam pak casto volaji.
Nad tim jsem taky uvazoval, ale proc se pustil zrovna do souboru pro Delphi
?
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 5.5.2000 09:50:10
Zdravim
Mno, jediny co bys mohl udelat je stahnout si nejnovejsi virovou databazi a
zkontrolovat si hadr. Jinak preju mnoho uspechu a tvurce vire necht stravi
1248597 dni v pekle. (zamerte se na nejakeho C++ Builderaka)
Problem jsem konzultoval na Alwilu a McAffee, ale o takovem viru nevedi.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Kryptografie v Delphi
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 5.5.2000 09:51:02
Haj hou!
Na www.torry.ru v sekci VCL je skupina pro kryptografii a je tam free
implementace se zdroji vsech zminenych algoritmu + jeste par dalsich (jako
MD5).
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 5.5.2000 09:53:16
Ahoj,
Virus by to mohl byt, jiz z drivejska existuji viry AntiPascal, ktere vsak
zdrojaky bud mazou nebo kompletne prepisou nejakym nesmyslem. Neni to spis
jen legracka nejakeho kolegy ? :-) Potom, pouzivas nejake rozsireni IDE od
jinych firem ?
Petr Vones, amatersky programator
Legracka od kolegy to na 99,99% neni.
Pouzivam GExperts...
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Zoznam tabuliek v ADONIS
[*] Erik Salaj <winsoft(zv)napri.sk> - 5.5.2000 10:18:09
> Ako ziskam zoznam tabuliek pripojenej databazy v ADONIS?
> V ADOExpress na to bola metoda 'TADOConnection.GetTableNames', nedari sa
mi
> ale v ADONIS nic podobne najst.
1. Pomocou ADOX
with ADOXCatalog.ADOXTables do
for i := 0 to Count - 1 do
ShowMessage(Item[i].Name);
2. Pomocou ADOSchema komponentu
ADOSchema.SchemaName := 'Tables';
ADOSchema.Open;
Erik
Cislo sitove karty
[*] Jiri Novacek <JNovacek(zv)spst(tec)cz> - 05.5.2000 11:36:15
Ahoj lidi!
Muze mi nekdo poradit, jak zjistit cislo sitove karty?
Dekuji Jirka
Pouze jedna instance COM objektu ?????
[*] Ond�ej Male�ek - 5.5.2000 12:05:59
Je tim mysleno ve tride zdedene z TComObjectFactory prepsani metody
CreateInstance ?
Ondrej Malecek
----- Original Message -----
From: Alexandr �tefek <alex(zv)mrkev.vabo(tec)cz>
To: <ondrej.malecek(zv)radom-cz(tec)cz>
Sent: Friday, May 05, 2000 10:44 AM
Subject: Re: Pouze jedna instance COM objektu ?????> Muzete nadefinovat vlastni Factory, kde prepisete metodu pro
> vytvareni com objektu. Snad to tak bude stacit.
>
> Alexandr STEFEK
>
>
> >Vazeni,
> >lze nejakym "rozumnym" zpusobem zajistit, aby out of process COM server
> >vytvarel striktne pouze pouze jednu instanci, ktera by byla sdilena mezi
> >vice klienty. Jedna se mi o provoz jak lokalne, tak i DCOM. Dopracoval
jsem
> >se k modelu, kdy server obsahuje dve rozhrani, jedno slouzi k pripojovani
> =>
> >funkce v nem obsazena vraci instanci druheho rozhrani, ktera je vytvarena
> >lokalne v aplikaci serveru a druhe rozhrani je vlastni server. Tohle mi
ale
> >nepripada jako nejvhodnejsi, nebot nelze zabranit vytvoreni dalsi
instance
> >serveru z vnejsku. Dale jsem zkousel implementaci IPersistFile a sdilet
> >pomoci nej instanci serveru, ale narazil jsem na zdrojaky Delphi, kde
> nejsou
> >importovany potrebne struktury z API.
> >
> >Existuje nejaka jina moznost ?
> >
> >Diky
> >
> >
>
velikost Taskbaru
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.5.2000 12:23:17
On 4 May 00, at 22:57, Petr Vones wrote:
> > Podival jsem se do zdrojaku VCL D3, a tam je skutecne u TToolBar
> > property Height default 32;
> > Co je pekna hovadina. V D5 je tato deklarace take, ale narozdil od
> > D3 je v Create nastaveno Height:=29. Height s default hodnotou musim
> > povazovat za bug, protoze to znemoznuje zjistit rozmery komponenty z
> > DFM.
>
> Mozna jsem to nepochopil, ale proc znemoznuje. Pokud je v default
> uvedeno 32 a v konstruktoru se nastavi 29, pak je 29 vzdy (zbytecne)
> ulozeno do DFM:
Pokud nastavis Height na 32 (nebo pouzijes D3), pak bude dany
kus vypadat takto:
> object Form1: TForm1
> object ToolBar1: TToolBar
> Left = 0
> Top = 0
> Width = 536
> Caption = 'ToolBar1'
> TabOrder = 0
> end
> end
Zmizlo Height. Pokud vytahnes z resourcu pouze zapis formulare,
vis houby jak je komponenta vysoka (treba kdys pises Lokalizator,
nebo neco takoveho :) a ani AutoSize ti nepomuze. U standardnich
komponent to lze jeste nejak osetrit (pokud se to verze od verze
nemeni), ale kdyz si nekdo napise neco sveho a udela tam default
na nejaky rozmer, pak jsi v trapu.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Sirka fontu a kurziva
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.5.2000 12:23:17
On 4 May 00, at 22:57, Petr Vones wrote:
> > Chyba neni ani tak v TextWidth, jako spis v API funkcich. Ted
> > prave vytvarim editor pro WideStringy (chce se nekdo pripojit? chci
> > docilit stejne funkcnosti jako ma TMemo a TEdit; v nedavnych
> > odkazech na muj dotaz nic takoveho nebylo, dodatecne diky za ne) a
> > narazil jsem na problem, ze v me konstelaci Woken (cesky, MS Sans
> > Serif) pocita funkce GetTextExtentExPointW spatne sirku ruskych
> > bukvicek - vzdy mi cpe sirku 3. Pokud prehodim prostredi na ruske,
> > je to v poradku.
>
> Zkus pouzit DrawTextEx a do format options dej DT_CALCRECT.
To jsem samozrejme zkusil, ale zase mi to kolidovalo s necim
jinym. :-(
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chybne zobrazovani IV
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.5.2000 12:23:17
On 4 May 00, at 20:54, Ing. Petr Svejda wrote:
> to me teda podrz. Jak to ze ti fo funguje????
>
> vezmeme si trivialni priklad:
>
> 1. pro vyvoj mam nastaveno male pismo (96dpi) - bezna situace
> 2. na novy formular umistim TMemo a do nej napisu 1234567890123456789
> 2a. na fonty vubec nesaham, necham standardni 3. podivam, kde mi TMemo
> zawrapuje vlozeny retezec (do se vejde na prvni radek) 4. prelozim,
> pro kontrolu spustim a ukoncim program a ukoncim Delphi 5. Prehodim si
> velky font (120 dpi) - pocitac me vyzve k resetu Win98 6. po
> opjetovnem spusteni meho programu TMemo vlozeny retezec zarovna jinak
> 7. KDE JE CHYBA A JAKY KOD VLOZIT NA CREATE FORMULARE, ABY TO
> FUNGOVALO?
To bych nevidel jako zavadu. Kdyz se podivas do helpu na Scale, a
dale do TCustomForm.ReadState, tak zjistis, ze pomer se pocita
podle vysky textu, konkretne nuly. Pokud ma zvetseny font trosku
jinou sirku, pak samozrejme muze vzniknout tento rozdil. S tim je
vsak treba pocitat uz pri vyvoji a v "citlivych" oknech je treba pocitat
s urcitou rezervou.
K bodu 7: to by me take zajimalo, protoze vsechny metody, ktere
jsou v okamziku vypoctu pomeru pouzite, jsou neprustrelne a
neprekrytelne (tedy tak, aby to fungovalo s nejakym rozumnym
usilim). Mam na mysli D5, ale ve starsich verzich to bude IMHO
budto obdobne, nebo horsi. Jako urcitou sanci vidim prekryt
TCustomForm.ReadState, ale tak, aby se nepouzil kod z
TCustomForm, ale z TWinControl (coz uz je problem), dale je tam
pouzita private (grrrr, uz me cela private sekce silne drazdi, tedy
vlastne to, jak je prasacky zneuzivana!) promenna FTextHeight,
ktera prave slouzi jako zaklad pro vypocet pomeru. Nenasel jsem
zatim cestu, jak se k ni dostat z potomka TForm, nebo aspon jak
ziskat hodnoty pro vypocet pomeru.
Zde si neodpustim zastourani - nekteri zastupci Borlandu mohou
byt nakloneni tvrzeni, ze, svete div se, hodne uzivatelu VCL pouziva
a jsou s ni spokojeni (obdobne jako s BDE), jenom Hlinka ma
porad nejake kecy. Pokud bych neprogramoval ale pouze mastil
komponenty pres sebe, take bych byl spokojen... :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Velikost kodu
[*] Zapl�k���ͪe�?�Y��̿ - 5.5.2000 13:17:20
Rad bych se zeptal jestli nekdo nevi jak to ve skutecnosti je s velikosti
vysledneho kodu generovaneho Delphi 2. Moje aplikace mela velikost neco
kolem 1,6 mega a najednou po dalsim prelozeni (pridal jsem pouze jeden
Form+ListBox) se to vyhouplo az na 2,2 mega. Muzu nejak optimalizovat tuto
velikost? Celkem me to trapi, protoze se mi zvetsil kod i u jinych aplikaci
ve kterych jsem sice zadny form nepridaval, ale popuzivam spolecnou Unity.
Me by to bylo celkem putna, ale instalacnich disket bych uz mel 8-9 (puvodne
7) a pri kvalite disket se to pomalu stava problemem. Dodavam i na CD, ale z
praxe vim, ze i kdyz ma uzivatel WIN... , nemusi mit zakonite CDecko!!! .
Pripada mi to, jako by se v Delphi generov kod skokove.
dik Zaplik
Problem s RXLib - trojsky kun ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.5.2000 13:43:14
On 5 May 00, at 9:53, Foldyna Ji�� wrote:
> Legracka od kolegy to na 99,99% neni.
> Pouzivam GExperts...
*************************
IMHO to muze byt nejaka knihovna pro Delphi, ke ktere nejsou
kompletni zdrojaky a ktere pouzivate (dll, bpl, ...). Vsichni, kteri
mate obdobne problemy, zkuste takove knihovny vytipovat, a poslat
je do konference. Srovnanim by se IMHO mohl dat najit "vinik".
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
velikost Taskbaru
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 5.5.2000 13:55:25
> Mozna jsem to nepochopil, ale proc znemoznuje. Pokud je v default
> uvedeno 32 a v konstruktoru se nastavi 29, pak je 29 vzdy (zbytecne)
> ulozeno do DFM:
Ja to mozna take nepochopil, ale pokud se default lisi od hodnoty
v konstruktoru, ta prece muze dojit k nezapsani hodnoty (v tomto
pripade 32) protoze je default, ale pri nacteni bude inicializovana
na hodnotu v konstruktoru (29), takze bych to povazoval za bug,
protoze nastavim 32, ulozim a znovu nactu a mam 29. Nezkousel
jsem to a nepovazuji se za odborniha na vcl, jen se podivuji ze se
ty hodnoty mohou lisit.
Daniel
Velikost kodu
[*] voltrr1.epr(zv)mail.cez(tec)cz - 5.5.2000 13:21:34
To je nejak moc..
Nemas nahodou zapnute
Include TD32 debug info
v nastaveni linkeru u projektu ??? Pokud jo tak se ti prilinkovava i source a
pak je to vcelku jasne. Vypnes
to a mas kratkej .exe
Radek
TNMFTP a pocet prenesenych bajtu
[*] Ale� Va���ek�����"q��y�&���w�3 - 5.5.2000 14:33:42
Zdravim,
mam nasledujici problem:
Pouzivam komponentu NMFTP v D5 pro posilani souboru na FTP. Vse je OK, ale
neni moc dobre ze komponenta vola udalost OnPacketSent vzdy az po odeslani
jednoho paketu (coz je sice logicke). V teto udalosti obsluhuju ProgressBar.
A to je kamen urazu, protoze kdyz odesilam male soubory, tak ProgressBar
ukazuje stale jen 100% a nebo skace po "velkych" kusech, coz neni prilis
esteticke. Nedalo by se nejak zaridit, aby ProgressBar ukazoval pocet
prenesnych bajtu nez paketu? Myslim tim na nejake jine udalosti.
Diky Ales.Velikost kodu
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 5.5.2000 14:50:52
Si si isty, ze okrem pridania Formu a listboxu si nic nerobil?
Narast kod o 600kb moze ak tam pridas povedzme reporty, alebo nejaku inu
unitu, i taku ktoru nepotrebuje projekt. Alebo ak si zatrhnes v Delphi
Project Oprions aby sa linkovali aj TD32 debugger info (neviem ako to je
presne u D2).
Dalsia moznost je kompilacia s a bez balickov.
Pavol Kaka�ka
paka(zv)aktis(tec)cz
| Rad bych se zeptal jestli nekdo nevi jak to ve skutecnosti je s velikosti
| vysledneho kodu generovaneho Delphi 2. Moje aplikace mela velikost neco
| kolem 1,6 mega a najednou po dalsim prelozeni (pridal jsem pouze jeden
| Form+ListBox) se to vyhouplo az na 2,2 mega. Muzu nejak optimalizovat tuto
| velikost? Celkem me to trapi, protoze se mi zvetsil kod i u jinych
aplikaci
| ve kterych jsem sice zadny form nepridaval, ale popuzivam spolecnou Unity.
| Me by to bylo celkem putna, ale instalacnich disket bych uz mel 8-9
(puvodne
| 7) a pri kvalite disket se to pomalu stava problemem. Dodavam i na CD, ale
z
| praxe vim, ze i kdyz ma uzivatel WIN... , nemusi mit zakonite CDecko!!! .
| Pripada mi to, jako by se v Delphi generov kod skokove.
|TAnimate
[*] Ale� Va���ek�����"q��y�&���w�3 - 5.5.2000 16:36:16
Zdravim,
nevite nekdo proc ma ve W2000 aviFindFile v komponente Animate rozmery 16x16
bodu? Ve W95/98/NT 4 mela animace rozmery vetsi. Kdyz totiz spustim moji
aplikaci pod W2000, nevypada to moc dobre :-(
Nevite co s tim? Neda se to nejak zvetsit?
Diky, Ales
Chybne zobrazovani V - pakarna
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.5.2000 17:29:30
Ahoj,
mozna si nekteri vzpomenete na moje nedavne stesky po zjisteni
hodnot pro zvetseni dynamicky vkladanych komponent. Zadnou
primou moznost jsem ve VCL nenasel, takze jsem to vyresil
nasledovne. Proceduru lze umistit napriklad do FormCreate. V
procedure se napichnu na resource formulare, v nemz hledam
retezec TextHeight. Pokud ho najdu, zjistim ulozenou hodnotu.
Delal jsem to v D5 a nevim, pro jake verze zpet to bude fungovat.
procedure GetScaleMD(Frm: TForm; var M, D: integer);
// zjisti hodnoty M a D pro ScaleBy
var
HInst, HRsrc: THandle;
ResName: string;
P, F:PChar;
Counter:integer;
StrmSize: integer;
I: Integer;
begin
M:=1;
D:=1;
HInst:=FindResourceHInstance(FindClassHInstance(Frm.ClassType
));
if HInst=0 then HInst:=HInstance;
ResName:=Frm.ClassType.ClassName;
HRsrc:=FindResource(HInst, PChar(ResName), RT_RCDATA);
if HRsrc=0 then Exit;
with TResourceStream.Create(HInst, ResName, RT_RCDATA) do
try
P:=Memory;
StrmSize:=Size;
Counter:=0;
while Counter<StrmSize do
begin
F:=StrPos(P, 'TextHeight');
if F<>nil then
begin
Inc(F, 11);
D:=PByte(F)^;
M:=Frm.Canvas.TextHeight('0');
break;
end else
begin
i:=StrLen(P)+1;
Inc(Counter, i);
Inc(P, i);
end;
end;
finally
Free;
end;
end;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Ukonceni aplikace II
[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 05.5.2000 18:20:11
Mam cizi Win32 konzolovou aplikaci, jeji chovani se da dobre simulovat
treba pomoci programu ftp z Windows, a potreboval bych ji ukoncit z meho
programu. Ve WinNT staci stisknout krizek a zavre se, ve Win98 jeste
nepise hlasku o zavirani DOS okna. Jan na to? Vim jenom ID procesu. Rady
z nedavne diskuse nepomahaji.
Ales
--
Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093
Problem s RXLib - trojsky kun ?
[*] Roman Fiser <rfiser(zv)cmail(tec)cz> - 5.5.2000 19:42:08
Ahoj,
Existuje rada viru, ktere mazou *.pas apod., co se tyce modifikace o zadnem
takovem viru nevim.
Doporucuju zkusit nejaky jiny antivirus treba InoculateIT
(http://antivirus.cai.com), dale pak zkontrolovat registry a start menu,
jestli se tam nepousti neco podezreleho. Ale pokud je to nejaky inteligentni
vir, asi tam nic nenajdete.
----- Original Message -----
From: "Foldyna Ji��" <jiri.f(zv)avizo(tec)cz>
To: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 11:06
Subject: RE: Problem s RXLib - trojsky kun ?
Ahoj,
mohli bychom prosim Te tuhle diskusi presunout do konference ? Po odeslani
mailu jsem totiz zjistil, ze nejde jen o RXLib, ale i o jine veci (TMS,
GXGrid, a to jsem jeste zdaleka neoveril vsechno) a zda se mi, ze by to mohl
byt docela problem - predstav si, ze by to modifikovalo zdrojak tak, ze by
se nevygenerovala chyba syntaxe - stacilo by zmenit konstantu v prirazovacim
prikazu jiz odladene casti aplikace a vse je v pr.... Rekl bych, ze by se
to melo objasnit, mne to docela desi, a vic hlav, vic rozumu. Uz jsem volal
na podporu Alwilu i Inprise, ale nikde nic nevedi.
Pouzivam D5, W2K Prof, Outlook 98, Office 97, nekdy i soubezne, ale snazim
se tomu vyhnout, protoze i kdyz mam PIII/550+128 MB, tak mam pocit, ze mam
malo pameti....
Podarilo se mi casove lokalizovat vznik problemu, muselo se to stat po
17.4.2000, protoze mam aplikaci s RXLib buildovanou 16.4.2000 a ta byla
jeste bez potizi. Kolega vedle mne tenhle problem zatim nema, Outlook s
Delphi pouziva bezne.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav [mailto:JBenes(zv)cpoj(tec)cz]
Odesl�no: 4. kv�tna 2000 10:23
Komu: Foldyna Ji��
P�edm�t: RE: Problem s RXLib - trojsky kun ?
Ahoj,
stalo se mi to take (zmena pismenka v identifikatoru, prohozene radky/
tokeny jako v Tvem pripada aj.) a nejen v RX a hlasilo to spoustu chyb. Z
tohoto duvodu si udrzuji image knihoven za zipce. A mam Delphi 3.02. Stalo
se mi to i u Delphi 2 a tak jsem presel na D3 ale stejna situace uz
nekolikrat nastala i ted. Zjistil jsem, ze se to stava, kdyz soubezne bezi i
Outlook z M$ Off97(zrejme se nejak nesnaseji) a nestava se to vzdy ale
nahodile (stalo se mi to u Orphea ale i u moji knihovny pro zipovani). Stroj
je s Celeronem 380MHz, 128MB RWM, W98+Plus98,IE5.0, Off97-2 a Delphi 3.02
nic vic tady nemam instalovano.
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Foldyna Ji�� [SMTP:jiri.f(zv)avizo(tec)cz]
> Odesl�no: 4. V 2000 9:36
> Komu: Delphi konference
> P�edm�t: Problem s RXLib - trojsky kun ?
>
> Ahoj,
>
> narazil jsem na docela zajimavy problem. Nejak se stalo (skutecne nevim
> jak
> ani kdy, proste to najednou bylo), ze se mi zmenily zdrojove texty k
> unitam
> RXLib. Prisel jsem na to tak, ze jsem potreboval prebuildovat aplikaci
> pouzivajici RXLib a kompilator vyhlasil spoustu chyb, vsechny v RXLib.
> Chyby
> vypadaly takhle:
>
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> cili direktiva {$ENDIF} presunuta na konec radku a tim padem chybi
> strednik.
>
> Problem je v tom, ze jsem do tech zdroju nevrtal, pritom vsechny maji
> oproti
> originalnim zdrojum posunute datum na 15.2.2000, cas na 12:50 a jsou o dva
> byte delsi (na konci souboru je pridana sekvence CRLF). Nektere zdroje
> (napr. RXDBComb, DateUtil, DBUtils, RXTooReg, RXShell aj.) jsou
> zmodifikovane nasledujicim zpusobem:
>
> v RXDBComb
> ma byt
> {$IFNDEF RX_D3} DBTables, {$ENDIF} StdCtrls, DBConsts;
> je
> {$IFNDEF RX_D3} DBTables, StdCtrls, DBConsts;{$ENDIF}
>
> v DateUtil
> ma byt
> uses SysUtils, {$IFDEF WIN32} Windows, {$ENDIF} Consts, StrUtils;
> je
> uses SysUtils, {$IFDEF WIN32} Windows, Consts, StrUtils;{$ENDIF}
>
> v RXTooReg
> ma byt
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, {$ENDIF} HintProp;
> je
> {$IFDEF WIN32} RxNotify, RxGrdCpt, GradEdit, HintProp;{$ENDIF}
> atd.
>
> Ostatni soubory (jine nez *.PAS, *.INC) maji cas posunuty o hodinu (z 0:27
> na 1:27), datum zustalo stejne.
>
> Nemate nekdo tuseni, jak k tomu mohlo dojit, pripadne zda neexistuje
> nejaky
> trojsky kun, ktery by mel spadeno na RXLib nebo zdroje PASCALu ?
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
>
>Chybne zobrazovani
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 5.5.2000 21:32:05
[P��loha v souboru: resfix.ZIP]
Skus se podivat na tuhle komponentu ResolutionFix mela by tebou popsane
problemy vyresit.
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
Mesic
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 5.5.2000 21:32:03
Opravdu potrebuju znameni. Co se tyce presnosti cim vyssi tim lepsi (min. na
Hodiny). Budu rad kdyz mi ty procedury posles na pjmodos(zv)mymail(tec)cz.
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
----- Original Message -----
From: Zdenek Moravec <zmoravec(zv)klet(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 04, 2000 11:33 PM
Subject: Re: Mesic
> Uplne presne nevim - znameni jako astrologicky prezitek nepouzivam. Mam
udelane
> procedury na vypocet souradnic Mesice na obloze (v jakem je to
znameni/souhvezdi
> pro me nema vyznam), ktere mohu zaslat. Bylo by mozne upresnit 1. s jakou
> presnosti? 2. opravdu znameni a ne souhvezdi?
>
> Zdenek Moravec
> Hvezdarna Klet
>
>
> ----- P�vodn� zpr�va -----
> Od: Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz>
> Komu: Delphi Forum <delphi-l(zv)fwd(tec)cz>
> Odesl�no: 4. kv�tna 2000 19:56
> P�edm�t: Mesic
>
>
> Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
>
> Zdravi
> Petr Jel�nek - amat�rsk� program�tor
> http://pjmodos.hyperlink(tec)cz
>
>
>
Problem s RXLib - trojsky kun ?
[*] Bohuslav Svancara <softprojekt(zv)iol(tec)cz> - 5.5.2000 21:47:46
Je bych rekl, ze to na virus nevypada.
Kdybych programoval virus, tak bych se zdrojakem udelal neco, co by
napachalo mnohem vic skody a co by se neprojevilo hned pri prvnim prekladu.
Urcite bych nepsal program, ktery presunuje {$ENDIF} na konec seznamu v
klauzuli uses. Vzdyt unitu s {$IFDEF} v uses ani neni tak moc oproti tem
normalnim...
S pozdravem
Bohuslav Svancara
softprojekt(zv)iol(tec)cz
TFileStream a string
[*] Jirka Trpko� <trpkosj(zv)seznam(tec)cz> - 5.5.2000 22:41:40
Preji pekny den
mel bych takovy problem - mam record
TTyp=record
kod:string;
jmeno:string;
cena:real;
end;
to potrebuju ulozit do souboru, tak pouzivam TFileStream. kdyz zadam stringy takhle, tak to jde v pohode
t.kod:='neco';
t.jmeno:='neco';
t.cena:=55;
f.write(t,sizeof(t))
ale kdyz chci ty stringy nacitat z TEdit.text, tak se mi to nejak rozsype a uz z toho nactu jenom tu cenu.
Muzete mi, prosim, poradit, jak na to ?
Dik a ahoj Jirka
Tabulky
[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 6.5.2000 00:56:53
Nevi nekdo jak vkladat (vytvaret) tabulky do RXRichEdit (verze 2.75 ma podporu pro zobrazeni tabulek, ale vytvaret mi nejdou). Diky vam za pomoc.
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
Mesic
[*] Hurricane <hurricane(zv)email(tec)cz> - 6.5.2000 01:20:32
Zdravim
Znameni zverokrohu si musis dopocitat sam, to je prece porad stejny, a ta
adresa je www.geocities.com/smidivo, kdyby ses na ni podival, mozn by sis
vsimnul, ze sem se preklepnul
Hurricane
----- Original Message -----
Cau, ale nerekne mi ve kterym znameni zverokruhu se prave nachazi.
Navic se na tu stranku nemuzu dostat.
Zdravi
Petr Jel�nek - amat�rsk� program�tor
http://pjmodos.hyperlink(tec)cz
----- Original Message -----
> Na www.goocities.com/smidivo je komponenta ktera zobrazuje stav mesice
podle zadanyho dne.
> Ahoj, nevi nekdo jak vypocitat ve kterym znameni se prave nachazi Mesic?
TAnimate
[*] Hurricane <hurricane(zv)email(tec)cz> - 6.5.2000 01:40:59
Zdravim
A nema to treba property Stretch ? Nastavis na true a mas vyhrano. I kdyz to
mozna bude trosku kostkaty.
Hurricane
----- Original Message -----
> nevite nekdo proc ma ve W2000 aviFindFile v komponente Animate rozmery
16x16
> bodu? Ve W95/98/NT 4 mela animace rozmery vetsi. Kdyz totiz spustim moji
> aplikaci pod W2000, nevypada to moc dobre :-(
>
> Nevite co s tim? Neda se to nejak zvetsit?
inteligentni prohledavani
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.5.2000 02:52:59
Zdravim vsechny.
Shanim inspiraci nebo kousek kodu pro prohledavani respektive porovnavani,
ktere bude ignorovat "bile" znaky a velka/mala pismena a diakritiku.
Tedy napriklad:
"Delphi 5" = "Delphi5" = "Delphi-5" = "DELPHI5" ....
"�e�tina" = "cestina"
Vysledny efekt by mel byt eliminovat pri prohledavani variace kdy pokud dam
vyhledat treba "Celeron 400" a v datech je
vyraz "Celeron-400" nenajde se to.
P�edem d�ky v�em
Lud�k
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
inteligentni prohledavani
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 6.5.2000 08:00:03
> -----P�vodn� zpr�va-----
> Od: L. ZITA [mailto:konference(zv)sales(tec)cz]
> Odesl�no: 6. kv�tna 2000 2:53
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: inteligentni prohledavani
>
>
> Zdravim vsechny.
>
> Shanim inspiraci nebo kousek kodu pro prohledavani respektive
> porovnavani,
> ktere bude ignorovat "bile" znaky a velka/mala pismena a diakritiku.
> Tedy napriklad:
> "Delphi 5" = "Delphi5" = "Delphi-5" = "DELPHI5" ....
> "�e�tina" = "cestina"
> Vysledny efekt by mel byt eliminovat pri prohledavani variace
> kdy pokud dam
> vyhledat treba "Celeron 400" a v datech je
> vyraz "Celeron-400" nenajde se to.
Vyhledej si nejakou komponentu nebo objekt pro praci s regularnimi vyrazy.
Bohuzel nemam zadny odkaz, ale nekde existuje, mam dojem, ze jsem
kdysi nejake videl treba na Delphi Super Page.
Jura
Prepinanie medzi DbGridmi
[*] Ing.Rastislav Banik <banik(zv)svslm.sk> - 06.5.2000 10:39:05
Nazdar
Potrebujem urobit prepinanie medzi DbGridmy. Mam formular NDIChild. Na
nom mam niekolko groupboxov a v kazdom mam jeden grid. Chcem sa madzi
nimi prepinat tabulatorom. Skusal som to cez TabOrder a cez TabStop ale
neslo to. Ked som to robil cez Onclick tak sa mi vzidcky posunul
aktualny zaznam v GBride.
Ako na to ?
Rasto
TFileStream a string
[*] Surfman <surfman(zv)volny(tec)cz> - 6.5.2000 15:17:24
>ale kdyz chci ty stringy nacitat z TEdit.text, tak se mi to nejak rozsype a
uz z toho nactu jenom tu cenu.
Ahoj,
Podivej se na prispevek Petra Vonese z 1.5.2000, subj. Streamy
Pavel
razeni podle abecedy
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 6.5.2000 17:39:17
Zdravim
mam v textovym souboru urcite udaje, napr.
jana
petr
honza
alena
a potrebuju je seradit podle abecedy, poradte jak? jestli je lepsi to mit serazeny uz v tom souboru nebo to radit podle abecedy
az pri vypisu
diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
pohyb pomoci sipek
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 6.5.2000 17:41:56
Zdravim
mam na formulari label, a chci pomoci sipek s nim hybat,
kdyz stiknu sipku do leva label se posune doleva atd.
poradte jak na to
diky moc
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
TFileStream a string
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.5.2000 17:47:15
On 5 May 00, at 22:41, Jirka Trpko� wrote:
> mel bych takovy problem - mam record
>
> TTyp=record
> kod:string;
> jmeno:string;
> cena:real;
> end;
>
> to potrebuju ulozit do souboru, tak pouzivam TFileStream. kdyz zadam
> stringy takhle, tak to jde v pohode
>
> t.kod:='neco';
> t.jmeno:='neco';
> t.cena:=55;
> f.write(t,sizeof(t))
Od D2, pokud mas nastaveny Huge string (a nedoporucuji to
menit), se misto stringu timto zpusobem zapise pouze pointer na
string. Takze je nutno to ukladat pole po poli:
Len:=Length(t.kod);
f.Write(Len, 4);
f.Write(t.kod[1], Len);
...
Cte se to takto:
f.Read(Len, 4);
SetLength(t.kod, Len);
f.Read(t.kod[1], Len);
...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Velikost kodu
[*] Hurricane <hurricane(zv)email(tec)cz> - 6.5.2000 19:35:15
Zdravim
na zacatku unitu je sekce Uses a v ni spousta jednotek. Vsecky, ktery
nepotrebujes smaz. Nap. kdyz na Formu nemas jedinny button, proc bys tam mel
unitu Buttons. Pokud smazes potrebnou, tak ti to bud hodi chybu, ze nemuze
najit tridu (potom to tam zase dopis) a nebo si ji to samo pripise na konec
units.
Hurricane
----- Original Message -----
From: Zapl�k <zaplik(zv)volny(tec)cz>
To: Delphi Konference <delphi-l(zv)fwd(tec)cz>
Sent: Friday, May 05, 2000 1:17 PM
Subject: Velikost kodu
> Rad bych se zeptal jestli nekdo nevi jak to ve skutecnosti je s velikosti
> vysledneho kodu generovaneho Delphi 2. Moje aplikace mela velikost neco
> kolem 1,6 mega a najednou po dalsim prelozeni (pridal jsem pouze jeden
> Form+ListBox) se to vyhouplo az na 2,2 mega. Muzu nejak optimalizovat tuto
> velikost? Celkem me to trapi, protoze se mi zvetsil kod i u jinych
aplikaci
> ve kterych jsem sice zadny form nepridaval, ale popuzivam spolecnou Unity.
> Me by to bylo celkem putna, ale instalacnich disket bych uz mel 8-9
(puvodne
> 7) a pri kvalite disket se to pomalu stava problemem. Dodavam i na CD, ale
z
> praxe vim, ze i kdyz ma uzivatel WIN... , nemusi mit zakonite CDecko!!! .
> Pripada mi to, jako by se v Delphi generov kod skokove.
>
> dik Zaplik
>
>
>
pohyb pomoci sipek
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 6.5.2000 21:18:39
mam na formulari label, a chci pomoci sipek s nim hybat,
kdyz stiknu sipku do leva label se posune doleva atd.
poradte jak na to
Cauec
treba takhle (2 min )
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_LEFT : Label1.Left := Label1.Left - 1;
VK_RIGHT: Label1.Left := Label1.Left + 1;
VK_UP : Label1.Top := Label1.Top - 1;
VK_DOWN : Label1.Top := Label1.Top + 1;
end;
end;
Bye Ludan
razeni podle abecedy
[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 6.5.2000 23:36:03
Ahoj,
zalezi na tom, kam to budes nacitat.
Takovej TStringList ma Sort a ten ti
to srovna sam.
S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Jan
Bachor
Sent: Saturday, May 06, 2000 5:39 PM
To: delphi-l(zv)fwd(tec)cz
Subject: razeni podle abecedy
Zdravim
mam v textovym souboru urcite udaje, napr.
jana
petr
honza
alena
a potrebuju je seradit podle abecedy, poradte jak? jestli je lepsi to mit
serazeny uz v tom souboru nebo to radit podle abecedy
az pri vypisu
diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
Prepinanie medzi DbGridmi
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 7.5.2000 08:34:44
> Nazdar
>
> Potrebujem urobit prepinanie medzi DbGridmy. Mam formular NDIChild. Na
> nom mam niekolko groupboxov a v kazdom mam jeden grid. Chcem sa madzi
> nimi prepinat tabulatorom. Skusal som to cez TabOrder a cez TabStop ale
> neslo to. Ked som to robil cez Onclick tak sa mi vzidcky posunul
> aktualny zaznam v GBride.
> Ako na to ?
>
> Rasto
>
Rasto ked ziska RiadioGroup focus tak ho nepreda komponentam v nom. Ja som
to riesil cez pridanie do OnEnter v kazdom RadioGroup:
SelectNext(ActiveControl,true,true);
Hi. Roland.pohyb pomoci sipek
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 7.5.2000 09:28:01
Ahoj,
jeste doplnim: Form->KeyPreview na True a pokud Ti to bude blikat
(jako ze asi jo), pak Form->DoubleBuffered na True.
Slavek
> treba takhle (2 min )
>
> procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> begin
> case Key of
> VK_LEFT : Label1.Left := Label1.Left - 1;
> VK_RIGHT: Label1.Left := Label1.Left + 1;
> VK_UP : Label1.Top := Label1.Top - 1;
> VK_DOWN : Label1.Top := Label1.Top + 1;
> end;
> end;
>
> Bye Ludan
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Problem s RXLib - trojsky kun ?
[*] Robert Kindl <rob(zv)exec(tec)cz> - 7.5.2000 11:39:24
> > Mam Delphi 3.02 a tohle se mi nikdy nestalo. Nemas nainstalovany nejaky
> > source formator?
>
> Source formatter nepouzivam
Nepouzivam nebo nemam nainstalovany?
Nebo neco podobneho.
Treba GExperts maji jakousi samoopravnou funkci k nahrazovani zapisovanych
slov.
Pritom jiste prochazi zdrojaky a hrabou se do editoru.
Defaultne je zapnuta. Ja si ji vypnul, nebot mi nevyhovovala.
Napada mne tez treba VersionControlSystem...
Nebo nakonec samotne Delphi - take se hrabou primo do uses sekce a ledascos
tam pridavaji
a ktery program je bez chyby, ze?
>
> > Ten casovy posun bych pricetl na vrub Microsoftu.
> > Mam 100% overeno, ze pri prechodu letni/zimni cas nebo obracene
> > dojde k posunu casu nekterych (opravdu jen nekterych) souboru o hodinu.
> > Alespon u mne s WinNT4 SP6 tomu tak bylo nekolik let za sebou (nez jsem
> > to vypnul a cas si upravuju sam) a take se to opakovene stava
> > u mnoha nasich zakazniku, kteri nam pak casto volaji.
>
> Nad tim jsem taky uvazoval, ale proc se pustil zrovna do souboru pro
Delphi?
Ono se mi presnou zavislost kterym souborum to zmeni cas a kterym ne
nepodarilo
vysledovat (mozna proto, ze jsem se az tak moc nesnazil).
Ale mel jsem domnenku, ze to je tim, ze nektere soubory jsem nahral v letnim
obdobi
a nektere v zimnim. Tedy soubory s datem z letniho obdobi to posune o hodinu
v pred.
Rob
Chyba v destroy
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 7.5.2000 18:05:46
Zdravim,
Mam triedu
TOne = class
a,b : integer;
Constructor Create;
Destructor Destroy; Override;
end;
Constructor TOne.Create;
begin
a:=0; b:=10;
end;
Destructor TONe.Destroy;
begin
Inherited Destroy
end;
A ked v programe zavolam (r je typu TOne) r:=TONe.Create; a potom
r.destroy; tak r po zavolani destroy nie je NIL. Ako je to mozne?!?!?!?! To
mi robi s hocijakou triedou TONe je len priklad. Podla mna po zavolani
destroy by mal byt r=nil;
D5, W98
Dik, Miso
TStringGrid - dotaz
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 7.5.2000 22:49:37
Zdravim
mam zas na vas dalsi dotaz
pouziju komponentu TStringGrid, kde si nastavit sirku kolonek, ale vsech
nevim jak nastavit sirku pro kazdou kolonku zvlast, a jak take nastavit font pro kazdou kolonku zvlast
poradte please
predem diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
TMainMenu
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 7.5.2000 22:51:30
Zdravim
jak udelat v MainMenu mezi jednotlivymi castmi nejakou vetsi mezeru, proste je nejak oddelit,
normalne sou porad jedne vedle dtuhe
jako napr.
soubor upravy zobrazit.... atd
a ja bych potreboval
aby treba vlevo byl soubor
a uplne v pravo upravy
jak na to?
poradte please
predem diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
Program ktory tvori program (4)
[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 7.5.2000 23:40:09
No to je zajimava teorie, ale jak se to dela?? Ja bych taky potreboval
predat jeden udaj exaci z jineho exace (tyhle exace nepobezi zaroven a
dokonce ani na tom samem pocitaci), ale nechci, aby mi ho mohl kdokoliv
zmenit (ini a SRD teda asi nepripada v uvahu). Mozna by stacilo, aby to bylo
tezce zmenitelne - nejaky cracker by to urcite dokazal zmenit, ale mne jde o
to, aby to nezmenil prumerny uzivatel.
Snad mi poradite...
Vasek Navrat
> Pochopili, pokud budete menit zdroje PRIMO v exe souboru,
> tak bude vystupem jenom jeden EXE soubor. Taky me napada, ze by
> to slo i jednodussi cestou (napr. jako sfx). Do exe souboru
> si zapisete jeho velikost (cardinal) a ten generator
> pak bude data zapisovat na konec exe souboru. Odtud
> si puvodni exe soubor ty data zase precte.
>
> Ondrej Krajicek
TMainMenu
[*] Tomas Skoda <tomas.skoda(zv)jdsoftware.sk> - 8.5.2000 09:24:24
Ahoj,
osobne som to nikdy nerobil, ale na "swnete" bol o tom
clanok: http://www.swnet(tec)cz/article.php?id=10688
Tomas
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Jan Bachor
Sent: Sunday, May 07, 2000 10:52 PM
To: delphi-l(zv)fwd(tec)cz
Subject: TMainMenu
Zdravim
jak udelat v MainMenu mezi jednotlivymi castmi nejakou vetsi mezeru, proste je nejak oddelit,
normalne sou porad jedne vedle dtuhe
jako napr.
soubor upravy zobrazit.... atd
a ja bych potreboval
aby treba vlevo byl soubor
a uplne v pravo upravy
jak na to?
poradte please
predem diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
Chyba v destroy
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 8.5.2000 09:38:41
Ahoj,
krome toho, ze bys mel radeji volat free nez destroy neni nikde
napsano, ze ukazatel ma byt nasledne nil.
Tohle je spor dvou skupin lidi - jedni rikaji, ze by to melo byt nil,
druzi, ze free ma pouze objekt uvolnit, ale na ukazatel at nesaha.
A my treti jsme smireni s tim ,jak to je. :-) Jen doufam, ze se tu
nezacnete hadat.
Slavek
> A ked v programe zavolam (r je typu TOne) r:=TONe.Create; a potom
> r.destroy; tak r po zavolani destroy nie je NIL. Ako je to mozne?!?!?!?!
> To mi robi s hocijakou triedou TONe je len priklad. Podla mna po zavolani
> destroy by mal byt r=nil;
>
> D5, W98
>
> Dik, Miso
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
ASPACK
[*] Viliam Mlich <vmlich(zv)mbox.vol(tec)cz> - 8.5.2000 09:39:07
Hello All!
Nasiel som jednu spravu, co by mohla objasnit urcite problemy pri pouzivani
pakovanych .EXE suborov:
Autor zobral CALC.EXE z Windows, zapakoval ho a porovnal zahlavia. Dokazuje,
ze ASPACK dava vsetkym sekciam natvrdo atribut R/W. Okrem toho v texte,
ktory som vynechal, upozornuje, ze v dalsich pokusoch zistil, ze ASPACK
neprenasa ani flag IMAGE_SCN_MEM_NOT_PAGED, t.j. v pakovanych .EXE nemozete
mat sekcie so zakazanym swapovanim.
= [15] RU.DELPHI.INFO (2:421/50) =============== RU.DELPHI.INFO ======
Od : Timur Shemsedinov 2:463/482.88 Ned 07 Maj 00
23:48
=============================================
[ text v azbuke zmazany ]
>>> original CALC.EXE <<
Sections: 6 OptHeaderSize: 224 CodeSize: 38912
SizeOfImage: 77824 SizeOfHeaders: 1024
---Sections---
SectionNumber: 1 Name: .text SizeOfRawData: 38912
DataType: CODE, COM_DATA Memory: EXECUTE, READ
SectionNumber: 2 Name: .bss SizeOfRawData: 0
DataType: UNINIT_DATA Memory: READ, WRITE
SectionNumber: 3 Name: .data SizeOfRawData: 6144
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 4 Name: .idata SizeOfRawData: 3072
DataType: INIT_DATA Memory: READ
SectionNumber: 5 Name: .rsrc SizeOfRawData: 5632
DataType: INIT_DATA Memory: READ
SectionNumber: 6 Name: .reloc SizeOfRawData: 4608
DataType: INIT_DATA Memory: DISCARDABLE, READ
>>> EOF <<<>> CALC_.EXE (pakovany ASPACKom): <<<
Sections: 8 OptHeaderSize: 224 CodeSize: 38912
SizeOfImage: 90112 SizeOfHeaders: 1024 ---Sections---
SectionNumber: 1 Name: .text SizeOfRawData: 22528
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 2 Name: .bss SizeOfRawData: 0
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 3 Name: .data SizeOfRawData: 2560
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 4 Name: .idata SizeOfRawData: 2048
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 5 Name: .rsrc SizeOfRawData: 3072
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 6 Name: .reloc SizeOfRawData: 0
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 7 Name: .adata SizeOfRawData: 4608
DataType: INIT_DATA Memory: READ, WRITE
SectionNumber: 8 Name: .udata SizeOfRawData: 0
DataType: INIT_DATA Memory: READ, WRITE
>>> EOF <<<
[ dalsi text v azbuke zmazany ]
* Origin: You better come to the SPEEDY GONZALES... (2:463/482.88)
==============================================================
Bye mailto:vmlich(zv)mbox.vol(tec)cz
V.Mlich http://www(tec)czech-web(tec)cz/~vmlich
TStringGrid - dotaz
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 8.5.2000 09:44:40
Ahoj,
podivej se na:
property RowHeights[Index: Longint]: Integer;
property ColWidths[Index: Longint]: Integer;
tedy StringGrid1.RowHeights [4] := 120; (musis menit OnTheFly)
Co se tyce fontu, musel bys udelat vlastni vykreslovani a tam ten
font menit:
Nastav DefaultDrawing na false a obsluz OnDrawCell
procedure TfrmMain.StringGrid1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
StringGrid1.Canvas.Font.Assign (nejaky_tvuj_font);
StringGrid1.Canvas.TextRect (Rect, 2, 2, StringGrid1.Cells [ACol,
ARow]);
end;
Slavek
> pouziju komponentu TStringGrid, kde si nastavit sirku kolonek, ale vsech
> nevim jak nastavit sirku pro kazdou kolonku zvlast, a jak take nastavit
> font pro kazdou kolonku zvlast
> s pozdravem Johnboy
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Chyba v destroy
[*] Juraj Skotnick� <juraj.skotnicky(zv)jdsoftware.sk> - 8.5.2000 10:16:32
Ahoj,
skus pouzit proceduru FreeAndNil, ktora zrusi objekt a nastavi ukazatel na
nil.
procedure FreeAndNil(var Obj);
Description
Use FreeAndNil to ensure that a variable is nil after you free the object it
references. Pass any variable that represents an object as the Obj
parameter.
Warning: Do not pass a value for Obj if it is not an instance of TObject or
one of its descendants. Juraj
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Michal Hlavac
Sent: Sunday, May 07, 2000 6:06 PM
To: Delphi F�rum
Subject: Chyba v destroy
Zdravim,
Mam triedu
TOne = class
a,b : integer;
Constructor Create;
Destructor Destroy; Override;
end;
Constructor TOne.Create;
begin
a:=0; b:=10;
end;
Destructor TONe.Destroy;
begin
Inherited Destroy
end;
A ked v programe zavolam (r je typu TOne) r:=TONe.Create; a potom
r.destroy; tak r po zavolani destroy nie je NIL. Ako je to mozne?!?!?!?! To
mi robi s hocijakou triedou TONe je len priklad. Podla mna po zavolani
destroy by mal byt r=nil;
D5, W98
Dik, Miso
Chyba v destroy
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 8.5.2000 11:09:10
> krome toho, ze bys mel radeji volat free nez destroy neni nikde
> napsano, ze ukazatel ma byt nasledne nil.
Co potom po zavolani r.destroy (free) r vlastne je. Z pamate je prec. Nie je
NIL. Co je?
> Tohle je spor dvou skupin lidi - jedni rikaji, ze by to melo byt nil,
> druzi, ze free ma pouze objekt uvolnit, ale na ukazatel at nesaha.
> A my treti jsme smireni s tim ,jak to je. :-) Jen doufam, ze se tu
> nezacnete hadat.
To dufam aj ja. Studujem na vysokej skole informatiku a prednasajuci
povedal, ze by to NIL mal byt. Tak som z toho trosku jelen. Ale asi budem
zastanca prvej skupiny.
Miso
Build
[*] Martin Pesava <jimx(zv)volny(tec)cz> - 08.5.2000 11:37:16
Ahoj lidicky, mam jeden problemek v D4Prof. Kdyz si v Project -> Options
-> Version Info nastavim "Include version include information in
Project" a "Auto-increment build number", tak se mi ten Build
neinkrementuje, nevite negdo proc... Dik za pomoc...
--
Martin Pe�ava
/--------------------------------------------------------------\
| Known as JimX on http://www.webchat(tec)cz & http://www.xchat(tec)cz |
| Webmaster of http://miss.misto(tec)cz |
| Email: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/Chyba v destroy
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 8.5.2000 13:15:25
> > krome toho, ze bys mel radeji volat free nez destroy neni nikde
> > napsano, ze ukazatel ma byt nasledne nil.
>
> Co potom po zavolani r.destroy (free) r vlastne je. Z pamate je prec. Nie
je
> NIL. Co je?
>
> > Tohle je spor dvou skupin lidi - jedni rikaji, ze by to melo byt nil,
> > druzi, ze free ma pouze objekt uvolnit, ale na ukazatel at nesaha.
> > A my treti jsme smireni s tim ,jak to je. :-) Jen doufam, ze se tu
> > nezacnete hadat.
>
> To dufam aj ja. Studujem na vysokej skole informatiku a prednasajuci
> povedal, ze by to NIL mal byt. Tak som z toho trosku jelen. Ale asi budem
> zastanca prvej skupiny.
>
> Miso
Vzhledem k tomu, ze nikdo nevi, kolik ukazatelu na tento objekt mas,
je nelogicke, aby byl po free na ukazateli NIL. Ma byt na vsech, nebo jen
na tom, ze ktereho jsi provedl free ?
Radim
TStringGrid a tisk
[*] Jan Bachor <bachor(zv)iol(tec)cz> - 8.5.2000 13:28:54
Zdravim
diky za rady se StringGirdem, a odkaz na ten clanek, jeste jednou diky
ale ted bych potreboval obsah toho StringGridu vytisknout na tiskarne
poradte please jak na to?
predem diky
s pozdravem Johnboy
--------------------------------------------------------------
[ http://web.pinknet(tec)cz/~johnb ]=[ john(zv)iol(tec)cz ]
[ mobil: 0604 575 780 ]=[ icq uin: 31198330 ]
--------------------------------------------------------------
Build
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 8.5.2000 13:59:45
> -----P�vodn� zpr�va-----
> Od: Martin Pesava [mailto:jimx(zv)volny(tec)cz]
> Odesl�no: 8. kv�tna 2000 11:37
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Build
>
>
> Ahoj lidicky, mam jeden problemek v D4Prof. Kdyz si v Project
> -> Options
> -> Version Info nastavim "Include version include information in
> Project" a "Auto-increment build number", tak se mi ten Build
> neinkrementuje, nevite negdo proc... Dik za pomoc...
inkrementuje se pri kazdem build all projects,
ne pri buildu jednoho projektu
Jura
Chyba v destroy
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 8.5.2000 14:04:49
> -----P�vodn� zpr�va-----
> Od: Michal Hlavac [mailto:7hlavac(zv)st.fmph.uniba.sk]
> Odesl�no: 8. kv�tna 2000 11:09
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Chyba v destroy
>
> To dufam aj ja. Studujem na vysokej skole informatiku a prednasajuci
> povedal, ze by to NIL mal byt. Tak som z toho trosku jelen.
> Ale asi budem
> zastanca prvej skupiny.
To je nerealizovatelne (a navic spatne)
Jura
Automaticka aktualizace hintu u tray icon?
[*] Miroslav Flesko <mirek(zv)flesko(tec)cz> - 8.5.2000 15:48:36
Dobry den, nevite (nahodou :-), jak zajistit automatickou aktualizaci hintu
u tray icon, tj. podobne jako kdyz dam mys na ikonu taskbaru, tak se pri
zmene titulku aplikace automaticky aktualizuje ten hint, ale u tray icon
jsem to zatim nevidel... Lze to? Pokud ano, jak?
Dekuji Mirek Flesko
http://flesko(tec)cz
Problem s RXLib - trojsky kun ?
[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 8.5.2000 16:32:32
> > Source formatter nepouzivam
>
> Nepouzivam nebo nemam nainstalovany?
> Nebo neco podobneho.
> Treba GExperts maji jakousi samoopravnou funkci k nahrazovani
> zapisovanych
> slov.
> Pritom jiste prochazi zdrojaky a hrabou se do editoru.
> Defaultne je zapnuta. Ja si ji vypnul, nebot mi nevyhovovala.
>
> Napada mne tez treba VersionControlSystem...
>
> Nebo nakonec samotne Delphi - take se hrabou primo do uses
> sekce a ledascos
> tam pridavaji
> a ktery program je bez chyby, ze?
Ahoj,
tady jsi mozna uderil hlavickou o hrebicek. Zkousel jsem totiz do zdrojaku
projektu vlozit nejake sve myslenky - pridal jsem sekci s podminenym
prekladem, asi takto:
program XY;
uses
Main in 'Unit\Main.pas' {FrameForm},
... tady je asi 80 unit
SData in 'Unit\SData.pas';
{$R *.RES}
begin
try
Application.CreateForm(TFrameForm, FrameForm);
... tady jsou dalsi CreateFormy
Application.CreateForm(TDlg_path, Dlg_path);
{$IFDEF CNO}
^^^^^^^^^^^^
bho := TBasicObj.Create(LogAPN);
Stat := bho.Status;
bho.Free;
{$ELSE}
Stat := HP_OK;
{$ENDIF}
if Stat = HP_OK then
... atd.
Radek oznaceny ^^^^^^^^^^^^^ se po pridani unitu nebo formulare do projektu
z mi neznamych duvodu vymaze a u zbytku zdrojaku se zmrsi odsazeni.
Podobne kousky to dela i po vlozeni a zruseni napr. metody OnClick nejakeho
buttonu, ale ne vzdy. Zatim jsem to povazoval za prkotiny a chybicky rustu a
moc mi to nevadilo, protoze to Delphi delalo pri vyvoji a tim padem jsem na
to hned prisel.
ALE !
Ted mi to vlezlo do odladenych zdroju, ktere jsem neotviral! A to je pruser,
na ktery bych taky nemusel vzdycky prijit, a proto me to silne znervoznuje a
snazim se prijit na pricinu. Bohuzel se mi to zatim nepodarilo zopakovat...
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Chyba v destroy
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 8.5.2000 17:52:36
On 7 May 00, at 18:05, Michal Hlavac wrote:
> Mam triedu
>
> TOne = class
>
> A ked v programe zavolam (r je typu TOne) r:=TONe.Create; a potom
> r.destroy; tak r po zavolani destroy nie je NIL. Ako je to
> mozne?!?!?!?! To mi robi s hocijakou triedou TONe je len priklad.
> Podla mna po zavolani destroy by mal byt r=nil;
Je vhodnejsi volat r.Free.
Zkusme se podivat, co se deje uvnitr. r je nejaka promenna, ktera
hnizdi kdesi v pameti. Kdyz zavolas r:=TOne.Create, pak na jinem
miste v pameti se vytvori instance tridy TOne, a "r" obsahuje pouze
ukazatel na misto te instance. Kdyz zavolas r.Free, pak se zavola
destructor na miste te instance (cili uvolni se alokovana pamet), ale
protoze tam neni zadne prirazeni, vlastni hodnota na miste r se
nemeni. To uz musis obslouzit ty, napriklad takto:
r.Free;
r:=nil;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Problem s RXLib - trojsky kun -
[*] Petr Fejfar <Petr.Fejfar(zv)callnet(tec)cz> - 8.5.2000 18:49:19
Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> wrote:
>Ted mi to vlezlo do odladenych zdroju, ktere jsem neotviral! A to je pruser,
>na ktery bych taky nemusel vzdycky prijit, a proto me to silne znervoznuje a
>snazim se prijit na pricinu. Bohuzel se mi to zatim nepodarilo zopakovat...
IHMO to neni zadny trojsky kun, ale shit jmenem Delphi IDE. Rekl, ze to vsechno souvisi s tim, ze rucne editujes casti zdrojovky, ktere jinak automaticky vytvari IDE napr. vkladanim direktivy do seznamu uses. IDE to totiz nepodporuje a vsechny vlozene direktivy maze, prestoze se honosi tim, ze se jedna o two-way nastroj :-((
Myslim, ze to pravidelne vyvolas, kdy pouzijes v IDE funkci ADD/REMOVE unit/form/... popr. kdyz si otevres .DPR a das save.
Editor v IDE totiz neni co do moznosti kompatibilni s prekladacem :-(((. My jsme to obchazeli tak, ze jsme v .DPR nechali jen kus seznamu uses, zbytek jsme strcili do .INC souboru, tam na nej IDE nemuze. Ma to ale svoje nevyhody: 1) nemuzeme editovat .DPR v IDE tj. moduly vytvarime/pridavame/odebirame rucne 2) nelze browsdat zdrojovymi moduly, protoze k nim IDE neumi najit cestu 3) pokud pouzivas frames, tak ty musi byt v .DPR vcetne jmena tridy v komentari, protoze jinak nepujde nacist form, ktery je pouziva :-(((
bye pf, Petr.Fejfar(zv)callnet(tec)cz
Chyba v destroy
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 8.5.2000 21:24:21
> Vzhledem k tomu, ze nikdo nevi, kolik ukazatelu na tento objekt mas,
> je nelogicke, aby byl po free na ukazateli NIL. Ma byt na vsech, nebo jen
> na tom, ze ktereho jsi provedl free ?
Predsa moze byt hocikolko ukazatelov, ale ked raz ten obekt zmizne, tak je
nenavratne fuc. Tak si myslim, ze by mali by vsetky NIL, pretoze ukazuju na
nieco, co neexistuje. (Subjektivny nazor)
Epilog:
No ale chcem uzavriet tuto debatu. Asi uz moc nema dalej vyznam. Dakujem za
vysvetlenie. Prednasajucu spucujem. A mozte sa pustit do vysvetlovania inych
problemov podobnym nevzdelancom ako som ja.
Te noha, Miso.Designer Hinty + Frame
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.5.2000 22:18:06
From: Pavol Kaka�ka <paka(zv)aktis(tec)cz>
> > vsimol som si, ze ked mam zapnute "Show Designer Hints" tak na normalnych
> > formoch mi nad komponentami Delphi ukazuje hinty uplne v pohode, ale nad
> > frame-ami ;-) NIE. Ze by dalsia "vychytavka" z dielne Borlandov???
>
> Neviem ci som to uviedom presne ale je to na komponentach za designu.
Pravda, Hint se zobrazuje pro cely Frame, ne pro jeho jednotlive komponenty.
Asi si u Borlandu mysli, ze je to tak logictejsi :-)
Petr Vones, amatersky programator
default direktiva (Was :velikost Taskbaru)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.5.2000 22:22:28
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> nebo neco takoveho :) a ani AutoSize ti nepomuze. U standardnich
> komponent to lze jeste nejak osetrit (pokud se to verze od verze
> nemeni), ale kdyz si nekdo napise neco sveho a udela tam default
> na nejaky rozmer, pak jsi v trapu.
To je ale v poradku, default je prece od toho, aby se do DFM neukladaly
zbytecne hodnoty vlastnosti, ktere se nezmenili od hodnoty definovane
v konstruktoru objektu. Ja vim, ze pro Lokalizator se ti to nehodi :-),
ale pro VCL je to dost dulezite, protoze pak by se jeste vice zvetsovaly
DFM.
Petr Vones, amatersky programator
Prepinanie medzi DbGridmi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.5.2000 22:22:53
From: Ing.Rastislav Banik <banik(zv)svslm.sk>
> Potrebujem urobit prepinanie medzi DbGridmy. Mam formular NDIChild. Na
> nom mam niekolko groupboxov a v kazdom mam jeden grid. Chcem sa madzi
> nimi prepinat tabulatorom. Skusal som to cez TabOrder a cez TabStop ale
> neslo to. Ked som to robil cez Onclick tak sa mi vzidcky posunul
> aktualny zaznam v GBride.
Ahoj,
nastav u DBGridu v Options dgTabs na False.
Petr Vones, amatersky programator
razeni podle abecedy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.5.2000 22:22:48
From: Jan Bachor <bachor(zv)iol(tec)cz>
> mam v textovym souboru urcite udaje, napr.
> jana
> petr
> honza
> alena
Ahoj,
Muzes to udelat napriklad takhle:
procedure TForm1.Button3Click(Sender: TObject);
var
SL: TStringList;
begin
SL := TStringList.Create;
try
SL.LoadFromFile('soubor.txt');
SL.Sort;
// tady mas jiz polozky setridene, muzes je priradit treba do TMemo
Memo1.Lines.Assign(SL);
finally
SL.Free;
end;
end;
Petr Vones, amatersky programator
ASPACK
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.5.2000 22:23:23
From: Viliam Mlich <vmlich(zv)mbox.vol(tec)cz>
> Autor zobral CALC.EXE z Windows, zapakoval ho a porovnal zahlavia. Dokazuje,
> ze ASPACK dava vsetkym sekciam natvrdo atribut R/W. Okrem toho v texte,
Ahoj,
Pokud vim, tak problem vsech techto 'packu' je to, ze vicemene znemoznuji
sdileni fyzickych dat, takze ve svem vysledku pak kod zabira daleko vice
mista nez kdyby toto nebylo pouzito. Nemluve o mozne nespolehlivosti ci
"pridane hodnote" v podobe viru a podobne. Take by mne zajimalo jak se to
vyporada s pouzitim bound importu, ktery umoznuje zrychlit zavadeni DLL.
Mimochodem, zkousel nekdo pouzit utilitu BIND (kterou dodava MS ke svym
nastrojum) na EXE soubory z Delphi ?
> ktory som vynechal, upozornuje, ze v dalsich pokusoch zistil, ze ASPACK
> neprenasa ani flag IMAGE_SCN_MEM_NOT_PAGED, t.j. v pakovanych .EXE nemozete
> mat sekcie so zakazanym swapovanim.
Otazka je jak casto se tento flag pouziva. Ve Windows\System jsem nasel
jediny takovy soubor (DXAPI.SYS)
Petr Vones, amatersky programator
Automaticka aktualizace hintu u tray icon?
[*] Hurricane <hurricane(zv)email(tec)cz> - 8.5.2000 23:00:35
Zdravim
To myslis tak, �e nad TrayIconou je my��tko a tud� vyskocenej Hint. Mezitim
se nekde v programu Hint zmen� a ty chce� aby se zmenil i ten vyskocenej
hInt. Neco jako be��c� text v Hintu? Nejspi� bude� muset volat neco jako
Repaint, ale je dost mo�n�, �e ti to bude blikat.
Winamp to tak m�. Zkus napsat do NullSoft, jestli by ti dali n�vod :-)))
Hurricane
----- Original Message -----
> Dobry den, nevite (nahodou :-), jak zajistit automatickou aktualizaci
hintu
> u tray icon, tj. podobne jako kdyz dam mys na ikonu taskbaru, tak se pri
> zmene titulku aplikace automaticky aktualizuje ten hint, ale u tray icon
> jsem to zatim nevidel... Lze to? Pokud ano, jak?
Record TmwPrintOptions
[*] Hurricane <hurricane(zv)email(tec)cz> - 8.5.2000 23:06:57
Zdravim
Kdysi sem se ptal, jak donutit mwCustomEdit tisknout. Shodou n�hod sem se k
tomu dostal a� te� a narazil sem na probl�my s polo�kami Recordu
TmwPrintOptions.
TmwPrintOptions = record
SelectedOnly: boolean;
Highlighted: boolean;
WrapLongLines: boolean;
IgnoreColors: boolean;
Copies: integer;
MarginUnits: TmwMarginUnits;
Margins: TRect;
PrintRange: TRect;
Title: string;
Header: TStringList;
Footer: TStringList;
end;
Pot�ebuju v�d�t, co znamenaj� polo�ky IgnoreColors, PrintRange,
Title, Header, Footer.
PrinRange je v demu mw nastaveno na Rect(0, 0, 0, 0) a p�esto to tiskne, co
to znamen� ?
Title bude nejsp�e titulek str�nky, ale pro� se to neh�d� s Headerem? Krom
toho se ten text p�i�azenej k Title nikde nevytiskne.
Header a Footer vim co d�laj, ale nevim, jak a jestli jde ud�lat, abych m�l
dva z�znamy v jednom ��dku. Kdy� pou�iju
Header.AddObject(FilNam, TObject(hfaCenter));
Header.AddObject(DateToStr(now)+' '+TimeToStr(now),TObject(hfaRight));
tak mi to to datum posad� o ��dek dol�. Jde to n�jak ud�lat ?
A co znamen� IgnoreColors m� u� nenapad�.
D�ky
Hurricane
ScreenSaver
[*] Hurricane <hurricane(zv)email(tec)cz> - 8.5.2000 23:15:01
Zdravim
Vnit�n� struktura Saveru je stejn� jako Execu. Proto by m�lo sta�it ten Exe
p�ejmenovat na scr a hotovo. Jenom si je�t� mus� o�et�it, aby se ten
program choval jako �et�i�, tzn. abys to dovolil Windlim lehce schodit, kdy�
si �eknou
Hurricane
----- Original Message -----
M�m je�t� jeden dotaz. Nev�te n�kdo jak se d� v Delphi vytvo�it �et�i� pro
Win9x.
D�ky Petr.