Archív konference Delphi

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

Jak poslat msg do conslole app

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 25.10.2001 19:45:11

> Zdravim.
> Mam konsolovou aplikaci kterou spustim v davkovem souboru a ktera dela asi
> toto :
>
> Na zaklade ParamStr(1) posle message hlavni widowsovske aplikaci, ktera
> provadi nejake operace s daty.
> Tohle mi funguje bez potizi.
> No a ja bych potreboval do ni doplnit prijem messages, kterymi mi posila
ta
> hlavni aplikace informace o prubehu zpracovani a nakonec po ukonceni
> zpracovani mi posle priznak pro ukonceni programu a davka bude pokracovat
> dal.
> Cili jak zjistit handle tehle konsolove app (dal by se rovnou predavat v
> LParam odesilane zpravy) a jak message vybec prijmout.

muzes prece vytvorit okno (skryte), ktere bude obsluhovat zpravy. Nebo muzes
posilat zpravy primo libovolnemu bezicimu threadu (pak staci v threadu jen
realizovat cteci smycku)

> Zkousel jsem i pridat DataModule, ale ani pro DataModul jsem nenasel
zpusob
> jak zpracovat zpravu.
> Form nebo normalni app nechci pouzit, protoze pri maximalizovanem DOS okne
> potom preblikava okno do win.

Pomoci Win API vytvoris okno, jeho handler na zpravy a je to...

D. Toman


ISO normy (was Re: SYNAPSE: String to OID ?)

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 25.10.2001 19:50:06



> > je k tomu treba parser jazyka ASN.1 (specifikace je ISO norma a je k
> > dispozici jen za penize napriklad zde: www.iso.ch, fuj...). Fakt
> > miluju RFCka, ktera se odkazuji na volne nedostupne definice.
> *****Ne vzdy je treba normu kupovat. Krome obcasne dostupnosti
> na VS a universitach je moznost podivat se do ISO norem v Praze
> kousek od Biskupsky ulice (tusim, ze se to jmenuje Biskupsky
> Dvur). Tam je knihovna, kde Ti _na miste_ (tedy nesmi se vynaset
> ven) normu zapujci za 5-10 Kc a muzes studovat, delat si vypisky
> apod. Pokud norma jiz neni ,,platna``, za poplatek Ti ji i ofoti. Mivaji
> jak originaly, tak v pripade existence CSN ISO i tuto.

k tomu mam jen tyto poznamky:
- kdyz neco hledam pomoci PC na Internetu, je dost mrzute, kdyz to
nenajdu v kratkem case.
- do Prahy to mam 160km a pochybuju, ze nase knihovny jsou
schopny nabidnout pozadovany dokument on-line po Internetu.

D. Toman


Tedit

[*] V�t Jur�sek - konference <delphi(zv)obecpohori(tec)cz> - 25.10.2001 20:17:04

[P��loha v souboru: V�t Jur�sek.vcf]
Jak udelat, abych u komponenty tedit po kliknuti nedostal kontextove menu?

respektive nevite nekdo o nejake jednoduche komponentne jako Tedit, ktera by
umoznovala vlozeni jednoho radku textu a nepodporovala kontextove menu ani
oznacovani textu do bloku?

predem diky za info

VJ


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


Program jako slu�ba ve Win95/98

[*] V�clav ��ha <vaclav_riha(zv)softconsult(tec)cz> - 25.10.2001 20:31:52

Mam Delphi 3 a potreboval bych vytvorit program, ktery nebezi na spodni
liste, ale v jeho prave casti jako mala ikona.

Ma nekdo navod jak to zaridit?

Dik, Vaclav Riha

vaclav_riha(zv)softconsult(tec)cz

Tlac roznych tlacovych zostav zo Sinei.

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 25.10.2001 21:13:51

> From: Roland Turcan
>
> Potreboval by som vytlacit, zobrazit viac typov tlacovych zostav. Napr.
> Pripravim polozky na uhrady pre prevodne prikazy, ale typ prevodnych
> prikazov moze byt:
> 1. tuzemnky
> 2. zahranicny
>
> samozrejme ma kazdy typ iny formular.
>
> Ja aby som nemusel do cyklu vykonavat vsetky tlace, ale by som vykonal
> nejaku pripravu vsetkych typov a oni by sa nakoniec tvarili ako jedna
> zostava.

Toto je presne ukol pro komponentu TCompositeReportSinea.
Ve verzich X.39 je jeste tato komponenta nefunkcni,
ale od verze X.40 jiz bude tato komponenta pouzitelna.

Vaclav Krmela


Vsechny soubory v jednom

[*] Tom Lebr <tom.lebr(zv)volny(tec)cz> - 25.10.2001 22:06:25

Dobry den,

zkuste ZipTV, http://www.ziptv.com/

Jak bali Arj, RAR nebo Ace se oficialne nevi, cili zadne komponenty na
kompresi by existovat nemely

Zip archivy se daji pouzit i pouze pro ukladani, bez komprese, v praxi to
pouzivaly starsi verze Javy. Tam je pak prochazeni dost jednoduche - podle
katalogu, ktery je umisteny na konci archivu.

Tom L.

