Archív konference Delphi

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

Script Maker a DLL

[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 18.8.2000 08:55:17 met-1

> > A nemas nehodou zapnute shovavani skrytych souboru ve Windowsech ??
>
> 1) nemam
> 2) ani jedna z tech DLL knihoven, kterou jsem hledal, atribut Hide
> nemela.

Panove, hanba me fackuje ode zdi ke zdi. :-)) Ja ty hledany DLL mel v
jinych ale UPLNE jinych slozkach. Pritom jsem byl ale na 100%
presvedceny, ze jsou tam, kde nebyly. Holt, jsem blbec. Sorry!
Nicmene ten problem se spanningem mam furt, cili porad. Zna nekdo
reseni, prosim?

Jirka.

Version info

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 18.8.2000 11:00:46

Uses RxVerInf;

Function GetVersionOfProg:String;
Var T:TVersionInfo;
Begin
T := TVersionInfo.Create(AppFileName);
Try
Result:=T.FileVersion;
Finally
T.Free
End
End;

Jaro B.

> -----P�vodn� zpr�va-----
> Od: Ladislav Fitz [SMTP:ladislav.fitz(zv)kodytek(tec)cz]
> Odesl�no: 18. VIII 2000 10:50
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Version info
>
> Dobry den,
>
> nevite nekdo jak zjistit verzi programu, aby se dala zobrazit v dialogu o
> programu. jde mi o cisla zadana v Project\Options\Version info
>
>
> diky za kazdou radu


Field v ADONIS

[*] Michal Michal <michalm(zv)zf.jcu(tec)cz> - 18.8.2000 10:06:53

Zdravim,

D5, MSSQL 7, 6.5, MS Access

Potreboval bych zjistit, jestli dany ADO.Field se ta updateovat (is
updatable) nebo ne. Pres Attributes a volbu adFldUpdatable mi to nejde,
protoze ta je porad false. Kdo byste vedel jak to zjistit? :-))

Michal


QR - Tisk zaznamu vedle sebe

[*] morzol(zv)atlas(tec)cz - 18.8.2000 11:14:14

D�.

Bud nastavis property Columns (to mi ale nejak nechodilo - zahlavi stranky bylo v kazdem sloupci na jine urovni). nebo napises obsluhu pro nacitani dat z tveho Datasetu, property Dataset nechas prazdnou a pro vypisovani pouzijes TQRLabel.
Delal jsem to tak davno, ze si nazvy udalosti a vlastnosti nepamatuji, ted nemam Delphi k dispozici - ale myslim, �e to najdes.
-----Original Message-----
From: "owner-delphi-l(zv)fwd(tec)cz" <owner-delphi-l(zv)fwd(tec)cz> on behalf of
"Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
Sent: Mon, 14 Aug 2000 07:04:14 +0200
To: "forum" <delphi-l(zv)fwd(tec)cz>
Subject: QR - Tisk zaznamu vedle sebe


Ahoj

Da se nejakym zpusobem docilit tisk zaznamu v QR vedle sebe?

PaintBox a problikavani podkladu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 18.8.2000 11:18:42

Dobry den,

trapim se se zobrazovanim pomoci PaintBoxu, stale se mi nedari
odstranit problikavani podkladove barvy.

Na PaintBox kreslim v udalosti OnPaint. Ovsem aniz bych to chtel,
PaintBox jeste predtim svoji plochu vyplni nejakou barvou.

Zajimave je napr. to, ze dam-li na formular s Color=clBlue PaintBox s
Color=clGreen, PaintBox se vybarvi cerne...

Nedavno tady kdosi radil PaintBox "podlozit" Panelem, to mne ale
nepomohlo - misto cerne pak problikava barva Panelu.

Diky za kazdou radu, Karel Rys

______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009


ADODataset a index na tabulku Foxpro

[*] Petr Sadovsk� <petr(zv)slunce(tec)cz> - 18.8.2000 11:32:39

Ahojte,

tak asi si budete myslet, ze jsem zesilel (pomalu si t myslim taky :o(( )
.

Mam jednu tabulku Acces na jednom ADODatasetu (tady vsechno v OK) a na
druhem datasetu otviram tabulky postupne 4 tabulky Foxpro a nektere udaje z
nich rvu do Accesu. Vsechny ctyri tabulky jsou vytvorene ve stejne verzi
foxky a maji kazda svuj index *.CDX . Otevreni dvou znich probehne naprosto
prefektne, u ostatnich dvou to padne s hlaskou ODBC: "Index nenalezen" .

Pouzivam tento ConnectionString:
ConnectionString:=' Microsoft dBase Driver
(*.dbf);DBQ='+ExtractFilePath(Application.ExeName)+';Extended
Properties="dBase IV;"

Jsou to tabulky Foxpro, ale oteviram je pres driver DBase, protoze driver
FoxPro mam prehrceny Visual Foxprem a ten vyhazuje chybu "fce:
SQLSetConnectAttr ovladace selhala" . A to bych resil, pokud by se pres
driver DBase neotevrela ani jedna tabulka.

A jeste jedna perlicka: na nekterych jinych masinach to funguje v
pohode.Nastaveni ODBC driveru je na vsech stejne ( moc toho nastavit ani
nejde).

Cim to muze byt???

S.O.S

Diky

Petr

Isapi aplikace v Delphi a Wap

[*] Josef Slan� <slany(zv)hasici.znojmo(tec)cz> - 18.8.2000 11:59:53

To je pravda, uz mi to poradili a spravil jsem to.

Ale porad to jako Isapi.dll nechodi.

Zkusil jsem to ale prepsat do cgi exe a
okamzite to funguje !!!

Neni to nekde v tom Isapi, jde to vubec?

Ta Isapi dll by pro me byla lepsi variantou.


Diky,

Josef Slan�
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ji�� Mat�jka
> Sent: Friday, August 18, 2000 9:37 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: Isapi aplikace v Delphi a Wap
>
>
> Myslim, ze mas blbe tenhle radek:
> Response.ContentType := 'text/wnd.wap.wml';
>
> Ma tam byt
> Response.ContentType := 'text/vnd.wap.wml';
>
> Jirka Matejka
>
> -----P�vodn� zpr�va-----
> Od: Josef Slany [SMTP:slany(zv)hasici.znojmo(tec)cz]
> Odesl�no: 18. srpna 2000 7:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Isapi aplikace v Delphi a Wap
>
> D5 prof., Pinknet Web server
>
> Ahoj,
>
> marne se pokousim vyuzit Isapi aplikaci v Delphi pro WAP.
> Prohlizec Wapu mi po zadani URL typu
> localhost/wap/wpokus.dll vyhodi hlasku, ze tato URL je typu
> text/html a odmitne ji zobrazit.
>
> Pritom ji generuji takto:
>
> procedure Twap.waprootAction(Sender: TObject; Request: TWebRequest;
> Response: TWebResponse; var Handled: Boolean);
> begin
> Response.ContentType := 'text/wnd.wap.wml';
> Response.Content := Root.Content;
> // Response.SendResponse;
> end;
>
> Nemate s tim prosim nekdo zkusenost?
> Jde to vubec?
>
> Diky,
>
> Josef Slany
> mailto:slany(zv)hasici.znojmo(tec)cz
> Tel:0624-200740
> GSM:0603-844999
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virov� b�ze: 85 - datum vyd�n�: 26.7. 2000
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virov� b�ze: 85 - datum vyd�n�: 26.7. 2000


Shell Extensions a GUID

[*] voltrr1.epr(zv)mail.cez(tec)cz - 18.8.2000 11:15:12



> > posledni) je vlastne cislo tve sitove
> > karty (ktere uz je celosvetove jedinecne) a ten zbytek uz muzes pouzit
> > treba z nektereho existujiciho GUIDu.
> Tim by to opravdu bylo zajistene, ale ja na pocitaci zadnou sitovou
> kartu nemam a presto mi to nejake cislo vygeneruje...

To jsem taky zjistil ale nikde se me nepovedlo zjistit jak to vyvesti cislo tak
aby se netrefil nikdo z jinejch lidi na celem svete ktery nemaj sitovku.

Bez sitovky holt asi nezbude nic jineho nez si stahnout ten Microsofti generator
nebo koupit nove Delphi :-))


Radek

Isapi aplikace v Delphi a Wap

[*] voltrr1.epr(zv)mail.cez(tec)cz - 18.8.2000 11:17:14

> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> "http://www.wapforum.org/DTD/wml_1.1.xml">

todle musi bejt na jednom radku.

Zkus dat nastaveni ContentType do toho WebModuleBeforeDispatch

Me to mam za to taky delalo problems a pak se to rozjelo


Radek

Isapi aplikace v Delphi a Wap

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 18.8.2000 12:31:28

S wapem ani s ISAPI nemam skusenosti, proto varim vicemene z vody, ale nedal
by se nejak, (pres Explorer nebo pres nejakou komponentu v delphi zjistit,
jak vypada ten soubor, ktery odesle Web server do prohlizece a porovnat ho s
formatem pro WAP (pripadne si ho nechat zkontrolovat nejakym nastrojem pro
tvorbu WAP stranek).

Jaromir Cermak

-----Original Message-----
From: Josef Slany [mailto:slany(zv)hasici.znojmo(tec)cz]
Sent: Friday, August 18, 2000 10:52 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Isapi aplikace v Delphi a Wap


Tak mi to porad nechodi (Isapi).

Opravil jsem to dvojite w na jednoduche, jak poradil Milan Zajic, ale porad
to nechodi.

Cele to vypada takhle:

Ve Web module je pouze jeden TPageProducer, ten obsahuje v HTMLDoc toto:

<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
"http://www.wapforum.org/DTD/wml_1.1.xml">

<wml>

<!-- THIS IS THE FIRST CARD IN THE DECK -->
<card id="MainCard" title="This is a first card">
<p align="center">
Prvni stranka generovana programem 3
</p>
</card>

</wml>


Web modul ma jen jednu default action (Name='root'), ktera ma na OnAction:

procedure Twap.waprootAction(Sender: TObject; Request: TWebRequest;
Response: TWebResponse; var Handled: Boolean);
begin
Response.ContentType := 'text/vnd.wap.wml';
Response.Content := Root.Content;
// Response.SendResponse;

end;

Na testovani pouzivam PinkNet Web server a prohlizec WinWap.
URL zadavam ve tvaru: http://localhost/wap/wpokus.dll.

Muze to byt nastavenim web serveru? Nebo prohlizecem?

Ted jdu zkusit prevrtat to do cgi a spustit na Apachi, ale to je opet skok
do nezname vody.

Nevidite v tom nejakou chybu na prvni pohled?

Diky,

Josef Slany
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of voltrr1.epr(zv)mail.cez(tec)cz
> Sent: Friday, August 18, 2000 9:10 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Isapi aplikace v Delphi a Wap
>
>
>
> Urcite to funguje jako cgi
>
> ja pouzivam todle >
>
> procedure TWebModule1.WebModuleBeforeDispatch(Sender: TObject;
> Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
> begin
> Response.ContentType := 'text/vnd.wap.wml';
> Response.Expires := Now;
> Response.SetCustomHeader('Cache-control', 'no-cache');
> end;
>
> Dulezite je taky aby vraceny content zacinal takhle :
> <?xml version="1.0"?>
> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> "http://www.wapforum.org/DTD/wml_1.1.xml">
>
> Radek
>
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.168 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000


Shell Extensions a GUID

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 18.8.2000 12:58:10



> -----P�vodn� zpr�va-----
> Od: Karel Rys [mailto:delphi(zv)zas-me(tec)cz]
> Odesl�no: 18. srpna 2000 10:08
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Shell Extensions a GUID
>
>
> voltrr1.epr(zv)mail.cez(tec)cz dne 18 Aug 2000, v 8:17:
>
> > Jinak GUID si muzes vytvorit i sam, staci kdyz ma spravny
> format a je
> > celosvetove jedinecne
> > - toho dosahnes jednoduje nebot jedna sekce (mam za to ze ta
> > posledni) je vlastne cislo tve sitove
> > karty (ktere uz je celosvetove jedinecne) a ten zbytek uz

> Tim by to opravdu bylo zajistene,

Neni to sitovou kartou zajistene. Je to sice malo pravdepodobne, ale
muzes si prenastavit cas a pri vygenerovani noveho GUID se trefit do stejne
milisekundy.

Pro rucni vytvoreni GUID samozrejme vyse popsany postup vyhovuje

> ale ja na pocitaci zadnou sitovou
> kartu nemam a presto mi to nejake cislo vygeneruje...

Kdyz chybi sitova karta, tak si generator misto ni vymysli nejake nahodne
cislo.

Jura


Version info

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 18.8.2000 13:13:06

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.

Daji se bud precist, kdyz v menu na prave tlacitko, ktere vyvolas na danem
EXE, vybers vlastnosti, je tam zalozka verze. Jinak se daji na siti najit
ubity, ktere umozni nacist informace o verzi i za behu programu, ale musel
bych trochu patrat. Je to vyhodne napriklad pro okno About.
Jaromir Cermak

-----Original Message-----
From: Ladislav Fitz [mailto:ladislav.fitz(zv)kodytek(tec)cz]
Sent: Friday, August 18, 2000 10:50 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Version info


Dobry den,

nevite nekdo jak zjistit verzi programu, aby se dala zobrazit v dialogu o
programu. jde mi o cisla zadana v Project\Options\Version info


diky za kazdou radu

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

Zrcadleni obrazovky

[*] Hurricane <hurricane(zv)email(tec)cz> - 18.8.2000 13:14:39

Zdravim

S tim souhlasim, mam AVER TVPhone a taky to je modrej obdelnik, pres kterej
software pro TV prelepi obraz. Takze by si otocil jednobarevnej obdelnik,
kterej je jeste k tomu v pozadi za obrazem televize. Pokud chces prevratit
obraz, musel by ses asi nabourat do driveru ATIny a nejak to zmenit. BTW
pochyuju, ze by to vubec slo, potom by si vlastne sli dva paprsky (v kamere
(a ve video signalu) a v monitoru) proti sobe a silene by to blikalo. I kdyz
nevim, jak je to presne udelany, mozna karta nejdriv pocka, az k ni dolezou
vsechny body televizniho obrazku a az potom ho vyplivne na obrazovku
(monitor). Spis bych to resil tak, ze bys sejmul vyrez obrazovky, kde mas
video do bitmapy, tu otocil a nakreslil nekam jinam. Ale na to bys asi musel
mit ten CryoTech 1860Mhz.

Hurricane
----- Original Message -----
> Jenom takova poznamka - pokud se bude jednat o okno s videem , nebo jinym
> podobnym zdrojem
> muze se ti stat ze se ti ozrcadli jenom jedno barevna plocha.
>
> Nektere karty pouzivaji klicovani a Windows pak kresli jenom barevnej flek
a
> karta do toho pred vystupem domixovava video.

Instalace fontu

[*] Hurricane <hurricane(zv)email(tec)cz> - 18.8.2000 13:23:54

Zdravim

Mozna na to API bude, ale podle me musi stacit, kdyz ten Font nakopirujes do
adresare windows (na to je najaka API)+'\Fonts'. NEjsem si jisty, jestli
potom neni nutne Windows restartovat. Kdyztak todle udelej pomoci
InstallShieldu (to myslim jde) a po instalaci restartuj.

Hurricane
----- Original Message -----

Potreboval bych jej proto pri instalaci aplikace automaticky instaqlovat do
Windows, aby jej uzivatele nemuseli instalovat rucne.

SQL monitor

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 18.8.2000 13:31:27

Vyzkousel jsem to, ale vysledek je porad stejny. V menu Clients je stale
(none). Rekl bych, ze problem bude v tom, ze neni nejak dobre propojen SQL
monitor a nativni link ... Mohu vedet, v jake kombinaci Delphi & drivery &
sitove protokoly & SQL server pouzivate SQL monitor ?
>My pouzivame SQL Monitor z Delphi 3 C/S. Zatim nam fungoval spolehlive.
>K tomu, aby zobrazi nejake informace je treba nasledujici:
>- spustit SQL Monitor jeste pred spustenim sledovane aplikace
>- nastavit v Options|Trace Options SQL monitoru zachytavani
> pozadovanych udalosti. Toto lze nastavit i programove ve
> sledovane aplikaci pomoci:
> var
> ATM: Word;
> ....
> ATM:=traceERROR or traceSTMT;
> DbiSetProp(hDBIObj(Query.Database.Handle),
> dbTraceMode, Integer(Word(ATM)));
>viz take DbiGetProp()

>S pozdravem,

>Ivo HERLES
>PVT, a. s., o. z. Chomutov
>e-Mail: ivo.herles(zv)pvt(tec)cz
>tel.: +42(0396)619216
>NetMeeting: p53aph.chv.pvt(tec)cz

>> -----P�vodn� zpr�va-----
>> Od: Tomas Grepl [mailto:delphi(zv)kapsw(tec)cz]
>> Odesl�no: 18. srpna 2000 00:39
>> Komu: delphi-l(zv)fwd(tec)cz
>> P�edm�t: SQL monitor
>>
>>
>> Ahoj
>>
>> Nevite nekdo, jak se pouziva program SQL monitor, co je
>> dodany k Delphi 5
>> Ent. (myslim, ze byl uz u Delphi 3 CS). Je k tomu pouze
>> takova kraticka
>> napoveda, ale neni v ni receno co je treba nastavit, aby to
>> neco delalo.
>> Zkousel jsem nastavit v BDEadminu Configuration /Drivers
>> /Native /MSSQL
>> /TRACE MODE, ale nepomohlo to
>> Potrebuji sledovat provadene SQL prikazy v prostredi
>> Delphi+BDE+NativeLink+MSSQL7.

Language a MS Access

[*] Ren� Otisk - 18.8.2000 13:38:40

Hi,

D3, ODBCe, jeden soubor databaze MS Access 97, W95

Prosim poradte jak udelat, aby soubor mdb jel na vsech pocitacich s
cestinoooooou. Uz si rvu zbytky vlasu... Na nekterych to jede, na nekterych
ne. ODBC ovladace nehraji roli (stejne verze na dvou PC, na jednom cestina
OK na druhem ne). Charset jest na Easter_Europe, zkousel jsem i jina
nastaveni. Zkousel jsem registry, ale nic jsem nenasel. Zkousel jsem najit
neco jako set language, ale nasel jen pro export/import... Co s tim?

Dekuji

Sroub


Navazani helpu CHM na aplikaci v Delphi

[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 18.8.2000 13:49:25

Ahoj vsem,
sice to jeste neni aktualni, ale radeji abych to vedel dopredu: Budu delat
help k aplikaci a to patrne ve formatu CHM. Nevim ale, jak jednotliva temata
vazat na stisknuti tlacitka na formu (formu je vic a na kazdem bude tlacitko
"Napoveda", nebude to tedy vazane na jednotlive controls, ale na form jako
celek). Nemate s tim nekdo zkusenost?

Diky predem

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7

tel. +420-2-3337 3855
+420-2-2431 4538
*************************************

WipeFile (jiz OT)

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 18.8.2000 14:06:31

A kam ukladas automaticky ulozene dokumenty ? Pokud do toho
sameho souboru, co delas, kdyz uzivatel ale novou verzi nechce
nakonec ulozit ? Pokud nikam, co kdyz vypadne proud nebo
vytuhne pocitac ?
BTW: Bude-li soubor na zacatku (pred LoadFromFile) mit treba
200 kB a uzivatel neco vymaze tak, ze na konci bude mit jen
treba 50 kB (po SaveToFile) tak skutecne nic jineho, nez vyWipovat
volne misto na disku nezbyde, protoze Buh vi, kde na disku je tech
uvolnenych 150kB. Tomu proste nezabranim, no, ach jo...

Dobra.

> ----------
> Od: Hurricane[SMTP:hurricane(zv)email(tec)cz]
> Odesl> �no: 17. srpna 2000 19:32
>
> > Ja bych jeste upozornil na to, ze casto menene soubory (napr. pri editaci
> v
> > textovem editoru)
> > vpodstate obkrouzi cely disk a vyskytuji se na nem v mnoha kopiich.
> > A to protoze typicky postup ukladani je:
> > 1) zapis novy soubor do nejakeho docasneho ###.$$$ souboru
> > 2) prejmenuj puvodni na *.bak
> > 3) prejmenuj ###.$$$ na puvodni jmeno
> >
> > Z toho je videt, ze v jednu chvili existuji dve kopie tehoz souboru a WIPE
> > jednoho neudela absolutne nic s tou druhou kopii, ktera na disku zustane
> > prakticky NETKNUTA...
>
> Nesouhlasim, takhle to mozna dela Word a vsechno od MS, ale ja to ve svem
> Text Editoru resim daleko jednoduseji. Pouziju LoadFromFile a potom
> SaveToFile do tehoz souboru. Zadny mezi soubor nemam.
> Podle me by melo stacit OpenFile, prepsat to cimkoliv a CloseFile.
>

