Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
TForm.Create
[*] mstevlik(zv)gamo.sk - 2.4.2004 15:13:44
> Ahoj,
> co takhle?
> Petr Daricek
>
>
> TAbstractForm=class(TForm)
> public
> constructor Create(AOwner: TComponent); override;
> End;
>
> TConcreteForm=class(TAbstractForm)
> public
> constructor Create(AOwner:TComponent;Parametr:Integer);
> End;
>
> implementation
>
> { TAbstractForm }
>
> constructor TAbstractForm.Create(AOwner: TComponent);
> begin
> inherited;
> end;
>
> { TConcreteForm }
>
> constructor TConcreteForm.Create(AOwner: TComponent; Parametr: Integer);
> begin
> inherited Create(AOwner);
> end;
A ostane mi ten constructor toho TConcreteFormu stale virtualny?
Budem moct v nejakom potomkovy TConcreteFormu napisat constructor
Create(AOwner:TComponent;Parametr:Integer); override; ?
Stevlik Marian
ISYS programator
GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
mail: mstevlik(zv)gamo.sk
tel: +421 48 4137935, 4372111
ip-tel: 421 48 4372098
mobil: +412 905 462010
icq: 34893645
TForm.Create
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 2.4.2004 15:05:43
Ahoj,
co takhle?
Petr Daricek
TAbstractForm=class(TForm)
public
constructor Create(AOwner: TComponent); override;
End;
TConcreteForm=class(TAbstractForm)
public
constructor Create(AOwner:TComponent;Parametr:Integer);
End;
implementation
{ TAbstractForm }
constructor TAbstractForm.Create(AOwner: TComponent);
begin
inherited;
end;
{ TConcreteForm }
constructor TConcreteForm.Create(AOwner: TComponent; Parametr: Integer);
begin
inherited Create(AOwner);
end;
Unicode a Memo
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 2.4.2004 14:27:39
1.4.2004 Pavel Polak:
> asi nikdo nevite jak na ten unicode co?:(Nevi nekdo aspon nejaky stranky o
> dany problematice? Popr. nemate priklad na praci s JclUnicode?
Existuji i primo UNICODE komponenty pro Delphi. Mozna tohle by byla
schudna cesta...
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
TForm.Create
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 2.4.2004 14:25:38
Potomka TForm jsem nedelal, ale resim takovou situaci takto:
constructor TNewMsg.Create(MSgTableProps: TMSgTableProps);
begin
inherited Create(nil); <--------- volani zdedeneho konstruktoru, misto nil
muzes dat Owner, pokud je to zapotrebi
FMSgTableProps:= MSgTableProps;
end;
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant
Chcem sa opytat, ako mam urobit constructor Create v mojom potomkovi
TFormu, tak ze tam chcem doplnit dalsi parameter
Priklad:
TfrmAbstract = class(TForm)
public
constructor Create(AOwner: TComponent); override;
end;
TfrmStatistika = class(TfrmAbstract)
public
constructor Create(AOwner: TComponent; ibTyp: Boolean);
...........
end;Import objednavky do Money S3
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.4.2004 14:15:37
Puvodni zprava ze dne 2.4.2004:
> nedelal nekdo z vas import objednavky do Money S3? Melo by to jit pres
> XML, ale ta struktura je strasna a vsichni odbornici
> me doporucuji, abych si koupil Money XML Data Exchange. Jenze to stoji
> zhruba 20 000,- a to je pro meho zakaznika
> naprosto neprijatelne.
Tedy ja uz pro Money dlouho nedelal zadny import, tak uz si to zase az
tak moc nepamatuji. Nicmene souhlasim s tim, ze to jejich XML rozhrani
vymyslel vazne nejaky borec - onehda jsem v tom lezel par dni a
nakonec jsem to zahodil do kose, protoze jsem to nepochopil ani z
prikladu :-)
Ale matne si vzpominam, ze snad to XML Data Exchange to prave bylo, i
kdyz zadnych 20k jsem neplatil. Presto, kdyz jsem pak neco s Money
delal, tak jsem to delal primo nad jejich daty pres takove komponenty
od treti strany, ktere poskytovaly pristup k jejich datum. Bylo to pro
me daleko jednodussi nez pres to XML, ktere stejne moc nefungovalo
(aspon tedy ne me).
Doporucil bych Ti, aby ses nejlepe obratil primo na Cigler Software,
jsou tam velice mili lide, kteri Ti poradi a poskytnou informace, jak
komunikovat s Money. Jmenuje se to tusim Money SDK. Konkretne na
Libora Dvoraka, ten to ma na starost.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Import objednavky do Money S3
[*] Svelta Jaroslav <jaroslav.svelta(zv)csw.sk> - 2.4.2004 13:57:35
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of David Klodner
> Sent: Friday, April 02, 2004 1:42 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Import objednavky do Money S3
> nedelal nekdo z vas import objednavky do Money S3? Melo by to jit pres
> XML,
Aku verziu Money mas (rsp. tvoj zakaznik)?
> ale ta struktura je strasna a
Co znamena, ze ta struktura je strasna?
> vsichni odbornici
> me doporucuji, abych si koupil Money XML Data Exchange.
Ako ti toto odvovodnili?
Import objednavok v Money S3 funguje a je
zabezpecovany v podobe XML. V adresarovej strukture,
ktoru si Money vytvara pri instalacii su xsd subory
s definouvanou sablonou ako ma vyzerat importovany
dokument.
Jaro
TForm.Create
[*] mstevlik(zv)gamo.sk - 2.4.2004 13:43:33
Hi all,
Chcem sa opytat, ako mam urobit constructor Create v mojom potomkovi
TFormu, tak ze tam chcem doplnit dalsi parameter
Priklad:
TfrmAbstract = class(TForm)
public
constructor Create(AOwner: TComponent); override;
end;
TfrmStatistika = class(TfrmAbstract)
public
constructor Create(AOwner: TComponent; ibTyp: Boolean); ...........
end;
Cim mam nahradit tie bodky?
Skusal som tam dat reintroduce
Ale ked som potom zavolal lrFrm := TfrmStatistika.Create tak sa mi volal
constructor TfrmAbstract :(
Ide mi o to ze chcem nacisto nahradit constructor aby bolo povinne zadat i
ten druhy parameter
Viete mi niekto poradit?
Stevlik Marian
ISYS programator
GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
mail: mstevlik(zv)gamo.sk
tel: +421 48 4137935, 4372111
ip-tel: 421 48 4372098
mobil: +412 905 462010
icq: 34893645
OT: Import objednavky do Money S3
[*] David Klodner <d.klodner(zv)ordis(tec)cz> - 2.4.2004 13:41:32
Zdravim,
nedelal nekdo z vas import objednavky do Money S3? Melo by to jit pres
XML, ale ta struktura je strasna a vsichni odbornici
me doporucuji, abych si koupil Money XML Data Exchange. Jenze to stoji
zhruba 20 000,- a to je pro meho zakaznika
naprosto neprijatelne.
David Klodner
Jakou lokalni databazi
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 2.4.2004 12:47:28
> co byste mi doporucili za lokalni databazi? Bude to aplikace jen na
> jednom samostatnem PC. Bude potreba data obcas prepsat jejich novou
> verzi. Rad bych pri praci s daty pouzil SQL, ale preziju to i bez toho.
> Aplikace se nebude instalovat, mela by bezet bez instalace primo z CD.
> (Takze ODBC alias asi ne) Napada me nejaka souborova, napr Access. Mate
> nekdo lepsi napad? Dik. Pouziju Delphi 5 nebo C++ Builder 6
Na tohle bych zkusil pouzit SQLite. (viz. www.sqlite.org a pak se
podivej na www.torry.net, kde najdes hromadku kodu pro pristup z
Delphi)
Nepotrebuje to zadnou zvlastni instalaci, jen ke zsve apliakci
prihodis jedno DLL. cea databaze je v jednom souboru, ke kteremu
pristupuje primo engine. S tim enginem ty naopak komunikujes pres
SQL. Tedy je to takovy hybrid mezi lokalni souborovou databazi a
normalni SQL databazi, coz se presne v tvem pripade hodi. ;-)>
>
>
>
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Komponenty pro EDI
[*] David Klodner <d.klodner(zv)ordis(tec)cz> - 2.4.2004 12:27:25
Zdravim konferenci,
mohl by mi nekdo doporucit komponenty pro praci s EDI?
Ing. David Klodner
D5 Prof., Win XP, IB6
Komponenty pro EDI
[*] Jiri Virt <virt(zv)volny(tec)cz> - 2.4.2004 12:31:26
No .. ja sem si na to udelal unitu ... ;o)
na soubory EDI ... vlastni zpracovani nechavam na komunikatoru od EdiTelu.
Jirka Virt
Jakou lokalni databazi
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 2.4.2004 12:19:24
Mam dotaz,
co byste mi doporucili za lokalni databazi? Bude to aplikace jen na jednom
samostatnem PC. Bude potreba data obcas prepsat jejich novou verzi. Rad bych
pri praci s daty pouzil SQL, ale preziju to i bez toho. Aplikace se nebude
instalovat, mela by bezet bez instalace primo z CD. (Takze ODBC alias asi
ne)
Napada me nejaka souborova, napr Access. Mate nekdo lepsi napad?
Dik.
Pouziju Delphi 5 nebo C++ Builder 6
SINEA - Posouvani nahledu sestavy pomoci kolecka m
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 2.4.2004 11:13:17
> From: Milan Tomes
>
> A nebyl by nejaky navod na vytvoreni nahledu ???
Princip je jednoduchy.
- udela se vystup sestavy ve formatu Metafile do Streamu
- Metafile se nacte do libovolne komponenty Image.
Ukazkovou aplikaci posilam na soukromy mail.
Vaclav Krmela
Unicode a Memo
[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 2.4.2004 11:41:20
Ahoj,
mohu doporucit sadu unicode komponent TNT, mam s nimi dobre
zkusenosti
http://tnt.ccci.org/delphi_unicode_controls/
Tomas Bihary
> -----Original Message-----
>
> > asi nikdo nevite jak na ten unicode co?:(Nevi nekdo aspon
> nejaky stranky o
> > dany problematice? Popr. nemate priklad na praci s JclUnicode?
> SQL off topic
[*] Tyslic Jiri <jiri.tyslic(zv)opp.tbggroup(tec)com> - 2.4.2004 11:19:18
> Zdravim vsechny a omlouvam se za off topic, ale potreboval
> bychod vas radu: nevite, kde lze stahnou prikazy pro ovladani
> (vytvoreni db, nastaveni pass,....) MSDE SQL z prikazoveho
> radku? Potrebuji totiz s nasim sw distribuovat MSDE a
> naintalovat ho....
> Chtel bych pro to vyuzit NSIS ktery jste tu chvalili....
> Pokud nekdo NSIS pouzivate, byly by super nejake odkazy a
> prikladky pro pouziti.......
>
> Diky moc
> Vlasta
>
> D5 Ent, SQL 2000
Microsoft BooksOnline pro SQL, je soucasti instalace nebo se da stahnout nekde z www.microsoft(tec)cz
Jinak pro prikazovy radek je utilita isql.exe
SQL off topic
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 2.4.2004 11:03:15
Zdravim vsechny a omlouvam se za off topic, ale potreboval bychod vas radu:
nevite, kde lze stahnou prikazy pro ovladani (vytvoreni db, nastaveni pass,....) MSDE SQL z prikazoveho radku? Potrebuji totiz s nasim sw distribuovat MSDE a naintalovat ho....
Chtel bych pro to vyuzit NSIS ktery jste tu chvalili....
Pokud nekdo NSIS pouzivate, byly by super nejake odkazy a prikladky pro pouziti.......
Diky moc
Vlasta
D5 Ent, SQL 2000
SINEA - Posouvani nahledu sestavy pomoci kolecka m
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 2.4.2004 11:01:15
> Posouvani kterym smerem, nahoru/dolu?
jak jinak
> A co posouvani vlevo/vpravo.
to by musel mit bud druhe kolecko (maji treba A4tech mysi) nebo
naklapeci, proste s rozlisenim smeru. pripadne lze pouzit treba
pridrzeni shiftu nebo altu.
> A co zmena meritka zobrazeni nebo prochazeni mezi strankami?
zoom je pokud vim od pocatku kolecka reseny pridrzenim ctrl. fungujeto
jak officcech, tak v exploderu i mozille a dalsich programech.
co se stranek tyce, logicky bych cekal, ze po dojeti na konec stranky a
dalsim tocenim dolu mi to preskoci na stranku nasledujici. stejen jako v
akrobatu pri cteni PDF.
> Kazdy uzivatel Siney ma jine pozadavky na vzhled i zpusob ovladani
> Preview.
uzivatelum cysvetluju, ze pokud je nejaky zpusob ovladani rozsireny, tak
kvuli nemu ho rozhodne menit nebudu, protoze by mi vynadali ti druzi,
kteri na rozdil od nej zpravidla prostredi win uz stravili a zvykli si
na jakez takez standardy.
> Existuje jednoduche a naprosto univerzalni reseni,
> udelat si vlastni nahled v souladu s predstavami uzivatele
> a ve shode se vzhledem a ovladanim zbytku aplikace.
na druhou stranu bych cekal, ze to generator bude umet sam aspon nejak v
souladu se zvyklostmi windows. rada uzivatelu si na kolecko zvykla a
cekaji, ze jim to bude fungovat aspon trochu podobne jako ve wordu nebo
internet exploderu.
peca
SINEA - Posouvani nahledu sestavy pomoci kolecka m
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 2.4.2004 10:35:12
A nebyl by nejaky navod na vytvoreni nahledu ???
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Vaclav Krmela
> Sent: Friday, April 02, 2004 10:25 AM
>
> Existuje jednoduche a naprosto univerzalni reseni,
> udelat si vlastni nahled v souladu s predstavami uzivatele
> a ve shode se vzhledem a ovladanim zbytku aplikace.SINEA - Posouvani nahledu sestavy pomoci kolecka m
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 2.4.2004 10:25:11
> From: Dalibor
>
> Ahoj, poradite mi nekdo jak docilit viz %subj%
>
Posouvani kterym smerem, nahoru/dolu?
A co posouvani vlevo/vpravo.
A co zmena meritka zobrazeni nebo prochazeni mezi strankami?
Kazdy uzivatel Siney ma jine pozadavky na vzhled i zpusob ovladani
Preview.
Existuje jednoduche a naprosto univerzalni reseni,
udelat si vlastni nahled v souladu s predstavami uzivatele
a ve shode se vzhledem a ovladanim zbytku aplikace.
Vaclav Krmela
SINEA - Posouvani nahledu sestavy pomoci kolecka m
[*] Dalibor <dalibor(zv)torola(tec)cz> - 2.4.2004 09:47:08
Ahoj, poradite mi nekdo jak docilit viz %subj%
D7Prof, Sinea2002 7.40.26
RichEdit a spatny font(samovolne prepnuti do jineh
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 2.4.2004 09:45:07
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of js-delphi(zv)quick(tec)cz
>
> Odesilatel: Pavel Malinsky <malinsky(zv)pmcom(tec)cz>
> > mam jednoduchy editor udelany z TRichEdit nastavim mu font
> > treba Times New Roman. Zkopiruju si treba v notepadu text
> > "aaaeeeaaa"
> > (ecka jsou s hackem) a vlozim do toho meho RichEditu.
> Problem je ten,
> > ze prvni tri acka jsou spravne Timesem, ale ecka s hackem a
> > nasledujici acka jsou fontem SimSum (u kolegy fontem (zv)Arial
> > Unicode MS).
>
> Ahoj!
> Co se mrknout do historie konference, tam uz jsem tenhle
> problem popisoval nejme 3 za tento rok.. ;o))
Ahoj,
:)), samozrejme sem archiv prosel a aplikoval opravu pomoci
OnChange, jenom by se mi vice libilo kdyby nahodou tuto
chybu nekdo objevil primo u zdroje a vedel co s tim :)).
> procedure TForm1.OnChange (Sender: TObject);
> begin
> with (Sender as TRichEdit) do
> begin
> Font.Charset:=Default_charset;
> Font.Charset:=East_European;
> end;
> end;
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
RichEdit a spatny font(samovolne prepnuti do jineh
[*] js-delphi(zv)quick(tec)cz - 2.4.2004 09:39:05
Odesilatel: Pavel Malinsky <malinsky(zv)pmcom(tec)cz>
> mam jednoduchy editor udelany z TRichEdit nastavim mu font
> treba Times New Roman. Zkopiruju si treba v notepadu text
> "aaaeeeaaa"
> (ecka jsou s hackem) a vlozim do toho meho RichEditu. Problem je ten,
> ze prvni tri acka jsou spravne Timesem, ale ecka s hackem a
> nasledujici acka jsou fontem SimSum (u kolegy fontem (zv)Arial
> Unicode MS).
Ahoj!
Co se mrknout do historie konference, tam uz jsem tenhle problem popisoval nejme 3 za tento rok.. ;o))
Zrejme se jedna o chybu primo v objektu RichEditu a jeho pouziti na oper sys W2k a WXP. Po znacich jako je "e s hackem" se samovolne zmeni font. Kdyz prijde dalsi "e s hackem" font se da zase do poradku.
Reseni - pouze zaplata. Odchytit udalost OnChange na tom RichEditu a v teto udalosti provest neco jako (predpokladam, ze mas vybran CharSet=East_European)
procedure TForm1.OnChange (Sender: TObject);
begin
with (Sender as TRichEdit) do
begin
Font.Charset:=Default_charset;
Font.Charset:=East_European;
end;
end;
Tot vsjo. Pak byl problem s vkladanym textem, ktery mel byt nejak upravovan, ale to nejak nevedlo k cili. Tusim, ze posledni reseni bylo generovat soubor "rtf", ten nacist a pak provest tu zmenu s tim charsetem.
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.0.3
programator amater
Inno setup a volba textu v zavislosti na zvolenem
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 2.4.2004 08:55:02
Petr Fejfar wrote:
> Potreboval bych menit texty napr. [setup]:AppName apod.
> v zavislosti na zvolenem jazyku instalace.
Odpovim si sam, protoze by to mohlo zajimat nekoho, kdo nesleduje
anglicke newsy. Shrnu, co jsem zjistil:
1) Texty v sekci [setup] nelze customizovat=lokalizovat v run-time
v zavislosti na zvolenem jazyku, protoze se pouzivaji pri konstrukci
okna Wizardu, tedy v dobe, kdy nebezi Pascal script
2) Team IS prislibil, ze v dalsi verzi zavede sekci [CustomMessages]
s referenci {cm:xxx}. K casovemu horizontu se nikdo zatim nevyjadril.
3) Existuje "quick&dirty" reseni, aby se vubec vicejazycna
instalace dala vytvorit. To umoznuje customizovat alespon nektere texty,
hlavne 1. stranku Wizardu tj. Welcome...
Reseni spociva v tom, ze v Pascal Scriptu existuje event
InitializeWizard()
a ze scriptu se lze odkazovat na jednotliva controls ve formulari
wizardu,
takze lze napsat script, ktery overridne texty dosazene vlastnim IS,
napr.
var
AppName: String;
begin
AppName := xxx(...);
WizardForm.Caption := AppName;
WizardForm.WelcomeLabel1.Caption :=
CustomizeSetupMessage(msgWelcomeLabel1,'[name]',AppName);
...
4) Ovsem vetsina nadpisu stranek wizardu je v poli PageDescriptions[x],
ktere neni
ze scriptu pristupne a rada textu se sestavuje v run-time, takze by
nebylo jednoduche
udelat totez ze scriptu, pokud to vubec lze.
5. Tady je jedinym resenim odstranit nevyresene reference [name] z .ISL
souboru
- stejne jsou vetsinou jalove, protoze jmeno aplikace je v caption
okna -
a je lepsi mit alespon nejakou multilingual instalaci nez zadnou
HTH, pf
spusteni aplikace s Admin pravy
[*] delphi(zv)spst(tec)cz - 2.4.2004 08:00:58
Dobry den
Pokousim se vyzkouset CreateProcAsUserEx z JCL, ale nechce mi to fungovat.
Vzorovy priklad, ktery tam je, tak po spusteni hlasi, ze nemam dostatecna
prava.
Nemam domenu. Jedna se o lokalni pocitac. Program spoustim jako clen users a
proces chci spustit pod administratorem. Je nutne neco nastavovat do
Environment?
Windows XP, Delphi 5?
Predem dekuji Jirka
Translation Manager
[*] Pavel Polak <admin(zv)golden-html(tec)com> - 1.4.2004 23:52:25
Zdravim,
mel bych dotaz na %subj% a to jak prelozim formular, ktery vola napr. nejaka
komponenta? Nevim jak si muzu pridat do seznamu formularu na zalozce
workspace dalsi formulare.Pokud vytvarim vlastni,pak se mi tam pridaji
automaticky.Zkousel jsem pridat knihovnu s formularem ktery vola komponenta
do projektu ale i tak stale formular nevidim.
Diky za nakopnuti
Pavel Polak
RichEdit a spatny font(samovolne prepnuti do jineh
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 1.4.2004 22:42:13
Ahoj,
mam jednoduchy editor udelany z TRichEdit nastavim mu font
treba Times New Roman. Zkopiruju si treba v notepadu text "aaaeeeaaa"
(ecka jsou s hackem) a vlozim do toho meho RichEditu. Problem je ten,
ze prvni tri acka jsou spravne Timesem, ale ecka s hackem a nasledujici
acka jsou fontem SimSum (u kolegy fontem (zv)Arial Unicode MS).
Jak donutit RichEdit, aby dodrzel pro text navoleny font a ne ze se sam
proste po ecku s hackem prepne na jiny font???
Jinak sem zkousel i RxRichEdit, ale je to totez :(( .
ZAPOMEL SEM: WinXP SP1, D4 a D5
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
RichEdit a spatny font(samovolne prepnuti do jineh
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 1.4.2004 22:13:36
Ahoj,
mam jednoduchy editor udelany z TRichEdit nastavim mu font treba Times New
Roman.
Zkopiruju si treba v notepadu text "aaaeeeaaa" (ecka jsou s hackem) a vlozim
do toho meho RichEditu. Problem je ten, ze prvni tri acka jsou spravne
Timesem,
ale ecka s hackem a nasledujici acka jsou fontem SimSum (u kolegy fontem
(zv)Arial Unicode MS).
Jak donutit RichEdit, aby dodrzel pro text navoleny font a ne ze se sam
proste po ecku s hackem prepne na jiny font???
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
RTF2Text
[*] MUDr.Patrik Valenta <valentapat(zv)volny(tec)cz> - 1.4.2004 19:39:25
----- Original Message -----
prevod dat z RTF > do plain textu.
Napr. pomoci TRichEdit a Tmemo.
Do RE natahnes RTF, a pak pretahnes do Memo, pokud to neni moc velke.
Memo1.text := RichEdit1.text;
valik
Unicode a Memo
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 1.4.2004 18:21:19
> asi nikdo nevite jak na ten unicode co?:(Nevi nekdo aspon nejaky stranky o
> dany problematice? Popr. nemate priklad na praci s JclUnicode?
No, naopak.. nevim co stim richeditem. ;-)
Nacist soubor, a prekodovat ho z lecceho do lecceho, to umim. ;-)
Viz. Synapse a unita synachar.pas.
Protoze vysledek chces ukladat i do ISO-8859-2, tak soudimz, e se ti
jedna hlavne o cestinu. Pak asi neni problem soubor suse nacist do
stringlistu, tak probehnout a pomoci synacharu prekodovat do CP1250.
Vysledek nakrmis do obycejneho richeditu.
A naopak pak vysledek z richeditu vezmes a nasypes do obycejneho
stringlistu, pomoci synacharu prekodujes co ceho potrebujes, a ulozis
na disk. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Unicode a Memo
[*] Pavel Polak <pavelp(zv)bnsoft(tec)cz> - 1.4.2004 18:09:17
Zdravim,
asi nikdo nevite jak na ten unicode co?:(Nevi nekdo aspon nejaky stranky o
dany problematice? Popr. nemate priklad na praci s JclUnicode?
Diky
Pavel Polak
>-----Original Message-----
>From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Pavel Polak
>Sent: Monday, March 29, 2004 2:11 PM
>To: delphi-l(zv)clexpert(tec)cz
>Subject: Unicode a Memo
>
>
>Zdravim,
>
>chtel bych se zeptat jak na to - mam unicode a utf-8 soubory a ty bych
chtel
>otevirat v obycejnem TRichEditu nebo TMemo, tam ho zmenit a pote ulozit v
>kodovani iso-8859-2,unicode nebo utf-8. Koukal jsem ze by slo asi pouzivat
>unitu JclUnicode ale vubec nevim jak na to, nemate nekdo priklad jak se s
ni
>pracuje nebo nemuzete me nakopnout spravnym smerem?
>
>Diky
>
> Pavel Polak
XP a cteni z portu
[*] Jozef Marcin <marcin(zv)saske.sk> - 1.4.2004 17:39:15
On Thu, 2004-04-01 at 06:12, V.Vitek wrote:
> umel by prosim nekdo prepsat (Delphi, C++) toto do tvaru pouzitelneho pod
> 32bit Winy:
>
> asm{mov dx, port
> in al, dx
> mov b, al}
>
> kdyz port je 0x379?
>
> dekuji
>
pod win32 to tak nejde, skus WinIO (www.internals.com)
jm
problem: TResourceStream nacita o 22 bajtu min
[*] Sommer Pavel <psommer(zv)cpoj(tec)cz> - 1.4.2004 15:57:06
>Ikona je v resourcech ulozena ponekud komplikovane. Jeden resource
predstavuje "adresar" s rozmery ikony a indexy do druheho resource ve
kterem jsou vlastni data ikony. >Pouzij API funkci LoadIcon nebo
LoadImage.
To je trochu problem, ja ty ikony potom potrebuji ulozit do souboru a v
pripade ze pouziji LoadIcon nebo LoadImage (ktere vraceji handle),
jediny jednoduchy zpusob, ktery znam, jak to ulozit do souboru je pres
Ticon (prip. pres Timage) - tem nastavim vraceny handle, ale je tu
problem s ikonami, ktere maji barevnou hloubku 8mi a vice bitovou (pokud
pouziju Ticon nebo Timage, vzdy se mi do toho souboru ulozi se 4 bitovou
hloubkou). Chtel bych to vyresit pomoci TResourceStream. Musi preci
existovat cesta, jak vytahnout skutecna data toho resource. Neni nejaka
jina cesta nez pres LoadIcon; LoadImage ?
Dik.
PaS.Volba - Optimalizace
[*] Petr Vones <pvones(zv)vol(tec)cz> - 1.4.2004 15:49:04
From: "Pavol Stugel, NETGraphics" <palo(zv)netgraphics.sk>
> nie je celkom pravada! existuje par pripadou kedy som po tazkom
> debugovani zistis, ze fantasticky kompiler ti v ramci optimalizacie
> vyhodil prikazy. Hlavne ked pracujes tazko so smernikmi a assemblerom.
Dobre, ale to jsou jiz extremni pripady. Pak se jedne vicemene o chybu.
Petr Vones
XP a cteni z portu
[*] Petr Vones <pvones(zv)vol(tec)cz> - 1.4.2004 15:47:04
From: "V.Vitek" <v.vitek(zv)post(tec)cz>
> umel by prosim nekdo prepsat (Delphi, C++) toto do tvaru pouzitelneho pod
> 32bit Winy:
>
> asm{mov dx, port
> in al, dx
> mov b, al}
>
> kdyz port je 0x379?
Je nutne napsat kernel driver nebo neco takoveho koupit hotoveho, napriklad:
http://www.entechtaiwan.com/dev/lpt/index.shtm
Petr Vones
Edit po stisku klavesy Enter nebo Esc cinka
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 1.4.2004 15:41:02
> Poradte, prosim, jak cinknuti odstranit
chytit klavesu a nahradit jinou, pripadne #0.
> nebo co ho zpusobuje.
to cinknuti znamena, ze byla v editu stisknuta
nespravna klavesa. je to standardni chovani OS.
> V jine, vetsi aplikaci se toho cinkani u Editu potrebuji zbavit.
standardni chovani OS neni moc dobry menit kvuli
rozmarum uzivatelu. dobre si to rozmysli :o)
> Dekuji predem, kdyz zadem se nesmi :-)
neni zac
Peca
Edit po stisku klavesy Enter nebo Esc cinka
[*] horky(zv)cominn(tec)cz - 1.4.2004 14:52:58
Zdravim vsechny zkusenejsi!
Mam opet _drobny_ problem, viz %subj%.
Postup: Vytvorim uplne novou aplikaci, s jedinym formularem a na nem je umisten jeden Edit a jeden Button. Zkompiluji a spustim. Kdyz ma Edit fokus a stisknu klavesu Enter nebo Esc (dalsi klavesy jsem nehledal), z pripojenych repracku se ozve cinknuti. Kdyz ma fokus Button, nic necinka ani na Enter, ani na Esc. Dela to v D7 prof. i D6 prof., na XP i na W2k.
Poradte, prosim, jak cinknuti odstranit nebo co ho zpusobuje. V jine, vetsi aplikaci se toho cinkani u Editu potrebuji zbavit.
Dekuji predem, kdyz zadem se nesmi :-)
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]
problem: TResourceStream nacita o 22 bajtu min
[*] Petr Vones <pvones(zv)vol(tec)cz> - 1.4.2004 14:44:56
From: "Sommer Pavel" <psommer(zv)cpoj(tec)cz>
> Ahoj, mam nasledujici problem: vytahuji resource (konkretne ikony) z
> library a pri rs:= TResourceStream.Create(hLib, 'NAZEV', RT_ICON) se mi
Ikona je v resourcech ulozena ponekud komplikovane. Jeden resource predstavuje
"adresar" s rozmery ikony a indexy do druheho resource ve kterem jsou vlastni
data ikony. Pouzij API funkci LoadIcon nebo LoadImage.
Petr Vones
OT: RTF2Text
[*] Dave <bone(zv)wizards(tec)cz> - 1.4.2004 14:40:55
Zdravim konferenci.
Need help plz. Potrebuju nevizualni komponentu pro prevod dat z RTF
do plain textu. Nemate prosim nekdo tip?
Diky
Dave
Relocation Error
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.4.2004 13:56:52
On Thursday, April 01, 2004 1:34 PM [CET], Jiri Cincura
<jiri(zv)cincura.net> wrote:
> Ahoj,
> nevi nekdo, proc mi tohle haze CLX aplikace pod Linuxem. V IDE
> Kylixu bezi, ale jinak ne.
>
> relocation error: ./nSysTerminal: undefined symbol: initPAnsiStrings
>
> Jinak, ja uz AnsiStringy nepouzivam. Jedine co je pouziva, je
> Synapse. Jede ta pod Linuxem?
-> www.google.com
-> undefined symbol: initPAnsiStrings
-> http://www.linux(tec)cz/lists/archive/linux/209796.html
-> http://www.efg2.com/Lab/Library/Kylix/deployment.htm
....
D. Toman
Relocation Error
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 1.4.2004 13:34:50
Ahoj,
nevi nekdo, proc mi tohle haze CLX aplikace pod Linuxem. V IDE Kylixu
bezi, ale jinak ne.
relocation error: ./nSysTerminal: undefined symbol: initPAnsiStrings
Jinak, ja uz AnsiStringy nepouzivam. Jedine co je pouziva, je Synapse. Jede
ta pod Linuxem?
--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: http://www.cincura.net; http://cincura.net/photo
XP a cteni z portu
[*] V.Vitek <v.vitek(zv)post(tec)cz> - 1.4.2004 13:12:47
dobry den,
umel by prosim nekdo prepsat (Delphi, C++) toto do tvaru pouzitelneho pod
32bit Winy:
asm{mov dx, port
in al, dx
mov b, al}
kdyz port je 0x379?
dekuji
v.dobry den,
umel by prosim nekdo prepsat (Delphi, C++) toto do tvaru pouzitelneho pod
32bit Winy:
asm{mov dx, port
in al, dx
mov b, al}
kdyz port je 0x379?
dekuji
v.Komunikace + nastaveni port
[*] david.kopecek(zv)hacktrack(tec)com - 1.4.2004 13:12:48
Cau
PL> Nehledej v tom zadny problem - on tam totiz ani neni. Proste otevres TCP
PL> spojeni na urcitem portu na dany server a komunikujes jak chces. Zrejme si
PL> to pletes s FTP, ktere muze v aktivnim modu pouzivat spojeni dve (porty 20,
PL> 21).
PL> Jestli myslis to, ze volajici klient dostava pridelene porty od systemu, tak
PL> to nezmenis a ani neni duvod, To by s FW nijak souviset nemelo, resp. by to
PL> mel NAT spravne prekladat.
Jde o to ze ty data jdou pres vice fw ktere jsou kombinovane s VLAN.
Proto je nutne nakonfigurovat aplikaci aby byl odchozi port jednotny..
Musely by se na tech fw vytvaret slozita pravidla... posledni podobna
vec kvuli MSSQL serveru zabrala adminovy asi 90 min napsani na papir
postupu a pravidel co musi zmenit.. Bohuzel je to nutne.
David.
PL> Nebo nerozumim tvemu problemu...
PL> Petr Langer
PL> ----- Original Message -----
PL> From: <david.kopecek(zv)hacktrack.com>
PL> Subject: Komunikace + nastaveni port
>> Zdravim konferenci
>>
>> programuji aplikaci ktera bude prenaset data mezi dvema servery, mezy
>> kterymi je FW se zvlastnima pravidlama. Je mozne nejak programove
>> zaridit aby aplikace pro odesilani pouzivala pouze jeden port ?.. mam
>> to zarizene ze se pripojuje na cil ktery ma otevreny pouze jeden port
>> , coz je jednoduche udelat ale potreboval bych tu aplikaci donutit aby
>> pro odesilani dat pouzivala pouze jeden port.. Neresil jste to nekdo
>> nekdy a nebo nevite nahodou jak na to ??
>>
>> Diky
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
Komunikace + nastaveni port
[*] Petr Langer <langer(zv)xdom(tec)cz> - 1.4.2004 13:00:45
Nehledej v tom zadny problem - on tam totiz ani neni. Proste otevres TCP
spojeni na urcitem portu na dany server a komunikujes jak chces. Zrejme si
to pletes s FTP, ktere muze v aktivnim modu pouzivat spojeni dve (porty 20,
21).
Jestli myslis to, ze volajici klient dostava pridelene porty od systemu, tak
to nezmenis a ani neni duvod, To by s FW nijak souviset nemelo, resp. by to
mel NAT spravne prekladat.
Nebo nerozumim tvemu problemu...
Petr Langer
----- Original Message -----
From: <david.kopecek(zv)hacktrack.com>
Subject: Komunikace + nastaveni port
> Zdravim konferenci
>
> programuji aplikaci ktera bude prenaset data mezi dvema servery, mezy
> kterymi je FW se zvlastnima pravidlama. Je mozne nejak programove
> zaridit aby aplikace pro odesilani pouzivala pouze jeden port ?.. mam
> to zarizene ze se pripojuje na cil ktery ma otevreny pouze jeden port
> , coz je jednoduche udelat ale potreboval bych tu aplikaci donutit aby
> pro odesilani dat pouzivala pouze jeden port.. Neresil jste to nekdo
> nekdy a nebo nevite nahodou jak na to ??
>
> Diky
Komunikace + nastaveni port
[*] david.kopecek(zv)hacktrack(tec)com - 1.4.2004 12:44:43
Zdravim konferenci
programuji aplikaci ktera bude prenaset data mezi dvema servery, mezy
kterymi je FW se zvlastnima pravidlama. Je mozne nejak programove
zaridit aby aplikace pro odesilani pouzivala pouze jeden port ?.. mam
to zarizene ze se pripojuje na cil ktery ma otevreny pouze jeden port
, coz je jednoduche udelat ale potreboval bych tu aplikaci donutit aby
pro odesilani dat pouzivala pouze jeden port.. Neresil jste to nekdo
nekdy a nebo nevite nahodou jak na to ??
Diky
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
rozdil mezi % a * v ACCESS
[*] Fitz Ladislav <ladislav.fitz(zv)kodytek(tec)cz> - 1.4.2004 11:48:38
zdravim
nevite nekdo jaky je rozdil mezi % a * kdyz to pouziju v prikazu LIKE v
dotazu ulozene v ACCESS, pokud to volam z programu dostanu neco jineho nez
kdyz to volam primo z ACCESSu
Jeste jednou cestina firebird 1.5 + isql
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 1.4.2004 11:42:37
> Problem uz byl vyresen, je skryt v konzoli cmd ve win, ktera pouziva jakysi
> zahadny charset 852,
to asi kvuli podpore dosovych aplikaci
> kde jede cestina v poradku, ale pokud potrebuju
> win1250, tak tam uz cestina nejede, prave kvuli jednostrannosti cmd delaneho
> pod 852. Reseni tedy je nepouzivat standardni cmd a tim padem i isql
no, ja protoze pouzivam FAR, coz je takovej ala norton commander
v provedeni Win32 konzole, tak jsem na tento problem nikdy nenarazil.
takze pokud nekdo ma konzoli v krvi, tak podobny manazer je reseni.
Peca
Jeste jednou cestina firebird 1.5 + isql
[*] Tomas Madle <rainbow(zv)replac-bm(tec)cz> - 1.4.2004 11:00:34
> V pripade, ze jsi tu databazi vytvoril s default character set, tak muzes
to
> zalozeni tabulky provest takto:
> create table zkouska ( TEXT VARCHAR(50) NOT NULL COLLATE PXW_CSY);
> tj. vynechat specifikaci character setu a spise (u char, varchar sloupcu)
> nastavi trideni - COLLATE. Pro cestinu v character setu Win1250 je to
prave
> PXW_CSY
Problem uz byl vyresen, je skryt v konzoli cmd ve win, ktera pouziva jakysi
zahadny charset 852, kde jede cestina v poradku, ale pokud potrebuju
win1250, tak tam uz cestina nejede, prave kvuli jednostrannosti cmd delaneho
pod 852. Reseni tedy je nepouzivat standardni cmd a tim padem i isql
poustene pod ni, ale budto pouzivat nastroje, ktere nejedou pod cmd, nebo si
sehnat upravenou verzi pro charset 1250.
tomas
Jeste jednou cestina firebird 1.5 + isql
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 1.4.2004 07:06:15
V pripade, ze jsi tu databazi vytvoril s default character set, tak muzes to
zalozeni tabulky provest takto:
create table zkouska ( TEXT VARCHAR(50) NOT NULL COLLATE PXW_CSY);
tj. vynechat specifikaci character setu a spise (u char, varchar sloupcu)
nastavi trideni - COLLATE. Pro cestinu v character setu Win1250 je to prave
PXW_CSY
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Tomas Madle
> Sent: Tuesday, March 30, 2004 8:52 PM
>
> create database 't' user 'sysdba' password 'masterkey' default
> character set win1250;
> set names win1250; // zkousel jsem to i bez tohohle, stejny vysledek
> connect 't' user sysdba password masterkey;
> create table zkouska ( TEXT VARCHAR(50) CHARACTER SET WIN1250 NOT NULL);
> INSERT INTO ZKOUSKA VALUES ('c');klavesove zkratky v Delphi
[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 8.4.2004 13:44:34
> pls nevite nekdo kde je mozne nastavit nebo zakazat klavesove
> zkratky v prostredi delphi ? nemuzu to nikde najit
Od Delphi5 do Delphi7 mam vyzkousene toto:
HKEY_CURRENT_USER\SOFTWARE\Borland\Delphi\7.0\Editor\Options
"NoCtrlAltKeys"="1"
Vetev 5.0 odpovida prislusne verzi.
Daniel
---------------------------------------------------------------
Scanning complete: NO intelligent life form in range.Boot WXPH a W98
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 8.4.2004 13:34:33
dokelu, nejak to ten mailovy filter zpackal, to c:\="W98" ma byt na
novom riadku, nie na konci riadku
joka
>skus do boot.ini pridat toto:
>c:\="W98"
>
>takze by mal vyzerat nejak takto (moje XP su teraz na C,
>tvoje budu na D, takze budes mat trocha iny riadok s XP) ale
>doma som to skusal a malo by to fungovat, teda mne to islo
>(nie som si isty ci tam ma byt c:\ alebo len c:, treba vyskusat):
>
>[boot loader]
>timeout=30
>default=multi(0)disk(0)rdisk(0)partition(1)\WINDOWS
>[operating systems]
>multi(0)disk(0)rdisk(0)partition(1)\WINDOWS="Microsoft
>Windows XP Professional" /fastdetect c:\="W98"
>
>joka
>
Boot WXPH a W98
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 8.4.2004 13:30:32
skus do boot.ini pridat toto:
c:\="W98"
takze by mal vyzerat nejak takto (moje XP su teraz na C, tvoje budu na
D, takze budes mat trocha iny riadok s XP) ale doma som to skusal a malo
by to fungovat, teda mne to islo (nie som si isty ci tam ma byt c:\
alebo len c:, treba vyskusat):
[boot loader]
timeout=30
default=multi(0)disk(0)rdisk(0)partition(1)\WINDOWS
[operating systems]
multi(0)disk(0)rdisk(0)partition(1)\WINDOWS="Microsoft Windows XP
Professional" /fastdetect
c:\="W98"
joka
>Cus, nevite nekdo, jak nejjednoduseji prepinat pri startu
>dva OS (WXPH na
>D: a W98 na C:). Uprava Boot.ini v ruznych variantach
>nepomaha (funguje zrejme pouze s NT, 2K a XP), boot hlasi
>chybejici soubor na disku C:.Prehazovani pomoci FDISKu
>funguje ale je to trochu neprakticke. Predem dekuji.
>
>S pozdravem Vaclav Riha
FreeVCS a prihlaseni klienta
[*] delphi(zv)mjsoft(tec)cz - 8.4.2004 12:54:19
nedavno jsem to zkousel. Heslo jsem nevedel, tak jsem ho v databazi
(firebird) smazal. Je to v tabulce USER.
Karl
> Nedari se mi prihlasit klienta k serveru
>
> Zkousim podle napovedy username a password: "sysdba"/ "admin"
>
> Ale hlasi mi to (server): [LOGIN] Access denied, Unknown user. sysdba
OT: Boot WXPH a W98
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 8.4.2004 13:24:31
Cus, nevite nekdo, jak nejjednoduseji prepinat pri startu dva OS (WXPH na
D: a W98 na C:). Uprava Boot.ini v ruznych variantach nepomaha (funguje
zrejme pouze s NT, 2K a XP), boot hlasi chybejici soubor na disku
C:.Prehazovani pomoci FDISKu funguje ale je to trochu neprakticke. Predem
dekuji.
S pozdravem Vaclav Riha
Komponenty pre FB
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 8.4.2004 13:22:28
>My ted zaciname take vetsi projekt a pro ten (pokud chci
>opravdu pouzivat Firebird a ne InterBase) si uz nedovolim
>zacit na IBX.
>Nerad bych na posledni chvili prepisoval komponenty na
>nekolika desitkach formu ciselniku a sestav, popr.
>prepisoval metadata a vracel se ke spolecne syntaxi FB 1.5 a
>Interbase 7.
>
>Delal jsem si nejake testy a rozhodl se pro FIBPlus (prave
>je kupujeme), ale to pro Tebe neni dulezite, stejne se musis
>rozhodnout a vybrat sam.
>
>Sepsal jsem pro kolegu rozdil v syntaxi IBX -> FIBPlus, pro
>zajemce je mohu poskytnout.
>
>Jarek Uher
prosim ta, kde sa daju a za kolko kupit ?
predpokladam, ze ich zakupenim, mozem uz chrlit aplikacie bez dalsich
poplatkov a obmedzeni
joka
klavesove zkratky v Delphi
[*] Suvarina, Vladimir <vladimir.suvarina(zv)siemens(tec)com> - 8.4.2004 13:20:25
Zdravim ...
> zdravim
>
> pls nevite nekdo kde je mozne nastavit nebo zakazat klavesove
> zkratky v prostredi delphi ? nemuzu to nikde najit
> jde mi napr o to ze kdyz clovek pise na notebooku a je zvykly
> pouzivat
> klavesove zkratky pro znaky jako &#[]{}$(zv) (pravy alt a pismeno) a
> delphi ma pro tuto kombinaci prirazenu klavesovou zkratku ta
> se mi ten
> znak nenapise
Ja na to s uspechem pouzivam GExperts ze stranky http://www.gexperts.org/
Hezky den ...
==========================
Vladimir Suvarina, Siemens s.r.o
Komponenty pre FB
[*] delphi(zv)mjsoft(tec)cz - 8.4.2004 13:10:23
Zdravim,
> My jsme dali prednost IBObjects z jednoho duvodu - tyto
> komponenty dokazali nacist a cachovat i nekolik stovek tisic
> relativne velkych (cca. 0,5 - 1kB) zaznamu na cemz spadli jak
> IBX tak i FIBPlus.
pro zajimavost, na kolika zaznamech to spadne? Myslim ze to ale v praxi
nenastane, tolik zaznamu najednou. Co se s takovym mnozstvim da delat
(prohlizet)?>Dalsi vec, ktera se mi docela libi je
> (nevim jestli to umi i FIBPlus) je to, ze dataset v IBO je
> schopen pracovat i bez aktivni transakce.
FIBPlus ma dve transakce. Jednu READ a jednu WRITE. Ta cteci bezi porad
(nic neblokuje). Zapisovaci se pousti jen na okamzik pri ukladani. Jsem
s tim maximalne spokojen.
Karl
klavesove zkratky v Delphi
[*] Matejcek Petr <konference(zv)crhov.komfi(tec)cz> - 8.4.2004 12:54:16
zdravim
pls nevite nekdo kde je mozne nastavit nebo zakazat klavesove
zkratky v prostredi delphi ? nemuzu to nikde najit
jde mi napr o to ze kdyz clovek pise na notebooku a je zvykly pouzivat
klavesove zkratky pro znaky jako &#[]{}$(zv) (pravy alt a pismeno) a
delphi ma pro tuto kombinaci prirazenu klavesovou zkratku ta se mi ten
znak nenapise
diky za radu
PM
DBGrid - zmena barvy textu
[*] Petr BRABEC <petr(zv)elra(tec)cz> - 8.4.2004 12:46:13
Dobry den,
muzete mi prosim nekdo poradit?
Potrebuji zmenit barvu fontu v DBGrid, pro kazdy radek zvlast dle hodnoty v sloupci. Abych to priblizil
Databaze zakazniku obsahuje nejake zaznamy +- sloupec status zakaznika
Pokud je status = klicovy potom bych chtel cely radek zobrazit treba cervene, pokud ma hodnotu blbec tak treba modrou, zbytek cernou.
Doufam, ze se mi to podarilo srozumitelne popsat. Potreboval bych nakopnout spravnym smerem, protoze se mi to nedari.
Mam D5Std. Predem dekuji za kazdou radu.
Petr
Predaj Delphi po skonceni jeho pouzivania
[*] david.kopecek(zv)hacktrack(tec)com - 8.4.2004 12:44:08
Zdravim
BP> Je mozne legalne odpredat Delphi, ak oficialny vlastnik (
BP> spolocnost alebo samostatny vyvojar )
BP> ho prestane definitivne pouzivat ( prechod na iny nastroj )?
BP> Ake su podmienky?
BP> Potrebujem jednu licenciu na D6 ( a vyssie ) na maly projekt
BP> Win32 pre D + FB?, Oracle? - componenty tretich stran.
myslim ze to neni mozne.. ta aplikace neni uz urcena k prodeji tretim
strane
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
QReport preview & ADOQuery
[*] Kratochvil Radomir <radomir.kratochvil(zv)mora(tec)cz> - 8.4.2004 12:30:04
K vytvareni sestav pouzivam QReport, pres ktery take zobrazuju nahledy. Vse
pracovalo OK, dokud jsem do projektu nedal ADOQuery. Jakmile spustim dotaz
do databaze pres komponentu ADOQuery, nahled jakekoliv sestavy QReportu
zamrzne a s nim i cela aplikace. Je zvlastni, ze tisk primo na tiskarnu bez
nahledu jde. Kde je zakopany pes ? Pouzivam D6, WinXP, Qrep 3.5 stnd.
Dekuji za jakykoliv ohlas.
R.Kratochvil
QReport preview & ADOQuery
[*] Kratochvil Radomir <radomir.kratochvil(zv)mora(tec)cz> - 8.4.2004 12:24:03
K vytvareni sestav pouzivam QReport, pres ktery take zobrazuju nahledy. Vse
pracovalo OK, dokud jsem do projektu nedal ADOQuery. Jakmile spustim dotaz
do databaze pres komponentu ADOQuery, nahled jakekoliv sestavy QReportu
zamrzne a s nim i cela aplikace. Je zvlastni, ze tisk primo na tiskarnu bez
nahledu jde. Kde je zakopany pes ? Pouzivam D6, WinXP, Qrep 3.5 stnd.
Dekuji za jakykoliv ohlas.
R.Kratochvil
Komponenty pre FB
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 8.4.2004 12:08:01
Ahoj,
> > Sepsal jsem pro kolegu rozdil v syntaxi IBX -> FIBPlus, pro zajemce
> > je mohu poskytnout.
protoze zajemncu je vice, jsou zde
http://iuher(tec)cz/delphi/download/IBX_To_FIBPlus.zip
Jarek Uher
Komponenty pre FB
[*] MMS <preas_w(zv)stonline.sk> - 8.4.2004 08:23:46
Ahoj
----- Original Message -----
From: "Jaroslav Uher" <jarek(zv)iuher(tec)cz>
> Sepsal jsem pro kolegu rozdil v syntaxi IBX -> FIBPlus, pro zajemce
> je mohu poskytnout.
Moze byt velmi zaujimave. Prosim o zaslanie na moj sukr. mail.
Diky
Miro
Navrh vicemodulove aplikace
[*] Zhasil Radek <radek.zhasil(zv)vitkovice(tec)cz> - 8.4.2004 08:17:45
http://www.obsof.com/delphi_tips/DL613.html
>
> v podniku pouzivame nekolik malych programku, ktere jsem
> napsal v Delphi 7.
> Chtel bych to nejak sjednotit do jedne MDI aplikace tak, ze kazdy ten
> programek (EXE) by byl jako modul hlavni aplikace. Napadlo me predelat
> stavajici EXE na DLL, ale na netu jsem se docetl, ze je s tim spousta
> problemu, hlavne se sdilenim pripojeni k databazi. Takze jsem
> chtel zkusit
> jinou variantu - EXE udelat jako balicky. Jenze tam mam zase
> problem, kdyz z
> hlavni MDI aplikace volam balicek s MDIChild formularem -
> hlasi mi to chybu
> Access violation at address ... (priklad prevzaty z knihy
> Mistrovstvi v
> Delphi 6).zjisteni poctu vlaken dane aplikace
[*] david.kopecek(zv)hacktrack(tec)com - 8.4.2004 08:09:43
Dobry den,
Wednesday, April 07, 2004, 1:21:45 PM, napsal jste:
PV> From: <david.kopecek(zv)hacktrack.com>
>> nemate nedko reseni jak za behu aplikace zjistit kolik ma vlaken ?
>> potreboval bych vedet kolik presne vlaken vyuziva.. tj ten udaj co
>> vidim v Task Manageru.
PV> Zalezi na jakych verzich Windows to ma bezet. Muzes pouzit ToolHelp funkce
PV> (Windows 95/98/Me/2000/XP/2003) nebo Performance Data Helper (NTcka obecne).
jo ToolHelp znam ale potreboval bych to zjistit okamzite v tom danem
procesu. Myslel jsem ze to ma funkci GetThreadCount ci co.. :) Jedna se o 2000.
PV> Petr Vones
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
Predaj Delphi po skonceni jeho pouzivania
[*] BRCKO Peter <peter.brcko(zv)assetsoft.sk> - 8.4.2004 07:59:42
Je mozne legalne odpredat Delphi, ak oficialny vlastnik ( spolocnost alebo samostatny vyvojar )
ho prestane definitivne pouzivat ( prechod na iny nastroj )?
Ake su podmienky?
Potrebujem jednu licenciu na D6 ( a vyssie ) na maly projekt Win32 pre D + FB?, Oracle? - componenty tretich stran.
Peter Brcko.
Nastaveni vychozi vlastnosti tiskarny
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 8.4.2004 06:45:37
Prosim o radu:
Mam 2 tiskarny. Tiskarna A je nastavena jako vychozi. Do tiskarny B si dam nestandardni papir a si jej na vlastnostech tiskarny. Zavolam napriklad Word, a zkousim pred tiskem prepinat ruzne tiskarny a kontroluji, zda je ve vlastnostech tiskarny nastavena spravna velikost papiru - a je to v poradku.
Zavolam aplikaci psano v Delphi se standardnim TPrintDialog, zkousim prepinat tiskarny a kontroluji ve vlastnostech nastaveny papir - a je to spatne, na tiskarne B mi zobrazuje to, co je Factory Settings nastaveni. Pokud to ted nastavim na jiny papir, drzi se toto nastaveni jen do chvile naz zmenim tiskarnu. Jakmile zmenim tiskarnu na A a pak se vratim na tiskarnu B (vubec nemusim opoustet tiskovy dialog), uz to mam zase v puvodnim stavu.
Vysledkem je, ze se prakticky neda pouzivat jiny druh papiru (protoze bych musel pred kazdym tiskem nastavovat papir ve vlastnostech tiskarny).Komponenty pre FB
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 8.4.2004 06:35:35
My jsme dali prednost IBObjects z jednoho duvodu - tyto komponenty dokazali
nacist a cachovat i nekolik stovek tisic relativne velkych (cca. 0,5 - 1kB)
zaznamu na cemz spadli jak IBX tak i FIBPlus. Dalsi vec, ktera se mi docela
libi je (nevim jestli to umi i FIBPlus) je to, ze dataset v IBO je schopen
pracovat i bez aktivni transakce.
S pozdravem
Milan Tomes
P.S.: Jestli mohu poprosit o jednu kopii tech rozdilu, tak sem s nim :)))
Pochopitelne na soukr. mail.
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Jaroslav Uher
> Sent: Wednesday, April 07, 2004 8:38 PM
>
> Delal jsem si nejake testy a rozhodl se pro FIBPlus (prave je
> kupujeme), ale to pro Tebe neni dulezite, stejne se musis rozhodnout
> a vybrat sam.
>
> Sepsal jsem pro kolegu rozdil v syntaxi IBX -> FIBPlus, pro zajemce
> je mohu poskytnout.Navrh vicemodulove aplikace
[*] Pavel Hauptman <phauptman(zv)bilbo(tec)cz> - 8.4.2004 06:29:32
Zdravim vsechny,
v podniku pouzivame nekolik malych programku, ktere jsem napsal v Delphi 7.
Chtel bych to nejak sjednotit do jedne MDI aplikace tak, ze kazdy ten
programek (EXE) by byl jako modul hlavni aplikace. Napadlo me predelat
stavajici EXE na DLL, ale na netu jsem se docetl, ze je s tim spousta
problemu, hlavne se sdilenim pripojeni k databazi. Takze jsem chtel zkusit
jinou variantu - EXE udelat jako balicky. Jenze tam mam zase problem, kdyz z
hlavni MDI aplikace volam balicek s MDIChild formularem - hlasi mi to chybu
Access violation at address ... (priklad prevzaty z knihy Mistrovstvi v
Delphi 6).
Jak to mate vyreseno vy?
Diky a s pozdravem
Pavel Hauptman
Problemy s pouzitim anchors a maximalizace okna
[*] Stanislav PETR <stanislav.petr(zv)glux(tec)cz> - 8.4.2004 00:51:10
Dobry den,
obcas se setkavam s problemem zobrazeni, pokud pro proztazeni nejakeho
prvku pouziji vlastnost anchors. Napriklad pri maximalizaci okna se
dany prvek roztahne ne do sve plne velikosti, ale napr. jen na 2/3
velikosti, kterou by mel mit. Nejcasteji se to stava ve slozitejsich
formularich obsahujicich vice panelu. Nevite nekdo jak se tohoto
divneho chovani zbavit?
Pouzivam Delphi 7 Ent. na systemu Win XP.
--
S pozdravem,
Stanislav PETR
Network specialist
Attoservis s.r.o.
mailto:stanislav.petr(zv)glux(tec)cz
Komponenty pre FB
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 7.4.2004 21:08:32
>idem robit vacsi projekt v Delphi (prvotne) voci FB preto mam zopar otazok (FB1.5 a D6Prof):
>
>1. ako je so spolahlivostou komponent priamo v D6Profesional (IB) (zatial som skusal iba tieto)
>2. je nejaka lepsia alternativa v komponentach pre FB1.5, najlepsie Free (vacsie moznosti, spolahlivost, jednoduchost)
>3. ake mate s nimi skusenosti
>
>
>
Take prave resim podobny problem do ted jsem pouzival IBX v delphi. Ale
tedka si chci trochu pohrat s ZeosLib... www.zeoslib.net Jsou tam ke
stazeni i nejake jednoduche dokumenty a je tam videt, ze se jejich
komponenty daji (samozrejme bez potomku TDataset) pouzivat i v Personal
verzich Delphi.
No a pak mozna by slo jeste zkouknout Unified Interbase
http://www.progdigy.com/UIB/ ti maji take podporu FB 1.5 a maji i
DBexpress driver... ale to asi nebude pro tebe dulezite...
Nicmene myslim, ze se aspon muzes podivat :) hlavne ty zeoslib by mohli
byt pouzitelne.
Zdenek Sedlak
Intranet vs. Internet - stahovani souboru - rychlo
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 7.4.2004 21:04:31
> >> Ke stazeni z NETu pouzivam Synapsi (L.G.) a kopirovani z PC2PC
> >> klasicke kopirovani souboru s tim, ze zdroj je na lokale a cil je
> > Ono to bude tim, ze ten soubor kopirujes prostredky windowsacke SMB
> > site, coz je protokol, ktery ma hodne velkou svoji rezii!
> ja to pochopil tak, ze o SMB prave vubec nejde. Navic na rozumnem
> stroji takovou rezii mit nebude (i kdyz snek to je to jo). Zkousel
Pochopils to podle mne spatne... Pomoci Synapse taha z internetu rychle.
tady problem neni. problem je kdyz pak normalnim windowsim "Copy"
kopiruje data v ramci lokalni site, coz je najednou pomale.
> jsem z jednoho Win serveru ve firme (nic moc zelezo, 100vkova sit,
> switch Catalyst2950) kopirovat ze sdileneho disku pomoci
> WindowsCommanderu a rychlost byla 10mbps. Vysledek nic moc ale preci
> jen nekolikrat vyssi nez drive zminovane 3mbps
No, takovych vysledku dosahnu take, kdyz jsem na nejake pidisitce s
minimalnim provozem. Jakmile jsem ale na siti s nekolika sty pocitacu,
ktere navic pracuji a generuji nejaky ten traffic, pak to tak ruzove
nevypada. Zvlast kdyz (jako treba tady u nas) neni problem zakopnout o
pocitace, ve kterych jeste vesele zije PII/233, a ne nejaky gigaherzovy
golem. ;-)
> Podle me ten clovek pouziva TCP stream na prenos dat mezi pocitaci.
> Pak pokud je to z Internetu podstatne rychlejsi, tak si z nas bud ze
Kdepak, o tohle tu nejde. Ostatne jak jsem radil, zkusit mezi pocitaci
prenaset stejnymi technologiemi, jako se taha z internetu.. pak se teprve
uvidi, jestli je zpomaleni dano siti, nebo necim jinym. Protoze se
dotycny tohoto napadu chytil, a chce si instalovat lokalni FTP server,
domnivam se, ze jsi mimo. ;-)
> Btw: on ten standardni TCP implementovany ve Windows zrovna moc rychly
> taky neni. Na to ma moc malou maximalni velikost TCP window. Teprve
> dlouhe TCP window dovoli poradne vyuzit medium (mene potvrzeni na
> prijata data), samozrejme za predpokladu, ze se neztraci packety...
Mozna neni moc rychly, mozna ani neumi poradne vyuzit media... ale aniz
bych se jakkoliv extra snazil, tak treba Synapse beha na gigabitu hezky,
rozhodne vyrazne rychleji nez na stomegabitu. ;-))) Takze to s tim
vyuzivanim stomegabitove site i s malymi TCP windows tak hrozne zase
nebude. ;-)
> > tento proces je optimalizovan pro maximalni vykon prenosu.
> :-)
Nesmej se nad necim vytrzenym z kontextu. Prenos dat treba pres HTTP je
skutecne navrzen tak, aby byl rozhodne rychlejsi nez treba ono
windowsacke kopirovani souboru pres SMB sdileni. A take vyrazne rychlejsi
je! To je snad bez debat, ne?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Komponenty pre FB
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 7.4.2004 20:38:29
On 7 Apr 2004 at 11:41, KALUS Jozef wrote:
> idem robit vacsi projekt v Delphi (prvotne) voci FB preto mam zopar
> otazok (FB1.5 a D6Prof):
>
> 1. ako je so spolahlivostou komponent priamo v D6Profesional (IB)
> (zatial som skusal iba tieto) 2. je nejaka lepsia alternativa v
> komponentach pre FB1.5, najlepsie Free (vacsie moznosti, spolahlivost,
> jednoduchost) 3. ake mate s nimi skusenosti
vidim, ze se nikdo nema k odpovedi, tak to tedy zkusim ja.
Predevsim, mam pouze 2 a pul lete zkusenosti z D6 a FB .
Za tu dobu jsem napsal nebo se spolupodilel na 4 projektech.
Z toho jsou jiz dva 'preklopene' na FB 1.5. Vsechny byly ale puvodne
psane pro FB 1.3.
Problem zatim zadny.
Kdyz si poradne prectes Firebird_v15.108_ReleaseNotesCzech.pdf od
Pavla Cisare, zjistis, ze pro Delphi doporucuje
- IBObjects
- FIBPlus
ani jedna z nich ale neni free.
My ted zaciname take vetsi projekt a pro ten (pokud chci opravdu
pouzivat Firebird a ne InterBase) si uz nedovolim zacit na IBX.
Nerad bych na posledni chvili prepisoval komponenty na nekolika
desitkach formu ciselniku a sestav, popr. prepisoval metadata a
vracel se ke spolecne syntaxi FB 1.5 a Interbase 7.
Delal jsem si nejake testy a rozhodl se pro FIBPlus (prave je
kupujeme), ale to pro Tebe neni dulezite, stejne se musis rozhodnout
a vybrat sam.
Sepsal jsem pro kolegu rozdil v syntaxi IBX -> FIBPlus, pro zajemce
je mohu poskytnout.
Jarek Uher
Prevod UTF-8
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 31.5.2004 21:03:33
Jeste bych doplnil, ze pokud pouziju UTF8ToAnsi, tak je skoro vse OK, jen
treba u s kouzkem je myslim najednou i.
Prevod UTF-8
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 31.5.2004 20:59:32
Ahoj,
z jisteho databazovaho stroje dostavam text v UTF-8. Muze mi nekdo rici,
jak to spravne prevadet do neceho (kodovani), co se treba v ShowMessage
zobrazi dobre (ja to pak potrebuju dal, ale jako String)?
Staci mi jen ukazat jak. Zatim jsem pouzil UTF8ToAnsi a procedury ze
SynaChar. Ale pokazde jsou treba ceske znaky (takove ty hezke jako tr. "c")
BTW: Kdyz uz to prevadim, nevi nekdo, jak toprevadet rovnou do CP systemu?
Treba, jako ze ve Spanelsku to bude do jejich CP rovnou.
--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
ICQ#: 314711544
web: http://www.cincura.net; http://cincura.net/photo
MS-HelpWorkshop a .RTF
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 31.5.2004 19:21:24
Ahoj vsetci, Vytvaram .hlp subor k vlastnej sade komponent do Delphi7.
(Teda rady smerom k HTML helpu sa nedaju aplikovat)
Zdrojovy subor vytvaram v MS-Word 2000 ako subor .rtf.
Ked skompilujem .RTF subor do .HLP tak niekedy je vsetko OK
a niekedy su niektore znaky CS diakritiky nahradene stvrocekom.
Zavisi to od toho, na ktorom PC bol .rtf subor naposledy ulozeny.
Vyskumom som zistil, ze fungujuce verzie .RTF maju pred kazdym
odstavcom odkaz na font Arial CE, nefungujuce tam ten odkaz
nemaju. Neviem vsak ovplyvnit ako bude .RTF ulozeny.
MS-Wordy 2000 su na vsetkych PC instalovane z toho isteho media,
ale lisi sa OS. Funguje to na Win98 a WinNT4, a nefunguje na
WinXP a Win2k.
Nestretol sa s tym niekto?
Prip. pozna niekto "zarucene" fungujuci
postup ako z .RTF do .HLP?
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
COLLATE
[*] BRCKO Peter <peter.brcko(zv)assetsoft.sk> - 31.5.2004 18:29:20
Mozte mi poradit, ktora collate s ktorym character set bude spravne triedit na FB
slovensku abecedu v postupnosti :
a, dlhe a, siroke a, A, dlhe A, b, B, ......c, makke c, C, makke C, ch, CH ....????
Nepodarilo sa mi to ani s jednou kombinaciou:
character set collate
WIN1250 WIN1250
-//- PXW_CSY
-//- PXW_SLOV
ISO8859_2 ISO8859_2
-//- CS_CZ
Co mam pouzit pre spravne triedenie?
Kde najdem popis triedenia jednotlivymi COLLATE?
InterBase Collection Kit som videl, no moc mu nerozumiem.
Dakujem.
Peter Brcko.
Firebird 1.5 - narust pameti + pomale ulozeni
[*] delphi(zv)mjsoft(tec)cz - 31.5.2004 17:19:11
Zdravim,
tak jsem zkusebne predelal drtivou vetsinu polozek tabulky na domeny.
Zjistil jsem ale, ze se nic nezmenilo. Takze tim to neni. Potom jsem
odmazal vsechny procedury(217) a triggery(439) a jde to bezvadne rychle.
Potom jsem tam vratil jen ty procedury a je to stale rychle. Nevite
nekdo co s tim, aby to behalo i kdyz tam jsou ty triggery?
Diky predem
Karel
> To je prave ten problem. FB sice domenu vytvori, ale pro kazdy
> sloupec novou, takze COL1 INTEGER a COL2 INTEGER jsou dve ruzne
> domeny. To pak pri komplexnejsi strukture vede k velke tabulce
> RDB$FIELDS, coz zpomaluje kompilaci prikazu a zere pamet na metadata
> cache. Urcite doporucuji dusledne pouzivat domeny.
> >V tech
> >domenach by mohl
> > byt zakopany pes. Ja vlastne domeny taky nepouzivam. Firebird je
> > vytvari pro kazdy slozupec za mne. Kdyz se ted mrknu do DB,
> > tak jich
> > tam je 3849. Mohlo by to byt tim?Prehravanie videa z CD
[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 31.5.2004 17:41:15
aky velky je subor? cele cd? ak je maly mozes nahrat do memorystream a odtial prehrat,
pokial su to velke subory tak asi nic :(
skor nechat seekovat data na cdromke aby sa neodstavila :)TLabel.Color vo Win XP
[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 31.5.2004 17:35:13
clGreen je vzdy clGreen (nemalo by byt problem ani v XP , mozno mas premapovane farby a
konstanty!) ak chces zelenu pouzi prikaz RGB(cervena, modra ,zelena); cize RGB(0,0,255));
palo
ADMIN: Stringgrid - autom. zvet. vysky radku podle
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.5.2004 16:13:07
Puvodni zprava ze dne 31.5.2004:
> Dovolil jsem si nechat puvodni zpravu, aby byl videt rozdil, snad
> nedostanu od ADMINa vynadano... :)
Svata prostoto, je fakt nadherne videt rozdil, kdyz to kontrolujes
radek po radku a skaces nahoru dolu a zase nahoru dolu. Clovece,
uvazuj trochu, nez priste posles neco takoveho do konference. Se
podivej, jak to s tim quotovanim delaji ostatni... a temi ostatnimi
myslim tech 95% uzivatelu, kteri to umeji, samozrejme ze ne tech 5%,
kteri ani nevedi, co to quotovani znamena :-)
PS: Jo a ber to jako napomenuti za priserne quotovani dle bodu 5 d).
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Stringgrid - autom. zvet. vysky radku podle obsahu
[*] js-delphi(zv)quick(tec)cz - 31.5.2004 15:03:01
----- Puvodni zprava -----
Odesilatel: Lebeda David <david.lebeda(zv)comarr(tec)cz>
> > procedure TfrmZaznamy.MujGridDrawCell(Sender: TObject; ACol, ARow:
> > Integer;
> > Rect: TRect; State: TGridDrawState);
> > var
> > Akce: Cardinal;
> > R: TRect;
> > Tmp: AnsiString;
> > begin
> > With MujGrid Do Begin
> > tmp:=Cells[ACol, ARow];
> > // Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, Cells[ACol,
> > ARow]);
> > OnDrawCell:=nil;
> > R:=Rect;
> > Akce := DT_LEFT or DT_TOP or DT_WORDBREAK;
> > if ACol = 4 then
> > begin
> > InflateRect(R, 2, 2);
> > DrawText(Canvas.Handle, PChar(tmp), length(tmp), R,
> > DrawTextBiDiModeFlags(DT_EXPANDTABS or Akce or
> DT_CALCRECT or
> > DT_NOPREFIX)); if RowHeights[ARow]<Abs(R.Top-R.Bottom) then
> > RowHeights[ARow]:=Abs(R.Top-R.Bottom);
> > end;
> > Canvas.FillRect(Rect);
> > InflateRect(R, -2, -2);
> > DrawText(Canvas.Handle, PChar(tmp), length(tmp), R, Akce);
> > OnDrawCell:=MujGridDrawCell;
> > End;
> > end;
> >
> > Co je totiz divne, je to, ze kdyz se dostanu to teto udalosti, tak
> > Rect ma hodnoty napr. LT[244;21];RB[357;41]. No a kdyz chci zjistit,
> > jak bude velky tenhle "ctverec" po dosazeni textu, jeho zalomeni na
> > vice radku atd., tak dostanu LT[246;23];RB[249;36] coz je mnohem
> mensi> nez ten puvodni - nevite teda nekdo, kde delam chybu?
> Ahoj,
>
> a ten kod, cos sem napsal, se chova jak? Pri pouziti DrawText s
> DT_CALCRECT se
> predpoklada, ze zadas obdelnik s pozadovanou sirkou, on do nej
> umisti text s
> prislusnym zalomenim a vrati pak upraveny Bottom (pokud si to
> dobre pamatuji).
>
> David Lebeda
Ahoj.
Dovolil jsem si nechat puvodni zpravu, aby byl videt rozdil, snad nedostanu od ADMINa vynadano... :)
Ted uz mi to beha, tak to sem davam kdyby to treba nekdo nekdy resil...
OnDrawCell:=nil;
R:=Rect;
Akce := DT_LEFT or DT_TOP or DT_WORDBREAK;
DrawText(MujGrid.Canvas.Handle, PChar(tmp), length(tmp), R,
(Akce or DT_CALCRECT));
if (R.Bottom-R.Top)>(Rect.Bottom-Rect.Top) then
if RowHeights[ARow]< (R.Bottom-R.Top+4) then
RowHeights[ARow]:=(R.Bottom-R.Top+4);
if (R.Bottom-R.Top)<(Rect.Bottom-Rect.Top) then R:=Rect;
Canvas.FillRect(R);
InflateRect(R, -2, -2);
DrawText(MujGrid.Canvas.Handle, PChar(tmp), length(tmp), R, Akce);
OnDrawCell:=MujGridDrawCell;
Tohle mi chodi pekne. Mozna byl problem s tim with. Do DrawText jsem zacal dosazovat MujGrid.Canvas.Handle a pak taky delaji asi poradek ty dve pridane nasledne podminky za tim zjistenim velikosti - zmena velikosti radku jen za urcitych podminek.
Diky za ochotu mi pomoct!
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.0.3
programator amater
DB Replicator
[*] Milan Kotaska <mkotaska(zv)post(tec)cz> - 31.5.2004 14:57:00
Ahoj,
problem s replikacemi jsem take resil.
Nakonec jsem si vlastni replikaci napsal sam s vydatnou pomoci
dokumentu "Data replication with Interbase", ktery jsem stahl na
WWW.IBPHOENIX.COM. Pokud by jsi dokument nenasel mam ho k
dispozici ve formatu PDF. Pis pripadne na muj soukromy e-mail.DB Replicator
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 31.5.2004 14:40:58
----- Original Message -----
From: "Ales Pavel" <aldik(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, May 30, 2004 11:56 AM
Subject: DB Replicator
> Ahoj kluci, tak jsem zase tady potreboval bych prubezne replikovat na
> stanice a pokud dojde k vypadku tak a jet offline na db u stanic a pak
> pri pripojeni data synchronizovat. Ted dotaz. Nemate nekdo nejake
> sikovny nastroj co by replikoval sam, vim ze existuje neco na
> www.ibphoenix.com doporucoval mi ho Paja Cisar, ale je to placeny, tusim
> ze za 10 licenci by to prislo na cca 30 000,- to je na me
> moc...pripadne jinou databazi na ktere je tenhle nastroj zadara, ci za
> nejakou rozumnou cenu. Ci jak jste nekdo resil podobnou problematiku...
> Je nejaka udf pro FB v delphi ci neco podobneho?
Uz jsem tady na to jednou odpovidal, takze se podivej do archivu.
Problematika replikaci je pomerne slozita zalezitost, obzvlaste kdyz se ma
udelat obecne na jakoukoliv DB, pak Ti nezbyva nez naprogramovat neco
podobneho, jako je na prodej na IBPhoenixu, protoze na zaznamenavani zmen se
nic prevratne jineho nevymysli. Co se tyka prenosu dat, to uz bude unikat,
ale ve vysledku to znamena prenest SQL dotaz na druhy pocitac a tam ho
provest. V kazdem pripade pochybuji, ze Ti nekdo venuje obecne reseni
zadarmo, protoze programatorske prace je tam pomerne dost. Na IBphoenixu
byval dokument, ktery tuto problematiku popisoval
http://www.ibphoenix.com/ibp_howto10.html, ale uz neni platny. Mozna P.Cisar
by poradil, kam se podel. Mozna na tve konkretni reseni, by to az tak
slozite nebylo, ale to budes muset posoudit sam.. Bohuzel o necem plne
funkcnim za rozumnou cenu nevim :-( a byl jsem take nucen si to udelat sam.
Kdyby bylo vice casu asi bych zvladl i obecne reseni, ale momentalne to mame
upravene jen pro nase podminky, takze to poskytnout nemuzu.
S pozdravem
ing. Richard Kejval
mobil: 602477679
http://www.icsoftware(tec)cz
Chyba pri vytvareni externiho souboru ve FB 1.5
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 31.5.2004 13:58:48
> Ahoj,
>
> snazim se vytvorit externi tabulku:
>
> RECREATE TABLE IMPORT EXTERNAL FILE 'c:\import.txt'
> (ID_ODBERATELE CHAR(15),
> NAZEV CHAR(50),
> CRLF (2))
>
> Hazi me to chybu
> ISC ERROR CODE:335544831
>
> ISC ERROR MESSAGE:
> Access to external file "C:\IMPORT.TXT" is denied by server
> administrator
>
> Nevite nekdo, co s tim?
A co si precist navod, obzvlaste kdyz je v cestine :-)
parametr v souboru firebird.conf
ExternalFileAccess = FULL, nebo konkretni adresar
S pozdravem
ing. Richard Kejval
mobil: 602477679
http://www.icsoftware(tec)cz
getfocus
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 31.5.2004 11:30:38
mam odchycenou udalost HotKey v jednom hlavnim okne (zaregistrovano pro
cele windows) a po tehle udalosti potrebuju zjistit focus v cele aplikaci
tzn. v jakemkoliv okne coz mi sice rekne getfocus ale vrati mi handle a ted
nevim jak z toho hwnd zjistim ze jde o TEdit popr o TDBEdit abych tam mohl
tu hodnotu narvat.
horky(zv)cominn(tec)cz
Odeslal: Komu: delphi-l(zv)clexpert(tec)cz
delphi-l-owner(zv)cl Kopie:
expert(tec)cz Predmet: Re: getfocus
31.05.2004 11:14
Odpovezte prosim
uzivateli
delphi-l
> From: Tomas Fajman [mailto:tomas.fajman(zv)ortex(tec)cz]
> Sent: Monday, May 31, 2004 10:51 AM
> Mam app kde je nescetne mnoho oken a ted delam fci aby se na CTRL+K
> zobrazila kalkulacka (to delam pres hotkey, to mi maka) a na CTRL+M se
> vlozila hodnota z kalkulacky do editu,
> ktery ma prave focus a to je pro me problem pres getfocus si zjistim
> handle a to nejspis jeste jenom okna a co dal? nevite nekdo jak na to?
Mrkni se na property TForm.ActiveControl, to je kontrolka, ktera vezme
fokus, kdyz se prepnes zpet na dany form.
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]onkeydown v dbgridu, kdyz je editovano..
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 31.5.2004 11:14:35
> potreboval bych zadelat do komponenty dbgrid (jejiho potomka) obsluhu
> stisknute klavesy. Pri rozeditovani policka gridu ovsem program do
KeyDown;
> (override) dbgridu vubec nedojde - obslouzi se jen na urovni TWinControl.
>
> Message vm_keydown se vubec neodchyti - grid se sklada z MaskEditu?? a pri
> editaci jsme v jenom z nich?? Je to tak?
DBGrid si pri editaci vytvari interne InplaceEditor (viz Grids.pas).
V potomkovi DBGrid chytam klavesy bud
1) predefinovanemi metody KeyDown:
procedure TMyGrid.KeyDown(var Key: Word; Shift: TShiftState);
begin
if key=vk_escape then neco ;
if key=vk_f1 then neco;
inherited KeyDown(Key,Shift);
end;
2) interne si priradim do udalosti OnKeyDown mou proceduru MyOnKeyDown:
constructor TMyGrid.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
OnKeyDown:=MyOnKeyDown;
end;
procedure TMyGrid.MyOnKeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState);
begin
if (Key=vk_F1) and (Shift=[]) then neco;
if (key=vk_f2) and and (Shift=[]) then neco;
end;
3) a navic si v predefinovane metode KeyPress chytam oddelovace tisicu, tak
aby bylo jedno zda se stiskne tecka nebo carka, obdobne pro datum:
procedure TAgniGrid.KeyPress(var Key: Char);
begin
if pole.DataType in [ftFloat,ftBCD,ftFMTBcd] then
begin
if Key in ['.',','] then Key:=DecimalSeparator;
end else
if pole.DataType in [ftDate,ftDateTime] then
begin
if Key in ['.',','] then Key:=DateSeparator;
end;
inherited KeyPress(Key);
end; Marek Dostal
D7Prof, WinXP Home, FireBird 1.0.2
getfocus
[*] horky(zv)cominn(tec)cz - 31.5.2004 11:14:36
> From: Tomas Fajman [mailto:tomas.fajman(zv)ortex(tec)cz]
> Sent: Monday, May 31, 2004 10:51 AM
> Mam app kde je nescetne mnoho oken a ted delam fci aby se na CTRL+K
> zobrazila kalkulacka (to delam pres hotkey, to mi maka) a na CTRL+M se
> vlozila hodnota z kalkulacky do editu,
> ktery ma prave focus a to je pro me problem pres getfocus si zjistim
> handle a to nejspis jeste jenom okna a co dal? nevite nekdo jak na to?
Mrkni se na property TForm.ActiveControl, to je kontrolka, ktera vezme fokus, kdyz se prepnes zpet na dany form.
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]
Inno Setup - potlaceni tlacistka "Next"
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 31.5.2004 11:00:33
Ing. Igor Vodicka wrote:
> Dival jsem se do helpu i na vsechny priklady, ale nic jsem
> nevykoukal. Mohl bych poprosit o kratkou ukazku kodu, kde, v ktere
> procedure.
Jestli ti nepomohl priklad CodeDlg.iss, tak ja ti vic neporadim, protoze
jsem
konkretne s timhle nic nedelal, ale mam pocit, ze v nem je to, co
potrebujes.
HTH, pf
OT: getfocus
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 31.5.2004 10:50:31
Cus bus,
Mam app kde je nescetne mnoho oken a ted delam fci aby se na CTRL+K
zobrazila kalkulacka (to delam pres hotkey, to mi maka) a na CTRL+M se
vlozila hodnota z kalkulacky do editu,
ktery ma prave focus a to je pro me problem pres getfocus si zjistim
handle a to nejspis jeste jenom okna a co dal? nevite nekdo jak na to?
Inno Setup - potlaceni tlacistka "Next"
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 31.5.2004 10:42:30
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Fejfar
>
> Podivej se do helpu na NextButtonClick() popr. na priklady v podadresari
> Inno Setup 4\Examples
>
Dival jsem se do helpu i na vsechny priklady, ale nic jsem nevykoukal. Mohl
bych poprosit o kratkou ukazku kodu, kde, v ktere procedure.
Take mi nejak nefunguje zamereni komponenty na mem formulari; chci si hned
pri otevreni sve stranky zaktivnit editacni pole. "WizardForm.ActiveControl
:= " ani "Edit1.Focused" nereaguje. Nevis jak s timhle.
Diky Igor Vodicka
onkeydown v dbgridu, kdyz je editovano..
[*] Jan Rizek <abxsw(zv)centrum(tec)cz> - 31.5.2004 10:38:28
Problem obsluhy klaves pri editovani v gridu:
potreboval bych zadelat do komponenty dbgrid (jejiho potomka) obsluhu
stisknute klavesy. Pri rozeditovani policka gridu ovsem program do KeyDown;
(override) dbgridu vubec nedojde - obslouzi se jen na urovni TWinControl.
Message vm_keydown se vubec neodchyti - grid se sklada z MaskEditu?? a pri
editaci jsme v jenom z nich?? Je to tak?
Vyresili jsme to obsluhou z formulare - KeyPrewiew:=true a na onKeyDown
zavolam metodu naseho DBGridu.
Je to ale trochu pres ruku. Nelze to nejak vyresit na urovni komponenty?
Nemate s tim nejake zkusenosti?
Co s tim?
JR
Pocet zaznamu v tabulce v MS SQL
[*] Zalesak Tomas <tomas.zalesak(zv)lcs(tec)cz> - 31.5.2004 10:14:24
Pro SELECT COUNT(*) FROM tblXXX pouzije MSSQL nejmensi index
nad tabulkou tblXXX (operace [Clustered] Index Scan v Execution
Planu).
Pokud tabulka nema zadny index, tak musi projit celou tabulku
(operace Table Scan v Execution Planu).
Execution Plan zobrazim v Query Analyzeru via Ctrl+L.
existuje "alternativni" metoda zjisteni poctu zaznamu:
SELECT OBJECT_NAME(id), rows
FROM dbo.sysindexes
WHERE indid BETWEEN 0 AND 1
ORDER BY rows DESC
POZOR - pocty radku v systemove tabulce dbo.sysindexes
nejsou udrzovany online, takze to nemusi byt vzdy presne, lze
to pouzit jen k pribliznemu zjisteni.
Tomas Zalesak
> -----Original Message-----
> From: Malecek Ondrej [mailto:ondrej.malecek(zv)radom-cz(tec)cz]
> Sent: Monday, May 31, 2004 9:54 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Pocet zaznamu v tabulce v MS SQL
>
>
> Pak delam nekde zasadni chybu, protoze SELECT COUNT(*) FROM
> XXX na tabulce s cca 10000000 zaznamu mi trva cca 20 minut,
> pricemz soucasne nebezi zadny jiny dotaz.
>
> Ondrej
>
> > -----Puvodni zprava-----
> > Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> > u?ivatele Tyslic Jiri
> > Odeslano: 31. kvitna 2004 9:44
> > Komu: delphi-l(zv)clexpert(tec)cz
> > P?edmit: Re: Pocet zaznamu v tabulce v MS SQL
> >
> >
> > Ja myslim ze prave ten select count(*) from xxx musi byt velice
> > rychly, protoze pokud si dobre vzpominam, tak MS SQL tyto zaznamy
> > nebude scitat, ale podiva se do systemove tabulky, kde je pocet
> > zaznamu pro danou tabulku.
> > Doufam, ze mluvim pravdu ;-)
> >
> > Jirka
> >
> > > -----Original Message-----
> > > From: Malecek Ondrej [mailto:ondrej.malecek(zv)radom-cz(tec)cz]
> > > Sent: Monday, May 31, 2004 9:28 AM
> > > To: delphi-l(zv)clexpert(tec)cz
> > > Subject: OT: Pocet zaznamu v tabulce v MS SQL
> > >
> > >
> > > Potreboval bych zjistit pocet zaznamu v tabulce v MS SQL
> > > serveru. SELECT
> > > COUNT(*) FROM XXX je nepouzitelne z duvodu vysokeho poctu
> > > zaznamu. Zrejme se pocet zaznamu da zjistit jeste nejakym
> > > jinym zpusobem, protoze administracni konzole ho ma k
> > > dispozici velmi rychle. Vite nekdo o necem pouzitelnem ?
> > >
> > > Diky Ondrej
Pocet zaznamu v tabulce v MS SQL
[*] Tyslic Jiri <jiri.tyslic(zv)opp.tbggroup(tec)com> - 31.5.2004 10:14:24
Hmm, tak ted jsem se na to dival znovu a asi jsem teda pekne kecal, protoze kdyz se podivam na Execution plan toho dotazu, tak vidim, ze prochazi index. Nicmene na tabulce se 100.000 zaznamy je delka vyhodnoceni okamzita... Tak ted tedy opravdu nevim... A je na te tabulce nejaky index?
> Pak delam nekde zasadni chybu, protoze SELECT COUNT(*) FROM
> XXX na tabulce s cca 10000000 zaznamu mi trva cca 20 minut,
> pricemz soucasne nebezi zadny jiny dotaz.
>
> Ondrej
>
> >
> > Ja myslim ze prave ten select count(*) from xxx musi byt velice
> > rychly, protoze pokud si dobre vzpominam, tak MS SQL tyto zaznamy
> > nebude scitat, ale podiva se do systemove tabulky, kde je pocet
> > zaznamu pro danou tabulku. Doufam, ze mluvim pravdu ;-)
> >
> > Jirka
> > >
> > > Potreboval bych zjistit pocet zaznamu v tabulce v MS SQL serveru.
> > > SELECT
> > > COUNT(*) FROM XXX je nepouzitelne z duvodu vysokeho poctu
> zaznamu.
> > > Zrejme se pocet zaznamu da zjistit jeste nejakym jinym zpusobem,
> > > protoze administracni konzole ho ma k dispozici velmi
> rychle. Vite
> > > nekdo o necem pouzitelnem ?
> > >
> > > Diky Ondrej
> > >Pocet zaznamu v tabulce v MS SQL
[*] Milan Schembera <four(zv)4squares(tec)net> - 31.5.2004 10:12:23
UPDATE STATISTICS je nastaven na automaticky ? Co rika DBCC CHECKDB ? Je
definovan primarni klic ? Co pouzit treba SELECT COUNT(1) AS Pocet FROM
XXX ?
4> -----Original Message-----
4> From: Malecek Ondrej
4>
4> Pak delam nekde zasadni chybu, protoze SELECT COUNT(*) FROM
4> XXX na tabulce s cca 10000000 zaznamu mi trva cca 20 minut,
4> pricemz soucasne nebezi zadny jiny dotaz.
Pocet zaznamu v tabulce v MS SQL
[*] prgx(zv)email(tec)cz - 31.5.2004 10:06:22
Mas-li v tabulce definovany klic, nebo aspon jedno oindexovane pole,
tak proved count pres toto pole:
select count(jm_pole) from xxx
a vysledek musi byt skoro okamzite.
Stringgrid - autom. zvet. vysky radku podle obsahu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 31.5.2004 09:56:20
> procedure TfrmZaznamy.MujGridDrawCell(Sender: TObject; ACol, ARow:
> Integer;
> Rect: TRect; State: TGridDrawState);
> var
> Akce: Cardinal;
> R: TRect;
> Tmp: AnsiString;
> begin
> With MujGrid Do Begin
> tmp:=Cells[ACol, ARow];
> // Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, Cells[ACol,
> ARow]);
> OnDrawCell:=nil;
> R:=Rect;
> Akce := DT_LEFT or DT_TOP or DT_WORDBREAK;
> if ACol = 4 then
> begin
> InflateRect(R, 2, 2);
> DrawText(Canvas.Handle, PChar(tmp), length(tmp), R,
> DrawTextBiDiModeFlags(DT_EXPANDTABS or Akce or DT_CALCRECT or
> DT_NOPREFIX)); if RowHeights[ARow]<Abs(R.Top-R.Bottom) then
> RowHeights[ARow]:=Abs(R.Top-R.Bottom);
> end;
> Canvas.FillRect(Rect);
> InflateRect(R, -2, -2);
> DrawText(Canvas.Handle, PChar(tmp), length(tmp), R, Akce);
> OnDrawCell:=MujGridDrawCell;
> End;
> end;
>
> Co je totiz divne, je to, ze kdyz se dostanu to teto udalosti, tak
> Rect ma hodnoty napr. LT[244;21];RB[357;41]. No a kdyz chci zjistit,
> jak bude velky tenhle "ctverec" po dosazeni textu, jeho zalomeni na
> vice radku atd., tak dostanu LT[246;23];RB[249;36] coz je mnohem mensi
> nez ten puvodni - nevite teda nekdo, kde delam chybu?
Ahoj,
a ten kod, cos sem napsal, se chova jak? Pri pouziti DrawText s DT_CALCRECT se
predpoklada, ze zadas obdelnik s pozadovanou sirkou, on do nej umisti text s
prislusnym zalomenim a vrati pak upraveny Bottom (pokud si to dobre pamatuji).
David Lebeda
************************************************************
David Lebeda, programator
ComArr s. r. o.
Tolarova 291, 533 51 Pardubice
Telefon: 466 889 111 (ustredna), 466 889 225 (prima linka)
Fax: 466 415 481
E-mail: lebeda(zv)comarr(tec)cz
http://www.comarr(tec)cz
************************************************************Pocet zaznamu v tabulce v MS SQL
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 31.5.2004 09:54:20
Pak delam nekde zasadni chybu, protoze SELECT COUNT(*) FROM XXX na tabulce s
cca 10000000 zaznamu mi trva cca 20 minut, pricemz soucasne nebezi zadny
jiny dotaz.
Ondrej
> -----Puvodni zprava-----
> Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> u?ivatele Tyslic Jiri
> Odeslano: 31. kvitna 2004 9:44
> Komu: delphi-l(zv)clexpert(tec)cz
> P?edmit: Re: Pocet zaznamu v tabulce v MS SQL
>
>
> Ja myslim ze prave ten select count(*) from xxx musi byt velice
> rychly, protoze pokud si dobre vzpominam, tak MS SQL tyto zaznamy
> nebude scitat, ale podiva se do systemove tabulky, kde je pocet
> zaznamu pro danou tabulku.
> Doufam, ze mluvim pravdu ;-)
>
> Jirka
>
> > -----Original Message-----
> > From: Malecek Ondrej [mailto:ondrej.malecek(zv)radom-cz(tec)cz]
> > Sent: Monday, May 31, 2004 9:28 AM
> > To: delphi-l(zv)clexpert(tec)cz
> > Subject: OT: Pocet zaznamu v tabulce v MS SQL
> >
> >
> > Potreboval bych zjistit pocet zaznamu v tabulce v MS SQL
> > serveru. SELECT
> > COUNT(*) FROM XXX je nepouzitelne z duvodu vysokeho poctu
> > zaznamu. Zrejme se pocet zaznamu da zjistit jeste nejakym
> > jinym zpusobem, protoze administracni konzole ho ma k
> > dispozici velmi rychle. Vite nekdo o necem pouzitelnem ?
> >
> > Diky Ondrej
> >
> >
> >
>
>
OT: Pocet zaznamu v tabulce v MS SQL
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 31.5.2004 09:28:16
Potreboval bych zjistit pocet zaznamu v tabulce v MS SQL serveru. SELECT
COUNT(*) FROM XXX je nepouzitelne z duvodu vysokeho poctu zaznamu. Zrejme se
pocet zaznamu da zjistit jeste nejakym jinym zpusobem, protoze administracni
konzole ho ma k dispozici velmi rychle. Vite nekdo o necem pouzitelnem ?
Diky Ondrej
Pocet zaznamu v tabulce v MS SQL
[*] Tyslic Jiri <jiri.tyslic(zv)opp.tbggroup(tec)com> - 31.5.2004 09:44:18
Ja myslim ze prave ten select count(*) from xxx musi byt velice rychly, protoze pokud si dobre vzpominam, tak MS SQL tyto zaznamy nebude scitat, ale podiva se do systemove tabulky, kde je pocet zaznamu pro danou tabulku.
Doufam, ze mluvim pravdu ;-)
Jirka
> -----Original Message-----
> From: Malecek Ondrej [mailto:ondrej.malecek(zv)radom-cz(tec)cz]
> Sent: Monday, May 31, 2004 9:28 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Pocet zaznamu v tabulce v MS SQL
>
>
> Potreboval bych zjistit pocet zaznamu v tabulce v MS SQL
> serveru. SELECT
> COUNT(*) FROM XXX je nepouzitelne z duvodu vysokeho poctu
> zaznamu. Zrejme se pocet zaznamu da zjistit jeste nejakym
> jinym zpusobem, protoze administracni konzole ho ma k
> dispozici velmi rychle. Vite nekdo o necem pouzitelnem ?
>
> Diky Ondrej
>
>
> Inno Setup - potlaceni tlacistka "Next"
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 31.5.2004 09:28:16
Ing. Igor Vodicka wrote:
> (WizardForm.NextButton.Enabled := False nefunguje).
Podivej se do helpu na NextButtonClick() popr. na priklady v podadresari
Inno Setup 4\Examples
HTH, pf
SELECT na kurzy
[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 31.5.2004 09:00:13
Nevim jak v FB, ale v MSSQL existuji dve moznosti:
1. subselect na tabulce:
SELECT datum, usd.hodnota AS USD, eur.hodnota AS EUR, .........
FROM ( SELECT datum, mena, hodnota FROM KURZY WHERE mena = 'USD') as USD
LEFT OUTER JOIN
( SELECT datum, mena, hodnota FROM KURZY WHERE mena = 'EUR') as EUR ON usd.datum = eue.datum
LEFT OUTER JOIN
.......
2. subselect na sloupci
SELECT datum, ( SELECT hodnota FROM KURZY WHERE mena = 'USD' AND datum = kurzak.Datum) AS USD,
( SELECT hodnota FROM KURZY WHERE mena = 'EUR' AND datum = kurzak.Datum) AS EUR,
.......
FROM ( SELECT DISTINCT datum FROM KURZY) as kurzak
Pavel
> From: martin [mailto:matrix(zv)inmail(tec)cz]
> uz sa mi uplne zauzlieva mozog.
> Ako by ste riesili nasledovnu situaciu.
>
> Taham kurzy z NBS a ladujem ich do Firebirdu
> Stlpce: DATUM,MENA,HODNOTA
> Potrebujem urobit taky select, ktory mi vysype
> DATUM,USD,EUR,CZK...atd pre vsetky meny
> cize ak spustim
> SELECT DATUM,MENA,HODNOTA FROM KURZY WHERE MENA='EUR'
> dostanem iba EUR a ja by som potreboval ten select upravit tak,
> aby vo vysledku nebolo datum,eur,hodnota
> ale datum,hodnota_eur,hodnota_usd...atd
> Da sa to? Podla moznosti bez view,stored proc a pod.
> ;-)
>
> --
> Martin
> D7Pro,FB1.5,FibPlus
OT: Inno Setup - potlaceni tlacistka "Next"
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 31.5.2004 08:36:11
Ahoj!
Posilam dotaz sem, protoze je tady asi dost lidi, kteri pouzivaji Inno Setup
a mohli by mi poradit.
V instalacnim skriptu jsem si vytvoril vlastni stranku, kde zadavam
specialni aktivacni kody pro instalaci jednotlivych komponent instalace.
Potreboval bych znepristupnit tlacitko [Next] dokud uzivatel nezada spravny
aktivacni kod a nejak se mi to nedari (WizardForm.NextButton.Enabled :=
False nefunguje).
Predem dik za nakopnuti.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
Jak zakazat ci povolit sitovou kartu
[*] Doma <jitka.michal(zv)tiscali(tec)cz> - 30.5.2004 22:03:30
>> Potrebuji programem zakazat ci povolit sitovou kartu ve windows XP.
>> Nevite jak?
>mrkni se v msdn na "netsh". Je to normalni spustitelny soubor kteremu
>zadavas parametry, takze z delphi by to bylo v pohode.
>Honza
Bohuzel netsh umi pouze nastavovat parametry site.
Michal
Pristup k MS Exchange Server
[*] Petr Jarkovsky <pejasoft(zv)volny(tec)cz> - 30.5.2004 15:15:02
Dobry den,
potreboval bych pomoci s pristupem k MS Exchange Server 2000. Cilem je
nacitat/ukladat jednotlive zaznamy (e-mail, ukoly, udalosti), pripadne se
napichnout na udalosti serveru (napr. prichod/odchod posty, apod.).
Pro pristup k datum chci pouzit ADO. Jako ConnectionString pouzivam napr.
"URL=http://pocitac/exchange/uzivatel/Kalendar/".
To probehne v poradku, ale nemohu uz nacist treba seznam udalosti v kalendari.
Pokud pro vyber dat poziju prikaz:
SELECT "DAV:href", "urn:schemas:httpmail:subject", "urn:schemas:calendar:uid"
FROM scope('shallow traversal of "http://pocitac/exchange/uzivatel/"')
...tak to spadne na nejakou chybu typu "Error ADO at address xxxxxxx". (V C# to
jde bez problemu.)
Resil jste nekdo tento problem?
Predem diky za kazdou radu.
(Pokud by nekdo vedel, jak pouzivat na CDO for Exchange 2000, budu jedine rad,
kdyz napise taky.)
S pozdravem
Petr Jarkovsky
Chyba pri vytvareni externiho souboru ve FB 1.5
[*] David Klodner <d.klodner(zv)sofico(tec)cz> - 30.5.2004 14:38:58
Ahoj,
snazim se vytvorit externi tabulku:
RECREATE TABLE IMPORT EXTERNAL FILE 'c:\import.txt'
(ID_ODBERATELE CHAR(15),
NAZEV CHAR(50),
CRLF (2))
Hazi me to chybu
ISC ERROR CODE:335544831
ISC ERROR MESSAGE:
Access to external file "C:\IMPORT.TXT" is denied by server
administrator
Nevite nekdo, co s tim?
David Klodner
D5 Prof. FB 1.5 v. 1.5.0.4306
SELECT na kurzy
[*] Ludek Paral <ludek.paral(zv)quick(tec)cz> - 30.5.2004 13:20:50
Ahoj,
ja v takovych pripadech vytvarim tmp tabulku, pak spustim IBQuery "SELECT
DATUM,MENA,HODNOTA FROM KURZY ORDER BY DATUM,MENA" , pak prochazim IBQuery
a plnim to programove do tmp tabulky...
Ludek
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of martin
Sent: Sunday, May 30, 2004 2:50 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: SELECT na kurzy
Dobry vecer,
uz sa mi uplne zauzlieva mozog.
Ako by ste riesili nasledovnu situaciu.
Taham kurzy z NBS a ladujem ich do Firebirdu
Stlpce: DATUM,MENA,HODNOTA
Potrebujem urobit taky select, ktory mi vysype
DATUM,USD,EUR,CZK...atd pre vsetky meny
cize ak spustim
SELECT DATUM,MENA,HODNOTA FROM KURZY WHERE MENA='EUR'
dostanem iba EUR a ja by som potreboval ten select upravit tak,
aby vo vysledku nebolo datum,eur,hodnota
ale datum,hodnota_eur,hodnota_usd...atd
Da sa to? Podla moznosti bez view,stored proc a pod.
;-)
--
Martin
D7Pro,FB1.5,FibPlus
----------
* www.inMail(tec)cz - Vase emailova adresa na cely zivot ZDARMA
* www(tec)czechia.com - profesionalni webhosting a registrace domen za vyhodne
ceny
* Zoner Media Explorer 6 - Poznejte kouzlo digitalni fotografie!
(http://www.zoner(tec)cz/zme6)
DB Replicator
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 30.5.2004 11:56:44
Ahoj kluci, tak jsem zase tady potreboval bych prubezne replikovat na
stanice a pokud dojde k vypadku tak a jet offline na db u stanic a pak
pri pripojeni data synchronizovat. Ted dotaz. Nemate nekdo nejake
sikovny nastroj co by replikoval sam, vim ze existuje neco na
www.ibphoenix.com doporucoval mi ho Paja Cisar, ale je to placeny, tusim
ze za 10 licenci by to prislo na cca 30 000,- to je na me
moc...pripadne jinou databazi na ktere je tenhle nastroj zadara, ci za
nejakou rozumnou cenu. Ci jak jste nekdo resil podobnou problematiku...
Je nejaka udf pro FB v delphi ci neco podobneho?
Diky
__________________________________________________________________
Ales Pavel
ICQ#: 44615538
Current ICQ status:
( Work Tel#: +420777992792
+ More ways to contact me
__________________________________________________________________
Jak zakazat ci povolit sitovou kartu
[*] Jan Harman <jharman(zv)volny(tec)cz> - 30.5.2004 09:40:34
> Potrebuji programem zakazat ci povolit sitovou kartu ve windows XP.
> Nevite jak?
mrkni se v msdn na "netsh". Je to normalni spustitelny soubor kteremu
zadavas parametry, takze z delphi by to bylo v pohode.
Honza
SELECT na kurzy
[*] martin <matrix(zv)inmail(tec)cz> - 30.5.2004 03:50:11
Dobry vecer,
uz sa mi uplne zauzlieva mozog.
Ako by ste riesili nasledovnu situaciu.
Taham kurzy z NBS a ladujem ich do Firebirdu
Stlpce: DATUM,MENA,HODNOTA
Potrebujem urobit taky select, ktory mi vysype
DATUM,USD,EUR,CZK...atd pre vsetky meny
cize ak spustim
SELECT DATUM,MENA,HODNOTA FROM KURZY WHERE MENA='EUR'
dostanem iba EUR a ja by som potreboval ten select upravit tak,
aby vo vysledku nebolo datum,eur,hodnota
ale datum,hodnota_eur,hodnota_usd...atd
Da sa to? Podla moznosti bez view,stored proc a pod.
;-)
--
Martin
D7Pro,FB1.5,FibPlus
----------
* www.inMail(tec)cz - Vase emailova adresa na cely zivot ZDARMA
* www(tec)czechia.com - profesionalni webhosting a registrace domen za vyhodne ceny
* Zoner Media Explorer 6 - Poznejte kouzlo digitalni fotografie! (http://www.zoner(tec)cz/zme6)Jak zakazat ci povolit sitovou kartu
[*] Doma <jitka.michal(zv)tiscali(tec)cz> - 29.5.2004 19:35:37
Potrebuji programem zakazat ci povolit sitovou kartu ve windows XP.
Nevite jak?
Dik Michal
prenos souboru po pres TServerSocket a TClientSock
[*] Tomas Bradle <t.bradle(zv)worldonline(tec)cz> - 29.5.2004 16:49:26
Zdravim vsechny,
chci posilat po siti binarni data pres dvojici TClientSocket a TServerSocket
a nejak mi to nechodi. Tak jsem to cele zjednodusil do nasledujiciho
prikladu. Mam dva programy - jedem pro server a jeden pro klienta. Z klienta
posilam soubor na server.
toto je kus kodu serveru:
=========================
procedure TfrTSSvrMain.ssFileClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
FStream:=TFileStream.Create('C:\xy.jpg', fmCreate);
end;
procedure TfrTSSvrMain.ssFileClientDisconnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
FStream.free;
end;
procedure TfrTSSvrMain.ssFileClientRead(Sender: TObject; Socket:
TCustomWinSocket);
var
sz: integer;
p: pointer;
begin
sz:=Socket.ReceiveLength;
GetMem(p, sz);
try
Socket.ReceiveBuf(p^, sz);
if Assigned(FStream) then
FStream.WriteBuffer(p^, sz);
finally
FreeMem(p);
end; {try}
end;
toto je kus kodu klienta:
=========================
procedure TfrTSCliMain.SpeedButton2Click(Sender: TObject);
var
fs: TFileStream;
p: pointer;
begin
csFile.Address:=eIP.Text;
csFile.Active:=true;
try
fs:=TFileStream.Create('c:\x.jpg', fmOpenRead);
try
GetMem(p, fs.size);
try
fs.ReadBuffer(p^, fs.size);
csFile.Socket.SendBuf(p^, fs.size);
finally
FreeMem(p);
end; {try}
finally
fs.free;
end; {try}
finally
csFile.Active:=false;
end; {try}
end;
Ten obrazek mi prijde zmrsenej, horni cast je OK ale potom se "rozjede
obraz". Zdroj ma 204591 bajtu, cil ma 239455 bajtu, cili naroste.
Nevi nekdo cim by to mohlo bejt ? Mam D5 a oba pocitace jsou na W2K SP2.
ClientType i ServerType je ctNonBlocking.
diky
Tomas Bradle
t.bradle(zv)worldonline(tec)cz
Tiskarna netiskne
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 29.5.2004 08:42:53
Zdravim,
zkus odinstalovat antivirak AVG
Pavel ZIDEK
pri tisku z D5Pro (pres Printer.Canvas) se mi stava, ze se program tvari
jako ze JO a ono NE (normalne probehne zarazovani k tisku, ale tiskarna nic
nevytiskne). Stava se mi to pod XP a ted po zmene tiskarny (z HP LJ1100 na
Minoltu 1250E) i pod W98. Podobny dotaz tu byl asi pred 4 roky, ale reakce
zadne ...
Potkali jste se s tim nekdo? A kdyz, tak jak jste to resili?
Petr Mohapl
Ten tisk vypada uplne obycejne:
napred
PrintDialog
a pak v podstate jen
Printer.BeginDoc;
Printer.Canvas.TextOut (NejakyText);
Printer.EndDoc;LAN BOOT
[*] Stasko Peter <stasko(zv)fic(tec)cz> - 28.5.2004 17:27:43
Mam sietovky z EPROMkami ;)
Snazim sa.. Ale nende.. Ndende... :(
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jiri Cincura
Sent: Friday, May 28, 2004 4:50 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: LAN BOOT
Stasko Peter wrote:
> No v win 2000 server som rozbehal DHCP server. Prideli mi adresu k
> clientovi.. Ale potom client zacne hladam TFTP. Ako ho mam nastavit a
> aktivovat v WIN2000 ??
No DHCP priradi klientovi na zaklade MACu IP a klient se taze na boot, chyti to PXE boot server (musis si ho nekde sehnat a nainstalovat a rozbehat, zkus google.com, event budes muset kompilovat gcc-ckem zdrojaky) a pote co se "dohodnou", zacne pres TFTP tahat klient data na boot.
Ale jak rikam, je to vis prace nez uzitku.
BTW jaky mas sitovky?
Jiri Cincura
e-mail:
__[email]jiri(zv)cincura.net[/email] __[email]xcincura(zv)informatics.muni(tec)cz[/email]
ICQ#:
__314711544
web:
__[url]http://www.cincura.net[/url]
__[url]http://cincura.net/photo[/url]RxLib nejde na D7 (StdActns)
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 28.5.2004 17:03:41
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphi(zv)unileasing(tec)cz
>
> Zdravim.
Ahoj,
> Nedari se mi rozchodit RxLib na D7. Komponenty se mi podari
[...]
> different version" nebo tak neco....
Nemel bys lepsi rovnou pouzit JVCL ?
http://homepages.borland.com/jedi/jvcl/ .
Jsou nejen naslednici Rx, ale mnoho dalsiho vcetne
velmi uzitecne JCL !
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
LAN BOOT
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 28.5.2004 16:49:39
Stasko Peter wrote:
> No v win 2000 server som rozbehal DHCP server. Prideli mi adresu k
> clientovi.. Ale potom client zacne hladam TFTP. Ako ho mam nastavit a
> aktivovat v WIN2000 ??
No DHCP priradi klientovi na zaklade MACu IP a klient se taze na boot, chyti
to PXE boot server (musis si ho nekde sehnat a nainstalovat a rozbehat, zkus
google.com, event budes muset kompilovat gcc-ckem zdrojaky) a pote co se
"dohodnou", zacne pres TFTP tahat klient data na boot.
Ale jak rikam, je to vis prace nez uzitku.
BTW jaky mas sitovky?
Jiri Cincura
e-mail:
__[email]jiri(zv)cincura.net[/email]
__[email]xcincura(zv)informatics.muni(tec)cz[/email]
ICQ#:
__314711544
web:
__[url]http://www.cincura.net[/url]
__[url]http://cincura.net/photo[/url]
RxLib nejde na D7 (StdActns)
[*] delphi(zv)unileasing(tec)cz - 28.5.2004 15:23:32
Zdravim.
Nedari se mi rozchodit RxLib na D7. Komponenty se mi podari prelozit i nainstalovat a jsou videt na liste. Ale pri snaze o prelozeni jakehokoliv programu (i bez pouziti Rx component) to ohlasi chybu ze "unit StdActns was complited in a different version" nebo tak neco....
Mate radu ? Diky, Lubos Novy
Knihovny pro ICR
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 28.5.2004 14:27:27
Ahoj,
nutne shanim nejake knihovny pro rozpozanavni rucne psaneho textu (ICR), ktere bych mohl ovladat z delphi. Dulezite je, aby to zvladalo rozpoznat i cestinu. Na cene celkem nezalezi. Nevite nekdo o necem pouzitelnem?
Potrebuji naskenovat predtisteny formular a ten pote prevest do textovr podoby.
Ales
vkladani tabulky do Wordu - OLE
[*] Pave Gazda <pavel_gazda(zv)datasw(tec)cz> - 28.5.2004 14:15:26
Ahoj,
> coz by melo oznacit 2. az 4. vetu, coy uz by pouzitelne bylo, ale
> takto zapsane delphi zahlasi, ze "sentences neni metoda", takze
> neporadi nekdo jak se dostat na konkretni misto v dokumentu wordu,
> predem dekuji.
posun o pocet znaku:
OChar := wdCharacter;
OCount:= Pocet;
MWord.Dokumenty[idx].Activate;
if Boolean(Vpravo) then
MWord.Dokumenty[Idx].Application.Selection.MoveRight(OChar,OCount,EmptyParam
)
else
MWord.Dokumenty[Idx].Application.Selection.MoveLeft(OChar,OCount,EmptyParam)
;
posun o pocet radku:
OLine := wdLine;
OCount:= Pocet;
MWord.Dokumenty[idx].Activate;
if Boolean(Dolu) then
MWord.Dokumenty[Idx].Application.Selection.MoveDown(OLine,OCount,EmptyParam)
else
MWord.Dokumenty[Idx].Application.Selection.MoveUp(OLine,OCount,EmptyParam);
Pavel Gazda
placeny amater
FastReport a delsi text
[*] delphi(zv)unileasing(tec)cz - 28.5.2004 13:37:22
Dobry den vsem,
proc FastReport pri pouziti komponenty RichText zobrazi na obrazovce jinou velikost celeho textu nez pote vytiskne ???
Dela mi to velky problem a na sestavach mam jakoby prazdne radky mezi odstavci, ktere jsou v samostatnych RichTextech. Lze tomu nejak zabranit ?
diky, Lubos Novy
Tiskarna netiskne
[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 28.5.2004 13:21:20
Ahoj,
pri tisku z D5Pro (pres Printer.Canvas) se mi stava, ze se program tvari
jako ze JO a ono NE (normalne probehne zarazovani k tisku, ale tiskarna nic
nevytiskne). Stava se mi to pod XP a ted po zmene tiskarny (z HP LJ1100 na
Minoltu 1250E) i pod W98. Podobny dotaz tu byl asi pred 4 roky, ale reakce
zadne ...
Potkali jste se s tim nekdo? A kdyz, tak jak jste to resili?
Petr Mohapl
Ten tisk vypada uplne obycejne:
napred
PrintDialog
a pak v podstate jen
Printer.BeginDoc;
Printer.Canvas.TextOut (NejakyText);
Printer.EndDoc;vkladani tabulky do Wordu - OLE
[*] Martin Bednar <bednar(zv)mujweb(tec)cz> - 28.5.2004 13:03:13
Tabulku plnim napr. nejak takto:
for iGridRows := 1 to iRows do
for jGridCols := 1 to iCols do
WordTable.Cell(iGridRows, jGridCols).Range.Text := 'abcdefgh';
Muj problem je v tom, ze potrebuji nejak nastavit "range".
Doc := WordApp.ActiveDocument;
Doc.Range(0,9);
Doc.Select;
^^^Toto mi vybere a oznaci prvnich 9 znaku v dokumentu, ale to je mi
nanic pocitat znaky do mista, kam chci tab. umistit ?!!!
Melo by snad fugovat i toto:
Doc.SetRange( Doc.Sentences(2).Start , Doc.Sentences(4).end );
coz by melo oznacit 2. az 4. vetu, coy uz by pouzitelne bylo, ale
takto zapsane delphi zahlasi, ze "sentences neni metoda", takze
neporadi nekdo jak se dostat na konkretni misto v dokumentu wordu,
predem dekuji.
------------
S pozdravem,
Martin Bednar
bednar(zv)mujweb(tec)cz
patek 28. kvetna 2004 12:51:00
>> WordTable := Doc.Tables.Add( WordApp.Selection.Range, iRows ,iCols );
>>
>> Jak Wordu rict v Delphi, aby ji vytvoril na nejakem konkretnim miste (
>> parametr: WordApp.Selection.Range ).
JH> WordApp.Selection.Find.Execute...
JH> ...presune kurzor na nalezeny text, ale nevim jestli tam vlozi tu tabulku,
JH> zkus to a dej vedet. Pokud umis i naplnit tabulku, tak bych te poprosil o
JH> priklad. Diky.
JH> Honza
TLabel.Color vo Win XP
[*] martin <matrix(zv)inmail(tec)cz> - 28.5.2004 12:23:08
Dobry den,
ak nastavim v property editoru label1.color napr. na clGreen, tak
v designtime sa zobrazi v zelenom ale po spusteni pod XP a themami
sa zobrazuje color tusim clBtnFace.
Da sa nejak explicitne povedat konkretnemu labelu aby nezohladnoval
xp themy???
--
Martin
D7Pro,FB1.5,FibPlus
----------
* www.inMail(tec)cz - Vase emailova adresa na cely zivot ZDARMA
* www(tec)czechia.com - profesionalni webhosting a registrace domen za vyhodne ceny
* Zoner Media Explorer 6 - Poznejte kouzlo digitalni fotografie! (http://www.zoner(tec)cz/zme6)vkladani tabulky do Wordu - OLE
[*] Jan Harman <jharman(zv)volny(tec)cz> - 28.5.2004 12:21:07
> potrebuji poradit s nasl. problemem. Potrebuji vkladat na urcite misto
> ve Word dokumentu tabulku pomoci OLE. Tu umim vytvorit i vlozit, ale
> pouze na zacatek dokumentu. Tabulku vkladam nejak takto:
>
> WordTable := Doc.Tables.Add( WordApp.Selection.Range, iRows ,iCols );
>
> Jak Wordu rict v Delphi, aby ji vytvoril na nejakem konkretnim miste (
> parametr: WordApp.Selection.Range ).
WordApp.Selection.Find.Execute...
...presune kurzor na nalezeny text, ale nevim jestli tam vlozi tu tabulku,
zkus to a dej vedet. Pokud umis i naplnit tabulku, tak bych te poprosil o
priklad. Diky.
Honza
driver ODBC pro FoxPro
[*] Jirka DAVID <j_david(zv)telemarketing(tec)cz> - 28.5.2004 12:01:05
Dobry den,
nevi nekdo o driveru ODBC pro FoxPro.
Diky
Jiri DAVID
My SQL - komponenty - console
[*] Vlko II. <vlko(zv)zilina(tec)net> - 28.5.2004 11:51:04
On Fri, 28 May 2004 11:43:02 +0200, Vlko II. <vlko(zv)zilina.net> wrote:
>> ja, ale nevim. Pouzivam D6Pro, W2000, ZeosDB 5.3.4.
>
> Filtry este nie su implementovane, ale nie je problem dopisat si vlastny
> obsluhu
> do onFilterRecord eventu. Odskusane na cca 10000 zaznamoch a pekne
> rychle:)
Teda hovoril som o verzii 6.x vo verzii 5.s sa to zamozrejme tiez da riesit
takto, ale ak nastavis v Options->DoSqlFilter=true tak ti to bude filtrovat
priamo sql dotazom.
Verziu 5.4 som prestal pouzivat, pretoze ma chybu v vnutornej implementacii
sortovania. V pripade, ze sa da zoradit podla urciteho stlpca a je tam
viac rovnakych hodnot je nemozne sa pohyvovat po zazname (konkretne sipkami
hore-dole). Vyzera to, ako keby sa to tam niekde zacyklilo, pohybuje sa to
len medzi tymi rovnakymi riadkami.
Vlko
BTW: ak by niekto vysiel z kontextu pisal som o ZEOS komponentach:)
--
--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net
My SQL - komponenty - console
[*] Vlko II. <vlko(zv)zilina(tec)net> - 28.5.2004 11:43:02
On Fri, 28 May 2004 08:54:50 +0200, Jiri Matejka <matejka(zv)stemmark(tec)cz>
wrote:
> ZeosDB muzu taky celkem doporucit, jen jsem narazil na jeden problem,
> ktery
> sem nevyresil, resp. musel sem ho obejit a sice problem s Filtry - i
> kdyz
> nastavim Query.Filter na nejaky vyraz a Filtered na True, tak stejne
> Query
> zobrazuje vsechny zaznamy a RecordCount je porad stejny jako pred
> nastavenim
> filtru. Tzn. chova se to jako bych filtr nenastavil. Mozna delam nekde
> chybu
> ja, ale nevim. Pouzivam D6Pro, W2000, ZeosDB 5.3.4.
Filtry este nie su implementovane, ale nie je problem dopisat si vlastny
obsluhu
do onFilterRecord eventu. Odskusane na cca 10000 zaznamoch a pekne rychle:)
vlko
--
--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net
Opakovany import dat z DBF do FB1.5
[*] GigaBajt, v.o.s. <d.klodner(zv)sofico(tec)cz> - 28.5.2004 11:19:00
Ahoj,
opakovane importuji data z DBF do GDB (FB 1.5) - zbozi, zakazniky, adresy
atd.
Pozadavky:
a) zaznamy, ktere se nezmenily ponechat
b) zmenene - aktualizovat
c) nove - pridat
d) ty, ktere jsou v GDB a v DBF uz nejsou vymazat nebo ponechat (podle
nastaveni)
Na zacatku si tabulku z GDB nactu do pameti do kbmMemTable
Problemy:
1. Porovnani dat
- jak rychle porovnat 2 tabulky o 10000 radcich a 30 sloupcich?
Cyklus, ktery prochazi celou DBF tabulku a kazdy radek si v kbmTable
vyhledava a porovnava je velmi pomaly.
2. Jak aktualizovat zmenene radky?
Vymazat je a pak znovu zapsat?
Delete from zbozi where ean = '3058'
and ean = '03845' atd. (treba i 10 000 radku)
nebo update?
update zbozi set Mnozstvi = 15 and Cena1=10,50 and Cena2 = 10,40 atd.
where ean = '03845' ?
Reseni - vse vymazat a znovu do GDB zapsat je velmi pomale a navic jsou
zaznamy,
ktere jsou v GDB a v DBF nejsou, takze ty by se musely nejak specialne
osetrit.
Diky i za castecnou odpoved
S pozdravem
David Klodner
D5 prof. WinXP, FB 1.5
Zjisteni seznamu pouzivanych souboru
[*] Jirka <jw-delphi(zv)seznam(tec)cz> - 28.5.2004 11:12:59
Ahoj vsem,
potreboval bych pres nejake API zjistit to same co vypise prikaz "net
files", ale nemuzu furt najit tu spravnou funkci.
Predem diky za radu
Jirka
My SQL - komponenty - console
[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 28.5.2004 08:54:50
> > 1. jake jsou nejlepsi komponenty pro pristup k MYSQL
> jak napsali ostatni ZeosDB. Jsou to nejlepsi komponenty, ktere sezenes.
> Pristupujes na MySQL jen pres jejich klienta mysql.lib, coz je i vyrobcem
> doporucena nejefektivnejsi metoda.
>
> Zadne BDE, ODBC, apod. nezivrstvy nepotrebujes. Navic se alespon
> mne s temito komponentami nesmirne dobre pracuje. Delam na nich uz
> asi rok a zatim sem na nic vazneho nenarazil. Zdaji se byt i docela
rychle.
ZeosDB muzu taky celkem doporucit, jen jsem narazil na jeden problem, ktery
sem nevyresil, resp. musel sem ho obejit a sice problem s Filtry - i kdyz
nastavim Query.Filter na nejaky vyraz a Filtered na True, tak stejne Query
zobrazuje vsechny zaznamy a RecordCount je porad stejny jako pred nastavenim
filtru. Tzn. chova se to jako bych filtr nenastavil. Mozna delam nekde chybu
ja, ale nevim. Pouzivam D6Pro, W2000, ZeosDB 5.3.4.
Jirka Matejka
My SQL - komponenty - console
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 28.5.2004 08:44:48
Dobry den preji,
> 1. jake jsou nejlepsi komponenty pro pristup k MYSQL
jak napsali ostatni ZeosDB. Jsou to nejlepsi komponenty, ktere sezenes.
Pristupujes na MySQL jen pres jejich klienta mysql.lib, coz je i vyrobcem
doporucena nejefektivnejsi metoda.
Zadne BDE, ODBC, apod. nezivrstvy nepotrebujes. Navic se alespon
mne s temito komponentami nesmirne dobre pracuje. Delam na nich uz
asi rok a zatim sem na nic vazneho nenarazil. Zdaji se byt i docela rychle.
> 2. jaka je nejlepsi console pro MySQL - (sikovne graficke prostredi
>pro kumunikaci, ladeni dotazu
drive sem masivne pouzival phpmyadmin, ale je to trochu pomale
pokud nepotrebujes casto delat DUMP tabulek nabo DB pak by ti
mnel bohate stacit MySQL Control Center. Je to zatim ve vyvoji
ale ma to uz vetsinu funkci a hodne dobre zviraznovani SQL syntaxe.
Ovlada se ze zacatku trochu hur, nebot je to koncepce
"co nejmin prvku, ale silne a jednoduche funkce".
MySQL Front neni spatny, ale na muj vkus ve srovnani s MyCC je
to prilis preplacane a prace v tom je pomala.
Jinak ZeosDB 6.X je jeste porad vicemene ve vyvinu, takze jedu
na 5.X rade. Sestka je uz kompletne prepsana a mnela by pres ty
same komponenty umoznovat pristup k vetsine SQL DB. A to
jen prepnutim profilu. Pokud to dotahnou, tak ti bude super.
S pozdravem Vaclav Halik
vkladani tabulky do Wordu - OLE
[*] Martin Bednar <bednar(zv)mujweb(tec)cz> - 28.5.2004 08:06:45
DD,
potrebuji poradit s nasl. problemem. Potrebuji vkladat na urcite misto
ve Word dokumentu tabulku pomoci OLE. Tu umim vytvorit i vlozit, ale
pouze na zacatek dokumentu. Tabulku vkladam nejak takto:
WordTable := Doc.Tables.Add( WordApp.Selection.Range, iRows ,iCols );
Jak Wordu rict v Delphi, aby ji vytvoril na nejakem konkretnim miste (
parametr: WordApp.Selection.Range ).
Dekuji mnohokrate za pomoc.
--
S pozdravem,
Martin Bednar
bednar(zv)mujweb(tec)cz
patek 28. kvetna 2004 8:00:59 My SQL - komponenty - console
[*] Vlko II. <vlko(zv)zilina(tec)net> - 28.5.2004 02:20:22
On Thu, 27 May 2004 16:33:33 +0200, Stranik Frantisek Ing.
<fstranik(zv)cpoj(tec)cz> wrote:
> 1. jake jsou nejlepsi komponenty pro pristup k MYSQL
Taktiez pouzivam Zeos komponenty a som s nimi spokojny
> 2. jaka je nejlepsi console pro MySQL - (sikovne graficke prostredi pro
> kumunikaci, ladeni dotazu apod.)
Pouzivam MySQL Front ver 2.4 skusal som aj novu verziu 3.0 ale okrem toho,
ze
je spoplatnena, sa mi na nej nic nepacilo slubovane foreign key nejdu, tak
som zostal pri starsej, rychlejsej a na ovladanie velmi jednoduchej 2.4,
ktora
este bola volne siritelna.
BTW: na strankach http://www.mysqlfront.de/ sa uz ver 2.4 neda stiahnut,
ale
skus pohladat na webe, mozno najdes alternativny download:)
Vlko
--
--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net
My SQL - komponenty - console
[*] jarda.konference(zv)centrum(tec)cz - 27.5.2004 20:17:51
z vlastni zkusenosti mohu doporucit phpmyadmin. je to sprava databaze skrze php skripty. je ale nutne mit nainstalovany webovy server a ve slozce pro inetove dokumenty zkopirovany vyse uvedeny "program" (serie skriptu).
s pozdravem
Jarek
>
>Dobry den
>
>Zdravim a prosim o sdeleni:
>
>1. jake jsou nejlepsi komponenty pro pristup k MYSQL
>2. jaka je nejlepsi console pro MySQL - (sikovne graficke prostredi pro kumunikaci, ladeni dotazu apod.)
>
>Dekuji za spravu
>
>F.Stranik
>
>
>
>
>
>
>
>zarovnanie nulami vo FB
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 27.5.2004 17:35:40
Ahoj,
jednou jsem si na to psal UDFku:
(*
/* string cisel doplneny nulama zleva */
declare external function LZero
cstring(254), Integer
returns cstring(254) free_it
entry_point 'LZero' module_name 'ag_udf.dll';
*)
function LZero(Source: PChar; var i: Integer): PChar; cdecl; export;
var
s1, s2: string;
j, k: Integer;
begin
s1:=string(Source);
s1:=Trim(s1);
k:=Length(s1);
for j:=1 to k do
if s1[j]in ['0'..'9'] then
s2:=s2+s1[j]; // pouze cislice!
k:=i-Length(s2);
for j:=1 to k do
s2:='0'+s2;
s2:=s2+#0;
Result:=ib_util_malloc(Length(s2));
StrPCopy(Result, s2);
end;
ale mozna ze existuje nejaka leftpadding funkce.
hledej lpad, leftpad...
kolegyne jednou pouzila v triggeru tohle:
S = new.BLOK;
if (S is null) then S = '';
S = LTrim(S);
S = RTrim(S);
if (S is null) then S = '';
l = StrLen(S);
while (l < 4) do -- delka 4 zleva nuly
begin
S = '0' || S;
l = StrLen(S);
end
new.Blok = S;
Peca
Zistenie spravneho kablu pri seriovej komunikacii
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 27.5.2004 17:27:38
Peter Ondras wrote:
> Mam hardware zariadenie pripojene do maleho com portu (com1). To
> zariadenie ma len 4 kabliky a vysiela pri 4 udalostiach vzdy prazdny
> znak #0, ale vzdy po inom kabliku.
A to zapojeni konektoru je tovarni a tudiz dane, nebo hledas kam ty kabliky
pripojit?
Jak uz jsem ti psal: zrejme to nebude zadny znak ale impuls
na prislusnem kabliku. Takze si ty kabliky pripoj na vstupy
CTS, DSR, RI a DCD.
A pokud na to chces mermomoci komponentu, tak si dej na form AfComPort z
AsyncFree,
nastav ho do AutoOpen rezimu a poves se na eventy OnCTSChanged,
OnDSRChanged,
OnRINGDetect a OnRLSDChanged. Kazda event bude odpovidat zmene urovne na
jenom kabliku.
HTH, pf
My SQL - komponenty - console
[*] Tomas Emresz <tomas(zv)emresz(tec)com> - 27.5.2004 16:45:35
SFI> 1. jake jsou nejlepsi komponenty pro pristup k MYSQL
Me se osvedcili Zeos
SFI> 2. jaka je nejlepsi console pro MySQL - (sikovne graficke
SFI> prostredi pro kumunikaci, ladeni dotazu apod.)
EMS Mysql Manager, zel neni zadaco...
S pozdravem,
Tomas Emresz
mailto:tomas(zv)emresz.com
My SQL - komponenty - console
[*] Stranik Frantisek Ing. <fstranik(zv)cpoj(tec)cz> - 27.5.2004 16:33:33
Dobry den
Zdravim a prosim o sdeleni:
1. jake jsou nejlepsi komponenty pro pristup k MYSQL
2. jaka je nejlepsi console pro MySQL - (sikovne graficke prostredi pro kumunikaci, ladeni dotazu apod.)
Dekuji za spravu
F.Stranik
LAN BOOT
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 27.5.2004 16:27:32
> No v win 2000 server som rozbehal DHCP server. Prideli mi adresu k
> clientovi.. Ale potom client zacne hladam TFTP. Ako ho mam nastavit a
> aktivovat v WIN2000 ??
No, TFTP server si muzes dokonce naprogramovat sam... napriklad v
Synapsi mas jednoduchy TFTP server jako demo aplikaci. ;-)
(a hnedka z tohoto neni offtopic. ;-))
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.LAN BOOT
[*] Stasko Peter <stasko(zv)fic(tec)cz> - 27.5.2004 16:05:30
No v win 2000 server som rozbehal DHCP server. Prideli mi adresu k clientovi.. Ale potom client zacne hladam TFTP. Ako ho mam nastavit a aktivovat v WIN2000 ??
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jiri Cincura
Sent: Thursday, May 27, 2004 2:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: LAN BOOT
Stasko Peter wrote:
> No jo.. Ale ako to nakonfigurovat na WIN 2000 Server ?
PXE boot server sezenes i na Win. Zkus google.com.
--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
ICQ#: 314711544
web: http://www.cincura.net; http://cincura.net/photo
Zistenie spravneho kablu pri seriovej komunikacii
[*] Ing. Radek Tomsik <radek(zv)tomsige(tec)cz> - 27.5.2004 14:49:23
Hm, asi si budes muset napsat vlastni obsluhu COM portu, zkus nastudovat
API funkci WriteFile ...
Radek
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Peter Ondras
Sent: Thursday, May 27, 2004 2:03 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Zistenie spravneho kablu pri seriovej komunikacii
Mam hardware zariadenie pripojene do maleho com portu (com1). To
zariadenie ma len 4 kabliky a vysiela pri 4 udalostiach vzdy prazdny
znak #0, ale vzdy po inom kabliku. Pri standardnom nastaveni vsetkych
freeware komponent z torry.net sa mi dari citat len jednu z tych 4
udalosti, pricom neviem rozlisit o ktory kablik sa jedna. Ako mam
nastavit com port aby cital len tie 4 kabliky a dokazal ich pritom
rozlisovat?
LAN BOOT
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 27.5.2004 14:19:19
Stasko Peter wrote:
> No jo.. Ale ako to nakonfigurovat na WIN 2000 Server ?
PXE boot server sezenes i na Win. Zkus google.com.
--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
ICQ#: 314711544
web: http://www.cincura.net; http://cincura.net/photo
Canvas does not allow drawing
[*] delphin(zv)post(tec)cz - 27.5.2004 14:45:22
> "Canvas does not allow drawing."
S nejvetsi pravdepodobnosti dosly prostredky Windows, stava se to napriklad
pri hodne otevrenych oknech a neda se s tim nic delat, leda nainstalovat W2K
nebo WXP.Canvas does not allow drawing
[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 27.5.2004 14:19:18
Zdravim,
Na PC (u zakaznika) s Windows 95, Version: 4.0, Build: 40003B6 program
napsany v Delphi 5 zahlasil chybu:
"Canvas does not allow drawing."
Nevite proc nastala tato chyba?
Na jinych (novejsich) operacnich systemech se tato chyba nevyskytuje.
Je treba provest upgrade nejake systemove knihovny ve Windows?
Diky
Martin Pavera
Zmena Aliasu za behu
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 27.5.2004 14:23:20
Diky za odpoved, ale nefunguje to. Zprovoznil jsem to jenom takto a chodi to
spolehlive:
Dalik.
procedure TForm1.ComboBox1Click(Sender: TObject);
begin
query1.Close;
if Session1.IsAlias('Metrologie') then
begin
Session1.DeleteAlias('Metrologie');
application.ProcessMessages;
end;
Session1.Close;
Session1.AddStandardAlias('Metrologie', 'M:\' + combobox1.text, 'PARADOX');
Session1.Open;
query1.open;
end;
> Pridej tam jeste
>
> Session.ConfigMode := cmPersistent;Zistenie spravneho kablu pri seriovej komunikacii
[*] Peter Ondras <peter.ondras(zv)pse.sk> - 27.5.2004 14:03:15
Mam hardware zariadenie pripojene do maleho com portu (com1). To
zariadenie ma len 4 kabliky a vysiela pri 4 udalostiach vzdy prazdny
znak #0, ale vzdy po inom kabliku. Pri standardnom nastaveni vsetkych
freeware komponent z torry.net sa mi dari citat len jednu z tych 4
udalosti, pricom neviem rozlisit o ktory kablik sa jedna. Ako mam
nastavit com port aby cital len tie 4 kabliky a dokazal ich pritom
rozlisovat?
MemoryStream zahada ...
[*] Vlko II. <vlko(zv)zilina(tec)net> - 27.5.2004 14:13:17
On Thu, 27 May 2004 04:10:21 +0200, <tomsir1.edu(zv)mail.cez(tec)cz> wrote:> // cteni z memory streamu
> ms.Seek(0,soFromBeginning);
> while ms.position < ms.Size do
> begin
> ms.Read(Zaznam, SizeOf(Zaznam));
> RichEdit1.Lines.Add(IntToStr(Zaznam.x)+':'+IntToStr(Zaznam.y));
> ms.Seek(SizeOf(TZaznam),soFromCurrent);
> end;
> end;
chyba je v seek. pri read, sa posunie pozicia suboru a ty ju seek, este
posunies o jeden zaznam.
vlko
--
--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net
Prehravanie videa z CD
[*] Julius Stefunko <julius11(zv)post.sk> - 27.5.2004 14:03:16
Ahojte,
v D6 prehravam video pomocou tmediaplayer. ak to ide z CD je prehravanie trhane
(pomaly prisun dat). Vie niekto poradit riesenie, nejaky vyrovnavaci bafer v pameti...
vdaka Julius
________
Bezplatny mail, forum, PaciNepaci a viac - http://www.post.sk
Zmena Aliasu za behu
[*] Dalibor <dalibor(zv)torola(tec)cz> - 27.5.2004 13:31:12
Pridej tam jeste
Session.ConfigMode := cmPersistent;
tedy
SMetr.ConfigMode := cmPersistent;
----- Original Message -----
From: "Dalibor Faltynek" <dalibor.faltynek(zv)orgrez(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 27, 2004 12:51 PM
Subject: Zmena Aliasu za behu
> Ahoj,
> proc tohle nefunguje? Po zmene cesty a znovuotevreni dotazu se ukaze
stejna
> tabulka jako pred zmenou. Ostatne je to podle prikladu 502 v 1001 tricich.
> (D5ent, databaze paradox).
>
> procedure TForm1.ComboBox1Click(Sender: TObject);
> var AParams: TstringList;
> begin
> AParams:=TStringList.Create;
> try
> query1.Close;
> Smetr.GetAliasParams('Metrologie', AParams);
> AParams.Clear;
> AParams.Add('PATH:=M:\7200');
> Smetr.ModifyAlias('Metrologie', AParams);
> SMetr.SaveConfigFile;
> application.ProcessMessages;
> query1.open;
> finally
> AParams.Free;
> end;
> end;
>
> Diky Dalik.
>
>Zmena Aliasu za behu
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 27.5.2004 13:15:10
Kdepak, nefunguje to. Podarilo se to jenom tak, ze jsem alias zrusil, pak
vytvoril znova s jinou cestou, pak zavrel a otevrel session a nakonec
otevrel dotaz. Komisch.
DF.
----- Original Message -----
From: "Dalibor Faltynek" <dalibor.faltynek(zv)orgrez(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 27, 2004 1:03 PM
Subject: Re: Zmena Aliasu za behu
> No jo, asi musim jeste taky zavrit a otevrit session.
> Dalik.
>
>
>
>