----- Original Message -----
From: "Va#ek N�vrat" <engine(zv)ropacek(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, November 24, 2001 6:13 PM
Subject: Vsechny soubory v jednom


> Zdravim!
>
> Potrebuju poradit, protoze stojim pred ukolem a nevim, jak ho vyresit.
>
> Predstavme si, ze mame nekolik mensich souboru (treba 100 souboru po 30
kB).
> Uzivatel z nich chce udelat jeden vetsi. Potud v pohode - dala by se
pouzit
> nejaka komponenta na komprimaci. Ale ted nastane problem. Program bude
> chvilkama nektere z techto souboru potrebovat (asi tak 3 - 4 najednou),
ale
> neni mozne je vsechny rozbalit. Z toho velkeho souboru se musi jen vybrat
ty
> soubory, ktere se zrovna budou potrebovat a z tech rovnou cist, v nehorsim
> pripade jen tyto soubory docasne rozbalit na HDD. Umim napriklad pracovat
s
> UnRar.dll a ta funguje tak, ze projizdi vsechny soubory v archivu soubor
po
> souboru a bud rozbali nebo necha tak. Vzhledem k tomu, ze program bude na
> CD-ROM, mel by pekne svizne chodit i na pomalejsich CD-ROMkach (treba
> 4rychlostnich) a nejlepe vubec nepouzit HDD, tohle neprichazi v uvahu.
Navic
> neexistuje zadna komponenta, ktera by umela balit ve formatu RAR.
>
> Takze se na vas obracim s prosbou o radu, co pouzit, abych se vyhnul
> popisovanym komplikacim.
>
> Dikes
> Vasek
>
>

Delphi feature nebo moje blbost ??

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 00:35:32

From: <tomsir1.edu(zv)mail.cez(tec)cz>
> OK, takze nadefinuju datovy modul, vlozim do nej TDatabase a nejake TQuery
> a prilinkuju ho k programu. Jak potom dam pri jednotlivych dll vedet ze,
> maji pouzit prave tento modul

Ahoj,

prelozit vse s balicky a predat datamodul, TDatabase nebo TQuery jako parametr
volani funkce v DLL.

Petr Vones


Jak poslat msg do conslole app

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 26.10.2001 01:41:31


----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, November 25, 2001 7:45 PM
Subject: Re: Jak poslat msg do conslole app


> > Zdravim.
> > Mam konsolovou aplikaci kterou spustim v davkovem souboru a ktera dela
asi
> > toto :
> > Zkousel jsem i pridat DataModule, ale ani pro DataModul jsem nenasel
> zpusob
> > jak zpracovat zpravu.
> > Form nebo normalni app nechci pouzit, protoze pri maximalizovanem DOS
okne
> > potom preblikava okno do win.
>
> Pomoci Win API vytvoris okno, jeho handler na zpravy a je to...

Ahoj.
Zkousel jsem vytvorit minimalizovane okno, ktere jsem ihned dal "hide", ale
presto dostalo na chvilicku focus a tim padem preblikla obrazovka z DOSu do
windows a zpet. Jak se toho zbavit ?

Ludek


ADO Connection string

[*] Erik Salaj <winsoft(zv)stonline.sk> - 26.10.2001 01:41:29

> ma ADO Connection string nejaka pevna pravidla, jak ma vypadat a
> z ceho se sklada, nebo se jedna pouze o nahodny retezec?
> Existuje o tom nejaky clenak na internetu?

je to zavisle na OLEDB providerovi, ADO pouziva 5 parametrov:
Provider, File Name, Remote Provider, Remove Server a URL.
Ostatne posiela priamo providerovi. Niektore parametre maju
(podobne) providery obvykle rovnake ale zalezi na providerovi.
Viz. MSDN http://msdn.microsoft.com pripade MDAC SDK
http://www.microsoft.com/data

Erik

Tedit

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 26.10.2001 01:44:49


----- Original Message -----
From: "V�t Jur�sek - konference" <delphi(zv)obecpohori(tec)cz>

> Jak udelat, abych u komponenty tedit po kliknuti nedostal kontextove menu?
>

Ahoj.
Sice to neni vubec elegantni, ale staci tomu editu priradit prazdne
PopupMenu a je hotovo.


Ludek


Autoinkrement v MS Accesse

[*] REZN�CEK David <reznicek(zv)jakl(tec)cz> - 26.10.2001 06:24:15

Tak tohle fungovat nebude. Pokud je pole v Accesssu integer a je v nem
ulozena hodnota
tak nelze zmenit jeho typ na autoinkrement.

Tak vytvor novou tabulku ve smycce udelej insert na pozadovany pocet a
potom drop tabulky.

-----Original Message-----
From: Petr Kejval [mailto:petr.kejval(zv)worldonline(tec)cz]
Sent: Sunday, November 25, 2001 3:49 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Autoinkrement v MS Accesse


Ahoj,
zkus nejprve nastavit pole v MS Access datab�zi m�sto autoincrement na
integer, zapsat 17, ulozit a pak pole integer znovu nastavit jako
autoincrement. Snad to bude fungovat. Nem�m moznost to zkusit, protoze
na
dom�c�m poc�taci nem�m MS Access.
Petr
----- Original Message -----
From: Peter Vlkovic <vlkovic(zv)minv.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, November 23, 2001 5:17 PM
Subject: OT: Autoinkrement v MS Accesse


> Ahoj,
>
> potrebujem naimportovat nejake data do prazdnej tabulky
> v MS Accesse. Jedno z poli je typu AutoIncrement.
>
> Da sa nejak zaistit, aby mi autoinkrement cisloval
> od konkretneho cisla (napr. od 1)?
>
> Vdaka za radu.
>
> Vlkovic
>


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.298 / Virov� b�ze: 161 - datum vyd�n�: 13.11.2001


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

Program jako slu�ba ve Win95/98

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2001 06:36:07

To neni sluzba, ale pouze zobrazeni ikony v Tray misto na hlavni
liste.
Staci dat treba na www.torry.ru hledat slovo "tray" a vypadne spousta
odkazu na hotove komponenty

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

25.11.2001 V�clav ��ha:
> Mam Delphi 3 a potreboval bych vytvorit program, ktery nebezi na spodni
> liste, ale v jeho prave casti jako mala ikona.

> Ma nekdo navod jak to zaridit?

> Dik, Vaclav Riha

> vaclav_riha(zv)softconsult(tec)cz

VSF - zmena bitmapy za behu

[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 26.10.2001 07:02:26

ahoj,
ve svem programu pouzivam Varian Skin Factory. Potrebuji vymenit
skiny za behu, ale ne pomoci predepsanych funkci. Mam jednotlive
bitmapy a potrebuji je nacist do TVsComposer

Neco jako:
VsComposer1.Graphics[0].LoadFromStream(RSSKIN_data[0]);
VsComposer1.Graphics[1].LoadFromStream(RSSKIN_data[1]);

ve streamu mam pochopitelne patricnou bitmapu. Kdyz to takto nahraju
v oncreate formu, tak se mi misto bitmap zobrazuje "bile nic".
Zkousel jsem po akci zavolat repaint (refresh), ale nepomaha to.
Podle me bude problem mozna s GraphicName - nebo zustava puvodni a
meni se jen samotna bitmapa???

Budu vdecny za jakoukoli radu.

PS: funguje nekomu VsComposer1.GetGraphicNames(Form1.Memo1.Lines)?

S pozdravem Milan Cizek, amatersky programator, D5,D6 Ent (UP1)
Win2k (SP2,Pre-SP3) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ:
59826637

______________________________________________________________________
Jak poslat rukou psan� text na mail? P�ece faxem Panasonic!
http://www.panasonic(tec)cz/redirect.html


prehladavanie textovych suborov

[*] Roman Budinec <roman(zv)ttc-telecom.sk> - 26.10.2001 08:07:10

Nazdar,

robim funkciu pre globalne vyhladavanie v mailovom klientovi a mala by
zahrnat aj prehladavanie pripojenych textovych suborov. Okrem cistych
textov aj .doc, .xls, .pdf, ...
Akym sposobom, podla moznosti co najjednoduchsim, mozem prehladat tieto
dokumenty a zistit ci sa urcity retazec v subore nachadza, alebo nie.
Ako vysledok mi staci boolean true/false (pozicia nie je podstatna).

Roman

Nastroj pro spravu IB databaze

[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 26.10.2001 08:20:33


Jan Sebel�k wrote:
>
> > Odes�latel: Martin Burle <mburle2(zv)volny(tec)cz>
> > IB expert je myslim dost dobry
> Ja si taky myslim, ze IBConsole je skoro nepouzitelna.
> Jenom jsem rekl, ze i tak to lze prekousnout.
>
> > Jak to? Mel jsem za to, ze char zabira v zaznamu 1-32767 byte?
> Nerad bych hlasal bludy.
> Podle meho soudu jak char, tak i varchar zabere v zaznamu "aktualnidelka+1" bytu.

Ano, CHAR i VARCHAR jsou v DB ulozeny v min. mozne delce, pri prenaseni
po siti jsou ale prenaseny v definovane delce :-(

Tom

=================================

Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic

e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446


Balicky

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 26.10.2001 08:26:03

> prelozit vse s balicky a predat datamodul, TDatabase nebo TQuery jako
> parametr volani funkce v DLL.
>

Ahoj,

pri praci s balicky jsme narazili na celkem zajimavou nectnost.
Chci se zeptat, zda delam neco spatne a jako to delat lip. Jde o to,
ze vytvorim aplikaci s balicky v nejake verzi Delphi, distribuuji a pak
se objevi service pack na Delphi. Pokud si ho nainstaluji a budu
chtit udelat nejakou upravu do stavajici aplikace, budu mit problem,
protoze potrebny balicek s VCL se zmenil. Jak se to resi?

David Lebeda


TClientSocket a C++ Builder

[*] Miroslav_Cipel(zv)rubena.cgs(tec)cz - 26.10.2001 08:30:12

>A pak jsou ty funkce Connect a Error spatneho
>typu, zaprve to musi byt metody objektu a za druhe budou mit nejake
>parametry viz help o TSocketNotifyEvent a TSockerErrorEvent.
>Honza +
a jak to tedy ma byt spravne ?

M.

Tlacenie textu na tlaciaren s nejakym sklonom

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 26.10.2001 08:39:47

mam pocit ze nez se provede Printer.BeginDoc tak v Printer.Canvas.Handle je
pouze nejaky pametovy handle ktery nikam nic nekresli a tepr az po BeginDoc
se vytvori odkaz na tiskarnu, takze to nastaveni je potreba udelat az po nem


> procedure TForm1.Button3Click(Sender: TObject);
> var
> lf : TLogFont;
> tf : TFont;
> begin
> with Printer.Canvas do begin
> Font.Name := 'Arial';
> Font.Size := 24;
> tf := TFont.Create;
> try
> tf.Assign(Font);
> GetObject(tf.Handle, sizeof(lf), (zv)lf);
> lf.lfEscapement := 450;
> lf.lfOrientation := 450;
> tf.Handle := CreateFontIndirect(lf);
> Font.Assign(tf);
> finally
> tf.Free;
> end;
> end;
> Printer.BeginDoc;
> Printer.Canvas.TextOut(50, 180, 'Rotated Text!');
> Printer.EndDoc;
>
> end;

Balicky

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 26.10.2001 09:08:22

V tom pripade distribuujes i zmenene balicky.> > prelozit vse s balicky a predat datamodul, TDatabase nebo TQuery jako
> > parametr volani funkce v DLL.
> >
>
> Ahoj,
>
> pri praci s balicky jsme narazili na celkem zajimavou nectnost.
> Chci se zeptat, zda delam neco spatne a jako to delat lip. Jde o to,
> ze vytvorim aplikaci s balicky v nejake verzi Delphi, distribuuji a pak
> se objevi service pack na Delphi. Pokud si ho nainstaluji a budu
> chtit udelat nejakou upravu do stavajici aplikace, budu mit problem,
> protoze potrebny balicek s VCL se zmenil. Jak se to resi?
>
> David Lebeda
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


ShellExecute a Print

[*] Zden�k Sv�en - 26.10.2001 09:17:15

Ahoj,

pokousim se tisknout HTML dokument ze sve aplikace. K tomuto ucelu jsem
pouzil TWebBrowser nasledovne:

WebBrowser.ControlInterface.ExecWB(OLECMDID_PRINT,
OLECMDEXECOPT_DONTPROMPTUSER, vaIn, vaOut);

Funguje to, ale je potreba, aby WebBrowser byl viditelny, jinak se to
nevytiskne.

Ted tedy chci pouzit jinou metodu:

ShellExecute(Handle, 'print' , jmenosouboru.htm , '' , '', SW_SHOWNORMAL);

Funguje to krasne, ale pred samotnym tiskem se objevi dialog tiskarny, kde
sa da vybrat pocet kopii, ktere stranky se maji tisknout, lze vyvolat
nastaveni tiskarny ... doufam, ze je trochu jasny, kterej dialog mam na
mysli.
Ja ale chci rovnou tisknout bez zobrazeni toho dialogu. Za pouziti
TWebBrowseru tohle zaridilo pouziti OLECMDEXECOPT_DONTPROMPTUSER.

Muzu pomoci ShellExecute vytisknout HTML dokument, aniz by se cokoliv
zobrazovalo, proste je tisk ?

Diky za nasmerovani

Z.S.

Delphi a indexy.cdx

[*] Slavom�r �eke# - 26.10.2001 09:27:43

Mam databazu dbf a k nej indexovy subor cdx, dokaze to Delphi prebrat a
precitat ?

Slavo


TPrinter; tisk na mm

[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 26.10.2001 09:33:18

Cau,
jak vytisknu na tiskarnu text na pozici zadanou v mm ?
Chci na to pouzit TextOut. V cem se zadava poloha x,y a jak ji ziskat z milimetru a dpi tiskarny ?

dik Ladap


Tlacenie textu na tlaciaren s nejakym sklonom - VY

[*] Slavom�r �eke# - 26.10.2001 09:34:40

Zdravim ... takze po nejakom case som to vyriesil, ale aj tak vdaka za
napady :)

takze aby ste z toho aj vy cosi mali:

Nasledujuci kod klasika na tlacenie plus vola procedurku, ktora sa pohra
s fontom a pripravy mi ho tak ako chcem. Procedurka je celkom na konci
tohto mailika a vola sa RotarePrintFont(Uhol);
Taaakze to by bolo vsetko ... vela zdaru cafko

Slavo

procedure TForm1.Button1Click(Sender: TObject);
var SaveFont: TFont;
begin
if PrintDialog1.Execute then
begin
Printer.BeginDoc;
SaveFont := TFont.Create;
try
SaveFont.Assign(Printer.Canvas.Font);
RotatePrintFont(StrToInt(ComboBox1.Text)*10);
Printer.Canvas.TextOut(500,500,'Skusobny Texticek');
Printer.Canvas.Font.Assign(SaveFont);
finally
SaveFont.Free;
end;
Printer.EndDoc;
end;
end;


procedure TForm1.RotatePrintFont(Uhol: Integer);
var
LogFont: TLogFont;
begin
with Printer.Canvas do
begin
with LogFont do
begin
lfHeight := Font.Height;
lfWidth := 0;
lfEscapement := Uhol;
lfOrientation := lfEscapement;
lfWeight := FW_NORMAL;
lfItalic := 0;
lfUnderline := 0;
lfStrikeOut := 0;
lfCharSet := ANSI_CHARSET;
StrPCopy(lfFaceName, Font.Name);
lfQuality := PROOF_QUALITY;
lfOutPrecision := OUT_TT_ONLY_PRECIS;
lfClipPrecision := CLIP_DEFAULT_PRECIS;
lfPitchAndFamily := Variable_Pitch;
end;
end;
Printer.Canvas.Font.Handle := CreateFontIndirect(LogFont);
end;

Ktery je den

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 26.10.2001 09:39:58

Zdravim,
dostal jsem se do svizele, jak zjistim podle data, ktery je den
v tydnu? Prosim, spesne ...

Balicky

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 26.10.2001 09:40:12

> Ahoj,
>
> pri praci s balicky jsme narazili na celkem zajimavou nectnost.
> Chci se zeptat, zda delam neco spatne a jako to delat lip. Jde o to,
> ze vytvorim aplikaci s balicky v nejake verzi Delphi,
> distribuuji a pak
> se objevi service pack na Delphi. Pokud si ho nainstaluji a budu
> chtit udelat nejakou upravu do stavajici aplikace, budu mit problem,
> protoze potrebny balicek s VCL se zmenil. Jak se to resi?

Asi hovoris o Delphi 6 Update 1, ktory bol v tomto smere nestastny:
runtime balicky sa skutocne zmenili. :-(
Predtym sa to nestavalo; dufam, ze to bol iba omyl a nie zaciatok trendu.
V tomto pripade budes potrebovat distribuovat nove balicky.

TOndrej


Code Completion

[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 26.10.2001 09:40:12

Zdravim ucastniky konference.
V D6 je implemntovano 'kontextove' dokoncovani kodu po stisku klaves
Ctrl+Space. V dusledku chybneho zapisu do registru Windows pri instalaci je
to nefunkcni. Presne zduvodneni lze nalezt v clanku Briana Longa na adrese
http://community.borland.com/article/0,1410,27913,00.html
Existuje k tomu oprava ve forme Delphi projektu, o kterem se zde jiz
zminoval P. Vones, byt ponekud v jine souvislosti. Odkaz na stazeni
opravneho projektu je v uveden v clanku s podrobnym navodem k postupu. Pokud
nekdo neuspeje se stazenim, mohu mu zaslat pres soukromy mail clanek i
projekt. V komprimovane forme ma oboji dohromady 47 kB.

Ing. Jan Dvorak

Ktery je den

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 26.10.2001 09:57:05

DayOfWeek(Date: TDateTime): integer {SysUtils}

> -----P�vodn� zpr�va-----
> Od: Rumcajs [mailto:prajz.rumcajs(zv)quick(tec)cz]
> Odesl�no: 26.11.2001 09:40
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Ktery je den
>
>
> Zdravim,
> dostal jsem se do svizele, jak zjistim podle
> data, ktery je den
> v tydnu? Prosim, spesne ...
>

Ktery je den

[*] Gallina Luk� <lukas.gallina(zv)cz.danzas(tec)com> - 26.10.2001 10:03:20

Ahoj

(SysUtils)

function DayOfWeek(Date: TDateTime): Integer;

Tyden zacina Nedeli (1), konci Sobotou (7).

S pozdravem
Luk�# Gallina
DANZAS a.s. (fili�lka Brno)
ITOS
lukas.gallina(zv)cz.danzas.com
tel.: +420 604 226 812


----- Original Message -----
From: "Rumcajs" <prajz.rumcajs(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: 26. listopadu 2001 9:39
Subject: Ktery je den


> Zdravim,
> dostal jsem se do svizele, jak zjistim podle data, ktery je
den
> v tydnu? Prosim, spesne ...
>

Sluzba v NT/2000 podruhe

[*] <bejcek(zv)centrum(tec)cz> - 26.10.2001 10:05:56

Ahoj kluci,nikdo nereaguje tak to zkusim znova. Potrebuji svuj
program zaradit do sluzby Windows 2000(tj. aby se spoustel
bez vedomi uzivatele jeste pred prihlasenim),nevite nekdo jak na
to?

Kurna parek ani guruove P+P(Petr Vones a Petr Zahradnik) ci
nemame tu spiona od MS?:-)))))))))

Dekuji moc za kazdy tiiiiip

Aldik Pavel
D5 Ent W2000=20


-----
Nov� vyhled�va� pro �esk� internet www.webfast(tec)cz - prost� najde ...

Delphi a indexy.cdx

[*] �EZN��EK David - 26.10.2001 10:07:39

Komponenta TTable to dokaze, pokud tam nemas slozene indexy (ze dvou
poli apod.)

-----Original Message-----
From: Slavom�r #eke� [mailto:cekel(zv)noves.sk]
Sent: Monday, November 26, 2001 9:28 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Delphi a indexy.cdx


Mam databazu dbf a k nej indexovy subor cdx, dokaze to Delphi prebrat a
precitat ?

Slavo

---
Po�choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


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

TPrinter; tisk na mm

[*] daniel.hrna(zv)sme(tec)cz - 26.10.2001 10:10:04

Mam doma na to funkci, odzkouseno, poslu ale az zitra.

D.

-----Original Message-----
From: Parizsky Ladislav [mailto:Ladislav.Parizsky(zv)access-it(tec)cz]
Sent: Monday, November 26, 2001 9:33 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: TPrinter; tisk na mm


Cau,
jak vytisknu na tiskarnu text na pozici zadanou v mm ?
Chci na to pouzit TextOut. V cem se zadava poloha x,y a jak ji ziskat z
milimetru a dpi tiskarny ?

dik Ladap


Delphi feature nebo moje blbost ??

[*] tomsir1.edu(zv)mail.cez(tec)cz - 26.10.2001 10:11:17


Hm ... principialne jsem to asi pochopil, ale presto to nechce fungovat :O
(

Jestli to chapu spravne, v aplikaci pridam DataModul, do nej vlozim
TDatabase a nadefinuju pro nej AliasName a DatabaseName. Protoze chci
dosahnout toho, aby se aplikace k db serveru hlasila jen pri inicializaci,
nastavim Connected na true a LoginPrompt na false.

Do funkce z dll pridam do parametru jeste patrametr napr. DM:TDataModule
...

A ted :

moje funkce v dll vytvari formular, na kterem je umistena komponenta TQuery
.... co a jak musim nastavit pred prvnim volanim TQuery.Open ??
Bude se mi pri volani TQuery.Open zobrazovat Login dialog ??


Diky Radek
"Petr Vones" <pvones(zv)mbox.vol(tec)cz>(zv)clexpert(tec)cz on 26.11.2001 00:35:32

Odpov�zte pros�m - delphi-l(zv)clexpert(tec)cz

Odesl�no k�m: delphi-l-owner(zv)clexpert(tec)cz


Komu: <delphi-l(zv)clexpert(tec)cz>
Kopie:
P�edm�t: Re: Delphi feature nebo moje blbost ??


From: <tomsir1.edu(zv)mail.cez(tec)cz>
> OK, takze nadefinuju datovy modul, vlozim do nej TDatabase a nejake
TQuery
> a prilinkuju ho k programu. Jak potom dam pri jednotlivych dll vedet ze,
> maji pouzit prave tento modul

Ahoj,

prelozit vse s balicky a predat datamodul, TDatabase nebo TQuery jako
parametr
volani funkce v DLL.

Petr Vones


Sluzba v NT/2000 podruhe

[*] voltrr1.epr(zv)mail.cez(tec)cz - 26.10.2001 10:13:12



> program zaradit do sluzby Windows 2000(tj. aby se spoustel
> bez vedomi uzivatele jeste pred prihlasenim),nevite nekdo jak na
> to?

Mas dve moznosti :

1. Podivat se po necem jako SrvAny (takovej programek od MS ktery se
soucasti Resource Kitu k NT4 a umoznuje spoustet normalni EXE jako service)
2. Preprogramovat to do formy sluzby - na to lze pouzit bud framework od
Borlandu (soucast verzi 5+ (nejsem si jisty zda to neni i ve 4ce)) nebo si
najit jiny. Ja napr. uspesne (viz Pripadova studie CEZ ,a.s. El.Prunerov na
webu Borlandu) pouzivam jeden uz od verze 2 a je funkcni k plne
spokojenosti. Pocitej ale s tim ze programovani services je trochu jine nez
"tahani komponent" a znalost threadu je nutnost a znalost API vyhodou

Zatim cus,
Radek Voltr

Existuje BatchMove v IB?

[*] <delphi(zv)zvlauto.sk> - 26.10.2001 10:15:06

Alebo sa da nejakym sposobom nahradit? Ako

Vdaka.

Sluzba v NT/2000 podruhe

[*] Gallina Luk� <lukas.gallina(zv)cz.danzas(tec)com> - 26.10.2001 10:21:37

Ahoj,
pokud jej nemas napsany jako sluzbu, muzes jej do sluzeb pridat pomoci
nejakeho nastroje z ResourceKitu (najdes to ke stazeni na Microsoftu),
pripadne jej muzes spoustet pri startu Windows zaznamem v registru v klici
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run pro cely
stroj nebo pro jednotliveho uzivatele (pri Logonu) v klici
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run.

S pozdravem
Luk�# Gallina
DANZAS a.s. (fili�lka Brno)
ITOS
lukas.gallina(zv)cz.danzas.com
tel.: +420 604 226 812


----- Original Message -----
From: <bejcek(zv)centrum(tec)cz>
To: "Delphi" <delphi-l(zv)clexpert(tec)cz>
Sent: 26. listopadu 2001 10:05
Subject: Sluzba v NT/2000 podruhe


Ahoj kluci,nikdo nereaguje tak to zkusim znova. Potrebuji svuj
program zaradit do sluzby Windows 2000(tj. aby se spoustel
bez vedomi uzivatele jeste pred prihlasenim),nevite nekdo jak na
to?

Kurna parek ani guruove P+P(Petr Vones a Petr Zahradnik) ci
nemame tu spiona od MS?:-)))))))))