Select pole ve StringGridu (TAdvColumnGrid)

[*] Radek Janu� <janus(zv)foresta(tec)cz> - 18.8.2000 14:19:43

Dostane� to pres parametry

StringGrid.Selection.Top
StringGrid.Selection.Bottom
StringGrid.Selection.Left
StringGrid.Selection.Right


Radek


-----P�vodn� zpr�va-----
Od: Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 18. srpna 2000 11:15
P�edm�t: Select pole ve StringGridu (TAdvColumnGrid)>Zdravim,
>
>poradil by mne nekdo, jak bych mohl ziskat cislo radku a sloupce horniho
>leveho rohu a dolniho praveho rohu vybraneho (oznaceneho, selectovaneho)
>pole v komponente StrinGrid (pouzivam TAdvColumnGrid od TMS). Diky za
>vsechny rady.
>
>Tom
>
>
>tomas.kucera(zv)matsushita(tec)cz
>Matsushita Television Central Europe
>Information Technology Department
>+420 19 7415260

WipeFile

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 18.8.2000 14:34:54



> -----P�vodn� zpr�va-----
> Od: Robert Kindl [mailto:rob(zv)exec(tec)cz]
> Odesl�no: 17. srpna 2000 14:45
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: WipeFile
>
>
> A to protoze typicky postup ukladani je:
> 1) zapis novy soubor do nejakeho docasneho ###.$$$ souboru
> 2) prejmenuj puvodni na *.bak
> 3) prejmenuj ###.$$$ na puvodni jmeno
>

To je bohuzel pravda. Vsak to taky dela nemale problemy.
Potom nestaci dat pravo change na jeden soubor,
uzivatel musi mit prava hned na cely adresar. Fuj.
Samozrejme to delaji mj. Microsofti produkty.

Jura


Shell Extensions a GUID

[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 18.8.2000 14:39:27


Pokud nemas sitovou kartu, tak se na to pouzije seriovy cislo disku v kombinaci s casem od startu pocitace, nebo tak nejak.

Jirka Matejka

-----P�vodn� zpr�va-----
Od: Karel Rys [SMTP:delphi(zv)zas-me(tec)cz]
Odesl�no: 18. srpna 2000 10:08
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: Shell Extensions a GUID


Tim by to opravdu bylo zajistene, ale ja na pocitaci zadnou sitovou
kartu nemam a presto mi to nejake cislo vygeneruje...

Karel Rys


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

Shell Extensions a GUID

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 18.8.2000 14:40:55

> Tim by to opravdu bylo zajistene, ale ja na pocitaci zadnou sitovou
> kartu nemam a presto mi to nejake cislo vygeneruje...

Na MSDN se da najit jak se GUID tvori.

Kdyz nemas sitovku vytvari se GUID misto cisla karty pomoci
cisla instalace windows, procesoru a jinych, takze je i na
pocitacich bez site stejne.
Toto ovsem padlo s prichodem Win98,Win2k, kde uz je i
toto cislo tvoreno jinak nez prevzetim cisla sitovky, protoze
se pomoci tohoto GUID dalo zjistit odkud ktery dokument
prisel. Microsoft jej totiz vyuzival ve svych compound dokumentech.

Martin

Isapi aplikace v Delphi a Wap

[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 18.8.2000 15:29:00


Jednou jsem to pokusne testoval jako isapi knihovnu na PWS a slo to normalne. Takze to urcite jde.

Jirka Matejka.

-----P�vodn� zpr�va-----
Od: Josef Slan� [SMTP:slany(zv)hasici.znojmo(tec)cz]
Odesl�no: 18. srpna 2000 12:00
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: Isapi aplikace v Delphi a Wap


Zkusil jsem to ale prepsat do cgi exe a
okamzite to funguje !!!

Neni to nekde v tom Isapi, jde to vubec?

Ta Isapi dll by pro me byla lepsi variantou.


Diky,

Josef Slan�
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999


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

Version info

[*] Petr Navr�til <DelphiForum(zv)Dssoft(tec)cz> - 18.8.2000 15:34:29

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj,
ja zjistuji verzi souboru takto (jde pouzit na vsechny soubory obsahujici
informaci o verzi - tzn. na EXE, DLL, BPL, ...): procedure GetFileVersion(FileName: string) : string;
var
Size, Size2: DWord;
Pt, Pt2: Pointer;
MajorVersion, MinorVersion, ReleaseVersion, BuildVersion : string;
begin
Size := GetFileVersionInfoSize ( PChar( FFileName), Size2);
if Size <= 0 then { soubor zadaneho jmena sice existuje,
ale neobsahuje informace o verzi }
begin
Result := '';
Exit;
end;
{ vse je OK, muzu zacit plnit vnitrni promenne }
GetMem (Pt, Size);
try
GetFileVersionInfo (PChar ( FileName), 0, Size, Pt);
// pevne informace
VerQueryValue (Pt, '\', Pt2, Size2);
with TVSFixedFileInfo (Pt2^) do
begin
MajorVersion := IntToStr (HiWord (dwFileVersionMS));
MinorVersion := IntToStr (LoWord (dwFileVersionMS));
ReleaseVersion := IntToStr (HiWord (dwFileVersionLS));
BuildVersion := IntToStr (LoWord (dwFileVersionLS));
end;
finally
FreeMem (Pt);
end;
Result := MajorVersion + '.' + MinorVersion + '.' + ReleaseVersion + '.' + BuildVersion;
end; Petr Navratil


-----Original Message-----
From: Ladislav Fitz [mailto:ladislav.fitz(zv)kodytek(tec)cz]
Sent: Friday, August 18, 2000 10:50 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Version info

Dobry den,

nevite nekdo jak zjistit verzi programu, aby se dala zobrazit v dialogu o programu. jde mi o cisla zadana v Project\Options\Version info


diky za kazdou radu
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.168 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000

OLE DB provider, datove typy

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 18.8.2000 15:46:32

Ahojte vsichni.

Mam nasledujici problem, cas od casu potrebuji pod ADOExpresem vytvorit na
kopii tabulky. Problem je ze cilova tabulka muze byt pod jinou databazi, nez
zdrojova, konkretne me zajima prenos MSSQL 7.0->DBF ale chtel bych vyresit
tento problem pokud mozno obecne. Novou tabulku vytvarim SQL prikazem CREATE
TABLE. Potreboval bych ziskat informaci o tom, jake typy podporuje dana
databaze pripadne OLE DB driver abych mohl vytvorit tabulku s co
nejpodobnejsi strukturou.

Pripadne by me zajimalo, jestli neexistuje pod ADOExpresem jednodussi
postup.

Jaromir Cermak


WipeFile

[*] Petr Vale� - 18.8.2000 16:10:59


No dobre a v pripade, ze by jsi napriklad editoval soubor o velikosti 1GB
???

To to jako budes mit vsechno v pameti ?

S pozdravem

PETR.

----- Original Message -----
From: Hurricane <hurricane(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, August 17, 2000 7:32 PM
Subject: Re: WipeFile


> Zdravim
>
> > Ja bych jeste upozornil na to, ze casto menene soubory (napr. pri
editaci
> v
> > textovem editoru)
> > vpodstate obkrouzi cely disk a vyskytuji se na nem v mnoha kopiich.
> > A to protoze typicky postup ukladani je:
> > 1) zapis novy soubor do nejakeho docasneho ###.$$$ souboru
> > 2) prejmenuj puvodni na *.bak
> > 3) prejmenuj ###.$$$ na puvodni jmeno
> >
> > Z toho je videt, ze v jednu chvili existuji dve kopie tehoz souboru a
WIPE
> > jednoho neudela absolutne nic s tou druhou kopii, ktera na disku zustane
> > prakticky NETKNUTA...
>
> Nesouhlasim, takhle to mozna dela Word a vsechno od MS, ale ja to ve svem
> Text Editoru resim daleko jednoduseji. Pouziju LoadFromFile a potom
> SaveToFile do tehoz souboru. Zadny mezi soubor nemam.
> Podle me by melo stacit OpenFile, prepsat to cimkoliv a CloseFile.
>
> Hurricane


remote com..

[*] Robert Zak <rzak(zv)nrsys.sk> - 18.8.2000 16:11:20

Dobry den,

vytvoril som si v D5prof COM objekt (server) - interface ma jedinu metodu,
ktora zoberie 2 parametre (X,Y), podla nich nastavi Top a Left objektu
(shape) na forme.
Pokial spustim CreateRemoteComObject a nastavim mu parameter 'RemoteMachine'
na lokalny pocitac(NT4.0), vsetko funguje. Pokial chcem tento COM spustit z
ineho pocitaca (tym istym klientom), dostanem hlasku Acces Denied. Skusal
som nastavit prava cez Dcomcnfg, ale uz ma EveryOne Full pravo na vsetko co
kde vidim a okrem zmeny chybovej hlasky na can't execute sa mi nepodarilo
nic viac dosiahnut.... ani pokial necham aplikaciu poskytujucu COM spustenu.
Mohli by ste mi prosim poradit, co mam este kde nastavit alebo spravit, aby
to zacalo fungovat??

Dakujem
Robo

Language a MS Access

[*] Petr Vale� - 18.8.2000 16:12:00

Zkousel jsi v nastaveni BDE Administratoru dat na dany alias
LanguageDriver=Paradox Czech 852 ???

Mam uplne stejne prostredky a funguje mi to ...

S pozdravem

PETR.

----- Original Message -----
From: Ren� Otisk <otisk(zv)misel(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 18, 2000 1:38 PM
Subject: Language a MS Access


> Hi,
>
> D3, ODBCe, jeden soubor databaze MS Access 97, W95
>
> Prosim poradte jak udelat, aby soubor mdb jel na vsech pocitacich s
> cestinoooooou. Uz si rvu zbytky vlasu... Na nekterych to jede, na
nekterych
> ne. ODBC ovladace nehraji roli (stejne verze na dvou PC, na jednom cestina
> OK na druhem ne). Charset jest na Easter_Europe, zkousel jsem i jina
> nastaveni. Zkousel jsem registry, ale nic jsem nenasel. Zkousel jsem najit
> neco jako set language, ale nasel jen pro export/import... Co s tim?
>
> Dekuji
>
> Sroub


Jeste jednou Instalace IB 6 pomoci IBInstall

[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 18.8.2000 16:44:50


Ahoj,
neviem, ci si prehliadol moju odpoved (alebo ju povazujes za
nedostatocnu) - ja som uz vyrobil instalacne CD s aplikaciou, ktore
nainstaluje aj IB6, ovsem BEZ vyuzitia IBInstall. Stacilo do registrov
zapisat tie spravne hodnoty...
Zdeno

Pavel Bare� wrote:

> dobry den Na muj predchozi dotaz mi nikdo neodpovedel a ja to
> potrebuji nejak vyresit, proto to zkousim jeste jednou. Opravdu jste
> jeste nikdo neresil instalaci IB 6 pomoci komponenty IBInstall
> pr�padne jinak ?Mne se to pomoci IBInstall stale nedari nejak rozumne
> udelat.Bud jsem nepochopil princip, nebo je to totalne blbe
> naprogramovane.Potrebuji jen nejak rozumne nainstalovat IB 6, ktery
> budu distribuovat spolu s aplikaci. moc dekuji za kazdy napad Pavel
> Bare� Atoll s.r.o.
> K Vi��ovce 1560
> 530 02 Pardubice tel. 040 6310510


Instalace fontu

[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 18.8.2000 17:45:46


Ahoj,
nevyznam sa velmi v API, takze ked som riesil tuto ulohu ja, nakopiroval
som pri instalacii font do prislusneho adresara vo Windows a do
uzivatelskej prirucky som napisal, ze po nainstalovani programu je nutne
otvorit v Control Panel zalozku Fonts.
Zdeno

Pavel L�vi�ka wrote:

> Ahoj vsichni,prava vyvijim aplikaci v Delphi, ktera pouziva specialni
> TruType font, ktery neni standardni soucasti Windows. Potreboval bych
> jej proto pri instalaci aplikace automaticky instaqlovat do Windows,
> aby jej uzivatele nemuseli instalovat rucne. InstalShield Express
> dodavany s Delphi vsak instalaci fontu, alespon pokud vim, neumoznuje.
> Chtel bych proto font instalovat primo aplikaci pri jejim prvnim
> spusteni. Nevim vsak, co je treba udelat pro instalaci a registraci
> fontru ve Windows (Win 95/98). Pravdepodobne to jde volanim nejakych
> funkci API, ale zatim jsem se nedobral uspokojiveho vysledku. Moudre
> hlavy, poradte!Predem dikyPavel Lavicka


Tab a ComboBox

[*] Marek Soukup <marek(zv)comberg(tec)cz> - 18.8.2000 18:09:37

Ahoj Delphini,
nevim jestli to vubec jde, ale rad bych v ComboBox.Items mel dva sloupce
oddelena tabelatorem. Prehlid jsem neco nebo si musim sehnat (udelat)
nejakeho klona co to umi ? Mam k dispozici D5 Enterprise.

Diky.

Marek Soukup
ICQ: 13110124
e-mail: marek(zv)comberg(tec)cz


ADO,DBase,Creat Table

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 18:12:08

ahoj,

Jet4.0 slouzi pouze pro *.mdb (MS ACCESS), kdyz chces ukladat do *.DBF
(nevim co tim myslis a proc na tom trvas, kdyz existuje prave ten access
pres JET4.0) tak musis pouzit "OLEDB for ODBC drivers" a odkazat se na
alias, ktery musis mit vytvoren -> To pak ale jdes cestou ODBC>OLEDB>ADO
(jedina mozna pres ADO). A pro ten SQL server tam je samozrejme provider
SQLOLEDB, ktery je super.

A s rychlostmi to mas tezky, protoze treba takovy BDE (pres ktery bys mohl
treba delat ten zapis) umi snad nejrychleji cist po jednom zaznamu, ale zase
to ztraci jinde.

M.Jirman

>----- Original Message -----
>From: CERMAK <CERMAK(zv)procomcr(tec)cz>
>

>CREATE TABLE mi nastesti prosel. Spise me zajimalo, jake typu mohu pouzit,
>jestli to zavisi ne driveru (muzu pouzit OLE DB for ODBC nebo Jet4.0 atd.)
>Obecne mi jde o to jak prekonvertovat programem typy polozek v tabulce
MSSQL
>serveru do polozek v DBF. DBF musim pouzit kvuli navazujicimu systemu.
>
>Jaromir Cermak

Metoda Print formulare

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 18:17:49

ahoj,

taky mam HP LaserJet (drive IIIp ted 1100) a dosel jsem k tomu, ze se ji
velke obrazky nevejdou do bufferu a taky muze byt pricina v tom, ze ty
ovladace na tech disketach a CD jsou s nejakou CHYBOU, takze je potreba
predevsim okamzite stahnout nejnovejsi z www.hp.com

M.Jirman

----- Original Message -----
From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>> Ahoj Delphici,
> pouzivam metodu TForm.Print pro vytisk formulare. Vetsinou je vse v
poradku
> ale v nekterych pripadech (zavislost jsem nezjistil) dojde k tomu, ze se
na
> tiskarne formular zacne tisknout ale tisk se ukonci treba v polovine
> obrazku. Pouzivam HP LaserJet tiskarnu. Neznate duvod a reseni? Mam D4Std.
>
> Jara.
> svehla(zv)atlas(tec)cz
>
>
>

OT: Kontrola e-mailu

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 18:31:02

ahoj,

kdyz jsme u toho muzes mi poradit jak to udelat. Mam proxy, ktery podporuje
mail porty (25 a 110) a ani za boha nemuzu najit v Outlook Expresu, kde
napsat adresu toho proxy (umoznuje pouzit pouze telef. pripojeni).

M.Jirman

----- Original Message -----
From: sweet <sweet(zv)ksprogram(tec)cz>


�plne normalne, jenom musis mit spravne nastavene veci, nejlip v Outlook
Expresu.
----- Original Message -----
From: "Mal� Dobromil" <dodo(zv)rak.pr.ds.mfcr(tec)cz>

> Kdyz uz o nem mluvime, je mozne stahnout si postu
> napr. z www.centrum(tec)cz (resp pop3.centrum(tec)cz)
> i kdyz jsem za proxy serverem ? Pokud ano, tak jak ?
> Normalne se totiz na pop3.centrum(tec)cz z windows
> nedo-ping-am.
>
> D.

paradox bez BDE

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 18:40:53

ahoj,

zkusenosti ne, ale co takhle vyzkouset ODBC>OLEDB for ODBC
drivers>ADO>Delphi
nebudes zavisly na BDE.

M.Jirman

>----- Original Message -----
>From: MJsoft
>
>
>Ahoj
>
>mate nekdo dobre zkusenosti a odkazy viz SUBJ.
>
>Diky Jin


ADO(NIS) Field is Updatable?

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 18:47:33

ahoj,

co takhle fce TAdodataset.Supports(coUpdate)

M.Jirman

----- Original Message -----
From: Michal Michal <michalm(zv)zf.jcu(tec)cz>> Dobry den,
>
> jak u ADO.Field bezpecne zjistit, ze je mozne ho updatovat?
>
> Michal
>

ADOExpres,MIDAS, problem s filtry

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 19:08:35

ahoj,

jestli jsem to spravne pochopil(?), tak jestli by nestacilo napsat do filtru
LogPolozka=True

----- Original Message -----
From: CERMAK <CERMAK(zv)procomcr(tec)cz>> Ahoj vsichni
>
> Pri programovani aplikace v D5 enterprise jsem se setkal s nasledujicim
> problemem: Mam VIEW s booleovskou polozkou. podle ni chci lokalne ( na
> klientovi filtrovat). Po zamene komponenty TQuery za TADODataset na aplik
> serveru mi filtr 'LogPolozka=1' prestal fungovat (vyber byl prazdny i kdyz
> odpovidajici vety byly v prislusnem ClientDataSetu).
>
> Podrobnejsim zkoumani jsem zjistil, ze uvedeny filtr dobre funguje primo
na
> ADODataSetu, ale kdyz k nemu prisupuji pres ClientDataSet, musim pouzit
> filtr 'LogPolozka'. Proc se ClientDataSet v tomto okamziku chova jinak nez
> prislusny ADODataSet? Nevite nekdo, jak tuto neprijemnou vlasnost (chybu?)
> odstranit. Opravdu se mi nezda, ze by se ClientDataSet musel chovat jinak
> nez prislusny ADODataSet.
>
> Diky za kazdou pripadnou radu
>
> Jaromir
> Cermak


ADOexpress-prosim poradte

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 18.8.2000 19:14:43

ahoj,

ad 1) co takhle z MS exploderu 5.0 nebo MDAC 2.5

ad 2) co takhle sql prikaz HAVING
a taky v Accessu lze pouzivat VIEWS (vytvari se to primo v Accessu a rika se
tam tomu "Dotazy")

M.Jirman

P.S: pro lepsi pouzivani a chapani SQL dotazu doporucuju procist/prolistovat
treba serial o SQL dotazech v chipech min roku. Nebo okamzite: Nabidka
start>Programy>Borland Delphi 5>help>BDE>Local SQL Guide.hlp

----- Original Message -----
From: Martin


skusal som dat databazu do Access 2000 bez uspechu. A skadial zoberirm Jet
3.51 ? V pocitaci mam iba Access 97 tak odkial sa tam vzal Jet 4 ?

Ako pouzit update ak potrebujem pre vypocet pouzit IF a pod. ?
Maly priklad by bodol
Martin

OT help file

[*] Svab <tarakan(zv)volny(tec)cz> - 18.8.2000 21:32:26

Presne tak jedna se o DelphiX.hlp. Funkcni help?! -> To by bylo skvele
diky Ondrej Svab.
tarakan(zv)volny(tec)cz

A nebylo to nahodou Delphi X - pokud jo tak ti muzu poslat funkcni help.

Zdravi
Petr Jelinek - amatersky programator
Homepage: http://pjmodos.fbi(tec)cz, http://pjmodos.yo(tec)cz
Komponenty pro Delphi: http://lunasoft.hyperlink(tec)cz/index5.htm
Vyhledavani: http://www.barevnylist(tec)cz/visitor.php?ref=pjmodos
----- Original Message -----
From: Svab
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, August 17, 2000 11:40 PM
Subject: OT help file


Zdravim,
dovolte mi male OT. Pred casem jsem si stahnul nekolik komponent a k nim byl typicky helpovy soubor .hlp. Ten moje Windows98 nehteji precist (ERROR: ... help file was created for a language not supported by your version of Window).
Mam si snad upgradovat svuj Windows help :-)? A kde ho mam sehnat20
Diky za rady
Ondrej Svab.

QReport - tisk jednoho zaznamu

[*] Lud�k P�ral - 18.8.2000 22:58:53

Ahoj Delphisti,

Potrebuji vytisknout v QuickReportu pouze jeden zaznam z tabulky. Jak to ale
udelat, kdyz muze byt tabulka v momente tisku v edit nebo insert modu a ja
nechci pred kazdym tiskem filtrovat ?

Az dosud jsem pouzival generator sestav Sinea. Nyni ovsem nechce
spolupracovat spravne s ovladacem EPSON LQ870.
Mam formular, do ktereho vypisuji polozky. Pri kazdem tisku se polozky
tisknou jinak. Po mnoha testech jsem napr. zjistil, ze se tisk rozhodi v
momente, kdy formular (na perforovanem papiru) neni naloudovanej - pred
tiskem se provede load papiru, prvni radek je na spravne pozici a dalsi jiz
+-1 cm litaji. Pokud byl ovsem papir naloudovanej, bylo vse v poradku. Ovsem
do doby, nez se odvezl pocitac k zakaznikovi. Pak zacalo vse nanovo. Proto
zkousim QReport.

Predem dekuji za odpoved

Ludek Paral
Sadova 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft

Bmp do buttonu

[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 18.8.2000 23:13:48

Ahoj,

Nevite nekdo o adrese s archivy obrazku pro tlacitka. Nejake
jsem nasel ale porad to neni ono.

--
Za pomoc dekuji.

Jiri Kubelka ��� Als.FofrsIT(zv)worldonline(tec)cz ���

XLS komponenty od Axolot

[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 18.8.2000 23:55:17



Ahoj,

pouzivame tyto komponenty.

ad 1) Tuto chybu to hlasi take, nicmene
neresil jsem to, protoze soubor je v pohode.

ad 2) Pouzivame font Arial. Charset nastaveny
na EASTEUROPE_CHARSET a pak je diakritika OK.

S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Lebeda
Sent: Thursday, August 17, 2000 3:13 PM
To: delphi-l(zv)fwd(tec)cz
Subject: XLS komponenty od Axolot


Ahoj,

potrebuji ve sve jednoduche aplikaci udelat export do xls souboru -
ale i v pripadech, kdy na pocitaci excel neni nainstalovan, tj. nelze
pouzit OLE ci DDE. Sehnal jsem na internetu komponenty od firmy
Axelot - XLSREADWRITE. Po zbeznem seznameni se s nimi se
mi zda, ze prakticky uplne odpovidaji mym potrebam, nicmene:

1) Pri otevreni jimi vygenerovaneho souboru xls v Excelu se objevi
hlaska Chyba souboru: nektere ciselne formaty mohou byt
ztraceny. Po odkliknuti se obsah souboru zda byt v poradku.

