Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
OT: options explicit
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 7.8.2003 12:40:42
Zdravim
mam takovy hloupy Off topic dotaz
ve Visual Basic existuje Moznost options explicit jaky je jeho ekvivalent ve C# a Delphi ?
DIky Milan
Firebird, TIBStoredProc, cestina
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2003 12:34:37
Haj hou!
On 7 Aug 2003 at 11:48, Petr Jarkovsky wrote:
> Diky za radu. Zkusil jsem a selhalo. ISQL vyhodilo tu samou hlasku.
> Co s tim? Nevim vubec kde hledat co jeste skontrolovat.
Hmm, jsou parametry procedury a pripadne lokalni promenne definovany rovnez
s prislusnou znakovou sadou ? Rekl bych, ze ne.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
IB/FB Nepotrebne systemove domeny
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2003 12:34:37
Haj hou!
On 7 Aug 2003 at 11:52, Jaroslav Vorlicek wrote:
> Nepouzivanoou domenou myslim takovou domenu RDB$Neco, ktera neni
> vyuzivana systemovymi tabulkami ani mnou definovanymi tabulkami,
> domenami a procedurami, pohledy apod..... . (v syntaxi pro ISQL konzoli
> )
??? systemove objekty s nazvem RDB$... jsou vytvarene systemem, a ruseny
kdyz nejsou potreba (systemove domeny vznikaji jako popis sloupcu tabulek,
jsou zruseny pri zruseni tabulky). Neco jako nepouzivany systemovy objekt by
tedy vubec nemelo existovat.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Aktualizace databaze FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2003 12:32:36
Haj hou!
On 7 Aug 2003 at 10:28, Dalibor wrote:
> Jaky mechanismus pouzivate pri aktualicaci databazi.
> Pridani sloupcu, odebrani, zmena, atd.
> Jak kontrolujete jestli je databaze aktualni, jestli protrebuje zmeny, nebo ne
>
> Jde mi o to, ze kdyz se obnovi ze zalohy starsi databaze, jak to nejlepe kontrolovat?
> Nebo kdyz zjistim, ze potrebuji danou tabulku rozsirit, jestli je uz rozsirena, nebo ne?
Nejlepe zavest tabulku obsahujici verzi databazove struktury.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Kolecko u mysi & DBGrid
[*] Tomas Cejka <tom.cejka(zv)kassoft(tec)cz> - 7.8.2003 12:30:33
A co kdybys tam dal neco jako kdyz jsi na konci tak pridat prazdny
radek? (Jestli jsem dotaz pochopil, mohlo by to takhle fungovat)
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of LUKES Vaclav
Sent: Thursday, August 07, 2003 11:58 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Kolecko u mysi & DBGrid
Ahoj,
mam D6 a Win2000 a rad bych vas poprosil o radu.
Pokud se pohybuju po DBGridu koleckem mysi, dovoluje mi to pohyb po
radcich zobrazenych v DBGridu. Samozrejme bych rad roloval koleckem mysi
za hranice DBGridu.
Diky
V.options explicit
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 7.8.2003 12:48:43
Vymazal Milan wrote:
> ve Visual Basic existuje Moznost options explicit jaky je jeho
> ekvivalent ve C# a Delphi ?
Jestli mas na mysli compiler switch /optionexplicit, tak zadny, protoze
v C# a Delphi narozdil od Basicu _musi_ byt promenna deklarovana
pred jejim uzitim v kodu.
HTH, pf
zapis do souboru a kodovani cestiny
[*] Tomas Cejka <tom.cejka(zv)kassoft(tec)cz> - 7.8.2003 12:06:16
Potreboval bych vedet jak to udelat, abych mohl v programu zapisovat
pomoci Writeln do textoveho souboru rovnou v kodovani ISO-8859-2 a
nemusel to potom nejak prevadet (jestli to jde).
Diky
zacinajici programator
(Delphi 6)
vytvoreni souboru *mdb
[*] Lenka Donatova <lenkad(zv)nemocnice-vs(tec)cz> - 7.8.2003 12:20:27
Zdravim vsechny ucastmiky konference
Chtela bych vznest nasledujici dotaz.
Jak je mozne programove vytvorit *.mdb soubor?
Pro pristup k databazim pouzivam ADO komponenty ktere jsou standartni
soucasti Delphi 6.
Diky za odpovedi
Lenka Donatova
modularita programu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 7.8.2003 11:50:12
> Potrebujem to prave na ten zoznam pluginov. Ale neviem ako ho mam
> "zaregistrovat" ten plugin, ktory vstupuje ako parameter const Plugin:
> IPlugin ??
V triede, ktora implementuje IMainApplication mozes mat napriklad zoznam
typu TList alebo TInterfaceList, kam si ho pridas:
FPlugins.Add(Plugin);
HTH
TOndrej
Firebird, TIBStoredProc, cestina
[*] spisiak <spisiak(zv)zoznam.sk> - 7.8.2003 12:08:21
Ahoj, mam taky dojem ze toto sa mi dialo ked som nemal pri textovej polozke
v databazi nadefinovane COLLATE
KaSi
----- Original Message -----
From: "Petr Jarkovsky" <pejasoft(zv)volny(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, August 07, 2003 11:48 AM
Subject: Re: Firebird, TIBStoredProc, cestina
>IB/FB Nepotrebne systemove domeny
[*] Jaroslav Vorlicek <vorlicek(zv)ders(tec)cz> - 7.8.2003 11:52:12
Zdravim vespolek,
mam otazecku. Lze nejakym ukonem vycistit IB/FB databazi od nepouzivanych
domen?
Nepouzivanoou domenou myslim takovou domenu RDB$Neco, ktera neni vyuzivana
systemovymi tabulkami ani mnou definovanymi tabulkami, domenami a
procedurami, pohledy apod..... . (v syntaxi pro ISQL konzoli )
Predem dekuji za kazde popostrceni.
Jaroslav Vorlicek
Kolecko u mysi & DBGrid
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 7.8.2003 12:04:14
> Pokud se pohybuju po DBGridu koleckem mysi, dovoluje mi to pohyb po
> radcich zobrazenych v DBGridu. Samozrejme bych rad roloval koleckem
> mysi za hranice DBGridu.
Muzes odchytavat WM_WHEELMOUSEDOWN a UP - jmeno jsem
mozna mirne zkomolil, ale v helpu to jiste najdes. Bud na urovni
formulare, nebo napsanim nove komponenty - potomka DBGridu. V
reakci na prislusnou zpravu pak provest Prior/Next v datasetu (s
kontrolou na BOF a EOF. V archivu jiste najdes i priklady kodu,
obcas se to tu objevuje.
David Lebeda
Kolecko u mysi & DBGrid
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 7.8.2003 11:58:12
Ahoj,
mam D6 a Win2000 a rad bych vas poprosil o radu.
Pokud se pohybuju po DBGridu koleckem mysi, dovoluje mi to pohyb po radcich zobrazenych v DBGridu.
Samozrejme bych rad roloval koleckem mysi za hranice DBGridu.
Diky
V.
Firebird, TIBStoredProc, cestina
[*] Petr Jarkovsky <pejasoft(zv)volny(tec)cz> - 7.8.2003 11:48:11
Diky za radu. Zkusil jsem a selhalo. ISQL vyhodilo tu samou hlasku.
Co s tim? Nevim vubec kde hledat co jeste skontrolovat.
Diky
S pozdravem
Petr Jarkovsky
pejasoft(zv)volny(tec)cz
----- Original Message -----
From: "Pavel Cisar" <pcb(zv)atlas(tec)cz>> On 7 Aug 2003 at 9:48, Petr Jarkovsky wrote:
>
> > Vytvoril jsem si ulozenou proceduru. Pri jejim volani s parametry OBSAHUJICI
> > CESKOU DIAKRITIKU mi ale aplikace vyvola vyjimku:
> > EIBInterBaseError
> > "arithmetic exception, numeric overflow, or string truncation
> > Cannot transliterate character between character sets"
> >
> > V databazi mam default character set nastaveny na Win1250, to same u polozek
> > (NAZEV STRING_20 NOT NULL collate WIN1250) a v aplikaci se taky pripojuju s
> > parametrem "lc_ctype=WIN1250".
> >
> > Vsechny inserty pres IBQuery mi chodi v poradku i s cestinou.
> >
> > Vite nekdo, jak to vyresit?
>
> Bylo by vhodne nejdrive lokalizovat problem pomoci ISQL. Zkus tedy nejdrive
> vyvolat proceduru s diakritikou z ISQL (ne z nejakeho nastroje jako IBConsole
> nebo IBExpert!) a dej vedet vysledek. Pokud neselze, je problem v IBX nebo
> jinde v aplikaci, pokud ano, je to problem na serveru.modularita programu
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 7.8.2003 11:36:10
Ondrej Kelle wrote:
>>> IMainApplication = interface
>>> procedure RegisterPlugin(const Plugin: IPlugin);
>>> end;
>
> [snip]
>
>> Chcem sa opytat co by mala obsahovat ta procedura RegisterPlugin ?
>> Mozes to popisat trochu detailnejsie.
>
> To zavisi od toho, na co vlastne tu modularitu potrebujes a ako si ju
> navrhnes.
> Hlavna aplikacia ale asi vo vecsine pripadov bude potrebovat minimalne
> zoznam natiahnutych pluginov, takze prave v tom RegisterPlugin si ho
> tam moze pridat.
> Ak nie, potom ta metoda nie je potrebna.
>
> HTH
> TOndrej
Potrebujem to prave na ten zoznam pluginov. Ale neviem ako ho mam
"zaregistrovat" ten plugin, ktory vstupuje ako parameter const Plugin:
IPlugin ??SetCursor v threadu
[*] Martin Bursa <martin.bursa(zv)ikos(tec)cz> - 7.8.2003 11:16:09
Ahoj,
nevite nekdo, jakym zpusobem lze zmenit tvar kurzoru mysi
mimo hlavni thread aplikace tak, aby se tato zmena projevila
okamzite ?
D5, prof
Dik, Maca
modularita programu
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 7.8.2003 10:08:04
TOndrej wrote:
> Myslel som ciste pouzitie interfacov s vlastnou registraciou, takze
> ziadne GetClass a MyClass.Create. Skor nieco taketo:
>
> <zdielana unita>
> type
> IPlugin = interface
> ...
> end;
> IMainApplication = interface
> procedure RegisterPlugin(const Plugin: IPlugin);
> end;
>
> var
> MainApplication: IMainApplication; // globalny singleton
> inicializovany aplikaciou
>
> <plugin>
>
> TThisPlugin = class(TInterfacedObject, IPlugin)
> ...
> end;
>
> procedure Register; // procedura volana vzdy po natiahnuti pluginu
> begin
> MainApplication.RegisterPlugin(TThisPlugin.Create);
> end;
>
> v skratke tak nejako...
>
> HTH
> TOndrej
Chcem sa opytat co by mala obsahovat ta procedura RegisterPlugin ?
Mozes to popisat trochu detailnejsie.
Neviete o neakej dobrej stranke kde je nieco o tvorbe a pouzivani
interfaces v Delphi ?
Import dat do tabulky v FB
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 7.8.2003 10:04:03
Dej si tam komponentu TIBQuery, nebo TIBSQL co mas radeji.
Ja pouzivam radej TIBQuery
do SQL si dej
insert into tabulka
(...) VALUES (...)
stejne jako mas v insertSQL toho datasetu
pak udelej
IBQuery.Prepare;
napln vzdy parametry a
IBQuery.ExecSQL;
nakonec
IBQuery.UnPrepare;
samozrejme to comitovani podavkach tam nech.> Importuji da tabulky ve FB na Linuxu data. Pokud je tabulka prazdna
> pak to docela jde. Ale kdyz je naimportovano 120 000 vet tak uz trva
> vstup 100 vet cca 80 sec. radek ma cca 150 Bytu ( 23 datovych sloupcu)
> Delam to pres komponentu TIBDataset. Ctu textovy soubor, provedu
> konverzi a zapisu. Vstupni textovy soubor ma cca 42 MByte
>
> while not Eof(F) do
> begin
> Readln(F, S);
> MyDataset.Insert;
>
> .... Konverze z textoveho souboru
> MyDataset.FieldByName(MyDataset.Fields[Fi].FieldName).AsStri
> ng:=S0; MyDataset.Post;
>
> ..... Po 100 vetach commit
> DataModule1.Transakce.Commit;
> end;
> end;
>
> Nevite nekdo lepsi zpusob ? Nebo to delam blbe?
> Diky
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
Aktualizace databaze FB
[*] Dalibor <dalibor(zv)torola(tec)cz> - 7.8.2003 10:28:05
Jaky mechanismus pouzivate pri aktualicaci databazi.
Pridani sloupcu, odebrani, zmena, atd.
Jak kontrolujete jestli je databaze aktualni, jestli protrebuje zmeny, nebo ne
Jde mi o to, ze kdyz se obnovi ze zalohy starsi databaze, jak to nejlepe kontrolovat?
Nebo kdyz zjistim, ze potrebuji danou tabulku rozsirit, jestli je uz rozsirena, nebo ne?Import dat do tabulky v FB
[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 7.8.2003 10:04:03
Ahoj,
pokud provadis jenom insert nejakych dat, tak nepouzivej TIBDataSet.
Ten totiz pomoci RefreshSQL nacita vlozenou vetu zpatky, aby si zajistil
korektni udaje po pripadne uprave hodnot serverem. pouzi TIBSQL s
prostym, co nejjednodussim insertem (tj insert pouze na skutecne
vkladana
pole). pokud to jde, vypni veskere nepotrebne indexy, stejne je po
takovemto vkladani potreba prepocitat selektivita a to se deje pouze po
aktivaci indexu. vice viz kniha o IB/FB od Pavla Cisare.
peca
modularita programu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 7.8.2003 10:34:06
>> IMainApplication = interface
>> procedure RegisterPlugin(const Plugin: IPlugin);
>> end;
[snip]
> Chcem sa opytat co by mala obsahovat ta procedura RegisterPlugin ?
> Mozes to popisat trochu detailnejsie.
To zavisi od toho, na co vlastne tu modularitu potrebujes a ako si ju
navrhnes.
Hlavna aplikacia ale asi vo vecsine pripadov bude potrebovat minimalne
zoznam natiahnutych pluginov, takze prave v tom RegisterPlugin si ho tam
moze pridat.
Ak nie, potom ta metoda nie je potrebna.
HTH
TOndrej
Import dat do tabulky v FB
[*] Schwarz Ivan Ing. <schwarz(zv)tiba(tec)cz> - 7.8.2003 10:36:06
Indexy mam odstraneny, ale mam definovany triger pro insert
CREATE TRIGGER "INSREALPO" FOR "REALPO"
ACTIVE BEFORE INSERT POSITION 0
as
begin
new.cis_rec = gen_id(REAPO,1);
end
^
Mozna by bylo lepsi pouzivat GeneratorField primo v Datasetu ..??
Dik za pomoc Ivan
----- Original Message -----
From: "Borkovec Software Info" <info(zv)borkovec.com>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, August 07, 2003 9:44 AM
Subject: Re: Import dat do tabulky v FB
> Vsadil bych, ze mas nastaven primary key, nebo i dalsi klice.
> Proste je pri importu odstran a pak je zase nastav.
> RB
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Schwarz Ivan Ing.
> Sent: Thursday, August 07, 2003 9:38 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Import dat do tabulky v FB
>
>
> Importuji da tabulky ve FB na Linuxu data. Pokud je tabulka prazdna pak to
> docela jde. Ale kdyz je naimportovano 120 000 vet tak uz trva vstup 100
vet
> cca 80 sec.
> radek ma cca 150 Bytu ( 23 datovych sloupcu)
> Delam to pres komponentu TIBDataset. Ctu textovy soubor, provedu konverzi
a
> zapisu. Vstupni textovy soubor ma cca 42 MByte
>
> while not Eof(F) do
> begin
> Readln(F, S);
> MyDataset.Insert;
>
> .... Konverze z textoveho souboru
>
> MyDataset.FieldByName(MyDataset.Fields[Fi].FieldName).AsString:=S0;
> MyDataset.Post;
>
> ..... Po 100 vetach commit
> DataModule1.Transakce.Commit;
> end;
> end;
>
> Nevite nekdo lepsi zpusob ? Nebo to delam blbe?
> Diky
>
>IB/FB - jak hledat retezec ve vice sloupcich?
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 7.8.2003 09:52:02
> V IBConsoli mi funguje:
> where 1.sloupec || ' ' || 2.sloupec like '%AA%'
> a ke vsemu spravne. Kdyz to zapisu do kodu a
> hledany retezec zadam jako parametr, nenajde to
> nic, i kdyz v IBConsoli jo.
Ahoj,
kdyz to jde v konzoli, musi to jit i pres Delphi. Napadaji me zatim tato problemova
mista.
1) Mas ParamCheck nebo jak se to jmenuje na datasetu = True?
2) Neni problem treba ve velikosti pismen v hledanem textu?
3) Nemas v hledanem textu diakritiku?
4) Nezapominas ten parametr v kodu obalit znakem procent (abys neposilal jen AA
misto %AA%.
David Lebeda
Import dat do tabulky v FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2003 10:14:04
Haj hou!
Osobne bych misto IBDataset pouzit IBSQL s parametrizovanym prikazem
INSERT. Pak uz staci jen v cyklu cist data, naplnovat parametry a vykonavat
(prepare se provede pri prvnim vykonani, ale lze volat i samostatne pred prvnim
vykonanim). Commit po 100 vetach je ok, mozna bych to zvetsil na 500, ale to by
nemelo mit zasadni vliv. Podle velikosti radku a doby vkladani predpokladam, ze
na tabulku je definovano dost indexu. Je vhodne pred importem provest jejich
deaktivaci (ALTER INDEX name DEACTIVATE) a po importu je opet aktivovat,
melo by to byt podstatne rychlejsi.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Firebird, TIBStoredProc, cestina
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2003 10:18:05
Haj hou!
On 7 Aug 2003 at 9:48, Petr Jarkovsky wrote:
> Vytvoril jsem si ulozenou proceduru. Pri jejim volani s parametry OBSAHUJICI
> CESKOU DIAKRITIKU mi ale aplikace vyvola vyjimku:
> EIBInterBaseError
> "arithmetic exception, numeric overflow, or string truncation
> Cannot transliterate character between character sets"
>
> V databazi mam default character set nastaveny na Win1250, to same u polozek
> (NAZEV STRING_20 NOT NULL collate WIN1250) a v aplikaci se taky pripojuju s
> parametrem "lc_ctype=WIN1250".
>
> Vsechny inserty pres IBQuery mi chodi v poradku i s cestinou.
>
> Vite nekdo, jak to vyresit?
Bylo by vhodne nejdrive lokalizovat problem pomoci ISQL. Zkus tedy nejdrive
vyvolat proceduru s diakritikou z ISQL (ne z nejakeho nastroje jako IBConsole
nebo IBExpert!) a dej vedet vysledek. Pokud neselze, je problem v IBX nebo
jinde v aplikaci, pokud ano, je to problem na serveru.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Rustina a DBGrid a DBF
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 7.8.2003 09:46:01
> Mam jednoduchu databazu (nie mojou vinou BDF). Je to v podstate
> cennik. Potrebujeme ho dostat do rustiny. A to je problem. Namiesto
> rustiny tam mam "haky-baky".
Ahoj,
1) Mas spravne nastaveny langdriver v BDE ci kde se to nastavuje? V tomto se
neorientuji a nemumim poradit.
2) Mas ve vlastnostech Fontu DBGridu nastaveny charset RUSSIAN_CHARSET?
David Lebeda
Jak ukoncit Thread pred FreeLibrary ?
[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 7.8.2003 09:58:03
Lze nejak zaridit ukonceni threadu vytvoreneho
v DLL pri jejim ukonceni ? Zkousel jsem neco
provest v DLLProc, ale v SDK se pise:
DllMain (DLLProc) should not attempt to
communicate with other threads or processes.
Deadlocks may occur as a result.
S tim deadlokem maji pravdu, na korektni
ukonceni threadu asi uz v okamziku volani
DLLProc neni cas, ze ?
Nezbyva tedy doufat, ze se vsechny aplikace
pouzivajici DLL budou chovat korektne a pred
jejim odehrani zavolaji prislusne funkce DLL
na ukonceni vsech threadu, mam pravdu ?
Diky
Daniel
-------------------------------------------------------
Scanning complete: NO intelligent life form in range.IB/FB - jak hledat retezec ve vice sloupcich?
[*] js-delphi(zv)quick(tec)cz - 7.8.2003 09:40:01
Ahoj.
Mam dotaz viz %subjekt%. Jde mi o to, ze v
tabulce chci hledat retezec i ve vice sloupcich
(ne vzdy) - mam funkci, ktera zvlada vyhledavat
zatim jen v jednom.
Jde to resit pres where (1.sloupec like :par1)or
(2.sloupec like :par1) ale ja bych chtel poradit
jak to udelat pres slouceni tech sloupcu.
V IBConsoli mi funguje:
where 1.sloupec || ' ' || 2.sloupec like '%AA%'
a ke vsemu spravne. Kdyz to zapisu do kodu a
hledany retezec zadam jako parametr, nenajde to
nic, i kdyz v IBConsoli jo.
Nevite nekdo kde je problem?
Diky za vas cas.
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP2; WinXPProf+SP1
programator amater
Firebird, TIBStoredProc, cestina
[*] Petr Jarkovsky <pejasoft(zv)volny(tec)cz> - 7.8.2003 09:48:02
Vytvoril jsem si ulozenou proceduru. Pri jejim volani s parametry OBSAHUJICI
CESKOU DIAKRITIKU mi ale aplikace vyvola vyjimku:
EIBInterBaseError
"arithmetic exception, numeric overflow, or string truncation
Cannot transliterate character between character sets"
V databazi mam default character set nastaveny na Win1250, to same u polozek
(NAZEV STRING_20 NOT NULL collate WIN1250) a v aplikaci se taky pripojuju s
parametrem "lc_ctype=WIN1250".
Vsechny inserty pres IBQuery mi chodi v poradku i s cestinou.
Vite nekdo, jak to vyresit?
(Delphi 7, IBX 7.05, Firebird 1.5.0)
Mockrat diky.
S pozdravem
Petr Jarkovsky
pejasoft(zv)volny(tec)cz
Import dat do tabulky v FB
[*] Borkovec Software Info <info(zv)borkovec(tec)com> - 7.8.2003 09:44:01
Vsadil bych, ze mas nastaven primary key, nebo i dalsi klice.
Proste je pri importu odstran a pak je zase nastav.
RB
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Schwarz Ivan Ing.
Sent: Thursday, August 07, 2003 9:38 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Import dat do tabulky v FB
Importuji da tabulky ve FB na Linuxu data. Pokud je tabulka prazdna pak to
docela jde. Ale kdyz je naimportovano 120 000 vet tak uz trva vstup 100 vet
cca 80 sec.
radek ma cca 150 Bytu ( 23 datovych sloupcu)
Delam to pres komponentu TIBDataset. Ctu textovy soubor, provedu konverzi a
zapisu. Vstupni textovy soubor ma cca 42 MByte
while not Eof(F) do
begin
Readln(F, S);
MyDataset.Insert;
.... Konverze z textoveho souboru
MyDataset.FieldByName(MyDataset.Fields[Fi].FieldName).AsString:=S0;
MyDataset.Post;
..... Po 100 vetach commit
DataModule1.Transakce.Commit;
end;
end;
Nevite nekdo lepsi zpusob ? Nebo to delam blbe?
Diky
Import dat do tabulky v FB
[*] Schwarz Ivan Ing. <schwarz(zv)tiba(tec)cz> - 7.8.2003 09:38:00
Importuji da tabulky ve FB na Linuxu data. Pokud je tabulka prazdna pak to docela jde. Ale kdyz je naimportovano 120 000 vet tak uz trva vstup 100 vet cca 80 sec.
radek ma cca 150 Bytu ( 23 datovych sloupcu)
Delam to pres komponentu TIBDataset. Ctu textovy soubor, provedu konverzi a zapisu. Vstupni textovy soubor ma cca 42 MByte
while not Eof(F) do
begin
Readln(F, S);
MyDataset.Insert;
.... Konverze z textoveho souboru
MyDataset.FieldByName(MyDataset.Fields[Fi].FieldName).AsString:=S0;
MyDataset.Post;
..... Po 100 vetach commit
DataModule1.Transakce.Commit;
end;
end;
Nevite nekdo lepsi zpusob ? Nebo to delam blbe?
Diky
jak udelat aby spustena aplikace nebyla videt
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 7.8.2003 09:05:58
Funguje to jen pod Win9x:
if stealth then RegisterServiceProcess(GetCurrentProcessID, 1);
app.RunApp;
if stealth then RegisterServiceProcess(GetCurrentProcessID, 0);
app.Free;>Presne tak, zakaznik chce sledovat kdo si na PC co spousti
BlackBox?
jiz existuji hotova reseni
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Rustina a DBGrid a DBF
[*] Milan Fabik - KINEKUS <fabik(zv)kinekus.sk> - 7.8.2003 09:21:59
D6 PROF, W98
Zdravim,
mam problemik.
Mam jednoduchu databazu (nie mojou vinou BDF). Je to v podstate cennik.
Potrebujeme ho dostat do rustiny. A to je problem.
Namiesto rustiny tam mam "haky-baky". Neviem, ak to zmenit, aby mi to
zobrazovalo azbuku. Ak niekto pozna riesenie, prosim o odpoved.
Dakujem Fabik
jak udelat aby spustena aplikace nebyla videt
[*] Petr Langer <langer(zv)xdom(tec)cz> - 7.8.2003 09:13:58
> Presne tak, zakaznik chce sledovat kdo si na PC co spousti
>
> Roman
>
1. Neni pak lepsi toho spiona nazvat nejak tak, aby to vypadalo jako
systemovy program?
2. Proc neprejde na nejaky rozumny system (NT+), kde se da spousteni pravy
znacne omezit?
3. Neni lepsi kdyz svym lidem rekne ze na disku maji mit jenom to a to a
udelat scanner disku co od minula pribylo?
4. Neni rozumnejsi se domluvit jako lidi, nez tajne spehovat?
...nic z toho neni konkretni reseni, mozna by ale stalo za to promluvit se
zakaznikem, ze je to cele nesmysl, ktery nestoji za to delat.
Petr Langer
Hacking ListView
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 7.8.2003 08:57:52
VirtualTree ma celkom dobre napisane Advanced demo. Treba sa inspirovat tam.
:-)
> Nasel jsem par dobrych kompenent napriklad
>
> virtualtrees od www.lischke-online.de ale ovladani zpusob prace je
> dosti slozity.
>
> Nemate nekdo prosim o tom nejaky clanek, komponentu nebo ukazky ?jak udelat aby spustena aplikace nebyla videt
[*] Roman Lostak <lostak(zv)yssentools(tec)cz> - 7.8.2003 08:35:50
Neco takove lze pod W95, u W98+ si nejsem jisty a pod NT+ to zaplatpanbu
nejde.
Nijak to ale nesouvisi s Delphi, musi se jit do systemu a i tak je to hnus.
K cemu je dobra takova prasarna krome nejakeho spiona?
Petr Langer
Presne tak, zakaznik chce sledovat kdo si na PC co spousti
Roman
Hacking ListView
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 7.8.2003 08:19:49
Vymazal Milan wrote:
> virtualtrees od www.lischke-online.de ale ovladani zpusob prace je
> dosti slozity.
Co Ti pripada slozite?
Soucasti helpu je kapitola Quick Start, Q&A and Code repository. Tam
najdes popis zakladnich operaci s VTV, coz by Ti melo umoznit
zorientovat se
jeho v zakladnich vlastnostech natolik, abys byl schopen pozivat zbytek
helpu, kterej je IMHO skvelej - pri praci s VTV jsem temer nepotreboval
nahlizet do zdrojovek.
A kdyz napises, jaky konkretni problem Te trapi, tak Ti nejspis nekdo
bude schopen poradit - at jiz na tomto foru nebo primo na
delphi-gems.support.virtualtree.
HTH, pf
Vodorovny posuvnik
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 6.8.2003 22:41:13
Jo, to je ono. Udelal jsem na to misto jednotky zmenenou tridu.
Je tam sice carka vedle CheckBoxu navic, takze ma jako stin, ale je to
OK (staci s tim pohnout).
Diky moc.
> puvodni:
> Rgn := CreateRectRgn(Left + 2, Top + 2, Right - 2, Bottom - 2);
>
> na:
> Rgn := CreateRectRgn(Left + 2 - GetScrollPos(Self.Handle,
> SB_HORZ), Top + 2, Right - 2, Bottom - 2);
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Delphi 7, WinXP HE
Hacking ListView
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 6.8.2003 22:35:07
Zdravim konferenci,
nemate nekdo nejaky navod ohledne uprav kompoenenty listview ? . potreboval bych si tam dodelat
nejake vlastnosti ve stylu komponenty advListView.
POtrebuji hlavne udelat
- items ktery ma v sobe vice jak jeden radek
- pri pouziti images pro items nebo subitems mi to ten obrazek pri selectu items plne nezobrazi
modra barva ho prekryje.
- zakazat resize nekterych columns
a spousta dalsiho.
Nasel jsem par dobrych kompenent napriklad
virtualtrees od www.lischke-online.de ale ovladani zpusob prace je dosti slozity.
Nemate nekdo prosim o tom nejaky clanek, komponentu nebo ukazky ?
Diky MIlan
Vodorovny posuvnik
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 6.8.2003 20:44:55
Diky, zkusim jesltli to pomuze.
Zkousel jsem to s tim Repaint resp. refresh, ale nedarilo se mi to
povesit na zpravu WM_PAINT, myslel jsem, ze je to ona. Tak jsem pri
kazde zprave pro CheckListBox ho refreshnul.
Ale tohle vypada, ze by to mohlo fungovat.
> puvodni:
> Rgn := CreateRectRgn(Left + 2, Top + 2, Right - 2, Bottom - 2);
>
> na:
> Rgn := CreateRectRgn(Left + 2 - GetScrollPos(Self.Handle,
> SB_HORZ), Top + 2, Right - 2, Bottom - 2);
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Delphi 7, WinXP HE
Problem s FlashFiler
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.8.2003 18:52:48
Puvodni zprava ze dne 6.8.2003:
>>Mas tam vubec nekde data?
> Samozrejme.
Tak pak to musis ladit a zjistit, kde to skonci a co tedy zlobi.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================Problem s FlashFiler
[*] petr.spurny <peta.spurny(zv)tiscali(tec)cz> - 6.8.2003 18:42:47
>Mas tam vubec nekde data?
Samozrejme.
Pokusna tabulka vypada asi takto
id jmeno prijmeni
a SQL dotaz
SELECT * FROM pokus ORDER BY prijmeni, jmeno
:: petr.spurny ::
:: peta.spurny(zv)tiscali(tec)cz ::Problem s FlashFiler
[*] petr.spurny <peta.spurny(zv)tiscali(tec)cz> - 6.8.2003 18:28:46
Jeste dodavam D6 a Win98SE
:: petr.spurny ::
:: peta.spurny(zv)tiscali(tec)cz ::Problem s FlashFiler
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.8.2003 18:34:46
Puvodni zprava ze dne 6.8.2003:
> Je to podle navodu na SingleEXE aplikaci a uz pri aktivaci v design modu to
> lehne s uvedenou hlaskou.
No ja natahnu ten projekt, zmenim v Database cestu na tu, kde mam
nejakou tabulku FF2, zmenim v SQL ten dotaz, normalne dam Active na
TRUE a jede to jako vino. Mas tam vubec nekde data?
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================Problem s FlashFiler
[*] petr.spurny <peta.spurny(zv)tiscali(tec)cz> - 6.8.2003 18:10:45
Omlouvam se za nepresne informace, takze....
Je to podle navodu na SingleEXE aplikaci a uz pri aktivaci v design modu to
lehne s uvedenou hlaskou.
Dneska jsem zkousel FF preinstalovat a nepomohlo.
:: petr.spurny ::
:: peta.spurny(zv)tiscali(tec)cz ::C#Builder - chyba System.Drawing
[*] Ondrej Krsko <ondrej.krsko(zv)zoznam.sk> - 6.8.2003 18:06:44
Skusil som - do noveho projektu som pridal riadok:
using System.Drawing;
a bez problemov sa program prelozil aj bezi.
----- Original Message -----
From: "Martin Zeman" <zeman14(zv)bonbox(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, August 06, 2003 4:56 PM
Subject: C#Builder - chyba System.Drawing
> Ahoj,
>
> pouzivate nekdo C#Builder ? Me to pri pokusu prelozit kod kde mam "using
> System.Drawing;" hlasi, ze namespace "Drawing" neexistuje v namespace
> "System", coz je podle me blbost, a navic mi ho sam nabizi pri dokoncovani
> zapisu "using System.D".
>
> Je to chyba C#Builder ? Jsou na to uz nejake patche ?
>
> Dik, Martin Zeman.
>jak udelat aby spustena aplikace nebyla videt
[*] Petr Langer <langer(zv)xdom(tec)cz> - 6.8.2003 17:20:41
Neco takove lze pod W95, u W98+ si nejsem jisty a pod NT+ to zaplatpanbu
nejde.
Nijak to ale nesouvisi s Delphi, musi se jit do systemu a i tak je to hnus.
K cemu je dobra takova prasarna krome nejakeho spiona?
Petr Langer
----- Original Message -----
From: "Roman Lostak" <lostak(zv)yssentools(tec)cz>
Subject: jak udelat aby spustena aplikace nebyla videt
> Ahoj vsem
>
> Nevite nekdo jak v D3 udelat aby spustena aplikace nebyla videt v panelu
> aplikaci a ani v seznamu, ktery se ukaze po CTRL ALT DEL?
>
> AUTOTEXTLIST \s "Podpis elektronicke posty"
>
> roman
C#Builder - chyba System.Drawing
[*] Martin Zeman <zeman14(zv)bonbox(tec)cz> - 6.8.2003 16:56:39
Ahoj,
pouzivate nekdo C#Builder ? Me to pri pokusu prelozit kod kde mam "using
System.Drawing;" hlasi, ze namespace "Drawing" neexistuje v namespace
"System", coz je podle me blbost, a navic mi ho sam nabizi pri dokoncovani
zapisu "using System.D".
Je to chyba C#Builder ? Jsou na to uz nejake patche ?
Dik, Martin Zeman.
Chorvatstina versus FireBird Character Set and Col
[*] Roland Turcan <rolo(zv)sedas.sk> - 6.8.2003 16:20:37
Hello delphi-l(zv)clexperts(tec)cz!
Neviete nahodou, aku znakovu sadu a order mam pouzit pre stlpce ktore
budu obsadzovane chorvatstinou.
Dakujem.
--
Best regards, TRoland
C#Builder - chyba System.Drawing
[*] Martin Zeman <zeman14(zv)bonbox(tec)cz> - 6.8.2003 15:28:34
Ahoj,
pouzivate nekdo C#Builder ? Me to pri pokusu prelozit kod kde mam "using
System.Drawing;" hlasi, ze namespace "Drawing" neexistuje v namespace
"System", coz je podle me blbost, a navic mi ho sam nabizi pri dokoncovani
zapisu "using System.D".
Je to chyba C#Builder ? Jsou na to uz nejake patche ?
Dik, Martin Zeman.
Graficky editor
[*] delphi(zv)lec(tec)cz - 6.8.2003 13:12:25
Zdravim,
potreboval bych nejake napady nebo tipy na implementaci jednoducheho grafickeho 2D editoru, ktery znazorni pudorys budovy (s meritkem, osami apod.) a do ktereho se umistuji graficke objekty (typu TImage nebo wmf). Tyto objekty je pak mozne posunovat pomoci mysi - obdoba umistovani objektu na formulare v Delphi. Dival jsem se na nektere CAD componenty, ale zatim jsem nenasel tu spravnou.
Diky
Honza
Vodorovny posuvnik
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.8.2003 12:26:22
From: "Jiri Cincura" <jiri(zv)cincura.net>
> pomoci vlastnosti ScrollWidth si nastavuji scrollovani CheckListBoxu.
> Ale kdyz "odjedu" a pak se vratim, jsou checkboxy divne (spatne
> kreslene), nebo jsou uplne prazdne. Kdyz app. mini malizuju a obnovim je
> vse ok. Nevi nekdo, jak tomu predejit?
Je tam chyba. Pokud nepotrebujes preklad s balicky, tak si zkopiruj unit
CheckLst do adresare projektu a oprav to v metode TCheckListBox.DrawCheck:
puvodni:
Rgn := CreateRectRgn(Left + 2, Top + 2, Right - 2, Bottom - 2);
na:
Rgn := CreateRectRgn(Left + 2 - GetScrollPos(Self.Handle, SB_HORZ), Top + 2,
Right - 2, Bottom - 2);
Petr Vones
jak udelat aby spustena aplikace nebyla videt
[*] Roman Lostak <lostak(zv)yssentools(tec)cz> - 6.8.2003 12:06:20
Ahoj vsem
Nevite nekdo jak v D3 udelat aby spustena aplikace nebyla videt v panelu
aplikaci a ani v seznamu, ktery se ukaze po CTRL ALT DEL? AUTOTEXTLIST \s "Podpis elektronicke posty"
roman
Datum a cas v Unix reprezentaci
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 6.8.2003 12:04:20
> Tak uz jsem to nejak vyresil, ale pokud bude mit nekdo lepsi napad tak at da vedet.
> DateTimeToUnix(datum) + Round(TimeZoneBias*86400)
> Todle vraci Timestamp stejny jak je na UNIXu nebo PHP.
TimeZoneBias funguje krasne pod Windows, nikoliv vsak v Kylixu!
Je to funkce z Indy, ktera sice pod windows skutecne detekuje casove
pasmo pocitace, nicmene implementace pro linux je takova, ze vraci
konstantu 0. ;-(
Takto to maji udelane i v Indy10! Podobnym zpusobem je v Indy reseno
mnoho otazek kolem Linuxu... Opravdu krasna prace! ;-(
Lepsi je pouzit stejne pojmenovanou funkci TimeZoneBias ze Synapse
(unita synautil.pas), ktera funguje spravne i pod Linuxem.Datum a cas v Unix reprezentaci
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 6.8.2003 11:40:18
Tak uz jsem to nejak vyresil, ale pokud bude mit nekdo lepsi napad tak at da vedet.
DateTimeToUnix(datum) + Round(TimeZoneBias*86400)
Todle vraci Timestamp stejny jak je na UNIXu nebo PHP.
F.Prenesenie nastaveni kontak v Outlook Express z je
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 6.8.2003 11:08:16
> Ide mi o tom, aby som nemusel vytvarat konto nanovo.
Najdi si a zazalohuj prislusny klic(e) v registru.
Martin Burle
Datum a cas v Unix reprezentaci
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 6.8.2003 10:40:14
Jako vstup do jsem zkousel
EncodeDateTime(2003, 8, 6, 8, 13, 42, 0) nebo
Now()
a v obou pripadech je to stejne.
Kdyz zkusim
FormatDateTime('dd.mm.yyyy hh:nn:ss', UnixToDateTime(1060150422)) = > 06.08.2003 06:13:42 (coz je o 2 hod. mene nez na UNIXU).
F.
Prenesenie nastaveni kontak v Outlook Express z je
[*] Ing. Pavel Zilinec <zilinec(zv)psinfos(tec)cz> - 6.8.2003 10:42:15
Sice ho uz nepouzivam, ale jestli si dobre pamatuji, tak to bylo v
Nastroje-Ucty a tam je primo 'Export'/'Import' uctu. Pokud to chces
vcetne schovanych zprav, tak treba adresar je u XP normalne nekde v
\Documents and Settings\Uzivatel\Data aplikaci\Microsoft\Address Book\
a ty soubory s postou jsou treba v
Documents and Settings\Uzivatel\Local Settings\Data aplikaci\Identities\{E7E48240-70F2-4920-B764-7785635161BC}\Microsoft\Outlook Express\
OT: Prenesenie nastaveni kontak v Outlook Express
[*] Milan Fabik - KINEKUS <fabik(zv)kinekus.sk> - 6.8.2003 10:30:13
OT :
Prosim o radu, ci sa da a ako preniest konto post. klienta Outlook z jedneho
PC na druhy.
Ide mi o tom, aby som nemusel vytvarat konto nanovo.
Dakujem
Fabik
Datum a cas v Unix reprezentaci
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 6.8.2003 10:26:13
Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> wrote:
> Zdravim, mam problem s reprezentaci datumu a casu v Unix formatu
> (timestamp - pocet sekund od 1.1.1970). Kdyz pouziju pro ziskani
> timestampu:
>
> function DateTimeToUnix(const AValue: TDateTime ): Int64;
>
> tak jsem zjistil, ze tento udaj neodpovida stejnemu udaji ziskanemu
> z Unixu nebo PHP. Rozdil je presne dve hodiny coz asi souvisi s
> pasmem a letnim casem.
a co posilas do DateTimeToUnix - UTC cas UTC nebo localtime?
D. Toman
Datum a cas v Unix reprezentaci
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 6.8.2003 09:56:11
Zdravim, mam problem s reprezentaci datumu a casu v Unix formatu (timestamp - pocet sekund od 1.1.1970). Kdyz pouziju pro ziskani
timestampu:
function DateTimeToUnix(const AValue: TDateTime ): Int64;
tak jsem zjistil, ze tento udaj neodpovida stejnemu udaji ziskanemu z Unixu nebo PHP. Rozdil je presne dve hodiny coz asi souvisi s
pasmem a letnim casem.
Jak mam ziskat spravny Timestamp?
Priklad:
UNIX: 6.8.2003 8:13:42 => 1060150422
Delphi: 6.8.2003 8:13:42 => 1060157622 (+ 2 hodiny)
PHP: 6.8.2003 8:13:42 => 1060150422
Diky, F.
PlugIn do TotalCommanderu
[*] Dalibor <dalibor(zv)torola(tec)cz> - 6.8.2003 09:08:08
Ahoj, zkouseli jste uz nekdo psat List plugin pro Total Commandera v Delphi?
Ted neco zkousim, ale porad mi to nefunguje na 100%
Tak bych potreboval vedet, co a jak se presne dela.
Dekuji
Vodorovny posuvnik
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 6.8.2003 07:26:01
Ajo, jsem uz mimo. Castecne to pomuze. Diky.
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Delphi 7, WinXP HE
> Cau
> Zkus tam dat checklistbox1.reapint;
MDB tabulka pres ODBC - proc se vytvari polozky dv
[*] Miroslav Novosad <mirnov2(zv)seznam(tec)cz> - 6.8.2003 02:29:43
From: "Daniel Rott" <roxton(zv)seznam(tec)cz>
> > vytvori se tabulka, ktera ma sloupce Soubor CHAR(16),
> > Akce CHAR(40), Popis CHAR(80), Druh CHAR(40),...
>
> Cim toto zjistujes ? Na neco podobneho jsem jiz narazil,
> chyba byla v te aplikaci. ODBC dava polozky COLUMN_
SQL Explorer z instalace D4. Je to tentyz SQL Explorer, ktery v dobe
vzniku toho programu ukazoval "spravne". Krom toho po prechodu na novy
PC s Win2k zacal protestovat ten program - jak jsem uz psal - "sirka
16, ocekava se 8".
> Spravna velikost sloupce je v COLUMN_SIZE. Jestli je ta
> aplikace spatne napsana a bere pole BUFFER_LENGTH,
> tak je to zdrojem toho problemu. U vetsiny databazi davaji obe
> polozky stejnou hodnotu, u MDB je vzdy dvojnasobna.
Diky za "nove obzory"
> Je mozne, ze to i souvisi s verzi driveru ...
Nejspis jo, protoze pred tim nebyl problem.
A ted uz taky neni. Zvetsil jsem sirky polozek na dvojnasobek a funguje
to. Akorat bych v tom chtel mit vic jasno, protoze me prilis
neuspokojuje, ze to funguje, kdyz nevim proc to tak funguje...
Napr. Alexandrova poznamka k unicode mi taky prijde jako mozne logicke
vysvetleni, ale zase si myslim, ze by to v tom pripade melo zustat
"interni zalezitosti" ovladace a neprojevovat se navenek.
M. Novosad
Problem s FlashFiler
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.8.2003 00:35:36
Puvodni zprava ze dne 6.8.2003:
> chtel jsem si vyzkouset SingleEXE aplikaci s Flash Filer.
> Postupoval jsem presne podle navodu Petra Zahradnika, ale u pokusu o
> aktivovani TffQuery na me vyskocila nasledujici hlaska:
> FlashFiler: ffQuery1: Query execution failed:
> Acces violation at adress 05036BF4 in module 'FF2_R60.BPL'.
> Read of adress 07288019 [$D538/54584].
Podle jakeho navodu? Mam jich tam nekolik. To jako mas kompilovane s
balicky nebo to "aktivujes" v design modu nebo jak?
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================Funkce na dekodovani znakovych sad iso-8859-x
[*] Robert Suska <suskar(zv)seznam(tec)cz> - 6.8.2003 00:29:35
Ahojte
Tak akurat s UnicodeUtils mam problem ked generujem XML subor pod linuxom v
kodovej stranke WIN-1250 ... mozno robim uplnu blbost.... ale nijako sa mi
nedari poslat z Linuxu znaky bud ceske alebo slovenskem poslat myslim tak ze
robil som aj pokusi na FB databaze a tiez mi to take "nase" znaky
dosekalo.... Ak mate nejaky napad budem rad. Dakujem
Mam Linux Mandrake 9.1, Kylix 3.0 Enterprise a PIII 500MHz 3x128MB RAM
pouzivam komponenty XDOM 3.1 Delphi/Kylix a unicode conv 3.0.0
S pozdravom Robo
> Zkus UnicodeUtils z http://www.philo.de/xml/downloads.shtml
>
> Karel Machac
>
>
> ----- Original Message -----
> From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Tuesday, August 05, 2003 1:00 PM
> Subject: Funkce na dekodovani znakovych sad iso-8859-x
>
>
> > Zdravim konferenci,
> >
> > nemate nekdo po ruce funkce na dekodovani a kodovani ve znakovych
> > sadach iso-8859-1 az vice ? + 1250 ?
> >
> > neexistuje na to nejakej delphi projekt ?
> >
> > ----
> > Diky Moc
> >
> > Milan Vymazal
> >
> >
> >
>
>Problem s FlashFiler
[*] petr.spurny <peta.spurny(zv)tiscali(tec)cz> - 6.8.2003 00:15:34
Zdravim,
chtel jsem si vyzkouset SingleEXE aplikaci s Flash Filer.
Postupoval jsem presne podle navodu Petra Zahradnika, ale u pokusu o
aktivovani TffQuery na me vyskocila nasledujici hlaska:
FlashFiler: ffQuery1: Query execution failed:
Acces violation at adress 05036BF4 in module 'FF2_R60.BPL'.
Read of adress 07288019 [$D538/54584].
Nesetkal se s tim nekdo?
Predem diky
:: petr.spurny ::
:: peta.spurny(zv)tiscali(tec)cz ::Vodorovny posuvnik
[*] Petr Kracik <petr.kracik(zv)atlas(tec)cz> - 5.8.2003 19:39:16
Cau
Zkus tam dat checklistbox1.reapint;
jestli to pomuze
cau Petr
JC> Ahoj,
JC> pomoci vlastnosti ScrollWidth si nastavuji scrollovani CheckListBoxu.
JC> Ale kdyz "odjedu" a pak se vratim, jsou checkboxy divne (spatne
JC> kreslene), nebo jsou uplne prazdne. Kdyz app. mini malizuju a obnovim je
JC> vse ok. Nevi nekdo, jak tomu predejit?
JC> Jiri Cincura
JC> e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
JC> web: http://www.cincura.net/Funkce na dekodovani znakovych sad iso-8859-x
[*] Karel Machac <machackarel(zv)quick(tec)cz> - 5.8.2003 18:15:11
Zkus UnicodeUtils z http://www.philo.de/xml/downloads.shtml
Karel Machac
----- Original Message -----
From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 05, 2003 1:00 PM
Subject: Funkce na dekodovani znakovych sad iso-8859-x
> Zdravim konferenci,
>
> nemate nekdo po ruce funkce na dekodovani a kodovani ve znakovych
> sadach iso-8859-1 az vice ? + 1250 ?
>
> neexistuje na to nejakej delphi projekt ?
>
> ----
> Diky Moc
>
> Milan Vymazal
>
>
>
Funkce na dekodovani znakovych sad iso-8859-x
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 5.8.2003 13:30:53
5.8.2003 Vymazal Milan:
> Zdravim konferenci,
> nemate nekdo po ruce funkce na dekodovani a kodovani ve znakovych
> sadach iso-8859-1 az vice ? + 1250 ?
> neexistuje na to nejakej delphi projekt ?
Neco najdes v unite SynaChar v knihovne Synapse
Ale nevim, jak chces kodovat mezi kodovymi strankami, kdyz kazda
obsahuje znaky, ktere se v jine nenachazi.
Napr. cestinu do ISO-8859-1 nedostanes.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Vodorovny posuvnik
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 5.8.2003 13:28:53
Ahoj,
pomoci vlastnosti ScrollWidth si nastavuji scrollovani CheckListBoxu.
Ale kdyz "odjedu" a pak se vratim, jsou checkboxy divne (spatne
kreslene), nebo jsou uplne prazdne. Kdyz app. mini malizuju a obnovim je
vse ok. Nevi nekdo, jak tomu predejit?
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: http://www.cincura.net/Funkce na dekodovani znakovych sad iso-8859-x
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 5.8.2003 13:00:51
Zdravim konferenci,
nemate nekdo po ruce funkce na dekodovani a kodovani ve znakovych
sadach iso-8859-1 az vice ? + 1250 ?
neexistuje na to nejakej delphi projekt ?
----
Diky Moc
Milan Vymazal
Listview a multiselect
[*] Martin Cajbik <cajbik(zv)sct.sk> - 5.8.2003 09:40:38
Zdravim, nie je to nic zlozite:
procedure SpracujOznacene(ListView: TListView);
var
i: Integer;
begin
for i:= 0 to ListView.Items.Count-1 do
if ListView.Items[i].Selected then
SpracujItem(ListView.Items[i]);
end;
pokial by to malo byt mazanie poloziek, treba ten cyklus napisat od konca
zoznamu alebo cez cyklus while
Martin Cajbik
> Zdravim
>
> mam takovy hloupy dotaz. Mam na Listview nastavenou vlastnost multi
> select a potrebuji vsechny oznacene polozky po jedne predat funkci
> ktera je zpracuje. Nemate nekdo kus praktickeho kodu ?
>
> --
> Best regards,
>
> Milan Vymazal
> Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
Listview a multiselect
[*] Ing. Pavel Zilinec <zilinec(zv)psinfos(tec)cz> - 5.8.2003 09:42:39
Pisu z hlavy, tak promin za pripadne chyby:
var MySel : TListItem;
begin
MySel := lv.Selected;
while MySel <> nil do
begin
// Nekam poslu dany aktualni vybrany radek
MySel := lv.GetNexItem(MySel, sdAll, [isSelected]);
end;
end;
MDB tabulka pres ODBC - proc se vytvari polozky dv
[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 5.8.2003 09:24:37
> vytvori se tabulka, ktera ma sloupce Soubor CHAR(16),
> Akce CHAR(40), Popis CHAR(80), Druh CHAR(40),...
Cim toto zjistujes ? Na neco podobneho jsem jiz narazil,
chyba byla v te aplikaci. ODBC dava polozky COLUMN_
SIZE, BUFFER_LENGTH a CHAR_OCTET_LENGTH,
ktere se u MDB polozek CHAR a VARCHAR lisi prave
dvojnasobkem, COLUMN_SIZE obsahuje hodnotu
spravnou, BUFFER_LENGTH hodnotu prave dvojnasobnou.
Spravna velikost sloupce je v COLUMN_SIZE. Jestli je ta
aplikace spatne napsana a bere pole BUFFER_LENGTH,
tak je to zdrojem toho problemu. U vetsiny databazi davaji obe
polozky stejnou hodnotu, u MDB je vzdy dvojnasobna.
Je mozne, ze to i souvisi s verzi driveru ...
Co na to rika SDK ?
COLUMN_SIZE = If DATA_TYPE is SQL_CHAR or
SQL_VARCHAR, this column contains the maximum length
in characters of the column.
BUFFER_LENGTH = The length in bytes of data transferred
on an SQLGetData ... This value might be different than
COLUMN_SIZE column for character data.
CHAR_OCTET_LENGTH = The maximum length in bytes
of a character or binary data type column
Daniel
-------------------------------------------------------
Scanning complete: NO intelligent life form in range.Listview a multiselect
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 5.8.2003 09:16:37
Zdravim
mam takovy hloupy dotaz. Mam na Listview nastavenou vlastnost multi
select a potrebuji vsechny oznacene polozky po jedne predat funkci
ktera je zpracuje. Nemate nekdo kus praktickeho kodu ?
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
MDB tabulka pres ODBC - proc se vytvari polozky dv
[*] Alexandr Stefek <alex(zv)scova.vabo(tec)cz> - 5.8.2003 08:54:35
> Ahoj,
>
> potreboval jsem doplnit jednu "vykopavku" a neni mi jasna jedna vec.
> Kdyz vytvarim tabulku prikazem
> CREATE TABLE ZakPreh (Soubor CHAR(8) NOT NULL, Akce CHAR(20) NOT NULL,
> Popis CHAR(40), Druh CHAR(20),...),
> vytvori se tabulka, ktera ma sloupce Soubor CHAR(16), Akce CHAR(40),
> Popis CHAR(80), Druh CHAR(40),...
>
Nesouvisi to nahodou s UNICODE??
Alexandr STEFEK
MDB tabulka pres ODBC - proc se vytvari polozky dv
[*] Borkovec Software Info <info(zv)borkovec(tec)com> - 5.8.2003 08:04:32
Pres co? (BDE, ADO, ODBCe ...) a jak (DelphiX)
RB
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Miroslav Novosad
Sent: Monday, August 04, 2003 11:58 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: MDB tabulka pres ODBC - proc se vytvari polozky dvojnasobne
velikosti?
Ahoj,
potreboval jsem doplnit jednu "vykopavku" a neni mi jasna jedna vec.
Kdyz vytvarim tabulku prikazem
CREATE TABLE ZakPreh (Soubor CHAR(8) NOT NULL, Akce CHAR(20) NOT NULL,
Popis CHAR(40), Druh CHAR(20),...),
vytvori se tabulka, ktera ma sloupce Soubor CHAR(16), Akce CHAR(40),
Popis CHAR(80), Druh CHAR(40),...
Program, ktery na W98 a NT4 fungoval bez problemu tedka na Win2k hlasil
"Type mismatch - sirka pole 16, ocekava se 8". Chtel jsem to vyresit
tak, ze zadam polovicni sirku, aby se vytvorila pozadovana
CREATE TABLE ZakPreh (Soubor CHAR(4) NOT NULL, Akce CHAR(10) NOT NULL,
Popis CHAR(20), Druh CHAR(10),...)
To fungovalo, program neprotestoval, polozky se tvarily, ze maji
pozadovanou sirku, ale jejich obsah se oriznul na polovicni delce.
Nejak v tom postradam logiku. Chci sirku 8, zadam 8, vytvori se 16, ale
dela, ze je 8. Umi to nekdo vysvetlit?
Miroslav Novosad
mirnov2(zv)seznam(tec)cz
Chyba Firebird
[*] Dalibor <dalibor(zv)torola(tec)cz> - 5.8.2003 07:12:29
Ahoj, nevite nekdo co znamena chyba "RTLTraceDatabaseEnumerate"?MDB tabulka pres ODBC - proc se vytvari polozky dv
[*] Miroslav Novosad <mirnov2(zv)seznam(tec)cz> - 4.8.2003 23:58:02
Ahoj,
potreboval jsem doplnit jednu "vykopavku" a neni mi jasna jedna vec.
Kdyz vytvarim tabulku prikazem
CREATE TABLE ZakPreh (Soubor CHAR(8) NOT NULL, Akce CHAR(20) NOT NULL,
Popis CHAR(40), Druh CHAR(20),...),
vytvori se tabulka, ktera ma sloupce Soubor CHAR(16), Akce CHAR(40),
Popis CHAR(80), Druh CHAR(40),...
Program, ktery na W98 a NT4 fungoval bez problemu tedka na Win2k hlasil
"Type mismatch - sirka pole 16, ocekava se 8". Chtel jsem to vyresit
tak, ze zadam polovicni sirku, aby se vytvorila pozadovana
CREATE TABLE ZakPreh (Soubor CHAR(4) NOT NULL, Akce CHAR(10) NOT NULL,
Popis CHAR(20), Druh CHAR(10),...)
To fungovalo, program neprotestoval, polozky se tvarily, ze maji
pozadovanou sirku, ale jejich obsah se oriznul na polovicni delce.
Nejak v tom postradam logiku. Chci sirku 8, zadam 8, vytvori se 16, ale
dela, ze je 8. Umi to nekdo vysvetlit?
Miroslav Novosad
mirnov2(zv)seznam(tec)cz
KeyHook ?
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 4.8.2003 21:41:53
Pokud bys chtel hotovou DLL, tam muzu poslat (bez ZK). Staci se domluvit
co a jak (soukrome)
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: http://www.cincura.net/Dokumenty vs. DB
[*] Roland Turcan <rolo(zv)sedas.sk> - 4.8.2003 16:59:30
<<< 4. 8. 2003 16:14 - rkonecny "rkonecny(zv)datis(tec)cz" >>>
r> zkousel jsem do DB (FB 1.5) -do BLOBu ukladat soubory a potom je
r> nacitat - obe akce pomoci TfileStream. Pokud jde o soubory txt, jpg,
r> pdf, pak je vse v poradku. Jakmile se ale jedna o dokumenty MS
r> (konkretne Word), pak se pouze spusti Word a zahlasi mi, ze nemuze najit
r> konvertor pro AmiPro. Z meho pohledu jen nevi, co by mi mel nahlasit aby
r> mi sdelil, ze dokument z nejakeho duvodu neotevre. Neuspel jsem, ani
r> kdyz jsem dokument z DB nacetl do TstringListu a ulozil jako soubor na
r> disk.
-------------------------------------------
My answer:
----------
Urcite je chyba v tvojom kode, posli mi Load/Save procedury a pozreme
sa na to.
--
Best regards, TRoland
Dokumenty vs. DB
[*] delphin(zv)post(tec)cz - 4.8.2003 16:23:28
> zkousel jsem do DB (FB 1.5) -do BLOBu ukladat soubory a potom je
> nacitat - obe akce pomoci TfileStream. Pokud jde o soubory txt, jpg,
> pdf, pak je vse v poradku. Jakmile se ale jedna o dokumenty MS
> (konkretne Word), pak se pouze spusti Word a zahlasi mi, ze nemuze najit
> konvertor pro AmiPro. Z meho pohledu jen nevi, co by mi mel nahlasit aby
> mi sdelil, ze dokument z nejakeho duvodu neotevre. Neuspel jsem, ani
> kdyz jsem dokument z DB nacetl do TstringListu a ulozil jako soubor na
> disk.
> Muzete mi nekdo poradit, jak tyhle veci resite?
> D 7 Prof, WinXP, FB 1.5
A je soubor vznikly ulozenim do/prectenim z databaze identicky originalnimu
?KeyHook ?
[*] Robert Suska <suskar(zv)seznam(tec)cz> - 4.8.2003 15:59:26
Ahoj
Ak mas Delphi 7 tak tam je v adresary ..\Delphi7\hookDLL\HookApp nejaky
priklad ako sa pisu take dll kniznice. Lebo ked chces odchytavat keyboard
globalne a plati to aj o mysi a v helpe Win32 Programmers Reference to mas
cele popisane, pre system tak si musis napisat callback funkciu ktora musi
byt v dll a potom v aplikacii definujes taketo nieco ako SetWindowsHookEx.
inac tu je asi na to cely priklad ak nieje full skus to domysliet nieje to
take takze, ked som zvladol ja :)
http://www.infojet(tec)cz/program/delphi/tips/tip0003.html
Robo
> Zdarvim Vsechny Pany programatory,
> chci se zeptat jestli nekdo neresil odchytavani klaves v systemech
> w9x a NT potreboval bych nakopnout {Pripadne nejaky zdrojacek}
> Nasel jsem neco jako KeySpy v 2.8 na tory.net ale to nechodi pod nt
> nevite nekdo o nejake dll-ce nebo komponente ??
> Predem diky
> Jiri Betunak.
> DElphi5,WinXP SP1
>
>
>Dokumenty vs. DB
[*] rkonecny <rkonecny(zv)datis(tec)cz> - 4.8.2003 15:53:25
Ahoj,
zkousel jsem do DB (FB 1.5) -do BLOBu ukladat soubory a potom je
nacitat - obe akce pomoci TfileStream. Pokud jde o soubory txt, jpg,
pdf, pak je vse v poradku. Jakmile se ale jedna o dokumenty MS
(konkretne Word), pak se pouze spusti Word a zahlasi mi, ze nemuze najit
konvertor pro AmiPro. Z meho pohledu jen nevi, co by mi mel nahlasit aby
mi sdelil, ze dokument z nejakeho duvodu neotevre. Neuspel jsem, ani
kdyz jsem dokument z DB nacetl do TstringListu a ulozil jako soubor na
disk.
Muzete mi nekdo poradit, jak tyhle veci resite?
D 7 Prof, WinXP, FB 1.5
Roman Konecny
StretchBlt
[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 4.8.2003 14:35:20
Myslel jsem jiny operacni system (Win98, WinXP), jine aplikace (jeden ma
napr. Office, druhy nema), apod. Ukazu s cim bojuji:
horsi kvalita:
http://www.mujautobazar(tec)cz/.data/car.images/9ib0u2go91g70_1.jpg
lepsi kvalita:
http://www.mujautobazar(tec)cz/.data/car.images/ep02n99o4emi9_1.jpg
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, August 04, 2003 2:21 PM
Subject: Re: StretchBlt
> From: "Jiri Sedivec" <jsedivec(zv)mail(tec)cz>
> > Rad bych se Vas zeptal, jestli mate nekdo zkusenosti s funkci
StretchBlt. U
> > ruznych pocitacu pracuje s grafikou dost rozdilne. Lze tohle nejak
> > sjednotit?
>
> Co je to rozdilne a na jake zarizeni ?
>
> Petr Vones
>
>Problem so zapisovanim/citanim hodnot z memory str
[*] Peter Sulek <psulek(zv)seznam(tec)cz> - 4.8.2003 14:39:21
Zdravim,
Moj kolega ma takyto problem:
cez fcie GlobalAlloc, GlobalLock, ... a nasledne TMemoryStream.WriteBuffer
zapisuje ziskane data z GlobalLock. Neskor chce nacitat data z tohoto
TMemoryStream. Na WinNT(2000, XP) to funguje bez problemov, avsak problem je
na systemoch Win9x.
// zapisovacia fcia
procedure CopyToClipboard(AMemStream : TMemoryStream; ASize : LongInt);
var ClipMemHandle : THandle;
DataPtr : pointer;
begin
ClipMemHandle := GlobalAlloc(GMEM_MOVEABLE, ASize);
try
DataPtr := GlobalLock(ClipMemHandle);
try
AMemStream.Seek(0, 0);
AMemStream.Read(DataPtr^, ASize);
ClipBoard.Open;
ClipBoard.SetAsHandle(CF_ObjectFE, ClipMemHandle);
ClipBoard.Close;
AMemStream.Free;
finally
GlobalUnlock(ClipMemHandle);
end;
except
GlobalFree(ClipMemHandle);
{ error }
end;
end;// fcia na citanie
procedure GetFromClipboard(var AMemStream : TMemoryStream; var ASize :
LongInt);
var ClipMemHandle : THandle;
DataPtr : pointer;
ptr : PChar;
Size : Integer;
begin
ASize := 0;
try
ClipMemHandle := ClipBoard.GetAsHandle(CF_ObjectFE);
if ClipMemHandle = 0
then
exit;
ASize := GlobalSize(ClipMemHandle);
AMemStream := TMemoryStream.Create;
AMemStream.SetSize(ASize);
AMemStream.Seek(0, 0);
DataPtr := GlobalLock(ClipMemHandle);
try
AMemStream.Write(DataPtr^, ASize);
finally
GlobalUnlock(ClipMemHandle);
AMemStream.Seek(0, 0);
end;
except
{ error }
end;
end;
Teraz ked chcem zo streamu nacitat data:
var
LHeightBranch: word;
LBranch: byte;
NClass: string;
begin
MemoryStream.Seek(0, 0);
MemoryStream.Read(LHeightBranch, SizeOf(LHeightBranch));
MemoryStream.Read(LBranch, SizeOf(LBranch));
MemoryStream.Read(NClass, SizeOf(NClass));
hodnoty vsetkych 3 premennych su nacitane chybne. Pri premennej
LHeightBranch je nacitana hodnota 60(zapisana bola 378). Pri premennej
LBranch je nacitana hodnota 84(zapisana bola 2). Pri premennej NClass je
nacitana hodnota ''(prazdny string)(zapisana bola hodnota 'TObjectText')StretchBlt
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.8.2003 14:21:19
From: "Jiri Sedivec" <jsedivec(zv)mail(tec)cz>
> Rad bych se Vas zeptal, jestli mate nekdo zkusenosti s funkci StretchBlt. U
> ruznych pocitacu pracuje s grafikou dost rozdilne. Lze tohle nejak
> sjednotit?
Co je to rozdilne a na jake zarizeni ?
Petr Vones
FastReport - postupne nacitavanie dat
[*] delphinpp(zv)seznam(tec)cz - 4.8.2003 14:31:20
Zdar !
...neviete niekto, ci je mozne vo FastReporte okamzite zobrazit
spracovane
data a zvysne data priebezne docitavat, tak ako to funguje pri
nahlade napr.
v QReporte alebo v MS Worde?
Teraz sa pri spracovani dat zobrazi dialogove okno "Preparing
report",
spracuju sa vsetky data a az potom sa zobrazi nahlad celeho
reportu..chcel
by som priebezne zobrazovat spracovane data..
Dik
FR2.46,D6
StretchBlt
[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 4.8.2003 14:17:18
Rad bych se Vas zeptal, jestli mate nekdo zkusenosti s funkci StretchBlt. U
ruznych pocitacu pracuje s grafikou dost rozdilne. Lze tohle nejak
sjednotit?
Jiri
Pohyb po DBGridu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 4.8.2003 14:11:18
> Na formulari mam DBGrid a Edit (ne DBEdit). mam nejakou funkci, ktera
> mi, kdyz kliknu mysi na nejakem radku na DBGridu vyvola OnCellClick a
> v Editu se mi zobrazi aktualni data. Parada. Pokud ale chci, aby toto
> fungovalo i na klavesy, musim pouzit OnKeyDown u DBGridu a vyjmenovat
> tam ruzne varianty (sipka dolu, nahoru, PageUp atd.) ?
Ahoj,
sice to muzes resit pomoci OnCellClick a OnKeyDown, ale pujde o principialne
nespolehlive reseni v tom smyslu, ze za urcitych okolnosti si obsah radku v gridu a
obsah editu nebudou odpovidat. Napada me treba pri pouziti kolecka mysi, nebo pri
programovem posunu v datasetu (volani Next, Locate apod.). A dale - jsi si jist, ze
nezapomenes na nejakou klavesovou kombinaci? Treba CTRL+HOME, CTRL+END
apod.
Jak uz rekli kolegove, principialne sprvne reseni je delat to v udalosti AfterScroll
datasetu, nebot ta se vyvola po kazde zmene aktivniho radku v datasetu (bez ohledu
na grid, tj. nenastava to pri pohybu v gridu doleva a doprava, protoze tento druh
pohybu dataset nezajima.
David Lebeda
Pohyb po DBGridu
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 4.8.2003 13:43:16
Parada, diky...
V.
-----Original Message-----
From: Jiri Virt [mailto:virt(zv)volny(tec)cz]
Sent: Monday, August 04, 2003 1:05 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Pohyb po DBGridu
procedure DBGrid1.KeyDown(var Key: Word; Shift: TShiftState);
begin
case Key of
VK_DELETE: ...
VK_HOME : ...
VK_END: ...
end;
Jirka
KeyHook ?
[*] KinDRik <kindrik(zv)centrum(tec)cz> - 4.8.2003 13:29:14
Zdarvim Vsechny Pany programatory,
chci se zeptat jestli nekdo neresil odchytavani klaves v systemech
w9x a NT potreboval bych nakopnout {Pripadne nejaky zdrojacek}
Nasel jsem neco jako KeySpy v 2.8 na tory.net ale to nechodi pod nt
nevite nekdo o nejake dll-ce nebo komponente ??
Predem diky
Jiri Betunak.
DElphi5,WinXP SP1
Pohyb po DBGridu
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 4.8.2003 13:29:14
> Behalf Of LUKES Vaclav
>
> Pokud ale chci, aby toto fungovalo i na klavesy, musim pouzit
> OnKeyDown u DBGridu a vyjmenovat tam ruzne varianty (sipka dolu,
> nahoru, PageUp atd.) ?
>
Ahoj, zkus pres udalosti OnColEnter, OnColExit.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
Rezim spanku
[*] Jiri Dymak <dymak(zv)volny(tec)cz> - 4.8.2003 13:49:16
Zdravim Delphiny
Prosim o radu s timto problemem.
Potrebuji ve svem programu odchytit udalost pred prechodem pocitace do rezimu
spanku (hybernace) a posleze odchytit udalost po probuzeni. Potreboval bych
take eventuelne hybernaci pozdrzet, nez ve svem programu neco zaridim.
Win XP-Prof, Delphi 5 prof, 7 pers.
Za vsechny prispevky diky
Jirka
Pohyb po DBGridu
[*] Borkovec Software Info <info(zv)borkovec(tec)com> - 4.8.2003 13:39:15
Neni lepsi pres AfterScroll DataSetu aktualizovat ten edit?
RB
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of LUKES Vaclav
Sent: Monday, August 04, 2003 12:53 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Pohyb po DBGridu
Ahoj,
mam D6 a Win2000 a prosim o radu.
Na formulari mam DBGrid a Edit (ne DBEdit). mam nejakou funkci, ktera mi,
kdyz kliknu mysi na nejakem radku na DBGridu vyvola OnCellClick a v Editu se
mi zobrazi aktualni data. Parada.
Pokud ale chci, aby toto fungovalo i na klavesy, musim pouzit OnKeyDown u
DBGridu a vyjmenovat tam ruzne varianty (sipka dolu, nahoru, PageUp atd.) ?
Diky
V.Pohyb po DBGridu
[*] Barica Miroslav <miroslav.barica(zv)matador.sk> - 4.8.2003 13:37:15
>Na formulari mam DBGrid a Edit (ne DBEdit). mam nejakou funkci, ktera
mi, kdyz kliknu mysi na nejakem radku na DBGridu vyvola OnCellClick a v
Editu se mi
>zobrazi aktualni data. Parada.
>Pokud ale chci, aby toto fungovalo i na klavesy, musim pouzit OnKeyDown
u DBGridu a vyjmenovat tam ruzne varianty (sipka dolu, nahoru, PageUp
atd.) ?
a co tak event TDataSource.OnDataChange?Automaticka instalace ovladace
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 4.8.2003 13:13:13
no, kuprikadu ve win9x stacilo do adresare c:\windows\inf\other (tusim ze
other, nebo oem) pridat pozadovany INF soubor.
na win2k se ove inf soubory pridavaji do c:\winnt\inf\oemXXX.inf, kde XXX
je poradove cislo po sobe.
zcela jiste na to existuje nejaka funknce jak to pridat.
kuprikladu mam hw klic HASP, ktery toto presne dela - pokud nenajde
ovladac, nainstaluje jej.
doporucuji si stahnout HASP CD a podivat se tam - jsou tam ukazky jak na to
i v Delphi - www.eAladdin.com
>4.8.2003 delphin(zv)post(tec)cz:
> > To neni to prave orechove.
> > Zrovna jsem instaloval nove Via 4in1 a to funguje tak jak chci, tj. spusti
> > se nejaky exac, ten neco udela a pri detekci zarizeni windows jiz ovladac
> > zna a nainstaluje ho bez nutnosti interakce s uzivatelem. Akorat nemuzu
> > prijit na to, jak to delaji.
>
>A co je na tom tezkeho ?
>Z regisru zjisti, zda jej jiz ovladac nainstalovat, popr. s jakou
>konfiguraci se instalovalo posledni 4in1 a provedou stejnou instalaci.
>Kontrolu verzi DLL provadi instalacni program.
>
>--
>Jan Fiala
>mailto:jan.fiala(zv)wo(tec)cz
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Pohyb po DBGridu
[*] Jiri Virt <virt(zv)volny(tec)cz> - 4.8.2003 13:05:12
procedure DBGrid1.KeyDown(var Key: Word; Shift: TShiftState);
begin
case Key of
VK_DELETE: ...
VK_HOME : ...
VK_END: ...
end;
Jirka
Pohyb po DBGridu
[*] martin.ben(zv)ge(tec)com - 4.8.2003 13:05:12
A nebylo by lepsi povesit tu udalost na AfterScroll prislusneho datasetu?
Martin Ben
-----Original Message-----
From: LUKES Vaclav [mailto:lukes(zv)ans(tec)cz]
Na formulari mam DBGrid a Edit (ne DBEdit). mam nejakou funkci, ktera mi,
kdyz kliknu mysi na nejakem radku na DBGridu vyvola OnCellClick a v Editu se
mi zobrazi aktualni data. Parada.
Pokud ale chci, aby toto fungovalo i na klavesy, musim pouzit OnKeyDown u
DBGridu a vyjmenovat tam ruzne varianty (sipka dolu, nahoru, PageUp atd.) ?
Pohyb po DBGridu
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 4.8.2003 12:53:11
Ahoj,
mam D6 a Win2000 a prosim o radu.
Na formulari mam DBGrid a Edit (ne DBEdit). mam nejakou funkci, ktera mi, kdyz kliknu mysi na nejakem radku na DBGridu vyvola OnCellClick a v Editu se mi zobrazi aktualni data. Parada.
Pokud ale chci, aby toto fungovalo i na klavesy, musim pouzit OnKeyDown u DBGridu a vyjmenovat tam ruzne varianty (sipka dolu, nahoru, PageUp atd.) ?
Diky
V.
Sluzba IB ver. FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 4.8.2003 10:23:02
Haj hou!
On 4 Aug 2003 at 8:46, rkonecny wrote:
> nemate nekdo zkusenost se soucasnym behem dvou sluzeb - IB 6 a
> FB 1.5? Lze oba enginy provozovat bez problemu na jednom serveru? Ja to
> bohuzel nemuzu zjistit, protoze mi jiz bezi FB 1.5 a nemohu si dovolit
> vypadek a dodavatel aplikace trva na IB 6.
S Windows nemam nejaktualnejsi zkusenost, ale jit by to melo. Na Linuxu to neni
problem. Je treba instalovat do odlisnych adresaru, pro 1.5 nastavit jine jmeno
sluzby s jinym portem (viz config), a vyresit pro klienty pripojeni pres dany
port/sluzbu a zajistit pouziti spravne klientske knihovny (napr. nakopirovat do
adresare aplikace).
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Automaticka instalace ovladace
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 4.8.2003 09:04:57
4.8.2003 delphin(zv)post(tec)cz:
> To neni to prave orechove.
> Zrovna jsem instaloval nove Via 4in1 a to funguje tak jak chci, tj. spusti
> se nejaky exac, ten neco udela a pri detekci zarizeni windows jiz ovladac
> zna a nainstaluje ho bez nutnosti interakce s uzivatelem. Akorat nemuzu
> prijit na to, jak to delaji.
A co je na tom tezkeho ?
Z regisru zjisti, zda jej jiz ovladac nainstalovat, popr. s jakou
konfiguraci se instalovalo posledni 4in1 a provedou stejnou instalaci.
Kontrolu verzi DLL provadi instalacni program.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Automaticka instalace ovladace
[*] delphin(zv)post(tec)cz - 4.8.2003 08:56:56
> Kedysi som videl instalacny program k nejakej grafickej karte a tam to
mali
> urobene cez posielanie sprav oknam. Vyzeralo to tak, ze sa zobrazil napis,
> aby pouzivatel nerobil nic s mysou ani klavesnicou a potom to "klikalo" za
> neho. Nie ze by som niekomu navrhoval urobit to prave takto, vyzera to
totiz
> dost smiesne a nie je ten "spravny" postup ale keby si si uz nevedel
poradit
> inac.
To neni to prave orechove.
Zrovna jsem instaloval nove Via 4in1 a to funguje tak jak chci, tj. spusti
se nejaky exac, ten neco udela a pri detekci zarizeni windows jiz ovladac
zna a nainstaluje ho bez nutnosti interakce s uzivatelem. Akorat nemuzu
prijit na to, jak to delaji.Sluzba IB ver. FB
[*] rkonecny <rkonecny(zv)datis(tec)cz> - 4.8.2003 08:46:55
Ahoj,
nemate nekdo zkusenost se soucasnym behem dvou sluzeb - IB 6 a
FB 1.5? Lze oba enginy provozovat bez problemu na jednom serveru? Ja to
bohuzel nemuzu zjistit, protoze mi jiz bezi FB 1.5 a nemohu si dovolit
vypadek a dodavatel aplikace trva na IB 6.
Dekuji za jakoukoliv odpoved
Roman Konecny
Formatovani diskety
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 3.8.2003 22:16:16
> 1) jak naformatovat disketu
funkce ShFormatDrive (ShellAPI)(shell32.dll)
function ...(HWND, Drive: Word, fmtID: Word, Options: Word);
> 2) jak naformatovat disketu a dat ji label
naformatuj a pak label
a nebo nejak s tema Options u ShFormatDrive, nikdy jsem to moc
nestudoval.
> 3) jak dat diskete label
SetVolumeLabel('A:\', 'Label')
Jiri Cincura
mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
http://www.cincura.net/
Delphi 7, WinXP HE
==
Znate program Woman? Ne? Podivejte se na www.cincura.net, kde se dozvite
vice.Formatovani diskety
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 3.8.2003 22:02:05
Zdravim
1) jak naformatovat disketu
2) jak naformatovat disketu a dat ji label
3) jak dat diskete label
Win2000, Delphi 5 prof.
Diky za radu
Viktor Marek
viktor(zv)mbox.vol(tec)cz
Formatovani diskety
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 3.8.2003 22:16:10
> 1) jak naformatovat disketu
funkce ShFormatDrive (ShellAPI)(shell32.dll)
function ...(HWND, Drive: Word, fmtID: Word, Options: Word);
> 2) jak naformatovat disketu a dat ji label
naformatuj a pak label
a nebo nejak s tema Options u ShFormatDrive, nikdy jsem to moc
nestudoval.
> 3) jak dat diskete label
SetVolumeLabel('A:\', 'Label')Tisk z Kylix aplikace
[*] Zdenek Telicka <telda(zv)raz-dva(tec)cz> - 2.8.2003 18:32:23
Hezky den,
Zkousel jsem tisknout z aplikace udelane v Kylix Trial, ale nedari se mi
to. Funguje Printer.ExecuteSetup, rovnes Printer.Printers mi vrati jmeno
tiskarny, ale jakmile zavolam Printer.EndDoc, zobrazi se chybova zprava
SIGPIPE (13). Nevite co to znamena?
Dekuji za rady.
S pozdravem
Zdenek Telicka
My SQL - komponenty + JEDI ?
[*] Zdenek Telicka <telda(zv)raz-dva(tec)cz> - 2.8.2003 14:36:08
Pro Kylix Open je ke stazeni sada databazovych komponent, snad by to
mohlo byt i pro Delphi. Ja to v Kylixu zkousel se Zeos, ale v MDK Linuxu
mi Zeos asi nefunguji, nepripojil jsem se ani k Firebird, ani k MySQL.
Zdenek Telicka
chemix wrote:
>To mas pravdu v tech personalech neni s DB absolutne nic ;( a celkem me to mrzi...
>a tak hledam jakoukoli nahradu ... jedine co jsem zatim nasel je pouzivani
>samotne TMySQL ... ale chtelo by to neco lepsiho ;)
>a tak by me zajimalo jestli by nebylo neco treba v Jedi VCL ... ale aby to
>nepotrebovalo nic z puvodnich Delphi databazovejch komponent?
>
>
>
><<<<<<<<<<<<<<<<<
>
>JM> Zrejme to asi nepujde obejit, D7 Personal ma nejake (asi dost vyrazne)
>JM> omezeni prace s databazemi, takze je dost mozne ze ZeosDB potrebuje nektere
>JM> unity, ktere tam nejsou. Ja je pouzivam v D6 Prof, kde to jde bez problemu.
>
>JM> Jirka Matejka
>
>
>
>
>>>Mam Delphi 7 personal edition a zkousel jsem instalovat zminene Zeos
>>>DBO vsechny komponenty az na jednu tu posledni mi sli nainstalovat v
>>>pohode ale ta nejdulezitejsi Zcomponents potrebuje "dbrtl" ... a
>>>obavam se ze tohle v personalech opravdu nenajdu :( existuje neco jak
>>>tohle obejit ???
>>>
>>><<<<<<<<<<<<<<<<<
>>>
>>>
>>>
>>>>Docela dobre jsou ZeosDBO:
>>>>http://zeoslib.sourceforge.net/zeos_zdo_main.php. Umi nejen MySQL
>>>>ale i radu dalsich databazi.
>>>>
>>>>
>>>>Jirka Matejka
>>>>
>>>>
>>>
>>>
>>>>>Zdravim,
>>>>>
>>>>>Pro My SQL jake jsou dobre komponenty ?
>>>>>
>>>>>Frantisek Stranik
>>>>>
>>>>>
>>>
>>>
>>>
>>><<<<<<<<<<<<<<<<<
>>>MAKEUP//KOMIX//
>>>
>>>
>
>
>
><<<<<<<<<<<<<<<<<
>MAKEUP//KOMIX//
>
>
>
>
Automaticka instalace ovladace
[*] Martin Cajbik <cajbik(zv)sct.sk> - 1.8.2003 19:04:56
Kedysi som videl instalacny program k nejakej grafickej karte a tam to mali
urobene cez posielanie sprav oknam. Vyzeralo to tak, ze sa zobrazil napis,
aby pouzivatel nerobil nic s mysou ani klavesnicou a potom to "klikalo" za
neho. Nie ze by som niekomu navrhoval urobit to prave takto, vyzera to totiz
dost smiesne a nie je ten "spravny" postup ale keby si si uz nevedel poradit
inac.
Martin Cajbik
> Mam jiste hw zarizeni, ktere windows normalne neznaji a k nemu ovladac. Da
> se nejak programove pridat ovladac do windows jeste predtim, nez se
pripoji
> zarizeni k PC ?
>
> Jedna se mi o to, ze kdyz se zarizeni poprve pripoji k PC, tak to chce
> proklikat nekolik oken, zadat spravne cestu atd..., coz drtiva vetsina BFU
> nezvladne spravne a proto by bylo idealni kdyby windows jiz ovladac znaly
a
> neptaly se.
>
> Potrebuju to hlavne pro W98 a W2K.
>
> Diky Delphin
>
>
>Automaticka instalace ovladace
[*] delphin(zv)post(tec)cz - 1.8.2003 17:12:48
Mam jiste hw zarizeni, ktere windows normalne neznaji a k nemu ovladac. Da
se nejak programove pridat ovladac do windows jeste predtim, nez se pripoji
zarizeni k PC ?
Jedna se mi o to, ze kdyz se zarizeni poprve pripoji k PC, tak to chce
proklikat nekolik oken, zadat spravne cestu atd..., coz drtiva vetsina BFU
nezvladne spravne a proto by bylo idealni kdyby windows jiz ovladac znaly a
neptaly se.
Potrebuju to hlavne pro W98 a W2K.
Diky Delphin
AddIn pro MS Outlook
[*] spisiak <spisiak(zv)zoznam.sk> - 1.8.2003 16:08:44
Ahoj na
www.slipstick.com je priklad vola sa PaulAddIn
KaSi
----- Original Message -----
From: "Sommer Pavel" <psommer(zv)cpoj(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 01, 2003 2:44 PM
Subject: AddIn pro MS Outlook
> Resil jste nekdo nekdy problem %subj% ?
> Potreboval bych napsat AddIn pro MS Outlook, a nevim, jak to lze (jestli
> lze) udelat v Delphi.
> Delphi nenaimportuje ani typelib Microsoft AddIn Designer.
>
> Diky
> PS
>
> AddIn pro MS Outlook
[*] Sommer Pavel <psommer(zv)cpoj(tec)cz> - 1.8.2003 15:28:42
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
>>From: "Sommer Pavel" <psommer(zv)cpoj(tec)cz>
>> Potreboval bych napsat AddIn pro MS Outlook, a nevim, jak to lze
>> (jestli
>> lze) udelat v Delphi.
>> Delphi nenaimportuje ani typelib Microsoft AddIn Designer.
>
>Pokud jsi uzivatelem Delphi 7 tak si po registraci muzes stahnout
wizard:
>
>Microsoft Office COM Add-In Wizard generates a skeleton project for
Borland Delphi versions 5, 6, and 7 implementing Microsoft Office COM
Add-Ins. The wizard supports Microsoft Office applications of versions
2000 and XP.
>
>Petr Vones
Tak to bohuzel nejsem (uzivatelem D7). Existuje nejake rozumne reseni
pro D5 ?
PS
AddIn pro MS Outlook
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.8.2003 15:12:40
From: "Sommer Pavel" <psommer(zv)cpoj(tec)cz>
> Potreboval bych napsat AddIn pro MS Outlook, a nevim, jak to lze (jestli
> lze) udelat v Delphi.
> Delphi nenaimportuje ani typelib Microsoft AddIn Designer.
Pokud jsi uzivatelem Delphi 7 tak si po registraci muzes stahnout wizard:
Microsoft Office COM Add-In Wizard generates a skeleton project for Borland
Delphi versions 5, 6, and 7 implementing Microsoft Office COM Add-Ins. The
wizard supports Microsoft Office applications of versions 2000 and XP.
Petr Vones
AddIn pro MS Outlook
[*] Sommer Pavel <psommer(zv)cpoj(tec)cz> - 1.8.2003 14:44:38
Resil jste nekdo nekdy problem %subj% ?
Potreboval bych napsat AddIn pro MS Outlook, a nevim, jak to lze (jestli
lze) udelat v Delphi.
Delphi nenaimportuje ani typelib Microsoft AddIn Designer.
Diky
PS
Obarveni komponent na TPanel
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 1.8.2003 15:10:40
Vsem diky za rady...
V.
-----Original Message-----
From: Jakub Dusek [mailto:delphi(zv)corexpert.com]
Sent: Friday, August 01, 2003 2:45 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Obarveni komponent na TPanel
Mrkni se na dokumentaci k GetPropInfo, SetEnumProp atd. v unite
TypInfo. Priblizne to jde takhle, ale pisu to z hlavy:
var PropInfo : PPropInfo;
begin
PropInfo := GetPropInfo(Form1.Controls[0].ClassInfo, 'Color');
if PropInfo <> nil then
SetEnumProp(Obj, PropInfo, 'clRed');
end;
Dalsi moznost je v tom ze property Color je uz v TControl, jen je v
Private, staci vytvorit potomka a vytahnout ji na svetlo:
TColorControl = class(TControl)
public
property Color;
end;
Potom staci pretypovat:
TColorControl(Form1.Controls[0]).Color := clRed;
Timhle zpusobem se to ale zbytecne nastavuje i pro potomky TControl,
ktere TColor nemaji v published nebo public, cili to nepouzivaji...
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Friday, August 1, 2003, 2:24:36 PM, you wrote:
LV> Diky za radu, ale vubec nic mi to nerika... Muzes me prosim nakopnout ?
LV> V.
Obarveni komponent na TPanel
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 1.8.2003 14:44:38
Mrkni se na dokumentaci k GetPropInfo, SetEnumProp atd. v unite
TypInfo. Priblizne to jde takhle, ale pisu to z hlavy:
var PropInfo : PPropInfo;
begin
PropInfo := GetPropInfo(Form1.Controls[0].ClassInfo, 'Color');
if PropInfo <> nil then
SetEnumProp(Obj, PropInfo, 'clRed');
end;
Dalsi moznost je v tom ze property Color je uz v TControl, jen je v
Private, staci vytvorit potomka a vytahnout ji na svetlo:
TColorControl = class(TControl)
public
property Color;
end;
Potom staci pretypovat:
TColorControl(Form1.Controls[0]).Color := clRed;
Timhle zpusobem se to ale zbytecne nastavuje i pro potomky TControl,
ktere TColor nemaji v published nebo public, cili to nepouzivaji...
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Friday, August 1, 2003, 2:24:36 PM, you wrote:
LV> Diky za radu, ale vubec nic mi to nerika... Muzes me prosim nakopnout ?
LV> V.Jednoznacny identifikator (autoincrement?) - teore
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 1.8.2003 14:54:39
On 1 Aug 2003 at 13:52, Vlko II. wrote:
> Chcel by som nastolit otazku cisto teoretickeho razu, co pouzivat ako
> jednoznacny identifikator v previazanych tabulkach. Doteraz som bol v
> presvedceni, ze sa na to hodi autoincrementovaci typ.
Pokud potrebujes v tabulce pouze sledovat se kterym radkem pracujes,
a nejsou pres tento klic zadne vazby nikam jinam, pak je
autoinkrement naprosto vyhovujici. Pokud chces tento klic pouzit na
referencni vazby, pak je vhodnejsi treba timestamp - a to kvuli
moznosti, abys mohl treba databazi stahnout, a prenest k sobe na
testovani, kdyby nic jineho. Pokud byt jen hrozi potencialni moznost,
ze se tabulka bude replikovat s jinymi databazemi, pak povazuji za
nejlepsi guid.
S pozdravem
Zbysek Hlinka
Jednoznacny identifikator (autoincrement?) - teore
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 1.8.2003 14:08:34
FB/IB:
Pouzij generatory, ale ne tak jak je uvedeno v manualu, ale takto:
1. Samostatne ziskej hodnotu generatoru
2. Pouzij tuto hodnotu pro insert + dalsi operacu (inserty do jinych tabulek).
Generatory v IB/FB jsou NADTRANSAKCNI, tj. neplati na ne transakce
a jsou atomicke -> hodnota generatoru je unikatni, neni treba vymyslet
cokoliv jineho.
Slavek
> nej by som zistil po inserte aj dany id a vratil ho ako hodnotu stored
> procedury. Myslim, ze by sa medzi to v ramci paralelizmu db nastroja,
> transakcii a pod nijaky insert nevosiel. A tu mam otazku, je to skutocne
> spravne riesenie, alebo sa moze stat, ze pocas vykonavania stored procedury
> sa moze vykonat na danej tabulke dalsi insert? Staci mi len db servery
> MySQL, PostgreSQL, Interbase(Firebird).Obarveni komponent na TPanel
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 1.8.2003 14:34:37
>> Potom pomoci RTTI.
> Diky za radu, ale vubec nic mi to nerika... Muzes me prosim
> nakopnout ?
Color je deklarovana uz v TControl (aj ked protected), takze sa to da aj bez
RTTI:
type
THackControl = class(TControl);
for I := 0 to Panel1.ControlCount - 1 do
THackControl(Panel1.Controls[I]).Color := clRed;
HTH
TOndrej
Frame - odkaz na jinou unitu
[*] jimys1(zv)centrum(tec)cz - 1.8.2003 14:32:37
Ahoj,
mam frame a v nem DBChart. Ve frame u DBChartu nastavim u Serie
datasource na datovy zdroj umisteny ve formulari, kde pak frame
pouzivam. Z jistych duvodu ho musim nastavit ve frame a ne az na
formu, ve kterem frame pouzivam (za behu dynamicky frame vytvarim).
Vse vypada v poho, jenze kdyz aplikaci ulozim, vse zavru a znovu
aplikaci otevru, u serii zmizi datasourcy....
Neporadi mi nekdo, proc to mizi?
Diky
Jirka
--------------------
SAZAVAFEST 2003 - benefice na podporu vozickaru! 3 hudebni sceny & divadelni stan, pres 80 ucinkujicich z CR i zahranici! 1. - 2. 8. 2003, areal Ostrov, Sazava http://www.sazavafest(tec)cz
Obarveni komponent na TPanel
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 1.8.2003 14:24:36
Diky za radu, ale vubec nic mi to nerika... Muzes me prosim nakopnout ?
V.
-----Original Message-----
From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
Sent: Thursday, July 31, 2003 2:53 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Obarveni komponent na TPanel
From: "LUKES Vaclav" <lukes(zv)ans(tec)cz>
> A co ldyz mam na Panel1 i jine komponenty, treba TMaskEdit a pod. a ja bych
> chtel obarvit vsechny, ktere jsou na Panelu ?
Potom pomoci RTTI.
Petr Vones
TEMP adresar
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 1.8.2003 14:14:35
Podle me te funkci vadi spis to *.tmp, pokud vim tak podporuje pouze
prime zadani souboru bez wildcard.
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Friday, August 1, 2003, 1:48:18 PM, you wrote:
VZ> opstruct.pFrom:=PChar(StrPas(Buff)+'*.tmp');STARTEAM
[*] martin.ben(zv)ge(tec)com - 1.8.2003 14:14:35
StarTeam jsme zacali v tomto roce pouzivat a zatim, alespon co ja vim,
pracuje vcelku dobre.
V cem je napsany server nevim, ale klient nevypada na Javu. Vzhled,
ovladani, rychlost prace apod.
odpovidaji standardum MS. Ma plug-iny do Delphi a PL/SQL Developeru, ktere
pouzivame.
Verzovat se v nem daji jakekoliv soubory, takze jej pouzivame i nekterou
dokumentaci.
O cene mluvit nemuzu, u toho jsem nebyl. U nas vysel jako vitez vyberoveho
rizeni.
Ja osobne bych si jej asi vybral, ale bude zalezet na cene a porovnani s
jinymi produkty.
Martin Ben
-----Original Message-----
From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
From: "Rastislav Lazan" <lazan(zv)davidplus.sk>
> Pouzivate niekto BORLAND STARTEAM? Oplati sa to kupit? Ake s tym mate
> skusenosti? A ako to zhruba funguje?
Udajne se da nekde stahnout 30 denni trial, ale bude to asi dost draha
zalezitost. Navic je to tusim psane v Jave :-/
TEMP adresar
[*] Peter Ondras <peter.ondras(zv)pse.sk> - 1.8.2003 14:08:35
Skor mu vadi nejaky subor, ktory ma otvoreny nejaky program. Predtym ako
zacnes svojim programom premazavat TEMP, tak sa presvedc, z esu zavrete
vsetky programy (aj ked ani to ti nemusi hned pomoct, pretoze su este
procesy...)
Peter Ondras - www.ondras.sk
peter.ondras(zv)pse.sk
(+421) 0904 421 925
>: No, ja chci hvezdickovou konveci promazat soubory v tom tempu. Delam
to
>: takhle:
:
>: A program ohlasi chybu: "Ze zdrojoveho souboru nebo disku nelze
cist". Ja
>: jsem myslel, ze mu vadi prave ta "zvlnkovatela" cesta k souboru....
Spojovani menu podruhe
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 1.8.2003 14:02:29
Ahoj,
D5Ent, W2K.
Potrebuji vyresit problem spojovani menu parent a child MDI formu. Protoze
se ji nepodarilo najit zpusob, jak zabranit prepsani polozek puvodniho menu
parent MDI formu pri aktivaci child MDI formu polozkami se stejnym
GroupIndexem z childa, rozhodl jsem se to udelat takto:
1. Na child formu budou v MainMenu jen ty polozky, ktere v nejvyssi urovni
parenta nejsou, protoze ty se doplni/odstrani samy pri aktivaci/deaktivaci
child formu.
2. Polozky, ktere se maji doplnit do stavajicich submenu, se do menu parent
MDI formu doplni v udalosti OnActivate child formu, a odstrani se v udalosti
OnDeactivate.
3. Jako kontejner pro "rucne" doplnovane polozky pouziji TPopupMenu, pro
identifikaci, kam a v jakem poradi se doplnovane polozky vlozi, pouziji
GroupIndex.
Prosim kolegy, kteri se podobnou upravou menu uz zabyvali, o nazor a
upozorneni na pripadne problemy.
Dekuji
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
TEMP adresar
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.8.2003 13:52:28
From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> A program ohlasi chybu: "Ze zdrojoveho souboru nebo disku nelze cist". Ja
> jsem myslel, ze mu vadi prave ta "zvlnkovatela" cesta k souboru....
No to je asi proto, ze za behu systemu tam kdejaka aplikace ma otevreny soubor
a ten samozrejme nelze smazat. Od toho ten temp adresar je. Misto shell funkci
bych doporucoval spise klasicke funkce pro mazani souboru po jednom. V JCL je
funkce DelTree, stejne tak i GetWindowsTempFolder:
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195
Petr Vones
STARTEAM
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 1.8.2003 13:44:17
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 01, 2003 1:36 PM
Subject: Re: STARTEAM
> From: "Rastislav Lazan" <lazan(zv)davidplus.sk>
> > Pouzivate niekto BORLAND STARTEAM? Oplati sa to kupit? Ake s tym mate
> > skusenosti? A ako to zhruba funguje?
>
> Udajne se da nekde stahnout 30 denni trial, ale bude to asi dost draha
> zalezitost. Navic je to tusim psane v Jave :-/
>
> Petr Vones
>
Borland prave rozesilal akcni nabidku Standard edition za nejakych 12 kKc
Radim
Jednoznacny identifikator (autoincrement?) - teore
[*] Vlko II. <vlko(zv)zilina(tec)net> - 1.8.2003 13:52:23
Chcel by som nastolit otazku cisto teoretickeho razu, co pouzivat ako
jednoznacny identifikator
v previazanych tabulkach. Doteraz som bol v presvedceni, ze sa na to hodi
autoincrementovaci typ.
V predchadzajucej historii konferencie vidim, ze to ale nie je navhodnejsia
volba? Co teda odporucate?
Ja to mam v sucastnosti vyriesene tak (maly objem pridavanych udajov,
radovo 1,2 do minuty, trosku
zlozitejsi db system firmy u viacerych uzivatelov), ze zistim iba selectom
(onAfterInsert), z tanej tabulky max(id)...
Pripadne sa to da zistit nejakym inym volanim, ktorym zistim hodnotu
generatora.
V pripade, ze by bola poziadavka ohromneho poctu zadavanych udajov, by som
pouzil Stored Proceduru a v
nej by som zistil po inserte aj dany id a vratil ho ako hodnotu stored
procedury. Myslim, ze by sa medzi to v ramci paralelizmu db nastroja,
transakcii a pod nijaky insert nevosiel. A tu mam otazku, je to skutocne
spravne riesenie, alebo sa moze stat, ze pocas vykonavania stored procedury
sa moze vykonat na danej tabulke dalsi insert? Staci mi len db servery
MySQL, PostgreSQL, Interbase(Firebird).
Diky sa kazdu radu, ktora ma dovedie blizsie k idealu dobreho
programatora:)
Vlko
--
--------------
mail: vlko_(zv)pobox.sk web: http://vlko.zilina.net
TEMP adresar
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 1.8.2003 13:48:18
No, ja chci hvezdickovou konveci promazat soubory v tom tempu. Delam to
takhle:
procedure PromazTmp;
var
opstruct : _SHFILEOPSTRUCT ;
BuffLen : DWORD;
Buff : PChar;
begin
//cistka tempu
{
BuffLen := MAX_PATH+1;
GetMem(Buff,Bufflen);
try
if GetTempPath(BuffLen,Buff)<>0
then
begin
opstruct.Wnd:=0;
opstruct.wFunc:=FO_DELETE;
opstruct.pFrom:=PChar(StrPas(Buff)+'*.tmp');
opstruct.pTo:=nil;
opstruct.fFlags:=FOF_NOCONFIRMATION;
SHFILEOperation(opstruct);
end;
finally
FreeMem(Buff);
end;
A program ohlasi chybu: "Ze zdrojoveho souboru nebo disku nelze cist". Ja
jsem myslel, ze mu vadi prave ta "zvlnkovatela" cesta k souboru....
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 01, 2003 1:24 PM
Subject: Re: TEMP adresar
> From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> > Na W98 a WNT vse v poho(adresar "c:\temp"). Ale na WXP mi tato fce vraci
> > hodnotu "C:\Docume~1\Window~1.000\LOCAL~1\Temp\" a tato navratova
hodnota uz
> > dale nelze pouzit...........:((
>
> Jak neda pouzit ? To je naprosto spravne.
>
> Petr Vones
>
>
>
STARTEAM
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.8.2003 13:36:17
From: "Rastislav Lazan" <lazan(zv)davidplus.sk>
> Pouzivate niekto BORLAND STARTEAM? Oplati sa to kupit? Ake s tym mate
> skusenosti? A ako to zhruba funguje?
Udajne se da nekde stahnout 30 denni trial, ale bude to asi dost draha
zalezitost. Navic je to tusim psane v Jave :-/
Petr Vones
Zobrazenie vysledku z OLAP kocky
[*] Miroslav Hrosso <hrossik(zv)nrsys.sk> - 1.8.2003 13:18:15
Dobry,
Chcel by som sa opytat, ci niekto nema skusenosti so zobrazenim SELECTU z
OLAP kocky (MS OLAP 2000).
Ked to zobrazujem v komponente TDBGrid, tak textove hodnoty v riadkoch mi
nechce ukazat, lebo podla neho je to memo pole.
Neda sa ho nejako prinutit, aby to zobrazoval normalne. Alebo ci neexistuje
nejaka ina komponenta, kde by sa tento vysledok dal pekne precitat.
DELPHI 5Ent, WIN2000 SP4, IE6, MS OLAP 2000
Miro Hrosso
TEMP adresar
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 1.8.2003 13:18:15
Zdarvim vsechny,
zase ja a zase prosim o radu:
Pro zjisteni temp adresare pouzivam dle 1000+1 toto:
var
BuffLen : DWORD;
Buff : PChar;
function TempCesta:String;
begin
BuffLen := MAX_PATH+1;
GetMem(Buff,Bufflen);
try
if GetTempPath(BuffLen,Buff)<>0
then
Result := StrPas(Buff)
else
Result := '';
finally
FreeMem(Buff);
end;
end;
Na W98 a WNT vse v poho(adresar "c:\temp"). Ale na WXP mi tato fce vraci
hodnotu "C:\Docume~1\Window~1.000\LOCAL~1\Temp\" a tato navratova hodnota uz
dale nelze pouzit...........:((
Nevite jak jinak zjistit adrear TEMP?
Diky
Vlasta
TEMP adresar
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.8.2003 13:24:16
From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> Na W98 a WNT vse v poho(adresar "c:\temp"). Ale na WXP mi tato fce vraci
> hodnotu "C:\Docume~1\Window~1.000\LOCAL~1\Temp\" a tato navratova hodnota uz
> dale nelze pouzit...........:((
Jak neda pouzit ? To je naprosto spravne.
Petr Vones
DSPack
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 1.8.2003 11:50:09
> nainstaloval jsem si a uspesne pouzival DSPack 2.31. Po
> nejake dobe se pri startu Delphi 7 objevila hlaska
> Can't Load Package c:\...\DSPDesign_D7.bpl - nelze nale\t
> jeden z knihovnich souboru. A mel jsem po legraci. Zkusil
> jsem preinstalovat DirectX i DSPack.
> Vse probiha hladcw az do okamziku, kdy u DSPackDesign
> zvolim Install.
> Objevi se vyse uvedena hlaska. Compile probehne bez problemu.
> Nemate nekdo nejaky napad, jak z toho ven?
Mozno ten balicek staticky linkuje nejaku DLL, ktoru system nevie najst (bud
ju nemas alebo nie je v system PATH).
Pozri si skompilovanu .bpl v depends.exe alebo inom nastroji, ktory vie
zobrazit staticke importy. Potom si skontroluj, ci kazda z tych DLL existuje
na disku a cesta k nej je uvedena v system PATH.
HTH
TOndrej
DSPack
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 1.8.2003 11:38:09
Ahoj
nainstaloval jsem si a uspesne pouzival DSPack 2.31. Po nejake dobe se
pri startu Delphi 7 objevila hlaska Can't Load Package
c:\...\DSPDesign_D7.bpl - nelze nale\t jeden z knihovnich souboru. A mel
jsem po legraci. Zkusil jsem preinstalovat DirectX i DSPack. Vse probiha
hladcw az do okamziku, kdy u DSPackDesign zvolim Install. Objevi se vyse
uvedena hlaska. Compile probehne bez problemu. Nemate nekdo nejaky
napad, jak z toho ven?
Vaclav Sazima
Copy Excel to Word
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 1.8.2003 11:08:07
Ahoj,
jeste bych prosil o jednu radu. Tyka se to porad dynamickymu importu dat do
wordu, ale trosku jinak:
Jak vlozit vybranou(selected) cast z excelu do wordu? Uplne stejne, jako to
udelaji wokna pri pouziti woknowsky schranky?
Diky moc
Vlasta
D5, Office2000
My SQL - komponenty + JEDI ?
[*] chemix <makeup(zv)disconnect(tec)cz> - 1.8.2003 10:46:03
To mas pravdu v tech personalech neni s DB absolutne nic ;( a celkem me to mrzi...
a tak hledam jakoukoli nahradu ... jedine co jsem zatim nasel je pouzivani
samotne TMySQL ... ale chtelo by to neco lepsiho ;)
a tak by me zajimalo jestli by nebylo neco treba v Jedi VCL ... ale aby to
nepotrebovalo nic z puvodnich Delphi databazovejch komponent?<<<<<<<<<<<<<<<<<
JM> Zrejme to asi nepujde obejit, D7 Personal ma nejake (asi dost vyrazne)
JM> omezeni prace s databazemi, takze je dost mozne ze ZeosDB potrebuje nektere
JM> unity, ktere tam nejsou. Ja je pouzivam v D6 Prof, kde to jde bez problemu.
JM> Jirka Matejka
>> Mam Delphi 7 personal edition a zkousel jsem instalovat zminene Zeos
>> DBO vsechny komponenty az na jednu tu posledni mi sli nainstalovat v
>> pohode ale ta nejdulezitejsi Zcomponents potrebuje "dbrtl" ... a
>> obavam se ze tohle v personalech opravdu nenajdu :( existuje neco jak
>> tohle obejit ???
>>
>> <<<<<<<<<<<<<<<<<
>>
>>> Docela dobre jsou ZeosDBO:
>>> http://zeoslib.sourceforge.net/zeos_zdo_main.php. Umi nejen MySQL
>>> ale i radu dalsich databazi.
>>
>>> Jirka Matejka
>>
>>
>>>> Zdravim,
>>>>
>>>> Pro My SQL jake jsou dobre komponenty ?
>>>>
>>>> Frantisek Stranik
>>
>>
>>
>>
>>
>> <<<<<<<<<<<<<<<<<
>> MAKEUP//KOMIX//<<<<<<<<<<<<<<<<<
MAKEUP//KOMIX//Frame - odkaz na jinou unitu
[*] jimys1(zv)centrum(tec)cz - 1.8.2003 10:44:03
Ahoj,
mam frame a v nem DBChart. Ve frame u DBChartu nastavim u Serie
datasource na datovy zdroj umisteny ve formulari, kde pak frame
pouzivam. Z jistych duvodu ho musim nastavit ve frame a ne az na
formu, ve kterem frame pouzivam (za behu dynamicky frame vytvarim).
Vse vypada v poho, jenze kdyz aplikaci ulozim, vse zavru a znovu
aplikaci otevru, u serii zmizi datasourcy....
Neporadi mi nekdo, proc to mizi?
Diky
Jirka
Export do Wordu
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 1.8.2003 10:02:00
> Diky moc, to resi prvni problem...:))
> Nevite jeste nekdo, jak dynamicky plnit word? Co zaznam v
> query to novy radek ve wordu(s formatovanim...)?
Ak je Word poziadavkou a budes toho generovat/tlacit mnoho (ako to bolo v
mojom pripade), potom sa Ti mozno zidu moje skusenosti spred par rokov:
Najrychlejsi sposob cez automation bol MailMerge, bolo to omnoho rychlejsie
ako hladanie a zamena stringov v dokumente. U mna bola rychlost dolezita,
pretoze dokumentov sa malo tlacit denne niekolko tisic.
MailMerge dokument je vlastne sablona, ktora sa da vytvorit a naformatovat
rucne a potom sa pripoji na externy data source, nadefinuju sa miesta, kde
sa maju dosadzovat hodnoty z datovych poli a potom sa generuje vysledny
dokument stylom sablona + data pre kazdu vetu. Vysledok je novy Word
dokument, ktory sa da uchovat, vytlacit atd.
V tej dobe, ked som to robil, bolo mozne mat ako data source napriklad ODBC,
ale aj textove subory (csv).
Mailmerge dokument sa da vytvorit aj interaktivne cez menu, tak si to
vyskusaj, a v helpe k WordBasic najdes prislusne automation vlastnosti a
metody, ktorymi sa da to iste dosiahnut programovo.
Jeden trik, ktory dost pomaha pri spoznavani Office automation objects:
spusti si nahravanie makra, naklikaj si veci rucne a potom si pozri
vygenerovany VB kod. Tak najrychlejsie zistis nazvy vlastnosti a metod,
ktore budes potrebovat.
Ak si spravne spominam, Word.Application ma nejaku vlastnost ako
"Interactive", ktora sa da nastavit na False a potom ide vsetko rychlejsie
(a nezobrazuju sa prompty, dialogy a podobne).
V praxi som tiez prisiel na to (ak mas viac tych mailmerge dokumentov), ze
viacere joby sa daju spustit naraz, kazdy v svojom threade. Bolo to
rychlejsie ako sekvencne spracovanie jeden po druhom. A dokonca to fungovalo
pomerne spolahlivo, co som bol prijemne prekvapeny ;-)
HTH
TOndrej
JpegImage na TCanvas - CLX podruhe
[*] Petr Janousek <petr.janousek(zv)definity(tec)cz> - 1.8.2003 09:51:59
>>>PJ> Nebo mi aspon poradte, jak TJepgImage prevest do TImage. Slo by to pres
>>>PJ> TStream ? ( jepg.SaveToStream .... TImage.picture.LoadFromStream apod. )
>>>
>>>Neni potreba prevadet, pri pridani unity jpeg do Uses ziska automaticky
>>>TImage moznost nahrat .jpg soubor.
>>
>
>>Bohuzel to nejde - pri volani jpg.picture.LoadFromFile(x.jpg) mi to
>>spadne na exception : unknown picture file extension.
>
>
>>( RegisterFileFormat mi nefunguje, protoze TJepgImage neni
>> TGraphicClass. )
>
>
> A pouzivas vubec standardni unitu z Dephi 7 ?
Delphi 7 sem standartne nainstaloval a zadnou unitu sem tam nedaval.
Nevite kde aspon najit nejakou komponentu pracujici s Jpeg obrazky,
ktera by chodila pod Delphi 7 i pod Kylixem 3 ?
--
Petr Janousek
DEFINITY Systems, s.r.o.
Krizikova 2158
25601 Benesov u Prahy
Czech Republic
Tel: +420 317 726022
Fax: +420 317 724456
Petr.Janousek(zv)Definity(tec)cz
http://www.definity(tec)cz
-------------------------
Private:
Luis99(zv)seznam(tec)cz
http://www.sweb(tec)cz/Luis99
JpegImage na TCanvas - CLX podruhe
[*] Petr Janousek <petr.janousek(zv)definity(tec)cz> - 1.8.2003 09:21:57
> PJ> Nebo mi aspon poradte, jak TJepgImage prevest do TImage. Slo by to pres
> PJ> TStream ? ( jepg.SaveToStream .... TImage.picture.LoadFromStream apod. )
>
> Neni potreba prevadet, pri pridani unity jpeg do Uses ziska automaticky
> TImage moznost nahrat .jpg soubor.
Bohuzel to nejde - pri volani jpg.picture.LoadFromFile(x.jpg) mi to
spadne na exception : unknown picture file extension.
( RegisterFileFormat mi nefunguje, protoze TJepgImage neni
TGraphicClass. )
Nejakej jinej navrh ?Synapse a FTP na Linuxu
[*] Petr Dedecek <petrd(zv)omega-lbc(tec)cz> - 1.8.2003 09:37:58
MandrakeLinux 9.1 - server ProFtpD 1.2.7-1
Zkousel jsem komunikovat klienty FtpCommander, TotalCommander a priklad z Indy a vse funguje.
Bohuzel server z internetu neni pristupny.
Kdyby te jeste neco napadlo, tak predem dik.
Petr
> ... ale ten tvuj server zjevne z neznameho duvodu neposle. To vypada
> jako nejaka chyba na strane serveru. Co je to za FTP software? Jiny
> FTP-klient s tim funguje?
>
> Idealni by bylo, kdyby ten server byl pristupny z internetu, abych
> sitomohl sam vyzkouset.
JpegImage na TCanvas - CLX podruhe
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 1.8.2003 09:35:58
1.8.2003 Petr Janousek:
>> PJ> Nebo mi aspon poradte, jak TJepgImage prevest do TImage. Slo by to pres
>> PJ> TStream ? ( jepg.SaveToStream .... TImage.picture.LoadFromStream apod. )
>>
>> Neni potreba prevadet, pri pridani unity jpeg do Uses ziska automaticky
>> TImage moznost nahrat .jpg soubor.
> Bohuzel to nejde - pri volani jpg.picture.LoadFromFile(x.jpg) mi to
> spadne na exception : unknown picture file extension.
> ( RegisterFileFormat mi nefunguje, protoze TJepgImage neni
> TGraphicClass. )
A pouzivas vubec standardni unitu z Dephi 7 ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Synapse a FTP na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 1.8.2003 09:19:56
> - List vola DataRead(FDataStream)
FTP serveru byl poslan prikaz na stazeni vypisu adresare. Po poslani
prikazu se vytvori datovy kanal, kterym ma pribehnout vypis ze
serveru.
> - v DataRead se nactou packety, vrati to FDSock.LastError = 10054
.. a ten vypis skutecne pribehne. na konci server ukonci datovy
kanal. Tady je vse v poradku.
> - potom vola ReadResult
...po skonceni datoveho prenosu ma server poslat kod s vysledkem cele
operace v prikazovem kanalu...
> - v nem pri FSock.RecvString vyprsi TimeOut a vysledek je 0
... ale ten tvuj server zjevne z neznameho duvodu neposle. To vypada
jako nejaka chyba na strane serveru. Co je to za FTP software? Jiny
FTP-klient s tim funguje?
Idealni by bylo, kdyby ten server byl pristupny z internetu, abych
sitomohl sam vyzkouset.
L.Synapse a FTP na Linuxu
[*] Petr Dedecek <petrd(zv)omega-lbc(tec)cz> - 1.8.2003 09:09:55
Na testovani mam Linux v lokalni siti, zadny firewall, nic, 2 PC vedle sebe. Pasivni i aktivni rezim jsez zkousel. Soubory na FTP prenesu.
Pokrocil jsem trochu dal v lokalizaci problemu :
- List vola DataRead(FDataStream)
- v DataRead se nactou packety, vrati to FDSock.LastError = 10054
- potom vola ReadResult
- v nem pri FSock.RecvString vyprsi TimeOut a vysledek je 0
Dal uz nevim. Dik za dalsi nakopnuti.
Petr
> Tipnu si, ze problem je v navazovani spojeni datoveho kanalu, ktery
> se touto funkci vytvari. Nesnazis se lezt pres nejaky firewall,
> packetovy filtr ci preklad adres?
>
> Zkousel jsi aktivni i pasvni rezim prenosu?Export do Wordu
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 1.8.2003 09:13:56
Jo, urcite to pujde. Jen vubec nevim, co to je.......:()))
Muzes prosim nakopnout pripadne (lepe) poslat volaky prikladek na souk.
mail?
Diky
Vlasta
----- Original Message -----
From: "Jiri Virt" <virt(zv)volny(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 01, 2003 7:31 AM
Subject: Re: Export do Wordu
> coz tajkhle pres DDE ??
>
> Jirka
>
>
>
JpegImage na TCanvas - CLX podruhe
[*] Lauko Stefan <laukosw(zv)naex.sk> - 1.8.2003 09:01:55
----- Original Message -----
From: "Petr Janousek" <petr.janousek(zv)definity(tec)cz>
Sent: Friday, August 01, 2003 8:11 AM
> > Nevite nekdo, jakym zpusobem se da na Canvas zobrazit JpegImage ?
> >
> > Canvas.Draw(x,y,jpg); nefunguje - podle prekladace se jedna o dva
> > rozdilne typy - TGraphic a TJpegImage.
> >
> > Pouzivam Delphi 7 Ent. V Delphi 5 to slo, tak nevim, proc by to nemelo
> > jit tady.
> >
> > dik za nakopnuti.
>
> To tady opravdu nikdo nevi ? To teda jako nejde v Delphi 7 zobrazit
> TJpegImage na TCanvas ? Proc tam teda je unita Jpeg ?
Ahoj,
mam len D6pro ale v CLX format JPG, JPEG IMHO nie je podporovany.
Lauko.
Tisk na slozenky
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 1.8.2003 08:47:54
Dekuji vsem za rady ohledne tisku slozenek i komunikace s pralelnim portem.
Marek Dostal