Dekuji moc za kazdy tiiiiip

Aldik Pavel
D5 Ent W2000=20


-----
Nov� vyhled�va� pro �esk� internet www.webfast(tec)cz - prost� najde ...

Canvas.TextWidth

[*] Zden�k Sv�en - 26.10.2001 10:22:31

Jestli mas font nastaven na MS SANS SERIF (SYSTEM, apod.), tak ten ma myslim
nejmensi moznou velikost fontu 8.
Tedy zmensovat mu velikost lze, ale nema to zadny ucinek.

>
> Ahoj vsem
>
> Mohl by mi prosim nekdo vysvetlit proc nefunguje nasledujici kousek kodu?
> Canvas totiz stale vraci stejnou hodnotu :-(
>
> while Canvas.TextWidth(Text)> 100 do
> Canvas.Font.Size := Canvas.Font.Size-1;
>
> Predem mockrat diky za pomoc.
>
> Jirka
>
>

Sluzba v NT/2000 podruhe

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.10.2001 10:25:47



> Ahoj kluci,nikdo nereaguje tak to zkusim znova. Potrebuji svuj
> program zaradit do sluzby Windows 2000(tj. aby se spoustel
> bez vedomi uzivatele jeste pred prihlasenim),nevite nekdo jak na
> to?
>

No, v soucasne dobe je dokumentace a examplu (v delphi) okolo
tohohle problemu volne na Internetu tolik, ze staci se zeptat na
www.google.com.

navic Delphi od D5 v sobe maji podporu pro psani services (program
musi byt od
zacatku psan s podporou services - jiz hotovy program nepredelas - lze
ho pouze obalit
pomoci srvany a spol ale to neni spolehlive).


Zdravi
D. Toman

CGI Aplikacia

[*] Slavom�r �eke# - 26.10.2001 10:31:06

Zdravim ... mam taky zaciatocnicky problem, chcem si vytvorit CGI
aplikaciu, tak si dam generovat "CGI Stand-alone executable" projekt, to
mi vytvori project + unit, a moja otazocka znie, kde mam a co napisat,
aby sa mi pri spusteni tato aplikacia vypisala napr. nejaky textik ....
uff hadam pochopite otazku :) Vopred dakujem za rychlu odpoved :)

Slavo


Jak poslat msg do conslole app

[*] Zden�k Sv�en - 26.10.2001 10:39:11

> Ahoj.
> Zkousel jsem vytvorit minimalizovane okno, ktere jsem ihned dal
> "hide", ale
> presto dostalo na chvilicku focus a tim padem preblikla obrazovka
> z DOSu do
> windows a zpet. Jak se toho zbavit ?

Primo v *.dpr nastav jeste pred create toho okna
Application.ShowMainForm:=False;

Kontakty MS Outlook

[*] Vakoni� Pavol <vakonic(zv)tyory.sk> - 26.10.2001 10:58:30

Ahoj,

existuje nejaky sposob "zdielania" kontaktov MS Outlook 2000 pripadne MS Outlook 97 ?
(nacitat meno, tel cislo, fax a pod.)

Dakujem za tipy.

Palo

D5 Ent., W2000 US SP2