2) U fontu se sice da nastavit Charset, ale v Excelu se zadna
zmena Charsetu nijak neprojevi. Bud je to do xls souboru spatne
ulozeno, nebo to neni ulozeno vubec.

Mate nekdo nejake zkusenosti s temito ci jinymi komponentami?
Nebo aspon namety, co s tim?

Dik.

David


Isapi aplikace v Delphi a Wap

[*] Josef Slany <slany(zv)hasici.znojmo(tec)cz> - 19.8.2000 01:08:30

Tak jsem uz zkusil vsechny rady:

prohodil jsem radky
> Response.Content := Root.Content;
> Response.ContentType := 'text/vnd.wap.wml';

Zkusil jsem je dat do BeforeDispatch.
Kriticky radek v HTMLDoc je na jednom radku.

Jako Isapi DLL to porad nechodi, jako CGI exe ano.

IE mi to normalne zobrazi. Kdyz dam zobrazit Source, zobrazi to pouze
cast od <wml> do konce. Ale to je zrejme v poradku.

Kdyz aplikaci krokuju, v BeforeDispatch i v OnAction je porad jeste
spravny Response.Content i Response.ContentType.

A stejne se mu zda, ze je to "text/html"

Uz fakt nevim.

Josef Slany
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Josef Slany
> Sent: Friday, August 18, 2000 10:52 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Isapi aplikace v Delphi a Wap
>
>
> Tak mi to porad nechodi (Isapi).
>
> Opravil jsem to dvojite w na jednoduche, jak poradil Milan Zajic,
> ale porad
> to nechodi.
>
> Cele to vypada takhle:
>
> Ve Web module je pouze jeden TPageProducer, ten obsahuje v HTMLDoc toto:
>
> <?xml version="1.0"?>
> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> "http://www.wapforum.org/DTD/wml_1.1.xml">
>
> <wml>
>
> <!-- THIS IS THE FIRST CARD IN THE DECK -->
> <card id="MainCard" title="This is a first card">
> <p align="center">
> Prvni stranka generovana programem 3
> </p>
> </card>
>
> </wml>
>
> Web modul ma jen jednu default action (Name='root'), ktera ma na OnAction:
>
> procedure Twap.waprootAction(Sender: TObject; Request: TWebRequest;
> Response: TWebResponse; var Handled: Boolean);
> begin
> Response.ContentType := 'text/vnd.wap.wml';
> Response.Content := Root.Content;
> // Response.SendResponse;
>
> end;
>
> Na testovani pouzivam PinkNet Web server a prohlizec WinWap.
> URL zadavam ve tvaru: http://localhost/wap/wpokus.dll.
>
> Muze to byt nastavenim web serveru? Nebo prohlizecem?
>
> Ted jdu zkusit prevrtat to do cgi a spustit na Apachi, ale to je opet skok
> do nezname vody.
>
> Nevidite v tom nejakou chybu na prvni pohled?
>
> Diky,
>
> Josef Slany
> mailto:slany(zv)hasici.znojmo(tec)cz
> Tel:0624-200740
> GSM:0603-844999
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > Behalf Of voltrr1.epr(zv)mail.cez(tec)cz
> > Sent: Friday, August 18, 2000 9:10 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: Isapi aplikace v Delphi a Wap
> >
> >
> >
> >
> > Urcite to funguje jako cgi
> >
> > ja pouzivam todle >
> >
> > procedure TWebModule1.WebModuleBeforeDispatch(Sender: TObject;
> > Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
> > begin
> > Response.ContentType := 'text/vnd.wap.wml';
> > Response.Expires := Now;
> > Response.SetCustomHeader('Cache-control', 'no-cache');
> > end;
> >
> > Dulezite je taky aby vraceny content zacinal takhle :
> > <?xml version="1.0"?>
> > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> > "http://www.wapforum.org/DTD/wml_1.1.xml">
> >
> >
> > Radek
> >
> > ---
> > Poichozi zprava neobsahuje viry.
> > Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> > Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> >
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000


Isapi aplikace v Delphi a Wap

[*] Josef Slany <slany(zv)hasici.znojmo(tec)cz> - 19.8.2000 01:26:42

Tak jsem na to konecne prisel. Omlouvam se za zbytecne otravovani.

Misto PNWS jsem nainstaloval IIS4 a okamzite to funguje !!!

Budto za to muze PNWS, nebo moje nastaveni.

Diky za pomoc.

Josef Slany
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Josef Slany
> Sent: Friday, August 18, 2000 10:52 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Isapi aplikace v Delphi a Wap
>
>
> Tak mi to porad nechodi (Isapi).
>
> Opravil jsem to dvojite w na jednoduche, jak poradil Milan Zajic,
> ale porad
> to nechodi.
>
> Cele to vypada takhle:
>
> Ve Web module je pouze jeden TPageProducer, ten obsahuje v HTMLDoc toto:
>
> <?xml version="1.0"?>
> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> "http://www.wapforum.org/DTD/wml_1.1.xml">
>
> <wml>
>
> <!-- THIS IS THE FIRST CARD IN THE DECK -->
> <card id="MainCard" title="This is a first card">
> <p align="center">
> Prvni stranka generovana programem 3
> </p>
> </card>
>
> </wml>
>
> Web modul ma jen jednu default action (Name='root'), ktera ma na OnAction:
>
> procedure Twap.waprootAction(Sender: TObject; Request: TWebRequest;
> Response: TWebResponse; var Handled: Boolean);
> begin
> Response.ContentType := 'text/vnd.wap.wml';
> Response.Content := Root.Content;
> // Response.SendResponse;
>
> end;
>
> Na testovani pouzivam PinkNet Web server a prohlizec WinWap.
> URL zadavam ve tvaru: http://localhost/wap/wpokus.dll.
>
> Muze to byt nastavenim web serveru? Nebo prohlizecem?
>
> Ted jdu zkusit prevrtat to do cgi a spustit na Apachi, ale to je opet skok
> do nezname vody.
>
> Nevidite v tom nejakou chybu na prvni pohled?
>
> Diky,
>
> Josef Slany
> mailto:slany(zv)hasici.znojmo(tec)cz
> Tel:0624-200740
> GSM:0603-844999
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > Behalf Of voltrr1.epr(zv)mail.cez(tec)cz
> > Sent: Friday, August 18, 2000 9:10 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: Isapi aplikace v Delphi a Wap
> >
> >
> >
> >
> > Urcite to funguje jako cgi
> >
> > ja pouzivam todle >
> >
> > procedure TWebModule1.WebModuleBeforeDispatch(Sender: TObject;
> > Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
> > begin
> > Response.ContentType := 'text/vnd.wap.wml';
> > Response.Expires := Now;
> > Response.SetCustomHeader('Cache-control', 'no-cache');
> > end;
> >
> > Dulezite je taky aby vraceny content zacinal takhle :
> > <?xml version="1.0"?>
> > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> > "http://www.wapforum.org/DTD/wml_1.1.xml">
> >
> >
> > Radek
> >
> > ---
> > Poichozi zprava neobsahuje viry.
> > Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> > Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> >
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000


RAR komprimator

[*] DiskMag Engine <engine(zv)ropacek(tec)cz> - 19.8.2000 03:38:17

Zdravim !

Nevi nekdo z vas o nejakem freewarovem RAR kompilatoru nebo nema nekdo z vas
takove knihovny do Delphi?

Dikes
Vasek Navrat

QReport - tisk jednoho zaznamu

[*] Ji�� Fait���}���6���3 - 19.8.2000 06:39:03

Musis nastavit

QuickRep1.DataSet := nil

Pokud neni nil tiskne se sestava jinak se tiskne vybrany DataSet.

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Lud�k P�ral
Sent: Friday, August 18, 2000 10:59 PM
To: Konference
Subject: QReport - tisk jednoho zaznamu


Ahoj Delphisti,

Potrebuji vytisknout v QuickReportu pouze jeden zaznam z tabulky. Jak to ale
udelat, kdyz muze byt tabulka v momente tisku v edit nebo insert modu a ja
nechci pred kazdym tiskem filtrovat ?

Az dosud jsem pouzival generator sestav Sinea. Nyni ovsem nechce
spolupracovat spravne s ovladacem EPSON LQ870.
Mam formular, do ktereho vypisuji polozky. Pri kazdem tisku se polozky
tisknou jinak. Po mnoha testech jsem napr. zjistil, ze se tisk rozhodi v
momente, kdy formular (na perforovanem papiru) neni naloudovanej - pred
tiskem se provede load papiru, prvni radek je na spravne pozici a dalsi jiz
+-1 cm litaji. Pokud byl ovsem papir naloudovanej, bylo vse v poradku. Ovsem
do doby, nez se odvezl pocitac k zakaznikovi. Pak zacalo vse nanovo. Proto
zkousim QReport.

Predem dekuji za odpoved

Ludek Paral
Sadova 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft


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

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

Vystrizeni casti MetaFile

[*] Ji�� Fait���}���6���3 - 19.8.2000 06:43:10

Mam metafile a potrebuji z neho vytvorit druhy metafile ktery bude
vystrizenou casti puvodniho (jde o odstraneni okraju).
Nestaci mi to zmensit,
Jak na to?
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virov� b�ze: 85 - datum vyd�n�: 26.7.2000

Interbase a sit

[*] pcb(zv)atlas(tec)cz - 19.8.2000 09:40:22

Haj hou!

On 16 Aug 2000,, Lud k P�ral wrote:

> Prosim o kontakt a FIBComponents, velmi by mi to pomohlo pri testech IB6

FIBC je ke stazeni na www.interbase.com, ale neni adaptovany na
IB6 dialekt 3. Dialekt 1 by mel byt v pohode.

Hodne zdaru



Pavel Cisar <pcisar(zv)inprise(tec)cz>
Borland s.r.o.

WipeFile (jiz dost OT)

[*] Hurricane <hurricane(zv)email(tec)cz> - 19.8.2000 09:40:23


----- Original Message -----
From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 18, 2000 2:06 PM
Subject: RE: WipeFile (jiz OT)


A kam ukladas automaticky ulozene dokumenty ? Pokud do toho
sameho souboru, co delas, kdyz uzivatel ale novou verzi nechce
nakonec ulozit ? Pokud nikam, co kdyz vypadne proud nebo
vytuhne pocitac ?
***BINGO Nikam, zalozni kopie nevytvarim. Aspon to nedela nic za
uzivatelovymi zady. Kdyz se mi schodi word, dve hodiny prochazim disk,
jestli tam nekde neni ta zalozni kopie a kdyz ji konecne najdu, zjistim, ze
je nepouzitelna. Vytvari NotePad zalozaky?

BTW: Bude-li soubor na zacatku (pred LoadFromFile) mit treba
200 kB a uzivatel neco vymaze tak, ze na konci bude mit jen
treba 50 kB (po SaveToFile) tak skutecne nic jineho, nez vyWipovat
volne misto na disku nezbyde, protoze Buh vi, kde na disku je tech
uvolnenych 150kB. Tomu proste nezabranim, no, ach jo...
***To nezbyde. Ale uprimne, myslim, ze ochranu proti FBI a jejich cteni ze
strany delat nemusis, nebudes to potrebovat.

Hurricane

WipeFile

[*] Hurricane <hurricane(zv)email(tec)cz> - 19.8.2000 09:43:41

Zdravim

Tak budu mit v mwEditu text 1GB (kdo ma textove soubory 1 GB? Ty?). To mam
jako nacist pulku a kdyz uzivatel nascrolluje na dolni pulku, tak se nacte
druha cast souboru :-???

Hurricane
----- Original Message -----
> No dobre a v pripade, ze by jsi napriklad editoval soubor o velikosti 1GB
> ???
> To to jako budes mit vsechno v pameti ?
> ----- Original Message -----
> > > Ja bych jeste upozornil na to, ze casto menene soubory (napr. pri
> editaci
> > v
> > > textovem editoru)
> > > vpodstate obkrouzi cely disk a vyskytuji se na nem v mnoha kopiich.
> > > A to protoze typicky postup ukladani je:
> > > 1) zapis novy soubor do nejakeho docasneho ###.$$$ souboru
> > > 2) prejmenuj puvodni na *.bak
> > > 3) prejmenuj ###.$$$ na puvodni jmeno
> > >
> > > Z toho je videt, ze v jednu chvili existuji dve kopie tehoz souboru a
> WIPE
> > > jednoho neudela absolutne nic s tou druhou kopii, ktera na disku
zustane
> > > prakticky NETKNUTA...
> >
> > Nesouhlasim, takhle to mozna dela Word a vsechno od MS, ale ja to ve
svem
> > Text Editoru resim daleko jednoduseji. Pouziju LoadFromFile a potom
> > SaveToFile do tehoz souboru. Zadny mezi soubor nemam.
> > Podle me by melo stacit OpenFile, prepsat to cimkoliv a CloseFile.

