Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Hint pri Disabled
[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 23.10.2000 11:08:03
Protoze pri Enabled = false nejsou oknu posilany zpravy, tak bych to napsal
nejak takhle
TForm1 = class(TForm)
Edit1: TEdit;
procedure FormCreate(Sender: TObject);
procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
private
{ Private declarations }
FHintWindow: THintWindow;
FRect: TRect;
public
{ Public declarations }
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FHintWindow:= THintWindow.Create(Self);
With FRect do begin
Left:= Edit1.Left;
Top:= Edit1.Top;
Right:= Left + Edit1.Width;
Bottom:= Top + Edit1.Height;
end;
end;
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
P: TPoint;
begin
P.x:= X;
P.y:= Y;
if PtInRect(FRect, P) then begin
P:= ClientToScreen(P);
FHintWindow.ActivateHint(RECT(P.x, P.y, P.x + 30, P.y + 15),
Edit1.Name);
end
else
FHintWindow.ReleaseHandle;
end;
Ales
----- Original Message -----
From: Jan Naiser <tua(zv)wo(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, October 21, 2000 3:37 AM
Subject: Hint pri Disabled
> Preji pekny den,
>
> nevite nekdo, jak by se dal vykreslit klasicky mysi Hint pri nastavenem
> Enabled:= false u komponenty? (Napr u DBEditu.)
>
> Dekuji.
>
> Honza Naiser.
>
>
Da se udelat Group by z pocitanych polozek??
[*] r.jansa(zv)cs.mfcr(tec)cz - 23.10.2000 11:16:10
Ahoj vsichni
Setkal jsem se s problemem, kdy potrebuju seskupovat udaje v local SQL podle
pocitanych polozek. Podle specifikace to nejde. neda se to obejit?
priklad
select SUBSTRING(table.field from 4 for 2) as polozka, COUNT(*) from table
GROUP BY polozka
Za Vasi pomoc dekuji Roman Jansa
DBGrid - aktualni zaznam
[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 23.10.2000 11:18:22
Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
sloupce v aktualnim radku.
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
----- Original Message -----
From: "Jan Naiser" <tua(zv)wo(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, October 22, 2000 12:00 PM
Subject: DBGrid - aktualni zaznam
> Preji pekny den,
> D5.01P
>
> je mozne nejakym zpusobem zjistit aktualni record v DBGridu, tedy ten, na
> ktery ukazuje indikator, jestlize se nachazim v udalosti OnDrawColumnCell
> nebo OnDrawDataCell? Zatim se mi nepodarilo na nic prijit, protoze
> ActiveRecord u Datasetu je Protected, takze se k nemu nedostanu.
>
> Chtel bych obarvit cely radek aktualni pozice pri Options dgRowSelect:=
> False tak, aby vypadal jako pri True (pro vetsi prehlednost), ale aby se
> dalo pohybovat po jednotlivych bunkach horizontalne pomoci kl. sipek, coz
> pri True nejde.
>
> Nebo by mi stacilo vyresit uchovani a obnoveni pozice horizontalniho
> ScrollBaru DBGridu pri refreshi dat, nebot, pokud se uzivatel diva na data
> "za rohem", po refreshi se ScrollBar nastavi vzdy na zacatek, coz jest
dosti
> neprijemne. Pak by ale zbyvalo vyresit posun pomoci sipek v horizontale,
> nebot pri nastavenem true se prevadi na posun vertikalni.
>
> Za pripadne namety predem dekuji.
>
> Honza Naiser.
>
>"Velikost" dotazu ...
[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 23.10.2000 11:24:19
Krasneho dne preji,
mel bych otazku - jak rozsahly muze byt dotaz, ktery cpu do TQuery ?
Pokud mi SQL.Text preleze urcitou hranici - program se pri query.Open slozi
konkretni cisla - velikost dotazu ve znacich = 25 300
Jde mi o to, jakym zpusobem prekonvertovat dotaz, ktery nemohu updatovat (RequestLive = false, napr. s exists nebo in klauzulemi) na jednoduchy dotaz (pouze pomoci PrimKlic = neco or PrimKlic = neci ...)
Pokud by nekdo vedel o necem lepsim - pls poradte - Delphi 5 + MS Access tabulky
Dik
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
SQLExtension pro Flah Filer 1.57
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 23.10.2000 12:17:18
Bohuzel nenasel jsem nic ani tam
jedine co jsem nasel nasel tak na verzi Flash Filer 1.52
----- Original Message -----
From: "Ing. Patrik Tesar" <tesar(zv)rainside.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 19, 2000 8:52 AM
Subject: RE: SQLExtension pro Flah Filer 1.57 > Tu je access na zalohovanie konferi o Flash Fileri. Skus to tam najst:
>
> http://www.priv.bus.at/graf/quell/delphiarchives/index.htm
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Heinisch Jiri
> Sent: Wednesday, October 18, 2000 5:53 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: SQLExtension pro Flah Filer 1.57
>
>
> Ahoj
>
> kde bych nasel SQL Extension pro FF 1,57 a D5
>
> moje putovani po internetu bylo bohuzel neuspesne
>
>
> S pozdravem JH
>
>
> Opera�n� syst�m nepodporuje vybranou �ad�c
[*] Ren� Piz�r - 23.10.2000 12:44:47
Zdravim,
nestretol sa niekto z Vas s takouto chybou:
EOleException: Opera�n� syst�m nepodporuje vybranou �ad�c� posloupnost
Dokonca mi delphi hlasi tuto chybu - v design mode, ked sa pokusam
nastavit jedno AdoQuery.Active na True.
Rene Pizur
Zjisteni frekvence procesoru, velikosti pameti, ap
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.10.2000 13:00:32
From: "Krayzel Libor" <Libor.Krayzel(zv)czech-tv(tec)cz>
> nemate nekdo komponentu (D4) na zjisteni typu a frekvence procesoru,
Ahoj,
v JCL (http://delphi-jedi.org/Jedi:JCLDOWNLOADS) najdes v unitu JclSysInfo
plno funkci na zjistovani typu, rychlosti a dalsich specifickych vlastnosti
Intel, AMD a Cyrix procesoru. Vice se doctes v helpu k JCL.
> pripadne velikosti operacni pameti?
To by slo priblizne takhle:
procedure TForm1.Button2Click(Sender: TObject);
var
MemoryStatus: TMemoryStatus;
begin
FillChar(MemoryStatus, SizeOf(MemoryStatus), 0);
MemoryStatus.dwLength := SizeOf(MemoryStatus);
GlobalMemoryStatus(MemoryStatus);
ShowMessageFmt('%d MB', [MemoryStatus.dwTotalPhys shr 20]);
end;
Petr Vones, amatersky programator
Ikona k service
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.10.2000 13:03:08
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
> cerpas jen z dokumentace nebo z vlastni zkusenosti? Zkousel jsem to
> samozrejme na Win9x a zprava nedorazila..
Ahoj,
nezkousel jsem to, v tomhle pripade jsem se spolehl na MS dokumentaci ;-)
Petr Vones, amatersky programator
Zjisteni frekvence procesoru, velikosti pameti, ap
[*] Tom� Vlad�k������V��?���o�� - 23.10.2000 13:20:54
Vyzkousej z JEDI Code Library unit JclSysInfo
Ruzne jazyky
[*] Ladislav B�RTA <bartal(zv)vfu(tec)cz> - 23.10.2000 13:24:31
jak mam postupovat, kdyz chci ve sve aplikaci umoznit pouzivani vice jazyku
(formou prepinani v menu). Co kde musim nastavit a kde dopsat vicejazycne
verze textu apod.
LADIS
kalkulacka
[*] Ing. Karel Partl <partl(zv)zf.jcu(tec)cz> - 23.10.2000 13:41:47
Ahoj
Potreboval bych funkci nebo neco podobnyho, ktera mi vypocte aritmeticky
vyraz (ve kterem se vyskytuji operatory +,-,*,/). Nemate nekdo neco
takovyho, nebo nevite, kde to sehnat?
Predem dik
Karel
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.166 / Virov� b�ze: 79 - datum vyd�n�: 20.6.2000
COM event
[*] tomas.kminek(zv)post(tec)cz - 23.10.2000 13:46:33
Prosim vas nevite nekdo jak implementovat do OLE/COM objektu eventy IConnectionPoint. Asi nejlip popsany je to v knize DevGuide Delphi5, ale ani tam jsem to nepochopil.
Diky Kminek
Jsou uz Vase oblibene stranky na
*** http://NAJDI.TO ?Paradox versus InterBase
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 23.10.2000 13:53:13
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Rad bych se zeptal, jak velky je rozdil mezi Interbasi a Paradoxem.
Samozrejmne z hlediska pouzivani. Ma Paradox nejaka omezeni? Je pomalejsi?
Kdy je vhodne pouzit Interbasi, ci jiny server?
S pozdravem dekuji,
Michal Tiller
RF Support Coordinator, OSKAR, RF - Engineering
+420 (0608) 011 327, +420 (02) 71 17 13 88
Michal.Tiller(zv)oskarmobil.Cz <mailto:Michal.Tiller(zv)oskarmobil.Cz>
ODBC
[*] Daniel Sichta <dano(zv)customweb.sk> - 23.10.2000 14:08:56
Neviete kde by som mohol zohnat ODBC driver pre IB 6.0 ?
Dakujem
Ing. Daniel �ichta
CUSTOM.web s.r.o.
Hod�ova 13
01001 �ilina, SLOVAKIA
www.customweb.sk <http://www.customweb.sk>
dano(zv)customweb.sk <mailto:dano(zv)customweb.sk>
ICQ: 84700861
kalkulacka
[*] Ale� Va���ek�����"q��y�&���w�3 - 23.10.2000 14:52:03
Ahoj,
kdyz si nainstalujes RX komponenty (link tady v konferenci nescetnekrat
probehl), budes tam mit unitu Parsing.pas, ktera tohle presne umi, vcetne
vnorenych zavorek apod. Ma to velmi jednoduche pouziti:
function GetFormulaValue(const Formula: string): Extended;
Ales
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ing. Karel Partl
> Sent: Monday, October 23, 2000 1:42 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: kalkulacka
>
>
> Ahoj
>
> Potreboval bych funkci nebo neco podobnyho, ktera mi vypocte aritmeticky
> vyraz (ve kterem se vyskytuji operatory +,-,*,/). Nemate nekdo neco
> takovyho, nebo nevite, kde to sehnat?
> Predem dik
> Karel
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.166 / Virov� b�ze: 79 - datum vyd�n�: 20.6.2000
>
>Ikona k service
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.10.2000 15:10:30
On 23 Oct 2000, at 10:22, Dalibor Toman wrote:
> > From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
> > >
> > > Zkousel jsem to odchytit takto, i pres WndProc hlavniho okna, ale
> > > ani jedno to nebere. Jeste zbyva jit po krku servisu, zda to nekde
> > > nechyta on.
> >
> > Aha, ted jsme meli asi kazdy namysli neco jineho. Ja jsem myslel
> > prave tu registrovanou zpravu. Ohledne WM_USERCHANGED, tato zprava
> > se neposila na
> NT
> > ale jen na Win9x.
>
> cerpas jen z dokumentace nebo z vlastni zkusenosti? Zkousel jsem to
> samozrejme na Win9x a zprava nedorazila..
Zkousel jsem to na W2000, protoze na W9x nema service smysl.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
master-detail pri IBDataset
[*] Ota Maly <maly(zv)space(tec)cz> - 23.10.2000 15:23:03
Ahoj,
Jak resite zobrazeni master-detail tabulek pri pouziti komponenty IBDataSet?
Delam to spravne, pokud reaguju na zmenu master a zmenim select na detail
tabulce?
A k te zmene, pokud pouzivam DBaware komponenty, lze to udelat jinak nez
close; modifikaceSQL; open; ?
Vim, ze DBaware pouzivat nemam :), jenze nas tu docela dost tlaci cas, takze
jsem se k tomu uchylil. Proto vychazejte z toho, ze je pouzivam..:-)
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
Klicove slovo Admin v IB6
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 23.10.2000 15:35:47
Ahoj,
zjistil jsem, ze na IB6 serveru je zrejme na neco vyhrazene slovo
ADMIN. Nevite nekdo, co znamena? Napr. pokud chci mit uzivatele
ADMIN, narazim kazdou chvili na SQL error. Pokud misto slova
ADMIN pouziji jineho uzivatele, je vse OK.
Dik,
David
ODBC
[*] Karel B�ich��� - 23.10.2000 15:57:08
Ahoj,
souhrn takovychto veci je k videni na strankach Claudia Valderramy:
http://www.cvalde.com/misc/packages_and_utilities.htm
Zdravim
Brichna
> Neviete kde by som mohol zohnat ODBC driver pre IB 6.0 ?
> excel-surne
[*] Martin <geoplan(zv)pp.sinet.sk> - 23.10.2000 16:00:57
zdravim,
potrebujem pracovat z delphi z excelom. Asi pomocou ole. Potrebujem sa iba pohybovat po jednotliv�ch bunkach a zapisovat do nich hodnoty. Malo by to ist asi nejak takto.
vo var si defunujem premennu napr. excel typu variant
potom jej priradim hodnotu cez funkciu CreateOleobject("excel.basic")
a potom by som mal pracovat rovno s excelom napr. excel. a tu nejake metody.
A prave help k tymto metodam nemozem nikde najst. Skusal som help k excelu aj k VBA ale nic som nenasiel.
Neviem ci uvedeny postup je spravny.
Mozte ma niekdo naviest a prip. maly priklad na pohyb medzi bunkami a zapis hodnot by bodol.
vdaka za kazdu odpoved
Martin
Da se udelat Group by z pocitanych polozek??
[*] Lubo Fule <fule(zv)sct.sk> - 23.10.2000 16:04:34
Skus to takto:
select SUBSTRING(table.field from 4 for 2),
COUNT(*) from table
GROUP BY SUBSTRING(table.field from 4 for 2)
> Setkal jsem se s problemem, kdy potrebuju seskupovat udaje v
> local SQL podle
> pocitanych polozek. Podle specifikace to nejde. neda se to obejit?
> priklad
>
> select SUBSTRING(table.field from 4 for 2) as polozka,
> COUNT(*) from table
> GROUP BY polozka
>
> Za Vasi pomoc dekuji Roman Jansa
Paradox versus InterBase
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 23.10.2000 16:57:17
ahoj,
odpoved nejlepe najdes v archivu konference.
zakladni rozdil je ten, ze pdx je "desktopova" databaze, zatimco IB je
client/server. pokud ti to nic nerika, bude lepsi se nejprve s temito
pojmy seznami, jinak tezko vysvetlovat po mejlu.
btw, priste to neposilej jako html, ale plain text.
dekuji peca
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
******* Hi! I'm a signature virus. Copy me into your signature, please.
*******
The signature virus says: Love isn't only blind, it's also deaf, dumb,
and stupid.Interbase a Delphi
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 23.10.2000 17:07:08
Je to trochu trivialni dotaz, ale nikdy jsem nedelal s interbase -
jak se na nej v Delphi pripojim, jak posilat pozadavky, a
hlavne - jde to bez BDE?
Predem dekuji
----------------------------------------
Stanislav PETR
E-Mail: glux(zv)centrum(tec)cz
ICQ: 51846098
Mobil: 0606 862 709
CB: Standa Karl�n, ch.: 11
27,085 MHz FM, sel.: 0879 DTMF
WWW: cbradio.baf(tec)cz, cgiknihovna.kgb(tec)cz
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
kalkulacka
[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 23.10.2000 17:16:06
Na to je nekolik free komponent vcetne zdroju, vetsinou se v jejich
pojmenovani vyskytuje slovo "Parse". Na www.torry.ru urcite neco najdes.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7
tel. +420-2-3337 3855
+420-2-2431 4538
*************************************
-----Original Message-----
From: Ing. Karel Partl [mailto:partl(zv)zf.jcu(tec)cz]
Sent: Monday, October 23, 2000 1:42 PM
To: delphi-l(zv)fwd(tec)cz
Subject: kalkulacka
Ahoj
Potreboval bych funkci nebo neco podobnyho, ktera mi vypocte aritmeticky
vyraz (ve kterem se vyskytuji operatory +,-,*,/). Nemate nekdo neco
takovyho, nebo nevite, kde to sehnat?
Predem dik
Karel
Paradox versus InterBase
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.10.2000 17:20:46
On 23 Oct 2000, at 13:53, Michal Tiller wrote:
> Rad bych se zeptal, jak velky je rozdil mezi Interbasi a Paradoxem.
> Samozrejmne z hlediska pouzivani. Ma Paradox nejaka omezeni? Je
> pomalejsi? Kdy je vhodne pouzit Interbasi, ci jiny server? S pozdravem
> dekuji,
Paradox je pri malem mnozstvi dat obecne rychlejsi nez SQL
databaze. Ovsem pokud data v Paradoxu prerostou urcitou mez
(neni to zas moc, podle okolnosti, napr. statisice vet), pak
slozitejsi dotazy do SQL databaze byvaji radove rychlejsi.
Po neblahych zkusenostech s Paradoxem doporucuji nasadit SQL
databazi vsude, kde na datech alespon trochu zalezi.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Ruzne jazyky
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.10.2000 17:20:46
On 23 Oct 2000, at 13:24, Ladislav B�RTA wrote:
> jak mam postupovat, kdyz chci ve sve aplikaci umoznit pouzivani vice
> jazyku (formou prepinani v menu). Co kde musim nastavit a kde dopsat
> vicejazycne verze textu apod.
Popis vcetne hotove unity pro tento ucel najdes u Lokalizatoru
(http://www.localizator.com).
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
excel-surne
[*] Bohdan Pomsahar <bpomsahar(zv)nocomment.sk> - 23.10.2000 17:20:50
Ja pouzivam komponentu ExcelAplication z Server (delphi 5 enterprise) a to takto:
try
ExcelApplication1.Disconnect; //pripojenie na Excel
except
end;
try
ExcelApplication1.Connect;
except
showmessage (NeniExcel);
Exit;
end;
ExcelApplication1.SheetsInNewWorkbook[0]:=1;
ExcelApplication1.Workbooks.Add(EmptyParam,0); //vytvorenie zosita s jednou stranou
CExportExcel.ExcelApplication1.Cells.Item[1,1]:='N�zov'; //a jednoduche plnenie
CExportExcel.ExcelApplication1.Cells.Item[1,2]:='ICO'; //urcite existuje viac moznosti ale toto funguje
CExportExcel.ExcelApplication1.Cells.Item[1,3]:='DIC';
CExportExcel.ExcelApplication1.Cells.Item[1,4]:='Charakteristika';
CExportExcel.ExcelApplication1.Cells.Item[1,5]:='Po�et zamestnancov';
CExportExcel.ExcelApplication1.Cells.Item[1,6]:='Typ adresy';
CExportExcel.ExcelApplication1.Cells.Item[1,7]:='Ulica';
CExportExcel.ExcelApplication1.Cells.Item[1,8]:='Mesto';
CExportExcel.ExcelApplication1.Cells.Item[1,9]:='PS�';
CExportExcel.ExcelApplication1.Cells.Item[1,10]:='�t�t';
CExportExcel.ExcelApplication1.Cells.Item[1,11]:='Bankov� spojenie';
CExportExcel.ExcelApplication1.Cells.Item[1,13]:='ID';
CExportExcel.ExcelApplication1.Cells.Item[1,14]:='Kontaktn� osoba';
CExportExcel.ExcelApplication1.Cells.Item[1,15]:='Funkcia';
CExportExcel.BitBtn1.Visible:=True; //zviditelnenie excelu
Ostatne na toto sa da prist ak zapnes zaznam makra a potom kuknes ake to porobilo prikazi :)
Bohdan Pomsahar
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, October 23, 2000 4:00 PM
Subject: excel-surne
zdravim,
potrebujem pracovat z delphi z excelom. Asi pomocou ole. Potrebujem sa iba pohybovat po jednotliv�ch bunkach a zapisovat do nich hodnoty. Malo by to ist asi nejak takto.
vo var si defunujem premennu napr. excel typu variant
potom jej priradim hodnotu cez funkciu CreateOleobject("excel.basic")
a potom by som mal pracovat rovno s excelom napr. excel. a tu nejake metody.
A prave help k tymto metodam nemozem nikde najst. Skusal som help k excelu aj k VBA ale nic som nenasiel.
Neviem ci uvedeny postup je spravny.
Mozte ma niekdo naviest a prip. maly priklad na pohyb medzi bunkami a zapis hodnot by bodol.
vdaka za kazdu odpoved
Martin
excel-surne
[*] Karel Kral <kral(zv)purus(tec)cz> - 23.10.2000 17:36:27
V Delphi 5 treba takto:
Na formular nebo do Datamodule das TExcelApplication a TExcelWorkSheet a
dale je par metod, jak se napojit, odpojit atd.
// napoji se na excel, vytvori pracovni sesit a napoji ho na FXLSheet
procedure TNaviXlExport.ConnectExcel;
var
WorkBook: ExcelWorkbook;
begin
try
FXLApp.Connect;
except
raise Exception.Create('Neni excel');
end;
FXLApp.SheetsInNewWorkbook[0]:= 1;
FXLApp.Visible[0]:= true;
WorkBook:= FXLApp.Workbooks.Add(EmptyParam, 0); // toto prida
dalsi worksheet
FXLSheet.ConnectTo(WorkBook.WorkSheets.Item[1] as ExcelWorksheet);
FXLSheet.Name:= 'Data';
end; // proc;
// odpoji se od excelu
destructor TNaviXlExport.Destroy;
begin
FXLApp.Disconnect;
FXLSheet.Disconnect;
inherited;
end;
A takto se pristupuje k bunkam:
FXLSheet.Cells.Item[1, 1]:= 'blablabla';
Dalsi vlastnosti na ovladani jsou k nastudovani v napovede k Excelu (pro
Excel 2000 "C:\Program Files\Microsoft Office\Office\1029\VBAXL9.CHM")
> Martin wrote:
>
> zdravim,
>
> potrebujem pracovat z delphi z excelom. Asi pomocou ole. Potrebujem sa
> iba pohybovat po jednotliv�ch bunkach a zapisovat do nich hodnoty.
> Malo by to ist asi nejak takto.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Jak zablokovat pristup na Internet?
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 23.10.2000 17:41:57
Dekuji pekne za Vasi vytku... Nez pouzijete silna slova, zkuste si
znovu precist, k cemu to potrebujeme. Jedna ucebna je pro studenty
trvale pristupna a nebezi v ni zadna vyuka, takze ani zaci nedelaji
zadnou konkretni ulohu. Chceme ale nejak zvyhodnit studenty vyssi
skoly pred stredni, aby se nemuseli s nekym, kdo je na chatu, tahat o
pocitac, na kterem potrebuji napr. zpracovat projekt zahrady. Tim, ze
stredni skole omezime moznost pracovat na internetu jen na urcite
hodiny, by se to mohlo vyresit, navic by melo odpadnout takove to
davove silenstvi, kdy o prestavce bezi do ucebny jen proto, aby
poslali SMS.
Kritizovana "technicka reseni" jsou z naseho pohledu mnohem
vyhodnejsi - pokud funguji, nemusime se o ne dale starat. Dobre
zkusenosti mame napr. s placeni za tisk - drive jsme porad sledovali,
kdo kolik stranek vytiskl a kolik za to ma zaplatit, po trosce
programovani se to sleduje samo, my i studenti mame perfektni prehled
a nejsou takrka zadne potize. "Takrka" znamena, ze obcas nekdo ze
studentu tisk nezaplati v terminu, pak mu treba muzeme docasne
vypnout internet...
Zmeny setrice a podobne blbosti mame osetrene centralne, po
nalogovani na sit se proste obnovi vsechny potrebne udaje v registru,
takze i kdyz obcas nekdo zmeni pozadi apod., pristimu studentovi se
vse vrati do normalu a nemusime slozite patrat, kdo za to muze. Zadna
jina nastaveni studenti delat nemohou, nemaji pristup k ovladacim
panelum.
Stahovani souboru: obcas bohuzel nekdo neco stahne nebo spusti, aniz
by kloudne vedel, co dela. To je jedna z veci, ktere bych jeste rad
nejak "technicky" osetril...
Karel Rys
Zahradnicka skola Melnik
SSOU Vodochody s.r.o. dne 19 Oct 2000, v 16:50:
> A proc se snazite na vsechno jit technickym resenim ? Ja tedy nevim,
> jak je to u Vas (asi si zaci na hodinach delaji co chteji), ale ja
> spravuju ucebnu a i ucim uz vice nez 10 let a neexistuje, ze by si
> nekdo prinesl na diskete neco jineho nez data (a to jeste i tak musi
> projit antivirem). Kde by se tam potom vzal jiny prohlizec nez IE
> (pokud jej jako spravce jediny nainstaluji ? ). Stejne tak si nikdo
> nedovoli zmenit nekde nejake nastaveni (od zacatku roku jen 1x zmena
> setrice a hned dostal tafku). Jak vubec muze vyucujici dopustit, aby
> si zak delal neco jineho, nez ulozenou ulohu ? To nema prehled o tom,
> co zaci delaji ? Fakt nechapu.
>
> VW
>
>
> ----- Original Message -----
> From: Karel Rys <delphi(zv)zas-me(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Thursday, October 19, 2000 3:04 PM
> Subject: Jak zablokovat pristup na Internet?
>
>
> > Dobry den,
> >
> > rad bych se zeptal, zda jste se nekdo nepokousel (uspesne) vyresit
> > problem, jak zablokovat pristup na Internet, je-li pocitac v LAN,
> > ktera jako nativni protokol pouziva TCP/IP. Potrebovali bychom ve
> > skole alespon v urcitych hodinach zabranit nadsencum provozujicim
> > Chat v blokovani cele ucebny touto ne prave nejsmysluplnejsi
> > cinnosti.
> >
> > Kdysi jsem psal programek AntiExplorer, ktery hlidal spusteni
> > Exploreru, a pokud se vyskytl mezi bezicimi ulohami, tak ho
> > "odstrelil". Nevyhodou bylo, ze ten programek zabiral asi celkem
> > zbytecne dost pameti, navic nebyl univerzalni - napr. proti NetScape
> > by se musel upravit.
> >
> > Nenapada Vas elegantnejsi reseni?
> >
> > Diky za kazdy namet,
> >
> > Karel Rys
> >
> > ______ _ ___ Vyssi odborna skola zahradnicka
> > \ \/ \_ --- | Stredni zahradnicka skola
> > / | | Melnik
> > ( | |
> > \_ ___/ | e-mail: rys(zv)zas-me(tec)cz
> > _/ \\ ______| web: www.zas-me(tec)cz
> > \_ / \_/ tel. 0206/623023-5, 0604/846436
> > \____/ fax 0206/623009
> >
> >
>
Jak zablokovat pristup na Internet?
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 23.10.2000 17:45:40
Asi spise vyuziji radu nekoho z konference pozmenit vychozi branu
nebo adresu pristupoveho proxy serveru. Tim, ze to chceme mit hodne
flexibilni, bude jeden zapis do registru v okamziku, kdy se student
naloguje, velice rychly, jednoduchy a funkcni. Dalsi vyhoda je, ze
budu menit jen nastaveni te ktere stanice a ne neco na linuxovem
serveru, protoze ten bude tezko rozlisovat, kdo o pristup v tu chvili
zada.
A to, co zapisu do registru, se muze automaticky urcit na zaklade
toho, v jake tride ten student je, zda ma napr. tou dobou volnou
hodinu, zda ma zaplaceny dluh za vytistene stranky apod.
Karel Rys
Delphi dne 19 Oct 2000, v 20:19:
> > dopustit, aby si zak delal neco jineho, nez ulozenou ulohu ? To nema
> prehled
> > o tom, co zaci delaji ? Fakt nechapu.
> To znelo tedy tvrde...
>
> Ale k veci.
> Obratte se na spravce nebo na nekoho kdo Vas pripojil k Internetu,
> musite tam nekde mit router zajistujici pristup a na nem nejaky
> firewall. A tam jde nastavit odkud, kam a cim se muzete pripojovat.
> Nektere umi i nastavit kdy. A mozna je tam i konfiguracni utilita, kde
> to jde v nejakem rozumnem stavu nastavit treba pred vyucovaci hodinou.
> Zalezi na SW firewallu. Leos
______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009
excel-surne
[*] Cerny Roman <cerny.roman(zv)atlas(tec)cz> - 23.10.2000 17:49:24
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Tady by se docela hodila informace jakou varzi pouzivas Delphi, protoze ten
postup pro D5 je odlisny.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin
Sent: Monday, October 23, 2000 4:01 PM
To: delphi-l(zv)fwd(tec)cz
Subject: excel-surne
zdravim,
potrebujem pracovat z delphi z excelom. Asi pomocou ole. Potrebujem sa iba
pohybovat po jednotliv�ch bunkach a zapisovat do nich hodnoty. Malo by to
ist asi nejak takto.
vo var si defunujem premennu napr. excel typu variant
potom jej priradim hodnotu cez funkciu CreateOleobject("excel.basic")
a potom by som mal pracovat rovno s excelom napr. excel. a tu nejake
metody.
A prave help k tymto metodam nemozem nikde najst. Skusal som help k excelu
aj k VBA ale nic som nenasiel.
Neviem ci uvedeny postup je spravny.
Mozte ma niekdo naviest a prip. maly priklad na pohyb medzi bunkami a
zapis hodnot by bodol.
vdaka za kazdu odpoved
Martin
Zjisteni frekvence procesoru, velikosti pameti, ap
[*] Erik Salaj <winsoft(zv)napri.sk> - 23.10.2000 17:51:19
> nemate nekdo komponentu (D4) na zjisteni typu a frekvence procesoru,
> pripadne velikosti operacni pameti?
Na http://www.cybermagic.co.nz/winsoft je free merac frekvencie procesora.
Erik Salaj, WINSOFT
Ikona k service
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 23.10.2000 18:45:06
>
> Zkousel jsem to na W2000, protoze na W9x nema service smysl.
ma i nema.
I na Win9x lze spustit program jako 'service' - spusti se i kdyz Windows
vyzaduji prihlaseni usera
D. Toman
ODBC
[*] Richard Zirovnicky <richard.zirovnicky(zv)oskarmobil(tec)cz> - 23.10.2000 18:46:13
ODBC pro InterBase
www.easysoft.com
Richard
Interbase a Delphi
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 23.10.2000 19:05:24
Je to jednoduche.
Pouziji se komponenty IB.
Je potreba TIBDatabase, TIBTransaction.
V prikladech v Delphi je nekolik ukazek, jak k takove databazi pristupovat.
Nejprv je ale potreba v IBConsoli vytvorit databazi. Je to soubor *.GDB
ktery celou databasi obsahuje.
Pak na ni lze pomoci TIBDatabaze ukazovat.
Lze pouzit TIBTable nebo TIBQuery k pristupu k datum.
Toto je cele bez pouziti BDE. Misto toho je potreba IBClient.
Nebo lze v BDE udelat Alias na IB DB a pak k ni pristupovat standardne jako
ke vsem DB pomoci TTable nebo TQuery.
:)
Nevim v jakych verzich Delpi jsou IB componenty obsazeny. Ja mam Delphi 5
Enterprice a tam to je. Mozna je lze nekde stahnout. To nevim.
S pozdravem Michal Tiller
-----Original Message-----
From: Stanislav PETR [mailto:glux(zv)centrum(tec)cz]
Sent: Monday, October 23, 2000 5:07 PM
To: Delphi
Subject: Interbase a Delphi
Je to trochu trivialni dotaz, ale nikdy jsem nedelal s interbase -
jak se na nej v Delphi pripojim, jak posilat pozadavky, a
hlavne - jde to bez BDE?
Predem dekuji
----------------------------------------
Stanislav PETR
E-Mail: glux(zv)centrum(tec)cz
ICQ: 51846098
Mobil: 0606 862 709
CB: Standa Karl�n, ch.: 11
27,085 MHz FM, sel.: 0879 DTMF
WWW: cbradio.baf(tec)cz, cgiknihovna.kgb(tec)cz
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Jak schovat ScrollBar v ListView?
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 23.10.2000 19:27:31
Hmmm, tohle na ListView bohuzel nezabira...
Petr Fischer
> Zkus ShowScrollBar(ListView.Handle, SB_VERT, False)
>
> Ales
> ----- Original Message -----
> From: Petr Fischer <fifa(zv)praguesoft(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Friday, October 20, 2000 7:54 PM
> Subject: Jak schovat ScrollBar v ListView?
>
>
> > Zdravim,
> >
> > potreboval bych natvrdo schovat ScrollBar v ListView (pohled
> > vsReport). Jde to (urcite jo :-)???
> >
> > Dekuji, Petr Fischer
> >
> > Delphi5
>
DBGrid - aktualni zaznam
[*] Jan Naiser <tua(zv)wo(tec)cz> - 23.10.2000 19:36:30
To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo OnDrawDataCell je
takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
indik�tor.
Honza.
----- Original Message -----
From: Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 11:18 AM
Subject: Re: DBGrid - aktualni zaznam
> Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> sloupce v aktualnim radku.
> Pavel
> -------------------------------------------------
> Pavel Skalick�
> e-mail - P.Skalicky(zv)seznam(tec)cz
> www - http://pts.kvalitne(tec)cz
> mobil - 0604 844 698
> ICQ - 38169741
> ----- Original Message -----
> From: "Jan Naiser" <tua(zv)wo(tec)cz>
> To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
> Sent: Sunday, October 22, 2000 12:00 PM
> Subject: DBGrid - aktualni zaznam
>
Com port
[*] Erik Salaj <winsoft(zv)napri.sk> - 23.10.2000 21:29:15
> potrebuju udelat aplikaci ktera by konikovala s mobilem pres kabel pres
AT
> prikazy.
>
> Muzete mi pomoci :
>
> jak se aktivuje com1 port?
> jak se pracuje s com1 portem?
>
> pripadne jestli byste mi neposlali nejaky priklad ci dali odkaz, kde bych
> to mohl najit....
Napr. ComPort komponent z http://www.cybermagic.co.nz/winsoft
pripadne podobne komponenty z DSP usetria spustu prace.
Erik Salaj, WINSOFT
D4 Tutorial
[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 23.10.2000 22:13:39
ahoj lidicky, abych taky negdy necim prispel... Nasel sem docela
objemnej Delhi4 Tutorial. Je to sice anglicky, ale urcite to nekomu
pomuze... A adresa? :
http://ktermo41.fme.vutbr(tec)cz/web/Delphi4
--
Martin Pe�ava
/--------------------------------------------------------------\
| E-Mail: mailto:mail(zv)jimx.net ICQ# 18148896 |
| WebMaster of |
|http://miss.jimx.net - Neofici�ln� str�nka MISS �R a CyberMiss|
\--------------------------------------------------------------/Zbyskov Localizator
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 23.10.2000 22:18:57
Ahoj.
Localizator je super vec, ale sa chcem opytat na dve veci:
1. Skusil som demoverziu, prelozil som si skusobne zopar textov, ale mne sa
jedna o databazovu app. s IB6 mi zahlasi ze nevie modifikovat
TIBDatabase.DatabaseName, lebo je OPEN. Ako mam zabezpecit aby pred tou
tvojou procedurou z Transl.pas "TranslatesAdd" zatvorit IBDatabase.
2. Chcem v app. pouzit aj TeeChart, ale on obsahuje anglicke texty. Ako by
smo mohol prelozit texty este v povodnom subore a k nemu prelozit cesku, ...
verziu?
Dakujem
Roland.Zbyskov Localizator
[*] Mgr. Daniel Schmidt <dschmidt(zv)centrum.sk> - 23.10.2000 22:20:12
Dobry den,
pouzivam D5 Pro, WNT 4.0 a DialUp pripojenie.
V ramci testovania Projektu by som ale potreboval pripojenie cez nejaku
Proxy.
Mohli by ste mi prosim nejaku (co najjednoduchsiu - HTTP staci) poradit ?
Dakujem
Daniel Schmidt
DBGrid - aktualni zaznam
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 23.10.2000 23:39:57
Ahoj,
udalost OnDrawColumnCell ma parameter State: TGridDrawState = set of
(gdSelected, gdFocused, gdFixed). Skus to s gdFocused.
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Jan Naiser <tua(zv)wo(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 7:36 PM
Subject: Re: DBGrid - aktualni zaznam
To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo OnDrawDataCell je
takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
indik�tor.
Honza.
----- Original Message -----
From: Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 11:18 AM
Subject: Re: DBGrid - aktualni zaznam
> Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> sloupce v aktualnim radku.
> Pavel
> -------------------------------------------------
> Pavel Skalick�
> e-mail - P.Skalicky(zv)seznam(tec)cz
> www - http://pts.kvalitne(tec)cz
> mobil - 0604 844 698
> ICQ - 38169741
> ----- Original Message -----
> From: "Jan Naiser" <tua(zv)wo(tec)cz>
> To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
> Sent: Sunday, October 22, 2000 12:00 PM
> Subject: DBGrid - aktualni zaznam
>
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Ladislav Nagy <delphi-konference(zv)bcpraha(tec)com> - 24.10.2000 00:15:39
Ahoj,
jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce vytvorit nove, ...
Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden DataSet.
Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z datasetu. (napr. vyplneni Jmeno, Prijmeni, ...)
Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon Excel)). Pouzit trivialni dosazovani textu se mi nezda.
Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do souboru. Mozna vede spravna cesta timto smerem.
Jak resite takovyto problem? Co byste mi doporucili?
Diky moc za kazdou uzitecnou radu, Lada
................................................................................
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com
Jak zablokovat pristup na Internet?
[*] L. ZITA <konference(zv)sales(tec)cz> - 24.10.2000 01:18:53
Behalf Of Karel Rys
> Asi spise vyuziji radu nekoho z konference pozmenit vychozi branu
> nebo adresu pristupoveho proxy serveru. Tim, ze to chceme mit hodne
> flexibilni, bude jeden zapis do registru v okamziku, kdy se student
> naloguje, velice rychly, jednoduchy a funkcni. Dalsi vyhoda je, ze
> budu menit jen nastaveni te ktere stanice a ne neco na linuxovem
> serveru, protoze ten bude tezko rozlisovat, kdo o pristup v tu chvili
> zada.
Ne to se mylis. Proxina prece musi jaksi z podstaty funkce vedet o koho se
jedna
(cili znat IP adresu PC, ktere pozaduje zprostredkovat spojeni). Takze
pristupova prava lze
obvykle nastavovat pro konkretni IP adresu pripadne jmena pocitacu.>
> A to, co zapisu do registru, se muze automaticky urcit na zaklade
> toho, v jake tride ten student je, zda ma napr. tou dobou volnou
> hodinu, zda ma zaplaceny dluh za vytistene stranky apod.
To co zapises do registru nebude zadny problem pro studenta
zase rychle a flexibilne upravit........, zatimco upravit konfiguraci proxy
na linuxovem serveru bude pro neho mnohem mnohem tezsi.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Ruzne jazyky
[*] Tom� Kru��k \(el. adresa\) <t.kruzik(zv)msp.mesit(tec)cz> - 24.10.2000 06:19:30
Zkus se podivat na ukazku komponenty RichEdit v delphi\demos. Tam je pozito
prepinani v menu do anglictiny , francouzstiny a nemciny. Pro urcite pouziti
by to mohlo stacit.
S pozdravem / Best regards
Tom� Kru��k
t.kruzik(zv)msp.mesit(tec)cz
tel.:0632-522632
mobil: 0603-947060
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ladislav B�RTA
> Sent: Monday, October 23, 2000 1:25 PM
> To: Delphi-I
> Subject: Ruzne jazyky
>
>
> jak mam postupovat, kdyz chci ve sve aplikaci umoznit
> pouzivani vice jazyku
> (formou prepinani v menu). Co kde musim nastavit a kde dopsat
> vicejazycne
> verze textu apod.
> LADIS
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
SQLExtension pro Flah Filer 1.57
[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 24.10.2000 06:59:52
No ono sa tieto third party moc neaktualizuju...
Malokto chce vyuzivat SQL extension, pretoze je to vacsinou pomalsie
ako ked si to spravi sam cez Find a pod...
P.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Heinisch Jiri
Sent: Monday, October 23, 2000 12:17 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: SQLExtension pro Flah Filer 1.57
Bohuzel nenasel jsem nic ani tam
jedine co jsem nasel nasel tak na verzi Flash Filer 1.52
----- Original Message -----
From: "Ing. Patrik Tesar" <tesar(zv)rainside.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 19, 2000 8:52 AM
Subject: RE: SQLExtension pro Flah Filer 1.57 > Tu je access na zalohovanie konferi o Flash Fileri. Skus to tam najst:
>
> http://www.priv.bus.at/graf/quell/delphiarchives/index.htm
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Heinisch Jiri
> Sent: Wednesday, October 18, 2000 5:53 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: SQLExtension pro Flah Filer 1.57
>
>
> Ahoj
>
> kde bych nasel SQL Extension pro FF 1,57 a D5
>
> moje putovani po internetu bylo bohuzel neuspesne
>
>
> S pozdravem JH
>
>
> Jak zablokovat pristup na Internet?
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 24.10.2000 07:46:10
L. ZITA dne 24 Oct 2000, v 1:18:
> Behalf Of Karel Rys
> > Asi spise vyuziji radu nekoho z konference pozmenit vychozi branu
> > nebo adresu pristupoveho proxy serveru. Tim, ze to chceme mit hodne
> > flexibilni, bude jeden zapis do registru v okamziku, kdy se student
> > naloguje, velice rychly, jednoduchy a funkcni. Dalsi vyhoda je, ze
> > budu menit jen nastaveni te ktere stanice a ne neco na linuxovem
> > serveru, protoze ten bude tezko rozlisovat, kdo o pristup v tu
> > chvili zada.
>
> Ne to se mylis. Proxina prece musi jaksi z podstaty funkce vedet o
> koho se jedna (cili znat IP adresu PC, ktere pozaduje zprostredkovat
> spojeni). Takze pristupova prava lze obvykle nastavovat pro konkretni
> IP adresu pripadne jmena pocitacu.
Jenze IP adresa ani jmeno pocitace nejsou rozhodujici pro to, zda
dotycnemu pristup povolit ci ne. Rozhodujici bude jeho uzivatelske
jmeno na Novellu ci presneji to, v jakych uzivatelskych skupinach je
tam zarazen a v jakou dobu ta ktera skupina ma pristup na internet
povolen. Jsme skola, takze uzivatele pocitacu se stale stridaji, v
ucebne pracuji trebas i ucitele.
> > A to, co zapisu do registru, se muze automaticky urcit na zaklade
> > toho, v jake tride ten student je, zda ma napr. tou dobou volnou
> > hodinu, zda ma zaplaceny dluh za vytistene stranky apod.
>
> To co zapises do registru nebude zadny problem pro studenta
> zase rychle a flexibilne upravit........, zatimco upravit konfiguraci
> proxy na linuxovem serveru bude pro neho mnohem mnohem tezsi.
Pravda, trosku spoleham na to, ze studenti zahradnicke skoly si s
programem RegEdit netykaji a ovladaci panely nemaji pristupne.
Karel Rys
______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009
Biorytmus
[*] i x o <ixo(zv)gol-tip.sk> - 24.10.2000 08:27:37
Zdrav�m v�etk�ch...
Pros�m V�s nem� nieko nejak� komponentu, alebo aspo� vzorce na v�po�et
biorytmov.
Dopredu d�ky. IXO
OT:Emulace modemu po siti
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 24.10.2000 08:30:18
Ahoj vsichni
Pro ucely ladeni bych potreboval nejaky free emulator modemu po LAN s
protokolem TCP/IP. Asi nejaky ovladac, ktery se vzhledem k Windows chova
jako modem, ale komunikuje po siti se svym protejskem. Mel by fungovat pod
w98 i NT. Nevite nekdo o necem takovem.
Jaromir Cermak
Jak zablokovat pristup na Internet?
[*] sup(zv)svitap(tec)cz - 24.10.2000 8:46:36
>> To co zapises do registru nebude zadny problem pro studenta
>> zase rychle a flexibilne upravit........, zatimco upravit konfiguraci
>> proxy na linuxovem serveru bude pro neho mnohem mnohem tezsi.
>
>Pravda, trosku spoleham na to, ze studenti zahradnicke skoly si s
>programem RegEdit netykaji a ovladaci panely nemaji pristupne.
U nas je to vyreseny tak, ze vsude na lokalnich windowsech je regedit.exe
vymazanej a je pouze na siti v adresari, kam ma povolen pristup jen
administrator.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
DBGrid - aktualni zaznam
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 24.10.2000 08:47:58
Ja bych zkusil aktualni zaznam primo u zdroje. Tj. TQuery nebo TTable.
TDataSet obsahuje jen jeden zaznam a pro TDBGrid musi projet celou tabulku,
kterou chce vykreslit. Aspon si to tak myslim podle mych zkusenosti :)
Michal Tiller
-----Original Message-----
From: Jan Naiser [mailto:tua(zv)wo(tec)cz]
Sent: Monday, October 23, 2000 7:37 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: DBGrid - aktualni zaznam
To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo OnDrawDataCell je
takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
indik�tor.
Honza.
----- Original Message -----
From: Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 11:18 AM
Subject: Re: DBGrid - aktualni zaznam
> Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> sloupce v aktualnim radku.
> Pavel
> -------------------------------------------------
> Pavel Skalick�
> e-mail - P.Skalicky(zv)seznam(tec)cz
> www - http://pts.kvalitne(tec)cz
> mobil - 0604 844 698
> ICQ - 38169741
> ----- Original Message -----
> From: "Jan Naiser" <tua(zv)wo(tec)cz>
> To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
> Sent: Sunday, October 22, 2000 12:00 PM
> Subject: DBGrid - aktualni zaznam
>DBGrid - aktualni zaznam
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 24.10.2000 08:49:56
Radek se da zjistit takto:
TCustomGrid(nazev_gridu).Row
HTH
Milan Tomes
> To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo
> OnDrawDataCell je
> takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
> zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
> indik�tor.
>
> Honza.
> > Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> > FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> > sloupce v aktualnim radku.
> > Pavel
> > -------------------------------------------------
> > Pavel Skalick�
> > e-mail - P.Skalicky(zv)seznam(tec)cz
> > www - http://pts.kvalitne(tec)cz
> > mobil - 0604 844 698
> > ICQ - 38169741
> > ----- Original Message -----
> > From: "Jan Naiser" <tua(zv)wo(tec)cz>
> > To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
> > Sent: Sunday, October 22, 2000 12:00 PM
> > Subject: DBGrid - aktualni zaznam
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
None
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 24.10.2000 08:50:58
Winproxy - www.winproxy(tec)cz
Je to shareware - omezeni pouze 2 PC a 1MB cache
Milan Tomes
> Dobry den,
>
> pouzivam D5 Pro, WNT 4.0 a DialUp pripojenie.
>
> V ramci testovania Projektu by som ale potreboval pripojenie cez nejaku
> Proxy.
> Mohli by ste mi prosim nejaku (co najjednoduchsiu - HTTP staci) poradit ?
>
> Dakujem
>
> Daniel Schmidt
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 24.10.2000 08:58:31
Tento postup nedoporucuji. Ve firme tento zpusob napojeni pres ODBC
pouzivame a mohu zodpovedne rict, ze toto MS opravdu tezce nezvladl. Pri
ruznych instalacich se to chova podivne. Tabulky se vytvori stejne, ale Word
krici, ze tabulku resp. ODBC nelze otevrit atp... :( Sam budu toto napojeni
predelavat na "proste doplnovani textu" do textovych poli pres COM. Dalsi
zapor je to, ze ackoliv mam veskere sablony nastavene na jediny font a
pouzivam ruzne velikosti pisem, tak u slucovacich poli a vlozenych textu mi
nahodne tento font zmeni na cokoliv co si zamane :(((( Proste na hromadnou
korespondenci zapomen a delej to jinak.
Milan Tomes
P.S.: Priste posilej maily jako plain text.
Ahoj,
jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce
vytvorit nove, ...
Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden DataSet.
Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na sablonu.
Tedy chci, aby se mi oznacena mista nahradila texty z datasetu. (napr.
vyplneni Jmeno, Prijmeni, ...)
Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci
podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon
Excel)). Pouzit trivialni dosazovani textu se mi nezda.
Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si
definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do
souboru. Mozna vede spravna cesta timto smerem.
Jak resite takovyto problem? Co byste mi doporucili?
Diky moc za kazdou uzitecnou radu, Lada
............................................................................
....
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
Reporty - Doplnovani textu do sablon dokumentu - j
[*] tungli(zv)datapac.sk - 24.10.2000 09:12:22
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ja by som ti doporucil pouzit NSQLRB. Umoznuje pozit word dokument do ktorej dosadi na urcite miesta polozky z databazy. Tiez umoznuje aby uzivatel sam designoval report. Dokonca je umoznene aj programovat udalosti a vela ineho.
Naides to na http://www.host.sk/tungli/> -----P> �vodn� zpr�va-----
> Od: Ladislav Nagy [SMTP:delphi-konference(zv)bcpraha.com]
> Odesl�no: 24. okt�ber 2000 0:16
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit pristup ?
>
> Ahoj,
>
> jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce vytvorit nove, ...
>
> Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden DataSet.
>
> Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z datasetu. (napr. vyplneni Jmeno, Prijmeni, ...)
>
> Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon Excel)). Pouzit trivialni dosazovani textu se mi nezda.
> Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do souboru. Mozna vede spravna cesta timto smerem.
>
> Jak resite takovyto problem? Co byste mi doporucili?
>
> Diky moc za kazdou uzitecnou radu, Lada
>
> ................................................................................
> Mgr. Ladislav Nagy, Tel: 00-420-606-612717
> Baader Computer, s.r.o.
> Sokolsk� 66, Praha 2, 120 00
> Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
> Ladislav.Nagy(zv)bcpraha.com <mailto:Ladislav.Nagy(zv)bcpraha.com>Da se udelat Group by z pocitanych polozek??
[*] Karol Zaic <zaic_karol(zv)novitech.sk> - 24.10.2000 09:19:54
Doporucoval by som skor takto:
select SUBSTRING(table.field from 4 for 2),
COUNT(*) from table
group by 1
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Lubo Fule
Sent: Monday, October 23, 2000 4:05 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Da se udelat Group by z pocitanych polozek??
Skus to takto:
select SUBSTRING(table.field from 4 for 2),
COUNT(*) from table
GROUP BY SUBSTRING(table.field from 4 for 2)
> Setkal jsem se s problemem, kdy potrebuju seskupovat udaje v
> local SQL podle
> pocitanych polozek. Podle specifikace to nejde. neda se to obejit?
> priklad
>
> select SUBSTRING(table.field from 4 for 2) as polozka,
> COUNT(*) from table
> GROUP BY polozka
>
> Za Vasi pomoc dekuji Roman Jansa
QRBands, sdileni a galeje
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 24.10.2000 09:21:57
Ahoj,
potreboval bych poradit s QuickReportem. Otazka z ni: Na formularich
pouzivam stale stejne bandy (jmena, adresy, zahlavi, zapati atp.). Mam-li v
programu treba osm formularu, mam tam treba jmeno a adresu osmkrat a pri
opravach to musim opravovat na osmi mistech (a nemluve uz o stejnem
vzhledu). Je mozne udelat band do jineho, pomocneho formulare a pak ho jenom
nejak pripojit na vysledny? A jak naplnit data (nejsou plnene z databaze ale
z poli na formulari) na kaznem formulari? Dekuji za pripadnou radu.
Jaro B.
P.S.
Uz jsem se na tohle ptal ale nikdo mi neodpovedel.
Nevite nekdo jak konvertovat data z QR 1.1 do QR 3 aniz by doslo k nastaveni
rozmeru QRLabel a QRShape do v�choz�ch hodnot? Tohle mi udela castecny
prevod z D2 do D3. Pak je totiz cely prevod znehodnocen a predelavat treba
800 prvku na formulari rucne jsou neskutecne galeje. A udelat COPY prvku
nebo skupiny v D2 a pak PASTE na formulari v D3 mi taky nefunguje. Primy
prevod z D2 do D5 taky selhal.Reporty - Doplnovani textu do sablon dokumentu - j
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 24.10.2000 09:42:58
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Resil jsem presne toto. Vse bezi pres MailMerge agenta ve Wordu.
Vse potrebne najdes v napovede k Office, dej heslo MailMerge a cti a cti ...
Je to presne tak, jak jsi psal: mas sablonu dokumentu s prednastavenymi
poli,
k ni pripojis datovy zdroj a spustis mailmerge.
Vysledkem muze byt bud novy dokument, nebo to muze rovnout posilat emaily
nebo faxy, nebo to rovnou vyjede na tiskarne
(promenna FOutPut_Type v kodu urcuje typ vystupu):
var
wordApp: TWordApplicastion;
DocumentTemplate: TWordDocument;
try
try
// vytvor si objekit Wordu
WordApp.Connect;
WordApp.Visible := False;
OFileName:= FileName;
DocumentTemplate.ConnectTo( WordApp.Documents.Open(OFileNAme,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam) );
if FOutPut_Type=0 then
begin
WordApp.Visible := True;
WordApp.Activate;
end;
try
OFileName:= FTempFileName;
OTRue:= True;
OFalse:= False;
OInt:= 0;
DocumentTemplate.MailMerge.OpenDataSource( OFileName, OInt, OFalse,
OTrue, OTrue,
OFalse, EmptyParam, EmptyParam, OFalse,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
except
end;
// kam to vlastne posleme ?
try
DocumentTemplate.MailMerge.Destination:= FOutPut_Type;
if FOutPut_Type in [2, 3] then// email
begin
DocumentTemplate.MailMerge.MailAsAttachment:= False;
DocumentTemplate.MailMerge.MailAddressFieldName:= FEmail_Field;
DocumentTemplate.MailMerge.MailSubject:= FEmail_Subject;
DocumentTemplate.MailMerge.SuppressBlankLines:= True;
DocumentTemplate.MailMerge.Execute(OTrue);
end
else
DocumentTemplate.MailMerge.Execute(OFalse);
except
Application.MessageBox('Exec', 'Chyba', 0);
raise;
end;
DocumentTemplate.Close; file://(SaveChanges:= False);
if not SysUtils.DeleteFile(FTempFileName) then
Application.MessageBox(PChar(Format('Nemohu smazat pomocn� soubor
"%s" !', [FTempFileName])), 'Chyba', 0);
DocumentTemplate.DisConnect;
case FOutPut_Type of
0: begin
WordApp.Visible := True;
WordApp.Activate;
end;
1, 2, 3:
begin
WordApp.Quit;
end;
end;
WordApp.DisConnect;
except
Application.HandleException(Self);
end;
finally
end;
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ladislav Nagy
Sent: Tuesday, October 24, 2000 12:16 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit
pristup ? Ahoj,
jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce
vytvorit nove, ...
Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden
DataSet.
Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na
sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z datasetu.
(napr. vyplneni Jmeno, Prijmeni, ...)
Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci
podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon
Excel)). Pouzit trivialni dosazovani textu se mi nezda.
Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si
definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do
souboru. Mozna vede spravna cesta timto smerem.
Jak resite takovyto problem? Co byste mi doporucili?
Diky moc za kazdou uzitecnou radu, Lada
............................................................................
....
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com
DBGrid - aktualni zaznam
[*] Lauko �tefan <lauko(zv)salamon.sk> - 24.10.2000 10:08:05
Ahoj,
gdFocused znamena ze grid je focused, gdSelected je len v pripade kreslenia
vybratej bunky. Tak z tohto nepomoze nic.
Asi bude najlepsie vytvorit noveho potomka TDBGrid a tam predefinovat
niektore metody.
Lauko.
----- Original Message -----
Od: Pavol Stolc <pstolc(zv)sc.sknet.sk>
Komu: <delphi-l(zv)fwd(tec)cz>
Odoslan�: 23. okt�ber 2000 23:39
Predmet: RE: DBGrid - aktualni zaznam
> Ahoj,
>
> udalost OnDrawColumnCell ma parameter State: TGridDrawState = set of
> (gdSelected, gdFocused, gdFixed). Skus to s gdFocused.
>
> Pavol Stolc
> pstolc(zv)sc.sknet.sk
> ----- Original Message -----
> From: Jan Naiser <tua(zv)wo(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Monday, October 23, 2000 7:36 PM
> Subject: Re: DBGrid - aktualni zaznam
>
>
> To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo OnDrawDataCell
je
> takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
> zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
> indik�tor.
>
> Honza.
>
> ----- Original Message -----
> From: Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Monday, October 23, 2000 11:18 AM
> Subject: Re: DBGrid - aktualni zaznam
>
>
> > Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> > FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> > sloupce v aktualnim radku.
> > Pavel
> > -------------------------------------------------
> > Pavel Skalick�
> > e-mail - P.Skalicky(zv)seznam(tec)cz
> > www - http://pts.kvalitne(tec)cz
> > mobil - 0604 844 698
> > ICQ - 38169741
> > ----- Original Message -----
> > From: "Jan Naiser" <tua(zv)wo(tec)cz>
> > To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
> > Sent: Sunday, October 22, 2000 12:00 PM
> > Subject: DBGrid - aktualni zaznam
> >
>
>TreeView
[*] Roman Budinec <roman(zv)ttc-telecom.sk> - 24.10.2000 10:12:10
Pavol Kaka�ka wrote:
>
> | Da sa v TTreeView komponente zmenit styl pisma pre jednotlive uzly?
> | Ak ano, Ako?
>
> takto:
>
> procedure TNotesForm.tvTreeCustomDrawItem(Sender: TCustomTreeView;
> Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
> begin
> with tvTree.Canvas do begin
> if not Node.HasChildren then
> Font.Color := clBlue;
> end;
>
> Pavol Kaka�ka
> kasix(zv)atlas(tec)cz
Dik, ale ma to jeden hacik, chcel by som, aby sa ostatne parametre
nemenili.
Ked totiz zmenim napriklad farbu fontu daneho item-u a item bol
selektnuty, pri strate aktivity sa nezmeni podkladova farba na sivu.
DefaultDraw:=True nepomaha.
--
budinec_roman(zv)ttc-telecom.sk
SQL INSERT, UPDATE, DELETE na Gridu
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 24.10.2000 10:13:13
D5 Prof, db
Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na podle me
trivialni priklad:
Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu jeden
Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam SELECT * FROM
Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do Edit1
zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do tabulky, na
obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom zaznamu, ktery
jsem opravoval. Analogicky pro pridavani a mazani.
Nerikejte mi, ze jste tohle nikdo nedelal. To byste me teda vazne nastvali
;-))))))))))
Diky moc - za pomoc
Petr
Plochy button
[*] Manas <martin.falta(zv)atlas(tec)cz> - 24.10.2000 10:18:05
Ahoj,
nevite nekdo o komponente typu ploche tlacitko, ktere muze dostat focus?
Predem vsem diky.
D5Pro+SP1
Martin Falta
TreeView
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 24.10.2000 10:53:06
No jo :-)) to si musis osetrit sam.
Good luck ;-)
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
Pavol Kaka�ka wrote:
>
> | Da sa v TTreeView komponente zmenit styl pisma pre jednotlive uzly?
> | Ak ano, Ako?
>
> takto:
>
> procedure TNotesForm.tvTreeCustomDrawItem(Sender: TCustomTreeView;
> Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
> begin
> with tvTree.Canvas do begin
> if not Node.HasChildren then
> Font.Color := clBlue;
> end;
>
> Pavol Kaka�ka
> kasix(zv)atlas(tec)cz
Dik, ale ma to jeden hacik, chcel by som, aby sa ostatne parametre
nemenili.
Ked totiz zmenim napriklad farbu fontu daneho item-u a item bol
selektnuty, pri strate aktivity sa nezmeni podkladova farba na sivu.
DefaultDraw:=True nepomaha.
--
budinec_roman(zv)ttc-telecom.sk
TreeView
[*] Ale� Va���ek�����"q��y�&���w�3 - 24.10.2000 10:56:08
> Dik, ale ma to jeden hacik, chcel by som, aby sa ostatne parametre
> nemenili.
> Ked totiz zmenim napriklad farbu fontu daneho item-u a item bol
> selektnuty, pri strate aktivity sa nezmeni podkladova farba na sivu.
> DefaultDraw:=True nepomaha.
>
Ahoj, tohle mi jednou radil P.Vones a funguje to skvele:
> Nevite nahodou nekdo o nejake komponente, nebo jakym zpusobem upravit
> TTreeView, aby se choval jako v Connection Meteru v nastaveni - predevsim
> jak mam udelat, aby se mi nezobrazoval modry pruh, ze je polozka vybrana a
> dale nevim jakym zpusobem mam udelat, aby vybrana polozka byla napsana
napr.
> tucnym fontem.
Ahoj,
pouzij udalost CustomDrawItem, treba:
procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Node.Level = 0 then
begin
Sender.Canvas.Font.Style := [fsBold];
Sender.Canvas.Brush.Color := TTreeView(Sender).Color;
Sender.Canvas.Font.Color := TTreeView(Sender).Font.Color;
end;
end;
ALES
Pretridovani DBGrid v 3vrstvych app
[*] Marek Hradil <marekhr(zv)benefitcz(tec)cz> - 24.10.2000 10:59:27
Pisu momentalne 3-vrstvou apliakci s vyuzitim CORBA objektu.
V nasich drivejsich (2-vrstvych) programech se umel DBGrid
pretridit podle sloupce na ktery uzivatel kliknul.
Vnitrne doslo k uprave SQL dotazu (order by ..).
!!! Jak tohoto dosahnout u trivrstve aplikace. !!!
Nasi uzivatele jsou na to zvykli.
Za kazdou radu dekuji
Marek Hradil
QR a export do RTF
[*] V�clav Nov�k����)^����hq�'z�� - 24.10.2000 11:00:49
Ahoj,
vite nekdo, jak realizovat export sestavy z QuickReportu do RTF ?
Uzivam QR3 v D5.
Idealni by bylo pri Preview ulozit sestavu primo do RTF.
Nevite zda umi toto QR 3 Prof., nebo vite jak rozsirit exportni filtr o RTF 20
Diky.
Vaclav Novak
Jak schovat ScrollBar v ListView?
[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 24.10.2000 11:09:26
Hmmm, me to na Delphi 5 zabira !!
Pokud Ti nestaci jen navedeni na funkci a ostatni si zjistit v SDK helpu,
tak priste napis, jestli chces skryt horizontalni nebo vertikalni scrolbar.
Pro horizontalni: ShowScrollBar(ListView.Handle, SB_HORZ, False)
Pro vertikalni: ShowScrollBar(ListView.Handle, SB_VERT, False)
Pro oba: ShowScrollBar(ListView.Handle, SB_BOTH, False)
Pokud se pouzije parametr SB_CTL tak se dosazuje handle scrolbaru
Ales
----- Original Message -----
From: Petr Fischer <fifa(zv)praguesoft(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 7:27 PM
Subject: Re: Jak schovat ScrollBar v ListView?> Hmmm, tohle na ListView bohuzel nezabira...
>
> Petr Fischer
>
> > Zkus ShowScrollBar(ListView.Handle, SB_VERT, False)
> >
> > Ales
> > ----- Original Message -----
> > From: Petr Fischer <fifa(zv)praguesoft(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Friday, October 20, 2000 7:54 PM
> > Subject: Jak schovat ScrollBar v ListView?
> >
> >
> > > Zdravim,
> > >
> > > potreboval bych natvrdo schovat ScrollBar v ListView (pohled
> > > vsReport). Jde to (urcite jo :-)???
> > >
> > > Dekuji, Petr Fischer
> > >
> > > Delphi5
> >
>
>
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Marek Soukup <marek(zv)comberg(tec)cz> - 24.10.2000 11:13:42
Ahoj,
musel jsem resit neco hodne podobneho a musel jsem to resit rychle. Zkoumal
jsem hromadnou postu a tak, ale nakonec z toho byl a sablona s
nadefinovanymi zalozkami, ktere se jmenovali stejne jako polozky v tabulce.
V programu jsem potom prochazel jednotlive polozky tabulky a v dokumentu
skakal na zalozky a vypisoval hodnoty tech polozek.
Samotneho by me zajimalo, jak se to da resit lepe, uz jenom proto ze jsem
nekde videl program co umel vygenerovat dopis a z Outlooku dosadil jmeno
atd.
S pozdravem
Marek
Ahoj,
jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce
vytvorit nove, ...
Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden
DataSet.
Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na
sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z datasetu.
(napr. vyplneni Jmeno, Prijmeni, ...)
Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci
podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon
Excel)). Pouzit trivialni dosazovani textu se mi nezda.
Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si
definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do
souboru. Mozna vede spravna cesta timto smerem.
Jak resite takovyto problem? Co byste mi doporucili?ShellExecuteEx
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 24.10.2000 11:26:05
Dobry den,
nevite nekdo jak donutit ShellExecuteEx aby mi vratil handle procesu?
predem diky za vse
SQL INSERT, UPDATE, DELETE na Gridu
[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 24.10.2000 11:57:01
Tohle jsem jiz resil pomoci TBookmark
P := Q.GetBookmark; // do nejake promenne schovam pozici, kde zrovna
jsem
Q.Close; // zavru query
................ // tady cosi delam
Q.Open; // otevru query
try
Q.GotoBookmark(Pom); // pokusim se jit na dany bookmark
except
on EDatabaseError do ...... // nejaka hlaska treba
end
u delete se ti najit dany zaznam nepodari - prave proto je tam try ...
except ... end, aby to nervalo, ze chyba..
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
----- Original Message -----
From: "Ing. Petr �vejda" <lingvista(zv)lingvista(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 24, 2000 10:13 AM
Subject: SQL INSERT, UPDATE, DELETE na Gridu
> D5 Prof, db
>
> Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na podle me
> trivialni priklad:
>
> Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu jeden
> Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam SELECT *
FROM
> Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
>
> Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do Edit1
> zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do tabulky, na
> obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom zaznamu, ktery
> jsem opravoval. Analogicky pro pridavani a mazani.
>
> Nerikejte mi, ze jste tohle nikdo nedelal. To byste me teda vazne nastvali
> ;-))))))))))
>
> Diky moc - za pomoc
>
> Petr
>ShellExecuteEx
[*] Lubo Fule <fule(zv)sct.sk> - 24.10.2000 11:57:17
Napis ako presne pouzivas ShellExecuteEx a hlavne ako mas pre spustenim
naplnenu strukturu SHELLEXECUTEINFO.
L.
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ladislav Fitz
> Sent: Tuesday, October 24, 2000 11:26 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: ShellExecuteEx
>
>
> Dobry den,
>
> nevite nekdo jak donutit ShellExecuteEx aby mi vratil handle procesu?
>
> predem diky za vse
Uzivatele v IB6
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 24.10.2000 12:00:52
Ahoj,
rad bych se zeptal na dve vlastnosti IB6, ktere mi prijdou dost
omezujici.
1) Pokud se chce klient prihlasit k IB6 serveru, musi uvest plnou
cestu k gdb souboru vcetne jmena serveru. To podle me temer
vylucuje nebo aspon komplikuje vyvoj "krabicoveho" software
vyuzivajiciho IB6. Nikdo prece nemuze vedet, jak ma zakaznik SQL
server zorganizovany, jak tu cestu "univerzalne" nastavit. Nebo se
mylim?
2) Pridavat uzivatele na IB6 server smi jen SYSDBA. Opravdu
nema jiny uzivatel sanci zakladat dalsi uzivatele? Nebude to
alespon mozne nekdy v budoucnu? Tohle totiz prakticky znamena,
ze aplikace, ktera resi napr. dochazkovy system do zamestnani,
neni schopna vlozit noveho zamestnance, ale je treba o to pozadat
spravce SQL serveru. Pokud si aplikce povede vlastni evidenci
zamestnancu, musi resit neco, co jiz server sam nabizi, tj.
bezpecne uchovani hesel. Navic se aplikace k SQL serveru musi
prihlasit pod nejakym spolecnym loginem s vysokymi pravy a hrozi
riziko prozrazeni, ktere cele zabezpeceni odboura.
David
None
[*] Delphi <Delphi(zv)scio(tec)cz> - 24.10.2000 12:01:04
Zkus www.winproxy(tec)cz
Honza
-----Original Message-----
From: Mgr. Daniel Schmidt [mailto:dschmidt(zv)centrum.sk]
Sent: Monday, October 23, 2000 10:20 PM
To: konferencia DELPHI-L
Subject:
Dobry den,
pouzivam D5 Pro, WNT 4.0 a DialUp pripojenie.
V ramci testovania Projektu by som ale potreboval pripojenie cez nejaku
Proxy.
Mohli by ste mi prosim nejaku (co najjednoduchsiu - HTTP staci) poradit
?
Dakujem
Daniel Schmidt
QRBands, sdileni a galeje
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 24.10.2000 12:05:39
Ahoj
U nas to funguje tak, ze mam nekolik zakladbnich reportu, pro jednotlive
typy, a z nich dedim spolecne casti, zbytek pak dodelam.
Jaromir Cermak
-----Original Message-----
From: Bene� Jaroslav [mailto:JBenes(zv)cpoj(tec)cz]
Sent: Tuesday, October 24, 2000 9:22 AM
To: delphi-l(zv)fwd(tec)cz
Subject: QRBands, sdileni a galeje
Ahoj,
potreboval bych poradit s QuickReportem. Otazka z ni: Na formularich
pouzivam stale stejne bandy (jmena, adresy, zahlavi, zapati atp.). Mam-li v
programu treba osm formularu, mam tam treba jmeno a adresu osmkrat a pri
opravach to musim opravovat na osmi mistech (a nemluve uz o stejnem
vzhledu). Je mozne udelat band do jineho, pomocneho formulare a pak ho jenom
nejak pripojit na vysledny? A jak naplnit data (nejsou plnene z databaze ale
z poli na formulari) na kaznem formulari? Dekuji za pripadnou radu.
Jaro B.
P.S.
Uz jsem se na tohle ptal ale nikdo mi neodpovedel.
Nevite nekdo jak konvertovat data z QR 1.1 do QR 3 aniz by doslo k nastaveni
rozmeru QRLabel a QRShape do v�choz�ch hodnot? Tohle mi udela castecny
prevod z D2 do D3. Pak je totiz cely prevod znehodnocen a predelavat treba
800 prvku na formulari rucne jsou neskutecne galeje. A udelat COPY prvku
nebo skupiny v D2 a pak PASTE na formulari v D3 mi taky nefunguje. Primy
prevod z D2 do D5 taky selhal.SQL INSERT, UPDATE, DELETE na Gridu
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 24.10.2000 12:31:58
> Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na
> podle me trivialni priklad:
>
> Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu
> jeden Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam
> SELECT * FROM Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
>
> Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do
> Edit1 zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do
> tabulky, na obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom
> zaznamu, ktery jsem opravoval. Analogicky pro pridavani a mazani.
>
> Nerikejte mi, ze jste tohle nikdo nedelal. To byste me teda vazne
> nastvali ;-))))))))))
A co Ti brani po stisknuti tlacitka opravit udelat neco jako
update Firmy set Nazev = :Nazev where Id= :Id
ParamByName('Nazev').AsString := Edit1.Text;
oldId := Query1.FieldByName('ID').AsInteger;
ParamByName('ID').AsInteger := oldId;
...provest prikaz (ten je pochopitelne v jine query nez puvodni
select)
Query1.Close;
Query1.Open;
Query1.Locate('ID', oldId, []);
Je to jen kostra, mozna s chybami, ale popisujici princip.
David
SQL INSERT, UPDATE, DELETE na Gridu
[*] Ren� Otisk - 24.10.2000 12:55:44
Hi,
D3, MS SQL7, ODBCe
Predpokladam, ze tabulka je indexovana.
Pro kazdou operaci (INSERT, UPDATE i DELETE) mam funkci zvlast, prave kvuli
lokalizaci noveho, soucasneho nebo pripadne nasledujiciho vzhledem ke
smazanemu recordu...
Pak uz jenom zavolam
MyUpdate(TaMojeTabulecka, 'UPDATE TEJBL SET POLICKO_NEORANE = ''' +
PoleEdit.Text + '''', TaMojeTabulecka.FieldByName(IndexovePole).AsString,
'Nazev_Pole_na_kterem_Je_def_Index');
Ten parametr Par by sel testovat az v te procedure, ale ja ho tam mam z
jeste jinych duvodu, nasledujici fce je zkracena...
function TForm.MyUpdate(Table: TQuery; SQLPrikaz, Par, FFieldName: string):
Boolean;
begin
Result := False;
with Data, Help do
try
Close;
SQL.Clear;
SQL.Add('SET DATEFORMAT dmy');
SQL.Add(SQLPrikaz);
ExecSQL;
Table.DisableControls;
Table.Active := False;
Table.Active := True;
Table.Locate(FFieldName, Par, []);
Table.EnableControls;
Result := True;
except
on E: Exception do
HandlingError(E, '');
end;
end;
Adekvakvatne pak pro Insert i Delete (tam si osahas nasledujici zaznam,
zapamatujes si ho a po smazani lokalizujes tento zaznam. Pokud mazes
posledni zaznam, tak si zapamatujes predchozi a nebo zavolas Last...)
Hodne stesti...
Kdyby neco, tak se ozvi...
Sroub
> D5 Prof, db
>
> Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na podle me
> trivialni priklad:
>
> Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu jeden
> Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam SELECT *
FROM
> Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
>
> Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do Edit1
> zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do tabulky, na
> obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom zaznamu, ktery
> jsem opravoval. Analogicky pro pridavani a mazani.
>
> Nerikejte mi, ze jste tohle nikdo nedelal. To byste me teda vazne nastvali
> ;-))))))))))
>
> Diky moc - za pomoc
>
> Petr
QRBands, sdileni a galeje
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 24.10.2000 12:57:20
Ahoj,
ale ja mam napr. jeden QRBAND, ktery bych chtel jen sdilet, bez nejakeho
fyzickeho kopirovani do DFM...
Jaro B.
> -----P�vodn� zpr�va-----
> Od: CERMAK [SMTP:CERMAK(zv)procom(tec)cz]
> Odesl�no: 24. X 2000 12:06
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: QRBands, sdileni a galeje
>
> Ahoj
>
> U nas to funguje tak, ze mam nekolik zakladbnich reportu, pro jednotlive
> typy, a z nich dedim spolecne casti, zbytek pak dodelam.
>
> Jaromir Cermak
>
> Reporty - Doplnovani textu do sablon dokumentu - j
[*] Ren� Otisk - 24.10.2000 12:58:00
Hi,
To je ale v Delfincich cislo 5, ze? Japato by to slo udelat i pro trojcicku...
Sroub
----- Original Message -----
From: Hynek Svato�
To: delphi-l(zv)fwd(tec)cz
Sent: Tuesday, October 24, 2000 9:42 AM
Subject: RE: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit pristup ? Resil jsem presne toto. Vse bezi pres MailMerge agenta ve Wordu.
Vse potrebne najdes v napovede k Office, dej heslo MailMerge a cti a cti ...
Je to presne tak, jak jsi psal: mas sablonu dokumentu s prednastavenymi poli,
k ni pripojis datovy zdroj a spustis mailmerge.
Vysledkem muze byt bud novy dokument, nebo to muze rovnout posilat emaily nebo faxy, nebo to rovnou vyjede na tiskarne
(promenna FOutPut Type v kodu urcuje typ vystupu):
var
wordApp: TWordApplicastion;
DocumentTemplate: TWordDocument;
try
try
// vytvor si objekit Wordu
WordApp.Connect;
WordApp.Visible := False;
OFileName:= FileName;
DocumentTemplate.ConnectTo( WordApp.Documents.Open(OFileNAme, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam) );
if FOutPut Type=0 then
begin
WordApp.Visible := True;
WordApp.Activate;
end;
try
OFileName:= FTempFileName;
OTRue:= True;
OFalse:= False;
OInt:= 0;
DocumentTemplate.MailMerge.OpenDataSource( OFileName, OInt, OFalse, OTrue, OTrue,
OFalse, EmptyParam, EmptyParam, OFalse,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
except
end;
// kam to vlastne posleme ?
try
DocumentTemplate.MailMerge.Destination:= FOutPut Type;
if FOutPut Type in [2, 3] then// email
begin
DocumentTemplate.MailMerge.MailAsAttachment:= False;
DocumentTemplate.MailMerge.MailAddressFieldName:= FEmail Field;
DocumentTemplate.MailMerge.MailSubject:= FEmail Subject;
DocumentTemplate.MailMerge.SuppressBlankLines:= True;
DocumentTemplate.MailMerge.Execute(OTrue);
end
else
DocumentTemplate.MailMerge.Execute(OFalse);
except
Application.MessageBox('Exec', 'Chyba', 0);
raise;
end;
DocumentTemplate.Close; file://(SaveChanges:= False);
if not SysUtils.DeleteFile(FTempFileName) then
Application.MessageBox(PChar(Format('Nemohu smazat pomocn� soubor "%s" !', [FTempFileName])), 'Chyba', 0);
DocumentTemplate.DisConnect;
case FOutPut Type of
0: begin
WordApp.Visible := True;
WordApp.Activate;
end;
1, 2, 3:
begin
WordApp.Quit;
end;
end;
WordApp.DisConnect;
except
Application.HandleException(Self);
end;
finally
end;
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Ladislav Nagy
Sent: Tuesday, October 24, 2000 12:16 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit pristup ? Ahoj,
jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce vytvorit nove, ...
Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden DataSet.
Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z datasetu. (napr. vyplneni Jmeno, Prijmeni, ...)
Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty (aspon Excel)). Pouzit trivialni dosazovani textu se mi nezda.
Ve Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni dat do souboru. Mozna vede spravna cesta timto smerem.
Jak resite takovyto problem? Co byste mi doporucili?
Diky moc za kazdou uzitecnou radu, Lada
................................................................................
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com
Biorytmus
[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 24.10.2000 13:08:26
Sice si nemysl�m, �e se tomu d� v��it (nap��klad menstrua�n� cyklus lze pr�
nabourat relativn� snadno - sta�� nachlazen�, psychick� zat�en� apod. a co�
teprve takov�hle cykly, kter� maj� prob�hat ji� od narozen�), ale zde je to,
co si pamatuji:
V�echny cykly za��naj� dnem narozen�, jeden trv� 21 dn�, druh� 23 dn� a
t�et� 33 dn� (to je intelekt), prvn� dva jsou fyzick� a citov�, ale u�
nev�m, kter� je kter�. Tak�e f�ze ka�d�ho cyklu se snadno spo��t� tak, �e se
vezme
f:=pocet_dni_od_narozeni mod pocet_dni_cyklu
Pokud vyjde f<pocet_dni_cyklu div 2, jedna se o kladnou fazi, v pripade
f>pocet_dni_cyklu div 2 se jedna o zapornou fazi. Pokud vyjde f = 0, jedna
se o zacatek cyklu, f = pocet_dni_cyklu div 2 znamena prostredek cyklu (tzv.
kriticky den).
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7
tel. +420-2-3337 3855
+420-2-2431 4538
*************************************
-----Original Message-----
From: i x o [mailto:ixo(zv)gol-tip.sk]
Sent: Tuesday, October 24, 2000 8:28 AM
To: DELPHI f�rum
Subject: Biorytmus
Zdrav�m v�etk�ch...
Pros�m V�s nem� nieko nejak� komponentu, alebo aspo� vzorce na v�po�et
biorytmov.
Dopredu d�ky. IXO
Lomitko v MaskEditu
[*] Lu�ek Tenkr�t - 24.10.2000 12:21:15
Nevite nekdo, jak do MaskEditu dostal znak / (lomitko)? Jde o rodne cislo.
Honza S.
Maly problemek s Accessem
[*] Manas <martin.falta(zv)atlas(tec)cz> - 24.10.2000 13:25:09
Ahoj,
meli jsme v praci podobny problem s aplikaci ve FoxPro, kde je resene
stejnym zpusobem. Delali jsme na to jeden programek, jestli chces muzu ti ho
poslat, ale je ve FoxPro 2.6 :-(
Martin Falta
----- Original Message -----
From: Brant Petr <Brant(zv)dcomm(tec)cz>
To: Konference Delphi (el. adresa) <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 16, 2000 12:26 PM
Subject: OT: Maly problemek s Accessem
> Ahoj,
>
> omlouvam se za OT, ale nemam bohuzel nikoho, kdo by mi mohl pomoct. Mam
> tento problem:
>
> Lokalizuji aplikaci do cestiny a je to udelane tak, ze je u ni databaze
MDB,
> ktera obsahuje tabulky, z nichz kazda odpovida jednomu oknu te aplikace.
> Takze jsou tu tabulky About, Main,... V kazde teto tabulce jsou fieldy
> Lang1, Lang2,...Lang6, kde kazdy sloupec odpovida jednomu jazyku. No a
> jednotlive recordy odpovidaji napisum v tom okne. Lokalizace spociva v
tom,
> ze se v kazde tabulce vyplni sloupec prideleny tomu kteremu jazyku, v mem
> pripade je to Lang3 (sloupec Lang1 je vzdy vyplnen a odpovida anglictine).
> To jeste samo o sobe problem neni.
> Jedna se vsak o to, ze jsem zcela stejne lokalizoval jiz predchozi verzi,
> jenze ted je tech oken a tim padem i jednotlivych tabulek vice, nicmene je
> tu porad jeste dost tech "starych" tabulek, kde jsou stejne texty jako
> predtim, u nekterych tabulek jsou jen nepatrne zmeny. Problem je v tom, ze
> bych potreboval presypat odpovidajici polozky z tech starych tabulek do
> stejne pojmenovanych tabulek v nove verzi. MS Access mam k dispozici, jen
> jsem v nem nikdy nic nepsal. Neresil jste nekdo podobny problem a jste
> ochotni pripadne poslat nejaky zdrojak, abych se poucil?
>
> Diky predem a jeste jednou sorry for OT.
>
> RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
> program�tor
> **************************************
> D & COMM s.r.o.
> Korunova�n� 6, Praha 7
>
> tel. +420-2-3337 3855
> +420-2-2431 4538
> *************************************
>
>Uzivatele v IB6
[*] azeleny(zv)csas(tec)cz - 24.10.2000 13:26:29
DDV,
> 1) Pokud se chce klient prihlasit k IB6 serveru, musi uvest plnou
> cestu k gdb souboru vcetne jmena serveru. To podle me temer
> vylucuje nebo aspon komplikuje vyvoj "krabicoveho" software
> vyuzivajiciho IB6. Nikdo prece nemuze vedet, jak ma zakaznik SQL
> server zorganizovany, jak tu cestu "univerzalne" nastavit. Nebo se
> mylim?
Ja toto resim tak, ze behem instalace uzivatel zada, kde se ma databaze
vytvorit... coz dela administrator a ten by mel mit dost rozumu, aby vedel
co dela.
Klientsky program si potom precte z registry/ini souboru, kde ze vlastne ta
databaze je a cestu do
connection params doplni sam, uzivatel zadava pouze jmeno a heslo, pripadne
roli.
To ini muze bud vzniknout pri instalaci a rozkopirovat se, nebo se pri
instalaci zada cesta ke konfoguracnimu adresari s ini / sitove registry...
zalezi na modelu, ktery dane aplikaci vyhovuje.
> 2) Pridavat uzivatele na IB6 server smi jen SYSDBA. Opravdu
> nema jiny uzivatel sanci zakladat dalsi uzivatele? Nebude to
> alespon mozne nekdy v budoucnu? Tohle totiz prakticky znamena,
> ze aplikace, ktera resi napr. dochazkovy system do zamestnani,
> neni schopna vlozit noveho zamestnance, ale je treba o to pozadat
> spravce SQL serveru. Pokud si aplikce povede vlastni evidenci
> zamestnancu, musi resit neco, co jiz server sam nabizi, tj.
> bezpecne uchovani hesel. Navic se aplikace k SQL serveru musi
> prihlasit pod nejakym spolecnym loginem s vysokymi pravy a hrozi
> riziko prozrazeni, ktere cele zabezpeceni odboura.
Ted nevim, zda si to nahodou nepletu s ORACLEm, ale mam pocit ze je mozne
nagrantovat uzivatele pravem tvorit uzivatele, i kdyz jsem to nedelal.
Reseni, ktere pouzivam je takove, ze heslo uzivatele pod kterym ma program
bezet mam nekde ulozene a zasifrovane nejakou free sifrou (MD5...) coz sice
neni trotlzichrundbombenfest, ale na druhe strane to neni zase az tak
nebezpece.
Nicmene model, kdy aplikace sama pridava uzivatele nepouzivam, tohle
zasifrovane ukadani hesel pouzivam v pripade, ze potrebuji aby se aplikace
prihlasovala sama.
Mam pocit, ze neni ciste, aby aplikace sama pridavala uzivatele, tohle mi
pripada jako jednoznacne prace pro spravce systemu - cloveka (i kdyz to asi
neni to co jsi chtel jako odpoved...).
a.Lomitko v MaskEditu
[*] Bab�k Martin (+42035620,MUS a.s. M.Babik) <M.Babik(zv)mus(tec)cz> - ct 2000 12:32:47
Teoreticky dle helpu, by to melo jit pridanim back slashe pred, tak jako pred
dalsimi specialnimi znaky. Prakticky to nefunguje co vim tak uz od D4. :-( Tak
ze bud to to nahradit oddelovacem datumu, lze na nej take pouzit lomitko, ale
to je pak musi byt v celych woknousech. A nebo si to stejne jako ja preprogram
ovat sam, aby to fungovalo. :-)
M&B
>>> MUS.TC."SMTP: Lu*dek Tenkr*at #tenkrat(zv)mvcr(tec)cz" 10/24 1:24 >>>
Nevite nekdo, jak do MaskEditu dostal znak / (lomitko)? Jde o rodne cislo.
Honza S.
SQL INSERT, UPDATE, DELETE na Gridu
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 24.10.2000 13:43:03
to je vynikajici - diky, ale pri INSERTu v Paradoxu mam pole Firmy_ID, ktere
je autoincrement a aktualizuje se teprve po Close a Open. Refresh ani
BookMark na nej nefunguje a pred close pole Firmy_ID jeste neznam, takze si
ho ani nemuzu zapamatovat.
Co s tim?
Petr
> Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na
> podle me trivialni priklad:
>
> Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu
> jeden Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam
> SELECT * FROM Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
>
> Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do
> Edit1 zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do
> tabulky, na obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom
> zaznamu, ktery jsem opravoval. Analogicky pro pridavani a mazani.
>
A co Ti brani po stisknuti tlacitka opravit udelat neco jako
update Firmy set Nazev = :Nazev where Id= :Id
ParamByName('Nazev').AsString := Edit1.Text;
oldId := Query1.FieldByName('ID').AsInteger;
ParamByName('ID').AsInteger := oldId;
...provest prikaz (ten je pochopitelne v jine query nez puvodni
select)
Query1.Close;
Query1.Open;
Query1.Locate('ID', oldId, []);
Je to jen kostra, mozna s chybami, ale popisujici princip.
David
---
Poichozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
Ladeni CGI v Delphi
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 24.10.2000 13:47:18
Pres prostudovani archivu konference a dokumentace k Delphi jsem se nedobral
k uspokojivym vysledkum. Bezuspesne se snazim presvedcit Delphi aby v nich
sly ladit CGI aplikace, ktere pouzivaji TWebModule (tedy bez nej, abych rekl
pravdu, jsem to nezkousel). Zkousel jsem IIS a vsechny free web servery
doporucovane v konferenci, ale bohuzel jsem neuspel. Mate s tim nekdo lepsi
zkusenosti ? Zkousim to pod Win2000, Delphi 5 Prof.
Diky
Ondrej Malecek
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.10.2000 13:51:55
On 24 Oct 2000, at 8:58, Milan Tome� wrote:
> Tento postup nedoporucuji. Ve firme tento zpusob napojeni pres ODBC
> pouzivame a mohu zodpovedne rict, ze toto MS opravdu tezce nezvladl.
> Pri ruznych instalacich se to chova podivne. Tabulky se vytvori
> stejne, ale Word krici, ze tabulku resp. ODBC nelze otevrit atp... :(
> Sam budu toto napojeni predelavat na "proste doplnovani textu" do
> textovych poli pres COM. Dalsi zapor je to, ze ackoliv mam veskere
> sablony nastavene na jediny font a pouzivam ruzne velikosti pisem, tak
> u slucovacich poli a vlozenych textu mi nahodne tento font zmeni na
> cokoliv co si zamane :(((( Proste na hromadnou korespondenci zapomen a
> delej to jinak.
>
> Milan Tomes
Neco (asi) podobneho jsem nedavno resil pro firmu Pro Futuro
Consulting. Jedna se o tiskove centrum, ktere tiskne a rozesila
dopisy na hromady ruznych adres. Dopis muze byt vselijaky, v
nem ruzne texty, obrazky, carove kody atp. V podstate se pripravi
sablona, pripadne obrazky, do sablony se nasazeji znacky, jaky
udaj ma kam prijit. Pak se to protahne pres databazi a doplni se
hodnoty, a posle na tiskarnu. Drobny hacek je v tom, ze sablona
se pripravuje v Texu, coz je dosti uzivatelsky neprivetive prostredi.
Vysledny tisk je ale spickovy a dobre se nad tim programuje. Na
druhe strane je Tex zadarmo, takze ho lze sirit s aplikaci.
Pro obecne pouziti by bylo treba to jeste docesat, coz ovsem stoji
nejake penize/programovani. Pokud by o neco takoveho byl sirsi
zajem, myslim, ze by se to snad dalo ohnout do nejake
komponenty (je to cele napsane v Delphi, k Texu jsou zdrojaky v
Pascalu), mohli bychom to zkusit spolecne zainvestovat a/nebo
doprogramovat. Pokud by z toho koukal dalsi prodej, Pro Futuro
(jakozto vlastnik reseni) by snad nebylo proti.
> Ahoj,
>
> jde mi o problem s reporty. Uzivatel je chce obcas menit, obcas chce
> vytvorit nove, ...
>
> Chtel bych mit system "sablony" dokumentu a ke kazde sablone jeden
> DataSet.
>
> Chtel bych vyresit problem jak "aplikovat" jeden zaznam DataSetu na
> sablonu. Tedy chci, aby se mi oznacena mista nahradila texty z
> datasetu. (napr. vyplneni Jmeno, Prijmeni, ...)
>
> Problem je s tim dosazovanim. Jak to realizovat? (Z pocatku mi staci
> podporovat Word sablony, casem bych chtel mozna nejake dalsi formaty
> (aspon Excel)). Pouzit trivialni dosazovani textu se mi nezda. Ve
> Wordu (ktery znam jen ciste z uzivatelskeho pohledu) je mozne si
> definovat datovy zdroj (DBF/text file) -> ... -> automaticke doplneni
> dat do souboru. Mozna vede spravna cesta timto smerem.
>
> Jak resite takovyto problem? Co byste mi doporucili?
>
> Diky moc za kazdou uzitecnou radu, Lada
>
> ......................................................................
> ...... .... Mgr. Ladislav Nagy, Tel: 00-420-606-612717 Baader
> Computer, s.r.o. Sokolsk� 66, Praha 2, 120 00 Tel: 00-420-2-24941962,
> Fax: 00-420-2-24942564 Ladislav.Nagy(zv)bcpraha.com --- Odchoz� zpr�va
> neobsahuje viry. Zkontrolov�no antivirov�m syst�mem AVG
> (http://www.grisoft(tec)cz). Verze: 6.0.198 / Virov� b�ze: 95 - datum
> vyd�n�: 4.10.2000
>
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
MDI Child v DLL
[*] Martin Falta <martin.falta(zv)atlas(tec)cz> - 24.10.2000 13:57:54
Ahoj,
potreboval bych mit MDI Child v DLL knihovne, ale nevim jak na to. Balicky
pouzit nemuzu.
Diky za kazde nakopnuti.
Martin Falta
Uzivatele v IB6
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 24.10.2000 14:05:10
Ahoj,
> 2) Pridavat uzivatele na IB6 server smi jen SYSDBA. Opravdu
> nema jiny uzivatel sanci zakladat dalsi uzivatele? Nebude to
> alespon mozne nekdy v budoucnu? Tohle totiz prakticky znamena,
> ze aplikace, ktera resi napr. dochazkovy system do zamestnani,
> neni schopna vlozit noveho zamestnance, ale je treba o to pozadat
> spravce SQL serveru. Pokud si aplikce povede vlastni evidenci
ne e, zamestnanec nema co delat mezi usery serveru. zamestnanec bude v
databazi zamestnancu a tam ho muze vlozit jakykoli user, kterej na to ma
grant.
dekuji peca
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
******* Hi! I'm a signature virus. Copy me into your signature, please.
*******
The signature virus says: Love isn't only blind, it's also deaf, dumb,
and stupid.MDI Child v DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 14:26:50
From: "Martin Falta" <martin.falta(zv)atlas(tec)cz>
> potreboval bych mit MDI Child v DLL knihovne, ale nevim jak na to. Balicky
> pouzit nemuzu.
Ahoj,
tim si to ale zbytecne komplikujes, proc nemuzes pouzit balicky ?
Petr Vones, amatersky programator
Uzivatele v IB6
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 24.10.2000 14:34:53
Lze to, prohladej konferenci, uz se totu probitalo.
Jinak je treba nagrantovat prislusnym user pristup k isc4.gdb
(maji jen select).
Mame takto udelanou aplikaci a chodi jakz takz (kombinace
sql dotazu a api funkci neni zrovna moc dobra, ale byla
zde rutina na tvorbu hesla pro IB a pokud bude fungovat
tak by to melo jit ciste pres SQL dotazy).
Slavek
>
> Ahoj,
>
> existuje nejaka moznost, jak z aplikace pridavat a mazat usery na
> IB6 serveru? Vypada to, ze SQL prikaz na to neexistuje, aspon
> jsem si ho zatim nevsiml. Podle dokumentace by to melo jit z
> Delphi pomoci komponent ze zalozky Interbase Admin, ale tu
> vubec nemam a ani help na ni nikde neodkazuje.
> A jen tak pro zajimavost - jak by se to delalo v isql?
>
> David
Multithread, podivny dotaz
[*] azeleny(zv)csas(tec)cz - 24.10.2000 14:34:46
DDV,
mam takovy dotaz, me se zda ze co chci je principialni ptakarna, kterou v
Delphi neudelam, ale treba nekdo vi jak na to:
Predstavoval bych si nalsedujici vec:
Mam program, je uz dost veliky a singlethread a je databazovy, takze
predelavat jej jako takovy na multithread neni moc jednoduche.... proste se
do teto veci postet nechci, ale potrebuji, aby zatimco bezi dotaz (5-5sec)
mohl uz uzivatel neco delat, konkretne poznamky.
Bezici program na zkalade nejakeho eventu zacne hledat, vytvori thread,
ktery bude mit sve vlastni okno. Program hleda a z pohledu uzivatele je
"tuha", ale uzivatel ma otevrene okno, ktere si vytvoril nejaky thread a
muze do nej psat. Po te, co uzivatel dopise sve blaboly, tak se data z
tohoto "editovaciho ziveho" okna predaji hlavni aplikaci.
Muze thread vytvorit sve vlastni okno, ktere bude mit sve ovladaci prvky a
samo si bude resit obsluhu eventu... (vecny synchronize neni to co bych
chetl)?
Je mi jasne, ze "standarni" by bylo predelat program tak, aby se to 2-5sec
query poustelo v threadu na pozadi, jak je to pospano v doc.
Diky za napady.
a.Ladeni CGI v Delphi
[*] azeleny(zv)csas(tec)cz - 24.10.2000 14:37:39
DDV,
> Pres prostudovani archivu konference a dokumentace k Delphi
> jsem se nedobral
> k uspokojivym vysledkum. Bezuspesne se snazim presvedcit
> Delphi aby v nich
> sly ladit CGI aplikace, ktere pouzivaji TWebModule (tedy bez
> nej, abych rekl
> pravdu, jsem to nezkousel). Zkousel jsem IIS a vsechny free
> web servery
> doporucovane v konferenci, ale bohuzel jsem neuspel. Mate s
> tim nekdo lepsi
> zkusenosti ? Zkousim to pod Win2000, Delphi 5 Prof.
Ja to resim psanim logovych souboru... zadnou jinou cestu neznam.
a.Preneseni aplikace do popredi
[*] Michal Rezek <rezekm(zv)natur.cuni(tec)cz> - 24.10.2000 14:40:20
Zdravim,
Mam programek, ktery bezi 'na pozadi' a pocita cas od spusteni. Po
predem nastavene dobe vypise hlasku pres MessageDlg. Potreboval bych
pred tim, nez se vypise hlaska, prepnout tuhle aplikaci na aktivni, aby
se hlaska vypsala uplne nahoru, pres vsechny ostatni aplikace.
Pak bych se jeste chtel zeptat, jestli neexistuje nejaky jednoduchy
zpusob, jak orezat exe soubory vytvorene v Delphi. Padesati radkovy
program vyuzivajici jednu dve knihovny prece nemusi mit pres 300kB.
diky za pripadne
odpovedi
M.ShellExecuteEx
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 24.10.2000 14:47:13
Dobry den,
prikladam ten kod
procedure ShellRunDokument (operation, dokument, param : string; cekat :
boolean = false; timeout : longint = 0; schovat : boolean = false);
var info : _SHELLEXECUTEINFOA;
begin
if (timeout<=0) then timeout:=-1;
fillchar (info,sizeof(info),0);
info.cbSize:=sizeof(info);
info.fMask:=SEE_MASK_NOCLOSEPROCESS;
info.lpVerb:=pChar(operation);
info.lpFile:=pChar(dokument);
info.lpParameters:=pChar(param);
if (schovat)
then info.nShow:=SW_HIDE
else info.nShow:=SW_SHOWDEFAULT;
if (not ShellExecuteEx ((zv)info))
then ShowLastError
else begin
if (not cekat)
then WaitForInputIdle (info.hProcess,timeout)
else WaitForSingleObject (info.hProcess,timeout);
CloseHandle (info.hProcess);
end;
end;
v info.hProcess mi to vrati vzdy 0, teoreticky to ma pracovat tak, ze po
spusteni programu k dokumenu pocka dokud neni ukoncen, ale nedela to, chybu
bych videl nekde v info.fMask
diky
----- Original Message -----
From: "Lubo Fule" <fule(zv)sct.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 24, 2000 11:57 AM
Subject: RE: ShellExecuteEx
> Napis ako presne pouzivas ShellExecuteEx a hlavne ako mas pre spustenim
> naplnenu strukturu SHELLEXECUTEINFO.
>
> L.
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > Ladislav Fitz
> > Sent: Tuesday, October 24, 2000 11:26 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: ShellExecuteEx
> >
> >
> > Dobry den,
> >
> > nevite nekdo jak donutit ShellExecuteEx aby mi vratil handle procesu?
> >
> >
> > predem diky za vse
>Lomitko v MaskEditu
[*] Tom� Vlad�k������V��?���o�� - 24.10.2000 15:20:45
>
> Nevite nekdo, jak do MaskEditu dostal znak / (lomitko)? Jde o rodne cislo.
>
Nejlepsi reseni je si naprogramovoat vlsatni komponentu podedenou z
prislusne tridy (TEdit, TDBEdit ap. ...), ktera pracuje presne dle tvych
predstav :-)))QR a export do RTF
[*] Karel Horky <horkyk(zv)razdva(tec)cz> - 24.10.2000 15:26:00
vite nekdo, jak realizovat export sestavy z QuickReportu do RTF ?
Uzivam QR3 v D5.
Idealni by bylo pri Preview ulozit sestavu primo do RTF.
Nevite zda umi toto QR 3 Prof., nebo vite jak rozsirit exportni filtr o RTF 20
Zalozka QReport v D5 obsahuje komponentu QRRTFFilter, kter� se um�st� na QR. Pak v Preview lze sestavu ulozit do RTF.
Tech filtru je tam vice, HTML, CSV, Excel, staci je nahazet na QR a sestavu lze jakkoliv ukladat primo z Preview. Pro jednoduche ucely to postacuje
Ahoj, Karel Horky
zjisteni okna (kontrolky) na popredi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 24.10.2000 15:38:16
Ahoj,
v aplikaci mam hlavni formular, na nem TPanel a v tom panelu zobrazuji
jine formulare. V jednom okamziku tech formularu zobrazenych v panelu
muze vytvoreno x, ale videt je jen jeden (onen panel je pro zminene
formulare parentem, ale formulare nefiguruji v seznamu jeho Controls).
Jakym zpusobem lze urcit, ktery z nich je videt => ve stavu po zavolani
BringToFront, pricemz ale nemusi mit nutne focus ? Nemam na mysli reseni
typu: "Pamatuj si nekde naposledy zobrazeny formular" atd.
Snad jsem se vyjadril srozumitelne ...
Diky,
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
Plochy button
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 24.10.2000 15:49:03
Ahoj,
jednou z nejjednodu���ch mo�nost� je pou��t TPanel a nastavit TabOrder a
TabStop, vzhled je mo�no upravit v BevelOuter respektive BevelInner.
Pavel Lstiburek
-----P�vodn� zpr�va-----
Od: Manas [mailto:martin.falta(zv)atlas(tec)cz]
Odesl�no: 24. ��jna 2000 10:18
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Plochy button
Ahoj,
nevite nekdo o komponente typu ploche tlacitko, ktere muze dostat focus?
Predem vsem diky.
D5Pro+SP1
Martin Falta
Jak schovat ScrollBar v ListView?
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 24.10.2000 15:50:20
Do SDK jsem samozrejme ihned hupnul, akorat mi uniklo, ze po schovani
ScrollBaru fci ShowScrollBar(...) a pridani dalsi polozky do ListView
se ten ScrollBar ukaze znova. Moje chyba, diky...
Petr Fischer
> Hmmm, me to na Delphi 5 zabira !!
> Pokud Ti nestaci jen navedeni na funkci a ostatni si zjistit v SDK
> helpu, tak priste napis, jestli chces skryt horizontalni nebo
> vertikalni scrolbar. Pro horizontalni: ShowScrollBar(ListView.Handle,
> SB_HORZ, False) Pro vertikalni: ShowScrollBar(ListView.Handle,
> SB_VERT, False) Pro oba: ShowScrollBar(ListView.Handle, SB_BOTH,
> False) Pokud se pouzije parametr SB_CTL tak se dosazuje handle
> scrolbaru
> Ladeni CGI v Delphi
[*] voltrr1.epr(zv)mail.cez(tec)cz - 24.10.2000 14:53:36
> > sly ladit CGI aplikace, ktere pouzivaji TWebModule (tedy bez
> > nej, abych rekl
> > pravdu, jsem to nezkousel). Zkousel jsem IIS a vsechny free
> > web servery
> Ja to resim psanim logovych souboru... zadnou jinou cestu neznam.
Ladit aplikace v ISAPI lze pomoci ServerSeven serveru. Je napsanej v Delphi a je
free.
CGI ja ladim tak ze na promenne nenaplnim z query fields ale rovnou (vetsinou
pod directivou DEBUG)
a pred koncem programu dam zobrazit result.
Da se taky pouzit Cisarovo OverSeer viz . delphree.clexpert(tec)cz , projekt Nexus
No a nebo ho udelas v mem WebProviderovi delphree.clexpert(tec)cz , projekt
WebProvider
a tam je podpora ladeni zabudovana.
Umi to predat parametr z radky jako kdyby se jednalo o request z web serveru.
Ale nemam ted moc cas to ladit.
Radek
TreeView
[*] Roman Budinec <roman(zv)ttc-telecom.sk> - 24.10.2000 16:00:15
Ma to este jeden hacik.
Ked pouzijes Sender.Canvas.Brush.Color := TTreeView(Sender).Color;
ostava farba pozadia stale rovnaka. Potreboval by som vediet kde (v
akych premennych, alebo ...) sa uchovava farba Selektnuteho uzla ked je
aktivne a ked je neaktivne okno komponenty. Nerad by som to nastavoval
na fixne farby, lebo myslim, ze tieto farby sa daju zmenit vo farebnych
profiloch OS.
Ale� Va���ek wrote:
>
> > Dik, ale ma to jeden hacik, chcel by som, aby sa ostatne parametre
> > nemenili.
> > Ked totiz zmenim napriklad farbu fontu daneho item-u a item bol
> > selektnuty, pri strate aktivity sa nezmeni podkladova farba na sivu.
> > DefaultDraw:=True nepomaha.
> >
>
> Ahoj, tohle mi jednou radil P.Vones a funguje to skvele:
>
> > Nevite nahodou nekdo o nejake komponente, nebo jakym zpusobem upravit
> > TTreeView, aby se choval jako v Connection Meteru v nastaveni - predevsim
> > jak mam udelat, aby se mi nezobrazoval modry pruh, ze je polozka vybrana a
> > dale nevim jakym zpusobem mam udelat, aby vybrana polozka byla napsana
> napr.
> > tucnym fontem.
>
> Ahoj,
>
> pouzij udalost CustomDrawItem, treba:
>
> procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
> Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
> begin
> if Node.Level = 0 then
> begin
> Sender.Canvas.Font.Style := [fsBold];
> Sender.Canvas.Brush.Color := TTreeView(Sender).Color;
> Sender.Canvas.Font.Color := TTreeView(Sender).Font.Color;
> end;
> end;
>
> ALES
TDataSet.Filter
[*] Peter Laurinc <laurinc(zv)sppa.sk> - 24.10.2000 16:05:59
Zdravim,
mam problemy s filtrovanim TIBTable.
Filter: (CUST_MENO = 'Pe*')
Filtered: true
FilterOptions: [loCaseInSensitive]
mam v tabulke niekolko zaznamov kde CUST_MENO = Peter ale ked pouzijem
filter tak mi to hodi prazdnu tabulku.
W2000, DE5.01,IBX4.2
Vdaka za pomoc
Peter Laurinc
zjisteni okna (kontrolky) na popredi
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 24.10.2000 16:16:54
| v aplikaci mam hlavni formular, na nem TPanel a v tom panelu zobrazuji
| jine formulare. V jednom okamziku tech formularu zobrazenych v panelu
| muze vytvoreno x, ale videt je jen jeden (onen panel je pro zminene
| formulare parentem, ale formulare nefiguruji v seznamu jeho Controls).
| Jakym zpusobem lze urcit, ktery z nich je videt => ve stavu po zavolani
| BringToFront, pricemz ale nemusi mit nutne focus ? Nemam na mysli reseni
| typu: "Pamatuj si nekde naposledy zobrazeny formular" atd.
|
| Snad jsem se vyjadril srozumitelne ...
Skus sa pozriet na
TScreen.ActiveControl
TScreen.ActiveCustomForm
TScreen.ActiveForm
...
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
zjisteni okna (kontrolky) na popredi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 24.10.2000 16:17:55
tak jsem otevrel API help a je to GetTopWindow, tim ziskam handle a to
mi staci ...
Tomas Michal�k wrote:
>
> Ahoj,
>
> v aplikaci mam hlavni formular, na nem TPanel a v tom panelu zobrazuji
> jine formulare. V jednom okamziku tech formularu zobrazenych v panelu
> muze vytvoreno x, ale videt je jen jeden (onen panel je pro zminene
> formulare parentem, ale formulare nefiguruji v seznamu jeho Controls).
> Jakym zpusobem lze urcit, ktery z nich je videt => ve stavu po zavolani
> BringToFront, pricemz ale nemusi mit nutne focus ? Nemam na mysli reseni
> typu: "Pamatuj si nekde naposledy zobrazeny formular" atd.
--
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Dotaz & prosba
[*] NetAdmin ZSU <admin(zv)zsuprkova.pvtnet(tec)cz> - 24.10.2000 16:22:14
DD,
mam problem, jak z MediaPlayeru dostat spravny casovy format delky
stopy (souboru). Priklad v D4 neni nejstastnejsi - retypujou tam ten
"4byte" integer, v nemz je ulozena delka otevreneho souboru (stopy
apod.) jako record ctyr promennych typu byte, ale nejak to nebeha.
Neresil nekdo uz podobny problem a neporadil by mi?
!!! A mohl bych poprosit vsechny ucastniky konference, aby nepouzivali
RTF a HTML kodovani pro zpravy?
Dekuji, R.V.
-----
Radovan Vojtek - Network Administrator
Zakladni skola
Uprkova ul. 1
500 09, Hradec Kralove
CZECH REPUBLIC
tel.: +420(49)5270294
mobil: +420(604)849231
#ICQ: 63924162
Y! ID: Ghort001
-----
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 24.10.2000 16:29:03
Napada me, ze by mozna stacilo, kdyby sablona byla ulozena ve formatu
RTF. Na mistech, kam chcete neco ukladat, si nejak poznacte nazvy
tech poli, aby se to nedalo zamenit s normalni textem, napr.
$$Nazev$$. Sablonu ve formatu RTF pak nactete v Delphi do promenne
typu String a pres funkci StringReplace zamente, co potrebujete.
Vysledek kamsi ulozte...
Pokud se takto ma vytisknout hodne zaznamu, mohla by snad radeji
sablona jiz obsahovat propojeni na datovy zdroj s presne danym
umistenim a z Vaseho programu by pak stacilo jen menit obsah toho
datoveho souboru, sablona sama by zustala nedotcena.
Karel Rys
> Hi,
>
> To je ale v Delfincich cislo 5, ze? Japato by to slo udelat i pro
> trojcicku...
>
> Sroub
> ----- Original Message -----
> From: Hynek Svato�
> To: delphi-l(zv)fwd(tec)cz
> Sent: Tuesday, October 24, 2000 9:42 AM
> Subject: RE: Reporty - Doplnovani textu do sablon dokumentu - jaky
> zvolit pristup ?
>
>
______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 24.10.2000 16:34:46
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Mno, toz to velmi jednoduse, ze ano. Je to stale to same, akorat se vymeni
deklarace WordApp a DocumentTemplate:
var
WordApp, DocumentTemplate, MailMerge: Variant; try
try
WordApp:= NULL;
DocumentTemplate:= NULL;
MailMerge:= NULL;
// vytvor si objekit Wordu
try
WordApp := GetActiveOleObject('Word.Application');
except
WordApp := CreateOleObject('Word.Application');
end;
WordApp.Visible := False;
DocumentTemplate:= WordApp.Documents.Add(Template:=FileName);
MailMerge:= DocumentTemplate.MailMerge;
if FOutPut_Type=0 then
begin
WordApp.Visible := True;
WordApp.Activate;
end;
MailMerge.OpenDataSource(Name:=FTempFileName,
ConfirmConversions:=False, ReadOnly:=True, LinkToSource:=True,
AddToRecentFiles:=False, PasswordDocument:='',
PasswordTemplate:='', WritePasswordDocument:= '',
WritePasswordTemplate:= '', Revert:=False, Format:=0,
Connection:='', SQLStatement:='',
SQLStatement1 :='');
// kam to vlastne posleme ?
MailMerge.Destination:= FOutPut_Type;
if FOutPut_Type in [2, 3] then// email
begin
MailMerge.MailAsAttachment:= False;
MailMerge.MailAddressFieldName:= FEmail_Field;
MailMerge.MailSubject:= FEmail_Subject;
MailMerge.SuppressBlankLines:= True;
MailMerge.Execute(Pause:=True)
end
else
MailMerge.Execute;
DocumentTemplate.Close(SaveChanges:= False);
if not SysUtils.DeleteFile(FTempFileName) then
Application.MessageBox(PChar(Format('Nemohu smazat pomocn� soubor
"%s" !', [FTempFileName])), 'Chyba', 0);
case FOutPut_Type of
0: begin
WordApp.Visible := True;
WordApp.Activate;
end;
1, 2, 3:
begin
WordApp.Quit(SaveChanges:= False);
WordApp:= NULL;
end;
end;
except
Application.HandleException(Self);
end;
finally
inherited;
end;
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ren� Otisk
Sent: Tuesday, October 24, 2000 12:58 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit
pristup ? Hi,
To je ale v Delfincich cislo 5, ze? Japato by to slo udelat i pro
trojcicku...DBGrid - aktualni zaznam
[*] Jan Naiser <tua(zv)wo(tec)cz> - 24.10.2000 16:54:52
Diky, moc,
to je presne ono. Tohle jsem prehledl. Ted uz to dela to, co potrebuju.
Honza.
----- Original Message -----
From: Milan Tome� <Milan.Tomes(zv)haida(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 24, 2000 8:49 AM
Subject: RE: DBGrid - aktualni zaznam
> Radek se da zjistit takto:
>
> TCustomGrid(nazev_gridu).Row
>
> HTH
>
> Milan Tomes
SQL INSERT, UPDATE, DELETE na Gridu
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 24.10.2000 17:11:40
Autoincrementy jsem take pouzival, ale prave z techto duvodu jsem od toho
velice rychle utekl.
Ted pouzivam LongInt a pomoci SQL dotazu zjistuji max. hodnotu.
Milan Tomes
> to je vynikajici - diky, ale pri INSERTu v Paradoxu mam pole
> Firmy_ID, ktere
> je autoincrement a aktualizuje se teprve po Close a Open. Refresh ani
> BookMark na nej nefunguje a pred close pole Firmy_ID jeste
> neznam, takze si
> ho ani nemuzu zapamatovat.
>
> Co s tim?
>
> Petr
>
> > Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na
> > podle me trivialni priklad:
> >
> > Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu
> > jeden Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam
> > SELECT * FROM Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
> >
> > Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do
> > Edit1 zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do
> > tabulky, na obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom
> > zaznamu, ktery jsem opravoval. Analogicky pro pridavani a mazani.
> >
>
> A co Ti brani po stisknuti tlacitka opravit udelat neco jako
>
> update Firmy set Nazev = :Nazev where Id= :Id
>
> ParamByName('Nazev').AsString := Edit1.Text;
> oldId := Query1.FieldByName('ID').AsInteger;
> ParamByName('ID').AsInteger := oldId;
> ...provest prikaz (ten je pochopitelne v jine query nez puvodni
> select)
> Query1.Close;
> Query1.Open;
> Query1.Locate('ID', oldId, []);
>
> Je to jen kostra, mozna s chybami, ale popisujici princip.
>
> David
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
TListView - metoda Add je prilis pomala
[*] Ondrej Jaura <jaura(zv)datalock.sk> - 24.10.2000 17:14:24
Prajem prijemny den :) Pouzivam TListView, jeho polozky doplnam pomocou jeho metody Add.
Lenze pocet pridavanych poloziek je radovo tisice a pri 5000> je to
prilis pomale...
Moje testy:
3 000 ... 6s
5 000 ... 20s
10 000 ... 50 - 60s
Pri 10 000 zaznamoch trva metoda Clear cca 20 - 30s (!!!). Ako to zrychlit?
Riesenim muoze byt i pouzitie inej komponenty, ale musi mat aspon
triedenie na takej urovni ako TListView (pomocou Eventu). Dakujem za zachranne kolesa
Ondrej
[ Ondrej Jaura mailto:jaura(zv)datalock.sk ]
[ Datalock a.s. http://www.datalock.sk ]
[ :) ]Jak schovat ScrollBar v ListView?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 17:19:51
From: "Petr Fischer" <fifa(zv)praguesoft(tec)cz>
> Do SDK jsem samozrejme ihned hupnul, akorat mi uniklo, ze po schovani
> ScrollBaru fci ShowScrollBar(...) a pridani dalsi polozky do ListView
> se ten ScrollBar ukaze znova. Moje chyba, diky...
Ahoj,
mohlo by to jit treba takhle:
type
TForm1 = class(TForm)
ListView1: TListView;
procedure FormCreate(Sender: TObject);
private
FOldWndProc: TWndMethod;
procedure NewWndProc(var Message: TMessage);
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.NewWndProc(var Message: TMessage);
var
L: DWORD;
W: HWND;
begin
with Message do
if (Msg = WM_WINDOWPOSCHANGING) and
(PWindowPos(LParam)^.flags and SWP_NOSIZE <> 0) then
begin
W := ListView1.Handle;
L := GetWindowLong(W, GWL_STYLE);
if L and WS_VSCROLL <> 0 then
SetWindowLong(W, GWL_STYLE, L and not WS_VSCROLL);
end;
FOldWndProc(Message);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FOldWndProc := ListView1.WindowProc;
ListView1.WindowProc := NewWndProc;
end;
Petr Vones, amatersky programator
Defekt pri pouzivani registru
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 24.10.2000 17:24:16
Kdyz pouzivam registry, tak se mi samovolne na disku vytvareji skryte
soubory se jmeny pouzitych klicu. Jak to zaridit, aby se toto nedelo?
MIKMIK company
Petr Voborn�k - P�tr
vobornik(zv)ssakhk(tec)cz
ICQ: #23132120
www.ssakhk(tec)cz/home/vobornik/Maly problemek s Accessem
[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 24.10.2000 17:31:50
Diky, uz to mam vyresene. Napsal jsem si na to v Delphi maly programek a uz
je to hotove.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7
tel. +420-2-3337 3855
+420-2-2431 4538
*************************************
-----Original Message-----
From: Manas [mailto:martin.falta(zv)atlas(tec)cz]
Sent: Tuesday, October 24, 2000 1:25 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Maly problemek s Accessem
Ahoj,
meli jsme v praci podobny problem s aplikaci ve FoxPro, kde je resene
stejnym zpusobem. Delali jsme na to jeden programek, jestli chces muzu ti ho
poslat, ale je ve FoxPro 2.6 :-(
Martin Falta
----- Original Message -----
From: Brant Petr <Brant(zv)dcomm(tec)cz>
To: Konference Delphi (el. adresa) <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 16, 2000 12:26 PM
Subject: OT: Maly problemek s Accessem
> Ahoj,
>
> omlouvam se za OT, ale nemam bohuzel nikoho, kdo by mi mohl pomoct. Mam
> tento problem:
>
> Lokalizuji aplikaci do cestiny a je to udelane tak, ze je u ni databaze
MDB,
> ktera obsahuje tabulky, z nichz kazda odpovida jednomu oknu te aplikace.
> Takze jsou tu tabulky About, Main,... V kazde teto tabulce jsou fieldy
> Lang1, Lang2,...Lang6, kde kazdy sloupec odpovida jednomu jazyku. No a
> jednotlive recordy odpovidaji napisum v tom okne. Lokalizace spociva v
tom,
> ze se v kazde tabulce vyplni sloupec prideleny tomu kteremu jazyku, v mem
> pripade je to Lang3 (sloupec Lang1 je vzdy vyplnen a odpovida anglictine).
> To jeste samo o sobe problem neni.
> Jedna se vsak o to, ze jsem zcela stejne lokalizoval jiz predchozi verzi,
> jenze ted je tech oken a tim padem i jednotlivych tabulek vice, nicmene je
> tu porad jeste dost tech "starych" tabulek, kde jsou stejne texty jako
> predtim, u nekterych tabulek jsou jen nepatrne zmeny. Problem je v tom, ze
> bych potreboval presypat odpovidajici polozky z tech starych tabulek do
> stejne pojmenovanych tabulek v nove verzi. MS Access mam k dispozici, jen
> jsem v nem nikdy nic nepsal. Neresil jste nekdo podobny problem a jste
> ochotni pripadne poslat nejaky zdrojak, abych se poucil?
>
> Diky predem a jeste jednou sorry for OT.
>
> RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
> program�tor
> **************************************
> D & COMM s.r.o.
> Korunova�n� 6, Praha 7
>
> tel. +420-2-3337 3855
> +420-2-2431 4538
> *************************************
>
>DBGrid - aktualni zaznam
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 24.10.2000 17:38:36
> To ano, ale pri pouziti v ud�lostech OnDrawColumnCell nebo OnDrawDataCell je
> takto aktu�ln� ten z�znam, kter� se pr�v� "kresl�", ale j� pot�ebuju
> zjistit, jak jsem psal, na kter�m je ukazatel DBGridu, tedy, na kter�m je
> indik�tor.
no indikator je na tom, ktery ma v State nastaveno dbSelected, jenom to ti asi
moc nepomuze, kdyz potrebujes vyznacovat cely radek...
jinak samozrejme aktualni zaznam je ten ktery je aktualni v prislusnem datasetu,
tj. grid.datasource.dataset.fieldname
muzes zkusit vytvorit vlastni TXDataset /ktery bude mit public property
ActiveRecord a CurrentRecord/ a pak pomoci
TXDataset(Grid.Datasource.Dataset).ActiveRecord zjistit, ktery je oznaceny,
podle napovedy to ma fungovat tak, ze ActiveRecord je dycky stejny a
CurrentRecord se meni podle toho, ktery se zrovna vykresluje... jenom me to dysi
nak neslo nebo co... treba na to prides :-)
Roman
> > Jestli se nepletu - aktualni rekord u datasetu je pristupny pomoci
> > FieldByName() a nebo FindField() - tyto metody vrati hodnotu urciteho
> > sloupce v aktualnim radku.
Uzivatele v IB6
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 24.10.2000 17:51:04
> Klientsky program si potom precte z registry/ini souboru, kde ze
> vlastne ta databaze je a cestu do connection params doplni sam,
> uzivatel zadava pouze jmeno a heslo, pripadne roli. To ini muze bud
> vzniknout pri instalaci a rozkopirovat se, nebo se pri instalaci zada
> cesta ke konfoguracnimu adresari s ini / sitove registry... zalezi na
Mohl bych prosit o pouceni/nasmerovani jak by to melo byt se
zapisem do sitovych registru. Pokud mam aplikaci nainstalovanou
na serveru (NT), tak zatim ukladam nastaveni spolecna pro
vsechny klienty do konfigutracniho ini souboru ve slozce aplikace.
Jsou pro tento ucel pristupne pro klienty registry serveru nebo jak
se predpoklada ulozeni konfigurace. Mam zde nejakou diru ve
vzdelani a ani v MSDN jsem to nedokazal najit. Asi v nich
neumim hledat.
Jiri Binder
Remote regisrty -- was: RE: Uzivatele v IB6
[*] azeleny(zv)csas(tec)cz - 24.10.2000 18:14:49
> Mohl bych prosit o pouceni/nasmerovani jak by to melo byt se
> zapisem do sitovych registru. Pokud mam aplikaci nainstalovanou
> na serveru (NT), tak zatim ukladam nastaveni spolecna pro
> vsechny klienty do konfigutracniho ini souboru ve slozce aplikace.
> Jsou pro tento ucel pristupne pro klienty registry serveru nebo jak
> se predpoklada ulozeni konfigurace. Mam zde nejakou diru ve
> vzdelani a ani v MSDN jsem to nedokazal najit. Asi v nich
> neumim hledat.
Pripojeni k reg. vzdal PC: RegConnectRegistry()
Jinak popsano pod "Registry Functions" Win32 API helpu.
Pozor na jednu drobnost :-) tusim, ze byt dokumentace doporucuje fce koncici
....Ex, tak tyhle funkce nefunguji sitove, ale mozna uz to opravili v
nejakem SP, od doby, kdy jsem to potreboval uz utekl nejaky cas.
Samozrejme, uzivatele musi mit do dane casti registry pristupova prava.
Regedit pouziva pokud vim prave tu "spatnou" sadu fci a proto sitove moc
nefunguje, ale regedt32 beha jak ma.
Pekny vecer.
-----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itelna a.s.
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
tel: +420 2 24995 236
-----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely. SQL INSERT, UPDATE, DELETE na Gridu
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 24.10.2000 18:26:48
a mohu se zeptat jak?
sel by kousek zdrojoveho kodu?
Diky moc.
Petr
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Milan
Tomes
Sent: Tuesday, October 24, 2000 5:12 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: SQL INSERT, UPDATE, DELETE na Gridu
Autoincrementy jsem take pouzival, ale prave z techto duvodu jsem od toho
velice rychle utekl.
Ted pouzivam LongInt a pomoci SQL dotazu zjistuji max. hodnotu.
Milan Tomes
> to je vynikajici - diky, ale pri INSERTu v Paradoxu mam pole
> Firmy_ID, ktere
> je autoincrement a aktualizuje se teprve po Close a Open. Refresh ani
> BookMark na nej nefunguje a pred close pole Firmy_ID jeste
> neznam, takze si
> ho ani nemuzu zapamatovat.
>
> Co s tim?
>
> Petr
>
> > Ac jsem hledal, kde jsem mohl, nikde jsem nenasel jasne reseni na
> > podle me trivialni priklad:
> >
> > Na formulari mam napojene Query1, DatasSource a DBGrid a kuprikladu
> > jeden Edit a tri tlacitka: Pridat, Opravit a Smazat. Na OnCreate mam
> > SELECT * FROM Firmy. Tabulka ma kuprikladu dve polozky ID a Nazev.
> >
> > Nechci nic jednodusiho, nez abych si nalistoval v DBGridu zaznam, do
> > Edit1 zapsal neco a po stisku tlacitka Opravit se to neco zapsalo do
> > tabulky, na obrazovce se "to" obnovilo a hlavne, aby kurzor byl na tom
> > zaznamu, ktery jsem opravoval. Analogicky pro pridavani a mazani.
> >
>
> A co Ti brani po stisknuti tlacitka opravit udelat neco jako
>
> update Firmy set Nazev = :Nazev where Id= :Id
>
> ParamByName('Nazev').AsString := Edit1.Text;
> oldId := Query1.FieldByName('ID').AsInteger;
> ParamByName('ID').AsInteger := oldId;
> ...provest prikaz (ten je pochopitelne v jine query nez puvodni
> select)
> Query1.Close;
> Query1.Open;
> Query1.Locate('ID', oldId, []);
>
> Je to jen kostra, mozna s chybami, ale popisujici princip.
>
> David
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
DBGrid - aktualni zaznam
[*] Jan Naiser <tua(zv)wo(tec)cz> - 24.10.2000 20:19:19
Uz jsem to vyresil pomoci TDBGrid.Row. Ted uz se to paradne obarvi cele a
sipkama lze chodit (se zvyraznenou bunkou) horizontalne.
> no indikator je na tom, ktery ma v State nastaveno dbSelected, jenom to ti
asi
> moc nepomuze, kdyz potrebujes vyznacovat cely radek...
> jinak samozrejme aktualni zaznam je ten ktery je aktualni v prislusnem
datasetu,
> tj. grid.datasource.dataset.fieldname
Jenomze pri vykreslovani v udalostech OnDraw.. je v datasetu aktualni
vzdycky ten vykreslovany. :-(
> muzes zkusit vytvorit vlastni TXDataset /ktery bude mit public property
> ActiveRecord a CurrentRecord/ a pak pomoci
> TXDataset(Grid.Datasource.Dataset).ActiveRecord zjistit, ktery je
oznaceny,
> podle napovedy to ma fungovat tak, ze ActiveRecord je dycky stejny a
> CurrentRecord se meni podle toho, ktery se zrovna vykresluje... jenom me
to dysi
> nak neslo nebo co... treba na to prides :-)
Jak jsem psal vyse... :-)
Honza.
MDI Child v DLL
[*] Manas <martin.falta(zv)atlas(tec)cz> - 24.10.2000 20:33:45
Ahoj,
balicky nemuzu pouzit proto, ze k nekterym formum bude zapotrebi pristupovat
i z programu, ktery je ve Visual Basicu, jinak bych samozrejme balicky
pouzil.
Martin Falta
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 24, 2000 2:26 PM
Subject: Re: MDI Child v DLL
> Ahoj,
>
> tim si to ale zbytecne komplikujes, proc nemuzes pouzit balicky ?
>
> Petr Vones, amatersky programator
>SQL INSERT, UPDATE, DELETE na Gridu
[*] Jan Naiser <tua(zv)wo(tec)cz> - 24.10.2000 20:35:01
Ja jsem to s Paradoxem delal taky tak. Pokud jde o jednouzivatelske
aplikace, pak se to da. Jak to jde na sit, muze nastat kolize, o kterych se
tady mockrat uz diskutovalo a potom si to musis osetrit v OnPostError.
Stacilo v OnNewRecord treba toto: - tabulka ADRESY, Klicem je Id: Integer
procedure TData.AdrNewRecord(DataSet: TDataSet);
begin
Screen.Cursor:= crHour;
With Temp do // Temp je TQuery
try
Close;
SQL.Clear;
SQL.Add('select MAX(Id) from ADRESY');
Open;
DataSet.FieldByName('Id').Value:= Fields[0].AsInteger;
Close;
finally
Screen.Cursor:= crDef;
end;
end;
Druhou moznost, kterou jsem zkousel bylo pouzit Autoinc a zavest v tabulce
dalsi polozku Razitko: TTimeStamp a po novem zaznamu pri refresh hledat
podle toho razitka. Ale porad to jsou jenom nahrazky oproti C/S. :-)
Honza.
----- Original Message -----
From: Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 24, 2000 6:26 PM
Subject: RE: SQL INSERT, UPDATE, DELETE na Gridu
> a mohu se zeptat jak?
>
> sel by kousek zdrojoveho kodu?
>
> Diky moc.
>
> Petr
>Jak na adresare
[*] tomsir1.edu(zv)mail.cez(tec)cz - 24.10.2000 19:53:36
Potreboval bych nejak elegantne zjistit obsah adresare a ulozit ho napr. do
text. souboru
Kdesi jsem vystrachal toto :
uses ShellAPI;
function CopyAllFiles(sFrom, sTo: string; Protect: boolean): boolean;
{ Copies files or directory to another directory. }
var
F: TShFileOpStruct;
ResultVal: integer;
tmp1, tmp2: string;
begin
FillChar(F, SizeOf(F), #0);
Screen.Cursor := crHourGlass;
try
F.Wnd := 0;
F.wFunc := FO_COPY;
{ Add an extra null char }
tmp1 := sFrom + #0;
tmp2 := sTo + #0;
F.pFrom := PChar(tmp1);
F.pTo := PChar(tmp2);
if Protect then
F.fFlags := FOF_RENAMEONCOLLISION or FOF_SIMPLEPROGRESS
else
F.fFlags := FOF_SIMPLEPROGRESS;
F.fAnyOperationsAborted := False;
F.hNameMappings := nil;
Resultval := ShFileOperation(F);
Result := (ResultVal = 0);
finally
Screen.Cursor := crDefault;
end;
end;
ale to je na okopceni vsech souboru odnekud nekam, lze z toho nejak vyjit ???
Muze mi nekdo ozrejmit o co tu vlastne jde :O)
Dik Radegast
TreeView
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 20:58:52
From: "Roman Budinec" <roman(zv)ttc-telecom.sk>
> ostava farba pozadia stale rovnaka. Potreboval by som vediet kde (v
> akych premennych, alebo ...) sa uchovava farba Selektnuteho uzla ked je
> aktivne a ked je neaktivne okno komponenty. Nerad by som to nastavoval
Ahoj,
podivej se v helpu na typ TColor, hodnoty clHighlight apod.
Petr Vones, amatersky programator
Multithread, podivny dotaz
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 21:00:55
From: <azeleny(zv)csas(tec)cz>
> Muze thread vytvorit sve vlastni okno, ktere bude mit sve ovladaci prvky a
> samo si bude resit obsluhu eventu... (vecny synchronize neni to co bych
> chetl)?
Ahoj,
Windows toto umoznuji, VCL vsak ne.
Petr Vones, amatersky programator
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 24.10.2000 19:01:14 gmt
My pouzivame hromadnou korespondenci a funguje to bez chyb.
Jen nastaveni je trochu problem - adtovy zdroj vzdy na jednom miste, ...
ale jinak v poaradku. Jen otevirani Wordu je hrozny (bud trva dlouho, nebo
zase zabira misto v pameti)
Karel Vlcek
===========================
poskytovani software
GSM : ++420 602 264812
mailto: Vlcekk(zv)hotmail.com
===========================
----Original Message Follows----
From: Milan Tome� <Milan.Tomes(zv)haida(tec)cz>
Reply-To: delphi-l(zv)fwd(tec)cz
To: <delphi-l(zv)fwd(tec)cz>
Subject: RE: Reporty - Doplnovani textu do sablon dokumentu - jaky zvolit
pristup ?
Date: Tue, 24 Oct 2000 08:58:31 +0200
Tento postup nedoporucuji. Ve firme tento zpusob napojeni pres ODBC
pouzivame a mohu zodpovedne rict, ze toto MS opravdu tezce nezvladl. Pri
ruznych instalacich se to chova podivne. Tabulky se vytvori stejne, ale Word
krici, ze tabulku resp. ODBC nelze otevrit atp... :( Sam budu toto napojeni
predelavat na "proste doplnovani textu" do textovych poli pres COM. Dalsi
zapor je to, ze ackoliv mam veskere sablony nastavene na jediny font a
pouzivam ruzne velikosti pisem, tak u slucovacich poli a vlozenych textu mi
nahodne tento font zmeni na cokoliv co si zamane :(((( Proste na hromadnou
korespondenci zapomen a delej to jinak.
Milan Tomes
P.S.: Priste posilej maily jako plain text.
��
Jak resite takovyto problem? Co byste mi doporucili?
Diky moc za kazdou uzitecnou radu, Lada
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
Share information about yourself, create your own public profile at
http://profiles.msn.com.Ladeni CGI v Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 21:08:30
From: "Ond�ej Male�ek" <ondrej.malecek(zv)radom-cz(tec)cz>
> Pres prostudovani archivu konference a dokumentace k Delphi jsem se nedobral
> k uspokojivym vysledkum. Bezuspesne se snazim presvedcit Delphi aby v nich
Ahoj,
mozna by pomohlo tohle: http://www.drbob42.com/tools/intrabob.htm
Petr Vones, amatersky programator
princip winpopupu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 21:11:43
From: <konference(zv)novalis.dyndns.org>
> na jakem principu funguje Winpopup ve Win98?
Ahoj,
pokud vim tak WinPopup pouziva(l) mailsloty.
> Hodil by se priklad posilani a odchytavani novych zprav.
Myslis obecne pomoci mailslotu nebo konkretne pro WinPopup ?
Petr Vones, amatersky programator
struktura souboru historie
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 21:22:50
From: "Ji�� Mat�jka" <jiri.matejka(zv)stemmark(tec)cz>
> nevite kde by se dala zjistit struktura souboru do ktereho Internet Explorer
> uklada historii (tzn. udaje o navstivenych strankach)?
Ahoj,
struktura souboru neni dulezita, historii lze cist pomoci WinInet funkci
FindFirstUrlCacheEntry a spol, priklad najdes tady:
http://www.intelligo.net/iedelphi/iecache.htm
Petr Vones, amatersky programator
WaitFor "soubor je cely"
[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 24.10.2000 21:39:24
Ahoj.
Diky za tip, neco podobneho jsem zkousel, ale ani toto nefunguje na
100%.
Neexistuje nejaky jiny zpusob, jak zjistit zda je soubor otevreny pro
zapis?
Nekterym programum, lze soubor "ukrast", resp. zkopirovat, i kdyz ho
maji otevreny a nekterym ne. Kdyz otevru soubor v Notepadu ci Wordpadu,
tak to popsanym zpusobum testovani vubec nevadi a soubor lze nejen cist
ale dokonce i prepsat - Rewrite (f). Jak mohu spolehat, ze zrovna v mem
pripade si aplikace nebude "hlidat" soubor timto zp�sobem?
System prece musi nekde indikovat, ze soubor je otevren a jakym
zpusobem, ale kde to prectu?
Mirek
> From: Petr Vones <pvones(zv)mbox.vol(tec)cz>> From: "Adam Feistner" <feistna(zv)volny(tec)cz>
> > Jak bych to resil pres IOResult - pokud je soubor otevreny, nemuzes
jej
> otevrit.
>
> Ahoj,
>
> ja bych spise pouzil funkce pro praci se soubory. Slo by pouzit
nasledujici
> funkci, zalezi vsak na tom, v jakem rezimu sdileni ma dana aplikace
ten log
> otevreny. Predpokladam ze zapis neni povolen.
>
> function IsFileOpenForWrite(const FileName: TFileName): Boolean;
> var
> FileHandle: THandle;
> begin
> FileHandle := FileOpen(FileName, fmOpenWrite or fmShareDenyNone);
> Result := (FileHandle = INVALID_HANDLE_VALUE);
> if not Result then FileClose(FileHandle);
> end;
>
> Petr Vones, amatersky programator
Internet Mail and News
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 21:44:50
From: "Kejval" <petr.kejval(zv)worldonline(tec)cz>
> potiz je v tom, ze cela podnikova posta je zalozena na postovnim klientu
> Internet Mail and News a neni mozne to menit (jedna se zhruba o 80 pracovist
Ahoj,
jeste pro upresneni, jedna se o Internet Mail and News ktery je soucasti
IE3 nebo o sluzbu kterou lze doinstalovat do MS Exchange klienta ve Win95 ?
Petr Vones, amatersky programator
Zjisteni frekvence procesoru, velikosti pameti, ap
[*] Hurricane <hurricane(zv)email(tec)cz> - 24.10.2000 21:54:00
Zdravim
Na http://lunasoft.hyperlink(tec)cz je na to ted komponenta.
Hurricane
----- Original Message -----
From: <azeleny(zv)csas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 10:20 AM
Subject: RE: Zjisteni frekvence procesoru, velikosti pameti, apod.> Treba takto, ale bez zaruky, nekde jsem nasel cosi, co jsem si nasledovne
> upravil...
>
> function TMainForm.GetCPUSpeed: Double;
> var
> t: DWORD;
> mhi, mlo, nhi, nlo: DWORD;
> vysl,t0, t1, chi, clo, shr32: Comp;
> const
> SMALL_INT = 65536;
> begin
> Result:= -1;
> shr32 := SMALL_INT;
> shr32 := shr32 * SMALL_INT;
> t := GetTickCount;
> while t = GetTickCount do begin end;
> asm
> DB 0FH
> DB 031H
> mov mhi,edx
> mov mlo,eax
> end;
> while GetTickCount < (t + 1000) do begin end;
> asm
> DB 0FH
> DB 031H
> mov nhi,edx
> mov nlo,eax
> end;
> chi := mhi; if mhi < 0 then chi := chi + shr32;
> clo := mlo; if mlo < 0 then clo := clo + shr32;
> t0 := chi * shr32 + clo;
> chi := nhi; if nhi < 0 then chi := chi + shr32;
> clo := nlo; if nlo < 0 then clo := clo + shr32;
> t1 := chi * shr32 + clo;
> vysl := (t1 - t0) / 1E6;
> Result:= Vysl;
> // MessageDlg(Format('CPU speed: %.1f MHz', [vysl]), mtInformation,
> [mbOk], 0);
> end;
>
> > -----Original Message-----
> > From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
> > Sent: Monday, October 23, 2000 9:37 AM
> > To: 'delphi-l(zv)fwd(tec)cz'
> > Subject: Zjisteni frekvence procesoru, velikosti pameti, apod.
> >
> >
> > Zdravim,
> >
> > nemate nekdo komponentu (D4) na zjisteni typu a frekvence procesoru,
> > pripadne velikosti operacni pameti?
> >
> > Diky.
> >
>
Zjisteni frekvence procesoru, velikosti pameti, ap
[*] Petr Jel�nek <pjmodos(zv)yo(tec)cz> - 24.10.2000 22:38:01
Jedna je na http://lunasoft.hyperlink(tec)cz
Zdravi
Petr Jelinek - amatersky programator
Homepage: http://pjmodos.fbi(tec)cz, http://pjmodos.yo(tec)cz
Komponenty pro Delphi: http://lunasoft.hyperlink(tec)cz/index5.htm
Vyhledavani: http://www.barevnylist(tec)cz/visitor.php?ref=pjmodos
----- Original Message -----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, October 23, 2000 9:37 AM
Subject: Zjisteni frekvence procesoru, velikosti pameti, apod.> Zdravim,
>
> nemate nekdo komponentu (D4) na zjisteni typu a frekvence procesoru,
> pripadne velikosti operacni pameti?
>
> Diky.
Data... Re: Ekvalizer X Osciloskop
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 24.10.2000 22:38:25
Promin ze stale uhanim, ale tu knihovnu tu jeste nemam (a ze by se mi vazne libila :-).
Dik,
Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
----- Original Message -----
From: "Hurricane" <hurricane(zv)email(tec)cz>
Subject: Re: Data... Re: Ekvalizer X Osciloskop
> Zdravim
>
> ASMem nepristupujes na porty. Je sice pravda, ze pomoci neho muzes ve
> widlich pristupovat na LPT port, ale jedna se o BEZPECNOSTNI CHYBU !!!!
> Musis normalne pres univerzalni ovladace a jine ptakoviny. Poslu ti knihobnu
> a jeji popis, ta umi cist data ze zvukovky, umi data na zvukovku poslat, I/O
> na COM, LPT port, ovlada TV kartu apod. I s popisem.
>
> Hurricane
> ----- Original Message -----
>
> promin za takto zakladni otazku, ale: jak dostanu data z te zvukovky
> (nebo obecne z ruznych portu?). Jak pristupovat k
> hardware bez assembleru (ten ja zatim neumim a nemam tolik odvahy se na nej
> vrhnout)? Jde pouze o znalosti, nen� to nijak
> nutn�. Sta�il by mi odkaz na n�jak� dobr� a dob�e p��stupn� �esk� zdroj.
>
>Porovnani retezcu
[*] mattes(zv)VOLNY.CZ <mattes(zv)volny(tec)cz> - 24.10.2000 23:02:21
Zdravim Vas,
nevite prosim nekdo jestli je v Delphi nejaka funkce na
porovnavani dvou retezcu za pouziti nahradnich znaku %, (nebo *, ? a tak..)
Diky.Porovnani retezcu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 24.10.2000 23:46:10
From: "mattes(zv)VOLNY.CZ" <mattes(zv)volny(tec)cz>
> nevite prosim nekdo jestli je v Delphi nejaka funkce na
> porovnavani dvou retezcu za pouziti nahradnich znaku %, _ (nebo *, ? a
tak..)
Ahoj,
v D5 mas v unitu Masks funkci MatchesMask.
Petr Vones, amatersky programator
screen aktivniho okna
[*] <bejcek(zv)centrum(tec)cz> - 24.10.2000 23:58:58
Nevite nekdo kde m�m chybu, nemohu ud�lat printscreen pouze
aktivniho okna, vzdy mi to skonci nakonci plochy ,neporadite mi
prosim prosim.... nejak jsem tento zdrojak nepochopil
var DC: HDC;
DesktopWnd: HWND;
DesktopBitmap,wokno: Tbitmap;
DesktopWnd := GetForegroundWindow; // zjiti aktivni okno
DC := GetWindowDC(DesktopWnd); // zjiti handle wokna
DesktopBitmap.Handle:=dc; // nastav� ���ku bitmapy na ���ku
screenu
BitBlt((DesktopBitmap.Canvas.Handle,0,0,DesktopBitmap.Width,
DesktopBitmap.Height,GetDC
(GetForegroundWindow),0,0,SrcCopy); // zkop�ruje obsah screenu
pomoc� WinApi funkce Bitblt do DesktopBitmap
moc diky Aldik
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Preneseni aplikace do popredi
[*] Lauko �tefan <lauko(zv)salamon.sk> - 25.10.2000 00:13:38
Ahoj,
takto dosiahnes zobrazenie msg uple na popredi. Toto exe ma len 16Kb. Ak
si to ostatne dokazes naprogramovat bez pouzitia Forms, Dialogs ... Tak
vysledny exe bude kratky.
program Project1;
uses Windows;
begin
MessageBoxA(HInstance, 'Hello, World !', 'Pozdrav', MB_ICONINFORMATION or
MB_TOPMOST);
end.
Lauko.
----- Original Message -----
Od: Michal Rezek <rezekm(zv)natur.cuni(tec)cz>
Komu: delphi konference <delphi-l(zv)fwd(tec)cz>
Odoslan�: 24. okt�ber 2000 14:40
Predmet: Preneseni aplikace do popredi
> Zdravim,
> Mam programek, ktery bezi 'na pozadi' a pocita cas od spusteni. Po
> predem nastavene dobe vypise hlasku pres MessageDlg. Potreboval bych
> pred tim, nez se vypise hlaska, prepnout tuhle aplikaci na aktivni, aby
> se hlaska vypsala uplne nahoru, pres vsechny ostatni aplikace.
> Pak bych se jeste chtel zeptat, jestli neexistuje nejaky jednoduchy
> zpusob, jak orezat exe soubory vytvorene v Delphi. Padesati radkovy
> program vyuzivajici jednu dve knihovny prece nemusi mit pres 300kB.
> diky za pripadne
> odpovedi
> M.
>TIBDataSet a StoredProc
[*] L. ZITA <konference(zv)sales(tec)cz> - 25.10.2000 03:07:54
Zdravim.
Pomozte prosim.
IB6, IBX komponenty
Pouzivam IBDataSet (select pres VIEW pro insert,modify a delete ulozene
procedury).
Vse celkem funguje az na jednu zasadni vadu.
Mam transakci nastavenou na :
read_committed
rec_version
nowait
V ulozenych procedurach pri delete a modify testuji timestamp CH_DATE a
pokud
se lisi tak vyvolavam exception (odchytavam tak kolize, ktere neodchyti IB
t.j. ty ktere nastanou po ukonceni konkurecni transakce)
Tabulka ma primarni klic ID, ktery generuje procedura v insertu, ta take
vraci nove ID.
Dotazy mam nastavene takto :
SelectSQL : Select ID,Polozka,CH_DATE from TABLE_VIEW ORDER BY POLOZKA
ModifySQL : Execute procedure EDIT_TABLE (:ID,:Polozka,:CH_DATE)
DeleteSQL : Execute procedure DEL_TABLE (:ID,:CH_DATE)
InsertSQL : Execute procedure NEW_TABLE (:POLOZKA)
RefreshSQL : Select ID,POLOZKA,CH_DATE from TABLE_VIEW where ID = :ID
No a prave pri insertu je ten kamen urazu. Zaznam se spravne vlozi do
databaze,
ulozena procedura mi sice vraci vytvorene ID, ale ja ho neumim IBDatasetu
nijak vnutit,
takze behem stejne relace (t.j. do commitnuti transakce a znovuotevreni
DataSetu)
tento novy zaznam nema ID a tim padem nasledna editace padne do kanalu
respektive vyvola vyjjimku, protoze procedura v modify nenajde pozadovany
zaznam.
Mam na mysli postup :
Vlozeni noveho zaznamu, pak Post, pripadne dalsi editace na jinyhc zaznamech
a pak
navrat na ten novy zaznam a editace polozky. Ta se kvuli chybjejicimu ID jiz
neprovede.
Jak tedy pracovat s vracenymi parametry ulozenych procedur v IBDataSet.
Predem moc diky.
Ludek
Jeste prikladam procedury :
CREATE PROCEDURE DEL_TABLE (
ID CHAR(32),
CH_DATE TIMESTAMP)
AS
declare variable dummy char(32);
declare variable dummt TIMESTAMP;
begin
dummy = 'ccc';
SELECT ID,CH_DATE FROM TABULKA WHERE ID=:ID INTO :Dummy,:Dummt;
IF ((:dummy<>:ID) or (:dummt<>:CH_DATE)) then EXCEPTION E_EDITCROSS;
DELETE FROM TABULKA WHERE ID=:ID;
suspend;
end
CREATE PROCEDURE EDIT_TABLE (
ID CHAR(32),
POLOZKA VARCHAR(80),
CH_DATE TIMESTAMP)
AS
declare variable dummy char(32);
declare variable dummt TIMESTAMP;
begin
dummy = 'ccc';
dummt = 'now';
SELECT ID,CH_DATE FROM TABULKA WHERE ID=:ID INTO :Dummy,:Dummt;
IF ((:dummy<>:ID) or (:dummt<>:CH_DATE)) then EXCEPTION E_EDITCROSS;
UPDATE TABULKA SET POLOZKA=:POLOZKA,CH_DATE='now' WHERE ID=:ID;
suspend;
end
CREATE PROCEDURE NEW_TABLE (POLOZKA VARCHAR(80))
RETURNS (
ID CHAR(32))
AS
begin
ID = F_MAKEGUID32(); /* toto je udf, ktera vraci upraveny 32 znakovy
GUID */
INSERT INTO TABULKA (ID,POLOZKA,CH_DATE) VALUES (:ID,:POLOZKA,'now');
suspend;
end
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Internet Mail and News
[*] Kejval <petr.kejval(zv)worldonline(tec)cz> - 25.10.2000 06:44:57
> Ahoj,
>
> jeste pro upresneni, jedna se o Internet Mail and News ktery je soucasti
> IE3 nebo o sluzbu kterou lze doinstalovat do MS Exchange klienta ve Win95
?
>
> Petr Vones, amatersky programator
>
>
Ahoj,
jedn� se o Internet Mail and News, kter� je sou��st� IE3 z W95 OSR2. Ohledn�
MS Exchange. Pokud ho nainstaluji pak lze ulo�it mail do po�ty k odesl�n� do
MS Exchange, ale o to mi nejde.
Petr Kejval
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 5.10.2000
QR a export do RTF
[*] Ji�� Fait���}���6���3 - 25.10.2000 06:52:50
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Jo, ale pro seriozni praci jsou originalni filtry od QuSoftu naho...
Hodi se akorat pokud chces vygenerovat sestavu, ale bude bez ramecku,
grafiky atd.
Existuji ale exportni filtry od jinych programatoru ktere to umi dobre, muze
byt ale problem v tom ze nejsou zadara.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Karel Horky
Sent: Tuesday, October 24, 2000 3:26 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: QR a export do RTF
vite nekdo, jak realizovat export sestavy z QuickReportu do RTF ?
Uzivam QR3 v D5.
Idealni by bylo pri Preview ulozit sestavu primo do RTF.
Nevite zda umi toto QR 3 Prof., nebo vite jak rozsirit exportni filtr o
RTF ?
Zalozka QReport v D5 obsahuje komponentu QRRTFFilter, kter� se um�st� na
QR. Pak v Preview lze sestavu ulozit do RTF.
Tech filtru je tam vice, HTML, CSV, Excel, staci je nahazet na QR a
sestavu lze jakkoliv ukladat primo z Preview. Pro jednoduche ucely to
postacuje
Ahoj, Karel Horky
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
Reporty - Doplnovani textu do sablon dokumentu - j
[*] Ji�� Fait���}���6���3 - 25.10.2000 07:20:53
Taky jsme pred problemem jak resit hromadnou a nebo casto opakovanou
korespondenci. Reaguji na tvoji odpoved a taky by me zajimalo zda by nebyl
zajem o nejake reseni traba i spolecne te komponenty
> Neco (asi) podobneho jsem nedavno resil pro firmu Pro Futuro
> Consulting. Jedna se o tiskove centrum, ktere tiskne a rozesila
> dopisy na hromady ruznych adres. Dopis muze byt vselijaky, v
> nem ruzne texty, obrazky, carove kody atp. V podstate se pripravi
> sablona, pripadne obrazky, do sablony se nasazeji znacky, jaky
> udaj ma kam prijit. Pak se to protahne pres databazi a doplni se
> hodnoty, a posle na tiskarnu. Drobny hacek je v tom, ze sablona
> se pripravuje v Texu, coz je dosti uzivatelsky neprivetive prostredi.
> Vysledny tisk je ale spickovy a dobre se nad tim programuje. Na
> druhe strane je Tex zadarmo, takze ho lze sirit s aplikaci.
>
> Pro obecne pouziti by bylo treba to jeste docesat, coz ovsem stoji
> nejake penize/programovani. Pokud by o neco takoveho byl sirsi
> zajem, myslim, ze by se to snad dalo ohnout do nejake
> komponenty (je to cele napsane v Delphi, k Texu jsou zdrojaky v
> Pascalu), mohli bychom to zkusit spolecne zainvestovat a/nebo
> doprogramovat. Pokud by z toho koukal dalsi prodej, Pro Futuro
> (jakozto vlastnik reseni) by snad nebylo proti.
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
Virtual ListView - blikani
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 25.10.2000 07:33:43
Zjistil jsem zajimavy problem pri pouziti ListView
ve virtualnim rezimu v zobrazeni vsReport s dvema
sloupci (mozna i vice). Problem nastane pokud
v OnData nastavuji SubItems pomoci property
Text namisto pouziti metody Add.
V pripade prirazeni pres Text bude cele ListView
priserne blikat a to vzdy pri stisku tlacitka mysi
nebo pokud mys nestoji na timto ListView !?!
Pri pouziti Add, tento problem nenastane.
Dost dlouhu mi trvalo nez jsem na to prisel
a docela by mne zajimalo cim je to zpusobene.
Kousek kodu:
procedure TForm1.FormCreate(Sender: TObject);
begin
with TListView.Create(Self) do begin
Parent:=Self;
Align:=alClient;
ViewStyle:=vsReport;
with Columns.Add do begin
Caption:='n�zev';
Width:=100;
end;
with Columns.Add do begin
Caption:='popis';
Width:=200;
end;
OwnerData:=True;
OnData:=ListViewData;
Items.Count:=10000;
end;
end;
procedure TForm1.ListViewData(Sender: TObject; Item: TListItem);
begin
Item.Caption:=Format('<%d>',[Item.Index]);
Item.SubItems.Text:='nen�';
//Item.SubItems.Add('nen�');
end;
------------------------------------------------------
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added
zjisteni okna (kontrolky) na popredi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 25.10.2000 08:13:12
Ahoj,
Pavol Kaka�ka wrote:
> Skus sa pozriet na
>
> TScreen.ActiveControl
> TScreen.ActiveCustomForm
> TScreen.ActiveForm
soucasti zadani bylo, ze ten formular nemusi mit focus, a vsechny
uvedene moznosti informuji o kontrolce s focusem ...
Tom
> ...
>
> Pavol Kaka�ka
> kasix(zv)atlas(tec)cz
TListView - metoda Add je prilis pomala
[*] Roman Budinec <roman(zv)ttc-telecom.sk> - 25.10.2000 08:30:53
Ondrej Jaura wrote:
>
> Prajem prijemny den :)
>
> Pouzivam TListView, jeho polozky doplnam pomocou jeho metody Add.
> Lenze pocet pridavanych poloziek je radovo tisice a pri 5000> je to
> prilis pomale...
> Moje testy:
> 3 000 ... 6s
> 5 000 ... 20s
> 10 000 ... 50 - 60s
>
> Pri 10 000 zaznamoch trva metoda Clear cca 20 - 30s (!!!).
>
> Ako to zrychlit?
> Riesenim muoze byt i pouzitie inej komponenty, ale musi mat aspon
> triedenie na takej urovni ako TListView (pomocou Eventu).
>
> Dakujem za zachranne kolesa
>
> Ondrej
>
> [ Ondrej Jaura mailto:jaura(zv)datalock.sk ]
> [ Datalock a.s. http://www.datalock.sk ]
> [ :) ]
Pridavanie poloziek uzavri medzi ListView1.Items.BeginUpdate; a
ListView1.Items.EndUpdate; malo by sa to zrychlit.
Mal som podobny problem ale u mna islo o podstatne viac zaznamov.
Nakoniec som to riesil komponentou TElTree Pozri http://www.eldos.org
Ma sice nejake muchy, no spaja komponenty TListView a TTreeView, je
pomerne rychla, ma v sebe implementovane aj triedenia.
Roman
--
mailto:budinec_roman(zv)ttc-telecom.sk
Jak na adresare
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 25.10.2000 08:38:48
Podivejte se na procedury FindFirst a FindNext
Karel Chmel
-----P�vodn� zpr�va-----
Od: tomsir1.edu(zv)mail.cez(tec)cz [mailto:tomsir1.edu(zv)mail.cez(tec)cz]
Odesl�no: 24. ��jna 2000 20:54
Komu: delphin(zv)pandora(tec)cz
P�edm�t: Jak na adresare
Potreboval bych nejak elegantne zjistit obsah adresare a ulozit ho napr. do
text. souboru
Kdesi jsem vystrachal toto :
uses ShellAPI;
function CopyAllFiles(sFrom, sTo: string; Protect: boolean): boolean;
{ Copies files or directory to another directory. }
var
F: TShFileOpStruct;
ResultVal: integer;
tmp1, tmp2: string;
begin
FillChar(F, SizeOf(F), #0);
Screen.Cursor := crHourGlass;
try
F.Wnd := 0;
F.wFunc := FO_COPY;
{ Add an extra null char }
tmp1 := sFrom + #0;
tmp2 := sTo + #0;
F.pFrom := PChar(tmp1);
F.pTo := PChar(tmp2);
if Protect then
F.fFlags := FOF_RENAMEONCOLLISION or FOF_SIMPLEPROGRESS
else
F.fFlags := FOF_SIMPLEPROGRESS;
F.fAnyOperationsAborted := False;
F.hNameMappings := nil;
Resultval := ShFileOperation(F);
Result := (ResultVal = 0);
finally
Screen.Cursor := crDefault;
end;
end;
ale to je na okopceni vsech souboru odnekud nekam, lze z toho nejak vyjit
???
Muze mi nekdo ozrejmit o co tu vlastne jde :O)
Dik Radegast
SQL vs. IDENTITY pro ACCESS
[*] Ren� Otisk - 25.10.2000 09:00:17
Hi,
D3, DAO, ODBCe, W95
Nemuzu zaboha prijit na to jak alterovat tejbl (pridat sloupec ID INTEGER
IDENTITY(1, 1)). Nevi nekdo japa na to?
Zkousel jsem:
ALTER TABLE CECHSTAM ADD ID INT IDENTITY
ALTER TABLE CECHSTAM ADD ID INT IDENTITY(1, 1)
ALTER TABLE CECHSTAM ADD ID INT AUTOINC
ALTER TABLE CECHSTAM ADD ID INT AUTOINCREMENT
... nicmene fantazie dochazi a jsem porad na chybove hlasce. Bez toho
Identity to funguje ale nema to smysl
Dekuji predem
Sroub
zjisteni okna (kontrolky) na popredi
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 25.10.2000 09:07:54
Tak sorry, a preco si nemozes zapametat TopWindow do nejake premenej? Inak
to asi budes musiet riesit cez API.
btw: Mozes to zadanie poisat este raz.
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
>Ahoj,
>Pavol Kaka�ka wrote:
>> Skus sa pozriet na
>>
>> TScreen.ActiveControl
>> TScreen.ActiveCustomForm
>> TScreen.ActiveForm
>soucasti zadani bylo, ze ten formular nemusi mit focus, a vsechny
>uvedene moznosti informuji o kontrolce s focusem ...
>Tom
TDataSet.Filter
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 25.10.2000 09:30:41
----- Original Message -----
From: Peter Laurinc <laurinc(zv)sppa.sk>
Subject: TDataSet.Filter
> Zdravim,
>
> mam problemy s filtrovanim TIBTable.
>
> Filter: (CUST_MENO = 'Pe*')
Ahoj, spravne ma byt: Filter: (CUST_MENO LIKE 'Pe%')
Pavol Stolc
pstolc(zv)sc.sknet.sk
Boolean hodnoty v IB6
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 25.10.2000 09:33:39
Ahoj,
v IB6 jsem zalozil domenu BOOLEAN jako smallInt s CHECK
omezenim, ze hodnota muze byt 0 nebo 1.
Nyni bych rad v TIBDatasetu vygeneroval pole, ale tak, aby pro
tuto domenu nevzniklo TSmallintField, nybrz TBooleanField. Jde to
nejak?
Dik.
David
Preneseni aplikace do popredi
[*] tungli(zv)datapac.sk - 25.10.2000 09:38:20
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Daj mu WindowState On Top
> -----P> �vodn� zpr�va-----
> Od: Michal Rezek [SMTP:rezekm(zv)natur.cuni(tec)cz]
> Odesl�no: 24. okt�ber 2000 14:40
> Komu: delphi konference
> P�edm�t: Preneseni aplikace do popredi
>
> Zdravim,
> Mam programek, ktery bezi 'na pozadi' a pocita cas od spusteni. Po
> predem nastavene dobe vypise hlasku pres MessageDlg. Potreboval bych
> pred tim, nez se vypise hlaska, prepnout tuhle aplikaci na aktivni, aby
> se hlaska vypsala uplne nahoru, pres vsechny ostatni aplikace.
> Pak bych se jeste chtel zeptat, jestli neexistuje nejaky jednoduchy
> zpusob, jak orezat exe soubory vytvorene v Delphi. Padesati radkovy
> program vyuzivajici jednu dve knihovny prece nemusi mit pres 300kB.
> diky za pripadne
> odpovedi
> M.QR a export do RTF
[*] tungli(zv)datapac.sk - 25.10.2000 09:43:28
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Standard QR3 to nedokaze ale ak kupis QR professional tak si myslim ze ten uz ano.
> -----P> �vodn� zpr�va-----
> Od: V�clav Nov�k [SMTP:milesoft(zv)mi.cesnet(tec)cz]
> Odesl�no: 24. okt�ber 2000 11:01
> Komu: DELPHI
> P�edm�t: QR a export do RTF
>
> Ahoj,
>
> vite nekdo, jak realizovat export sestavy z QuickReportu do RTF ?
>
> Uzivam QR3 v D5.
>
> Idealni by bylo pri Preview ulozit sestavu primo do RTF.
> Nevite zda umi toto QR 3 Prof., nebo vite jak rozsirit exportni filtr o RTF 20
>
> Diky.
>
> Vaclav Novak