OT: Re: ISO normy (was Re: SYNAPSE: String to OID

[*] Roman Toda <toda(zv)digitaldocuments.org> - 26.10.2001 10:58:26

Normy byvaju vacsinou velmi drahe takze ich volna dostupnost je
nemyslitelna - je to v duchu hesla "Za kvalitne vedomosti sa plati" ale
kupit si ju prostrednictvom internetu a studovat doma na PC je ina vec - to
by mohlo fungovat. Ovsem ruku na srdce. Uzivilo by sa to tu?

Roman

----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, November 25, 2001 7:50 PM
Subject: Re: ISO normy (was Re: SYNAPSE: String to OID ?)>
>
> > > je k tomu treba parser jazyka ASN.1 (specifikace je ISO norma a je k
> > > dispozici jen za penize napriklad zde: www.iso.ch, fuj...). Fakt
> > > miluju RFCka, ktera se odkazuji na volne nedostupne definice.
> > *****Ne vzdy je treba normu kupovat. Krome obcasne dostupnosti
> > na VS a universitach je moznost podivat se do ISO norem v Praze
> > kousek od Biskupsky ulice (tusim, ze se to jmenuje Biskupsky
> > Dvur). Tam je knihovna, kde Ti _na miste_ (tedy nesmi se vynaset
> > ven) normu zapujci za 5-10 Kc a muzes studovat, delat si vypisky
> > apod. Pokud norma jiz neni ,,platna``, za poplatek Ti ji i ofoti. Mivaji
> > jak originaly, tak v pripade existence CSN ISO i tuto.
>
> k tomu mam jen tyto poznamky:
> - kdyz neco hledam pomoci PC na Internetu, je dost mrzute, kdyz to
> nenajdu v kratkem case.
> - do Prahy to mam 160km a pochybuju, ze nase knihovny jsou
> schopny nabidnout pozadovany dokument on-line po Internetu.
>
> D. Toman
>
>

Ktery je den

[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 26.10.2001 11:11:45

DecodeDate (date, rok, mesic, den, den_v_tydnu)

v den_v_tydnu vraci poradi dne v tydnu, kdy 0 je
nedele. Jinak doporucuji help, kde to najdete a
overite si, zda jsem nepopletl poradi parametru.

S pozdravem J&K

----- Original Message -----
From: "Rumcajs" <prajz.rumcajs(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, November 26, 2001 9:39 AM
Subject: Ktery je den


> Zdravim,
> dostal jsem se do svizele, jak zjistim podle data, ktery je
den
> v tydnu? Prosim, spesne ...
>
>

TChartAxisTitle already exists

[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 26.10.2001 11:18:52

Zdravim vsechny,
mam problem s aplikaci, ktera je prelozena s balicky.
Mam EXE a DLL. DLL obsahuje komponentu TChart. Pri nahrani DLLky
do pameti se ukaze chybova zprava:
TChartAxisTitle already exists VCL50.bpl.

Tusite nekdo kde je problem?
NT 4.0, Delphi 5.01

Libor


Delphi a indexy.cdx

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2001 11:24:30

26.11.2001 �EZN##EK David:
>> Mam databazu dbf a k nej indexovy subor cdx, dokaze to Delphi prebrat a
>> precitat ?

> Komponenta TTable to dokaze, pokud tam nemas slozene indexy (ze dvou
> poli apod.)

Typ tabulky na ttFoxPro
K tem indexum, ani tak nevadi slozene indexy, jako spis pouziti FoxPro
funkci v indexu. napr. Index On SubStr(Name, 2, 10) Tag Klic apod.

V tomto pripade je pak nutno pristupovat pres ODBC driver

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


TPrinter; tisk na mm

[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 26.10.2001 11:49:40

Trochu sem si stim pohral a funguje to pouze na tiskarne s dpi 120x144 pokud to hodim na dpi 600x600 pak to je o nekolik mm posunute. Za funkci budu vdecny.

pouzil jsem:

poziceX:= pozicemm * dpiX / 25.4

na nic jineho jsem neprisel.
Jeste poddotaz, jak programove nastavit velikost papiru ?

Ladap

>>> daniel.hrna(zv)sme(tec)cz 26.11. 2001 10:10:04 >>>
Mam doma na to funkci, odzkouseno, poslu ale az zitra.

D.

-----Original Message-----
From: Parizsky Ladislav [mailto:Ladislav.Parizsky(zv)access-it(tec)cz]
Sent: Monday, November 26, 2001 9:33 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: TPrinter; tisk na mm


Cau,
jak vytisknu na tiskarnu text na pozici zadanou v mm ?
Chci na to pouzit TextOut. V cem se zadava poloha x,y a jak ji ziskat z
milimetru a dpi tiskarny ?

dik Ladap


OT viry

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 12:21:43

From: "VALIK" <valentapat(zv)volny(tec)cz>
> nainstalujte si IE5.5 on to zachyti.

Ahoj,

presneji IE5.5 SP2:
http://www.microsoft.com/windows/ie/downloads/recommended/ie55sp2/default.asp

Jinak neni spatne se prihlasit do Microsoft Product Security Notification
Service http://www.microsoft.com/security/services/bulletin.asp kde pak chodi
oznameni o nejnovejsich chybach a opravach, takze lze temto vecem pomerne vcas
predejit.

Petr Vones


Chyba v IDAPI32.dll

[*] kuchar(zv)unicodesys(tec)cz - 26.10.2001 12:22:18

caute,
ve svem programu presypavam velke mnozstvi dat z foxky do MSSQL7, vse slape
ale po nejakaem case mi to zahlasi chybu v IDAPI32.DLL, presypavani delam
pomoci
table2.BatchMove(table1,batcopy) kde tabulky table1 a table2 jsou pripojena
pres prislusna ODBC, ale kdyz ten samej program se stejnymi daty spustim na
vykonove slabsim stroji, kteremu uz od pohledu je vydet ze skvari procesor,
tak ta chyba nenastane, je mozne aby vznikala chyba jenom na vykonejsich
strojich, nebo ze by na tech strojich knihovna nestihala ?

----------------------------------------------------------------------------
-------------
Ing. J�n Kuch�r, PhD.
Unicode Systems s.r.o.
Rusk� 14, T�eb�� 674 01
mobil : 0605469102
e-mail: kuchar(zv)unicodesys(tec)cz


Balicky

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 12:32:07

From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> pri praci s balicky jsme narazili na celkem zajimavou nectnost.
> Chci se zeptat, zda delam neco spatne a jako to delat lip. Jde o to,
> ze vytvorim aplikaci s balicky v nejake verzi Delphi, distribuuji a pak
> se objevi service pack na Delphi. Pokud si ho nainstaluji a budu
> chtit udelat nejakou upravu do stavajici aplikace, budu mit problem,
> protoze potrebny balicek s VCL se zmenil. Jak se to resi?

Ahoj,

v tomto pripade budes muset distribuovat nove balicky. Neninstaluj je do
systemoveho adresare Windows ale do adresare kde je tvoje aplikace (disky uz
jsou dnes dost velke, takze v tom neni problem). S tim je spojen i dalsi casty
problem s velikosti souboru. V zadnem pripade nepouzivej ruzne "exepaky",
protoze tohle je naprosta katastrofa, ale zkomprimuj je jen pro instalaci.

Petr Vones


Chyba v IDAPI32.dll

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 12:34:39

From: <kuchar(zv)unicodesys(tec)cz>
> pres prislusna ODBC, ale kdyz ten samej program se stejnymi daty spustim na
> vykonove slabsim stroji, kteremu uz od pohledu je vydet ze skvari procesor,
> tak ta chyba nenastane, je mozne aby vznikala chyba jenom na vykonejsich
> strojich, nebo ze by na tech strojich knihovna nestihala ?

Ahoj,

predpokladam ze oba dva pocitace nemaji uplne tutez konfiguraci (napriklad
verze ODBC apod.) O databaze se nezajimam, ale mam takove tuseni ze v MS SQL
je nejaky nastroj pro prevod databazi. Urcite bych se snazil vyhnout BDE.

Petr Vones


Neinstalujte QuickReport 3.5 Standard pro Delphi 6

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 13:09:18

Ahoj,

chci vas timto varovat pred instalaci QR 3.5 Std pro Delphi 6. Tato verze
obsahuje 'drobnou' chybu. Nepujde vam totiz potom prelozit zadna aplikace
ktera pouziva QuickReport komponenty a dostanete chybu ze nelze najit soubor
DesignInft.pas (v runtime kodu !). Toto je zcela fatalni chyba (u QuSoftu se
asi jeste nenaucili psat komponenty) a jejich "oprava" ktera nabada k pridani
cesty do ToolsAPI adresare je zcela nesmyslna (nehlede k tomu ze i naprosto
jasne porusuje licencni podminky). Dale je dobre vedet, ze po odinstalaci
tohoto updatu se vam neobnovi puvodni verze QucikReportu, ale budete jej muset
rucne zkopirovat z instalacniho CD.

Petr Vones


Ktery je den

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 26.10.2001 13:12:15

Napoveda u D5Ent rika toto:

DecodeDate procedure

Returns Year, Month, and Day values for a TDateTime value.
The DecodeDate procedure breaks the value specified as the Date parameter
into Year, Month, and Day values. If the given TDateTime value is less than
or equal to zero, the year, month, and day return parameters are all set to
zero.

Doporucuji si ji precist.

Martin

> -----Puvodni zprava-----
> Od: Ji�� Kratochv�l [mailto:jiri.kratochvil(zv)webzin(tec)cz]
> Odeslano: 26.11.2001 11:12
> Komu: delphi-l(zv)clexpert(tec)cz
> Predmet: Re: Ktery je den
>
>
> DecodeDate (date, rok, mesic, den, den_v_tydnu)
>
> v den_v_tydnu vraci poradi dne v tydnu, kdy 0 je
> nedele. Jinak doporucuji help, kde to najdete a
> overite si, zda jsem nepopletl poradi parametru.
>
> S pozdravem J&K


TPrinter; tisk na mm

[*] Radim Kunz <privat(zv)casestudio(tec)com> - 26.10.2001 13:23:34



SetMapMode(Printer.Handle,MM_LOMETRIC);

Tim prepnes metriku tiskarny a kazda jednotka bude 0.1 mm.
Pak napr. na pozici 10mm , 20mm budes tisknout
Printer.Textout(100,200,'xxx');

Radim


----- Original Message -----
From: "Parizsky Ladislav" <Ladislav.Parizsky(zv)access-it(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, November 26, 2001 9:33 AM
Subject: TPrinter; tisk na mm


Cau,
jak vytisknu na tiskarnu text na pozici zadanou v mm ?
Chci na to pouzit TextOut. V cem se zadava poloha x,y a jak ji ziskat z
milimetru a dpi tiskarny ?

dik Ladap

Ktery je den

[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 26.10.2001 13:23:44

> Napoveda u D5Ent rika toto:
> DecodeDate procedure
> Returns Year, Month, and Day values for a TDateTime value.
> The DecodeDate procedure breaks the value specified as the Date parameter
> into Year, Month, and Day values. If the given TDateTime value is less
than
> or equal to zero, the year, month, and day return parameters are all set
to
> zero.
Mate pravdu, omlouvam se za svou chybu. No, nikdo nejsme neomylni :))
Ovsem diky za info.

> Doporucuji si ji precist.
Jiz jsem svou neznalost napravil.

Jirka


TChartAxisTitle already exists

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 13:27:36

From: "Libor Filip" <filip(zv)agrokonzulta(tec)cz>
> mam problem s aplikaci, ktera je prelozena s balicky.
> Mam EXE a DLL. DLL obsahuje komponentu TChart. Pri nahrani DLLky
> do pameti se ukaze chybova zprava:
> TChartAxisTitle already exists VCL50.bpl.

Ahoj,

patrne si nepouzil TChart runtime balicek (v EXE i DLL) ale zkompiloval jsi
kod TChart do kazdeho souboru zvlast.

Petr Vones

dbf to wab

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 13:33:34

From: "Rumcajs" <prajz.rumcajs(zv)quick(tec)cz>
> Jelikoz se mi nedostalo odpovedi, zeptam se jeste jednou; jak mam prevest
> zaznamy z databaze do souboru typu wab (Microsoft adressbook). Doporu�en�
> komponenta od Petra Vonese toto nesplnuje (puoziva sice soubor WAB, ale

Ahoj,

komponenta ? To je pouze prepsana cast demo aplikace od Microsoftu. Pokud
chces komponentu tak existuje abfWAB:
http://www.abfsoftware.com/products/abfWAB/index.html

Petr Vones


Nastroj pro spravu IB databaze

[*] Rado Benc <bego(zv)pobox.sk> - 26.10.2001 13:36:34

Ahojte,

> >Spocitam si, kolik prace venuji implementaci databaze (nemluvim
> o analyze)
> a porovnam to s tim, >co musim vyrabet na klientovi.
> >I kdybych praci s databazi zdvojnasobil, stejne je to zlomek
> toho, s cim se
> musim prudit na >klientovi.
>
> To je fakt, nicmene je to ponekud nepohodlne. IB expert je myslim dost
> dobry. Char(30)->Char(10) ovsem nezvladne. To byl samozrejme jen priklad,
> obvykle je to naopak.

Pred par mesiacmi bol v ib-support liste thread o tychto utilitach - rec
bola prave o IBExpert. Pisal tam uplakany developer velkeho projektu,
ktoremu po niekolkych mesiacoch vyvoja zacala zrazu padat databazova
aplikacia - rozne neocakavane chybove hlasky, "nevysvetlitelne" ukazy
apod.

Po par dnoch sa prislo na to, ze chyba nie je v Interbase, ale niekde inde.
Tieto utility vykonavaju mnohe zasahy do systemovych tabuliek, co nie su
prave ciste tahy. A hlavne to robia bez vedomia uzivatela - developera.
Pri pouzivani tychto programov - a teda priamych zasahoch do systemovych
tabuliek - odporucam maximalnu opatrnost, vedlajsie efekty su tazko
predvidatelne.

Vyskusal som niekolko podobnych utilit a uz neverim ani IBConsole. Jedine,
co u mna funguje uspokijivo je isql a rychle prsty :-).

FWIW,

Rado


____________________________________
P. S. V. P. U.
http://www.pobox.sk/

Ktery je den

[*] Jan N�mec�����݊G^##b�dz�## - 26.10.2001 13:40:02

A co funkce DayOfWeek???

>Zdravim,
> dostal jsem se do svizele, jak zjistim podle data,
>ktery je den
>v tydnu? Prosim, spesne ...

System invisible

[*] Mali <Malecek(zv)gymhu.ipex(tec)cz> - 26.10.2001 13:51:19


Jak udelam aplikaci ktera pri behu neni videt pri ALT+CTRL+DEL.
A jak ji pak zase muzu najit ( treba i jinou ).

viry

[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 26.10.2001 14:20:54

From: "VALIK" <valentapat(zv)volny(tec)cz>
> mozna ze o tom ti lidi ani nevi. ale
> opakovane mi chodi viry od lidi v konferenci.
> naposledy od hostinsky(zv)teska(tec)cz
> nainstalujte si IE5.5 on to zachyti.

Toto nestaci, zalezi na subverzi IE.5.5.xxxx. Pretoze i starsie 5.5 s tym
maju problemy je treba sosnut z netu co najaktualnsi update.

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Nastroj pro spravu IB databaze

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 26.10.2001 14:57:29

From: "Rado Benc" <bego(zv)pobox.sk>
> Po par dnoch sa prislo na to, ze chyba nie je v Interbase, ale niekde
inde.
> Tieto utility vykonavaju mnohe zasahy do systemovych tabuliek, co nie su
> prave ciste tahy. A hlavne to robia bez vedomia uzivatela - developera.
> Pri pouzivani tychto programov - a teda priamych zasahoch do systemovych
> tabuliek - odporucam maximalnu opatrnost, vedlajsie efekty su tazko
> predvidatelne.

Presne tak preto je dobre po zmenach v strukture robit backup/restore
databaze.

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

Canvas.TextWidth

[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 26.10.2001 15:51:14

> Jestli mas font nastaven na MS SANS SERIF (SYSTEM, apod.), tak ten ma myslim
> nejmensi moznou velikost fontu 8.
> Tedy zmensovat mu velikost lze, ale nema to zadny ucinek.

Ahoj

A to je prave to proc mi to nefunguje :-(.

Nevi nekdo o jinem zpusobu jak vykreslovat text a menit si velikost jak mne napadne?

Predem diky

Jirka

Canvas.TextWidth

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 15:52:42

From: "Jiri Wendl, KSH-Data" <wendl(zv)ksh-data(tec)cz>
> Nevi nekdo o jinem zpusobu jak vykreslovat text a menit si velikost jak mne
> napadne?

Ahoj,

pouzivat v tom pripade pouze True Type fonty.

Petr Vones


sort

[*] Martin Kolos <koki(zv)monoceros.physics.muni(tec)cz> - 26.10.2001 15:57:48

ahoj
vytvoril jsem si vlastni tridu TData s nekolika polozkami:
TData = class(TObect)
plocha:integer;
prumer:extended;
...
end;

jednotlive data:TData jsem nacpal do list:Tlist a ted bych je potreboval
seradit dle potreby podle plochy, prumeru atd.
musim si pro kazdou promennou tridy Tdata vytvorit novou srovnavaci fci
ve ktere srovnavam napr:
if Tdata(item1).plocha = ...
(a tu pak pouzit jako parametr metody list.sort) anebo se to da vyresit
elegantneji?
neco jako ze v te srovnavaci fci bych srovnaval ne skutecne polozky, ale
promennou typu ,hm :), typu promenna tridy Tdata a te bych pak podle
situace prirazoval konktretni polozky ...

WinXP - D6

[*] cis <cis(zv)atlas(tec)cz> - 26.10.2001 16:18:35

Hi,

zkousel nekdo kombinaci WinXP a D6?

Alda


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.298 / Virov� b�ze: 161 - datum vyd�n�: 13-11-2001


WinXP - D6

[*] Gallina Luk� <lukas.gallina(zv)cz.danzas(tec)com> - 26.10.2001 16:29:37

Ahoj,
Ano, zkousel jsem Windows XP Professional US a Delphi 6 Personal; zatim s
tim nemam jedinny problem.

S pozdravem
Luk�# Gallina
DANZAS a.s. (fili�lka Brno)
ITOS
lukas.gallina(zv)cz.danzas.com
tel.: +420 604 226 812

----- Original Message -----
From: "cis" <cis(zv)atlas(tec)cz>
To: "delphi cz konference" <delphi-l(zv)clexpert(tec)cz>
Sent: 26. listopadu 2001 16:18
Subject: WinXP - D6


Hi,

zkousel nekdo kombinaci WinXP a D6?

Alda


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.298 / Virov� b�ze: 161 - datum vyd�n�: 13-11-2001

Zahadne spravanie TMediaPlayer.AutoRewind

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 26.10.2001 16:32:56

AutoOpen:= False;
AutoRewind:= True;

su nastavene cez ObjectInspector.

Ked prehravam dostatocne dlhy WAV (viac ako cca 1 sek.) komponentou
TMediaPlayer v Debuggeri Delphi5 po prehrati sa urobi AutoRewind spravne.
Ked je WAV kratsi, AutoRewind sa nespravi.

Ak spustim program naostro, AutoRewind sa neurobi nikdy.

Skusal som pisat obsluhu OnNotify, ale bez slusneho vysledku.

Nevie nekto poradit kde je zakopany pes a prip. ako to debugovat?

Jaro


---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.295 / V�rusov� datab�za: 159 - d�tum vydania: 1. 11. 2001


TQuickRep a TPrinter - nestrankuju

[*] Lauko Stefan <laukosw(zv)naex.sk> - 26.10.2001 16:33:27

Dobry den,
dnes som to konecne vyskusal na HP LJ1000w (USB). TPrinter vsetky strany
nabacha na jeden list (nestrankuje). TQuickRep vytlaci len poslednu stranku
a ked je kratsia tak je zbytok strany doplneny predchadzajucou stranou.
Sineu som neskusal...
Word a ostatne programi tlacia normalne.

Co je este mozne pouzit namiesto:

function EndPage; external gdi32 name 'EndPage';
function StartPage; external gdi32 name 'StartPage';

Asi bude chyba vo volani tychto externych funkcii.
Mam moznost to testovat - pomozte mi prosim niekto tento problem vyriesit...
Dakujem, Lauko. D5,W98

Interbase & ZEOS

[*] <mkotaska(zv)atlas(tec)cz> - 26.10.2001 16:37:26

Ahoj,

v aplikaci pouzivam pro pristup k serveru Interbase komponenty ZEOS. ZIbSqlDatabase, ZIbSqlTransact, ZIbSqlTable a ZIbSqlQuery.
Pri vkladani polozky do tabulky prostrednictvim SQL prikazu je vse OK. Pro mazani pouzivam nastaveni priznaku dane polozky napr. SMAZANO = 'T'. Priznak je nastavovan prikazem UPDATE tabulka SET smazano='T' a nasledne volani ExecSQL. Pokud smazu zaznam a nasledne zadam dotaz SQL na platne polozky (SMAZANO = 'F') nacte se i ta polozka, ktera byla predtim smazana.
Pokud ukoncim a opet spustim aplikaci je vse v poradku.

Nevite nekdo, cim by toto mohlo byt.

Pozn.: Pokud na jednom pocitaci mam spustene dve instance aplikace ( simulace prace v siti) je vkladani polozeo OK a mazani je stejne jako bylo vyse popsano. Pokud vsak ukoncim jednu instanci, opet je vse OK.

Dekuju.
Milan Kotaska
mkotaska(zv)atlas(tec)cz


CGI Aplikacia

[*] Rado Benc <bego(zv)pobox.sk> - 26.10.2001 16:46:46

Nazdar,

> Zdravim ... mam taky zaciatocnicky problem, chcem si vytvorit CGI
> aplikaciu, tak si dam generovat "CGI Stand-alone executable" projekt, to
> mi vytvori project + unit, a moja otazocka znie, kde mam a co napisat,
> aby sa mi pri spusteni tato aplikacia vypisala napr. nejaky textik ....
> uff hadam pochopite otazku :) Vopred dakujem za rychlu odpoved :)

Takto:

program test;

{$APPTYPE CONSOLE}

uses
SysUtils;

{$E cgi}

begin
WriteLn('Content-type: text/html');
WriteLn;
WriteLn('<HTML><HEAD></HEAD><BODY><P>Hello world!</P></BODY></HTML>');
end.

HTH,

Rado


____________________________________
http://www.pobox.sk/ - prvy slovensky freemail

Tedit

[*] V�t Jur�sek - konference <delphi(zv)obecpohori(tec)cz> - 26.10.2001 17:06:57

Diky za tip a nejaky tip pro zamezeni oznacovani do bloku?
Nebo neznate prosim nekdo nejakou uplne jednoduchou tupou vstupni radku?
Diky
VJ


>
> ----- Original Message -----
>
> > Jak udelat, abych u komponenty tedit po kliknuti nedostal kontextove
menu?
> >
>
> Ahoj.
> Sice to neni vubec elegantni, ale staci tomu editu priradit prazdne
> PopupMenu a je hotovo.
>
> Ludek
>
>


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


Existuje BatchMove v IB?

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 26.10.2001 17:24:49

> Odes�latel: delphi(zv)zvlauto.sk
> Alebo sa da nejakym sposobom nahradit? Ako
Predevsim vyhodou a soucasne nevyhodou TBatchMove je, ze vyuziva BDE, a tedy umoznuje prevadet data z jedne databaze do druhe.

V IBX nic takoveho neni, v IBObject nevim, ale asi taky ne.
Nemel by byt problem si to napsat.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

TClientSocket a C++ Builder

[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 26.10.2001 17:31:32

Nemam nainstalovanej C++Builder, tedy prepisuji z helpu v Pascalu do C.

class CSocketEvents : public TObject
{
public :
void OnError( TObject * Sender, TCustomWinSocket * Socket, TErrorEvent
* ErrorEvent, int * ErrorCode );
void OnConnect( TObject * Sender, TCustomWinSocket * Socket );
}

CSocketEvents::OnError( TObject * Sender, TCustomWinSocket * Socket,
TErrorEvent * ErrorEvent, int * ErrorCode )
{
// kod pro zpracovani chyby
}

CSocketEvents::OnConnect( TObject * Sender, TCustomWinSocket * Socket );
{
// kod pro zpracovani pripojeni
}

void main ( void )
{
CSocketEvents events; // vytvoreni staticke instance objektu
TClientSocket *Cs = new TClientSocket(0);

Cs->OnConnect = events.OnConnect; // zde nesmi byt zavorka za
nazvem metody
Cs->OnError = event.OnError;
}

Presnou syntax hlavicek tech metod ti vygeneruje Builder, kdyz si
zkusebne udelas formular, na nej umistis TClientSocket a kliknes na
OnError, resp. OnConnect.

Honza +

> -----Original Message-----
> From: Miroslav_Cipel(zv)rubena.cgs(tec)cz
> [mailto:Miroslav_Cipel(zv)rubena.cgs(tec)cz]
> Sent: Monday, November 26, 2001 8:30 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: RE: TClientSocket a C++ Builder
>
>
>
>
>
> >A pak jsou ty funkce Connect a Error spatneho
> >typu, zaprve to musi byt metody objektu a za druhe budou mit nejake
> >parametry viz help o TSocketNotifyEvent a TSockerErrorEvent.
> >Honza +
> a jak to tedy ma byt spravne ?
>
> M.
>
>
>

Interbase & ZEOS

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 26.10.2001 18:36:50

> Odes�latel: mkotaska(zv)atlas(tec)cz
> Pokud ukoncim a opet spustim aplikaci je vse v poradku.
ZEOS neznam,
ale neni tam nejakej problem s transakcemi?

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================
----------
> Odes�latel: mkotaska(zv)atlas(tec)cz
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Interbase & ZEOS
> Datum: 26. listopadu 2001 16:37
>
> Ahoj,
>
> v aplikaci pouzivam pro pristup k serveru Interbase komponenty ZEOS. ZIbSqlDatabase, ZIbSqlTransact, ZIbSqlTable a ZIbSqlQuery.
> Pri vkladani polozky do tabulky prostrednictvim SQL prikazu je vse OK. Pro mazani pouzivam nastaveni priznaku dane polozky napr. SMAZANO = 'T'. Priznak je nastavovan prikazem UPDATE tabulka SET smazano='T' a nasledne volani ExecSQL. Pokud smazu zaznam a nasledne zadam dotaz SQL na platne polozky (SMAZANO = 'F') nacte se i ta polozka, ktera byla predtim smazana.
> Pokud ukoncim a opet spustim aplikaci je vse v poradku.
>
> Nevite nekdo, cim by toto mohlo byt.
>
> Pozn.: Pokud na jednom pocitaci mam spustene dve instance aplikace ( simulace prace v siti) je vkladani polozeo OK a mazani je stejne jako bylo vyse popsano. Pokud vsak ukoncim jednu instanci, opet je vse OK.
>
> Dekuju.
> Milan Kotaska
> mkotaska(zv)atlas(tec)cz


sort

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2001 20:07:42

Podivej se na TStringList a jeho metodu Sort a CustomSort
Mozna ti postaci to "okopirovat"

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

26.11.2001 Martin Kolos:
> ahoj
> vytvoril jsem si vlastni tridu TData s nekolika polozkami:
> TData = class(TObect)
> plocha:integer;
> prumer:extended;
> ...
> end;

> jednotlive data:TData jsem nacpal do list:Tlist a ted bych je potreboval
> seradit dle potreby podle plochy, prumeru atd.
> musim si pro kazdou promennou tridy Tdata vytvorit novou srovnavaci fci
> ve ktere srovnavam napr:
> if Tdata(item1).plocha = ...
> (a tu pak pouzit jako parametr metody list.sort) anebo se to da vyresit
> elegantneji?
> neco jako ze v te srovnavaci fci bych srovnaval ne skutecne polozky, ale
> promennou typu ,hm :), typu promenna tridy Tdata a te bych pak podle
> situace prirazoval konktretni polozky ...

Hot mp3s to see

[*] Ludek P�ral <ludek.paral(zv)telecom(tec)cz> - 26.10.2001 20:09:38

TENTO MAIL JE ZAVIROVANY. NEVIM, JAK MUZE PROJIT SKRZ VASI KONFERENCI.

LUDEK PARAL


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
hostinsky(zv)teska(tec)cz
Sent: Monday, November 26, 2001 12:24 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Hot mp3s to see


peace


WinXP - D6

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.10.2001 20:19:29

Ahoj,

> zkousel nekdo kombinaci WinXP a D6?
****zkousel, nenasel jsem problem, ktery by na XP byl zavisly.

Slavek

> Alda


Durex - Let's make kids better.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


WinXP - D6

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 20:24:07

From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> ****zkousel, nenasel jsem problem, ktery by na XP byl zavisly.

Ahoj,

V D6 je problem s TListView na XP:
http://groups.google.com/groups?hl=en&rnum=3&selm=3bf9c6ea%241_2%40dnews

Petr Vones


OT: Error

[*] Ondrej Skipala <OSkip(zv)seznam(tec)cz> - 26.10.2001 22:32:16

V programu mi nab�h� error:

"Project Commando.exe raised exception class EAccesViolation with
message 'Acces violation at address 00402E58 in module
'Commando.exe'. Read of address FFFFFFFC.'Process stopped. Use Step
or Run to continue."

Vyhled�val jsem ten error v programu a vy#lo mi z toho, �e to h�z�
p�i na��t�n� matice ze souboru. Ale p�itom kdy� jsem ve sv�m SETUPU
vy�adil hudbu, tak to chodilo bez probl�m�... tomuhle erroru fakt
nerozum�m, tak�e jestli mi n�kdo m��ete poradit aspo� jestli je to v
tom souboru nebo v hudb�, budu r�d.
D�ky.

______________________________________________________________________
Jak poslat rukou psan� text na mail? P�ece faxem Panasonic!
http://www.panasonic(tec)cz/redirect.html


Error

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 22:52:28

From: "Ondrej Skipala" <OSkip(zv)seznam(tec)cz>
> Vyhled�val jsem ten error v programu a vy#lo mi z toho, �e to h�z�
> p�i na��t�n� matice ze souboru. Ale p�itom kdy� jsem ve sv�m SETUPU
> vy�adil hudbu, tak to chodilo bez probl�m�... tomuhle erroru fakt

Ahoj,

pokud se to projevuje opakovane tak to muzes prece dobre odhalit v debuggeru.

> nerozum�m, tak�e jestli mi n�kdo m��ete poradit aspo� jestli je to v
> tom souboru nebo v hudb�, budu r�d.

Pokud je to dechovka, tak to bude urcite v te hudbe ;-)

Petr Vones


OT: ListBox

[*] Martin #d�rsk� <zdary(zv)seznam(tec)cz> - 26.10.2001 23:40:29

Ahoj,
potrebuji pretahovat polozky mezi dvema listboxy. Je to v poradku
pokud je zobrazena jako prvni prvni polozka seznamu. Pokud je listbox
odrolovan, pak neumim spocitat cilovy index. Je nekde promena, ve
ktere je ulozena pozice rolovatka?
diky

______________________________________________________________________
ARDO SISA TOUR 2001 Sisa Sklovska a jeji host Richard Muller na turne
http://www.ddpromotion(tec)cz/czech/music/sisa.htm


ListBox

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2001 23:56:04

From: "Martin �d�rsk�" <zdary(zv)seznam(tec)cz>
> pokud je zobrazena jako prvni prvni polozka seznamu. Pokud je listbox
> odrolovan, pak neumim spocitat cilovy index. Je nekde promena, ve

Ahoj,

index ziskas pomoci metody ItemAtPos kam predas souradnice z udalosti
OnDragXXX

Petr Vones

Ako v DBGride zobrazit hodnotu Boolean v ChceckBox

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 27.10.2001 00:14:52

Zatial pouzivam DBCtrlGrid ale nie je to prave orechove...
Napr. neviem menit Caption prvku DBCheckBox podla ineho stlpca,
tak som dal Caption na '' a pridal DBText, ale nejako mi to nesedi.

Jaro



---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.295 / V�rusov� datab�za: 159 - d�tum vydania: 1. 11. 2001


DBGrid - len editacia, ziaden insert

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 27.10.2001 00:20:27

Ako povolit v DBGride editaciu ale zakazat Insert alebo/aj Delete?

Jaro

---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.295 / V�rusov� datab�za: 159 - d�tum vydania: 1. 11. 2001


Malicky kseft pro Prazaka

[*] Lud�k P�ral - 27.10.2001 00:40:08

Ahoj,

mam maleho zakaznika v Praze -Hornich Pocernicich. Byl by nekdo ochoten tam
zajet a zjistit, ktera databaze (Paradox) je naborena ? (hlasi mi to chyba
autoincrement polozky). Po zaslani domu (BDE 5.11) se vse jevi v poradku. Na
miste je produkt na opravu db, ktery na nic neprisel.

Nechce se mi jet 2x250 km kvuli 20 minutam. Celou trzbu samozrejme
prenecham.

Ludek

Malicky kseft pro Prazaka

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 27.10.2001 00:48:14

Puvodni zprava, kterou napsal Lud�k P�ral dne 27 Nov 2001:

> mam maleho zakaznika v Praze -Hornich Pocernicich. Byl by nekdo ochoten tam
> zajet a zjistit, ktera databaze (Paradox) je naborena ? (hlasi mi to chyba
> autoincrement polozky). Po zaslani domu (BDE 5.11) se vse jevi v poradku. Na
> miste je produkt na opravu db, ktery na nic neprisel.

1. Napomenuti za to, ze zprava neni oznacena OT a neni tam info,
ze maji lidi odpovidat na tvuj mail a ne do konference.

2. Kdyz ma tabulka Paradox autoincrement a opravi se, vetsinou
zustane citac autoincrementu blbe nastaveny a nejdou pridavat
zaznamy. Takze reseni - vlez tam treba Database Desktopem,
tu polozku autoincrement zmen na integer, uloz. Pak to znovu
otevri a zmen ji z integeru zpet na autoincrement. No a usetrite
vsichni...

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

VYRESENO + QUESTION was : Re: Delphi feature nebo

[*] tomsir1.edu(zv)mail.cez(tec)cz - 27.10.2001 07:01:56



Provedl jsem dle rady a vse je funkcni ... ovsem jakozto laik v teto
oblasti mam otazecku : Proc je to nutno prekladat s balicky ???
Zkusil jsem i bez a nefunguje to ... v cem je rozdil ???


Diky Radek

"Petr Vones" <pvones(zv)mbox.vol(tec)cz>(zv)clexpert(tec)cz on 26.11.2001 00:35:32

Odpov�zte pros�m - delphi-l(zv)clexpert(tec)cz

Odesl�no k�m: delphi-l-owner(zv)clexpert(tec)cz


Komu: <delphi-l(zv)clexpert(tec)cz>
Kopie:
P�edm�t: Re: Delphi feature nebo moje blbost ??


From: <tomsir1.edu(zv)mail.cez(tec)cz>
> OK, takze nadefinuju datovy modul, vlozim do nej TDatabase a nejake
TQuery
> a prilinkuju ho k programu. Jak potom dam pri jednotlivych dll vedet ze,
> maji pouzit prave tento modul

Ahoj,

prelozit vse s balicky a predat datamodul, TDatabase nebo TQuery jako
parametr
volani funkce v DLL.

Petr Vones


programove nastaveni velikosti papiru

[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 27.10.2001 07:09:46

Cau,
jak programove nastavim velikost papiru na tiskarne aniz bych stim otravoval uzivatele ?

dik Ladap


DBGrid - len editacia, ziaden insert

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 27.10.2001 07:16:16

On 27 Nov 2001, at 0:20, Jaroslav Popluhar wrote:
> Ako povolit v DBGride editaciu ale zakazat Insert alebo/aj Delete?
Kdyz je to postavney na DataSet tak pro insert funguje "abort;" pri
udalosti AfterInsert. Pro delete to kupodivu nefunguje, CTRL+Delete
se mi zatim podarilo zneskodnit jen tak, ze do DeleteSQL se da
pro forma nejaky prikaz (treba commit, to je ostatne potreba i pro
insert) a chyba pri delete se pak osetri tak ze se ignoruje.
Z.Kalhous


DBGrid - len editacia, ziaden insert

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 27.10.2001 08:24:04

Abort je treba napsat do BeforeInsert a ne do AfterInsert a stejne
tak do BeforeDelete, Musi to fungovat.
> > Ako povolit v DBGride editaciu ale zakazat Insert alebo/aj Delete?
> Kdyz je to postavney na DataSet tak pro insert funguje "abort;" pri
> udalosti AfterInsert. Pro delete to kupodivu nefunguje, CTRL+Delete
> se mi zatim podarilo zneskodnit jen tak, ze do DeleteSQL se da
> pro forma nejaky prikaz (treba commit, to je ostatne potreba i pro
> insert) a chyba pri delete se pak osetri tak ze se ignoruje.
> Z.Kalhous
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Existuje BatchMove v IB?

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 27.10.2001 08:31:32

From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
> > Odes�latel: delphi(zv)zvlauto.sk
> > Alebo sa da nejakym sposobom nahradit? Ako
> Predevsim vyhodou a soucasne nevyhodou TBatchMove je, ze vyuziva BDE, a
tedy umoznuje prevadet data z jedne databaze do druhe.
>
> V IBX nic takoveho neni, v IBObject nevim, ale asi taky ne.
> Nemel by byt problem si to napsat.
> Honza

Mno hadat sa nechcem lebo som toto nikdy nepotreboval ale skusim naviest
kdyz tak ma opravte:
V IBX je tato funkcnost tusim priamo na datasetu viz. metoda
"InternalBatchInput(InputObject: TIBBatchInput)", atd...
A v IBO je ekvivalent IB_DataPump, ... (IB_Import, IB_Export)

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

Triedenie v IB

[*] <delphi(zv)zvlauto.sk> - 27.10.2001 08:34:36

Zdravim,

Mam vytvorenu tabulku bez indexu. Existuje nejaky sposob ako ju zotriedit,
podla urcitych kriterii?
Chcel som to robit cez Select a order by a potom BatchMove dat udaje naspat,
ale IB nema BatchMove.(potom si ho prerobim... :))

Vdaka.

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

Triedenie v IB

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 27.10.2001 09:14:25

From: <delphi(zv)zvlauto.sk>
> Mam vytvorenu tabulku bez indexu. Existuje nejaky sposob ako ju zotriedit,
> podla urcitych kriterii?
> Chcel som to robit cez Select a order by a potom BatchMove dat udaje
naspat,
> ale IB nema BatchMove.(potom si ho prerobim... :))

Nepotrebujes mat index aby si mohol cokolvek robit s tabulkov. Indexu su
zjednodusene povedane vhodne tam kde je ziaduci lepsi vykon.

IB nema BatchMove .. viz. moj predosly mail "Re: Existuje BatchMove v IB?"

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

checklistbox

[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 27.10.2001 09:20:42

Zdravim,
jde u checklistbouxu nastavovat u jednotlivych polozek velikost pisma? Stacilo by i nastaveni normalni x tucne. Nebo se na to musi pouzit jina komponenta? V tom pripade jaka?
Predem dik za jakoukoli radu.

Mirek Drejcek

checklistbox

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.10.2001 09:28:54

Nejprve je treba nastavit Style na lbOwnerDrawFixed nebo
lbOwnerDrawVariable a pak napsat vlastni obluhu udalosti OnDrawItem.

Pro tvuj pripad staci Style := lbOwnerDrawFixed a

procedure TForm1.CheckListBox1DrawItem(Control: TWinControl;
Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
with TCheckListBox(Control) do begin
if Index mod 2 = 0 then
Canvas.Font.Style := [fsBold]
else
Canvas.Font.Style := [];

Canvas.TextOut(Rect.Left + 2, Rect.Top + 1, Items[Index]);
end;
end;

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

27.11.2001 "Mirek Drej�ek":
> Zdravim,
> jde u checklistbouxu nastavovat u jednotlivych polozek velikost pisma? Stacilo by i nastaveni normalni x tucne. Nebo se na to musi pouzit jina komponenta? V tom pripade jaka?
> Predem dik za jakoukoli radu.

> Mirek Drejcek

IB6 a IBX v Delphi 4C/S

[*] Martinec <martin108(zv)post(tec)cz> - 27.10.2001 09:32:25

Ahoj, chci se zeptat, jestli bude chodit %subjekt%, tedy hlavne jestli muzu do D4C/S nainstalovat IBX ?
---
Chat - Velka Hra o CD
Ka�d� p�tek od 14:00 na
http://chat.volny(tec)cz


Cislo na string

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 27.10.2001 09:40:37

Zdravim,
potreboval byl algoritmus prevodu cisla na text. Neco jako 134 021,40 a potrebuju ho dostat do retezce, tj. :
"stodvacetctyritisicdvacetjedna koruna a ctyricet haleru" . Halire ani nepotrebuji, ty na slozenkach slovy nejsou.
V archivu byla nejaka nabidka, ale autor jiz zdrojak nema. :-( Ale nabidl se, ze to kdyztak hodi na inet. Nenasla by se nejaka dobra duse? Diky
M&B


programove nastaveni velikosti papiru - VYRESENO

[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 27.10.2001 09:49:56

tady to je :)

http://community.borland.com/article/0,1410,15603,00.html

Ladap

>>> Ladislav.Parizsky(zv)access-it(tec)cz 27.11. 2001 7:09:46 >>>
Cau,
jak programove nastavim velikost papiru na tiskarne aniz bych stim otravoval uzivatele ?

dik Ladap

Cislo na string

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 27.10.2001 09:49:29

Delphi 5


function DejTextCisla (number : int64) : string;
function PomDejTextCisla (number : string; rod : byte; nula : boolean; t1,
t2, t3 : string) : string;
function PrevedJednotky (number : string; rod1, rod2 : byte; nula :
boolean; t1, t2, t3, t4 : string) : string;
begin
case number[1] of
'0' : if (nula) then result:=t4 else result:='';
'1' : case rod1 of
0 : result:='jeden'+t1;
1 : result:='jedna'+t1;
2 : result:='jedno'+t1;
else result:='';
end;
'2' : case rod2 of
0 : result:='dva'+t2;
1 : result:='dv�'+t2;
else result:='';
end;
'3' : result:='t�i' +t3;
'4' : result:='�ty�i'+t3;
'5' : result:='p�t' +t4;
'6' : result:='sest' +t4;
'7' : result:='sedm' +t4;
'8' : result:='osm' +t4;
'9' : result:='dev�t'+t4;
else result:='';
end;
end;
begin
result:='';
if (number='000')or(length(number)<>3) then exit;
If (number[1]<>'0') then
result:=PrevedJednotky (number[1],2,1,false,'sto','st�','sta','set');
case number[2] of
'0' : result:=result+PrevedJednotky (number[3],rod,0,nula,t1,t2,t2,t3);
'1' : case number[3] of
'0' : result:=result+'deset' +t3;
'1' : result:=result+'jeden�ct' +t3;
'2' : result:=result+'dvan�ct' +t3;
'3' : result:=result+'t�in�ct' +t3;
'4' : result:=result+'�trn�ct' +t3;
'5' : result:=result+'patn�ct' +t3;
'6' : result:=result+'sestn�ct' +t3;
'7' : result:=result+'sedmn�ct' +t3;
'8' : result:=result+'osmn�ct' +t3;
'9' : result:=result+'devaten�ct'+t3;
end;
'2' : result:=result+'dvacet' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'3' : result:=result+'t�icet' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'4' : result:=result+'�ty�icet' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'5' : result:=result+'pades�t' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'6' : result:=result+'sedes�t' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'7' : result:=result+'sedmdes�t'+PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'8' : result:=result+'osmdes�t' +PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
'9' : result:=result+'devades�t'+PrevedJednotky
(number[3],rod,0,nula,t1,t2,t2,t3);
end;
end;
var s : string;
begin
result:='';
if (Abs (number)>999999999999999999) then exit;
if (number<0) then
begin
result:='minus ';
number:=-number;
end;
s:=FormatFloat ('000000000000000000',number);
result:=result+PomDejTextCisla (copy (s, 1,3),0,true ,'trili�n',
'trili�ny','trili�n�');
result:=result+PomDejTextCisla (copy (s, 4,3),0,true ,'bili�n',
'bili�ny', 'bili�n�');
result:=result+PomDejTextCisla (copy (s, 7,3),0,true
,'miliarda','miliardy','miliard');
result:=result+PomDejTextCisla (copy (s,10,3),0,true ,'mili�n',
'mili�ny', 'mili�n�');
result:=result+PomDejTextCisla (copy (s,13,3),0,true ,'tis�c', 'tis�ce',
'tis�c');
result:=result+PomDejTextCisla (copy (s,16,3),1,false,'', '',
'');
end;

Jaky OS pro D5?

[*] Kralik Michal <xkrali07(zv)stud.fee.vutbr(tec)cz> - 27.10.2001 09:52:21

Zdravim,
jaky si myslite, ze je nejvhodnejsi OS pro D5?
Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi s
deskou a samovolne se to resetuje, takze mam 3 moznosti:
- vratit se k 98SE
- pouzivat ME
- zkusit XP

Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
Zkousel to nekdo?

HW:
Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro

M.Kralik

Jaky OS pro D5?

[*] Radim Kunz <privat(zv)casestudio(tec)com> - 27.10.2001 10:22:53


----- Original Message -----
From: "Kralik Michal" <xkrali07(zv)stud.fee.vutbr(tec)cz>
To: "DELPHI konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, November 27, 2001 9:52 AM
Subject: Jaky OS pro D5?> Zdravim,
> jaky si myslite, ze je nejvhodnejsi OS pro D5?
> Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi s
> deskou a samovolne se to resetuje, takze mam 3 moznosti:
> - vratit se k 98SE
> - pouzivat ME
> - zkusit XP
>
> Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
> Zkousel to nekdo?
>
> HW:
> Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro
>
> M.Kralik
>

Moje rada je, zkus XP, a kdyz to nepujde, tak vymen desku.

Radim


TChartAxisTitle already exists

[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 27.10.2001 10:23:37

Ahoj,
EXE i DLL mam prelozene s balicky. Je jeste jina moznost, jak ovlivnit,
aby se TChart nekompiloval do kazdeho souboru?

Libor Filip


patrne si nepouzil TChart runtime balicek (v EXE i DLL) ale zkompiloval jsi
kod TChart do kazdeho souboru zvlast.

Petr Vones


Existuje BatchMove v IB?

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 27.10.2001 10:39:35

Podivej se tady.
(IBDataPump bud jako aplikace nebo jako DLL knihovna, ktera se muze pouzit
primo z aplikce).

http://www.clevercomponents.com/products/dp-tour.asp


----- Original Message -----
From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, November 26, 2001 5:24 PM
Subject: Re: Existuje BatchMove v IB?> > Odes�latel: delphi(zv)zvlauto.sk
> > Alebo sa da nejakym sposobom nahradit? Ako
> Predevsim vyhodou a soucasne nevyhodou TBatchMove je, ze vyuziva BDE, a
tedy umoznuje prevadet data z jedne databaze do druhe.
>
> V IBX nic takoveho neni, v IBObject nevim, ale asi taky ne.
> Nemel by byt problem si to napsat.
>
> Honza
> =========================================
> = HAES - RNDr. Jan Sebelik
> = http://www.haes(tec)cz
> = Skolici a konzultacni stredisko pro Delphi a Win32
> = Vojtiskova 206
> = 507 81 Lazne Belohrad
> = tel. 0434 692 569 (0776 347735)
> =========================================
>

Cislo na string

[*] Petr Potocek <pp1(zv)volny(tec)cz> - 27.10.2001 10:42:02

Ahoj,
tato zadost tu byla asi pred ctrnacti dny. Nabizim jednu z moznych funkci.
Je vytvorena pro DLL, takze si ji kdyztak uprav:

unit Funkc;

interface

uses SysUtils, Math;

function Slovy(var C,I: Integer): String;
function Cisslovy(var Kc: Double): PChar; stdcall; export;

implementation

function Slovy(var C,I: Integer): String;
const J: array[3..19] of String =
('tri','ctyri','pet','sest','sedm','osm','devet','deset','jeden�ct','dvan�ct
','trin�ct',
'ctrn�ct','patn�ct','sestn�ct','sedmn�ct','osmn�ct','devaten�ct');
const D: array[2..9] of String =
('dvacet','tricet','ctyricet','pades�t','sedes�t','sedmdes�t','osmdes�t','de
vades�t');
R: array[1..13] of
String=('','','tis�c','tis�ce','tis�c','milion','miliony','milionu','miliard
a','miliardy','miliard','sta','set');
var S: String; I2: Integer;
begin
if (((I+1) mod 3)=0) then
case C of
1: S:='jednosto';
2: S:='dveste';
3,4: S:=J[C]+R[12];
5..9: S:=J[C]+R[13];
end;
if (((I-1) mod 3)=0) then
case C of
2..9: S:=D[C];
end;
if (((I) mod 3)=0) then
begin
I2:=((I) div 3);
case C of
1: case I2 of
3: S:='jednamiliarda';
1,2: S:='jeden'+R[I2*3];
0: S:='jedna';
end;
2: case I2 of
3: S:='dvemiliardy';
1,2: S:='dva'+R[I2*3+1];
0: S:='dve';
end;
3,4: S:=J[C]+R[I2*3+1];
5..19: S:=J[C]+R[I2*3+2];
end;
end;
result:=S;
end;

function Cisslovy(var Kc: Double): PChar; stdcall; export;
var Z: Int64;C,I: Integer; S1,S2,S3: String;
begin
if Kc<>0 then
begin
S3:='+'+IntToStr(abs(round(frac(Kc)*100)))+'/100';
if Kc<0 then S1:='minus ' else S1:='';
Z:=abs(trunc(Kc));
I:=length(IntToStr(Z))-1;
while (Z>0) and (I>=0) do
begin
C:=Z div trunc(power(10,I));
if (C=1) and (((I+2) mod 3)=0) then
begin
Z:=Z mod trunc(power(10,I));
I:=I-1;
C:=C*10+Z div trunc(power(10,I));
end;
S2:=S2+Slovy(C,I);
Z:=Z mod trunc(power(10,I));
I:=I-1;
end;
end;
GetMem(Result,length(S1+S2+S3)+1);
StrCopy(Result,PChar(S1+S2+S3));
end;

end.

Preji hezky den
Petr Potocek

----- Original Message -----
From: "Martin Bab�k" <M.Babik(zv)mus(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, November 27, 2001 9:40 AM
Subject: Cislo na string


Zdravim,
potreboval byl algoritmus prevodu cisla na text. Neco jako 134 021,40 a
potrebuju ho dostat do retezce, tj. :
"stodvacetctyritisicdvacetjedna koruna a ctyricet haleru" . Halire ani
nepotrebuji, ty na slozenkach slovy nejsou.
V archivu byla nejaka nabidka, ale autor jiz zdrojak nema. :-( Ale nabidl
se, ze to kdyztak hodi na inet. Nenasla by se nejaka dobra duse? Diky
M&B

DBGrid - len editacia, ziaden insert

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 27.10.2001 10:51:31

Jo s tim AfterInsert to byl samozrejme preklep, ale fakt se mi
nepodarilo jenom pomoci "BeforeDelete abort" zabranit fungovani
klavesove kombinace CTRL+Delete.
> Abort je treba napsat do BeforeInsert a ne do AfterInsert a stejne tak
> do BeforeDelete, Musi to fungovat.
> > > Ako povolit v DBGride editaciu ale zakazat Insert alebo/aj Delete?

Z.Kalhous


Jaky OS pro D5?

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.10.2001 11:22:00

A nebude XP trosku narocny na hardware? Myslim si, ze Celereon bude trochu
pomaly.
Pavel

>
> > jaky si myslite, ze je nejvhodnejsi OS pro D5?
> > Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi s
> > deskou a samovolne se to resetuje, takze mam 3 moznosti:
> > - vratit se k 98SE
> > - pouzivat ME
> > - zkusit XP
> >
> > Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
> > Zkousel to nekdo?
> >
> > HW:
> > Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro
> >
> > M.Kralik
> >
>
> Moje rada je, zkus XP, a kdyz to nepujde, tak vymen desku.
>
> Radim


VYRESENO + QUESTION was : Re: Delphi feature nebo

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 27.10.2001 11:22:07

> Provedl jsem dle rady a vse je funkcni ... ovsem jakozto laik v teto
> oblasti mam otazecku : Proc je to nutno prekladat s balicky ???
> Zkusil jsem i bez a nefunguje to ... v cem je rozdil ???

Vecsinou je problem v globalnych premennych, ktore su pouzivane vo VCL. Pri
kompilacii bez runtime balickov su tieto premenne v runtime vytvorene pre
kazdy modul (.exe, .dll) zvlast; s runtime balickami iba raz a su zdielane
vsetkymi modulmi.

HTH
TOndrej


IB a post_event

[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 27.10.2001 11:28:42

dobry den vespolek,
vim ze se to tu jiz nekolikrat probiralo, lec pro mne s neupokojivym
vysledkem.
Mam ulozenou proceduru na IB, ktera vykonava deletrvajici operaci nad
tabulkami. V ramci procedury dokazu stanovit stav prubehu (znam pocet
vstupujicich zaznamu a pocitam si poradi prave zpracovavaneho zaznamu). A
rad bych kazdou zmenu prubehu o jedno procento dal na vedomi aplikaci formou
post_event. Jenze jak jiste tusite, post_event je zaslan pouze jednou a to
po commitu transakce.
Neznate prosim nekdo nejaky FIIGL jak ten post_event prubezne dostavat k
aplikaci? Formou UDF se mi do toho moc nechce, obzvlaste kdys cecku
neholduji a tudiz psat UDF pro linux je tak trochu nad me sily.
za kazdy napad predem dekuji

s pranim plodneho dne
PavelC


Omezeni iniciativy Delphi5

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 27.10.2001 11:43:44

Nevite nekdo jak zabranit editoru Delphi5 v tom, aby se uz pri psani
textu programu ustavicne pokousel napovidat? Jde mi o to, ze
mam ve zvyku nejdriv si napsat "skelet" programu na zpusob
if JeToTak()
UdelejNeco()
else begin
DataSet.Open;
while !DataSet.Eof do begin
ZpracujData();
DataSet.Next;
end;
DataSet.Close;
end;
Pricemz ani ty funkce ani DataSet jeste neexistuji - to si pak
dopisu. Jenze delfi se mi porad snazi napovidat takze misto toho
abych mohl psat text programu jako na psacim stroji porad jen
koukam na presypaci hodiny.
Stejne by mi pomohlo, kdybych pri trasovani programu umel
vypnout kontroly zmeny zdroje. Narazim treba na misto kde vidim,
ze by tam bylo vhodne neco pridat nebo zmenit. Napisu si tam byt
i jen komentar "// doplnit to a to" a pak cekam silene dlouho nez
se me delfi zeptaji, jestli to nahodou nechci prekompilovat. Nechci.
Nikdy. Ale musim stejne cekat. Vzdycky.
Z.Kalhous


Uchovanie nakresleneho obrazca na Forme

[*] Slavom�r Cekel <cekel(zv)noves.sk> - 27.10.2001 11:48:10

Zdravim ...

nemam po ruke ziadnu knihu o Delphi a tak Vas ziadam o pomoc ...

Nakreslim si pomocom TCanvas nejake obrazce napr. na Form ... ked tento
Form prekrijem a vratim sa potom spat, nakreslene obrazce zmiznu ... ako
sa to robi aby mi nezmizli ? Viem, ze sa to da, som o tom cital, ale
teraz si to nemam kde najst ... tos pomozte :)

Slavo


Omezeni iniciativy Delphi5

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.10.2001 11:53:24

Cast z toho muzes zrusit v Tools / Editor options / Code Insight

Bud nastavit delsi cas nebo zrusit zaskrtnuti checkboxu

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

27.11.2001 Kalhous Zdenek:
> Nevite nekdo jak zabranit editoru Delphi5 v tom, aby se uz pri psani
> textu programu ustavicne pokousel napovidat? Jde mi o to, ze
> mam ve zvyku nejdriv si napsat "skelet" programu na zpusob
> if JeToTak()
> UdelejNeco()
> else begin
> DataSet.Open;
> while !DataSet.Eof do begin
> ZpracujData();
> DataSet.Next;
> end;
> DataSet.Close;
> end;
> Pricemz ani ty funkce ani DataSet jeste neexistuji - to si pak
> dopisu. Jenze delfi se mi porad snazi napovidat takze misto toho
> abych mohl psat text programu jako na psacim stroji porad jen
> koukam na presypaci hodiny.
> Stejne by mi pomohlo, kdybych pri trasovani programu umel
> vypnout kontroly zmeny zdroje. Narazim treba na misto kde vidim,
> ze by tam bylo vhodne neco pridat nebo zmenit. Napisu si tam byt
> i jen komentar "// doplnit to a to" a pak cekam silene dlouho nez
> se me delfi zeptaji, jestli to nahodou nechci prekompilovat. Nechci.
> Nikdy. Ale musim stejne cekat. Vzdycky.
> Z.Kalhous


Uchovanie nakresleneho obrazca na Forme

[*] Lubo Fule <fule(zv)ekosoft.sk> - 27.10.2001 12:14:40

> Nakreslim si pomocom TCanvas nejake obrazce napr. na Form ... ked tento
> Form prekrijem a vratim sa potom spat, nakreslene obrazce zmiznu ... ako
> sa to robi aby mi nezmizli ? Viem, ze sa to da, som o tom cital, ale
> teraz si to nemam kde najst ... tos pomozte :)

To kreslenie musis dat do udalosti OnPaint

L.

Uchovanie nakresleneho obrazca na Forme

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.10.2001 12:17:49

Takove veci se delaji v metode OnPaint. Pak je zajisteno, ze pri
pozadavku na prekresleni se obnovi.

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

27.11.2001 Slavom�r Cekel:
> Nakreslim si pomocom TCanvas nejake obrazce napr. na Form ... ked tento
> Form prekrijem a vratim sa potom spat, nakreslene obrazce zmiznu ... ako
> sa to robi aby mi nezmizli ? Viem, ze sa to da, som o tom cital, ale
> teraz si to nemam kde najst ... tos pomozte :)

Uchovanie nakresleneho obrazca na Forme

[*] brant(zv)dcomm(tec)cz - 27.10.2001 12:20:31

Mel bys kreslit ne primo na canvas, ale do bitmapy umistene v pameti a v
reakci na OnPaint toho formu prekopirovat (CopyRect, BitBlt) tu bitmapu na
canvas formu.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380

D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7


Nakreslim si pomocom TCanvas nejake obrazce napr. na Form ... ked tento
Form prekrijem a vratim sa potom spat, nakreslene obrazce zmiznu ... ako
sa to robi aby mi nezmizli ? Viem, ze sa to da, som o tom cital, ale
teraz si to nemam kde najst ... tos pomozte :)

Jaky OS pro D5?

[*] Dan <dan.hrotek(zv)seznam(tec)cz> - 27.10.2001 12:26:38

Ahoj
Pro Linux mam dojem take jde D5 ale ted si nevzpomenu na distribucni
nazev, jinak pod OS/2, eCom Station bude neco take velmi brzo, ci dokonce
mozna uz je ... ?
Jinak jsem v konferenci videl, ze D5 a WIN XP je pry v pohode...

Dan.

starhill.web.2001(tec)cz
dan.hrotek(zv)atlas(tec)cz


----- Original Message -----
From: "Kralik Michal" <xkrali07(zv)stud.fee.vutbr(tec)cz>
To: "DELPHI konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, November 27, 2001 9:52 AM
Subject: Jaky OS pro D5?> Zdravim,
> jaky si myslite, ze je nejvhodnejsi OS pro D5?
> Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi s
> deskou a samovolne se to resetuje, takze mam 3 moznosti:
> - vratit se k 98SE
> - pouzivat ME
> - zkusit XP
>
> Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
> Zkousel to nekdo?
>
> HW:
> Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro
>
> M.Kralik
>
>
>


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

Jaky OS pro D5?

[*] Dan <dan.hrotek(zv)seznam(tec)cz> - 27.10.2001 12:33:43

XP je o hodne narocnejsi na HW nez WIN 2000 jinak se tam da nastavit ve
vlastnostech maximalni pouziti OS pro vykon a bude to mit vzhled jako WIN
2000 s malyma odchylkama, i tak je to ale narocnejsi : )
jsou tu i jine, vykonnejsi OS... :)

Ahoj Dan.

starhill.web2001(tec)cz
dan.hrotek(zv)atlas(tec)cz


----- Original Message -----
From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, November 27, 2001 11:22 AM
Subject: Re: Jaky OS pro D5?> A nebude XP trosku narocny na hardware? Myslim si, ze Celereon bude trochu
> pomaly.
> Pavel
>
> >
> > > jaky si myslite, ze je nejvhodnejsi OS pro D5?
> > > Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi
s
> > > deskou a samovolne se to resetuje, takze mam 3 moznosti:
> > > - vratit se k 98SE
> > > - pouzivat ME
> > > - zkusit XP
> > >
> > > Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5
snaseji?
> > > Zkousel to nekdo?
> > >
> > > HW:
> > > Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen
AX63Pro
> > >
> > > M.Kralik
> > >
> >
> > Moje rada je, zkus XP, a kdyz to nepujde, tak vymen desku.
> >
> > Radim
>
>
>


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

IB a post_event

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 27.10.2001 12:40:31

From: "ing.Pavel Cabalka" <pavel_cabalka(zv)vcshk(tec)cz>
> Neznate prosim nekdo nejaky FIIGL jak ten post_event prubezne dostavat k
> aplikaci? Formou UDF se mi do toho moc nechce, obzvlaste kdys cecku
> neholduji a tudiz psat UDF pro linux je tak trochu nad me sily.
> za kazdy napad predem dekuji

Obavam sa bez UDF to nepojde, ale na linuxu existuje i Kylix alebo aj
FreePascal kde je mozne napisat UDF. :)

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

Jaky OS pro D5?

[*] Jir� Kratochv�l <jiri.kratochvil(zv)webzin(tec)cz> - 27.10.2001 12:40:26

> Pro Linux mam dojem take jde D5 ale ted si nevzpomenu na distribucni
Myslite Kylix??? :))

> nazev, jinak pod OS/2, eCom Station bude neco take velmi brzo, ci dokonce
Jestli se nepletu, tak v OS/2 by mely chodit wokenni aplikace bezne, nebo se
pletu?

JK


Chyba v IDAPI32.dll

[*] kuchar(zv)unicodesys(tec)cz - 27.10.2001 12:45:00

Ahoj,

oba pocitace maji stejne ODBC, stejny OS a stejne SP jak pro W2000, tak pro
SQL i pro BDE, BDE bych se taky rad vyhnul, ale jak "PROGRAMOVE" zajistit
vlastnost komponenty TTable, konkretne BATCHMOVE, SQL ma v sobe DTS na
presun dat, ale to pouzit nemuzu uz z ruznych x duvodu ( nema cenu je tady
rozebirat )> Ahoj,
>
> predpokladam ze oba dva pocitace nemaji uplne tutez konfiguraci (napriklad
> verze ODBC apod.) O databaze se nezajimam, ale mam takove tuseni ze v MS
SQL
> je nejaky nastroj pro prevod databazi. Urcite bych se snazil vyhnout BDE.
>
> Petr Vones
>
>

Lokalizace

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 27.10.2001 12:56:12

Ahoj,

mam Zbyskuv lokalizator a takovyhle drobny problem. Je aplikace
cela vytvorena v anglictine, ale pouzivajici Sineu (ktera je cela
cesky). Rad bych ji proto prejel lokalizatorem do ENU (Anglicky
USA). Ceske texty ze Sinei jsem nejak prelozil, v tom neni
problem, ale vsechny ostatni anglicke texty, na ktere neni nutno
sahnout, zustavaji oznacene jako neprelozene. Potreboval bych je
dostat do slovniku, aby pri pristi lokalizaci exe jiz byly oznaceny
jako lokalizovane. Jak na to - jde to vubec?

Dik.

David Lebeda


DBGrid - len editacia, ziaden insert

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 27.10.2001 13:10:01

Aneni to nahodou tak, ze se te zeptal jestli smazat a ty jsi rekl, ze
ne? Musis si jeste v Options Gridu vypnout, aby se ptal na
mazani.
> Jo s tim AfterInsert to byl samozrejme preklep, ale fakt se mi
> nepodarilo jenom pomoci "BeforeDelete abort" zabranit fungovani
> klavesove kombinace CTRL+Delete.
> > Abort je treba napsat do BeforeInsert a ne do AfterInsert a stejne tak
> > do BeforeDelete, Musi to fungovat.
> > > > Ako povolit v DBGride editaciu ale zakazat Insert alebo/aj Delete?
>
> Z.Kalhous
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Jaky OS pro D5?

[*] Robert Suska <robert(zv)korak.sk> - 27.10.2001 13:28:02

> > Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska

:: ABIT ST6

Vymen si dosku

Robo


> > Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
> > Zkousel to nekdo?
> >
> > HW:
> > Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro
> >
> > M.Kralik

IB a post_event

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 27.10.2001 13:30:52

Jak poslat Event bez commit nevim, ale UDF lze psat i v
DELPHI/KYLIX
> dobry den vespolek,
> vim ze se to tu jiz nekolikrat probiralo, lec pro mne s neupokojivym
> vysledkem.
> Mam ulozenou proceduru na IB, ktera vykonava deletrvajici operaci nad
> tabulkami. V ramci procedury dokazu stanovit stav prubehu (znam pocet
> vstupujicich zaznamu a pocitam si poradi prave zpracovavaneho zaznamu). A
> rad bych kazdou zmenu prubehu o jedno procento dal na vedomi aplikaci formou
> post_event. Jenze jak jiste tusite, post_event je zaslan pouze jednou a to
> po commitu transakce.
> Neznate prosim nekdo nejaky FIIGL jak ten post_event prubezne dostavat k
> aplikaci? Formou UDF se mi do toho moc nechce, obzvlaste kdys cecku
> neholduji a tudiz psat UDF pro linux je tak trochu nad me sily.
> za kazdy napad predem dekuji
>
> s pranim plodneho dne
> PavelC
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Jaky OS pro D5?

[*] Jir� Kratochv�l <jiri.kratochvil(zv)webzin(tec)cz> - 27.10.2001 13:43:30

> Myslim ze se to tak mozna jmenuje, ale fakt nevim... :)
> Byl to namet pro vetsi mozky, nez jsem ja,,.....
Opravdu existuje nahrada zvana kylix, kter� je prakticky totozna s Delphi. A
nejlepsi na Kylixu je to, ze je v OpenEdition zdarma !!

Jirka


DllSurrogate Win2000/WinNT

[*] Male�ek Ond�ej <ondrej.malecek(zv)radom-cz(tec)cz> - 27.10.2001 13:53:55

Ahoj,
pouzivam volani COM objektu umisteneho v DLL z CGI aplikace a aby to bylo
jeste zajimavejsi potrebuji aby byla DLL hostovana v konkretnim exe.
Pouzivam k tomu nastaveni DllSurrogate v registry. Na PC, kde vyvyjim (D5
Win2000) mi to chodi uplne super. Po premisteni na server, kde je NT 4.0 mi
vytvoreni instance COM objektu pomoci CoCreateInstance konci chybou 'Access
denied'. Nastaveni pristupovych prav v dcomcnfg mam na obou PC stejne
(povoleno uplne vsechno co jde), takze uz me vazne nenapada v cem by mohl
byt problem. Nemate s tim nekdo zkusenosti ?? Je snad nejaky podstatny
rozdil mezi Win2000 a WinNT v pouziti DllSurrogate ??

Diky Ondrej

IB a post_event

[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 27.10.2001 13:57:56

To je fakt, asi me to nemine. Dik.
PavelC
From: Kaka�ka Pavol <kakacka(zv)proca(tec)cz>
> Obavam sa bez UDF to nepojde, ale na linuxu existuje i Kylix alebo aj
> FreePascal kde je mozne napisat UDF. :)

TChartAxisTitle already exists

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2001 14:36:11

From: "Libor Filip" <filip(zv)agrokonzulta(tec)cz>
> EXE i DLL mam prelozene s balicky.

S jakymi presne ?

Petr Vones


IB a post_event

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 27.10.2001 14:36:43

> Odes�latel: ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz>
> Mam ulozenou proceduru na IB, ktera vykonava deletrvajici operaci nad
> tabulkami. V ramci procedury dokazu stanovit stav prubehu (znam pocet
> vstupujicich zaznamu a pocitam si poradi prave zpracovavaneho zaznamu). A
> rad bych kazdou zmenu prubehu o jedno procento dal na vedomi aplikaci formou
> post_event. Jenze jak jiste tusite, post_event je zaslan pouze jednou a to
> po commitu transakce.
> Neznate prosim nekdo nejaky FIIGL jak ten post_event prubezne dostavat k
> aplikaci? Formou UDF se mi do toho moc nechce, obzvlaste kdys cecku
> neholduji a tudiz psat UDF pro linux je tak trochu nad me sily.
> za kazdy napad predem dekuji
V.Bodecek presne toto prave minuly tyden predvadel na kurzu IB/IBX :-)
Ovsem pres UDF.

Posilam mu problem v kopii.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Hledani v ListBoxu

[*] Zden�k Sv�en - 27.10.2001 15:10:43

Ahoj,

potrebuju udelat seznam slov, setridit ho a pak po stisku nejakeho pismena
najet na prvni slovo, ktere na to pismeno zacina.
Myslel jsem, ze ListBox to zaridi, ale chova se mi to dost podivne. Nekdy to
funguje, pak hned zase ne.
Na formulari mam jen ten ListBox (kdyz to testuju) a funguje to stridave.
Nevite co s tim?

Z.S.

OT: Re: Jaky OS pro D5?

[*] Hurricane <hurricane(zv)quick(tec)cz> - 27.10.2001 15:23:37

Zdravim

> > Pro Linux mam dojem take jde D5 ale ted si nevzpomenu na distribucni
> Myslite Kylix??? :))