Bmp do buttonu

[*] Hurricane <hurricane(zv)email(tec)cz> - 19.8.2000 09:49:36

Muzu poslat, mam jich 648, sou z adres, ktery se tady uz probiraly.
Pochopitelne ne vsechny sou pouzitelne, neprobiral sem to (250 kB
nezazipovane)

Hurricane
----- Original Message -----
Nevite nekdo o adrese s archivy obrazku pro tlacitka. Nejake
jsem nasel ale porad to neni ono.

IO error 32

[*] Vladim�r Zavadil <ZavadilV(zv)seznam(tec)cz> - 19.8.2000 09:52:16

Prosim poradte,
pri behu me aplikace se obcas objevi hlaska "IO error 32" a ja nevim co znamena, nebo kde vznika. (aplikace je napsana v D4,
bezi pod NT 4.0 bez service packu a pristupuje k merici karte od National Instruments Lab-PC+).

predem dik Vlada Zavadil

Tab a ComboBox

[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 19.8.2000 15:20:03

Ahoj

pokud mas na mysli dva sloupce tak, ze cely radek je stejne
jedna polozka - pouze obsahujici dva oddelene texty a ne tak, ze
v jednom radku chces mit dve polozky z nichz si lze jednu vybrat
tak toho dosahnes zvolim Style na csOwnerDrawFixed a pouzitim
udalosti OnDrawItem:

procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
var
AuxText: string;
I: Integer;
begin
with TComboBox(Control) do
begin
Canvas.brush.Color := clWindow;
Canvas.font.Color := clWindowText;
if odSelected in State then
begin
Canvas.brush.Color := clHighlight;
Canvas.font.Color := clHighlightText;
end;
Canvas.pen.Color := Canvas.brush.Color;
Canvas.Rectangle(Rect);
AuxText := Items[Index];
I := Pos(#9, AuxText);
if I <> 0 then
begin
Canvas.TextOut(Rect.Left, Rect.Top, Copy(AuxText, 1, I - 1));
Canvas.TextOut(Rect.Left + Width div 2, Rect.Top, Copy(AuxText, I + 1,
Length(AuxText)));
end
else
Canvas.TextOut(Rect.Left, Rect.Top, AuxText);
end;
end;

Ahoj Tomas Bihary


----- Original Message -----
From: "Marek Soukup" <marek(zv)comberg(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 18, 2000 6:09 PM
Subject: Tab a ComboBox


> Ahoj Delphini,
> nevim jestli to vubec jde, ale rad bych v ComboBox.Items mel dva sloupce
> oddelena tabelatorem. Prehlid jsem neco nebo si musim sehnat (udelat)
> nejakeho klona co to umi ? Mam k dispozici D5 Enterprise.
>
> Diky.
>
> Marek Soukup
> ICQ: 13110124
> e-mail: marek(zv)comberg(tec)cz


OLE DB provider, datove typy

[*] Erik Salaj <winsoft(zv)napri.sk> - 19.8.2000 15:56:40

> Mam nasledujici problem, cas od casu potrebuji pod ADOExpresem vytvorit na
> kopii tabulky. Problem je ze cilova tabulka muze byt pod jinou databazi,
nez
> zdrojova, konkretne me zajima prenos MSSQL 7.0->DBF ale chtel bych vyresit
> tento problem pokud mozno obecne. Novou tabulku vytvarim SQL prikazem
CREATE
> TABLE. Potreboval bych ziskat informaci o tom, jake typy podporuje dana
> databaze pripadne OLE DB driver abych mohl vytvorit tabulku s co
> nejpodobnejsi strukturou.

Pozri ProviderTypes Schema.

Erik Salaj, WINSOFT


Interbase - procedure

[*] Svab <tarakan(zv)volny(tec)cz> - 19.8.2000 23:20:13

Zdravim,
muzete mi nekdo poradit co je v neporadku napr. s touto procedurou, ze mi v IBConsoly vraci tuto chybu ... SQL error code = -104, Unexpected end of command ...

create procedure smaz(idx integer)
as
begin
delete from kniha where id=:idx
end

jina SQL utilita IBADMIN tohle zvlada bez problemu, o IBADmin vsak brzy prijdu - nemam registraci - a tak bych rad vedel co je za problem v IBCONSOLE.

Dalsi problem: v SQL se nemuze pouzivat pri sestavovani
podmineneho prikaz AND? napr. (a to mne nebere ani IBADMIN) v procedure nekde mam
IF (:JMENO X IS NOT NULL) AND ( ...) ...

AND bere jako chybu!


Diky za rady
Ondej Svab.

Panel s nastavitelnou farbou oramovania

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 20.8.2000 00:17:54

Zdravim.

Ako by som spravil, ale kde by som zohnal %subj%.


Dakujem.


Roland.

Interbase - procedure

[*] L. ZITA <konference(zv)sales(tec)cz> - 20.8.2000 01:44:37

Behalf Of Svab

> muzete mi nekdo poradit co je v neporadku napr. s touto procedurou...

Ahoj.

Zkus tohle :

COMMIT WORK;
SET AUTODDL OFF;
SET TERM ^ ;
CREATE PROCEDURE "SMAZ"
(
IDX INTEGER
)
AS
BEGIN

DELETE FROM KNIHA WHERE ID=:IDX;

END ^
SET TERM ; ^
COMMIT WORK;
SET AUTODDL ON;

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


Volne siritelny software

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 20.8.2000 12:47:44

On 18 Aug 2000, at 10:21, Petr Falt�nek wrote:

> Ahoj lidi!
>
> Vytvoril jste nejaky volne siritelny software? Konatktujte mne prosim
> mimo konferenci na petr.faltynek(zv)spidla(tec)cz a ja zaridim jeho umisteni
> na nejprodavanejsi a nejvetsi edici ceskeho volne siritelneho
> software.

Na http://www.localizator.com/localize je umisten volny Jazykovy
Lokalizator 3 (pro Delphi 3), na
http://www.localizator.com/download/kuchta/kuch3.zip je Kuchta
pro Wokna verze 3.


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


DelphiX a alphablending

[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 20.8.2000 18:51:02

Zdravim!
Mam problem s alphablendingem v DelphiX. Delame to do hry (http://gm.fbi(tec)cz) a tam potrebujeme dat pruhledny sklo. To nemuzeme "nasimulovat" v 3D programu, protoze za objektem jsou ruzny veci (povrch, pripadne naka jednotka, atd.) a ty samozrejme taky museji byt videt. Jenze kdyz to pouzijeme tak se FPS BRUTALNE snizi. Nevite jak to zrychlit? Predem dik.

S pozdravem Martin Pesek, amatersky programator.

===============================
[ Martin Pe�ek
[ pesek.martin(zv)mymail(tec)cz
[ http://gm.fbi(tec)cz
[ http://markm.fbi(tec)cz

[ Info
[ Delphi 5 Ent., W98
===============================

Interbase a procedure2

[*] Svab <tarakan(zv)volny(tec)cz> - 20.8.2000 21:33:10

Zdravim,
Proc v procedure nemuzu vysledek SELECTu (zarucene 1radek a 1 sloupec) dosadit do lokalni promenne a tedy pozdeji vyuzit?
cast porcedury:
...
AS
DECLARE VARIABLE I INTEGER;
SELECT CIS :I FROM NAROD WHERE NAZEVNAR=:NAZEVNARX
...


Diky za rady Ondrej Svab.

W2K SRV

[*] XERXES <matousek.martin(zv)atlas(tec)cz> - 20.8.2000 13:00:35 -0700

Zkousel uz jste nekdo W2K Server s Delphi. Uz t�den tuto
kombinaci zkous�m a chov� se to docela nestabilne.

Martin Matousek

Instalace fontu

[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 21.8.2000 01:34:03

Nemas pravdu, samotne kopirovani nestaci - musi se to nainstalovat. Ja jsem
podobny problem resil a udelal jsem si na to funkci:

Function RegistrujFont(JmenoSouboru:string):string;
begin
AddFontResource(PChar(JmenoSouboru));
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);
end;


S letnim pozdravem

______________________________________________
Vasek Navrat - lead programmer of NewReality engine
DarkLogic

NewReality web: www.ropacek(tec)cz/newreality
NewReality e-mail: newreality(zv)ropacek(tec)cz

private web: www.ropacek(tec)cz/engine/vasek
private e-mail: darklogic(zv)ropacek(tec)cz
private mobil: 0603 944 964
______________________________________________


> Zdravim
>
> Mozna na to API bude, ale podle me musi stacit, kdyz ten Font nakopirujes
do
> adresare windows (na to je najaka API)+'\Fonts'. NEjsem si jisty, jestli
> potom neni nutne Windows restartovat. Kdyztak todle udelej pomoci
> InstallShieldu (to myslim jde) a po instalaci restartuj.
>
> Hurricane
> ----- Original Message -----
>
> Potreboval bych jej proto pri instalaci aplikace automaticky instaqlovat
do
> Windows, aby jej uzivatele nemuseli instalovat rucne.
>
>

Vytvoreni vlastniho QPreview

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 21.8.2000 06:36:51

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj

Nevite nekdo jak se da vyvtorit vlastni QRPreview...?

Language a MS Access

[*] Ren� Otisk - 21.8.2000 07:32:57

Nejedu pres BDE ale primo pres ODBc

Sroub



Zkousel jsi v nastaveni BDE Administratoru dat na dany alias
LanguageDriver=Paradox Czech 852 ???

Mam uplne stejne prostredky a funguje mi to ...

S pozdravem

PETR.

----- Original Message -----
From: Ren� Otisk <otisk(zv)misel(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 18, 2000 1:38 PM
Subject: Language a MS Access


> Hi,
>
> D3, ODBCe, jeden soubor databaze MS Access 97, W95
>
> Prosim poradte jak udelat, aby soubor mdb jel na vsech pocitacich s
> cestinoooooou. Uz si rvu zbytky vlasu... Na nekterych to jede, na
nekterych
> ne. ODBC ovladace nehraji roli (stejne verze na dvou PC, na jednom cestina
> OK na druhem ne). Charset jest na Easter_Europe, zkousel jsem i jina
> nastaveni. Zkousel jsem registry, ale nic jsem nenasel. Zkousel jsem najit
> neco jako set language, ale nasel jen pro export/import... Co s tim?
>
> Dekuji
>
> Sroub


Interbase a procedure2

[*] voltrr1.epr(zv)mail.cez(tec)cz - 21.8.2000 06:39:46



Muzes ,ja to zkousel.

Problem bude mozna to ze u tveho selektu se NEDA zarucit ze to bude jeden radek
a navic
je ta syntaxe nejaka divna.

Pouzil bych

SELECT Max(CIS) FROM NAROD WHERE NAZEVNAR=:NAZEVNARX INTO :I


Vysledek je stejnej a funkcni

Radek


> Proc v procedure nemuzu vysledek SELECTu (zarucene 1radek a 1 sloupec)
dosadit do
> lokalni promenne a tedy pozdeji vyuzit?
> cast porcedury:
> ...
> AS
> DECLARE VARIABLE I INTEGER;
> SELECT CIS :I FROM NAROD WHERE NAZEVNAR=:NAZEVNARX

RAR komprimator

[*] RDocekal(zv)csas(tec)cz - 21.8.2000 08:13:02

AFAIK existuje pouze free UNRAR, ale RAR budes muset volat externe s
parametry. A neni to freeware ani pro nekomercni ucely.

S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367

> -----Original Message-----
> From: DiskMag Engine [mailto:engine(zv)ropacek(tec)cz]
> Sent: Saturday, August 19, 2000 3:38 AM
> To: Delphi forum
> Subject: RAR komprimator
>
>
> Zdravim !
>
> Nevi nekdo z vas o nejakem freewarovem RAR kompilatoru nebo
> nema nekdo z vas
> takove knihovny do Delphi?
>
> Dikes
> Vasek Navrat
>
>

OT: Kontrola e-mailu

[*] Petr Sladk� <sweet(zv)ksprogram(tec)cz> - 21.8.2000 08:14:28

Proxyny, pokud je mn� zn�mo se nastavuje pouze v Nastaven� internetu> nastaven� s�t�.
Pak se u� odkazuje� adresou.
Expresu u� pak jenom nastavuje� parametry po�ty, jako n�zev ��tu a atd.

-----P�vodn� zpr�va-----
Od: p. Jirman [SMTP:jim.design(zv)iol(tec)cz]
Odesl�no: 18. srpna 2000 18:31
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: OT: Kontrola e-mailu

ahoj,

kdyz jsme u toho muzes mi poradit jak to udelat. Mam proxy, ktery podporuje
mail porty (25 a 110) a ani za boha nemuzu najit v Outlook Expresu, kde
napsat adresu toho proxy (umoznuje pouzit pouze telef. pripojeni).

M.Jirman

----- Original Message -----
From: sweet <sweet(zv)ksprogram(tec)cz>


�plne normalne, jenom musis mit spravne nastavene veci, nejlip v Outlook
Expresu.
----- Original Message -----
From: "Mal� Dobromil" <dodo(zv)rak.pr.ds.mfcr(tec)cz>

> Kdyz uz o nem mluvime, je mozne stahnout si postu
> napr. z www.centrum(tec)cz (resp pop3.centrum(tec)cz)
> i kdyz jsem za proxy serverem ? Pokud ano, tak jak ?
> Normalne se totiz na pop3.centrum(tec)cz z windows
> nedo-ping-am.
>
> D.

PaintBox a problikavani podkladu

[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 21.8.2000 08:25:52

Tak zkus kreslit na canvas v pameti a pak ho prenes (myslim, ze metodou
CopyRect) na canvas toho PaintBoxu. Anebo nepouzivej PaintBox vubec a kresli
to primo na form.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7

tel. +420-2-3337 3855
+420-2-2431 4538
*************************************


-----Original Message-----
From: Karel Rys [mailto:delphi(zv)zas-me(tec)cz]
Sent: Friday, August 18, 2000 11:19 AM
To: delphi-l(zv)fwd(tec)cz
Subject: PaintBox a problikavani podkladu


Dobry den,

trapim se se zobrazovanim pomoci PaintBoxu, stale se mi nedari
odstranit problikavani podkladove barvy.

Na PaintBox kreslim v udalosti OnPaint. Ovsem aniz bych to chtel,
PaintBox jeste predtim svoji plochu vyplni nejakou barvou.

Zajimave je napr. to, ze dam-li na formular s Color=clBlue PaintBox s
Color=clGreen, PaintBox se vybarvi cerne...

Nedavno tady kdosi radil PaintBox "podlozit" Panelem, to mne ale
nepomohlo - misto cerne pak problikava barva Panelu.

Diky za kazdou radu, Karel Rys

______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009


SUBSTR V INTERBASI

[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 21.8.2000 08:43:50

Nie, ale je definovana ako UDF a da sa lahko "vyrobit" - pozri podadresar
examples\UDF v adresari Interbase.
Zdeno

delfinojd wrote:

> Dobry den,
> existuje funkce vracejici cast textu jako treba Substr na Oracle v Interbasi?
> Dekuji
> Karel


Interbase a procedure2

[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 21.8.2000 08:45:40


Ahoj,
vysledok sa v selecte v stored procedure da ulozit cez klauzulu INTO -
vid dokumentaciu.
Zdeno

Svab wrote:

> Zdravim, Proc v procedure nemuzu vysledek SELECTu (zarucene 1radek a 1
> sloupec) dosadit do lokalni promenne a tedy pozdeji vyuzit?cast
> porcedury:...ASDECLARE VARIABLE I INTEGER;SELECT CIS :I FROM NAROD
> WHERE NAZEVNAR=:NAZEVNARX... Diky za rady Ondrej Svab.

DelphiX a alphablending

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 21.8.2000 08:46:21

Dobry den,

neznam DirectX, ted si hraju s grafickou knihovou IPL od Intelu, pro
me potreby vypada vhodnejsi.

V kapitolce venovane Alpha Blendingu se zminuji o tom, ze se s
vyhodou da pouzit predpocitavani hodnot - zatimco normalne se pri
kazdem kombinovani dvou obrazku s alpha-kanalem provadi pomerne velke
mnozstvi nasobeni a deleni, pri jejich predpocitani se tyto operace
(ne vsechny, vetsina) provedou jen jednou na zacatku. To deleni se da
take eliminovat, ale v tom nemam moc jasno (vypada to, ze tim, ze se
"nejak" docili toho, ze by se vlastne delilo jednickou).

Karel Rys

Martin Pe�ek dne 20 Aug 2000, v 18:51:

> Zdravim!
> Mam problem s alphablendingem v DelphiX. Delame to do hry
> (http://gm.fbi(tec)cz) a tam potrebujeme dat pruhledny sklo. To nemuzeme
> "nasimulovat" v 3D programu, protoze za objektem jsou ruzny veci
> (povrch, pripadne naka jednotka, atd.) a ty samozrejme taky museji byt
> videt. Jenze kdyz to pouzijeme tak se FPS BRUTALNE snizi. Nevite jak
> to zrychlit? Predem dik.
>
> S pozdravem Martin Pesek, amatersky programator.
>
> ===============================
> [ Martin Pe�ek
> [ pesek.martin(zv)mymail(tec)cz
> [ http://gm.fbi(tec)cz
> [ http://markm.fbi(tec)cz
>
> [ Info
> [ Delphi 5 Ent., W98
> ===============================
>
>

SQL Monitor

[*] mbartone(zv)Synthesia(tec)cz - 21.8.2000 08:49:11

Ahoj,

mam taky problem u D3 C/S s SQL Monitorem
Pokud mam spusteny SQL Monitor a spustim Database Explorer vse se spravne
zobrazi.
Pokud vsak spustim aplikaci nebo pres Delphi tak se nic nezobrazi a v menu
SQL Monitoru je Clients - none.

Nemusi byt nekde v projektu neco nastavene ?

Milan

Isapi aplikace v Delphi a Wap

[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 21.8.2000 08:51:00


To je fajn, ze ti to chodi. Jeste me napadla jedna vec - pro ladeni aplikaci neni (alespon dle mych zkusenosti) WinWap moc dobrej, rozhodne to nezobrazuje tak jak se to ukaze v mobilu. Totez plati o Waptoru (dobrej editor, ale jinak nic). Na testovani je podle me asi nejlepsi Nokia Wap Toolkit. I kdyz je napsanej v Jave a dost brzdi pocitac (a obcas pada :-((

Jirka Matejka


-----P�vodn� zpr�va-----
Od: Josef Slany [SMTP:slany(zv)hasici.znojmo(tec)cz]
Odesl�no: 19. srpna 2000 1:27
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: Isapi aplikace v Delphi a Wap

Tak jsem na to konecne prisel. Omlouvam se za zbytecne otravovani.

Misto PNWS jsem nainstaloval IIS4 a okamzite to funguje !!!

Budto za to muze PNWS, nebo moje nastaveni.

Diky za pomoc.

Josef Slany
mailto:slany(zv)hasici.znojmo(tec)cz
Tel:0624-200740
GSM:0603-844999

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Josef Slany
> Sent: Friday, August 18, 2000 10:52 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Isapi aplikace v Delphi a Wap
>
>
> Tak mi to porad nechodi (Isapi).
>
> Opravil jsem to dvojite w na jednoduche, jak poradil Milan Zajic,
> ale porad
> to nechodi.
>
> Cele to vypada takhle:
>
> Ve Web module je pouze jeden TPageProducer, ten obsahuje v HTMLDoc toto:
>
> <?xml version="1.0"?>
> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> "http://www.wapforum.org/DTD/wml 1.1.xml">
>
> <wml>
>
> <!-- THIS IS THE FIRST CARD IN THE DECK -->
> <card id="MainCard" title="This is a first card">
> <p align="center">
> Prvni stranka generovana programem 3
> </p>
> </card>
>
> </wml>
>
> Web modul ma jen jednu default action (Name='root'), ktera ma na OnAction:
>
> procedure Twap.waprootAction(Sender: TObject; Request: TWebRequest;
> Response: TWebResponse; var Handled: Boolean);
> begin
> Response.ContentType := 'text/vnd.wap.wml';
> Response.Content := Root.Content;
> // Response.SendResponse;
>
> end;
>
> Na testovani pouzivam PinkNet Web server a prohlizec WinWap.
> URL zadavam ve tvaru: http://localhost/wap/wpokus.dll.
>
> Muze to byt nastavenim web serveru? Nebo prohlizecem?
>
> Ted jdu zkusit prevrtat to do cgi a spustit na Apachi, ale to je opet skok
> do nezname vody.
>
> Nevidite v tom nejakou chybu na prvni pohled?
>
> Diky,
>
> Josef Slany
> mailto:slany(zv)hasici.znojmo(tec)cz
> Tel:0624-200740
> GSM:0603-844999
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > Behalf Of voltrr1.epr(zv)mail.cez(tec)cz
> > Sent: Friday, August 18, 2000 9:10 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: Isapi aplikace v Delphi a Wap
> >
> >
> >
> >
> > Urcite to funguje jako cgi
> >
> > ja pouzivam todle >
> >
> > procedure TWebModule1.WebModuleBeforeDispatch(Sender: TObject;
> > Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
> > begin
> > Response.ContentType := 'text/vnd.wap.wml';
> > Response.Expires := Now;
> > Response.SetCustomHeader('Cache-control', 'no-cache');
> > end;
> >
> > Dulezite je taky aby vraceny content zacinal takhle :
> > <?xml version="1.0"?>
> > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN"
> > "http://www.wapforum.org/DTD/wml 1.1.xml">
> >
> >
> > Radek
> >
> > ---
> > Poichozi zprava neobsahuje viry.
> > Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> > Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> >
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virova baze: 85 - datum vydani: 26.7. 2000

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

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

Systemova ikona

[*] Stepan Dobias <stepan.dobias(zv)del(tec)cz> - 21.8.2000 08:54:56

Ahoj,
potrebuju zjisti systemovou ikonu disku a pak ji zobrazit v komponente TListView. Mohl by mi nekdo na to poslat jednoduchej priklad? V Delphi je priklad VirtualListView, ale tomu moc nerozumim.

Diky
Stepan


Vytvoreni vlastniho QPreview

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 21.8.2000 08:58:36

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.

Ahoj

Na strankach QuSoftu: www.qusoft.no <http://www.qusoft.no> je velmi dobry
priklad pro ruzne verze QuickReportu. Pozor, verze pro QuickReport z D3
nefunguje korektne pod D5.

Jaromir
Cermak

-----Original Message-----
From: Bednar��k Dalibor [mailto:dalibor(zv)torola(tec)cz]
Sent: Monday, August 21, 2000 6:37 AM
To: forum
Subject: Vytvoreni vlastniho QPreview


Ahoj

Nevite nekdo jak se da vyvtorit vlastni QRPreview...?


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

remote com..

[*] Robert Zak <rzak(zv)nrsys.sk> - 21.8.2000 09:18:18

Zdravim,

medzitym som sa docital v (prirucke MIDASu), ze techologia DCOM nefunguje,
pokial nie je na sieti nainstalovany Domain server, odkial si NT stiahne
uzivatelske pristupy. Je to skutocne pravda?? Naozaj nie je mozne vyvolat
COM objekt na inom pocitaci bez domeny - teda medzi dvoma Win98, alebo sa to
da nejak obist??

Dakujem
Robo


OLE DB provider, datove typy

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 21.8.2000 09:47:02

Hledal jsem na siti a v helpech a nasel jsem metodu OpenSchema u
ADOConnection (ADOExpres), ale nevim jak ji mam pouzit. Mohl Bych poprosit o
priklad.

Jaromir Cermak

-----Original Message-----
From: Erik Salaj [mailto:winsoft(zv)napri.sk]
Sent: Saturday, August 19, 2000 3:57 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: OLE DB provider, datove typy


> Mam nasledujici problem, cas od casu potrebuji pod ADOExpresem vytvorit na
> kopii tabulky. Problem je ze cilova tabulka muze byt pod jinou databazi,
nez
> zdrojova, konkretne me zajima prenos MSSQL 7.0->DBF ale chtel bych vyresit
> tento problem pokud mozno obecne. Novou tabulku vytvarim SQL prikazem
CREATE
> TABLE. Potreboval bych ziskat informaci o tom, jake typy podporuje dana
> databaze pripadne OLE DB driver abych mohl vytvorit tabulku s co
> nejpodobnejsi strukturou.

Pozri ProviderTypes Schema.

Erik Salaj, WINSOFT
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.168 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000


Zmena farby tlacitka

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 21.8.2000 10:38:23

koukni na http://www.kopr(tec)cz/delphi/k-delphi.htm#KColBtn
Pavel

----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 14, 2000 6:48 PM
Subject: Zmena farby tlacitka


> Zdravim
>
> Ako by som zmenil farbu tlacitka TBitBtn ?
>
> Dakujem.
>
> Roland.
>

Podivne ikony v Delphi

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 21.8.2000 10:49:54

mel jsem ten samy problem. Problem jsem vyresil okamzitou vymenou graficke karty.
Pavel ZIDEK
----- Original Message -----
From: Pavel L�vi�ka
To: delphi-l(zv)fwd(tec)cz
Sent: Tuesday, August 15, 2000 8:26 AM
Subject: Podivne ikony v Delphi


Ahojky vsichni!
Vcera jsem se setkal se zajimavym problemem a nevim co s nim. Instaloval jsem novou grafickou kartu AGP s chipem Trio 3D/X2. Po teto instalaci se mi zacali v Delphi objevovat jednotlive komponenty s chybnymi ikonami - komponenty z palety "Standard" se objevuji s ikonami z palety "Samples" atd. Funkce komponent je normalni, jenom ty "obrazky" jsou jine. Pokud v ovladacim panelu karty vypnu urychlovaci funkce, nebo nastavim pouze zakladni urychlovani, vse je v poradku, jakmile vsak zapnu vyssi stupen urychlovani, uz tam jsou zase spatne obrazky.
Vite nekdo co s tim? Pouzivam D4 - Profesional, Win 98, AMD K6/2 - 266 MHz, 64 MB RAM

Pavel Lavicka


XLS komponenty od Axolot

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 21.8.2000 10:56:16

ahoj,

taky jsem to potreboval a na Export doporucuju ryze exportni komponenty,
treba scExcelExport.pas (torry nebo DSP), do ktery staci zadat Datasource
(nebo dataset? uz nevim).

M.Jirman


Bmp do buttonu

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 21.8.2000 11:03:46

koukni na
http://www.kopr(tec)cz/w-delphi.htm#Grafika
Pavel

----- Original Message -----
From: Als <Als.FofrsIT(zv)worldonline(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 18, 2000 11:13 PM
Subject: Bmp do buttonu


> Ahoj,
>
> Nevite nekdo o adrese s archivy obrazku pro tlacitka. Nejake
> jsem nasel ale porad to neni ono.
>
> --
> Za pomoc dekuji.
>
> Jiri Kubelka ��� Als.FofrsIT(zv)worldonline(tec)cz ���
>
>

Extended Stored Procedure

[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 21.8.2000 12:06:26

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.

Zdravim vsechny,

chtel bych se zeptat, zda-li ma nekdo zkusenosti s tvorbou DLL,
ktere jsou vyuzivany jako Extended Stored Procedure v MSSQL7.
Pokud je zde nekdo takovy, muzete mi prosim poskytnout nejake
blizsi informace?

S pozdravem,

Petr Reichl
--
* GMC Software Technology
* E-mail: p.reichl(zv)gmc.net
* PGP: support
--

Prace s xls soubory

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 21.8.2000 12:11:04

ahoj,

kdysi jsem to potreboval a kouknul jsem se na torry a DSP a po vyfiltrovani
jsem nasel tyto:

APExcelTable - neumim rusky
ExImXLS - i s prikladem, nesly mi nainstalovat DCU.
scExcelExport - pouze jeden PAS, das mu Datasource nebo dataset a on udela
*.XLS
xlsReadWrite(od Axolot) - to jediny me velmi potesilo svou R/W funkcnosti a
taky jedina u me pripadala v uvahu nez jsem to vyresil vyexportovanim do
ACCESSU :-}}}

M.Jirman

----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>> Ahoj,
>
> nevite nekdo nahodou o nejakych komponentach, ktere umozni
> vytvorit excelovsky soubor bez nutnosti mit excel? Moc by mi to
> pomohlo. Muze byt i placene.
>
> Dik
>
> David
>
>

Metody a vlastnosti OLE objektu

[*] Karel Klime� <kchodl(zv)email(tec)cz> - 21.8.2000 13:25:05

Ahoj,
zaciman experimentovat s OLE a narazil jsem na problem. Kde je dano, ze do
API fce CreateOLEObject('xxx') musim vlozit napr. Word.Normal apod. A kde
se doctu jake ma potom takto vytvoreny OLE objekt metody a vlastnosti.
Predpokladam, ze se jedna o uplny zacatek programovani s OLE, takze bych uvital
i odkazy na nejakou knihu, pripadne linky na nejaky tutorialy a helpy.
Hledal jsem i v archivu konference, ale nic moc jsem nenasel.

Dekuji

Progr-Amather -Kchodl- 1989-2000

---
WWW.EMAIL.CZ - Vase posta zdarma
http://www.email(tec)cz


Vystrizeni casti MetaFile - podruhe

[*] Ji�� Fait���}���6���3 - 21.8.2000 14:00:20

To opravdu nikdo nev� jak na to nebo to nejde?

Mam metafile a potrebuji z neho vytvorit druhy metafile ktery bude
vystrizenou casti puvodniho (jde o odstraneni okraju).
Nestaci mi to zmensit,
Jak na to?
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.176 / Virov� b�ze: 85 - datum vyd�n�: 26.7.2000



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

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

Odchyceni klaves

[*] labsystem(zv)atlas(tec)cz - 21.8.2000 14:53:40

Ahoj,
pred casem jsem posilal dotaz, jak u komponenty (potomek DBGridu) odchytit klavesu tak, aby se na formulari neprovedla akce s touto zkratkovou klavesou. Dostalo se mi odpovedi, ze mam vynulovat "Key" v udalosti "OnKeyDown". To me take napadlo jako prvni, ale bohuzel to vubec nic neresi.
Muze mi nekdo vysvetlit, proc se v teto veci chova jinak potomek DBGridu od napr. potomka TListBoxu?

Diky.

Michal Motalik


Extended Stored Procedure

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 21.8.2000 15:15:45

Extended Stored ProcedureZdravim,

je to pekne nechutna prace zavanejici trochu ceckem ale jde to i v Delphi, a uz zhruba rok to pouzivam a OK.

Dokumentace je vyhradne k cecku (jak jinak).

1. SQL BOL - rejstrik: extended stored procedures - creating (ale asi i jin� podpolo�ky)
2. Mel jsem v pocitaci jeste nejakej *.hlp soubor kde bylo popsany to API - jednotlivy funkce
(vzal jsem ho nekde z CD okolo SQL serveru, ale ted ho nemuzu najit)

Zakladem je soubor hlavicek k tomu API, ktery je v cecku (C:\MSSQL7\DevTools\Include\srv.h). Ja sem si nektere veci (co jsem potreboval) predelal do Delphi unity (muzu poskytnout). Jsou to takovy ty nejnutnejsi funkce a konstanty (predavani parametru, vraceni datasetu, apod.).

V Delphi se postupuje tak, ze das novy projekt - DLL. V ni vytvoris eportovatelne funkce ve tvaru
Function xp nejakynazev(srvproc: PSrv Proc): integer; cdecl;
ta konvence xp je doporucena ze strany Microsoftu.

srvproc je blok parametru (vstupnich i vystupnich) - pouziva se teda porad stejny format hlavicek funkci, parametry se dobyvaji pomoci spec. funkci na praci s parametry - prijde me to docela predpotopni, ale je to asi dost rychly, a hlavne to asi odpovida vnitrnim strukturam dat SQL serveru, takze se nic netranspormuje (jako treba marshaling).

tady mas priklad funkce implementujici znamou funkci v Delphi:

Function xp ExtractQuotedStr(srvproc: PSrv Proc): integer; cdecl;
const
errWrongPar='Wrong Parameters !!!';
var
cv: array[0..1024] of char;
s, ret, ct, msg: array[0..128] of char;
err, rowcount, parcount: integer;
rt: string;
inside: boolean;
p, sn: PChar;
flt: double;
ds: char;

begin
parcount:=srv rpcparams(srvproc);
if (parcount < 2) then
begin
err:=0;
srv sendmsg(srvproc, SRV MSG ERROR, 52000+err, SRV INFO, 0, nil,
0, 0, errWrongPar, SRV NULLTERM);
srv senddone(srvproc, SRV DONE ERROR or SRV DONE MORE, 0, 0);
result:=XP ERROR;
end
else
begin
fillchar(cv, sizeof(cv), 0);
fillchar(ret, sizeof(ret), 0);
move(srv paramdata(srvproc,1)^, cv, srv paramlen(srvproc, 1));
p:=(zv)cv;
rt:=AnsiExtractQuotedStr(p, '''');
StrPCopy(ret, rt);
srv paramset(srvproc, 2, (zv)ret, strlen(ret));
srv senddone(srvproc, SRV DONE MORE, 0, 0);
result:=XP NOERROR;
end;
end;

Po kompilaci DLL se zkop�ruje nejl�pe do MSSQL\bin a pomoci sp addextendedproc zaregistruje. A potom se uz normalne pouziva...


Snad to pro prvni orientaci stacilo, klicem bude stejne sehnat ten *.hlp soubor s popisem toho API, takze hodne zdaru.


Tomas
t.bradle(zv)pvtnet(tec)cz


----- Original Message -----
From: Petr Reichl
Subject: Extended Stored Procedure


Zdravim vsechny,

chtel bych se zeptat, zda-li ma nekdo zkusenosti s tvorbou DLL,
ktere jsou vyuzivany jako Extended Stored Procedure v MSSQL7.
Pokud je zde nekdo takovy, muzete mi prosim poskytnout nejake
blizsi informace20

S pozdravem,

Petr Reichl

Vystrizeni casti MetaFile - podruhe

[*] J�n Grman�������e���zW��ۛg�$ - 21.8.2000 15:27:49

From: Ji�� Fait <fait(zv)jakl(tec)cz>
> To opravdu nikdo nev� jak na to nebo to nejde?
> Mam metafile a potrebuji z neho vytvorit druhy metafile ktery bude
> vystrizenou casti puvodniho (jde o odstraneni okraju).

Ahoj.
Neviem sice co presne potrebujes, pretoze odstranenie okrajov moze byt
realizovane rozne.
Skusim to teda trochu zanalyzovat:

1) Orezavanim - CreateRectRgn, SelectClipRgn
- vyhody: jednoduche
- nevyhody: vo Win9x su prikazy orezavania nespravne implementovane - ide
najma o viacnasobne pouzitie orezavacej oblasti a kombinacie regionov; pri
btlaceni moze byt problemom ak vystupne zariadenie nepodporuje orezavanie
(GetDeviceCaps(hDC, CLIPCAPS)=0)

2) Analyzou obsahu - EnumEnhMetaFile a PlayMetafileRecord
- testujem jednotlive rekordy, vynachavam tie ktore by zasahovali mimo
danej oblasti
vyhody: vhodne pre typy uloh - ak sa objekt nema vmestit do strany cely,
nech sa nekresli vobec
nevyhody: pracnost !!! (ak to ma byt univerzalne)

3) Pomocou binarneho obrazku
- nakreslim cely metafile ako obrazok (napr. na pamatovy device kontext -
CreateCompatibleDC(NULL) asociovany s obrazkom CreateCompatibleBitmap)
- cez BitBlt si vyberiem len cast ktoru potrebujem
vyhody: opat jednoduche, ak ide o tlac - da sa pouzit ako alternativa pre
zariadenia neumoznujuce CLIP
nevyhody: velke objemy dat pre velke obrazky, Win9x mozu mat problemy so
sys. zdrojmi

Dufam ze trochu pomoze.
Ak som sa v niecom zmylil, vopred sa ospravedlnujem.
Osobne vo svojom generatore tlacovych zostav (nieco ako QReport) pouzivam na
orezavanie stranky/detailov metody 1) a 3)

Viac informacii je v helpe Win32 Developer's Reference alebo v najhorsom u
mna.

JaNo.
janog(zv)pluto.elf.stuba.sk

WipeFile

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 21.8.2000 15:44:36

Nojo, ale kdyz on ten soubor jiz existuje (nechci vytvaret novy)
a navic, resim to pomoci TFileStream a jeho metody Write, jak
by se to dalo resit pomoci CreateFile a handle takto ziskaneho ?

Diky...
...Dobra.

> ----------
> Od: Dalibor Toman[SMTP:dtoman(zv)fortech(tec)cz]
> >
> > Po uvolneni objektu tridy FileStream (WFile.Free) bych potreboval
> > data fyzicky zapsat na disk, nevite prosim, jak na to ?
>
> Tu chache musis vyradit z provozu driv nez zacnes zapisovat. Pokud se snazis
> prepsat soubor nejhakym bytem a pak zase jinym, diky cache se stane to , ze
> sektory na disku se prepisou jen poslednim pouzitym bajtem. Tedy samozrejme
> pokud bylo v cache dostatek mista.
> Zrejme je treba 'rucne' pomoci CreateFile otevrit soubor a pomoci parametru
> FILE_FLAG_WRITE_THROUGH (pripadne FILE_FLAG_NO_BUFFERING) vypnout cacheovani
>

Promenne deklarovana jako IDispatch

[*] P J <pjen(zv)seznam(tec)cz> - 21.8.2000 15:47:22

Dobry den vsem,
chtel bych se zeptat na reseni neledujiciho problemu.
Snazim se zobrazit v komponente TMemo string, ktery vraci
ActiveX objekt do promenne deklarovane jako IDispatch.

Dekuji za jakykoliv tip.

Petr J

Jeste jednou ADOExpres

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 21.8.2000 15:53:49

Ahoj vsichni

Mel bych jeste jednu malou prosbu. Nevite nekdo jak ziskat cestu k danemu
DBF souboru, kdyz je urcena pres UDL soubor. Chtel byc to vedet jak pro OLE
DB provider pro Jet 4.0 tak pro ODBC.

Zatim dekuji za kazdy namet

Jaromir Cermak


ADODataset a index na tabulku Foxpro

[*] Miroslav Evj�k <evjak(zv)atlas(tec)cz> - 21.8.2000 16:54:47

Ahoj,

nevim, jestli ti to pomuze, ale pri praci s FoxPro tabulkama pres ODBC + BDE
jsem mel problemy, dokud jsem neprisel na to, ze mam na ruznych masinach
ruznou verzi knihovny VFPODBC.DLL.
Ta, se kterou to funguje ma cislo verze 6.0.8440.0.

Mirecek

Ing.Miroslav Evj�k
IB&C s.r.o.

+420 428 382015
+420 607 875748
ibc(zv)ms1.ipnet(tec)cz <mailto:ibc(zv)ms1.ipnet(tec)cz>
evjak(zv)atlas(tec)cz <mailto:evjak(zv)atlas(tec)cz>

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Petr Sadovsk�
> Sent: Friday, August 18, 2000 11:33 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: ADODataset a index na tabulku Foxpro
>
>
> Ahojte,
>
> tak asi si budete myslet, ze jsem zesilel (pomalu si t myslim
> taky :o(( )
> .
>
> Mam jednu tabulku Acces na jednom ADODatasetu (tady vsechno v OK) a na
> druhem datasetu otviram tabulky postupne 4 tabulky Foxpro a
> nektere udaje z
> nich rvu do Accesu. Vsechny ctyri tabulky jsou vytvorene ve stejne verzi
> foxky a maji kazda svuj index *.CDX . Otevreni dvou znich
> probehne naprosto
> prefektne, u ostatnich dvou to padne s hlaskou ODBC: "Index nenalezen" .
>
> Pouzivam tento ConnectionString:
> ConnectionString:=' Microsoft dBase Driver
> (*.dbf);DBQ='+ExtractFilePath(Application.ExeName)+';Extended
> Properties="dBase IV;"
>
> Jsou to tabulky Foxpro, ale oteviram je pres driver DBase, protoze driver
> FoxPro mam prehrceny Visual Foxprem a ten vyhazuje chybu "fce:
> SQLSetConnectAttr ovladace selhala" . A to bych resil, pokud by se pres
> driver DBase neotevrela ani jedna tabulka.
>
> A jeste jedna perlicka: na nekterych jinych masinach to funguje v
> pohode.Nastaveni ODBC driveru je na vsech stejne ( moc toho nastavit ani
> nejde).
>
> Cim to muze byt???
>
> S.O.S
>
> Diky
>
> Petr
>
>

obdoba DOA (DirectOracleAccess) pro MS SQL

[*] Honza <delphi(zv)mis-net(tec)cz> - 21.8.2000 17:41:26

Ahoj,

Prosim neni tu dobra duse ktera by mi mohla doporucit
spolehlive komponenty pro PRIMY PRISTUP na MS SQL?
(bez potreby BDE a ODBC)

K Oracle pouzivam DOA.

Predem diky

..........Honza


Extended Stored Procedure

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 21.8.2000 17:56:20

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Extended Stored ProcedureVcelku nedavno jsem delal knihovnu mat. parseru
jako ex. procedury a to ve VC++ a byl jsem vcelku spokojen.
Nicmene by me zajimalo, jak jsi to udelal v Delphi, muze mi, prosim, poslat
ty zdrojaky ?

Jinak ke zkusenostem:
Kdyz jsem tu vec provozoval pod MSSQL7, tak bylo vse OK.
Pak jsem to ze srandy tu vyslednou DLL predhodil MSSQL 2000 a nefungovalo to
:-(.
Otazkou je, jestli sem tam nezbabral neco ja, ale kdyz mi to spolehlive
behalo na SQL7, tak si to nemyslim.
Podotykam ovsem, ze se jednalo o betu 1, takze ted to snad bude jine, musim
to proverit.

PS: Davej si VELMI dobry pozor, jak co prgramujes, protoze ex. proc. jsou
implementovany jako DLL,
muzes nejakou nepredlozenosti klido udelat z beziciho serveru server lezici
...

Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Tomas Bradle
Sent: Monday, August 21, 2000 3:16 PM
To: Delphi Konference
Subject: Re: Extended Stored Procedure


Zdravim,

je to pekne nechutna prace zavanejici trochu ceckem ale jde to i v Delphi,
a uz zhruba rok to pouzivam a OK.

Dokumentace je vyhradne k cecku (jak jinak).

1. SQL BOL - rejstrik: extended stored procedures - creating (ale asi i
jin� podpolo�ky)
2. Mel jsem v pocitaci jeste nejakej *.hlp soubor kde bylo popsany to
API - jednotlivy funkce
(vzal jsem ho nekde z CD okolo SQL serveru, ale ted ho nemuzu najit)

Zakladem je soubor hlavicek k tomu API, ktery je v cecku
(C:\MSSQL7\DevTools\Include\srv.h). Ja sem si nektere veci (co jsem
potreboval) predelal do Delphi unity (muzu poskytnout). Jsou to takovy ty
nejnutnejsi funkce a konstanty (predavani parametru, vraceni datasetu,
apod.).

V Delphi se postupuje tak, ze das novy projekt - DLL. V ni vytvoris
eportovatelne funkce ve tvaru
Function xp_nejakynazev(srvproc: PSrv_Proc): integer; cdecl;
ta konvence xp_ je doporucena ze strany Microsoftu.

srvproc je blok parametru (vstupnich i vystupnich) - pouziva se teda porad
stejny format hlavicek funkci, parametry se dobyvaji pomoci spec. funkci na
praci s parametry - prijde me to docela predpotopni, ale je to asi dost
rychly, a hlavne to asi odpovida vnitrnim strukturam dat SQL serveru, takze
se nic netranspormuje (jako treba marshaling).

tady mas priklad funkce implementujici znamou funkci v Delphi:

Function xp_ExtractQuotedStr(srvproc: PSrv_Proc): integer; cdecl;
const
errWrongPar='Wrong Parameters !!!';
var
cv: array[0..1024] of char;
s, ret, ct, msg: array[0..128] of char;
err, rowcount, parcount: integer;
rt: string;
inside: boolean;
p, sn: PChar;
flt: double;
ds: char;

begin
parcount:=srv_rpcparams(srvproc);
if (parcount < 2) then
begin
err:=0;
srv_sendmsg(srvproc, SRV_MSG_ERROR, 52000+err, SRV_INFO, 0, nil,
0, 0, errWrongPar, SRV_NULLTERM);
srv_senddone(srvproc, SRV_DONE_ERROR or SRV_DONE_MORE, 0, 0);
result:=XP_ERROR;
end
else
begin
fillchar(cv, sizeof(cv), 0);
fillchar(ret, sizeof(ret), 0);
move(srv_paramdata(srvproc,1)^, cv, srv_paramlen(srvproc, 1));
p:=(zv)cv;
rt:=AnsiExtractQuotedStr(p, '''');
StrPCopy(ret, rt);
srv_paramset(srvproc, 2, (zv)ret, strlen(ret));
srv_senddone(srvproc, SRV_DONE_MORE, 0, 0);
result:=XP_NOERROR;
end;
end;

Po kompilaci DLL se zkop�ruje nejl�pe do MSSQL\bin a pomoci
sp_addextendedproc zaregistruje. A potom se uz normalne pouziva... Snad to pro prvni orientaci stacilo, klicem bude stejne sehnat ten *.hlp
soubor s popisem toho API, takze hodne zdaru. Tomas
t.bradle(zv)pvtnet(tec)cz


----- Original Message -----
From: Petr Reichl
Subject: Extended Stored Procedure


Zdravim vsechny,

chtel bych se zeptat, zda-li ma nekdo zkusenosti s tvorbou DLL,
ktere jsou vyuzivany jako Extended Stored Procedure v MSSQL7.
Pokud je zde nekdo takovy, muzete mi prosim poskytnout nejake
blizsi informace?

S pozdravem,

Petr Reichl

StringGrid

[*] volcik(zv)email(tec)cz - 21.8.2000 18:02:38

Zdravim vsecky
Potrebuji poradit. Da se StringGrid nastavit tak, aby se dal oznacit (vybrat)
pouze jeden radek ? Proste nechci, aby se dalo oznacit (vybrat) vice radku.
Dekuji za kazdou radu.

D.V.

---
WWW.EMAIL.CZ - Vase posta zdarma
http://www.email(tec)cz


Presypani obsahu tabulek z Visual FoxPro do IB6

[*] Ota Maly <maly(zv)space(tec)cz> - 21.8.2000 17:43:29

Ahoj,
Potrebuji presypat mnoho zaznamu z nekolika malo tabulek do jejich
ekvivalentu v InterBase6, jak na to mam jit? Je na to nejaka utilita nebo
musim napsat program i pro jednorazove presypani?
Do tech Visual FoxPro tabulek (*.dbf) se mi dari se pripojit pres BDE
(Database Desktopem a Database Explorerem dodavanym s D5Prof., popr. z
programu), takze tudy by cesta vedla, ale nevite nekdo o necem rychlejsim?

D5Prof.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.pap-el(tec)cz

IB6 - jak nasypat data z textaku do tabulky ?

[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 21.8.2000 18:52:11

zdravim vsechny pritomne
Mel bych jeden primitivni dotaz.
Je mozne nasypat data do tabulky (IB6) z textoveho souboru, kde jsou sloupce oddeleny napr. svislitkem aniz bych pro kazdy zaznam musel trapne vypisovat INSERT INTO TABLE T1 (col1,col2,...) VALUES (... ???
Mam na mysli nasypani pres consoli (ne programove z delphi).
Napriklad v informixu to jde za pouziti sql prikazu LOAD FROM ...
Je neco podobneho i v Intebase 6 ???
diky za odpoved
PavelC

remote com..

[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 21.8.2000 22:21:13

Zdravim,

to je kec. Nemam domenovy server a chodi mi to OK na W2k prof. Nastaveni
prav je v programu DCOMCNFG.EXE.

Tomas
t.bradle(zv)pvtnet(tec)cz



----- Original Message -----
From: Robert Zak <rzak(zv)nrsys.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 21, 2000 9:18 AM
Subject: remote com..> Zdravim,
>
> medzitym som sa docital v (prirucke MIDASu), ze techologia DCOM
nefunguje,
> pokial nie je na sieti nainstalovany Domain server, odkial si NT stiahne
> uzivatelske pristupy. Je to skutocne pravda?? Naozaj nie je mozne vyvolat
> COM objekt na inom pocitaci bez domeny - teda medzi dvoma Win98, alebo sa
to
> da nejak obist??
>
> Dakujem
> Robo
>
>

Oracle

[*] nnfapso(zv)kios.sk - 21.8.2000 22:25:48

Ahojte,

prosim Vas, mohol by mi niekto poradit ako sa robia databazy oracle v
delphi 5?

Dakujem

Miso nnfapso(zv)kios.sk


CGI-skripty na MS PWS

[*] nnfapso(zv)kios.sk - 21.8.2000 22:31:53

Ahoj,

Ja som to vyriesil tak, ze som jednoducho prepisal priponu suboru z *.exe na
*.xyz a fungovalo to, lebo prehliadac je spraveny tak, ze ked si kliknes na
nejaky odkaz s programom na downloadnutie, tak ho hned stahuje.

Miso nnfapso(zv)kios.sk


----- Original Message -----
From: Peter Vlkovic <vlkovic(zv)minv.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, August 09, 2000 4:50 PM
Subject: OT: CGI-skripty na MS PWS


> Ahoj,
>
> potrebujem na MS Personal Web Serveri spustat
> CGI-skript (program napisany v Delphi), ale
> nejak sa mi nedari.
>
> Miesto spustenia skriptu ponukne dotycny
> subor na downloadnutie.
>
> Adresar s dotycnym skriptom, mam nastaveny
> na zdielanie a aj v nastaveni prislusnej
> Web Directory mam povoleny executing,
> ale aj tak server nic nespusta.
>
> Neporadi mi niekto co musim nastavit,
> aby mi spustanie CGI-skriptov fungovalo ?
>
> Peter


StringGrid

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:48:59

From: <volcik(zv)email(tec)cz>
> Potrebuji poradit. Da se StringGrid nastavit tak, aby se dal oznacit
(vybrat)
> pouze jeden radek ? Proste nechci, aby se dalo oznacit (vybrat) vice radku.

Ahoj,

pokud jsem to dobre pochopil tak pomoci goRowSelect v Options.

Petr Vones, amatersky programator

Odchyceni klaves

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

From: <labsystem(zv)atlas(tec)cz>
> Muze mi nekdo vysvetlit, proc se v teto veci chova jinak potomek DBGridu
> od napr. potomka TListBoxu?

Ahoj,

TDBGrid je komponenta napsana primo ve VCL, TListBox je pouze komponentovy
obal nad ovl.prvkem Windows.

Petr Vones, amatersky programator

Metody a vlastnosti OLE objektu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:48:46

From: "Karel Klime�" <kchodl(zv)email(tec)cz>
> zaciman experimentovat s OLE a narazil jsem na problem. Kde je dano, ze do
> API fce CreateOLEObject('xxx') musim vlozit napr. Word.Normal apod. A kde

Ahoj,

Toto je nejlepsi zjistit z dokumentace. Jinak pristup pres Variant je urcen
spise pro skriptove jazyky (jako napriklad Visual Basic ;-) ktere nerozumi
interfacum. V Delphi je lepsi naimportovat danou type library (menu Project|
Import type library) kde se ti pak vygeneruje rozhrani do Delphi, kde mas
vsechny metody, typy, konstanty atd...

> Predpokladam, ze se jedna o uplny zacatek programovani s OLE, takze bych
> uvital i odkazy na nejakou knihu, pripadne linky na nejaky tutorialy a
helpy.

http://www.techvanguards.com

Dale pak vysla kniha "Delphi COM programming", ktera je vhodna pro
zacatecniky.

Petr Vones, amatersky programator

Extended Stored Procedure

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:48:55

From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
> Zakladem je soubor hlavicek k tomu API, ktery je v cecku (C:\MSSQL7

Ahoj,

nejake prepsane hlavicky pro MS SQL najdes tady:
http://delphi-jedi.org/Jedi:APILIBRARY

Petr Vones, amatersky programator

Navazani helpu CHM na aplikaci v Delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:49:11

From: "Brant Petr" <Brant(zv)dcomm(tec)cz>
> sice to jeste neni aktualni, ale radeji abych to vedel dopredu: Budu delat
> help k aplikaci a to patrne ve formatu CHM. Nevim ale, jak jednotliva temata
> vazat na stisknuti tlacitka na formu (formu je vic a na kazdem bude tlacitko
> "Napoveda", nebude to tedy vazane na jednotlive controls, ale na form jako
> celek). Nemate s tim nekdo zkusenost?

Ahoj,

Tady (http://delphi-jedi.org/Jedi:APILIBRARY) najdes konverzi hlavicek pro
HtmlHelp vcetne prikladu pouziti v Delphi, soubor HtmlHelp.zip

Petr Vones, amatersky programator

Vystrizeni casti MetaFile

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:49:04

From: "Ji�� Fait" <fait(zv)jakl(tec)cz>
> Mam metafile a potrebuji z neho vytvorit druhy metafile ktery bude
> vystrizenou casti puvodniho (jde o odstraneni okraju).

Ahoj,

obavam se ze to bude slozitejsi. Pro zacatek se podivej do Win32 API helpu
na tema "Editing an Enhanced Metafile".

Petr Vones, amatersky programator

Tab a ComboBox

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:49:09

From: "Marek Soukup" <marek(zv)comberg(tec)cz>
> nevim jestli to vubec jde, ale rad bych v ComboBox.Items mel dva sloupce
> oddelena tabelatorem. Prehlid jsem neco nebo si musim sehnat (udelat)

Ahoj,

lze to udelat s vyuzitim ownerdraw (nastav Style na csOwnerDrawFixed):

procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
begin
with ComboBox1.Items do
begin
for I := 0 to 10 do
Add('123'#9'ABC');
Add('XYZ');
end;
end;

procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
const
TabStopSize = 60;
var
S: string;
TabPos: Integer;
R: TRect;
begin
with TComboBox(Control) do
begin
S := Items[Index];
R := Rect;
TabPos := Pos(#9, S);
if TabPos = 0 then TabPos := Length(S) + 1;
R.Right := R.Left + TabStopSize;
Canvas.TextRect(R, R.Left + 1, R.Top + 1, Copy(S, 1, TabPos - 1));
R := Rect;
Inc(R.Left, TabStopSize);
Canvas.TextRect(R, R.Left + 1, R.Top + 1, Copy(S, TabPos + 1, Length(S)));
end;
end;

Petr Vones, amatersky programator

Nep�eru�iteln� ��st k�du

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:49:01

From: "Ladis" <bartal(zv)vfu(tec)cz>
> Nev�te jak lze zajistit aby se mi t�i p��kazy po sob� nep�eru�ovaly
> v�emo�n�mi obsluhami ud�lost� apod? Sta�� nep�eru�ovat uvnit� vlastn�
> aplikace vzniknuv��mi ud�lostmi (D5) ...

Ahoj,

tomu moc nerozumim. Pokud napises vice prikazu (treba v obsluze udalosti
OnClick) tak se nicim neprerusuji. Zkus to popsat nejak blize.

Petr Vones, amatersky programator

WipeFile

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.8.2000 22:49:14

From: "Polak Jiri" <Jiri.Polak(zv)tconsult(tec)cz>
> To je bohuzel pravda. Vsak to taky dela nemale problemy.
> Potom nestaci dat pravo change na jeden soubor,
> uzivatel musi mit prava hned na cely adresar. Fuj.
> Samozrejme to delaji mj. Microsofti produkty.

Ahoj,

pokud vim, tak treba Word pouziva pomocne soubory kvuli sdileni dokumentu.
V pomocnem souboru je ulozen cely nazev dokumentu a jmeno uzivatele ktery
s nim prave pracuje. Pokud se nekdo dalsi snazi tento dokument otevrit,
tak Word hleda ve stejnem adresari nejdrive tento pomocny soubor a zobrazi
pak dialog "S timto souborem uz pracuje uzivatel XY, chcete kopii ?" nebo
tak nejak.

Petr Vones, amatersky programator

Oracle

[*] voltrr1.epr(zv)mail.cez(tec)cz - 22.8.2000 06:32:34



Pod pojmem databaze se v Oracle rozumi soubor tabulek, pohledu atd.. umisteny v
instanci.

Instanci musis vytvorit prostredky Oracle. Tabulku muzes vytvorit z
SQLExploreru, prostredky Oracle nebo
pomoci TQuery (spustis ExecSQL SQL prikaz pro vytvoreni tabulky Create table)

Muzes bejt konkretnejsi ??

Radek Voltr

IB6 - jak nasypat data z textaku do tabulky ?

[*] azeleny(zv)csas(tec)cz - 22.8.2000 07:43:39

DDV,

Interbase umi external tables, podivej se do dokumentace, zda by to neresilo
problem.

> Mam na mysli nasypani pres consoli (ne programove z delphi).
> Napriklad v informixu to jde za pouziti sql prikazu LOAD FROM ...
> Je neco podobneho i v Intebase 6 ???

External tables jsou uz i v starsich cerzich IB, ale bohuzel jsem to nikdy
nepouzil, takze vice nevim.

a.
-----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s.
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
tel: +420 2 24995 236
-----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.

CGI-skripty na MS PWS

[*] voltrr1.epr(zv)mail.cez(tec)cz - 22.8.2000 06:44:08



> Ahoj,
> Ja som to vyriesil tak, ze som jednoducho prepisal priponu suboru z *.exe na
> *.xyz a fungovalo to, lebo prehliadac je spraveny tak, ze ked si kliknes na
> nejaky odkaz s programom na downloadnutie, tak ho hned stahuje.
> > potrebujem na MS Personal Web Serveri spustat
> > CGI-skript (program napisany v Delphi), ale
> > nejak sa mi nedari.
> > Miesto spustenia skriptu ponukne dotycny
> > subor na downloadnutie.
> > Adresar s dotycnym skriptom, mam nastaveny
> > na zdielanie a aj v nastaveni prislusnej
> > Web Directory mam povoleny executing,

Absolutne normalne to slape - pouzivam to , jak na PWS tak IIS.

Zkus dve veci :

1. zrusit pravo READ z WebDirectory a ponechat tam pouze EXECUTE (nevim co mas
za PWS ale u IIS musis
rozlisovat mezi Execute : Scripts only ale ty potrebujes to Execute: Scripts and
Executables

2. umistit exac do adresare Scripts nebo cgi-bin


Radek

WipeFile

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 22.8.2000 07:54:16



> -----P�vodn� zpr�va-----
> Od: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
> Odesl�no: 21. srpna 2000 22:49
> Komu: Konference Delphi
> P�edm�t: Re: WipeFile
>
>
> From: "Polak Jiri" <Jiri.Polak(zv)tconsult(tec)cz>
> > To je bohuzel pravda. Vsak to taky dela nemale problemy.
> > Potom nestaci dat pravo change na jeden soubor,
> > uzivatel musi mit prava hned na cely adresar. Fuj.
> > Samozrejme to delaji mj. Microsofti produkty.
>
> Ahoj,
>
> pokud vim, tak treba Word pouziva pomocne soubory kvuli
> sdileni dokumentu.
> V pomocnem souboru je ulozen cely nazev dokumentu a jmeno
> uzivatele ktery
> s nim prave pracuje. Pokud se nekdo dalsi snazi tento
> dokument otevrit,
> tak Word hleda ve stejnem adresari nejdrive tento pomocny
> soubor a zobrazi
> pak dialog "S timto souborem uz pracuje uzivatel XY, chcete
> kopii ?" nebo
> tak nejak.
>

Mas pravdu, Microsofti to delaji z jineho duvodu. Proc ale v NT delaji
system opravneni, kdyz nas potom svymi dalsimi programy nuti jej nepouzivat,
to nechapu. (myslim, ze v te firme je bordel a leva ruka nevi, co dela
prava.
Treba jim nejake to rozdeleni pomuze (?) :-)

Uz jsme ale hodne daleko od subjectu a nechci zakladat nove tema

Jura


Rozsireni Project Manageru

[*] Jan Krizek <krizek(zv)krizkules(tec)cz> - 22.8.2000 08:08:49

Ahoj,

nevite nekdo o nejake nahrade Project Manageru, ktera by umela napriklad rozdelit zdrojaky do vice slozek (tak jak MSVC++), protoze uz mam ve zdrojacich docela bordel.

Honza +

Delphi 5 Prof

Presypani obsahu tabulek z Visual FoxPro do IB6

[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 22.8.2000 08:10:31

Da se to pomoci DataPump utility dodane s Delphi.

Milan Tomes

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ota Maly
> Sent: Monday, August 21, 2000 6:43 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Presypani obsahu tabulek z Visual FoxPro do IB6
>
>
> Ahoj,
> Potrebuji presypat mnoho zaznamu z nekolika malo tabulek do jejich
> ekvivalentu v InterBase6, jak na to mam jit? Je na to nejaka utilita nebo
> musim napsat program i pro jednorazove presypani?
> Do tech Visual FoxPro tabulek (*.dbf) se mi dari se pripojit pres BDE
> (Database Desktopem a Database Explorerem dodavanym s D5Prof., popr. z
> programu), takze tudy by cesta vedla, ale nevite nekdo o necem rychlejsim?
>
> D5Prof.
>
> S pozdravem
> Ota Maly
>
> PaPouch elektronika
> http://www.pap-el(tec)cz
>

SQL Builder

[*] Petr Sladk� <sweet(zv)ksprogram(tec)cz> - 22.8.2000 08:13:12

Dobry
Nevi n�kdo co je potreba mit nainstalovany aby mnel SQL Builder pristupny pod D5.

Popripade odkud se da stahnout?

OT: MySQL na Win32 a odepreny pristup

[*] Alois.Jirasek(zv)atlas(tec)cz - 22.8.2000 08:16:59

Mam nainstalovane MySQL na Win32 (zkouseno Windows NT 4.0 Workstation a Windows 98). Na pocitaci, na kterem je server nainstalovany, chodi vse perfektne. Ze vsech aplikaci se pres ODBC na tento server dostanu.

Kdyz ale zkusim pristup z jineho pocitace v siti (protokol TCP/IP bezi, IP adresy jsou spravne nastaveny a taktez jsou nastaveny spravne aliasy), ohlasimi ODBC chybu "Pristup odepren".

Nevim naprosto kde hledat chybu, proto vikam kazde napady. Dekuji.

PS: Napadame me jedina vec. MySQL pro Win32 neni FREEWARE, ale SHAREWARE, avsak nenasel jsem nikde popis omezeni v teto sharewarove verzi, pouze to, ze se musi zaplatit licencni poplatek.

PARADOX

[*] Bobek <bobak(zv)minv.sk> - 22.8.2000 08:45:21

prijemny pekelny den,

mam otazku, existuje SQL prikaz pre paradox ako napriklad v Informixe MATCHES ? ak ano tak sem s nim, diki. Bobek


podivne chovani programu

[*] Delphi Konference <delphi(zv)zps.skoda-auto(tec)cz> - 22.8.2000 08:49:27



Ahoj, mam napsany program. V�nem velmi �asto vytvarim a zase uvolnuji
objekty a menim velikost dynamickych poli.

Muj problem spociva v�nespolehlivosti programu. Velice �asto se mi toti�
stava ze za behu programu vyskoci Acces Violation, v�horsim pripade
hlaska o provedeni neplatne operace ci v�nejhorsim pripade z�hroutim
cele windows. Tyto chyby se objevuji bez sebemeci znamky logicnosti
z�cela nahodne.

Jemi jasne ze nekde pristupuji do pameti na kterou nemam pravo, mozna
tak� uvolnuji objekty jiz uvolnene, nebo volam pro zmenu objekty kter�
jsem jiz uvolnil.

Nemuze te mi n�kdo poradit jak takoveto chyby odchytit. P�i ladeni
trasovani kodu je tezke na ne nzrazit, proto�e se ukazou jen jednou
nacas v�nejmene ocekavany okamzik. Skousel jsem MemProof (s nim sem
nektere odstranil) ale ten asi tak� nedokaze odhalit vse.

Pouzivam D5sr1 Prof.

Dekuji za kazdou uzitecnou pripominku.

Ales Gregor


QReport - tisk jednoho zaznamu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 22.8.2000 09:14:20

Lud�k P�ral dne 18 Aug 2000, v 22:58:

> Az dosud jsem pouzival generator sestav Sinea. Nyni ovsem nechce
> spolupracovat spravne s ovladacem EPSON LQ870.

Ahoj,

mozna se mylim, ale spise bych to videl na problem ovladace pro tuto
tiskarnu. Nas zakaznik pouziva podobne tiskarny, take se _nekdy_
spatne posouval papir. Stahli jsme z Internetu nejnovejsi ovladace a
je pokoj. Pro tisk pouzivame QReport.

Karel Rys


PARADOX

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 22.8.2000 09:35:54

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.

Stejne jako v Informixu existuje i v Paradoxu LIKE. Jako * musis pouzit % a
jako ? zase _ .
Petr

-----Original Message-----
From: Bobek [mailto:bobak(zv)minv.sk]
Sent: Tuesday, August 22, 2000 8:45 AM
To: delphi-l(zv)fwd(tec)cz
Subject: PARADOX


prijemny pekelny den,

mam otazku, existuje SQL prikaz pre paradox ako napriklad v Informixe
MATCHES ? ak ano tak sem s nim, diki.


Bobek

D2S a upgrade BDE

[*] Peter ROZIM <prozim(zv)pollux.sk> - 22.8.2000 09:45:42

Pokusam sa dostat na WinBase 602 D2 Standard cez BDE 3,0 sa mi to nedari
pomoze aktualizacia BDE na aku verziu a kde ju zozeniem


ADO,DBase,Creat Table

[*] Erik Salaj <winsoft(zv)napri.sk> - 22.8.2000 10:33:30

> Jet4.0 slouzi pouze pro *.mdb (MS ACCESS), kdyz chces ukladat do *.DBF
> (nevim co tim myslis a proc na tom trvas, kdyz existuje prave ten access
> pres JET4.0) tak musis pouzit "OLEDB for ODBC drivers" a odkazat se na

Jet 4.0 umoznuje pouzit tzv. ISAM drivery pre pristup aj k inym ako Access
databazam, napr. dBase, Paradox, Text, ... Priklady su napr. na Adonis FAQ
stranke na http://www.cybermagic.co.nz/winsoft/adofaq.htm

Erik Salaj, WINSOFT


obdoba DOA (DirectOracleAccess) pro MS SQL

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.8.2000 11:14:03

On 21 Aug 2000, at 17:41, Honza wrote:

> Prosim neni tu dobra duse ktera by mi mohla doporucit
> spolehlive komponenty pro PRIMY PRISTUP na MS SQL?
> (bez potreby BDE a ODBC)

Neni to sice pravy primy pristup, ale vzhledem ke koncepcim MS
technologii lze povazovat prime pouziti OLE DB za "primy" pristup.


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


MySQL na Win32 a odepreny pristup

[*] Mik Radim <mik(zv)oce(tec)cz> - 22.8.2000 11:40:33

Je potreba nastavit spravne prava pristupu k MySQL prikazem GRANT PRIVILEGES
pro vsechny uzivatele a pro sitovy pristup. Cely postup je napsan v
dokumentaci k MySQL kapitola 6. ( localhost pro ODBC je standardne povolen)

---------------------------------------
Radim Mik,


> -----Original Message-----
> From: Alois.Jirasek(zv)atlas(tec)cz [mailto:Alois.Jirasek(zv)atlas(tec)cz]
> Sent: Tuesday, August 22, 2000 8:17 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: OT: MySQL na Win32 a odepreny pristup
>
>
> Mam nainstalovane MySQL na Win32 (zkouseno Windows NT 4.0
> Workstation a Windows 98). Na pocitaci, na kterem je server
> nainstalovany, chodi vse perfektne. Ze vsech aplikaci se pres
> ODBC na tento server dostanu.
>
> Kdyz ale zkusim pristup z jineho pocitace v siti (protokol
> TCP/IP bezi, IP adresy jsou spravne nastaveny a taktez jsou
> nastaveny spravne aliasy), ohlasimi ODBC chybu "Pristup odepren".
>
> Nevim naprosto kde hledat chybu, proto vikam kazde napady. Dekuji.
>
> PS: Napadame me jedina vec. MySQL pro Win32 neni FREEWARE,
> ale SHAREWARE, avsak nenasel jsem nikde popis omezeni v teto
> sharewarove verzi, pouze to, ze se musi zaplatit licencni poplatek.
>

Prejmenovani adresare

[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 22.8.2000 10:31:46 met-1

Ahoj!

Mam zase jednu otazecku - jak inteligentne prejmenovat adresar?
Zkousel jsem funkci RenameFile, ktera sice zabere na W9x, ale na
W2000 uz ne.
Dale me napadlo, ze by to slo resit tak, ze bych vytvoril prazdny
adresar noveho jmena, do nej nakopiroval soubory z adresare stareho
jmena, v nem pak tyto soubory zrusil a nakonec zrusil samotny adresar
stareho jmena. Jenze"
- IMHO je toto zbytecne slozite,
- pri "rozsahlych" adresarich by to trvalo "dlouho"
- kdyby se napr. PC "zaseknul" behem procesu a musel restartovat, tak
by pak byl na disku zmatek.
Nevite nekdo o nejakem jednodussim reseni?

Diky moc, Jirka.

TClientSocket.Send

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 22.8.2000 12:44:27

Mam problem pri odesilani vetsich souboru synchronne,
tj. v ctBlocking. Aplikace se v prubehu odeslani (pri odesilani
70KB tesne pred koncem, pri odesilani 9MB v pulce) kousne
mimo muj kod. Zkousel jsem na konec smycky pridat volani
Application.ProcessMessages, ale nepomohlo to.
Pomohlo doplneni Sleep(100) a pak ProcessMessages.
Prijde mi to vsak ne zrovna koser. V cem je problem ?
Stejny problem je i bez pouziti TWinSocketStream
(pouziti WinSocketStream je doporuceno v Helpu
pro Blockin rezim).
Je to poprve co jsem se rozhodl pouzit synchronni rezim,
v asynchronni rezimu jsem problemy nikdy nemel.

Vypis kodu (bez try/finally, ProgressBaru):
sck:=TClientSocket.Create(Nil);
sck.ClientType:=ctBlocking;
sck.Address:='127.0.0.1';
sck.Port:=9777;
sck.Open;
ss:=TWinSocketStream.Create(sck.Socket,60000);
fs:=TFileStream.Create(dlg_Save.Filename,fmOpenRead);
while fs.Position<fs.Size do begin
start:=fs.Position;
block:=fs.Size-start;
if block>SizeOf(buf) then block:=SizeOf(buf);
fs.ReadBuffer(buf,block);
sended:=ss.Write(buf,block);
if sended<0 then sended:=0;
if sended<block then fs.Position:=start+sended;
end;
fs.Free;
ss.Free;
sck.Close;
sck.Free;

D5 Pro UP1, WinNT40CZ

podivne chovani programu

[*] Tom� Vlad�k������V��?���o�� - 22.8.2000 12:54:33

No, ono je asi dobre kdyz nejaky objekt uvolnim, nastaviti jej na NIL,
stejne tak ihned po inizializaci aplikace, prred tim nez se pouziva (treba v
sekci unitu initialization).
A pred tim nez objekt pouziju, testovat, zda je ci neni NIL. Pak by se zadne
"pristupove nasili" konat nemelo.


T.>
> Ahoj, mam napsany program. V nem velmi �asto vytvarim a zase uvolnuji
> objekty a menim velikost dynamickych poli.
>
> Muj problem spociva v nespolehlivosti programu. Velice �asto se mi toti�
> stava ze za behu programu vyskoci Acces Violation, v horsim pripade
> hlaska o provedeni neplatne operace ci v nejhorsim pripade z hroutim
> cele windows. Tyto chyby se objevuji bez sebemeci znamky logicnosti
> z cela nahodne.
>
> Jemi jasne ze nekde pristupuji do pameti na kterou nemam pravo, mozna
> tak� uvolnuji objekty jiz uvolnene, nebo volam pro zmenu objekty kter�
> jsem jiz uvolnil.
>

MySQL na Win32 a odepreny pristup

[*] Tom�s Vlad�k������V��?���o�� - 22.8.2000 13:24:10

Kdyz davas GRANT na prava tak se rozlisuji uzivatele "lokalni" a
"vzdaleni" - vzdycky musis nastavit prava zvlast pro oba dva zpusoby
pristupu.

You can add new users by issuing GRANT statements:

shell> mysql --user=root mysql
mysql> GRANT ALL PRIVILEGES ON *.* TO monty(zv)localhost
IDENTIFIED BY 'something' WITH GRANT OPTION;
mysql> GRANT ALL PRIVILEGES ON *.* TO monty(zv)"%"
IDENTIFIED BY 'something' WITH GRANT OPTION;
mysql> GRANT RELOAD,PROCESS ON *.* TO admin(zv)localhost;
mysql> GRANT USAGE ON *.* TO dummy(zv)localhost;

To "%" znamena uziavtel odevsud jinde nez localhost.

Mozna v tom mam trochu zmatek, ale podivaj se do manualu 6.13 Adding new
user privileges to MySQL

----- Original Message -----
From: <Alois.Jirasek(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 22, 2000 8:16 AM
Subject: OT: MySQL na Win32 a odepreny pristup


> Mam nainstalovane MySQL na Win32 (zkouseno Windows NT 4.0 Workstation a
Windows 98). Na pocitaci, na kterem je server nainstalovany, chodi vse
perfektne. Ze vsech aplikaci se pres ODBC na tento server dostanu.
>
> Kdyz ale zkusim pristup z jineho pocitace v siti (protokol TCP/IP bezi, IP
adresy jsou spravne nastaveny a taktez jsou nastaveny spravne aliasy),
ohlasimi ODBC chybu "Pristup odepren".
>
> Nevim naprosto kde hledat chybu, proto vikam kazde napady. Dekuji.
>
> PS: Napadame me jedina vec. MySQL pro Win32 neni FREEWARE, ale SHAREWARE,
avsak nenasel jsem nikde popis omezeni v teto sharewarove verzi, pouze to,
ze se musi zaplatit licencni poplatek.
>
>

StringGrid

[*] volcik(zv)email(tec)cz - 22.8.2000 13:30:30

To neni ono, co potrebuji. Pomoci goRowSelect v Options se nastavi pouze zda
mohu vybirat jednotlive bunky StringGridu nebo jen cele radky. Ja vsak potrebuji,
aby neslo vybrat vice radku (tzn. napr. stiskem Shift+Down => provede se
vyber nekolika radku a to prave nechci aby to slo).

D.V.

---
WWW.EMAIL.CZ - Vase posta zdarma
http://www.email(tec)cz


podivne chovani programu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.8.2000 14:22:55

On 22 Aug 2000, at 8:49, Delphi Konference wrote:

> Ahoj, mam napsany program. V�nem velmi �asto vytvarim a zase uvolnuji
> objekty a menim velikost dynamickych poli.
>
> Muj problem spociva v�nespolehlivosti programu. Velice �asto se mi
> toti� stava ze za behu programu vyskoci Acces Violation, v�horsim
> pripade hlaska o provedeni neplatne operace ci v�nejhorsim pripade
> z�hroutim cele windows. Tyto chyby se objevuji bez sebemeci znamky
> logicnosti z�cela nahodne.
>
> Jemi jasne ze nekde pristupuji do pameti na kterou nemam pravo, mozna
> tak� uvolnuji objekty jiz uvolnene, nebo volam pro zmenu objekty kter�
> jsem jiz uvolnil.

Pokud si neumis ohlidat alokaci a uvolnovani pameti, pak muzes
udelat nasledujici: ihned po uvolneni pameti vynuluj i ukazatel (ptr
:= nil). Pred volanim ukazatele si otestuj, zda neni nahodou nil.
Pokud nejde z nejakych duvodu takovy test udelat (napriklad se
dostavas k pameti pres jinou promennou), pak celou akci obal try ..
except. Stejne to udelej tam, kde bys mohl prelezt alokovane pole.
Pamatuj si alokovanou velikost a/nebo to obal try .. except.


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


StringGrid

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 22.8.2000 14:31:07

V tom pripade te bude zajimat goRangeSelect

Jan Fiala

----- Original Message -----
From: <volcik(zv)email(tec)cz>> To neni ono, co potrebuji. Pomoci goRowSelect v Options se nastavi pouze zda
> mohu vybirat jednotlive bunky StringGridu nebo jen cele radky. Ja vsak potrebuji,
> aby neslo vybrat vice radku (tzn. napr. stiskem Shift+Down => provede se
> vyber nekolika radku a to prave nechci aby to slo).
>
> D.V.
>
> ---
> WWW.EMAIL.CZ - Vase posta zdarma
> http://www.email(tec)cz
>
>

StringGrid

[*] Jammic <Jammic(zv)canex.sk> - 22.8.2000 15:19:24



Skuste toto: V Options

goRowSelect<-True
goRangeSelect<-False

S pozdravom
jammic


StringGrid

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 22.8.2000 15:35:37



>To neni ono, co potrebuji. Pomoci goRowSelect v Options se nastavi pouze
zda
> mohu vybirat jednotlive bunky StringGridu nebo jen cele radky. Ja vsak
potrebuji,
> aby neslo vybrat vice radku (tzn. napr. stiskem Shift+Down => provede se
> vyber nekolika radku a to prave nechci aby to slo).


Pokud to spravne chapu, tak by to melo resit vypnuti goRangeSelect v Options

Tomas


StringGrid

[*] Radek Janu� <janus(zv)foresta(tec)cz> - 22.8.2000 15:38:04

dej si v Options Stringgridu goRangeselect na False


Radek

-----P�vodn� zpr�va-----
Od: volcik(zv)email(tec)cz <volcik(zv)email(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. srpna 2000 14:15
P�edm�t: Re: StringGrid


>To neni ono, co potrebuji. Pomoci goRowSelect v Options se nastavi pouze
zda
> mohu vybirat jednotlive bunky StringGridu nebo jen cele radky. Ja vsak
potrebuji,
> aby neslo vybrat vice radku (tzn. napr. stiskem Shift+Down => provede se
> vyber nekolika radku a to prave nechci aby to slo).
>
>D.V.
>
>---
>WWW.EMAIL.CZ - Vase posta zdarma
>http://www.email(tec)cz

UNICODE

[*] Vito <vito(zv)centrum(tec)cz> - 22.8.2000 15:52:13

Ahoj vsetci,
chcem pouzivat v programe unicode a mam v D5 na to typ WideString. To je OK,
ale ziadna vyzualna komponenta nema vlastnost typu WideString, ale len
String potazme TString. Mozete mi poradit ako dostat napr. do TEdit.Text
text v UNICODE? Ja mam teda databazu IB6 a v nej texty v UNICODE a
potrebujem ich zobrazit. Alebo su na to nejake specialne komponenty? Kde ich
najdem? Vsade v helpoch sa pise, ze D5 podporuje UNICODE, resp. dvojbajtove
znaky, ale ziadna komponenta s nimy nevie pracovat.
diky za rady...
Vito


Scanavani kodu a jejich ulozeni do databaze

[*] michalschwarz(zv)email(tec)cz - 22.8.2000 16:14:59

Potreboval bych oscanovat nekolik kodu a prevest je do databaze(nebo delphi
promenych) pro dalsi zpracovani. Zadam o informaci o komponente, ktera by
poskytovala tyto moznosti. Pouzivam Delphi 5 a Windows 98. Dekuji Michal.

---
WWW.EMAIL.CZ - Vase posta zdarma
http://www.email(tec)cz


podivne chovani programu

[*] Jan Najv�rek <najvarek(zv)seznam(tec)cz> - 22.8.2000 16:36:59

>
> Muj problem spociva v nespolehlivosti programu. Velice �asto se mi toti�
> stava ze za behu programu vyskoci Acces Violation, v horsim pripade
> hlaska o provedeni neplatne operace ci v nejhorsim pripade z hroutim
> cele windows. Tyto chyby se objevuji bez sebemeci znamky logicnosti
> z cela nahodne.
>

Meli jsme podobne problemy na jednom velkem projektu a neni na to, bohuzel, zadne jednoduche a 100% reeseni.

Co muzes udelat:
- zkusit jine programy kontrolujici spravu pameti - me zkusenosti jsou, ze kazdy program odchyti neco jineho - my jsme kombinovali MemProof, BoundChecker a Sleuth (musis mit dostatecne bohatou firmu, aby to vsechno zaplatila :))

V kodu:
- zapisovani nil do uz uvolnenych promennyn urcite neuskodi (jak psali ostatni)- jeste lepe je drzet se doporuceni, ze promenne maji byt pokud mozno lokalni a byt pouzity jenom jednou, a tim tedy zabranit riziku, ze je uvolnujes vicekrat a nebo pristupujes na neinicializovany pointer
- udelat si nejakou testovaci smycku, ktera aktivne zkousi ruzne funkce programu, tak, aby ti spolehlive po jiste dobe shodila program - pak vyrazovat jednotlive funkce az po bod, kdy je to stabilni - co si vyradil je to, co je zodpovedne za stabilitu
- pozor na komunikaci Delphi a C++ Builder - narazili jsme na spoustu "memory overrun" kdyz Delphi 4 pouzivalo C ++ Builder 4 COM objekty (stringy se uvolnovali dvakrat apod.) - nejlepe je v tomto pripade vubec neuzivat OleVarianty

Mej se

Jan Najvarek
Manulife Financial


Prejmenovani adresare

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.8.2000 17:21:05

On 22 Aug 2000, at 10:31, Jiri Novotny wrote:

> Mam zase jednu otazecku - jak inteligentne prejmenovat adresar?
> Zkousel jsem funkci RenameFile, ktera sice zabere na W9x, ale na W2000
> uz ne.

Podle MSDN neni duvod, aby to nefungovalo, s jednou poznamkou:
Windows 2000: The MoveFile function coordinates its operation with the
link tracking service, so link sources can be tracked as they are moved.


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


Interbase a procedure2

[*] Jaro <jaro(zv)sinea(tec)cz> - 22.8.2000 17:25:04

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Zdravim,
Proc v procedure nemuzu vysledek SELECTu (zarucene 1radek a 1 sloupec) dosadit do lokalni promenne a tedy pozdeji vyuzit?
cast porcedury:
...
AS
DECLARE VARIABLE I INTEGER;
SELECT CIS :I FROM NAROD WHERE NAZEVNAR=:NAZEVNARX
...

Diky za rady Ondrej Svab.

Samozrejme ze muzes, ale to, co tvrdis, ze je zarucene, tak zariucene neni,
leda ze by ten NAZEVNAR byl Unique, o cemz pochybuji.

Je tydy vhodnejsi zjistit hodnotu ID a do podminky na jednu vetu vkladat ID.
Jinak bys pred tim musel udelat jeste jeden dotaz, napr.

I = -1;
if SELECT Count(*) FROM NAROD WHERE NAZEVNAR=:NAZEVNARX INTO :I;
if (i=1) then
begin
SELECT CIS FROM NAROD WHERE NAZEVNAR=:NAZEVNARX INTO :I;
end
if (I= -1) then
begin
.............. error
end

------------------------------------------------------------------------
Navstivte internetovy technicky casopis www.techbox(tec)cz,
kde zizkate mnoho zajimavych informaci ze sveta PC

FontDialog

[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 22.8.2000 17:41:33

Ahoj Petre V.,

prave bych potreboval neco podobneho, co je tady jiz popsano (jen by to bylo
pro PrintDialog), ale jaksi jsem nepochopil, jak mam zjistit ty konstanty (v
Dialogs.pas jsem nic nenasel). Konkretne by se melo jednat o zruseni ENABLE
u zadavani poctu kopii a vse, co s tim souvisi. Podrad mi prosim...

S pozdravem
Vasek Navrat

> From: Straka Josef <kshb(zv)seznam(tec)cz>
> > Potreboval bych schovat CheckButtony na podtrzene pismo a preskrtnute
pismo.
> > Ale tak, aby tam zustala moznost zmenit barvu pisma, nejde tedy pouzit
> > FontDialog.Option.
> > Pote druha vec, jeste bych potreboval schovat "Rez pisma" (tucne,
> > kurziva...), ale aby tam vse ostatni zustalo (velikost).
> > Idealni by bylo, kdyby slo tyto polozky znepristupnit Enabled.False. Aby
tam
> > ta polozky byly, ale nedalo se na ne klepnout.
>
> Ahoj,
>
> Da se to udelat napriklad takhle:
>
> uses
> Dlgs;
>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> FontDialog1.Execute;
> end;
>
> procedure TForm1.FontDialog1Show(Sender: TObject);
> begin
> EnableWindow(GetDlgItem(TFontDialog(Sender).Handle, cmb2), False);
> EnableWindow(GetDlgItem(TFontDialog(Sender).Handle, chx1), False);
> EnableWindow(GetDlgItem(TFontDialog(Sender).Handle, chx2), False);
> end;
>
> Konstanty cmb2, chx1, atd... predstavuji indexy poradi jednotlivych typu
> ovladacich prvku (viz Dlgs.pas). Takto ti to muzes upravit dle potreby.
>
> Petr Vones, amatersky programator

UNICODE

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.8.2000 18:01:52

On 22 Aug 2000, at 15:52, Vito wrote:

> chcem pouzivat v programe unicode a mam v D5 na to typ WideString. To
> je OK, ale ziadna vyzualna komponenta nema vlastnost typu WideString,
> ale len String potazme TString. Mozete mi poradit ako dostat napr. do
> TEdit.Text text v UNICODE? Ja mam teda databazu IB6 a v nej texty v
> UNICODE a potrebujem ich zobrazit. Alebo su na to nejake specialne
> komponenty? Kde ich najdem? Vsade v helpoch sa pise, ze D5 podporuje
> UNICODE, resp. dvojbajtove znaky, ale ziadna komponenta s nimy nevie
> pracovat. diky za rady... Vito

Na editaci pouzij budto RichEdit s vhodnymi upravami, nebo zkus
TRichEdit98 od Obukhova, ktery uz potrebne upravy udelal.

Delphi sice unicode podporuje, ale jen tak, ze ma typ WideString.
Texty v DFM jsou porad ansi, vsechny komponenty take. Bohuzel
je to z duvodu, ze W95/98 nemaji podporu unicode ve vetsine rutin
a komponent, smejdy jedny.


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


Sposteni MediaPlayeru

[*] Raul Endymion <raul.endymion(zv)ns1.infima(tec)cz> - 22.8.2000 18:15:38

Mam soubor MPG a chci aby po stisku tlacitka se mi pustil defaultni
asociovany prehravac na MPG. Jak na to ?
Nebo jeste jinak, jde pustit MPG primo v delphi ?
Pomoci ActiveX komponenty mi to neustale shazuje delphi samotne..

Raul mailto:raul.endymion(zv)bsdi.infima(tec)cz

TForm nebo TFrame v komponentove palete?

[*] Michal Frajt <frajt(zv)aki(tec)cz> - 22.8.2000 18:31:15

[P��loha v souboru: frajt.vcf]

ceske trideni

[*] Rommet <rommet(zv)post(tec)cz> - 22.8.2000 19:17:50

Ahoj,

jelikoz mi nikdo neodpovedel, zkousim tuto otazku hodit do konference opet.
Chtel bych pomoc s ceskym tridenim s Databasi typu Interbase 4.
Database se netridi cesky (hacky na konci. velke pismena prednost pred
malyma).
Zkousel jsem zmenit langdriver (momentalne jej nemam nastaveny),
zkousel jsem nastavit kazdy jazyk ktery obsahuje Czech nebo kod 852, ale nic
z toho neslo.
Navic bych potreboval zachranit data, ktera jiz v databasi mam vepsane.

Je prosim nejaka moznost dost nutne bych to potreboval a co mozna nejdrive.
Diky moc.

Mej te se vsichni krasne a s pozdravem

Roman

Uzamykanie zaznamov, Transakcie, IB

[*] R�bert Fujak <robof(zv)inmail.sk> - 22.8.2000 21:09:02

Zdravim Vas,
zacinam s IB6 a mam vtom trochu chaos..., prosim o akukolvek radu.

Priklad:
tabulka Adresar

Komponenty:
IBDatabase
IBQuery - pouzivam select na prehlad zaznamov
IBSQL - pouzivam na insert, update
IBStoredProc - pouzivam na editovanie (cez proceduru zistujem zaznam, ktory chce uzivatel editovat)

Otazka:
1) Mam ku kazdej komponete pouzit inu IBTransaction, alebo staci jedna pre vsetky?
2) IBStoredProc mi vrati SELECT na pozadovany zaznam, vysledok naplnim do TEdit-ov, ale ako uzamknut zaznam? Prosim pozrite sa na tento kod, popripade napiste ako to riesit inac:
3) Mam pouzivat TQuery alebo TIBDataSet

procedure TfrmAdr.EditRec;
begin
with DataAdr.ADRPROC(*IBStoredProc*), frmAdrEdit do begin
try
Transaction.StartTransaction;
StoredProcName := 'GET ADRDATA';
Prepare;
ParamByName('IDADR').AsInteger := DataAdr.qryAdrView.FieldByName('IDADR').AsInteger;
ExecProc;
Transaction.Commit;
fldFIRMA.Text := ParamByName('FIRMA').AsString;
fldICO.Text := ParamByName('ICO').AsString;
fldDIC.Text := ParamByName('DIC').AsString;
fldTEL1.Text := ParamByName('TEL1').AsString;
...
except
Transaction.Rollback;
end; (* try *)
end; (* with *)
with DataAdr.AdrSQL(*IBSQL*), frmAdrEdit do begin
if ShowEditForm then begin
try
Transaction.StartTransaction;
SQL.Clear;
SQL.Append('UPDATE ... ');
Prepare;
Params.ByName('FIRMA').AsString := fldFIRMA.Text;
Params.ByName('ICO').AsString := fldICO.Text;
Params.ByName('DIC').AsString := fldDIC.Text;
Params.ByName('TEL1').AsString := fldTEL1.Text;
Params.ByName('IDADR').AsString := fldIDADR.Text;
ExecQuery;
Transaction.Commit;
except
Transaction.RollBack;raise;
end; (* try *)
DataAdr.QueryRefresh(DataAdr.qryAdrView);
end; (* if *)
end; (* with *)
end;


Dakujem.
S pozdravom Fujak, Robert
mailto:robof(zv)inmail.sk


QuickReport a svisly text

[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 22.8.2000 22:11:42

Ahojky lidicky, nevite nahodou jak jednoduse dat na QR svisle
orientovany text... Nebo lepe vysvetleno o 90� otoceny doleva nebo
doprava. Napadlo me to delat pres QRImage na jejiz Canvas bych moh ten
text napsat, ale pripada mi to dost tezkopadne reseni...

Predem dik za radu.
--
Martin Pe�ava

/--------------------------------------------------------------\
| Known as JimX on http://www.webchat(tec)cz & http://www.xchat(tec)cz |
| Webmaster of http://miss.misto(tec)cz |
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/

Aplikace jako sluzba

[*] Petr Va���ek�����(����? - 22.8.2000 23:25:37

Chtel bych se zeptat, jak se da udelat aplikace, aby bezela jako sluzba,
cili minimalizovane v pravem dolnim rohu obrazovky na liste a bezela jakoby
porad. K tomu jeste jeden souvisejici dotaz, a to sice jak muzu pomoci
spustene aplikace kontrolovat, zda uzivatel spousti nebo ukoncuje jine
programy.
Dekuji
Petr Vasicek(W98,D5 Prof.)

Problem (nejspis) s pameti

[*] Petr Va���ek�����(����? - 22.8.2000 23:32:23

Mam prosbu o radu. Jedna se asi o pamet, to je totiz vec ktere zhola vubec
nerozumim. Mam proste program, kde je definovanych celkem dost ruznych
promennych(velka spousta poli, i vnorenych). Ted kdyz jsem tam jeste pridal
dalsi se jakoby vsechny operace v programu zpomalili, pritom se ale jeste s
novymi promennymi vubec nepracuje. V praxi - v jedne fazi programu se
nacitala data ze souboru, to trvalo puvodne asi 3s, ted je to 11s. Stejne
tak i nektere slozitejsi algoritmy v programu, chrousta to jako nikdy.
Nevite nekdo, jak bych to nejak mohl vyresit? Jestli se da nejak vyhradit
pamet, ci tak neco, rikam, ze tomu vubec nerozumim. Zkousel jsem oddelat
vsechny pridane promenne a problem zmizel, pokud jsem jich ubral jen cast,
zrychlilo se to jen castnecne. Promene puzivam po celou dobu programu,
nemuzu je tedy pomoci free uvolnit.

Dekuji moc

Petr Vasicek(D5 Prof.,W98, P366, 32MB)

Sposteni MediaPlayeru

[*] Hurricane <hurricane(zv)email(tec)cz> - 22.8.2000 23:37:28

Zdravim

Tou ActiveX myslis TMediaPlayer? Ten neni ActiveX (aspon podle me). Zkus
pouzit ten TMediaPlayer.

Hurricane
----- Original Message -----

> Mam soubor MPG a chci aby po stisku tlacitka se mi pustil defaultni
> asociovany prehravac na MPG. Jak na to ?
> Nebo jeste jinak, jde pustit MPG primo v delphi ?
> Pomoci ActiveX komponenty mi to neustale shazuje delphi samotne..

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