Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Barva textu v TMemo
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 5.4.2000 07:19:54
Musis pouzit RTF, u Mema to nejde.
Pro svou potrebu cosi podobneho pisu, az to bude odladene, dam to ven.
Pavel ZIDEK
----- Original Message -----
From: Jind�ich Nikodem <nikodem(zv)kh-kinetic(tec)cz>
To: konference delphi <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 04, 2000 3:11 PM
Subject: Barva textu v TMemo
> Ahoj vsem,
>
> mam na formulari komponentu TMemo. Pouzivam ji k zadavani souboru INI pro
> svuj programek. Potrebuji, ale mnou definovana vybrana slova odlisne
> zobrazit. Nejlepe barvou (mozna i fontem - stacil by kurziv). Neco
obdobneho
> jako, kdyz pisu program v Delphi, tak jsou slova Begin, End, Procedure ,
> Function .... barevne odlisena.
>
> Dekuji
>
> Jindrich Nikodem
>
> nikodem(zv)kh-kinetic(tec)cz
>
>
>HWND Aplikace
[*] Libor Junek <libor(zv)thsoft(tec)cz> - 5.4.2000 07:23:52
To je presne ono co jsem potreboval. Mockrat diiik.
Libor Junek
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, April 04, 2000 11:26 PM
Subject: Re: HWND Aplikace
> From: Libor Junek <libor(zv)thsoft(tec)cz>
> > Nevite nekdo jak bych mohl zjistit v DLL handle aplikace ktera ji vola?
>
> Ahoj,
>
> napriklad takhle:
>
> function GetProcessDelphiTApplicationWnd: HWND;
> type
> PWndEnum = ^TWndEnum;
> TWndEnum = record
> PID: DWORD;
> Wnd: HWND;
> end;
> var
> WndEnum: TWndEnum;
>
> function EnumWindowsProc(Wnd: HWND; Data: PWndEnum): Boolean; stdcall;
> var
> PID: DWORD;
> C: array[0..100] of Char;
> begin
> GetWindowThreadProcessId(Wnd, (zv)PID);
> if (PID = Data^.PID) and (GetClassName(Wnd, C, Sizeof(C)) > 0) and
> (C = 'TApplication') then
> Data^.Wnd := Wnd;
> Result := (Data^.Wnd = 0);
> end;
>
> begin
> WndEnum.PID := GetCurrentProcessId;
> WndEnum.Wnd := 0;
> EnumWindows((zv)EnumWindowsProc, LPARAM((zv)WndEnum));
> Result := WndEnum.Wnd;
> end;
>
> Petr Vones, amatersky programator
>
> Version Info
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 5.4.2000 07:28:17
Preji dobreho rana,
Po preinstalovani pocitace, tedy i Delphi - D5-Prof, mi pri kompilaci
nepridaji VersionInfo do exe souboru.
V "Project|Options|Version Info" je samozrejme zaskrnutno "Include version
info in project", coz pred preinstalaci stacilo. Myslel jsem na nejakou
chybicku D, tak jsem pridal "Update...", ale je to porad stejne.
Zrejme je zase chyba mezi zidli a klavesnici, tentokrat zrejme moji zidli a
moji klavesnici.
Nevite prosim nekdo v cem by mohl byt zakopany pes ??
Diky moc
Karel
Karel Vlcek
=============================
poskytovani software
mailto: vlcekk(zv)hotmail.com
=============================
DAO knihovny, DAO3032.DLL
[*] Filip Hlad�k <fihla(zv)telecom(tec)cz> - 5.4.2000 07:28:51
Ahoj,
Pokud mas Access i doma, muze byt problem ve vezi DAO. Muzes mit v obou
strojich stejnou verzi Office a zaroven muzes mit rozdilne verze DAO.
Pricinou je nap�. upgrade Office 95 na Office 97 - zustava puvodni DAO 3.0.
Samotna instalace O97 ovsem obsahuje DAO 3.5. Bohuzel si uz nepamatuju, kde
jsem o tom cetl.
Filip Hladik
fihla(zv)telecom(tec)cz
-----P�vodn� zpr�va-----
Od: Jan Fiala <jan.fiala(zv)iol(tec)cz>
Problem bude v tom, ze v praci mas nainstalovany Access a dome ne. ta
knihovna
se instaluje s Accessem
Jan Fiala
----- Original Message -----
From: Jind�ich Nikodem <nikodem(zv)kh-kinetic(tec)cz>> Ahoj vsem,
>
> nedavno jsem tu resil problem pripojeni Delphi 4 Std. na databazi Access.
To
> jse mi jiz konecne podarilo a to takto:
>
> V BDE Administratoru jsem si zadal novy alias MyAlias typu MSACCESS a
> vyplnil u nej cestu k databazi "C:\Access\databaze.mdb".
> V Delphi pak jiz staci jen VCL Table, DataSource a DBGrid a je to stejne
> jako kdyz pristupuji na databazi DBF.
> Pristup pres ODBC je bohuzel v Delphi 4 Std. opravdu nemozny.
>
> Ale hacek tam prece je. Takto jsem to zkousel v praci a taky to slo bez
> problemu. Doma jsem zkusil totez a po te co jsem chtel vybrat u komponenty
> Table databazovou tabulku se mi objevila hlaska ze nemam knihovnu
> c:\windows\msapps\DAO3032.DLL.
> Hledal jsem tuto knihovnu na pocitaci v praci a tam tez neni a pritom se
na
> Access pripojim?
>
> Na obou pocitacich je stejny system Win98 i Delphi. Vcem je tedy problem?
> Prosim pomozte.
>
>
> Predem diky
>
> Jindrich Nikodem
>
> nikodem(zv)kh-kinetic(tec)cz
>
>
>
>
Error po vice insertech MS SQL serveru
[*] Ren� Otisk - 5.4.2000 07:29:32
Hi,
Abych upresnil puvodni zadost o pomoc a sve pocity...
Udela to vzdy, kdyz jsem uz na poslednim radku dbgridu a chci prekreslit data nebo po vice insertech (ale tady az po prekresleni a zadani Last) nebo kdyz zadam insert bez prekresleni pak prekreslim data a chci na last record. Jako by to melo maly buffer nebo nevedelo kam az to ma skocit. Taky jsem pri hledani chyby nejak zavadil v sqlbol.chm o kursory (v MODBC mam nastaven static cursor). Nemohlo by to byt tim20
Pripadne nenasla by se dobra dusicka, ktera by mi vysvetlila smysl a princip pouzivani kursoru (bohuzel ale, pro natvrdle)? Hi,
D3, RxLib2.75, MS SQL7.0, MODBC
M�l bych nasledujici problem. Po jednom Insertu pres stored procedure je vse v pohode (aspon se tak tvari). Po nekolika insertech po sobe mi vsak neprekresluje jednotlive fieldy (TRxDBGrid i TDBLabel). Kdyz to v tom Gridu prechazi pres datum ale bohuzel ne pres prvni(asi tak 5-10 zaznam), tak to rve 'Invalid argument to encode date' a dal to neprekresluje. Nicmene po AfterScroll mam dany vycuc dat ze zaznamu z tabulky a tam jsou data regulerni. Kdyz dam ten datum pryc, tak to od nejakeho radku (10...) v bunkach zobrazi nesmyslny data a vycuc dat funguje taktez. Na zobrazeni pomuze nekdy zavrit a otevrit tabulku a nekdy to po tom refreshi zarve ODBC Error 'Error Label'. Kdyz dam za ten MyRefresh prikaz Table.Last, tak to udela i po jedinem insertu. Jsem v tomhletom pomerne zacatecnik (predtim paradox a bde), takze nevim jestli se nekde da nastavit neco jako block size nebo co ja vim. Jo, zkousim to na notebooku 32 MB RAM (i MSDE), PII 233, nicmene dela to i na NT s 196 MB RAM P350MHz. Vi nekdo, jak na to? Prosim pomozte...
Tady je ta procedurka
procedure TMarketing.MyInsert(Table: TMQuery; SQLPrikaz: string);
begin
Screen.Cursor := crHourGlass;
with Data, Help do
try
SQL.Clear;
SQL.Add('SET DATEFORMAT dmy');
SQL.Add(SQLPrikaz);
SQL.SaveToFile('My.txt');
ExecSQL;
MyRefresh(Table); (Active := False, Active := True;)
except
on E: Exception do
ShowMessage(E.Message);
end;
Screen.Cursor := crDefault;
end;
Dekuji
Sroub
Numeric string
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.4.2000 07:37:59
On 4 Apr 00, at 13:44, Ale� Kle�ka wrote:
> FUNCTION IsInteger( a_String : String ) : Boolean;
> BEGIN
> TRY
> StrToInt( a_String );
> Result := TRUE;
> EXCEPT
> Result := False;
> END;
> END;
Pokud se test casteji opakuje, tak tohle hrozne zdrzuje. Lepsi je
Val.
> > Zdrav�m a pros�m o radu.
> > Existuje v D5 n�jak� funkce, kter� vr�t� zda string je ��slo.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Jeste jednou seznam SQL serveru
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.4.2000 07:37:59
On 4 Apr 00, at 15:00, David Lebeda wrote:
> muzete me nekdo prosim popostrcit spravnym smerem? Mam v
> aplikaci ComboBox a rad bych jeho Items naplnil SQL servery
> viditelnymi z meho stroje. Na zaklade podnetu z konference jsem
> prostudoval funkce NetServerEnum i WNetEnumResource, ale asi
> to neni to prave orechove. Uz proto, ze to hleda jen v nejake casti
> site - domene apod. Prolezat celou sit rekurzivne po uzlech a do
> kazdeho nakouknout, zda tam je nejaky SQL server by asi bylo reseni
> casove dost narocne, zejmena na kosatejsi siti.
Pokud ty servery maji OLE DB provider (tyka se tedy zejmena MS
SQL, ale i nekterych dalsich db) a mas NT sit, pak to lze docela
dobre zjistit pomoci OLE DB. Zfleku ti vsak nereknu jak, protoze to
zpameti neznam, takze je to prace na nekolik hodin.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Barva textu v TMemo
[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 5.4.2000 07:40:48
J.Nikodem wrote:
> mam na formulari komponentu TMemo. Pouzivam ji k zadavani souboru INI pro
> svuj programek. Potrebuji, ale mnou definovana vybrana slova odlisne
> zobrazit. Nejlepe barvou (mozna i fontem - stacil by kurziv). Neco
obdobneho
> jako, kdyz pisu program v Delphi, tak jsou slova Begin, End, Procedure ,
> Function .... barevne odlisena.
V.Cadsky wrote:
>..., pokud je to mozne, tak pouzij komponentu TRichEdit
Ahoj,
tobe by se spis hodil mwEdit, napr. na:
http://members.xoom.com/primozg/mw/mwedit.htm
podporuje syntax highlighting, mimo jine i pro INI soubory.
Z.Fryz
__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.
Prenos datoveho zdroje do DLL
[*] Bc. Libor Filip <filip(zv)agrokonzulta(tec)cz> - 5.4.2000 08:13:07
Ahoj vsichni,
mam nasledujici zajimavy problem a doufam, ze nekdo bude znat reseni.
Mam exe, ve kterem je umistena komponenta TQuery a TDataSource.
Adresu na TDataSource si poslu do DLL a v DLL tento DataSource pripojim
na TDBGrid nebo TDBLookupComboBox. Bohuzel se to nechova korektne.
Nevite jaky by byl spravny postup, abych v DLL mohl s temito komponentami
pracovat? (Jestli je to vubec mozne).
Pouzivam D5 developer na NT4 sp.4
sprava pameti
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 5.4.2000 08:16:29
> > nemate nekdo nejake zkusenosti s chovanim D4 pri prubeznych
> > alokacich a dealokacich pameti? Program mi postupne roste a
> > nejak nemuzu najit, ze bych nekde neco zapominal uvolnovat.
> Taky by me zajimaly vase zkusenosti. Mam podobny (stejny)
> problem, nemuzu nalezt pricinu a kdyz jsem se zde pred
> casem dotazoval, zadna odpoved neprisla.
Ja mam jednu spatnou zkusenost s castou zmenou velikosti
dynamickeho pole. Konkretne nacitam velke mnozstvi dat
(tisice az desetitisice) z databaze a ukladam je do
array of record, ktery obsahuje nekolik polozek Integer,
TDateTime a hlavne AnsiString. Pokud v kazdem kroku
zvetsuji velikost pole o jednicku, tak od urcite hranic roste
alokace exponencialne (viz muj starsi prispevek
"neadekvatne roste pamet" v teto konfere)
coz vede k Out Of Memory (ackoliv skutecna data zabiraji
par stovek KB, tak aplikace ma alokovano desitky MB)
Vyresil jsem to tak ze SetLength pro ono pole provadim
po asi 100 zaznamech, coz nejenze vyznamne urychli
cele nacteni, ale i odpadne i zmineny problem.
(asi se nejedna o fragmentaci protoze z alokovanych
90MB je FreeBig 83MB - viz starsi prispevek).
Asi bych mel dodat ze to bylo jeste v D4 sp3, v D5 jsem
to nezkousel.
Daniel Rott
Numeric string
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 5.4.2000 08:19:30
Ahoj,
function JeCislo( wStr : string) : boolean;
begin
Result:=true;
try
StrToInt(wStr);
except on
EConvertError : Result:=false;
end;
end;
Ufff, dalo to fusku, ale bude zit :-)
Taky se koukni, zda jeste existuje
procedura Val
D.
> ----------
> Od: Petr J> �nsk�[SMTP:petr.jansky(zv)volny(tec)cz]
>
> Existuje v D5 n> �jak� funkce, kter� vr�t� zda string je ��slo.
> treeview a expand
[*] Robert Zak <nrsys(zv)psn.sk> - 5.4.2000 08:38:26
Da sa nejak v TTreeView docielit, aby polozka, ktora nema pod sebou potomkov
bola oznacena '+' a dala sa rozbalit?
- Potomkov by som chcel nacitavat az pri rozbalovani, strom je rozsiahly a
jeho nacitavanie trva velmi dlho...
Dakujem
Robo
IP adresa a jmeno stroje
[*] azeleny(zv)csas(tec)cz - 5.4.2000 09:30:11
DDV,
_VRELE_ nedoporucuji cist takoveto informace z registry, lepe je na to
pouzit funkce WinSock-u, uz si nepamatuji presne jmeno, ale jde to zjistit i
fci a pak je sance, ze i kdyz MS zmeni dtrukturu registry, bude tato fce
stale vrace IP adresu-y.
> Rekl bych, ze to zase najdes tady :
> HK_LM\Enum\Network\MSTCP\0000
> v klici Driver.
----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.Numeric string
[*] azeleny(zv)csas(tec)cz - 5.4.2000 09:32:53
DDV,
> Zdrav�m a pros�m o radu.
>
> Existuje v D5 n�jak� funkce, kter� vr�t� zda string je ��slo.
Zkus, zda by ti nestacila fce StrToIntDef()
----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.sprava pameti
[*] azeleny(zv)csas(tec)cz - 5.4.2000 09:40:33
DDV
> Ahoj
> Taky by me zajimaly vase zkusenosti. Mam podobny (stejny)
> problem, nemuzu
> nalezt pricinu a kdyz jsem se zde pred casem dotazoval, zadna odpoved
> neprisla.
Obecne doporucuji par veci:
Pro alokaci pameti, GetMem, StrAlloc... a uvolnovani si napiste vlastni fce,
MyGetMem() -- asi s lepsim jmenem, pak muzete do techto fci pridat v pripade
problemu nejake logovaci fce a snadno pak najdete kde alokujete a uz
neuvolnujete...
Tez doporucuji podivat se na fci GetHeapStatus(), v D5 uz ma dokonce i
deklaraci, jinak se podivejte do nejakeho helpu od C++, tam je popis
struktur, ktere to vraci. Zajimave je, ze v helpu se pise ze je deklarovana
v System or ShareMem.
Ziskate spoustu uzitecnych informaci...
----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.Jeste jednou seznam SQL serveru
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 5.4.2000 09:45:30
----- P�vodn� zpr�va -----
Od: David Lebeda <david.lebeda(zv)comarr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 4. dubna 2000 15:00
P�edm�t: Jeste jednou seznam SQL serveru
> Ahoj,
>
> muzete me nekdo prosim popostrcit spravnym smerem? Mam v
> aplikaci ComboBox a rad bych jeho Items naplnil SQL servery
> viditelnymi z meho stroje. Na zaklade podnetu z konference jsem
> prostudoval funkce NetServerEnum i WNetEnumResource, ale asi
> to neni to prave orechove. Uz proto, ze to hleda jen v nejake casti
> site - domene apod. Prolezat celou sit rekurzivne po uzlech a do
> kazdeho nakouknout, zda tam je nejaky SQL server by asi bylo
> reseni casove dost narocne, zejmena na kosatejsi siti.
> Uz jsem se skoro smiril s tim, ze seznam SQL serveru ozelim,
> protoze ani Enterpise Manager od MSSQL serveru mi v
> Comboboxu nedokaze nabidnout kompletni seznam SQL serveru,
> ale ted jsem zjistil, ze pokud se prihlasuji k SQL serveru pres
> ODBC prihlasovaci dialog, je v nem Combobox na volbu SQL
> serveru a jeho obsah je spravny. A je to prakticky hned.
> Nemate nekdo tuseni, jakym zpusobem se ten prihlasovaci
> dialog k potrebnym informacim dostal? A - kdyz to umi on, tak ja
> bych snad mel taky, ne? :)
>
> David
>
Dialog z ODBC bere seznam serveru asi z registru, podle toho jak mas
nastaveny aliasy (pomoci Client Network Utility)ISAPI
[*] Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz> - 5.4.2000 08:52:25
zdravim delphiny,
mam mozna hloupy dotaz, ale nevim si stim rady. Do archivu jsem se taky
mrknul a nic. Nevite nahodou nekdo jak bych mohl zjistit adresar (vcetne
cesty) ,ve kterem se nachazi dana knihovna, v ramci te knihovny.
Predem diky
Amatersky programator J.C.DbCtrlGrid, DbGrid transparent
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 5.4.2000 09:57:16
No sice nevim jestli to jde i jako transparentni, ale kazdopadne tam jde
hodit na pozadi bitmapa (viz demo k tomu gridu)
http://freespace.virgin.net/giles.lindsay/GJL-Software/ExDBGrid.html
Mac
----- Original Message -----
From: <halam(zv)post(tec)cz>> Zdrav�m v�echny.
>
> Nev�te n�hodou o n�jak� komponent� - DBCtrlGrid, nebo DBGrid, u kter� se
pozad� d� nastavit jako transparetn� ?
Jeste jednou seznam SQL serveru
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 5.4.2000 10:12:50
> > muzete me nekdo prosim popostrcit spravnym smerem? Mam v
> > aplikaci ComboBox a rad bych jeho Items naplnil SQL servery
> > viditelnymi z meho stroje. Na zaklade podnetu z konference jsem
> > prostudoval funkce NetServerEnum i WNetEnumResource, ale asi to neni
> > to prave orechove. Uz proto, ze to hleda jen v nejake casti site -
> > domene apod. Prolezat celou sit rekurzivne po uzlech a do kazdeho
> > nakouknout, zda tam je nejaky SQL server by asi bylo reseni casove
> > dost narocne, zejmena na kosatejsi siti.
>
> Pokud ty servery maji OLE DB provider (tyka se tedy zejmena MS
> SQL, ale i nekterych dalsich db) a mas NT sit, pak to lze docela dobre
> zjistit pomoci OLE DB. Zfleku ti vsak nereknu jak, protoze to zpameti
> neznam, takze je to prace na nekolik hodin.
Ahoj,
jde mi skutecne o MS SQL servery, ale s tou siti to je obecne
otazka. Delam instalacni program a tezko muzu predvidat, co
budou zakaznici vsechno mit. Dekuju za typ, na druhou stranu nez
bych se vubec seznamil s OLEDB tak, abych si to dokazal
odprogramovat sam, by to Combo bylo silene drahe (moc casu) a
za to to nestoji. Budu tajne doufat, ze spravce serveru u zakaznika
vi zpameti, jak se prislusny server jmenuje :) a napise to rucne.
David
sprava pameti
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 5.4.2000 10:32:40
>> > nemate nekdo nejake zkusenosti s chovanim D4 pri prubeznych
>> > alokacich a dealokacich pameti? Program mi postupne roste a
>> > nejak nemuzu najit, ze bych nekde neco zapominal uvolnovat.
>
>> Taky by me zajimaly vase zkusenosti. Mam podobny (stejny)
>> problem, nemuzu nalezt pricinu a kdyz jsem se zde pred
>> casem dotazoval, zadna odpoved neprisla.
>
>Ja mam jednu spatnou zkusenost s castou zmenou velikosti
>dynamickeho pole. Konkretne nacitam velke mnozstvi dat
>(tisice az desetitisice) z databaze a ukladam je do
>array of record, ktery obsahuje nekolik polozek Integer,
>TDateTime a hlavne AnsiString. Pokud v kazdem kroku
>zvetsuji velikost pole o jednicku, tak od urcite hranic roste
>alokace exponencialne (viz muj starsi prispevek
>"neadekvatne roste pamet" v teto konfere)
>coz vede k Out Of Memory (ackoliv skutecna data zabiraji
>par stovek KB, tak aplikace ma alokovano desitky MB)
>Vyresil jsem to tak ze SetLength pro ono pole provadim
>po asi 100 zaznamech, coz nejenze vyznamne urychli
>cele nacteni, ale i odpadne i zmineny problem.
To je vlastni. Rozumim-li tomu dobre je polozka pole slozena z nekolika malo
bytu (tdate time a pointer na AnsiString). Takze velikost spotrebovane
pameti je spise ovlivnena delkou stringu nez poctem rekordu v poli.
SetLength na array neresi problem s alokaci AnsiStringu, takze by problemy s
pameti mely pretrvavat (pokud ovsem neni nejaky tezky problem s alokaci
dynamickych poli).
Zdravi
D. Toman
treeview a expand
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 5.4.2000 10:34:04
> Da sa nejak v TTreeView docielit, aby polozka, ktora nema pod
> sebou potomkov bola oznacena '+' a dala sa rozbalit?
> - Potomkov by som chcel nacitavat az pri rozbalovani, strom je
> rozsiahly a jeho nacitavanie trva velmi dlho...
Tak tam dej jeden node, kterej si nejak poznacis
(treba pomoci Data) a pokud pri OnExpanding
narazis na tohoto poznaceneho, tak jej smazes
a nactes skutecna data. :-)
Daniel
ISAPI
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 5.4.2000 11:04:31
mozna takhle.. (podivej se do adresare DEMOS)
procedure TCustomerInfoModule.WebModuleCreate(Sender: TObject);
var FN: array[0..MAX_PATH - 1] of char;
begin
SetString(ScriptName, FN, GetModuleFileName(hInstance, FN,
SizeOf(FN)));
ScriptPath := ExtractFilePath(ScriptName);
ScriptName := ExtractFileName(ScriptName);
end;
M.
----- Original Message -----
From: Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 05, 2000 9:52 AM
Subject: ISAPI
.
.
> mrknul a nic. Nevite nahodou nekdo jak bych mohl zjistit adresar (vcetne
> cesty) ,ve kterem se nachazi dana knihovna, v ramci te knihovny.
.
.
sprava pameti
[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 5.4.2000 11:12:45
Vytvaret si vlastni alokacni a dealokacni funkce nepovazuju za prilis
stastne. Nedaji se tim odchytit problemy s alokaci a dealokaci objektu,
ktere se alokuji volanim konstruktoru create a dealokuji volanim
destruktoru. Navic nevim jak bych tim odchytil problemy v Quick reportu,
nebo v jinych, mne neznamych knihovnach, kdyz nemam zdrojaky a autor si tam
vesele alokuje po svem.
Zdrojem problemu muze byt neuvolnovani formularu, nebo vyse zmineny
QuckReport.
Jaromir Cermak
-----Original Message-----
From: azeleny(zv)csas(tec)cz [mailto:azeleny(zv)csas(tec)cz]
Sent: Wednesday, April 05, 2000 9:41 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: sprava pameti
Obecne doporucuji par veci:
Pro alokaci pameti, GetMem, StrAlloc... a uvolnovani si napiste vlastni fce,
MyGetMem() -- asi s lepsim jmenem, pak muzete do techto fci pridat v pripade
problemu nejake logovaci fce a snadno pak najdete kde alokujete a uz
neuvolnujete...
Tez doporucuji podivat se na fci GetHeapStatus(), v D5 uz ma dokonce i
deklaraci, jinak se podivejte do nejakeho helpu od C++, tam je popis
struktur, ktere to vraci. Zajimave je, ze v helpu se pise ze je deklarovana
v System or ShareMem.
Ziskate spoustu uzitecnych informaci...
----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.ISAPI
[*] Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz> - 5.4.2000 10:14:36
> zdravim delphiny,
> mam mozna hloupy dotaz, ale nevim si stim rady. Do archivu jsem se taky
> mrknul a nic. Nevite nahodou nekdo jak bych mohl zjistit adresar (vcetne
> cesty) ,ve kterem se nachazi dana knihovna, v ramci te knihovny.
>
> Predem diky
>
> Amatersky programator J.C.
> Error po vice insertech MS SQL serveru
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 5.4.2000 11:17:58
> kam az to ma skocit. Taky jsem pri hledani chyby nejak zavadil v
> sqlbol.chm o kursory (v MODBC mam nastaven static cursor). Nemohlo by
> to byt tim? Pripadne nenasla by se dobra dusicka, ktera by mi
> vysvetlila smysl a princip pouzivani kursoru (bohuzel ale, pro
> natvrdle)?
Kurzorove tabulky - to je problematika relativne obsahla, ale ve
vztahu k Tvemu dotazu to asi pujde dost zjednodusit. Kurzor je
rekneme pomocna tabulka, ktera umoznuje pracovat s jednotlivymi
radky toho, co Ti vrati nejaky dotaz (select). Takze kdyz si nechas
udelat select, je vytvoren kurzor, ktery nejakym zpusobem urcuje,
ktere radky odpovidaji dotazu a maji byt poslany na klienta.
Kurzoru existuji 4 druhy:
- static - tj. v okamziku provedeni dotazu se vybere mnozina
odpovidajich radku a nekam se zkopiruje. Dale se kurzor opira o
tuto kopii. Znamena to, ze jestlize po tomto svem dotazu ty nebo
nekdo jiny zpusobi upravy v datech, kurzor to jiz nepozna a vraci
stale puvodni data.
- keyset driven - je relativne podobny. Neprovadi se kopie dat,
ale kurzor si pamatuje klice jednotlivych radku, ktere odpovidaji
dotazu. Vraci tedy aktualni hodnoty dat, ale pozor - pokud dojde k
takove uprave dat, ze nektere radky by jiz selectu neodpovidaly
(nebo pribydou nove radky), kurzor to nepozna a vrati i tyto radky.
- dynamic - mel by odstranit problemy predchozich, tj. mnozina
vracenych dat by mela byt prubezne aktualizovana podle
momentalniho stavu dat a pri kazde praci s kurzorem dostanes
data ze spravnych radku v aktualni hodnote. Pozor - muze to ale
vest k neprijemnostem. Predstav si, ze nactes data z nejakeho
radku, pak budes 5 minut delat neco sveho, ale kurzor bude stale
otevreny. Behem tech 5 min Ti nekdo tato data v databazi prepise.
Pri dalsim nacteni tohoto radku z databaze bude mit tento radek
jine hodnoty nez pri cteni predchozim, tj. pred temi 5 minutami. S
tim je treba pocitat, pokud se data nacitaji opakovane.
- forward only - je v podstate dynamicky kurzor, ale s moznosti
prochazet data pouze smerem dopredu, nelze se vracet. Prinasi to
oproti dynamickemu kurzoru zrychleni.
Zkus tedy pouzit dynamicky kurzor, co to udela. Je ovsem otazka,
zda to je v mODBC skutecne implementovano, nebo je to tam jen
pro ozdobu.
David
OT:mail klient
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 5.4.2000 11:31:43
<FontFamily><param>Times New Roman</param><bigger>poradte nejakeho free email klientaale nie Outlooku a Outlooku
Express.
*** Vrele doporucuji PegasusMail
Petr
<nofill>
,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
mail klient
[*] Lubos RYBNICEK <mosek(zv)admiton(tec)cz> - 5.4.2000 11:56:37
Co The Bat?
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin
Sent: Wednesday, April 05, 2000 6:52 AM
To: delphi-l(zv)fwd(tec)cz
Subject: OT:mail klient
poradte nejakeho free email klienta ale nie Outlooku a Outlooku Express.
Martin
Jeste jednou seznam SQL serveru
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 5.4.2000 12:00:20
----- Puvodn� zpr�va -----
Od: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> Ahoj,
>
> muzete me nekdo prosim popostrcit spravnym smerem? Mam v
> aplikaci ComboBox a rad bych jeho Items naplnil SQL servery
> viditelnymi z meho stroje. Na zaklade podnetu z konference jsem
> prostudoval funkce NetServerEnum i WNetEnumResource, ale asi
> to neni to prave orechove. Uz proto, ze to hleda jen v nejake casti
> site - domene apod. Prolezat celou sit rekurzivne po uzlech a do
> kazdeho nakouknout, zda tam je nejaky SQL server by asi bylo
> reseni casove dost narocne, zejmena na kosatejsi siti.
> Uz jsem se skoro smiril s tim, ze seznam SQL serveru ozelim,
> protoze ani Enterpise Manager od MSSQL serveru mi v
> Comboboxu nedokaze nabidnout kompletni seznam SQL serveru,
> ale ted jsem zjistil, ze pokud se prihlasuji k SQL serveru pres
> ODBC prihlasovaci dialog, je v nem Combobox na volbu SQL
> serveru a jeho obsah je spravny. A je to prakticky hned.
> Nemate nekdo tuseni, jakym zpusobem se ten prihlasovaci
> dialog k potrebnym informacim dostal? A - kdyz to umi on, tak ja
> bych snad mel taky, ne? :)
>
> David
>
Dialog z ODBC bere seznam serveru pravdepodobne z registru, podle toho jak mas
nastaveny aliasy (pomoci Client Network Utility)
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\.....
OT:mail klient
[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 5.4.2000 12:13:07
On Wed, 5 Apr 2000, Martin wrote:
> poradte nejakeho free email klienta ale nie Outlooku a Outlooku Express.
>
> Martin
>
Ahoj,
zkus treba Pegasus Mail (http://www.pegasus.usa.com/)
nebo z unixu znamy Pine
(http://www.washington.edu/pine/changes/4.20-to-4.21.html).
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel: 0604-172983
-==============================================================-
PGP podporovano
Jeste jednou seznam SQL serveru
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 5.4.2000 12:14:18
> > serveru, ale ted jsem zjistil, ze pokud se prihlasuji k SQL serveru
> > pres ODBC prihlasovaci dialog, je v nem Combobox na volbu SQL
> > serveru a jeho obsah je spravny. A je to prakticky hned. Nemate
> > nekdo tuseni, jakym zpusobem se ten prihlasovaci dialog k potrebnym
> > informacim dostal? A - kdyz to umi on, tak ja bych snad mel taky,
> > ne? :)
> >
> > David
> >
>
> Dialog z ODBC bere seznam serveru asi z registru, podle toho jak mas
> nastaveny aliasy (pomoci Client Network Utility)
>
Hm, overoval jsem to a je to bohuzel pravda. Je otazka, zda to
souvisi s aliasy (na jeden server jsem nemel zadny alias, ale v
dialogu byl), nicmene jakmile jsem z registru smazal vsechny
vyskyty jmena toho serveru, prestal se objevovat i pri loginu. Coz
me rozhodne nepotesilo.
David
Index
[*] Dan Rejchrt <rejchrt(zv)ssakhk(tec)cz> - 5.4.2000 12:14:31
Zdravim,
potreboval bych nejakou componentu, ktera funguje jako Label akorat ma index. Horni i dolni. Pro upresneni neuvedu priklad : A, ktery ma dolni index x . Ax
Vse, aby bylo jeden objekt, ale oboje zadavatelne.
Dost by mi to pomohlo, protoze pak mam v projektu zbytecne moc Labelu a je to neprehledne.
S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************Re[2]: Interbase & BLOB (*.doc)
[*] Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz> - 5.4.2000 12:35:03
Slab�, Petr (Pilsen), 05.04.2000 11:03:58
Delph! wrote:
> Ako teda pomocou DDE mozem otvorit subor vo Worde, tlacit, no hlavne
>pouzivat FindReplace ????
Pomoci DDE jdou ve Wordu spoustet makra. Nap��klad:
Otev��t soubor:
[FileOpen("filename")]
Vytisknout soubor a ukon�it word:
[FileOpen("filename")][FilePrint 0][FileExit 2]
FindReplace urcite jde taky tak nejak.
Volam to pomoci
ddeClient.ExecuteMacro(pcPrikaz, False);
Best regards,
PS.
-----------------------------------------------------------------------------------
Softwarova firma se zahranicni ucasti se sidlem v Plzni hleda programatory
Delphi, C++, Java. Dobra znalost nemciny nebo anglictiny podminkou.
Vice o nas na www.kadel(tec)cz, ozvete se na slaby(zv)kadel(tec)cz.
Detekce kodovani cestiny
[*] novacek(zv)vanicek(tec)cz - 5.4.2000 10:54:52
Dne 4 Apr 00 v 13:21, napsal(a) Jan Fiala:
> Posilam kousek kodu, ktery pozna 1250, Latin II a Kameniky. Podminkou je mit
> reprezentativni kousek textu. Funguje to na detekci pismen, ktere se v jinych CP
> nevyskytuji. Snad si z toho neco vyberes.
Jen jestli detekce podle jednoho samostatneho pismene bude dostatecna.
Napadaji me mozne problemy s ramecky, ktere v jinych kodech predstavuji
pismena ceske abecedy, apod.
> ----- Original Message -----
> From: Pavel Polak <pavelp(zv)bnsoft(tec)cz>
>
> > Zdravim!
> >
> > Mam dotaz zkousel jsem uz hledat archivu a nic jsem nenasel co se tyce
> > problemu detekce kodovani cestiny. Nevite nekdo neco o tom?
Kdysi davno jsem to resil jako rocnikovy projekt. Detekce probiha na
zaklade vyhledavani fragmentu slov, detekuje to Win1250, Kameniky, Latin-
2, ciste ASCII. Bude- li zajem vyhrabu to z archivu a dam k dispozici.
Zdar a silu.
Vladimir Novacek
VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
Zborovska 15 fax+BBS: 05-41240246
616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
Ceska Republika http://www.vanicek(tec)cz
Jak zjistit, ze proces neni ukoncen?
[*] Karel Klime� <kchodl(zv)email(tec)cz> - 5.4.2000 13:08:48
Pomoci CreateProcess vytvorim proces (jedna se o nejakou aplikaci, kterou
muze uzivatel kdykoliv zavrit). Jak lze zjistit, ze tento proces stale bezi
ci ze byl ukoncen.
Progr-Amather -Kchodl-(r) 1989-2000
Error po vice insertech MS SQL serveru
[*] Ren� Otisk - 5.4.2000 13:09:37
Hi,
To je perfekt
Mno, V MODBC to jest, lec pri otevreni se dynamicky cursor zmeni na staticky
a nikdy jinak. Spise by mne zajimalo jak nastavit kurzory na serveru, kdyz
to mODBC nevyuziva a jak je pouzivat.
V tech kurzorech to asi bude, protoze, kdyz si pri refreshi mezi open a
enablecontrols projdu vsecky zaznamy
while not MQuery.eof do
MQuery.next
tak si to potom vesele skace mezi last, first, moveby tam i zpet jak hurvajs
na gume
Sroub
>
> > kam az to ma skocit. Taky jsem pri hledani chyby nejak zavadil v
> > sqlbol.chm o kursory (v MODBC mam nastaven static cursor). Nemohlo by
> > to byt tim? Pripadne nenasla by se dobra dusicka, ktera by mi
> > vysvetlila smysl a princip pouzivani kursoru (bohuzel ale, pro
> > natvrdle)?
>
> Kurzorove tabulky - to je problematika relativne obsahla, ale ve
> vztahu k Tvemu dotazu to asi pujde dost zjednodusit. Kurzor je
> rekneme pomocna tabulka, ktera umoznuje pracovat s jednotlivymi
> radky toho, co Ti vrati nejaky dotaz (select). Takze kdyz si nechas
> udelat select, je vytvoren kurzor, ktery nejakym zpusobem urcuje,
> ktere radky odpovidaji dotazu a maji byt poslany na klienta.
> Kurzoru existuji 4 druhy:
> - static - tj. v okamziku provedeni dotazu se vybere mnozina
> odpovidajich radku a nekam se zkopiruje. Dale se kurzor opira o
> tuto kopii. Znamena to, ze jestlize po tomto svem dotazu ty nebo
> nekdo jiny zpusobi upravy v datech, kurzor to jiz nepozna a vraci
> stale puvodni data.
>
> - keyset driven - je relativne podobny. Neprovadi se kopie dat,
> ale kurzor si pamatuje klice jednotlivych radku, ktere odpovidaji
> dotazu. Vraci tedy aktualni hodnoty dat, ale pozor - pokud dojde k
> takove uprave dat, ze nektere radky by jiz selectu neodpovidaly
> (nebo pribydou nove radky), kurzor to nepozna a vrati i tyto radky.
>
> - dynamic - mel by odstranit problemy predchozich, tj. mnozina
> vracenych dat by mela byt prubezne aktualizovana podle
> momentalniho stavu dat a pri kazde praci s kurzorem dostanes
> data ze spravnych radku v aktualni hodnote. Pozor - muze to ale
> vest k neprijemnostem. Predstav si, ze nactes data z nejakeho
> radku, pak budes 5 minut delat neco sveho, ale kurzor bude stale
> otevreny. Behem tech 5 min Ti nekdo tato data v databazi prepise.
> Pri dalsim nacteni tohoto radku z databaze bude mit tento radek
> jine hodnoty nez pri cteni predchozim, tj. pred temi 5 minutami. S
> tim je treba pocitat, pokud se data nacitaji opakovane.
>
> - forward only - je v podstate dynamicky kurzor, ale s moznosti
> prochazet data pouze smerem dopredu, nelze se vracet. Prinasi to
> oproti dynamickemu kurzoru zrychleni.
>
> Zkus tedy pouzit dynamicky kurzor, co to udela. Je ovsem otazka,
> zda to je v mODBC skutecne implementovano, nebo je to tam jen
> pro ozdobu.
>
> David
DAO knihovny, DAO3032.DLL
[*] Filip Hlad�k <fihla(zv)telecom(tec)cz> - 5.4.2000 14:00:22
Ahoj,
Pokud mas Access i doma, muze byt problem ve vezi DAO. Muzes mit v obou
strojich stejnou verzi Office a zaroven muzes mit rozdilne verze DAO.
Pricinou je nap�. upgrade Office 95 na Office 97 - zustava puvodni DAO 3.0.
Samotna instalace O97 ovsem obsahuje DAO 3.5. Bohuzel si uz nepamatuju, kde
jsem o tom cetl.
Filip Hladik
fihla(zv)telecom(tec)cz
-----P�vodn� zpr�va-----
Problem bude v tom, ze v praci mas nainstalovany Access a dome ne. ta
knihovna
se instaluje s Accessem
Jan Fiala
----- Original Message -----
From: Jind�ich Nikodem <nikodem(zv)kh-kinetic(tec)cz>> Ahoj vsem,
>
> nedavno jsem tu resil problem pripojeni Delphi 4 Std. na databazi Access.
To
> jse mi jiz konecne podarilo a to takto:
>
> V BDE Administratoru jsem si zadal novy alias MyAlias typu MSACCESS a
> vyplnil u nej cestu k databazi "C:\Access\databaze.mdb".
> V Delphi pak jiz staci jen VCL Table, DataSource a DBGrid a je to stejne
> jako kdyz pristupuji na databazi DBF.
> Pristup pres ODBC je bohuzel v Delphi 4 Std. opravdu nemozny.
>
> Ale hacek tam prece je. Takto jsem to zkousel v praci a taky to slo bez
> problemu. Doma jsem zkusil totez a po te co jsem chtel vybrat u komponenty
> Table databazovou tabulku se mi objevila hlaska ze nemam knihovnu
> c:\windows\msapps\DAO3032.DLL.
> Hledal jsem tuto knihovnu na pocitaci v praci a tam tez neni a pritom se
na
> Access pripojim?
>
> Na obou pocitacich je stejny system Win98 i Delphi. Vcem je tedy problem?
> Prosim pomozte.
>
>
> Predem diky
>
> Jindrich Nikodem
>
> nikodem(zv)kh-kinetic(tec)cz
>
>
>
>
Jak zjistit, ze proces neni ukoncen?
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 5.4.2000 14:07:33
Je-li to tvuj proces, tak si v nem nadefinuj reakci na nejakou zpravu
(WM_USER + x), nebo at posila zpravu pri svem ukonceni (neni vhodne v
pripade nasilneho odstrelu), a kdyz je to cizi - musis pravidelne
provadet FindWindow....
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> Pomoci CreateProcess vytvorim proces (jedna se o nejakou aplikaci,
> kterou
> muze uzivatel kdykoliv zavrit). Jak lze zjistit, ze tento proces
> stale bezi
> ci ze byl ukoncen.
>
> Progr-Amather -Kchodl-(r) 1989-2000
Jak zjistit, ze proces neni ukoncen?
[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 5.4.2000 14:23:48
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ja pouzivam tuto funkci, ktera muze take cekat. Snad je to dostatecne
citelny...
function ExecProcess (const CmdLine: String; Minimized: Boolean;
Wait: Boolean): Integer;
var
SI: TStartupInfo;
PI: TProcessInformation;
begin
FillChar(SI, SizeOf(SI), 0);
SI.cb := SizeOf(SI);
SI.dwFlags := STARTF USESHOWWINDOW;
if Minimized then
SI.wShowWindow := sw SHOWMINNOACTIVE
else
SI.wShowWindow := sw SHOWNORMAL;
if not CreateProcess(Nil, PChar(CmdLine), Nil, Nil, False,
NORMAL PRIORITY CLASS, Nil, Nil, SI, PI) then
raise EExecuteError.Create;
CloseHandle(PI.hThread);
if Wait then
begin
WaitForSingleObject(PI.hProcess, INFINITE);
GetExitCodeProcess(PI.hProcess, Result);
end
else
begin
Result := 0;
WaitForInputIdle(PI.hProcess, INFINITE);
end;
CloseHandle(PI.hProcess);
end;
-----Original Message-----
From: Martin Fron�k [mailto:FRONEK(zv)zznslany(tec)cz]
Sent: Wednesday, April 05, 2000 2:08 PM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: RE: Jak zjistit, ze proces neni ukoncen?
Je-li to tvuj proces, tak si v nem nadefinuj reakci na nejakou zpravu
(WM USER + x), nebo at posila zpravu pri svem ukonceni (neni vhodne v
pripade nasilneho odstrelu), a kdyz je to cizi - musis pravidelne
provadet FindWindow....
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> Pomoci CreateProcess vytvorim proces (jedna se o nejakou aplikaci,
> kterou
> muze uzivatel kdykoliv zavrit). Jak lze zjistit, ze tento proces
> stale bezi
> ci ze byl ukoncen.
>
> Progr-Amather -Kchodl-(r) 1989-2000
Detekce kodovani cestiny
[*] Pavel Polak <pavelp(zv)bnsoft(tec)cz> - 5.4.2000 14:29:30
uz jsem to vyresil dik za pomoc
S pozdravem
Pavel Polak - pavelp(zv)bnsoft(tec)cz
> Dne 4 Apr 00 v 13:21, napsal(a) Jan Fiala:
>
> > Posilam kousek kodu, ktery pozna 1250, Latin II a Kameniky. Podminkou je
mit
> > reprezentativni kousek textu. Funguje to na detekci pismen, ktere se v
jinych CP
> > nevyskytuji. Snad si z toho neco vyberes.
> Jen jestli detekce podle jednoho samostatneho pismene bude dostatecna.
> Napadaji me mozne problemy s ramecky, ktere v jinych kodech predstavuji
> pismena ceske abecedy, apod.
>
> > ----- Original Message -----
> > From: Pavel Polak <pavelp(zv)bnsoft(tec)cz>
> >
> > > Zdravim!
> > >
> > > Mam dotaz zkousel jsem uz hledat archivu a nic jsem nenasel co se tyce
> > > problemu detekce kodovani cestiny. Nevite nekdo neco o tom?
> Kdysi davno jsem to resil jako rocnikovy projekt. Detekce probiha na
> zaklade vyhledavani fragmentu slov, detekuje to Win1250, Kameniky, Latin-
> 2, ciste ASCII. Bude- li zajem vyhrabu to z archivu a dam k dispozici.
>
> Zdar a silu.
>
> Vladimir Novacek
>
> VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
> Zborovska 15 fax+BBS: 05-41240246
> 616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
> Ceska Republika http://www.vanicek(tec)cz
Detekce ztrata spojeni u tClientSocket (D5prof)
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 5.4.2000 14:38:15
Hi all,
potreboval bych poradit s nasledujicim problemem:
1. pisu klientskou stranu komunikacniho protokolu pres TCP/IP, ktera vypada tak, ze se pripojim na server, naloguju se na nej, ale pak jsem na prijmu a cekam, az mi server neco posle.
2. Kdyz shodim na strane serveru spojeni, tak to nejsem schopen zjistit jinak, nez si na ten server pinknout.
3. Testovani tClientSocket.Active nebo tClientSocket.Socket.Connected se tvari, jako kdyby spojeni stale existovalo.
4. Zkousel jsem pomoci select() testovat chybu na socketu, a take nic.
Neumel by mi nekdo poradit, jak ve stavu cekani na prijem zjistit, ze mi spadlo spojeni?
Thanx pf, Petr.Fejfar(zv)callnet(tec)cz
InterBase & IBDataSet & Memo ( Blob )
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 5.4.2000 14:52:34
Hi,
Muzu pouzit IBDataset na editaci Memo polozek ( Blob subtype 1)
Ja to zkusil a zdanlive to chodi, ale chova se to zvlastne, Mam ale
napsano napr. v InsertSQL
insert into tab (Klic,Memo) VALUES (:klic, :Memo)
Pokud takto ne, tak jak tedy. Dekuji.
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
jen jedna instance programu
[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 5.4.2000 15:13:05
> Prosim o radu. Jak se da zajistit aby se program dal spustit jen jednou.
Z voleje me napadaji tyto moznosti.
1. Pri spusteni vytvorit mutex. Pokud toto nelze program ukoncit.
2. Poslat zpravu vsem aplikacim a cekat na odpoved. Pri obdrzeni odpovedi
program ukoncit.
Dalsi mozna priste.
Josef Cerny
********************************************
* Josef A. Cerny
* analyst and programmer
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* e-mail : cerny(zv)atlascon(tec)cz
* WWW : http://www.atlascon(tec)cz
********************************************jen jedna instance programu
[*] Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz> - 5.4.2000 14:24:44
Cau,
Prosim o radu. Jak se da zajistit aby se program dal spustit jen jednou.
S d�ky
Amatersky programator J.C.Error po vice insertech MS SQL serveru
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 5.4.2000 15:38:51
> Mno, V MODBC to jest, lec pri otevreni se dynamicky cursor zmeni na
> staticky a nikdy jinak. Spise by mne zajimalo jak nastavit kurzory na
> serveru, kdyz to mODBC nevyuziva a jak je pouzivat.
Tak v tom Ti neporadim. Myslim ale, ze kurzor neni na serveru
nejak implicitne nastaven, ze to si urcuje mQuery. Mozna by stalo
za to se podivat do zdrojaku, zda se hodnota property, kterou
nastavis, skutecne vyuziva, nebo zda tam ve skutecnosti nestrkaji
natvrdo staticky kursor. Muze to byt ale dost neprijemna prace,
mozna to nebude uplne pruzracne.
Jiny pokus: kdyz vyhodis DisableControls a EnableControls a
po skonceni vsech insertu udelas na te tabulce ci query, co je na
ni napojen Grid, Active := False; Active := True; -> nezlepsi se to?
Sice to blikne, ale jde jen o provozni pokus.
David
Ako zistit pismeno jednotky CD-ROM
[*] Ing. Tibor G. �tromajer <tibors(zv)datex.sk> - 5.4.2000 16:11:00
Zdravim vsetkych
Pracujem na programe, v ktorom potrebujem zistit ake pismeno jednotky ma CD-ROM a tiez by som potreboval zistit aktualne rozlisenie obrazovky a velkost pamate VGA karty.
Vie mi niekto pomoct ?
Ako zistit pismeno jednotky CD-ROM
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 5.4.2000 16:14:01
<FontFamily><param>Arial CE</param>Pismenko CDRomky naleznes snadno - prikladam ukazku
vytrzenou z meho programu: // Musim najit prvni CDROMku
CDLetter := ' '; // zadna CDROMKA
// Zjisteni CDROMky na pocitaci
for Z := 'C' to 'Z' do begin
Root := Z+':\';
DriveType := GetDriveType (PChar (Root));
if ((DriveType and DRIVE_CDROM) = DRIVE_CDROM) then
begin
// Nalezena CDROmka
CDLetter := Z;
break;
end;
end;
Petr<FontFamily><param>Times New Roman</param><bigger>
<nofill>
,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
Ako zistit pismeno jednotky CD-ROM
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 5.4.2000 16:24:06
Ahoj, rozliseni zjistis pres objekt Screen (.Width, .Height),
na to pismeno jednotky se mrkni na API funkci GetDriveType.
Ad 3 - nevim.
Dobra.
> ----------
> Od: Ing. Tibor G. > �tromajer[SMTP:tibors(zv)datex.sk]
>
> Pracujem na programe, v ktorom potrebujem zistit ake pismeno jednotky ma CD-ROM a tiez by som potreboval zistit aktualne rozlisenie obrazovky a velkost pamate VGA karty.
> jen jedna instance programu
[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 5.4.2000 16:28:39
Ahoj,
zkus mrknout sem http://www.delphi(tec)cz/faq.asp?faq=27
Ales
----- Original Message -----
From: Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 05, 2000 3:24 PM
Subject: jen jedna instance programu
> Cau,
>
> Prosim o radu. Jak se da zajistit aby se program dal spustit jen jednou.
>
> S d�ky
> Amatersky programator J.C.
Jeste jednou seznam SQL serveru
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.4.2000 17:20:34
On 5 Apr 00, at 10:12, David Lebeda wrote:
> > Pokud ty servery maji OLE DB provider (tyka se tedy zejmena MS SQL,
> > ale i nekterych dalsich db) a mas NT sit, pak to lze docela dobre
> > zjistit pomoci OLE DB. Zfleku ti vsak nereknu jak, protoze to
> > zpameti neznam, takze je to prace na nekolik hodin.
>
> jde mi skutecne o MS SQL servery, ale s tou siti to je obecne
> otazka. Delam instalacni program a tezko muzu predvidat, co
> budou zakaznici vsechno mit. Dekuju za typ, na druhou stranu nez bych
> se vubec seznamil s OLEDB tak, abych si to dokazal odprogramovat sam,
> by to Combo bylo silene drahe (moc casu) a za to to nestoji. Budu
> tajne doufat, ze spravce serveru u zakaznika vi zpameti, jak se
> prislusny server jmenuje :) a napise to rucne.
Pokud pouzijes napriklad ADO komponenty, tak pri prihlasovani k
danemu provideru se objevi seznam dostupnych serveru (pokud je
na pocitaci radne nainstalovan DCOM). Hacek je ovsem v tom, ze
napriklad v NoWell-acke siti nemusi byt videt cely seznam.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Struktura disku a adresaru
[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 5.4.2000 15:30:29 met-1
Ahoj!
Ve sve aplikaci bych chtel mit TreeView se strukturou disku
(FDD, HDD i sit) a adresaru na kazdem z nich. Tj. napr.
Plocha
|
- -- Tento pocitac
| +-- Disketa 3,5 (A:)
| +-- Win98 (C:)
| +-- Audio CD (D:)
+-- Okolni pocitace
atd.
(Proste neco takoveho, jako ma napr. program WinZip, kdyz zadavam
cilovy folder pro rozbaleny soubor.)
Neni mi ale jasnych nekolik veci:
- odkud se tahaji prislusne ikony (pro disketu, disk, CD ,...)
- jak zjistim, zda se jedna o Audio CD ci Data CD
- odkud se nactou "jmena" jednotlivych radku (napr.Tento pocitac,
Disketa 3,5, Okolni pocitace ...). Jsem presvedcen, ze je to
asi nekde v registrech, ale nevim kde.
Diky za kazdou radu, priklad ci demo.
Jirka.
+-------------------------+---------------------------------+
| Jiri NOVOTNY, Olomouc, | e-mail: novotny(zv)ftknw.upol(tec)cz |
| Czech Republic | http://risc.upol(tec)cz/~novotnyj |
| | ICQ: 9495586 |
+-------------------------+---------------------------------+
| ... and objects in the rear view mirror can appear closer |
| than they are |
+-----------------------------------------------------------+tisk pres pokladni tiskarny v delphi
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 5.4.2000 19:05:24
ahoj
Ma nekdo zkusenosti tiskem pres pokladni ( bankovni ) tiskarny v DELPHI
tiskarny od vyrobce STAR
Diky
S pozdravem Heinisch Jiri
seriova komunikace na 1 PC
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 5.4.2000 19:07:33
ahoj
Chtel bych si vyzkouset seriovou komunikaci
lze vysilat a zaroven prijimat data na jednom pocitaci, napriklad mezi COM1
a COM 2 ?
Diky
S pozdravem Heinisch Jiri
Prenos datoveho zdroje do DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.4.2000 22:38:59
From: Bc. Libor Filip <filip(zv)agrokonzulta(tec)cz>
> Mam exe, ve kterem je umistena komponenta TQuery a TDataSource.
> Adresu na TDataSource si poslu do DLL a v DLL tento DataSource pripojim
> na TDBGrid nebo TDBLookupComboBox. Bohuzel se to nechova korektne.
> Nevite jaky by byl spravny postup, abych v DLL mohl s temito komponentami
> pracovat? (Jestli je to vubec mozne).
Ahoj,
V tomto pripade musi byt jak EXE tak DLL prelozeno s balicky.
Petr Vones, amatersky programator
seriova komunikace na 1 PC
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.4.2000 22:38:34
From: Heinisch Jiri <deis(zv)deis(tec)cz>
> Chtel bych si vyzkouset seriovou komunikaci
> lze vysilat a zaroven prijimat data na jednom pocitaci, napriklad mezi COM1
> a COM 2 ?
Lze. Navic je to pomerne dobry zpusob testovani aplikaci, pokud si vyrobis
softwarovy emulator zarizeni s kterym ma tvoje aplikace komunikovat.
Petr Vones, amatersky programator
jen jedna instance programu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.4.2000 22:38:53
From: Cerny Jiri <cerny(zv)jablonec.uhul(tec)cz>
> Prosim o radu. Jak se da zajistit aby se program dal spustit jen jednou.
http://ww6.borland.com/codecentral/ccweb.exe/listing?id=13315
Petr Vones, amatersky programator
Jak zjistit, ze DOS program skoncil....
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.4.2000 22:38:50
From: Delphi <delphi(zv)dcomm(tec)cz>
> mam aplikaci v Delphi, ktera spousti dosovsky EXE. Musim pockat nez se exe
> ukonci abych mohl pokracovat dale ve zpracovani meho prg.
> Jak zjistim, ze Handle toho dosoveho prg znm. ukoncen, je jen otevrene okno?
> Pak vim jak ho uzavrit, ale netusim jaky handle znm. ukonceni.
Ahoj,
Pokud spoustis normalni proces (rozumej Win32), tak pockat na jeho dokonceni
neni problem. Z dotazu mam pocit, ze ti jde o situaci, kdy se dokonci DOSova
aplikace a na obrazovce ti zustane okno "Dokonceno - blabla". Tohle lze resit
nastavenim ve vlastnostech DOSoveho EXE -> Program -> Pri skonceni zavrit.
Petr Vones, amatersky programator
Jak zjistit, ze proces neni ukoncen?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.4.2000 22:48:56
From: Karel Klime� <kchodl(zv)email(tec)cz>
> Pomoci CreateProcess vytvorim proces (jedna se o nejakou aplikaci, kterou
> muze uzivatel kdykoliv zavrit). Jak lze zjistit, ze tento proces stale bezi
> ci ze byl ukoncen.
Ahoj,
tohle se tu probiralo, viz moje odpoved "Re: Dusledky fce TerminateProcess"
ze 4.4.
Petr Vones, amatersky programator
seriova komunikace na 1 PC
[*] Erik Salaj <winsoft(zv)napri.sk> - 6.4.2000 00:07:03
> lze vysilat a zaroven prijimat data na jednom pocitaci, napriklad mezi
COM1
> a COM 2 ?
Pokial ich prepojis kablom, tak ano.
Erik
QuickReport - prevod ze stare verze
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.4.2000 00:32:32
ahoj,
A neslo by to v QR 1.1 ulozit do clipboardu a v QR2 to pastenout (melo by si
to pamatovat pozici a rozmery)
M.Jirman
>From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
>
>Ahoj,
>
>Tenhle problem mam take. Zkusil jsem to nejprve p�ev�st do Delphi 3, kter�
>um� jist�m zp�sobem konvertovat QR1.1 do QR2. Kazdy muj QRLabel je >ale
>obalen do SHAPE (jsou to v podstate tistene formulare) a i kdyz se prevod
>povedl a formular byl v QR2, tak mi to znicilo vsechny SHAPE (resp.
>postavilo je to do vychozich rozmeru). Tak jsem to zatim odlozil, protoze
to
>predelavat je hruza (jen SHAPE je na 600 v jednom formulari).
>
>Jaro B.
Adoexpres
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.4.2000 00:32:43
ahoj,
neproblikavajici a taky korektnejsi je udelat TADOQuery.Requery
M.Jirman
P.S: Uz se tady jednou probiralo, ze je lepsi TADODataset
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, March 30, 2000 3:39 PM
Subject: Adoexpres
Dobry,
mam jednu tabulku. Na nu som napojeny pomocou komponent AdoExpress z D5.
Jedna komponenta AdoTable je napojena na tuto tabulku a taktiez jedna AdoQuery. Ak zmenim nieco cez komponentu AdoTable, v AdoQuery mam stale stary stav. Skusal som to obnovit ze po zmene v AdoTable spravim na ADoQuery aktive false a true, ale DBGRID napojeny na ADoQuery mi preblikne. Ako na to ist ?
MArtin
Nastaveni fontu
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.4.2000 00:34:05
ahoj,
mel jsem stejny problem a P.Vones mi poradil rozsahlejsi unit,
ktery umoznil treba i nefunkcni zmenu barvy pisma.
unit HintWindowFixD5;
interface
uses
Windows, Messages, Classes, Forms, Controls;
type
THintWindowFix = class(THintWindow)
private
procedure HintFontChanged(Sender: TObject);
protected
procedure Paint; override;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
end;
implementation
{ THintWindowFix }
constructor THintWindowFix.Create(AOwner: TComponent);
begin
inherited;
Screen.HintFont.OnChange := HintFontChanged;
end;
destructor THintWindowFix.Destroy;
begin
Screen.HintFont.OnChange := nil;
inherited;
end;
procedure THintWindowFix.HintFontChanged(Sender: TObject);
begin
Canvas.Font := Screen.HintFont;
end;
procedure THintWindowFix.Paint;
var
R: TRect;
begin
R := ClientRect;
Inc(R.Left, 2);
Inc(R.Top, 2);
DrawText(Canvas.Handle, PChar(Caption), -1, R, DT_LEFT or DT_NOPREFIX or
DT_WORDBREAK or DrawTextBiDiModeFlagsReadingOnly);
end;
initialization
HintWindowClass := THintWindowFix;
end.
M.Jirman
> From: garalda <garalda(zv)mail(tec)cz>
> > >> Nezkouseli jste nekdo nastavovat font u Hintu?
> > Pro verzi D4 Pro. (Ja hlava dubova. :-)
>
Custom List Box.
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 6.4.2000 01:17:46
Zdravim.
Kopnite ma spravnym smerom.
Potreboval by som komponentu na baze ListBox, ale aby mala moznost
checkovania items-ov (ako RxCheckListBox) a ku kazdemu itemu sa dalo
definovat jedno integer cislo.
Poradte mi kde by som take nieco zhonal alebo ako by som upravil nejaky
ancestor.
dakujem
Roland.Struktura disku a adresaru
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 6.4.2000 05:43:29
Podivej se do prikladu, prilozenych k Delphi a najdi si VirtualTreeView
Jan Fiala
----- Original Message -----
From: Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz>> Ahoj!
>
> Ve sve aplikaci bych chtel mit TreeView se strukturou disku
> (FDD, HDD i sit) a adresaru na kazdem z nich. Tj. napr.
>
> Plocha
> |
> - -- Tento pocitac
> | +-- Disketa 3,5 (A:)
> | +-- Win98 (C:)
> | +-- Audio CD (D:)
> +-- Okolni pocitace
>
> atd.
> (Proste neco takoveho, jako ma napr. program WinZip, kdyz zadavam
> cilovy folder pro rozbaleny soubor.)
>
> Neni mi ale jasnych nekolik veci:
> - odkud se tahaji prislusne ikony (pro disketu, disk, CD ,...)
> - jak zjistim, zda se jedna o Audio CD ci Data CD
> - odkud se nactou "jmena" jednotlivych radku (napr.Tento pocitac,
> Disketa 3,5, Okolni pocitace ...). Jsem presvedcen, ze je to
> asi nekde v registrech, ale nevim kde.
>
> Diky za kazdou radu, priklad ci demo.
>
> Jirka.
> +-------------------------+---------------------------------+
> | Jiri NOVOTNY, Olomouc, | e-mail: novotny(zv)ftknw.upol(tec)cz |
> | Czech Republic | http://risc.upol(tec)cz/~novotnyj |
> | | ICQ: 9495586 |
> +-------------------------+---------------------------------+
> | ... and objects in the rear view mirror can appear closer |
> | than they are |
> +-----------------------------------------------------------+
> Ako zistit pismeno jednotky CD-ROM
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.4.2000 05:59:57
Behalf Of Ing. Tibor G. �tromajer
>Pracujem na programe, v ktorom potrebujem zistit ake pismeno jednotky ma
CD-ROM a tiez by som potreboval zistit aktualne
Ahoj.
Pri psani toho programu si uvedom, ze na stroji muze byt vice CD-ROM a take,
ze CD-ROM nemusi byt lokalni a ze muze byt na siti. Znam par radoby chytrych
programku, ktere jsou v takove situaci nepouzitelne. Nejlepsi je "zeptat" se
uzivatele.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
Detekce kodovani cestiny
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.4.2000 05:59:58
Behalf Of novacek(zv)vanicek(tec)cz
> Jen jestli detekce podle jednoho samostatneho pismene bude dostatecna.
> Napadaji me mozne problemy s ramecky, ktere v jinych kodech predstavuji
> pismena ceske abecedy, apod.
Ahoj.
Pochopitelne se to prekryva, takze pokud text obsahuje jen par
"diakritickych" pismen pak nekdy nelze zjistit o co jde.
Take klasicke DOS ramecky "stahuji" detekci Latin 2 k ISO. Hotove reseni
najdes na http://www.langpad(tec)cz
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
komponenta nebo API pro obsluhu vypalovac�ch CD
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.4.2000 06:00:00
Behalf Of Karel Huda�
> Nejjednodussi je nainstalovat si DirectCD od Adaptecu, CD-ROM se pak tvari
> jako disk a da se s nim normalne pracovat. Funguje s CD-ROM i CD-RW.
> Vypalovacka musi podporovat packet-writing ale to snad jiz kazda umi.
> CD-ROM jsou citelne jen na vypalovacce, dokud je nuzavres, pak kdekoliv.
Pozor. Jen pro Win 9x,NT. Pod cistym DOSem (napriklad pri startu z diskety)
je neprectes.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
IB6 jak zacit a jak to s ni bude
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.4.2000 06:00:01
Zdravim vsechny.
1) Chtel bych zacit s Interbasi. Poradte prosim nejake odkazy a literaturu,
jde mi hlavne o nejake funkcni priklady a "startovni" ceskou knihu stylu
Mistrovstvi v Delphi od M.Cantu pro zakladni pochopeni cele organizace nez
se zacnu prodirat originalni dokumentaci v anglictine.
2) Nemate nekdo zpravy o tom jak bude vypadat licencovani IB6. Zda to bude
(financne) pouzitelne i pro drobne aplikace psane na zakazku, ktere se v
zadnem pripade nebudou prodavat po stovkach kusu.
Diky
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
tisk pres pokladni tiskarny v delphi
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 6.4.2000 06:47:34
Taky jsem s tim dlouho bojoval. jedna se vetsinou o seriove tiskarny, coz vec
trochu komplikuje. Na W9x jde pouzit znakova tiskarna - je treba upravit v
definici tiskarny (jde o soubor \Windows\TTY.DAT) znakovou sadu (tiskarna ma
latin II nebo Kameniky) a pak jde tisknout i s cestinou. Na NT se mi to zatim
nepodarilo, protoze jak je zvykem M$, tisk je delany uplne jinak. Pak jsou dalsi
moznosti - tisknout primo na tiskarnu, tisk si ulozit napred do souboru a
prikazem Copy ho na tiskarnu zkopirovat.
Jan Fiala
P.S. Viz AutoCont Vyskov
----- Original Message -----
From: Heinisch Jiri <deis(zv)deis(tec)cz>> ahoj
>
> Ma nekdo zkusenosti tiskem pres pokladni ( bankovni ) tiskarny v DELPHI
> tiskarny od vyrobce STAR
>
>
> Diky
>
> S pozdravem Heinisch Jiri
>
>RichEdit-nacteni souboru
[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 6.4.2000 07:26:15
Ahoj
nevi nekdo jak zrychlit nacteni vetsiho - cca 4-7MB
souboru (PlainText) do RichEditu ?
4MB mi trva priblizne ( nekonecnych ) 18 sec.
Pozn.:
Zkousel jsem mimo jine napr. volat RichEdit.Lines.BeginUpdate a EndUpdate,
ale nemelo to na rychlost nacitani zadny vliv.
Diky za kazdou odpoved.
Zdenek Fryz
__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.
seriova komunikace na 1 PC
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 6.4.2000 07:28:34
No a pokud mas jen jeden port volny, tak
zakup konektor 9 pinovy a propoj sobe
kouskem cinu piny 2 a 3 a muzes fungovat
i s jednim portem, tedy pokud nevadi, ze to
co vysles si taky poslechnes.
Martin
Struktura disku a adresaru
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.4.2000 07:40:14
On 5 Apr 00, at 15:30, Jiri Novotny wrote:
> Ve sve aplikaci bych chtel mit TreeView se strukturou disku
> (FDD, HDD i sit) a adresaru na kazdem z nich. Tj. napr.
>
> Plocha
> |
> - -- Tento pocitac
> | +-- Disketa 3,5 (A:)
> | +-- Win98 (C:)
> | +-- Audio CD (D:)
> +-- Okolni pocitace
Tak zkus toto:
procedure TMsdeFrm.ProgramDirButtonClick(Sender: TObject);
var
RootDir:WideString;
OutDir:string;
begin
RootDir:='';
if SelectDirectory('Huraa!', RootDir, OutDir) then
ProgramDir.Text:=OutDir;
end;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
jen jedna instance programu
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.4.2000 07:40:14
On 5 Apr 00, at 14:24, Cerny Jiri wrote:
> Prosim o radu. Jak se da zajistit aby se program dal spustit jen
> jednou.
Do .dpr dej toto:
var
Hwnd:THandle;
begin
Hwnd:=FindWindow('TTvujHlavniForm',nil);
if Hwnd<>0 then
begin
if not IsWindowVisible(Hwnd) then Application.Restore;
SetForegroundWindow(Hwnd);
Exit;
end;
...
end.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OT:mail klient
[*] Ing. Tibor G. �tromajer <tibors(zv)datex.sk> - 6.4.2000 07:42:56
Skus Pegasus Mail. Je upne free. Je vo verzii pre DOS , WIndows aj WIn32. Okrem ineho umoznuje aj fungovanie posty v lok. sieti na Netware serveri
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, April 05, 2000 6:51 AM
Subject: OT:mail klient
poradte nejakeho free email klienta ale nie Outlooku a Outlooku Express.
Martin
mail klient
[*] Martin <geoplan(zv)pp.sinet.sk> - 6.4.2000 07:46:02
je to nejak obmedzene ?
----- Original Message -----
Od: Lubos RYBNICEK <mosek(zv)admiton(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odoslan�: 5. apr�l 2000 11:56
Predmet: RE: mail klient
> Co The Bat?
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Martin
> Sent: Wednesday, April 05, 2000 6:52 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: OT:mail klient
>
>
> poradte nejakeho free email klienta ale nie Outlooku a Outlooku Express.
>
> Martin
>Jak na distribuci?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 07:55:50
Ahoj,
chtel bych vas poprosit o nejake postrehy k distribuci programu
vyuzivajicich nejaky SQL server, konkretne toto:
Na SQL serveru u zakaznika je treba vytvorit databazi a necim
ji predvyplnit. Otazka je, jak toto efektivne vyresit. Mam pripraveny
Script ze sve databaze a staci ho spustit u zakaznika. Nevim ale,
jestli je rozumne ho jen tak prilozit na instalacni CD, nebo jestli je
vhodne ho nejak zakodovat apod. Jak to resite vy?
David
Delivery reports about your email
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.4.2000 07:56:16
Grrrrrrrrrr,
kterych hrisniku se toto tyka???
------- Forwarded message follows -------
To: zhlinka(zv)login(tec)cz
From: The Post Office <postmaster(zv)centrum(tec)cz>
Subject: Delivery reports about your email
Date sent: Wed, 5 Apr 2000 17:48:19 +0200
This is a collection of reports about email delivery
process concerning a message you originated:
<smtp sms.paegas(tec)cz +420604849913(zv)sms.paegas(tec)cz 65534>:
...\
<<- RCPT To:<+420604849913(zv)sms.paegas(tec)cz>
ORCPT=rfc822;+2B420604849913(zv)sms.paegas(tec)cz ->> 550
<+420604849913(zv)sms.paegas(tec)cz>... User unknown
------- End of forwarded message -------
------- Forwarded message follows -------
To: zhlinka(zv)login(tec)cz
From: The Post Office <postmaster(zv)centrum(tec)cz>
Subject: Delivery reports about your email
Date sent: Wed, 5 Apr 2000 17:48:24 +0200
This is a collection of reports about email delivery
process concerning a message you originated:
<smtp sms.paegas(tec)cz +420603538510(zv)sms.paegas(tec)cz 65534>:
...\
<<- RCPT To:<+420603538510(zv)sms.paegas(tec)cz>
ORCPT=rfc822;+2B420603538510(zv)sms.paegas(tec)cz ->> 550
<+420603538510(zv)sms.paegas(tec)cz>... User unknown
------- End of forwarded message -------
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Custom List Box.
[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 6.4.2000 08:48:24
Toto predsa dokaze aj uplne obycajny CheckListBox a integery si mozes
ukladat do Items.Objects
----- Original Message -----
From: Roland Turcan (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 06, 2000 1:17 AM
Subject: Custom List Box.> Zdravim.
>
> Kopnite ma spravnym smerom.
>
> Potreboval by som komponentu na baze ListBox, ale aby mala moznost
> checkovania items-ov (ako RxCheckListBox) a ku kazdemu itemu sa dalo
> definovat jedno integer cislo.
>
> Poradte mi kde by som take nieco zhonal alebo ako by som upravil nejaky
> ancestor.
>
> dakujem
>
> Roland.
>
>RichEdit-nacteni souboru
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 6.4.2000 08:50:45
> nevi nekdo jak zrychlit nacteni vetsiho - cca 4-7MB
> souboru (PlainText) do RichEditu ?
> 4MB mi trva priblizne ( nekonecnych ) 18 sec.
Zkusil bych jinou editacni komponentu (napr. TPLUSMEMO - sice shareware za
29 dolaru, ale mohu jen doporucit).
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
jen jedna instance programu
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 6.4.2000 08:50:42
Pozor, takove obnoveni aplikace nechodi korektne od IE 4.0, program pouze zacne
blikat na liste a neobnovi
se. V tomto pripade je nutne poslat zpravu aplikaci a v ni zavolat
Application.Restore.
Jan Fiala
----- Original Message -----
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>> On 5 Apr 00, at 14:24, Cerny Jiri wrote:
>
> > Prosim o radu. Jak se da zajistit aby se program dal spustit jen
> > jednou.
>
> Do .dpr dej toto:
>
> var
> Hwnd:THandle;
> begin
> Hwnd:=FindWindow('TTvujHlavniForm',nil);
> if Hwnd<>0 then
> begin
> if not IsWindowVisible(Hwnd) then Application.Restore;
> SetForegroundWindow(Hwnd);
> Exit;
> end;
> ...
> end.
Prenos datoveho zdroje do DLL
[*] Bc. Libor Filip <filip(zv)agrokonzulta(tec)cz> - 6.4.2000 08:58:01
From: Bc. Libor Filip <filip(zv)agrokonzulta(tec)cz>
> Mam exe, ve kterem je umistena komponenta TQuery a TDataSource.
> Adresu na TDataSource si poslu do DLL a v DLL tento DataSource pripojim
> na TDBGrid nebo TDBLookupComboBox. Bohuzel se to nechova korektne.
> Nevite jaky by byl spravny postup, abych v DLL mohl s temito komponentami
> pracovat? (Jestli je to vubec mozne).
Ahoj,
V tomto pripade musi byt jak EXE tak DLL prelozeno s balicky.
Petr Vones, amatersky programator
Diky skvele to funguje.
[Libor Filip] treeview a expand
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 6.4.2000 09:09:54
>> Da sa nejak v TTreeView docielit, aby polozka, ktora nema pod
>> sebou potomkov bola oznacena '+' a dala sa rozbalit?
>> - Potomkov by som chcel nacitavat az pri rozbalovani, strom je
>> rozsiahly a jeho nacitavanie trva velmi dlho...
> Tak tam dej jeden node, kterej si nejak poznacis
> (treba pomoci Data) a pokud pri OnExpanding
> narazis na tohoto poznaceneho, tak jej smazes
> a nactes skutecna data. :-)
Neni potreba delat nejaky pomocny poduzel a ten pak rusit. Staci pri
vytvoreni vychoziho uzlu udelat:
with TreeView.Items.AddChildObject(Node, 'nazev', TXxx.Create) do
HasChildren := true; // aby tam byla znacka PLUS a fungovalo OnExpanding
kde TXxx = class(TObject) a pak v tom OnExpanding udelat:
if Assigned(Node.Data) and (TObject(Node.Data) is TXxx) then
... testovat, zda dana vetev jeste neni vytvorena a pak ji vytvorit nebo
obcerstvit
S pozdravem
Ing. Pavel Kriz
TDS - Technicky a databazovy software
Praha 8, Palaskova 1107/2
tel./fax: 02/ 6891 444
mobil: 0603/ 145613
http://www.tds-technik(tec)cz
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Daniel Rott
Sent: Wednesday, April 05, 2000 10:34 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: treeview a expand
> Da sa nejak v TTreeView docielit, aby polozka, ktora nema pod
> sebou potomkov bola oznacena '+' a dala sa rozbalit?
> - Potomkov by som chcel nacitavat az pri rozbalovani, strom je
> rozsiahly a jeho nacitavanie trva velmi dlho...
Tak tam dej jeden node, kterej si nejak poznacis
(treba pomoci Data) a pokud pri OnExpanding
narazis na tohoto poznaceneho, tak jej smazes
a nactes skutecna data. :-)
Daniel
Quick report na Minolte
[*] Podrazsk� Daniel <Podrazsky(zv)hzs.mepnet(tec)cz> - 6.4.2000 09:15:10
Zdarec delphaci,
A uz mam zase problem. Netusite nekdo proc mi na tiskarne Minolta PagePro8
netiskne cesky
Quick report ? Tisknu formular, kde jako podklad je Image a na nem jsou
textova pole. Pouzivam
font Fixedsys a ten je ve WIN98 nainstalovanej.
Diky za kazdou radu Dundee
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.134 / Virov� b�ze: 63 - datum vyd�n�: 20.3.2000
Jak na distribuci?
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 6.4.2000 09:27:26
Osobne bych nedaval nikde zadny script, nevim jestli vsechny typy databazi,
ale ORACLE i ASA od Sybase maji ve scriptu, pokud se pouzije unload i radky
obsahujici jmeno uzivatele i heslo (!!!) a existuje i zpusob jak se
prihlasit bez znalosti hesla v citelnem tvaru ( i tento je obsazen ve
scriptu ).
connect user <uzivatel> identified by <heslo nebo zakodovane heslo v HEX
tvaru>
Ja pouzivam kopii databaze s predvyplnenymi daty.
Ing. Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
David Lebeda
Odesl�no: 6. dubna 2000 7:56
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Jak na distribuci?
Ahoj,
chtel bych vas poprosit o nejake postrehy k distribuci programu
vyuzivajicich nejaky SQL server, konkretne toto:
Na SQL serveru u zakaznika je treba vytvorit databazi a necim
ji predvyplnit. Otazka je, jak toto efektivne vyresit. Mam pripraveny
Script ze sve databaze a staci ho spustit u zakaznika. Nevim ale,
jestli je rozumne ho jen tak prilozit na instalacni CD, nebo jestli je
vhodne ho nejak zakodovat apod. Jak to resite vy?
David
Delphi days a MSDE
[*] Tom =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 06.4.2000 09:35:30
Ahoj,
> Ren� Otisk wrote:
>
> Hi,
>
> V lednu na Delphi days jsme dostali original CD s MSDE. Muzeme MSDE
> volne sirit? V licenci jest uvedeno, ze se smi pouzivat a sirit jen,
> je li zakoupena licence na Interdev, VB, C++ ... Mam delphi (coz
> zaplatpanbuh neni produkt Microsoftu) a ted babo rad! Poradi mi nekdo?
myslim, ze jsi si odpovedel sam ...
> Sroub
--
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Interbase & Memo [2]
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 6.4.2000 09:55:25
Hi.
Uz jsem se jednou ptal a vypada to ze nikdo nevi jak pouzivat
memo na interbase. Vytvorit ho umim, ale nevim jak ho napojit na
TMemo, nejlepe pres TIBDataSet, jde to vubec ?????????
Dekuji
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
treeview a expand
[*] Robert Zak <nrsys(zv)psn.sk> - 6.4.2000 09:58:04
To sa sice da, ale ja som sa chcel prave vyhnut tomu aby som musel do
Treewiev pchat dvakrat tolko poloziek ako naozaj potrebujem.. Mozno robim
nieco zle, ale pokial nic nenastavim a pouzivam do items Add, trva mi napr.
400 poloziek aj 5-6 sekund.
Robo
Od: Daniel Rott <roxton(zv)atlas(tec)cz>
Predmet: Re: treeview a expand
>Tak tam dej jeden node, kterej si nejak poznacis
>(treba pomoci Data) a pokud pri OnExpanding
>narazis na tohoto poznaceneho, tak jej smazes
>a nactes skutecna data. :-)>> Da sa nejak v TTreeView docielit, aby polozka, ktora nema pod
>> sebou potomkov bola oznacena '+' a dala sa rozbalit?
>> - Potomkov by som chcel nacitavat az pri rozbalovani, strom je
>> rozsiahly a jeho nacitavanie trva velmi dlho...
>
Delphi days a MSDE
[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 6.4.2000 10:08:08
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Tusim, ze licenci k volnemu sireni je mozno ziskat i s Microsoft Office
verze Developer, coz je mozna prijatelnejsi nez kupovat vyvojovy nastroj
,ktery nepouziju.
Jaromir
Cermak
-----Original Message-----
From: Ren� Otisk [mailto:otisk(zv)misel(tec)cz]
Sent: Friday, December 31, 1999 8:56 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Delphi days a MSDE
Hi,
V lednu na Delphi days jsme dostali original CD s MSDE. Muzeme MSDE volne
sirit? V licenci jest uvedeno, ze se smi pouzivat a sirit jen, je li
zakoupena licence na Interdev, VB, C++ ... Mam delphi (coz zaplatpanbuh neni
produkt Microsoftu) a ted babo rad! Poradi mi nekdo?
Sroub
sprava pameti
[*] Pavel Hampl <phampl(zv)chmi(tec)cz> - 06.4.2000 08:16:40
Dekuju za podnety k rustu pameti, jeste podle delfi helpu se zda, ze za
to opravdu muze prubezna realokace pameti u objektu TFileList a
TStringList, kdyz se obcas neco pridava. Protoze se pohybuju v omezenem
mnozstvi polozek (radove stovky), tak se program chova podle pravidel
"trvale udrzitelneho zivota", tedy pomaleji a pomaleji se lisa k urcite
mezi, kterou nepreroste.
K tomu zvetsovani pole o jednicku (Daniel Rott) - asi dochazi k potizim
tehdy, kdyz po alokaci pole je alokovana jeste nejaka dalsi promenna nad
tim polem. Potom pri zvetseni velikosti zrejme dojde k realokaci CELEHO
pole v nove oblasti pameti a spotreba roste opravdu exponencialne. (bych
si myslel)
Jeste jednou diky
Pavel Hampl, druzicove oddeleni
Cesky Hydrometeorologicky Ustav
Jak provest script?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 10:19:41
Ahoj,
pred chvili jsem narazil na problem. Nechal jsem si vytvorit
databazovy script popisujici jeji vytvoreni, nevim ale, jak ho vykonat
z Delphi. Dam-li ho do Query, neuspeji. Jednak se mu nelibi slovo
GO, ale kdyz je odmazu, odmita provest Create View apod. Sice to
chapu, ze by se tezko poznavalo, kde to view konci, kdyz to
odmita GO, ale otazka je, co s tim? Kdyz to jde v MS Query
Analyzeru, melo by to nejak jit i z Delphi.
Pozor - program nepouziva BDE, takze nelze provest
komponentu z RxLib.
Konfigurace: D4 C/S, nonBDE komponenty, MSSQL 7, spojeni
pres ODBC.
Dik.
David
Jak na distribuci?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 10:29:23
Od: "Bosnis" <bosnis(zv)atlas(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
V�c: RE: Jak na distribuci?
Datum odesl�n�: Thu, 6 Apr 2000 09:27:26 +0200
Po�tovn� prog.: Microsoft Outlook 8.5, Build 4.71.2377.0
Odpov�� kam: delphi-l(zv)fwd(tec)cz
> Osobne bych nedaval nikde zadny script, nevim jestli vsechny typy
> databazi, ale ORACLE i ASA od Sybase maji ve scriptu, pokud se pouzije
> unload i radky obsahujici jmeno uzivatele i heslo (!!!) a existuje i
> zpusob jak se prihlasit bez znalosti hesla v citelnem tvaru ( i tento
> je obsazen ve scriptu ).
No, nejde o uplny script, databazi vytvorim z programu pomoci
CREATE Database a ve skriptu jsem ponechal jen vytvoreni
tabulek, pohledu a ulozenych procedur. Cili nejde o informace,
ktere by neslo ziskat snadno, i kdybych je utajil.
Server je MSSQL 7.
David
pause printer II
[*] Lubos Hubka <bruce(zv)pobox.sk> - 6.4.2000 10:50:12
>Pause tlaciarne mozes urobit pomocou
> BOOL SetPrinter(
> HANDLE hPrinter, // handle of printer object
> DWORD Level, // structure level
> LPBYTE pPrinter, // address of array containing printer data
> DWORD Command // printer-state command
> );
>
>Kde prikazy su :PRINTER_CONTROL_PAUSE, PRINTER_CONTROL_PURGE,
>PRINTER_CONTROL_RESUME a PRINTER_CONTROL_SET_STATUS
>Help je v WIN32 Reference ktora je sucastou D5 (aspon mojich). Je tam
>kompletny popis - len pouzit.
;))
Ano, ale nefunguje mi to.
;((
Problem mam (asi) zo zoskanim toho spravneho Handle Tlaciarne.
Uz som skusal OpenPrinter aj CreateDC a nic.
Tak som vyskusal TPrinter->Handle a ani to nepomohlo.
Viete mi niekto prosim poradit v com je problem ?
Vdaka.
/LH
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
OT: M$ Exchange
[*] Lubos Hubka <bruce(zv)pobox.sk> - 6.4.2000 10:51:55
Caute Delfinci.
Sorry za OT, ale neviete niekto o nejakom nastroji
mimo M$ Outlock, ktory by vedel stahovat spravy
zo servera MS Exchange?
Nie IMAP, ale nejaky vlastny blby M$ format.
Stacia aj nejake komponenty a ostatne si urobim sam.
Pripadne aspon nejaky odkaz, kde je popisane co to vlastne za protokol je
a ako sa nan pristupuje.
Vdaka.
/LH
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Web aplikace ISAPI
[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 06.4.2000 10:51:24
--=======44FA7AF9=======
Content-Type: text/plain; charset=us-ascii; format=flowed; x-avg-checked=avg-ok-563866
Caute,
mel bych par dotazu ohledne webove aplikace.
1. kdyz vytvorim dll aplikaci a spustim ji pres personal web server, tak uz
mi nikdy nedovoli prepsat to dll a musim restartovat comp. chtel bych se
zeptat, jakym zpusobem se to ma spravne delat?
2. da se webova aplikace debugovat a jak?
Dik za kazdou radu
--=======44FA7AF9=======
Content-Type: text/plain; charset=us-ascii; x-avg-checked=avg-ok-563866
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.127 / Virov� b�ze: 60 - datum vyd�n�: 21.2.2000
--=======44FA7AF9=======--
Interbase & Memo [2]
[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 06.4.2000 10:52:32
> Uz jsem se jednou ptal a vypada to ze nikdo nevi jak pouzivat
> memo na interbase. Vytvorit ho umim, ale nevim jak ho napojit na
> TMemo, nejlepe pres TIBDataSet, jde to vubec ?????????
Skutecne TMemo nebo TDBMemo?
TDBMemo podle me funguje "normalne" pres DataSource/DataField
A TMemo jsem plnil (pri prevodu dat) takhle
FIBQuery1.Params.ByName ['pozn'].AsString:=TabPOZN.AsString;
Ale byly to jen kratke texty.....
Takze predpokladam, ze by melo jit neco jako
FIBDataset1.FieldByName [ 'XXX' ].AsString := Memo.Lines.Text;
a naopak....
Ales
--
Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093
OT:konferencia - prihlasenie
[*] Lubos Hubka <bruce(zv)pobox.sk> - 6.4.2000 11:11:28
Caute Delfinci !
Nemozem sa prihlasit do konferencie
ako L.HUBKA(zv)trenkwalder.com
Teda majordomo prihlasenie potvrdi, ale
nemozem posielat maily do konferencie, ani mi ziadne nechodia. Konto mam na Exchange servery, moze to byt tym ?
Vdaka.
/LH
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Web aplikace ISAPI
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 6.4.2000 11:18:13
Ahoj
> 1. kdyz vytvorim dll aplikaci a spustim ji pres personal web server, tak
uz
> mi nikdy nedovoli prepsat to dll a musim restartovat comp. chtel bych se
> zeptat, jakym zpusobem se to ma spravne delat?
No to ne, neb s prvnim volanim DLL se tato natahuje do pameti a drzi se
jak kliste. Restartovat neni nutno, staci ukoncit pws.
> 2. da se webova aplikace debugovat a jak?
Stejne jako kazda jina aplikace:
do host aplication: das cestu a jmeno k personal web serveru
a parametry k spusteni: -w3svc
Pak po F9 se spusti pws a vhodne nastrazenym break pointem
muzes krokovat.
Alternativne muzes vyzkouset i PinkNetWebServer, rovnez podporujici
ISAPI skripty, cesky vcetne par prikladku, jak udelat skript nemajic
D3 C/S. http://ws.pinknet(tec)cz
Martin
Interbase & Memo [2]
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 6.4.2000 11:27:44
> > Uz jsem se jednou ptal a vypada to ze nikdo nevi jak pouzivat
> > memo na interbase. Vytvorit ho umim, ale nevim jak ho napojit na
> > TMemo, nejlepe pres TIBDataSet, jde to vubec ?????????
>
> Skutecne TMemo nebo TDBMemo?
Sorry samozrejme TDBMemo
> TDBMemo podle me funguje "normalne" pres DataSource/DataField
To je pravda
>
> A TMemo jsem plnil (pri prevodu dat) takhle
> FIBQuery1.Params.ByName ['pozn'].AsString:=TabPOZN.AsString;
Pouzivat TIBDataSet a tam je napr. v InsertSQL napsano :
insert into tabulka (klic, memo) VALUES (:klic,:memo) a to mi
nefunguje. Ono tak asi nejde ukladat Mema, ale jak tedy.> Ale byly to jen kratke texty.....
>
> Takze predpokladam, ze by melo jit neco jako
> FIBDataset1.FieldByName [ 'XXX' ].AsString := Memo.Lines.Text;
> a naopak....
>
> Ales
>
>
> --
>
> Ale� Radikovsk�
> mail: radik(zv)seznam(tec)cz
> tel: +420 603 300093
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
Jak provest script?
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 6.4.2000 11:31:58
misto GO zkus dat ;
Ing. Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
David Lebeda
Odesl�no: 6. dubna 2000 10:20
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Jak provest script?
Ahoj,
pred chvili jsem narazil na problem. Nechal jsem si vytvorit
databazovy script popisujici jeji vytvoreni, nevim ale, jak ho vykonat
z Delphi. Dam-li ho do Query, neuspeji. Jednak se mu nelibi slovo
GO, ale kdyz je odmazu, odmita provest Create View apod. Sice to
chapu, ze by se tezko poznavalo, kde to view konci, kdyz to
odmita GO, ale otazka je, co s tim? Kdyz to jde v MS Query
Analyzeru, melo by to nejak jit i z Delphi.
Pozor - program nepouziva BDE, takze nelze provest
komponentu z RxLib.
Konfigurace: D4 C/S, nonBDE komponenty, MSSQL 7, spojeni
pres ODBC.
Dik.
David
Quick report na Minolte
[*] �ampulka Ji�� <campulka(zv)czas(tec)cz> - 6.4.2000 11:53:43
----- P�vodn� zpr�va -----
Od: Podrazsk� Daniel <Podrazsky(zv)hzs.mepnet(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 6. dubna 2000 9:15
P�edm�t: Quick report na Minolte
> Zdarec delphaci,
>
> A uz mam zase problem. Netusite nekdo proc mi na tiskarne Minolta PagePro8
> netiskne cesky
> Quick report ? Tisknu formular, kde jako podklad je Image a na nem jsou
> textova pole. Pouzivam
> font Fixedsys a ten je ve WIN98 nainstalovanej.
Fixedsys je totiz rastrovej font a tak se pri tisku nahrazuje nakym jinym
fontem...
pause printer II
[*] J�n Grman�������e���zW��ۛg�$ - 6.4.2000 12:00:53
> Ano, ale nefunguje mi to.
> ;((
> Problem mam (asi) zo zoskanim toho spravneho Handle Tlaciarne.
> Uz som skusal OpenPrinter aj CreateDC a nic.
> Tak som vyskusal TPrinter->Handle a ani to nepomohlo.
1) Pomocou GetLastError a funkcie FormatMessage zisti aku chybu Ti ten
prikaz vrati (problem moze byt aj s pravami)
2) handle tlaciarne sa ziskava pomocou OpenPrinter (aspon podla helpu)
3) je dobre ziskat stare nastavenia tlaciarne pomocou GetPrinter, tie
modifikovat a potom podhodit zasa fcii SetPrinter
4) treba postupovat podla helpu - rozdiely su napriklad aj vo volani v
95kach a NTckach - a uspech sa musi dostavit (len ak nahodou nie)
JaNo.
----- Original Message -----
From: Lubos Hubka <bruce(zv)pobox.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 06, 2000 10:50 AM
Subject: RE: pause printer II
> > BOOL SetPrinter(
> > HANDLE hPrinter, // handle of printer object
> > DWORD Level, // structure level
> > LPBYTE pPrinter, // address of array containing printer data
> > DWORD Command // printer-state command
> > );
> >
> >Kde prikazy su :PRINTER_CONTROL_PAUSE, PRINTER_CONTROL_PURGE,
> >PRINTER_CONTROL_RESUME a PRINTER_CONTROL_SET_STATUS
> >Help je v WIN32 Reference ktora je sucastou D5 (aspon mojich). Je tam
Web aplikace ISAPI
[*] Jan Fryscak <fryscak(zv)scio(tec)cz> - 6.4.2000 12:03:05
Pokud mas NT, tak staci vypnout World Wide Web Publishing Service.
S debugovanim je to horsi (uz jsem se na to taky jednou v konferenci
ptal). Ja to resim vypisem do log souboru.
Honza
> Caute,
> mel bych par dotazu ohledne webove aplikace.
> 1. kdyz vytvorim dll aplikaci a spustim ji pres personal web
> server, tak uz
> mi nikdy nedovoli prepsat to dll a musim restartovat comp.
> chtel bych se
> zeptat, jakym zpusobem se to ma spravne delat?
> 2. da se webova aplikace debugovat a jak?
>
> Dik za kazdou radu
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.127 / Virov� b�ze: 60 - datum vyd�n�: 21.2.2000
> Instance objektu jako Variant
[*] David Podhola <podhola(zv)sprinx(tec)cz> - 6.4.2000 12:33:36
Dobry den,
nevite nekdo nahodou, jak pretypovat instanci objektu na variant? Tj pokud
mam:
deklarovano TPokus = class( TAutoObject, IPokus ) a chci instanci vytvorenou
pomoci TPokus.Create predat
napr. do Visual Basic Scriptu jako Variant a tam s ni dal pracovat?
Diky
David Podhola
QuickReport - prevod ze stare verze
[*] V. Nikel <vladimir.nikel(zv)vitkovice(tec)cz> - 6.4.2000 12:37:09
na strankach quickreportu ( www.qusoft.no ) je ke stazeni free
konvertor. funguje celkem velmi uspokojive az na prevedeni
nekterych shape.
V. Nikel
> ahoj,
>
> A neslo by to v QR 1.1 ulozit do clipboardu a v QR2 to pastenout (melo
> by si to pamatovat pozici a rozmery)
>
> M.Jirman
>
> >From: Bene Jaroslav <JBenes(zv)cpoj(tec)cz>
> >
>
> >Ahoj,
> >
> >Tenhle problem mam take. Zkusil jsem to nejprve p ev�st do Delphi 3,
> >kter� um� jist m zp sobem konvertovat QR1.1 do QR2. Kazdy muj QRLabel
> >je >ale obalen do SHAPE (jsou to v podstate tistene formulare) a i
> >kdyz se prevod povedl a formular byl v QR2, tak mi to znicilo vsechny
> >SHAPE (resp. postavilo je to do vychozich rozmeru). Tak jsem to zatim
> >odlozil, protoze
> to
> >predelavat je hruza (jen SHAPE je na 600 v jednom formulari).
> >
> >Jaro B.
>
>
Web aplikace ISAPI
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 6.4.2000 12:40:57
cele to je podrobne popsano v helpu Delphi, hledej "Debugging ISAPI and
NSAPI applications"
M.
----- Original Message -----
From: Honza Fiala <kvasar(zv)kvasar(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, April 06, 2000 10:51 AM
Subject: Web aplikace ISAPI
.
.
> 1. kdyz vytvorim dll aplikaci a spustim ji pres personal web server, tak
uz
> mi nikdy nedovoli prepsat to dll a musim restartovat comp. chtel bych se
> zeptat, jakym zpusobem se to ma spravne delat?
> 2. da se webova aplikace debugovat a jak?
.
.
OT:konferencia - prihlasenie
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 12:48:47
> Nemozem sa prihlasit do konferencie
> ako L.HUBKA(zv)trenkwalder.com
> Teda majordomo prihlasenie potvrdi, ale
> nemozem posielat maily do konferencie, ani mi ziadne nechodia. Konto
> mam na Exchange servery, moze to byt tym ? Vdaka. /LH
Mel jsem podobny problem a bylo to tim, ze jsem se prihlasoval
pod aliasem. Tj. oficialni mail mam David.Lebeda(zv)comarr(tec)cz, a k
nemu aliasy Lebeda(zv)comarr(tec)cz a par dalsich. A fungovalo to jen
pri tom oficialnim mailu.
David
Jak provest script?
[*] Marian Jonas <marian.jonas(zv)volny(tec)cz> - 6.4.2000 12:52:11
> Ahoj,
>
> pred chvili jsem narazil na problem. Nechal jsem si vytvorit
> databazovy script popisujici jeji vytvoreni, nevim ale, jak ho vykonat
> z Delphi. Dam-li ho do Query, neuspeji. Jednak se mu nelibi slovo
> GO, ale kdyz je odmazu, odmita provest Create View apod. Sice to
> chapu, ze by se tezko poznavalo, kde to view konci, kdyz to
> odmita GO, ale otazka je, co s tim? Kdyz to jde v MS Query
> Analyzeru, melo by to nejak jit i z Delphi.
> Pozor - program nepouziva BDE, takze nelze provest
> komponentu z RxLib.
>
> Konfigurace: D4 C/S, nonBDE komponenty, MSSQL 7, spojeni
> pres ODBC.
>
Presne na tento problem jsem taky narazil, pak jsem sel touto cestou:
v stringlistu mam vsechny radky skriptu, jak to vygeneruje MSSQL. Ctu jeden
radek po druhem, pokud na radku je GO, dam Query.ExecSQL, smazu Query.SQL a
jedu na dalsi radek. Jinak to asi nepude.
Jinak pri pristupu pres BDE musel byt vypnut parametr TQuery.ParamCheck,
jinak si BDE myslelo ze za dvojteckou je nazev parametru, coz delalo problem
napriklad v deklaraci ulozenych procedur.
PS Jake presne pouzivas komponenty na pristup k MSSQL7 ?
Marian
Delphi days a MSDE
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 6.4.2000 12:55:33
MSDE je sou��st� Office 2000 Premium (bez mo�nosti voln�ho ���en�) a
Developer Edition (v�etn� licence typu "Runtime" pro jeho voln� ���en�).
D�le si ho mohou zdarma st�hnout z Webu (nebo objednat za manipula�n�
poplatek instala�n� CD) majitel� licence na Visual Studio 6.0 Professional
nebo Enterprise nebo kter�koliv v�vojov� n�stroj v n�m obsa�en�:
Visual StudioTM 6.0, verze Professional a Enterprise
Visual BasicR 6.0, verze Professional a Enterprise
Visual C++R 6.0, verze Professional a Enterprise
Visual InterDevTM 6.0, verze Professional
Visual J++TM 6.0, verze Professional
Visual FoxProTM 6.0, verze Professional
stazeno z http://msdn.microsoft(tec)cz/MSDE/
M.
----- Original Message -----
From: Ren� Otisk
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, December 31, 1999 9:55 AM
Subject: Delphi days a MSDE
.
.
V lednu na Delphi days jsme dostali original CD s MSDE. Muzeme MSDE volne
sirit? V licenci jest uvedeno, ze se smi pouzivat a sirit jen, je li
zakoupena licence na Interdev, VB, C++ ... Mam delphi (coz
.
.mail klient
[*] Ing. Miroslav Ondrisek <bonnel(zv)telecom(tec)cz> - 6.4.2000 12:55:56
The Bat snad neni FREE! Leda by se neco v poslednich 4 mesicich zmenilo...
Mira
-----Original Message-----
Lubos RYBNICEK
Sent: Wednesday, April 05, 2000 11:57 AM
Subject: RE: mail klient
Co The Bat?
-----Original Message-----
Martin
Sent: Wednesday, April 05, 2000 6:52 AM
Subject: OT:mail klient
poradte nejakeho free email klienta ale nie Outlooku a Outlooku Express.
Martin
Web aplikace ISAPI
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 6.4.2000 13:06:55
Nevim, jak vypada a jaxe chova Personal WEB Server,
ale na IIS staci jen zastavit a znovu spustit tuto sluzbu.
> ----------
> Od: Honza Fiala[SMTP:kvasar(zv)kvasar(tec)cz]
>
> 1. kdyz vytvorim dll aplikaci a spustim ji pres personal web server, tak uz
> mi nikdy nedovoli prepsat to dll a musim restartovat comp. chtel bych se
> zeptat, jakym zpusobem se to ma spravne delat?
> Interbase & Memo [2]
[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 06.4.2000 13:15:01
> Sorry samozrejme TDBMemo
> > TDBMemo podle me funguje "normalne" pres DataSource/DataField
> To je pravda
> >
> > A TMemo jsem plnil (pri prevodu dat) takhle
> > FIBQuery1.Params.ByName ['pozn'].AsString:=TabPOZN.AsString;
> Pouzivat TIBDataSet a tam je napr. v InsertSQL napsano :
> insert into tabulka (klic, memo) VALUES (:klic,:memo) a to mi
> nefunguje. Ono tak asi nejde ukladat Mema, ale jak tedy.
Pokud si spravne pamatuju, tak FIB se poziva ? misto : jako definice
parametru, ale to je asi preklep. Ja to ucite pouzivam s INSERT i UPDATE
bez problemu....
Na formu je TDBMemo a pres DataSource/DataField ,e spojeno na
FIBDataset. Ten ma v InsertSQL
insert into tabulka ( pozn ) VALUES (?memo)
a funguje to.
Ales
DAO knihovny, DAO3032.DLL
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 6.4.2000 13:16:55
A Office 2000 obsahuje DAO 3.6 (a s nim souvisejici MS Jet 4.0). MS Jet 4.0
je i soucasti MDAC 2.1 a vyssi ale jiz neobsahuje DAO.
Mac
----- Original Message -----
From: "Filip Hlad�k" <fihla(zv)telecom(tec)cz>
Pokud mas Access i doma, muze byt problem ve vezi DAO. Muzes mit v obou
strojich stejnou verzi Office a zaroven muzes mit rozdilne verze DAO.
Pricinou je nap�. upgrade Office 95 na Office 97 - zustava puvodni DAO 3.0.
Samotna instalace O97 ovsem obsahuje DAO 3.5. Bohuzel si uz nepamatuju, kde
jsem o tom cetl.
Web aplikace ISAPI
[*] Ivo Brhel <ib(zv)unex(tec)cz> - 06.4.2000 12:27:32
Ahoj,
ad 1)
nastav tento klic do 0 a spust znova PWS.
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\Parameters]
"CacheExtensions"=dword:00000000
Cau
Ivos
Honza Fiala wrote:
>
> Caute,
> mel bych par dotazu ohledne webove aplikace.
> 1. kdyz vytvorim dll aplikaci a spustim ji pres personal web server, tak uz
> mi nikdy nedovoli prepsat to dll a musim restartovat comp. chtel bych se
> zeptat, jakym zpusobem se to ma spravne delat?
> 2. da se webova aplikace debugovat a jak?Delphi days a MSDE
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.4.2000 12:43:34
Puvodni zprava, kterou napsal Ren� Otisk dne 31 Dec 99,:
> V lednu na Delphi days jsme dostali original CD s MSDE. Muzeme MSDE =
> volne sirit? V licenci jest uvedeno, ze se smi pouzivat a sirit jen, je =
> li zakoupena licence na Interdev, VB, C++ ... Mam delphi (coz =
> zaplatpanbuh neni produkt Microsoftu) a ted babo rad! Poradi mi nekdo?
Abys mohl MSDE sirit, musis mit k tomu licenci, coz znamena bud
nejnovejsi Visual Studio Professional/Enterprise a nebo
Office 2000 Developer Edition.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Config.sys
[*] Lauko �tefan <lauko(zv)salamon.sk> - 6.4.2000 13:45:46
Dobry,
vedel by mi niekto poradit ako zistit umiestnenie aktivneho suboru config.sys(nt) a autoexec.bat(nt).
Bud v Delphi alebo TP.
Hlavne na NT a W2000.
Dakujem.pause printer II
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 6.4.2000 13:56:48
> 1) Pomocou GetLastError a funkcie FormatMessage zisti aku chybu Ti ten
> prikaz vrati (problem moze byt aj s pravami)
>
vracia chybu 6 co podla helpu znamena: ERROR_INVALID_HANDLE
> 2) handle tlaciarne sa ziskava pomocou OpenPrinter (aspon podla helpu)
>
Ano ale mne to nefunguje. OpenPrinter mi vrati handle = NULL.
Takto to volam :
bRet=OpenPrinter(
Device, // pointer to printer or server name
phPrinter, // pointer to printer or server handle
NULL // pointer to printer defaults structure
);
if(!bRet)
{
MessageBox(NULL,"Chyba pri
OpenPrinter",((AnsiString)GetLastError()).c_str(),MB_OK);
}
Device = "Epson FX-1050"
Blbe je , ze mi to nefunguje ani s TPrinter->Handle, ani s handle
ziskanym pomocou CreateDC.
> 3) je dobre ziskat stare nastavenia tlaciarne pomocou GetPrinter, tie
> modifikovat a potom podhodit zasa fcii SetPrinter
> 4) treba postupovat podla helpu - rozdiely su napriklad aj vo volani v
> 95kach a NTckach - a uspech sa musi dostavit (len ak nahodou nie)
>
Este nieco poskusam, ale uz som zufaly.
/LH
Web aplikace ISAPI
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 6.4.2000 14:03:00
> -----P�vodn� zpr�va-----
> Od: Mal� Dobromil [mailto:dodo(zv)rak.pr.ds.mfcr(tec)cz]
> Odesl�no: 6. dubna 2000 13:07
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Web aplikace ISAPI
>
>
> Nevim, jak vypada a jaxe chova Personal WEB Server,
> ale na IIS staci jen zastavit a znovu spustit tuto sluzbu.
Personal Web Server je IIS. Jenom trochu umele orezany.
Pri vyvoji je potreba z duvodu popsaneho drzeni dll casto restartovat
web server, je dobre na to pouzit automatiku, treba tento batch:
REM BEGIN
net stop "World Wide Web Publishing Service"
net stop "IIS Admin service"
net start "World Wide Web Publishing Service"
REM END
pokud mate CZ Web server, podivejte se do sluzeb a prepiste si
tento batch pro vase nazvy. Nepamatuju si to presne, ale cesky se jmenuji
myslim nejak jako:
"Sluzba publikovani na siti WWW" a
"Sluzba spravce systemu IIS" (samozrejme s diakritikou a v 852)
Jura
Interbase & Memo [2]
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 6.4.2000 14:40:21
Tak pozor opet chyba u mne, to memo funguje zcela perfektne, ale
zhazuje to polozka definovana jako Numeric(9,2) ona se do delphi
da jako TIBBCDField a jakmile se do ni neco zapise a da se post
tak to skonci vyjimkou
Unable to comlete network request to host 'XXX'
Error reading data from connection
Unknown Win32 error 10054....
To urcite uz nekdo vite, dekuji za brzkou odpoved. Ztratil jsem uz
skoro dva dny tim, ze jsem blbec honil ty mema.
> > Sorry samozrejme TDBMemo
> > > TDBMemo podle me funguje "normalne" pres DataSource/DataField
> > To je pravda
> > >
> > > A TMemo jsem plnil (pri prevodu dat) takhle
> > > FIBQuery1.Params.ByName ['pozn'].AsString:=TabPOZN.AsString;
> > Pouzivat TIBDataSet a tam je napr. v InsertSQL napsano :
> > insert into tabulka (klic, memo) VALUES (:klic,:memo) a to mi
> > nefunguje. Ono tak asi nejde ukladat Mema, ale jak tedy.
>
> Pokud si spravne pamatuju, tak FIB se poziva ? misto : jako definice
> parametru, ale to je asi preklep. Ja to ucite pouzivam s INSERT i UPDATE
> bez problemu....
> Na formu je TDBMemo a pres DataSource/DataField ,e spojeno na
> FIBDataset. Ten ma v InsertSQL
> insert into tabulka ( pozn ) VALUES (?memo)
> a funguje to.
>
> Ales
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
Vetev TreeView
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 6.4.2000 14:42:29
Preji pekny den,
potreboval bych v TreeView zvyraznit vzdy celou vetev polozky, ktera je
vybrana (napr. zmenou barvy fontu). Nedari se mi obarvit celou vetev.
Posledni polozku (TreeNode) umim, ale jak jednoduse (bez prochazeni celel
struktury) projit vsechny rodice a obarvit?
Nevite nekdo jak, na to?
Za pripadne namety dekuji.
Honza Naiser.
Goto pre Explorer
[*] Majo Petrik <zajodelphi(zv)hotmail(tec)com> - 06.4.2000 12:56:14 gmt
Zdravim!
Potreboval by som povedat uz existujucemu oknu
Windows Explorer-a (Prieskumnika) aby zmenilo
aktualny adresar...
Vopred dakujem >>>Majo<<<
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Config.sys
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 6.4.2000 15:06:18
Ahoj,
co to povidas za divne veci? Nevim jak na drivejsich NT, ale W2k tohle
nepouziva. To pouziva DOS a aplikace na nem zalozene (W95 a W98). Jinak
tyto soubory by meli byt umisteny v rootu disku, ze ktereho se bootovalo.
Slavek
> Dobry,
> vedel by mi niekto poradit ako zistit umiestnenie aktivneho suboru config.sys(nt) a autoexec.bat(nt).
> Bud v Delphi alebo TP.
> Hlavne na NT a W2000.
>
> Dakujem.
>
Jak provest script?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 15:07:19
> PS Jake presne pouzivas komponenty na pristup k MSSQL7 ?
Pouzivam komponenty od L. Fuleho
(http://www.sct.sk/~fule/ODBCe/ODBCe.zip).
Jsem s nimi zcela spokojen a i podpora autora je vynikajici.
David
Jak provest script?
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 6.4.2000 15:23:55
> misto GO zkus dat ;
> -----P�vodn� zpr�va-----
> pred chvili jsem narazil na problem. Nechal jsem si vytvorit
> databazovy script popisujici jeji vytvoreni, nevim ale, jak ho vykonat
> z Delphi. Dam-li ho do Query, neuspeji. Jednak se mu nelibi slovo GO,
> ale kdyz je odmazu, odmita provest Create View apod. Sice to chapu, ze
> by se tezko poznavalo, kde to view konci, kdyz to odmita GO, ale
> otazka je, co s tim? Kdyz to jde v MS Query Analyzeru, melo by to
> nejak jit i z Delphi.
> Pozor - program nepouziva BDE, takze nelze provest
> komponentu z RxLib.
>
> Konfigurace: D4 C/S, nonBDE komponenty, MSSQL 7, spojeni
> pres ODBC.
Zkusil jsem, ale neni to ono. Stejne to zkolabuje s hlaskou, ze
CREATE VIEW must be first statement in a batch
David
IB6 jak zacit a jak to s ni bude
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 6.4.2000 15:40:27
Haj hou!
From: "L. ZITA" <konference(zv)sales(tec)cz>
>
> 1) Chtel bych zacit s Interbasi. Poradte prosim nejake odkazy a
literaturu,
> jde mi hlavne o nejake funkcni priklady a "startovni" ceskou knihu stylu
> Mistrovstvi v Delphi od M.Cantu pro zakladni pochopeni cele organizace nez
> se zacnu prodirat originalni dokumentaci v anglictine.
Pokud je mi znamo, tak v cestine o IB nic nevyslo. Nicmene dobrym startem je
seznameni s technologii SQL serveru a jazyka SQL92 o tom by melo byt ceske
literatury dost. Jinak na IB je nejlepsi dokumentaci originalni anglicka
dokumentace (nyni ke stazeni ve formatu PDF pro verzi 6 vcetne dokumentace k
IBExpressu).
> 2) Nemate nekdo zpravy o tom jak bude vypadat licencovani IB6. Zda to bude
> (financne) pouzitelne i pro drobne aplikace psane na zakazku, ktere se v
> zadnem pripade nebudou prodavat po stovkach kusu.
IB bude sirena obdobne jako Linux. Download zdarma, budou se prodavat
certifikovana CD s pridanou hodnotou. Redistribuce bez licencnich poplatku.
Detaily licencovani viz Mozilla Public Licence.
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
zistenie verzie OS
[*] Mari�n Goryl <goryl(zv)insdata.sk> - 6.4.2000 15:42:41
Ako zistim v D3 o aku verziu Windows ide.
Dakujem
Interbase & Memo [2]
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 6.4.2000 15:50:55
Haj hou!
From: "Radek KALA" <Kala(zv)atlas(tec)cz>
>
> Uz jsem se jednou ptal a vypada to ze nikdo nevi jak pouzivat
> memo na interbase. Vytvorit ho umim, ale nevim jak ho napojit na
> TMemo, nejlepe pres TIBDataSet, jde to vubec ?????????
Samozrejme ze to jde, problem je ovsem v tom, ze hodnoty BLOBu (a tedy i
MEMO) se prenaseji pres streamy, protoze samotna hodnota v zaznamu je pouze
ukazatel (handle) na ono memo. Jak TMemoField tak TParameter maji metody
LoadFromStream/SaveToStream. Takze si vytvor pracovni TMemoryStream a pres
nej provadej prenos mezi TStrings (Ktery ma tyto metody take) a polozkou
pripadne parametrem ("UPDATE blabla SET MYMEMO=:MYMEMO"). Komponenta TDBMemo
toto dela automaticky a co se cached updates tyka, pak tam by take problem
byt nemel. Pouze pokud prirazujes hodnoty parametru "rucne", musis pouzit
fintu se streamem.
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
sprava pameti
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 6.4.2000 15:52:38
Haj hou!
From: "Pavel Hampl" <phampl(zv)chmi(tec)cz>
>
> K tomu zvetsovani pole o jednicku (Daniel Rott) - asi dochazi k potizim
> tehdy, kdyz po alokaci pole je alokovana jeste nejaka dalsi promenna nad
> tim polem. Potom pri zvetseni velikosti zrejme dojde k realokaci CELEHO
> pole v nove oblasti pameti a spotreba roste opravdu exponencialne. (bych
> si myslel)
Naprosto presne :o)
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
Instance objektu jako Variant
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 6.4.2000 15:57:12
Haj hou!
From: "David Podhola" <podhola(zv)sprinx(tec)cz>
>
> nevite nekdo nahodou, jak pretypovat instanci objektu na variant? Tj pokud
> mam:
> deklarovano TPokus = class( TAutoObject, IPokus ) a chci instanci
vytvorenou
> pomoci TPokus.Create predat
> napr. do Visual Basic Scriptu jako Variant a tam s ni dal pracovat?
Jednoduse uloz interface (nikoliv referenci na objekt!) do pomocne promenne
typu variant, nebo pouzij nasledujici funkci.
function ObjectToVariant(O: IDispatch): OleVariant;
begin
result := O;
end;
Hodne zdaru
Pavel Cisar
Borland s.r.o.
pcisar(zv)inprise(tec)cz
komponenta nebo API pro obsluhu vypalovac�ch CD
[*] Karel Huda� <KarelH(zv)cashreform(tec)cz> - 6.4.2000 16:10:26
-----P�vodn� zpr�va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 5. dubna 2000 0:54
P�edm�t: Re: komponenta nebo API pro obsluhu vypalovac�ch CD
Puvodni zprava, kterou napsal Karel Huda� dne 4 Apr 00,:
> Nejjednodussi je nainstalovat si DirectCD od Adaptecu, CD-ROM se pak tvari
Pravda, UDF format je docela jednoduse pouzitelny, nicmene
ja s nim moc dobre zkusenosti nemam.
Rad bych vedel, co se ti na nem nelibi.
Ja jsem, nastesti, zadny problem nezaregistroval. Snad jen, ze na jedne z 20
masin, kde jsem UDFReader instaloval, byli problemy prave s instalaci, ale
to jsem nakonec nejak vyresil.
Ale jinak si vesele prenasim data z prace domu a naopak jiz nejaky ten
patek.
KarelH
zistenie verzie OS
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 6.4.2000 16:38:40
podle helpu takhle:
Win32Platform is the Win32 platform identifier.
Unit SysUtils
var Win32Platform: Integer = 0;
Description
Win32Platform is used to identify the type of Win32 platform the system is
running. This will be one of the following values:
Value Meaning
VER_PLATFORM_WIN32s System is Win32s.
VER_PLATFORM_WIN32_WINDOWS System is Windows 95.
VER_PLATFORM_WIN32_NT System is Windows NT.
See WINDOWS.PAS for their associated numerical values.
----- Original Message -----
From: Mari�n Goryl
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, April 06, 2000 3:42 PM
Subject: zistenie verzie OS
Ako zistim v D3 o aku verziu Windows ide.
Dakujem
XML Parsing in Delphi 5
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 6.4.2000 16:51:48
Ahoj,
pokud se chcete neco malo dozvedet o %subj%, podivejte se na
http://homepages.borland.com/ccalvert/TechPapers/Delphi/XMLSimple/XMLSi
mple.html
Slavek
Struktura disku a adresaru
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.4.2000 18:18:59
ahoj,
co si takhle stahnout GXExplorer, kterej ma takovouhle komponentu
je to free i se zdrojakama na http://www.gexperts.com/GXExplorer/
ale jestli se s tim chces drit sam tak to tam muzes treba jen okouknout.
M.Jirman
----- Original Message -----
From: Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, April 05, 2000 5:30 PM
Subject: Struktura disku a adresaru
> Ahoj!
>
> Ve sve aplikaci bych chtel mit TreeView se strukturou disku
> (FDD, HDD i sit) a adresaru na kazdem z nich. Tj. napr.
>
> Plocha
> |
> - -- Tento pocitac
> | +-- Disketa 3,5 (A:)
> | +-- Win98 (C:)
> | +-- Audio CD (D:)
> +-- Okolni pocitace
>
> atd.
> (Proste neco takoveho, jako ma napr. program WinZip, kdyz zadavam
> cilovy folder pro rozbaleny soubor.)
>
> Neni mi ale jasnych nekolik veci:
> - odkud se tahaji prislusne ikony (pro disketu, disk, CD ,...)
> - jak zjistim, zda se jedna o Audio CD ci Data CD
> - odkud se nactou "jmena" jednotlivych radku (napr.Tento pocitac,
> Disketa 3,5, Okolni pocitace ...). Jsem presvedcen, ze je to
> asi nekde v registrech, ale nevim kde.
>
> Diky za kazdou radu, priklad ci demo.
>
> Jirka.
> +-------------------------+---------------------------------+
> | Jiri NOVOTNY, Olomouc, | e-mail: novotny(zv)ftknw.upol(tec)cz |
> | Czech Republic | http://risc.upol(tec)cz/~novotnyj |
> | | ICQ: 9495586 |
> +-------------------------+---------------------------------+
> | ... and objects in the rear view mirror can appear closer |
> | than they are |
> +-----------------------------------------------------------+
> Config.sys
[*] Lauko Stefan <lauko(zv)salamon.sk> - 6.4.2000 19:00:09
> Ahoj,
>
> co to povidas za divne veci? Nevim jak na drivejsich NT, ale W2k tohle
> nepouziva. To pouziva DOS a aplikace na nem zalozene (W95 a W98). Jinak
> tyto soubory by meli byt umisteny v rootu disku, ze ktereho se bootovalo.
>
> Slavek
To je jasne, ze WIN32 nepouziva config a autoexec ale ked sa spusta DOS
aplikacia tak sa pouzije config. Na NT/W2000 nemusi byt na disku z ktoreho
sa bootuje. Konkretne na W2000 je vo WinNT\SYSTEM32. Jedna sa o to, ze pri
instalacii DOS-programu potrebujem modifikovat config. V DOS/W95/W98 to
funguje bez problemu. Na NT/W2000 uz musi uzivatel rucne dopisat udaje do
config.nt - inak program skolabuje.
Mozno tento problem nepatri do diskusie ale kolegovia ktory udrziavaju
DOSovsky program ma poziadali o vyriesenie tohto problemu.
Bohuzial este sa pouzivaju aj DOS programi z ktorych zijeme, alebo sa mylim.
Lauko.
> > Dobry,
> > vedel by mi niekto poradit ako zistit umiestnenie aktivneho suboru
config.sys(nt) a autoexec.bat(nt).
> > Bud v Delphi alebo TP.
> > Hlavne na NT a W2000.
> >
> > Dakujem.
> >
>
>Dotaz - ScrollBox
[*] Robert Holovsk� <r.holovsky(zv)volny(tec)cz> - 6.4.2000 20:47:47
Ahoj Petre,
skutecne byla chyba v prirazeni Canvasu. Prepsal jsem to na ten
TControlCanvas. A slape to bez problemu!!
> > A pak bych mel jeden dotaz, ten se tu myslim i probiral. Kdyz mam MDI
> > aplikaci a otevru dalsi okno, kdyz pred tim bylo jedno z oken
> > maximalizovane, tak se stane ze tlacitko(x) zavrit okno vypada jako
disable,
> > ackoliv funguje. Dat se to nejak elegantne osetrit?
> Takhle chyba se uz tusim v D4 neprojevovala, mas UpdatePack#3 ?
> Petr Vones, amatersky programator
Co se tyce toho tlacitka zavrit na formulari, tak to i po instalaci update
packu 2 a 3 do Delphi 4 Professional to nepomohlo. Jediny co se mi jeste
podarilo zjistit je ze se tato chyba projevuje jen na MDIChild formulari,
ktery ma vlastni menu, ktere se po otevreni tohoto formulare zaradi do
hlavniho menu hlavniho formulare. V pripade ze MDIchild formular toto menu
neobsahuje tak se tlacitko zavrit se chova korektne po celou dobu.
Takze pokud by nekdo vedel jak to resit, neb ja to menu na MDIChild
formulari docela potrebuji, tak uvita jakekoliv informace.
Dekuji
Robert Holovsk�
e-mail:
r.holovsky(zv)volny(tec)cz - soukrom�
robert.holovsky(zv)gefos(tec)cz - do pr�ce
seriova komunikace na 1 PC
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 6.4.2000 21:31:54
> No a pokud mas jen jeden port volny, tak
> zakup konektor 9 pinovy a propoj sobe
> kouskem cinu piny 2 a 3 a muzes fungovat
> i s jednim portem, tedy pokud nevadi, ze to
> co vysles si taky poslechnes.
>
> Martin
nevadi jsem jiz delsi dobu zenaty :-))
Jiri Heinisch
Priorita procesu
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 6.4.2000 22:53:48
Zdravim,
ako by som mohol nastavit prioritu procesu aplikacie s vecsim zatazenim
procesora.
Dik Miso
Napr: Ma to aj WinAmp, MP3Compressor, atd....Jak zjistit, ze proces neni ukoncen?
[*] Pavel Bansky <pbansky(zv)volny(tec)cz> - 6.4.2000 21:55:11
ave Petre !
Ta componenta ale potrebuje PsApi.Pas knihovnu a ta tam neni, neslo by to nejak
zaridit :-))
Diky
Pavel
>tohle se tu probiralo, viz moje odpoved "Re: Dusledky fce TerminateProcess"
>ze 4.4.
------------------------------------------------------
Pavel Bansky
pbansky(zv)volny(tec)cz
IB6 jak zacit a jak to s ni bude
[*] L. ZITA <konference(zv)sales(tec)cz> - 6.4.2000 22:57:52
Behalf Of Pavel Cisar
> Pokud je mi znamo, tak v cestine o IB nic nevyslo. Nicmene dobrym
> startem je
> seznameni s technologii SQL serveru a jazyka SQL92 o tom by melo byt ceske
> literatury dost. Jinak na IB je nejlepsi dokumentaci originalni anglicka
> dokumentace (nyni ke stazeni ve formatu PDF pro verzi 6 vcetne
> dokumentace k
> IBExpressu).
>
SQL trochu znam, uz nekolik let pracuji s Paradoxem (od verze 3.5).
Existuje alespon nejaka ceska ci slovenska konference o IB ?
Jinak je jasne, ze originalni dokumentace je obvykle nejlepsi a
pokud chce clovek neco delat tak bez ni to nejde.
Ovsem kazde zacatky mi vzdy rozumna kniha v cestine, i kdyz nebyla
zdaleka vycerpavajici usnadnila a urychlila.
> IB bude sirena obdobne jako Linux. Download zdarma, budou se prodavat
> certifikovana CD s pridanou hodnotou. Redistribuce bez licencnich
> poplatku.
> Detaily licencovani viz Mozilla Public Licence.
Skvela zprava.
Ludek ZITA
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.129 / Virov� b�ze: 61 - datum vyd�n�: 3.3.2000
OT: ODBC98
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 6.4.2000 23:18:32
Zdravim,
nevie niekto nahodou o niekom, kto predava bud v cechach alebo na slovensku
kompnenty ODBC98.
Dik, Miso
============================================
==
==
== Michal HLAVAC
==
== Spolocnost priatelov deti z detskych domovov ==
== Usmev ako dar
==
== www.usmev.sk
==
==
==
============================================IB a hesla priradene k databaze.
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 6.4.2000 23:19:52
Zdravim.
Ako je to s heslami v IB 6, ja som to zatial pochopil ze k samotnej databaze
je definovane jedno heslo a to SYSDBA a vsetky dalsie a vsetky ROLE su v
ISC4.GDB ? To znamena ze ak si nakopirujem databazu do ineho PC kde na novo
instalujem IB tak sa prihlasim ako SYSDBA a som vitaz. ...alebo sa mylim ?
Dakujem.
roland.komponenta nebo API pro obsluhu vypalovac�ch CD
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.4.2000 22:30:55
Puvodni zprava, kterou napsal Karel Huda� dne 6 Apr 00,:
> Rad bych vedel, co se ti na nem nelibi.
> Ja jsem, nastesti, zadny problem nezaregistroval. Snad jen, ze na jedne z 20
> masin, kde jsem UDFReader instaloval, byli problemy prave s instalaci, ale
> to jsem nakonec nejak vyresil.
> Ale jinak si vesele prenasim data z prace domu a naopak jiz nejaky ten
> patek.
Nelibi se mi na tom par veci, ale co hlavne, tak to je spolehlivost.
Nevim, zda je to tak vzdy, ale ja jsem se pekne spalil. Od te doby,
co mam vypalovacku (nejednu) jsem vypalil kolem 2.000 CD-R (presne
je nepocitam, mozna to bude i vic). Az dosud jsem vypaloval na jednu
jedinou znacku medii (ted jsem ji zmenil kvuli uplne jinemu duvodu),
se kterou jsem mel nejlepsi zkusenosti - z te hromady CD-R se mi
jen jedno jedine CD-R vratilo od zakaznika jako poskozene, opravdu
bylo necitelne, jinak nikdy nic. Kdyz jsem vypalil cokoliv klasicky,
tak tam ta data neustale jsou a vzdy byla a neni problem. Ale jednou
jsem prisel o asi 3 CD-R vypalena UDF pomoci Packet CD. Nevim, jak
to zmizelo, protoze ihned po nahrani jsem to dukladne kontroloval,
nicmene za 14 dni jsem to potreboval a nebylo to tam, CD-R neslo
otevrit a prd. Asi si dovedes predstavit, co to se mnou udelalo
a jak se mi to libilo... od te doby jsem to nepouzil a nepouziji...
Mozna je to kruta nahoda, ale stalo se mi to a uz o to nestojim.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Jak provest script?
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 6.4.2000 23:54:47
Je ta adresa dobre ?
Radim Kunz
-----Original Message-----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 6. dubna 2000 15:08
Subject: Re: Jak provest script?> PS Jake presne pouzivas komponenty na pristup k MSSQL7 ?
Pouzivam komponenty od L. Fuleho
(http://www.sct.sk/~fule/ODBCe/ODBCe.zip).
Jsem s nimi zcela spokojen a i podpora autora je vynikajici.
David
Priorita procesu
[*] Lauko �tefan <lauko(zv)salamon.sk> - 6.4.2000 23:59:12
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>
> Zdravim,
>
> ako by som mohol nastavit prioritu procesu aplikacie s vecsim zatazenim
> procesora.
>
> Dik Miso
>
> Napr: Ma to aj WinAmp, MP3Compressor, atd....
Ahoj
asi je to ono.
SetPriorityClass(GetCurrentProcess, HIGH_PRIORITY_CLASS);
moznosti su :
HIGH_PRIORITY_CLASS
IDLE_PRIORITY_CLASS
REALTIME_PRIORITY_CLASS
NORMAL_PRIORITY_CLASS
Lauko.
RichEdit-nacteni souboru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:05:38
From: Fryz, Zdenek <fryz(zv)dcb(tec)cz>
> nevi nekdo jak zrychlit nacteni vetsiho - cca 4-7MB
> souboru (PlainText) do RichEditu ?
> 4MB mi trva priblizne ( nekonecnych ) 18 sec.
Ahoj,
napriklad WordPad to otvira o trochu rychleji. Podobne chovani by v Delphi
mohlo jit udelat takto:
uses
RichEdit;
procedure TForm1.Button1Click(Sender: TObject);
var
EventMask: DWORD;
begin
EventMask := SendMessage(RichEdit1.Handle, EM_GETEVENTMASK, 0, 0);
SendMessage(RichEdit1.Handle, EM_SETEVENTMASK, 0, EventMask and not (ENM_REQUESTRESIZE) );
RichEdit1.Lines.LoadFromFile('excel2000.pas');
end;
Petr Vones, amatersky programator
Version Info
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:07:20
From: Karel Vlcek <vlcekk(zv)hotmail.com>
> Po preinstalovani pocitace, tedy i Delphi - D5-Prof, mi pri kompilaci
> nepridaji VersionInfo do exe souboru.
> V "Project|Options|Version Info" je samozrejme zaskrnutno "Include version
> info in project", coz pred preinstalaci stacilo. Myslel jsem na nejakou
> chybicku D, tak jsem pridal "Update...", ale je to porad stejne.
Ahoj,
zkus vymazat .RES soubor projektu, Delphi si jej pak znovu vytvori.
Petr Vones, amatersky programator
Jak zjistit, ze proces neni ukoncen?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:14:43
From: Pavel Bansky <pbansky(zv)volny(tec)cz>
> Ta componenta ale potrebuje PsApi.Pas knihovnu a ta tam neni, neslo by to nejak
> zaridit :-))
Ahoj,
PSAPI potrebuje jen na NT a tam by prece mela byt, na Win9x pouziva ToolHelp
funkce. Jeste to asi upravim, aby byly ToolHelp funkce pouzity i ve W2000.
Petr Vones, amatersky programator
Vetev TreeView
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:14:11
From: Jan Naiser <tua(zv)ltm(tec)cz>
> potreboval bych v TreeView zvyraznit vzdy celou vetev polozky, ktera je
> vybrana (napr. zmenou barvy fontu). Nedari se mi obarvit celou vetev.
> Posledni polozku (TreeNode) umim, ale jak jednoduse (bez prochazeni celel
> struktury) projit vsechny rodice a obarvit?
Ahoj,
Jinak nez prochazenim parentu od daneho nodu az k rootu to nepujde. To
ale prece neni az tak casove narocne. Pak si staci jen zapamatovat
posledni vybrany node aby jsi jej po vyberu noveho opet odoznacil.
Petr Vones, amatersky programator
Priorita procesu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:14:22
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>
> ako by som mohol nastavit prioritu procesu aplikacie s vecsim zatazenim
> procesora.
Ahoj,
pomoci funkce SetPriorityClass:
SetPriorityClass(GetCurrentProcess, HIGH_PRIORITY_CLASS);
Petr Vones, amatersky programator
jen jedna instance programu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:15:20
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Do .dpr dej toto:
> var
> Hwnd:THandle;
> begin
> Hwnd:=FindWindow('TTvujHlavniForm',nil);
> if Hwnd<>0 then
> begin
> if not IsWindowVisible(Hwnd) then Application.Restore;
> SetForegroundWindow(Hwnd);
> Exit;
Ne, ne, ne :-) Tohle je ten nejhorsi zpusob. Za prve v design modu jiz muze
toto okno existovat a pak ti nepujde aplikace vubec spustit nebo muze dojit
ke kolizi s podobnym oknem. Jediny spravny zpusob je pouziti pojmenovaneho
objektu jadra systemu (mutex, map files). Priklad je treba tady:
http://community.borland.com/article/0,1410,16355,00.html
Dale jak uz tu nekdo psal, nelze pouzit SetForegroundWindow pro prepnuti
okna ve Win98 a Win2000. Lze to vsak obejit docasnym prirazenim vstupni
fronty aplikace(threadu) na popredi threadu ktery vytvoril okno ktere takto
chceme prepnout, viz komponenta:
http://ww6.borland.com/codecentral/ccweb.exe/listing?id=13315
Petr Vones, amatersky programator
XML Parsing in Delphi 5
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.4.2000 00:22:52
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> pokud se chcete neco malo dozvedet o %subj%, podivejte se na
> http://homepages.borland.com/ccalvert/TechPapers/Delphi/XMLSimple/XMLSi
> mple.html
Ahoj,
a nebo taky na:
http://www.delphizine.com/features/2000/05/di200005rp_f/di200005rp_f.asp
Petr Vones, amatersky programator
Goto pre Explorer
[*] Hurricane <hurricane(zv)iol(tec)cz> - 7.4.2000 01:02:49
Zdravim
> Potreboval by som povedat uz existujucemu oknu
> Windows Explorer-a (Prieskumnika) aby zmenilo
> aktualny adresar...
>
Ja popuzivam pro otvirani HTML dokumentu toto, podobne by to melo jit i pro
adresare
ShellExecute(Application.Handle, 'open', PCHar(FilNam),'', '',
sw_showMaximized)
------------------------------------------------------
Hurricane