D5 se daji rozchodit pod WINE. Zkousel jsem to a dokonce to i zkompilovalo
aplikaci a spustila se.

> > nazev, jinak pod OS/2, eCom Station bude neco take velmi brzo, ci
dokonce
> Jestli se nepletu, tak v OS/2 by mely chodit wokenni aplikace bezne, nebo
se
> pletu?
OS/2 ma nativni podporu pro Win16 aplikace. Pro Win32 existuje program
(projekt) Odin. De facto totez co WINE. Jak to ale funguje nemam zdani. Pry
je to uspesne.

Hurricane


Hledani v ListBoxu

[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 27.10.2001 15:32:52

Nevim zda jsem presne pochopil co potrebojesh, ale zalezi na tom kde to odchytavas. Takle to funguje skvele:

procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
i: integer;
begin
for i:= 0 to Listbox1.items.Count -1 do
begin
if AnsiPos(Char(Key), listbox1.Items[i]) = 1 then
begin
listbox1.itemIndex:= i;
break;
end;
end;
end;

Ladap

>>> dkonf(zv)seznam(tec)cz 27.11. 2001 15:10:43 >>>
Ahoj,

potrebuju udelat seznam slov, setridit ho a pak po stisku nejakeho pismena
najet na prvni slovo, ktere na to pismeno zacina.
Myslel jsem, ze ListBox to zaridi, ale chova se mi to dost podivne. Nekdy to
funguje, pak hned zase ne.
Na formulari mam jen ten ListBox (kdyz to testuju) a funguje to stridave.
Nevite co s tim?

Z.S.

None

[*] Karel Klimes <klimes(zv)metra(tec)cz> - 27.10.2001 15:50:11

Ahoj,
kde sehnat funkce pro pr�ci s regul�rn�mi v�razi (nap�. jako fce v PHP - ereg).
Zkousel sem torry a DSP, ale nic sem nenasel (mozna to tam je ale mne se to
proste nepovedlo najit :( ).

progr-amather -kchodl- 1989-2001


HTML1

[*] Zden�k Sv�en - 27.10.2001 15:51:28

Ahoj,

na borland(tec)cz jsem nasel toto:

FAQ2653D.txt - Loading a local html file in the HTML control

Category :Internet/WEB
Platform :All-32Bit
Product :

Question:
How do I load a local file in the HTML control?


Answer:
Use the file command in the URL:

Example:
HTML1.RequestDoc('file:///C|/Netscape/Navigator/bookmark.htm');

Nevite, co je zac to HTML1 ? Rad bych tuhle radu pouzil, ale netusim jak.
Diky
Z.S.

Funkce pro pr�ci s regul�rn�mi v�razy

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 27.10.2001 16:02:33

>kde sehnat funkce pro pr�ci s regul�rn�mi v�razi (nap�. jako fce v
PHP - ereg).
>Zkousel sem torry a DSP, ale nic sem nenasel (mozna to tam je ale mne
se to
>proste nepovedlo najit :( ).

http://anso.virtualave.net

D. Toman

Nastaveni verze programu

[*] Roman #ev��k���##�#�(#�h�̿ - 27.10.2001 16:03:46

Ahoj,
potrebuji urcitemu souboru nastavit informace o verzi, atd... Myslim, ze by
to slo nejak pres resource, ale vubec nevim jak. Nemate nekdo nejaky demo
priklad ?

Dik
Roman
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001

HTML1

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 27.10.2001 16:12:11


> How do I load a local file in the HTML control?

> Use the file command in the URL:

> HTML1.RequestDoc('file:///C|/Netscape/Navigator/bookmark.htm');

> Nevite, co je zac to HTML1 ? Rad bych tuhle radu pouzil, ale
> netusim jak.

to je ten HTML control

zkus napsat html a zmackni F1

PeC(zv)

ShellExecute a Print

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2001 16:31:08

From: "Zden�k Sv��en" <dkonf(zv)seznam(tec)cz>
> Funguje to, ale je potreba, aby WebBrowser byl viditelny, jinak se to
> nevytiskne.

Ahoj,

a co nastavit Width a Height u TWebBrowseru na 0.

Petr Vones


DBGrid s FF2 tabulkou

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.10.2001 16:33:38

Zdravim,
pouzivam FF2 tabulku (ne SQL) a v DBGridu je svisla rolovaci lista pouze ve
trech stavech. Uplne nahore - pro prvni zaznam, uprostred - pro vsechny
ostatni zaznamy a uplne dole pro posledni zaznam.
Vypada to blbe. V tabulkach Paradox to jede normalne - sirka scrollbaru
graficky odpovida poctu vet.

Kdo mi pomuze
diky Pavel

----- KOPR software -----
Pavel ZIDEK
http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz


checklistbox

[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 27.10.2001 16:42:14

Diky za radu,
funguje. Ale kdyz se pohybuji po zaznamech sipkama, tak se to podezrele preklesluje. Da se to nejak odstranit?

S pozdravem
Miroslav Drejcek.

*********** REPLY SEPARATOR ***********

On 27.11.2001 at 9:28 ing. Jan Fiala wrote:

>Nejprve je treba nastavit Style na lbOwnerDrawFixed nebo
>lbOwnerDrawVariable a pak napsat vlastni obluhu udalosti OnDrawItem.
>
>Pro tvuj pripad staci Style := lbOwnerDrawFixed a
>
>procedure TForm1.CheckListBox1DrawItem(Control: TWinControl;
> Index: Integer; Rect: TRect; State: TOwnerDrawState);
>begin
> with TCheckListBox(Control) do begin
> if Index mod 2 = 0 then
> Canvas.Font.Style := [fsBold]
> else
> Canvas.Font.Style := [];
>
> Canvas.TextOut(Rect.Left + 2, Rect.Top + 1, Items[Index]);
> end;
>end;

Hledani v ListBoxu

[*] Miroslav Evjak <evjak(zv)atlas(tec)cz> - 27.10.2001 16:58:46

> potrebuju udelat seznam slov, setridit ho a pak po stisku nejakeho pismena
> najet na prvni slovo, ktere na to pismeno zacina.

Ahoj,

jestli si dobre pamatuju, tak RxLib komponenty to umi (TextListbox a dalsi).

Mirecek
mailto:miroslav.evjak(zv)seznam(tec)cz
http://www.sweb(tec)cz/miroslav.evjak

HTML1

[*] Zden�k Sv�en - 27.10.2001 17:20:58

>
> to je ten HTML control
>
> zkus napsat html a zmackni F1
>
> PeC(zv)

Moc moudrej z toho nejsem. Neni tam jedinej priklad.

ShellExecute a Print

[*] Zden�k Sv�en - 27.10.2001 17:39:06


> Ahoj,
>
> a co nastavit Width a Height u TWebBrowseru na 0.
>
> Petr Vones
>

To by asi slo, ale ja ten tisk "startuju" z DOS aplikace a jakmile zobrazim
formular, tak se mi to z te aplikace prepne do Windows.

Proto se potrebuju zbavit toho dialogu vyvolaneho ShellExecute, aby se mi
nic neprepinalo.

ShellExecute a Print

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2001 17:47:52

From: "Zden�k Sv��en" <dkonf(zv)seznam(tec)cz>
> To by asi slo, ale ja ten tisk "startuju" z DOS aplikace a jakmile zobrazim
> formular, tak se mi to z te aplikace prepne do Windows.

Ahoj,

aha, a neslo by to udelat trochu vice 'normalne' ? Prece jen se pise rok 2001
a DOS aplikace asi neni uplne to prave.

> Proto se potrebuju zbavit toho dialogu vyvolaneho ShellExecute, aby se mi
> nic neprepinalo.

Zkus predat SW_SHOWMINNOACTIVE jako nShowCmd parametr.

Petr Vones


Jaky OS pro D5?

[*] JIM Design <jim.design(zv)iol(tec)cz> - 27.10.2001 18:07:41

ahoj,

Celeron 766 a zvlast s 256 RAM je dostatecny hardware k behu XP s Delphi, to
mohu rici z vlastnich zkusenosti s XP.
Delphi 5 jsem sice pod nima nezkousel, ale predpokladam ze kdyz jsou na
stejnem zakladu jako W2000, musi pod nima D5 bezet bez problemu.

M.Jirman

P.S: k urychleni si nezapomen vypnout vsechny ty visualni blbosti co tam M$
vyrobil - navic je to s nima SILENE neprehledne.

-----Original Message-----
Behalf Of Pavel ZIDEK


A nebude XP trosku narocny na hardware? Myslim si, ze Celereon bude trochu
pomaly.
Pavel

>
> > jaky si myslite, ze je nejvhodnejsi OS pro D5?
> > Pouzival jsem Win98SE, ted jsem zkousel Win2000, ale nesnasi se to asi s
> > deskou a samovolne se to resetuje, takze mam 3 moznosti:
> > - vratit se k 98SE
> > - pouzivat ME
> > - zkusit XP
> >
> > Co radite? Ja bych zkusil ty XP, ale nevim, jestli jak se s D5 snaseji?
> > Zkousel to nekdo?
> >
> > HW:
> > Celeron 766, 256MB RAM, 13GB HDD, Matrox G400 16MB, Deska AOpen AX63Pro
> >
> > M.Kralik
> >
>
> Moje rada je, zkus XP, a kdyz to nepujde, tak vymen desku.
>
> Radim


HTML1

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 27.10.2001 18:39:05

>> to je ten HTML control
>> zkus napsat html a zmackni F1

> Moc moudrej z toho nejsem. Neni tam jedinej priklad.

Myslim, ze THTML bola sucastou starsich verzii Delphi, tusim od verzie 2
(naimportovana ActiveX z Internet Control Pack od Microsoftu).
Myslim, ze to uz nie je podporovane a namiesto toho by si mal pouzit nieco
ine, napr. TWebBrowser.Navigate.

HTH
TOndrej


Uchovanie nakresleneho obrazca na Forme

[*] DELPHI <korin.delphi(zv)centrum(tec)cz> - 27.10.2001 19:22:00



> Zdravim ...
>
> nemam po ruke ziadnu knihu o Delphi a tak Vas ziadam o pomoc ...
>
> Nakreslim si pomocom TCanvas nejake obrazce napr. na Form ... ked tento
> Form prekrijem a vratim sa potom spat, nakreslene obrazce zmiznu ... ako
> sa to robi aby mi nezmizli ? Viem, ze sa to da, som o tom cital, ale
> teraz si to nemam kde najst ... tos pomozte :)
>
> Slavo

Co vim tak by sis mel udelat procedurku pro form.onrepaint a tam to
nakreslit znova => proste se to pri kazde prilezitosti nakresli znova.. :)
Korin


Kontakty MS Outlook

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.10.2001 20:00:44

Nedavno jsem neco podobneho hledal, nevim presne kde jsem to nasel, ale bylo to
nekde tady /:-)/:
http://www.delphifaq.com/fq/q2184.shtml
http://www.delphifaq.com/fq/q2141.shtml
http://delphi.about.com/bltip0800.htm
http://www.scalabium.com/faq/dct0121.htm

OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO


>existuje nejaky sposob "zdielania" kontaktov MS Outlook 2000 pripadne MS
Outlook 97 ?
>(nacitat meno, tel cislo, fax a pod.)

ListBox

[*] Jaroslav Bayer <jaroslav.bayer(zv)quick(tec)cz> - 27.10.2001 21:25:30

Pou�ij
Listbox1.itemindex
d� ti to index ukazov�tka...
Jarda
From: Martin �d�rsk� <zdary(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>...Je nekde promena, ve
ktere je ulozena pozice rolovatka?
diky


1001 tipu a triku: Tajemne funkce

[*] Karel Krtecek <karel.krtecek(zv)centrum(tec)cz> - 27.10.2001 23:14:28

Dobry den,

v tipech 882 a 884 jsou pouzity zvlastni funkce
ListView_GetSubItemRect a ListView_GetColumnOrderArray.
Delphi mi na nich zahlasi chybu. Kde je najdu?

Diky za pomoc

Karel Krtecek


ADO, Stored. proc. a temporary table

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 27.10.2001 23:15:52

Preji vsem pekneho dne,

na MS SQL Serveru 2000 mam ulozenou proceduru priblizne
tohoto zneni (orezana na minimum):

CREATE PROCEDURE USP_DELETEPROJECT
(zv)A_IDPROJECT INTEGER
AS
CREATE TABLE #SUBARRAY (IDPROJECT INTEGER)
INSERT INTO #SUBARRAY VALUES ((zv)A_IDPROJECT)
DROP TABLE #SUBARRAY
RAISERROR ('Some bullshits.', 11, 1)
RETURN
GO

Z delphi ji pomoci ADO volam takto:

with ADOStoredProc do
begin
ProcedureName := 'USP_DELETEPROJECT';
Parameters.Refresh;
Parameters.ParamByName('(zv)A_IDPROJECT').Value := 1;
ExecProc;
end; {with}

Problem spociva v tom, ze mi v metode ExecProc nedojde k
vyslehnuti vyjimky. Pokud ve stor. proc. vynecham radek s
INSERTem, chodi to tak, jak ma. Vzhledem k tomu, ze vkladat do
te pomocne tabulky musim, me uvedena nefunkcnost stve (pokud
uloz. proc. krokuju, funguje to, jak ma). Jak toto napravit?

Diky za kazde info

Slavek


Durex - Let's make kids better.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


1001 tipu a triku: Tajemne funkce

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2001 23:20:57

From: "Karel Krtecek" <karel.krtecek(zv)centrum(tec)cz>
> v tipech 882 a 884 jsou pouzity zvlastni funkce
> ListView_GetSubItemRect a ListView_GetColumnOrderArray.
> Delphi mi na nich zahlasi chybu. Kde je najdu?

Ahoj,

v unitu CommCtrl

Petr Vones



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