Archív konference Delphi

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

Msoft Help Workshop

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 25.5.2000 09:53:11

M.Lasevic wrote:

>RTF v MS Help WorkShop je tusim kompatidebilni s verzi RTF, do ktere uklada

>treba MS Word z MS Office 95. U MS Office 97 je jina struktura RTF a MS
>HelpWorkShop si s ni neumi poradit.

- pro verzi Office 97 musi byt verze Workshopu 4.03.xxxx, nekde na strankach
MS by tato verze mela byt k dispozici.

Z.Fryz


__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.

Win32 API function failed

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 25.5.2000 09:55:07

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.

Mam takovy neblahy tuseni, ze by to mohlo byt zpusobeno vycerpanim
systemovych zdroju, takze to muzou zpusobovat i ty gridy.


Jaromir Cermak

-----Original Message-----
From: Petr Vale� [mailto:delphipetr(zv)infoware(tec)cz]
Sent: Thursday, May 25, 2000 7:55 AM
To: Delphi Konference
Subject: Win32 API function failed


Ahoj,

nevite prosim nahodou nekdo z jake duvodu vznika chyba "Win32 API function
failed". V projektu mam relativne dost pouzitych stringgridu a bylo mi
receno, ze by to mohlo byt timhle. Proto bych se chtel zeptat zda-li s timto
nemate nekdo podobne zkusenosti ?

Diik.

PETR


QuickRep

[*] Roman Sev��k������Ȥ�*%�̿ - 25.5.2000 09:57:18

Tak to uz mi to jede, ale nevim jak rozchodit Preview. Chci tam mit svoje
okno.

Dik Roman

----- Original Message -----
From: <tomas.mazurek(zv)vitkovice(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 24, 2000 3:02 PM
Subject: RE: QuickRep


> Hello,
>
> ty Add dej do udalosti OnAddReports u CompReportu... Pak staci jen
> Preview.
>
> >Nejak mi to nejede,
> >vytvoril jsem Form, na ne jsem dal dva TQuickRep a QRCompositeReport.
> >Na TQuickRep jsem dal Title a dva QRLabely, spustil jsem a nic.
> >Preview je prazdny, ale kdyz dam jednotlive QuickRep.Preview, tak to
> >jede. Nevite nekdo co delam spatne ?
>
> > Hup := THup.Create(Self);
> > Hup.QRCompositeReport1.Reports.Add(Hup.QuickRep1);
> > Hup.QRCompositeReport1.Reports.Add(Hup.QuickRep2);
> > Hup.QRCompositeReport1.Preview;
> > Hup.Release;
>
> Tomas


API32 funkce pro vytvareni souboru s unique jmenem

[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 25.5.2000 10:10:51

> nejak nemuzu v MSDN najit funkci, ktera by mi v zadanem adresari vytvorila
soubor s unikatnim jmenem, neco jako byvala pod DOSem funkce 5A - Create
temporary file.

GetTempFileName(
LPCTSTR lpPathName, // address of directory name for temporary file
LPCTSTR lpPrefixString, // address of filename prefix
UINT uUnique, // number used to create temporary filename
LPTSTR lpTempFileName // address of buffer that receives the new
filename
);

Josef Cerny

********************************************
* Josef A. Cerny
* analyst and programmer
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* cellular : +420 604 23 83 29
* e-mail : cerny(zv)atlascon(tec)cz
* private : cernyja(zv)email(tec)cz
* WWW : http://www.atlascon(tec)cz
********************************************

UDF na Sybase ASA6

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 25.5.2000 10:11:32

Ahoj,

mam prosbu ohledne SQL serveru Sybase Adaptive Server Anywhere 6.
Chtel bych pouzit uzivatelsky definovanou funkci (nebo proceduru)
umistenou v DLL (napsano v Delphi 4) volanou z ulozene procedury ci
triggeru. Pres dodrzeni vsech zasad (stdcall, zadne pascal stringy, osetrene
vyjimky) mi to nahodne shazuje server (i lokal. engine). Zjednoduseni kodu i
predavanych parametru na minimum nevede k lepsim vysledkum. Skoro to
vypada, ze tam Sybase ma chybku. Hral si s tim taky nekdo? Mam patch
ASA6.03, zlobi to stejne na WinNT4Wks, Srv, Win2000Prof.

Dik, Martin Dupal


Konverze hlavickovych soboru...

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 25.5.2000 10:19:55

Zdravim...

uz mne nejak prestalo bavit delat robota a tak se ptam, neexistuje
nejaky nastroj pro konverzi ceckovskych hlavickovych souboru
(*.H) do Delphi?

Louci se Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.mlp(tec)cz/space/gebauerl/synapse - Synapse Delphi TCP/IP Library


S.O.S - SQL

[*] Petr Sadovsk� <petr(zv)slunce(tec)cz> - 25.5.2000 10:24:32

Ahojte,

mam takovy mensi problemek (D5Entr.,W98)

- napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
- ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :

select JDAA,JDAB from stat0211 where JDAB BETWEEN 29.9.1996 and 1.10.199
6 (kde JDAB je Date)

pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?

- to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996

-kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky

Poradi mi nekdo, jak na to?

Diky

Petr

Konverze chm souboru

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 25.5.2000 10:33:27

Dostal se mi do ruky help ve formatu chm v anglictine. Existuje jina cesta
jak jej pocestit nez tato:

* dekompilovat pomoci HTMLHELP Workshopu
* rucni editace HTML stranek (radove tisic stran)
* zpetna kompilace?

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


S.O.S - SQL

[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 25.5.2000 10:46:53

Misto zapisu primo hodnot tam dej parametry a ty pak napln:

Query.Sql.Text := 'select JDAA,JDAB from stat0211 where JDAB >= :dDatOd
and JDAB <= :dDaDo';
Query.ParamByName('dDatOd').AsDateTime := EncodeDate(1996,9,29);
Query.ParamByName('dDatDo').AsDateTime := EncodeDate(1996,10,1);

DBase myslim nepozna BETWEEN klauzuli. Foxka ma funkci, ale tu nemuzes
pouzit.
Pokud by jsi zadal datum ve formatu : "MM/DD/YYYY", tak by jsi hodbnoty
mozna mohl pouzit
i primo v tom query. Ale to si nejsem jisty (Informix i Paradox to vezmou).

Query.Sql.Text := 'select JDAA,JDAB from stat0211 where JDAB >=
"9/29/1996" and JDAB <= "10/1/1999"';
Petr

-----Original Message-----
From: Petr Sadovsk� [mailto:petr(zv)slunce(tec)cz]
Sent: Thursday, May 25, 2000 10:25 AM
To: delphi-l(zv)fwd(tec)cz
Subject: S.O.S - SQL


Ahojte,

mam takovy mensi problemek (D5Entr.,W98)

- napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
- ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :

select JDAA,JDAB from stat0211 where JDAB BETWEEN 29.9.1996 and 1.10.199
6 (kde JDAB je Date)

pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?

- to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996

-kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky

Poradi mi nekdo, jak na to?

Diky

Petr

Pouzivani ActiveX v BCB

[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 25.5.2000 09:53:00

Ahoj,

uz je to dyl, ale delal jsem program (D4) ktery pouzival ADO
recordset, vytvarel jsem ho takhle a fungovalo to:

var
MujRecSet: RecordSet;
OleCheck(CoCreateInstance(CLASS_Recordset, nil, CLSCTX_ALL,IID__Recordset,
MujRecSet));

Tomas


----- Original Message -----
From: <martin.falta(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 24, 2000 12:53 PM
Subject: Pouzivani ActiveX v BCB


> Ahoj,
>
> naimportoval jsem si ADODB_TLB do BCB 5 a potrebuji vyuzit objekty
Connection a Recordset. Ovsem zatim se mi je nepodarilo nadeklarovat. At
zkousim, co zkousim, vzdycky dostanu Access Violation. Nevedel by nekdo z
vas co s tim.
>
> Predem dekuji.
>
> Martin
>
> P.S. Potrebuji pouzit pouze naimportovany ADO jako ActiveX, proto mi
prosim nedoporucujte zadne ADO komponenty.

OT : RE: Jak vlozit prodleni do programu

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 25.5.2000 10:55:10

To ani na noc/vikend nevypinaji PC ?

Rekl bych, ze by to bylo vhodne
alespon quli defragmentaci pameti...
...Dobra.> ----------
> Od: L. ZITA[SMTP:konference(zv)sales(tec)cz]
>
> >
> > Teda Sleep () je urcite lepsi, i vzhledem k zatizeni procesoru, pokud
> > se nema nic behem te prodlevy delat. A navic pozor, hodnota
> > gettickcount pretece kazdych cca 50 dni. Fakt je ze u windows to asi
> > nevadi, protoze k preteceni prakticky nikdy nemuze dojit.
>
> Rozhodne bych se na to nespolehal. Mam nejmene 2 zazkazniky, kteri
> jsou tak ukazneni (ci spise je opravdu nic jineho nez zapsat fakturu
> nezajima),
> ze jim windowsy skutecne nepadaji. Ve spojeni s UPS pak u nich skutecne
> dochazi
> k i nekolikamesicnimu behu bez resetu.
>
>

TStrings.create

[*] Tomas Bihary <tomas(zv)wige-mic(tec)cz> - 25.5.2000 09:57:24

TStrings maji nektery metody abstractni,
proto musis pouzit TStringList.Create misto
TStrings.Create, pak uz je vse v poradku.

Ahoj Tomas Bihary

----- Original Message -----
From: Petr Pa��enko
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, May 24, 2000 6:43 PM
Subject: TStrings.create


Mam nasledujici kod,

procedure TForm1.Button1Click(Sender: TObject);
Var TS : TStrings;
begin
TS:=TStrings.Create;
try
TS.clear;
TS.Add('radek 1');
TS.Add('radek 2');
TS.Add('radek 3');
finally
TS.Free;
end;
end;

ktery by mel podle vseho fungovat normalne, presto ale pri stisknuti
tlacitka dojde k vyvolani chyby s nasledujicim textem:

<Project1.exe raised exception class EAbstracterror with message "Abstract
error". Proces stopped... >

Byl bych velice vdecny za radu ci vysvetleni meho pravdepodobneho omylu.

Petr Pascenko ml.
W95, D3


S.O.S - SQL

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



> -----P�vodn� zpr�va-----
> Od: Petr Sadovsk� [mailto:petr(zv)slunce(tec)cz]
> Odesl�no: 25. kv�tna 2000 10:25
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: S.O.S - SQL
>
>
> Ahojte,
>
> mam takovy mensi problemek (D5Entr.,W98)
>
> - napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
> - ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :
>
> select JDAA,JDAB from stat0211 where JDAB BETWEEN
> 29.9.1996 and 1.10.199
> 6 (kde JDAB je Date)
>
> pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?
>
> - to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996
>
> -kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky
>
> Poradi mi nekdo, jak na to?


Nemas problemy s BETWEEN ale s formatem datumu.
Nejdrive si vyzkousej format na nejakem jednoduchem
selectu s porovnanim, napr.
select JDAA,JDAB from stat0211 where JDAB > "29.9.1996"
nebo:
select JDAA,JDAB from stat0211 where JDAB > "9/29/1996"
a potom teprve zkus pouzit BETWEEN. (I kdyz mam obavu,
jestli jej LocalSQL vubec podporuje)

pro dBase jsem jednou stejny problem take resil.
V dokumentacich se mi nic nepodarilo najit, ale z nejakych
prikladu jsem vypozoroval, ze datum uzaviraji do slozenych zavorek.
A zabralo mi toto:

select JDAA,JDAB from stat0211 where JDAB > {9/29/1996}

Jestli vsak sestavujes dotaz v Delphi v komponente TQuery,
bylo by mozna lepsi pouzit parametr a vubec se nestarat
o textove vyjadreni konstanty datumu. O predani parametru
se potom postara samotne BDE ve spolupraci s databazi
a melo by to zvladnout spravne.
Pri pouziti s nejakym jinym (nebo jinak nakonfigurovanym)
zdrojem dat by se Ti takhle totiz mohlo stat, ze takove sestavovani
selectu natvrdo nepojede a vsechny prikazy budes muset
menit (a opakovane kompilovat projekt).

Jura


Pouzivani ActiveX v BCB

[*] Miroslav Cipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 25.5.2000 11:10:36


no je dobre si precist clanek "Accessing Databases Using ADO and Delphi" na
http://community.borland.com/article/0,1410,10270,00.html je to sice pro
Delphi ale melo by to fungovat i v BCB

ty ctyri chyby pri importu TLB jsou 2 a lze je opravit dopsanim
"(long*)(int*)" pred TVariant(params[3]) na radku 128 a 136 - pretypovani
TVariant na long*

M.

Pdox tabulky

[*] Ji�� Kr�l jr. - 25.5.2000 11:15:58

ano existuji free utilitky ktere podle tabulky vygeneruji fungujici heslo.
Pred rokem jsem uvazoval, zde vyvijet dale na Pdox nebo prejit na C/S. Kdyz
jsem sefum predvedl "zabezpeceni" Pdoxu bylo rozhodnuto. If mas zajem mozna
bych ty utilky nekde nasel. Je to made in USSR. Holt, Rusi, ti umi.

JK

InstallShield

[*] Ji�� Fait���}���6���3 - 25.5.2000 11:26:33

Podivej se na stranky:
InnoSetup: http://www.jordanr.dhs.org
ScriptMaker: http://www.tafweb.com
IS Extension: http://www.wintax.nl/isx


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Karel Kral
Sent: Wednesday, May 24, 2000 3:51 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: InstallShield


> Pokud pou��v� posledni verze Inno + ScriptMaker a pridas k tomu "My Inno
> Setup Extensions" tak snad nemuzes ani nic lepsiho potrebovat (ZDARMA).

Muzes mi rict, co je "My Inno Setup Extensions" a kde bych to nasel? Na
Jordan Russel to neni.

--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________

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

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

DB_KEY field v IB6

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 25.5.2000 11:33:07

Zdravim

Stiahol som si InterBase Objects version 3.3 lh od Jason Whartona a pri
prezerani tabuliek on tam ma aj dalsi stlpec s nazovm DB_KEY(zda sa mi ako
jedinecny), co to je za stlpec ?

Dakujem.

Roland.

Ziskanie SQl prikazu vytvorenia tabulky

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 25.5.2000 11:40:47

Zdravim.

Ako ziskam SQl prikaz, pomocou ktoreho som vytvoril tabulky, tak ako to robi
napr. DBExplorer, alebo IBConsole,...


Dakujem.


Roland.

Konverze hlavickovych soboru...

[*] Miroslav Cipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 25.5.2000 11:40:50


neco obsahuje "BUPack Component Package" - http://www.buypin.com/bupack.htm

.
.
The Expert area includes experts to create Control Panel libraries, Winamp
Visualisation Plugins, Import C/CPP header's, to create union, record's,
message dialogs, and many other tools to work more efficiently and quicker
!.
.
.

M.


----- Original Message -----
From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 25, 2000 10:19 AM
Subject: Konverze hlavickovych soboru...> Zdravim...
>
> uz mne nejak prestalo bavit delat robota a tak se ptam, neexistuje
> nejaky nastroj pro konverzi ceckovskych hlavickovych souboru
> (*.H) do Delphi?
>
.
.

Trideni v InterBase

[*] Lu�ek Tenkr�t - 25.5.2000 12:05:13

Nevite nekdo, jak v InterBase 5.6 tridit dle ceskych pravidel (C a CH)? Pole
je definovano jako CHARACTER SET WIN1250 COLLATE PXW_CSY.

Predem dik
Honza Cula

IB Licence a ExitCodes CL

[*] Vyvoj <vyvoj(zv)atlascon(tec)cz> - 25.5.2000 12:07:54

Ahoj!

M�me probl�my s beta verz� IB 6.0 - po dobu asi 1 m�s�ce jela v pohod�, ale te� n�m p�i spu�t�n�
hl�s�, �e je po�kozen nebo nenalezen licen�n� soubor a IB server se ukon��.
Nev�te n�kdo o co jde?

V�vojov� t�m ATLAS consulting spol. s r.o.

**************************************************
* Roman Macura
* program�tor, analytik
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* e-mail : macura(zv)atlascon(tec)cz
* WWW : http://www.atlascon(tec)cz
**************************************************

OT: ActiveX & JScript

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



> -----P�vodn� zpr�va-----
> Od: Zdenek Drvota [mailto:drvota(zv)zds(tec)cz]
> Odesl�no: 25. kv�tna 2000 9:42
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: OT: ActiveX & JScript
>
>
> Obavam se, ze prave z bezpecnostnich duvodu v ASP
> (predpokladam, ze tam to ma chodit, nebo ne?)
> NENI pristup do registry (nastesti) :-(

Proc by to bylo nastesti?

Ale neni to samozrejme pravda, ASP umoznuje pouzivat COM objekty
a do nich si muzes napsat cokoliv.

K puvodn�mu dotazu: nevim.

Jura


Pdox tabulky

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 25.5.2000 12:26:08

V ramci PDOX-u nejsou data zabezpecena vubec.
Zaprve existuje univerzalni heslo a za druhe
existuje spusta utilitek, ktere vraci ekvivalenty
onoho hesla.
Jediny zpusob jak zabezpecit PDOX data je udelat
to na urovni OS.

D.

> ----------
> Od: mattes(zv)VOLNY.CZ[SMTP:mattes(zv)volny(tec)cz]
>
> nevite nekdo jak je to se strukturou DB souboru a heslem v Pdox tabulkach. Potrebuju pro
> firmu zjistit jak moc, nebo malo jsou data ulozena v Paradoxu
> zabezpecena.
>

Pdox tabulky

[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 25.5.2000 12:45:17

> >> nevite nekdo jak je to se strukturou DB souboru a heslem v Pdox
> >>tabulkach. Potrebuju pro firmu zjistit jak moc, nebo malo jsou data
> >>ulozena v Paradoxu zabezpecena.

Ahoj,

podivej se na http://www.rksolution(tec)cz
Roman Krejci tam nabizi vlastni DLL pro zabezpeceni paradoxovych tabulek

S pozdravem
Miloslav Skacel
skacel(zv)stereo(tec)cz
www.stereo(tec)cz

S.O.S - SQL

[*] Ji�� Kr�l jr. - 25.5.2000 12:56:09

ty datumy do apostrofu urcite patri.
a nejdriv zkus nasledujici prikaz napsat pred tvuj SELECT: SET DATEFORMAT
dmy

neco podobneho jsem resil, a tim explicitnim nastavenim dmy se to vyresilo

JK



-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Petr Sadovsk�
Sent: Thursday, May 25, 2000 10:25 AM
To: delphi-l(zv)fwd(tec)cz
Subject: S.O.S - SQL


Ahojte,

mam takovy mensi problemek (D5Entr.,W98)

- napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
- ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :

select JDAA,JDAB from stat0211 where JDAB BETWEEN 29.9.1996 and 1.10.199
6 (kde JDAB je Date)

pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?

- to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996

-kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky

Poradi mi nekdo, jak na to?

Diky

Petr


Doba trvania licencie v IB6

[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 25.5.2000 13:08:11

Zdravim.


Preco Interbase prideluje licencie pre IB6 len na urcite obdobie, vsak
deklaruju ze to je OpenSource, proste zadara. 23. maja 2000 skoncila
platnost licencia ktora bola dodavana s instalaciou bety a uz je na sieti
publikovane nove cislo na licenciu do 31.08.2000.

Why ?


Thanx.

Roland.

S.O.S - SQL

[*] VOTAVA Jan <Jan.Votava(zv)epe(tec)cz> - 25.5.2000 13:13:08

Datov� konstanty jsou zd� se dosti roz���en� probl�m... Tohle p�e help k MS
SQL 7.0, snad V�m to pom��e

Writing International Transact-SQL Statements
Databases and database applications are more portable from one language to
another, or will support multiple languages, if these tips are followed:

...

When specifying dates in comparisons or for input to INSERT or UPDATE
statements, use constants that are interpreted the same for all language
settings:
ADO, OLE DB, and ODBC applications should use the ODBC timestamp, date, and
time escape clauses of:
{ ts 'yyyy-mm-dd hh:mm:ss[.fff] '} such as: { ts '1998-09-24 10:02:20' }
{ d 'yyyy-mm-dd'} such as: { d '1998-09-24' }
{ t 'hh:mm:ss'} such as: { t '10:02:20'}

Applications using other APIs, or Transact-SQL scripts, stored procedures,
and triggers should use the unseparated numeric strings for example:
yyyymmdd as 19980924.

...

Pro MS SQL server je nejvhodnejsi pouzivat datum a cas
ve formatu ANSI, ktery je univerzalni, nezamenitelny
a vypada takhle:

'RRRRMMDD h:mm:ss'

Zkuste, uvid�te...

Honza


-----Original Message-----
From: Petr Sadovsk� [mailto:petr(zv)slunce(tec)cz]
Sent: Thursday, May 25, 2000 10:25 AM
To: delphi-l(zv)fwd(tec)cz
Subject: S.O.S - SQL


Ahojte,

mam takovy mensi problemek (D5Entr.,W98)

- napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
- ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :

select JDAA,JDAB from stat0211 where JDAB BETWEEN 29.9.1996 and 1.10.199
6 (kde JDAB je Date)

pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?

- to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996

-kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky

Poradi mi nekdo, jak na to?

Diky

Petr

TFrame.OnCreate

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 25.5.2000 13:22:39

Zdravicko

Mate nekdo napad, kam napsat inicializaci promennych
na TFrame ? Pouzivam TFrame jako obraz urcite casti
databaze, ktery pak pouzivam na vice obrazovkach (napr.
adresu maji lide i organizace, podobne spojeni atd.).
Takze ten TFrame se stara o nacteni z databaze,
zobrazeni, editaci i zpetne ulozeni do databaze, z vnejsku
dostane pouze nejake ID, ke kteremu se maji data vazat,
a jinak zije samostatne. Naprosto nechapu proc TFrame
nema OnCreate a OnDestroy.

Diky

Daniel

------------------------------------------------------
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added

IB Licence a ExitCodes CL

[*] Milink Otakar <otam(zv)tdat(tec)cz> - 25.5.2000 13:49:16

Puvodni licence konci k 23.5.2000 (tusim)

novou lze najit na:
http://www.interbase.com/open/community/extended_beta_license.html

(asi puvodne predpokladali, ze v teto dobe uz bude ostra IB6)

s pozdravem Otakar Milink

>M�me probl�my s beta verz� IB 6.0 - po dobu asi 1 m�s�ce jela v pohod�,
>ale te� n�m p�i spu�t�n�
>hl�s�, �e je po�kozen nebo nenalezen licen�n� soubor a IB server se ukon��.
>Nev�te n�kdo o co jde?

Volani procedury v MSSQL 7

[*] mbartone(zv)Synthesia(tec)cz - 25.5.2000 13:51:35



Ahoj,

pokud v D3 C/S spustim proceduru v MSSQL 7 pres StoredProc tak mi po 5 minutach
nahlasi chybu

Lock time out. SQL Server connection timed out.

zkusil jsem nastavit
Database1.Params.Values['MAX QUERY TIME'] := '1800';
ale nic se nezmenilo

V Query Analyzeru procedura trva 11 minut a bez chyby.

Co mam kde nastavit ?

Milan

IB Licence a ExitCodes CL

[*] Vavro Vladimir Ing. <Vlado(zv)tentoas.sk> - 25.5.2000 13:52:16

Pozri sa na

http://www.interbase.com/open/community/extended_beta_license.html

Vlado Vavro
>Ahoj!
>
>M�me probl�my s beta verz� IB 6.0 - po dobu asi 1 m�s�ce jela v
pohod�, ale te� n�m p�i spu�t�n�
>hl�s�, �e je po�kozen nebo nenalezen licen�n� soubor a IB server se
ukon��.
>Nev�te n�kdo o co jde?
>
> V�vojov� t�m ATLAS consulting spol. s r.o.
>
>

Win32 API function failed

[*] Petr Vale� - 25.5.2000 14:23:22

No dobre, ale jak to mam tedy vyresit ? Kdyz ma pocitac 32MB Ram Win98 a program 600kB nemuzu zakaznikovi rict, ze mam v programu pouzito 10 gridu at si upgraduje pocitac.

Na Inprise mi rekli, ze pry o teto veci vi. Ale jak to mam vyresit to uz mi neporadili ...

PETR

----- Original Message -----
From: CERMAK
To: 'delphi-l(zv)fwd(tec)cz'
Sent: Thursday, May 25, 2000 9:55 AM
Subject: RE: Win32 API function failed


Mam takovy neblahy tuseni, ze by to mohlo byt zpusobeno vycerpanim systemovych zdroju, takze to muzou zpusobovat i ty gridy.

Jaromir Cermak
-----Original Message-----
From: Petr Vale� [mailto:delphipetr(zv)infoware(tec)cz]
Sent: Thursday, May 25, 2000 7:55 AM
To: Delphi Konference
Subject: Win32 API function failed


Ahoj,

nevite prosim nahodou nekdo z jake duvodu vznika chyba "Win32 API function failed". V projektu mam relativne dost pouzitych stringgridu a bylo mi receno, ze by to mohlo byt timhle. Proto bych se chtel zeptat zda-li s timto nemate nekdo podobne zkusenosti ?

Diik.

PETR

Prerovnani komponent pri resize formulare

[*] Ota Maly <omaly(zv)seznam(tec)cz> - 25.5.2000 14:37:41

Ahoj,

modelova situace:
Mam form, na nem spoustu vizualnich komponent (radove desitky), nekolik z nich jsou mema nebo gridy. Formular musi mit promennou velikost s tim, ze mema (gridy) se maji pomerne resizovat vzhledem k velikosti formu. Toto lze samozrejme jednoduse osetrit v udalosti OnResize, ale ptam se, jestli na to nemaji Delphi 5 nejake udelatko, jako treba, ze reknu, ze Memo1 bude v 50% formulare a bude velke 10%. Nebo neco podobneho k tomuto ucelu pouzitelneho. Napsat to do OnResize samozrejme neni problem, ale u 20ti rozdilnych formu pri 50ti komponentach to je docela na dlouho.

D5 Prof.UP1, NT4 SP5

Diky za kazdou pomoc, ktera mi ulehci onu slohovou praci v OnResize :-)
Ota Maly

S.O.S - SQL

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 25.5.2000 14:58:38

Nemam zkusenosti s ADO komponentami, ale pri pouziti BDE jsem si vzdy pomohl
tak, ze jsem predaval datumove konstanty jako parametry dotazu a Delphi si s
tim nejak poradilo a predalo databazi korektni datum. Snad by to slo u ADO
taky tak

Jaromir Cermak
-----Original Message-----
From: VOTAVA Jan [mailto:Jan.Votava(zv)epe(tec)cz]
Sent: Thursday, May 25, 2000 1:13 PM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: RE: S.O.S - SQL


Datov� konstanty jsou zd� se dosti roz���en� probl�m... Tohle p�e help k MS
SQL 7.0, snad V�m to pom��e

Writing International Transact-SQL Statements
Databases and database applications are more portable from one language to
another, or will support multiple languages, if these tips are followed:

...

When specifying dates in comparisons or for input to INSERT or UPDATE
statements, use constants that are interpreted the same for all language
settings:
ADO, OLE DB, and ODBC applications should use the ODBC timestamp, date, and
time escape clauses of:
{ ts 'yyyy-mm-dd hh:mm:ss[.fff] '} such as: { ts '1998-09-24 10:02:20' }
{ d 'yyyy-mm-dd'} such as: { d '1998-09-24' }
{ t 'hh:mm:ss'} such as: { t '10:02:20'}

Applications using other APIs, or Transact-SQL scripts, stored procedures,
and triggers should use the unseparated numeric strings for example:
yyyymmdd as 19980924.

...

Pro MS SQL server je nejvhodnejsi pouzivat datum a cas
ve formatu ANSI, ktery je univerzalni, nezamenitelny
a vypada takhle:

'RRRRMMDD h:mm:ss'

Zkuste, uvid�te...

Honza


-----Original Message-----
From: Petr Sadovsk� [mailto:petr(zv)slunce(tec)cz]
Sent: Thursday, May 25, 2000 10:25 AM
To: delphi-l(zv)fwd(tec)cz
Subject: S.O.S - SQL


Ahojte,

mam takovy mensi problemek (D5Entr.,W98)

- napojeni mam na DBase tabulku pres ODBC DBase File (DNS)
- ADODataset1 (CommandType:=cmdText) mi nechce vzit BETWEEN :

select JDAA,JDAB from stat0211 where JDAB BETWEEN 29.9.1996 and 1.10.199
6 (kde JDAB je Date)

pise mi chyba v syntaxi cisla - tzn. ze toto nelze pouzit pro datumy?

- to same vypise, kdyz dam where JDAB>29.9.1996 and JDAB<1.10.1996

-kdyz dam datumy do apostrofu, tak zarve nesoulad typu..logicky

Poradi mi nekdo, jak na to?

Diky

Petr

---
P��choz� 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


StringGrid

[*] Ivo HERR <ih(zv)safar(tec)cz> - 25.5.2000 15:00:44

Zdravim!
Je mi jasne, ze to tu uz urcite nekdy muselo byt, ale bohuzel se nemuzu
dostat do archivu, takze se zeptam znovu : jak zaridit zarovnavani na
stred nebo vpravo ve StringGridu?
Diky
I.

IB Licence a ExitCodes CL

[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 25.5.2000 15:02:52

Platnost prvni licence skoncila nekdy koncem kvetna. Rozsirenou beta licenci
lze stahnout z:

http://www.interbase.com/open/community/extended_beta_license.html

Petr Fischer
E-Mail: fifa(zv)praguesoft(tec)cz, ICQ#: 24154715

----- Original Message -----
From: "Vyvoj" <vyvoj(zv)atlascon(tec)cz>
To: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 25, 2000 12:07 PM
Subject: IB Licence a ExitCodes CL


Ahoj!

M�me probl�my s beta verz� IB 6.0 - po dobu asi 1 m�s�ce jela v pohod�, ale
te� n�m p�i spu�t�n�
hl�s�, �e je po�kozen nebo nenalezen licen�n� soubor a IB server se ukon��.
Nev�te n�kdo o co jde?

V�vojov� t�m ATLAS consulting spol. s r.o.

**************************************************
* Roman Macura
* program�tor, analytik
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* e-mail : macura(zv)atlascon(tec)cz
* WWW : http://www.atlascon(tec)cz
**************************************************

OT: ActiveX & JScript

[*] Martin Sekanina <marsek(zv)softcell(tec)cz> - 25.5.2000 15:13:26

Je to WScript.Shell:

var shell = new ActiveXObject("WScript.Shell");

var value = shell.RegRead("HKCU\\Software\\Blabla\\Bla");
shell.RegWrite("HKCU\\Software\\Blabla\\Bla2", "NewValue");(pro VB bez dvojitych lomitek)

Martin

> Pokousim se sepsat konfiguracni utilitu ve forme HTML&JScript stranky (v
> zasade jde jen o kopirovani souboru).
>
> Pro praci se soubory pouzivam ActiveX
> \'Scripting.FileSystemObject\', bohuzel nemuzu prijit jak se jmenuje
> ActiveX objekt pro pristup do registry (obdoba WSHShell).
>
> Diky za jakoukoliv radu
>
> BigZero
>
> Obsahla databaze firem?
> *** http://NAJDI.TO
>
>


-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


Msoft Help Workshop

[*] Surfman <surfman(zv)volny(tec)cz> - 25.5.2000 15:30:51

Ahoj,

To je sice hezky, ale ne uplny. Ve WIN 2000 jsem to zkousel
s verzi 4.032 a cestina se jaksi vyparila. Potom jsem to zkousel
stejnym zpusobem zkompilovat pod WIN 98 a ejhle, cestina
se objevila.
Vzhledem k tomu, ze se tim ted budu muset trochu zabyvat, tak dam
vedet jestli jsem neco vymyslel.

Pavel

> M.Lasevic wrote:
>
> >RTF v MS Help WorkShop je tusim kompatidebilni s verzi RTF, do ktere
uklada
>
> >treba MS Word z MS Office 95. U MS Office 97 je jina struktura RTF a MS
> >HelpWorkShop si s ni neumi poradit.
>
> - pro verzi Office 97 musi byt verze Workshopu 4.03.xxxx, nekde na
strankach
> MS by tato verze mela byt k dispozici.

Win32 API function failed

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 25.5.2000 16:08:41

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.

Musi byt vsechny ty gridy vdet soucasne? Jsou na jednom formulari? Kdyz ne,
neslo by formulare vytvaret dinamicky az budou potreba? Kdyby ne, nezbyva
nez pouzit nejakou jinou komponentu, ktera neni tak narocna na systemove
zdroje (Dobre se radi, ale kde vzit,kdyz o ni nevim ;-). Snad bude vedet
nekdo jiny.)

Hodne zdaru!

Jaromir Cermak

-----Original Message-----
From: Petr Vale� [mailto:delphipetr(zv)infoware(tec)cz]
Sent: Thursday, May 25, 2000 2:23 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Win32 API function failed


No dobre, ale jak to mam tedy vyresit ? Kdyz ma pocitac 32MB Ram Win98 a
program 600kB nemuzu zakaznikovi rict, ze mam v programu pouzito 10 gridu at
si upgraduje pocitac.

Na Inprise mi rekli, ze pry o teto veci vi. Ale jak to mam vyresit to uz mi
neporadili ...

PETR

Trideni v InterBase

[*] pcb(zv)atlas(tec)cz - 25.5.2000 16:09:25

Haj hou!

On 25 May 2000, at 12:05, Lu ek Tenkr�t wrote:

> Nevite nekdo, jak v InterBase 5.6 tridit dle ceskych pravidel (C a
> CH)? Pole je definovano jako CHARACTER SET WIN1250 COLLATE PXW_CSY.

Tabulka pro PXW_CSY je nadefinovana spatne (netridi dobre C/CH,
jinak je ok). Snad by melo byt opraveno v IB6.

Zkus pouzit jiny COLLATE.

Hodne zdaru


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

Prerovnani komponent pri resize formulare

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 25.5.2000 16:20:02

Ahoj,

uz od Delphi 4 maji komponenty vlastnost Anchors. Neresi vse (bohuzel) ale
hloupe jako troky to take neni.

Slavek


Borland Linux Day (Kylix)

[*] pcb(zv)atlas(tec)cz - 25.5.2000 16:30:27

Haj hou!

Jste uzivateli Linuxu? Mate zajem o Linux? Chcete se dozvedet o
novinkach z oblasti Linuxu? Chystate se tvorit aplikaci bezici v
prostredi Linuxu? Chcete se dozvedet neco o projektu Kylix ?

Prijdte na konferenci Linux Day!

Linux Day
Kulturni dum EDEN - kinosal
U Slavie 1, Praha 10
21. cervna 2000
9.00 - 16.00 hodin

Poradaji: Inprise/Borland a SuSE CR.
Medialni partneri: PC World, Computerworld, Linuxworld.

Poprve v Ceske a Slovenske republice bude predstaven projekt
Kylix, zahrnujici vyvojove nastroje C++Builder a Delphi pro Linux.
O projektu Kylix bude hovorit Charlie Calvert, clen vyvojarskeho
tymu Borland/Inprise z USA.

Spolu se SuSE Linuxem bude v blizke budoucnosti zdarma
dodavan SQL server InterBase 6 for Linux.
O novinkach v InterBase 6 bude hovorit viceprezident spolecnosti
Interbase Software Corporation Paul Beach.

Kazdy ucastnik ziskava CD JBuilder 3.5 Foundation, javovske
vyvojove prostredi, urcene pro vyvoj a sireni aplikaci v ciste Jave 2.
Konference bude ukoncena losovanim o produkt JBuilder 3.5
Professional!

Vice informaci naleznete na http://www.inprise(tec)cz/linuxday,
http://www.suse(tec)cz.
Pokud mate zajem o zaslani elektronicke pozvanky se zavaznou
prihlaskou, prosim piste na dbacovsky(zv)inprise(tec)cz nebo volejte na
+420 2 2161 2826.

Hodne zdaru


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

file properties dialog

[*] pavel minarik <pavel.minarik(zv)email(tec)cz> - 25.5.2000 16:37:04


caute,

nevite nekdo, jak programove vyvolat menu, ktere se zobrazi pri stisku praveho
tlacitka na soubor nebo adresar. nebo aspon, jak vyvolat properties dialog
pro soubor. ten na kterem jsou zalozky general (s velikosti a casy souboru,
atd ...) a sharing.

dik
PavelMin


Zamena carky za tecku v paradox tabulce.

[*] OLEJNIK Andrej <olej(zv)nt2.asset.sk> - 25.5.2000 16:40:41

> Zdravim,
> Pouzil jsem reseni od Pavel.Koukal(zv)pvt(tec)cz
>
> DecimalSeparator := '.';
>
> A vse mi funguje. Snad s tim nebudou problemy ani kdyz si
> uzivatel zmeni mistni nastaveni.
> -md

este je dobre dat

Application.UpdateFormatSettings:=False;

lebo ked zmeni pouzivatel nastavenie pocas behu programu, moze vzniknut
problem

olej

>
> >>> dodo(zv)centrum(tec)cz 24.5.00 5:18 >>>
> Ja jsem to myslel takhle:
>
> Na zobrazeni samozrejme POUZIVEJ oddelovac, co ma nastaven
> uzivatel, ale pokud chces prevest zadani
> uzivatele, tak si vse preved na tecku, protoze FUNKCE VAL v
> Delphi spolupracuje pouze s teckou !
> A mas vse vyresene, absolutne nezalezi na to, jak ma uzivatel
> nastavene prostredi, ani co ti zadal a
> vysledek je vzdy spravne.
>
> problemy by nastaly, pokud by nekdo zapisoval jeste oddelovac
> tisicu ...;-) Ale to se nejak nepouziva..
> Dodo
>
>
> ______________________________________________________________
> > Od: Ko��tkov� Jolana <kotatko(zv)nym.pvt(tec)cz>
> > Komu: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
> > CC:
> > Datum: Wed, 24 May 2000 07:48:25 +0200
> > P�edm�t: RE: Zamena carky za tecku v paradox tabulce.
> >
> > Ahoj,
> > se zamenou deset. carky za tecku bych byla opatrna. Jednou jsem neco
> > podobneho delala a pekne jsem si zavarila. Ale pracovala
> jsem se vzdalenou
> > databazi v Informixu. Na mem pocitaci jsem mela nastavenou
> jako standardni
> > carku a tak abych uzivateli vytvorila komfort, prevadela
> jsem navic tecku na
> > carku (aby mohl poridit tecku i carku). Vsechno fungovalo
> fantasticky do
> > chvile, nez to zkusil uzivatel. Ten to mel totiz nastavene
> obracene. Chybu
> > mi to sice nevykazovalo, ale uzivateli se misto porizenych
> 48,20 do tabulky
> > zapsalo 4820,- (proste to tu dest. carku nevzalo). Tak jsem
> to predelala a
> > pak si uzivatel zmenil mistni nastaveni. Takze jsem to
> nakonec vzdala a
> > komfort vyhodila. Takze jako deset. oddelovac musi pouzit
> to, co ma v
> > mistnim nastaveni.
> > Mozna jsem volila spatne reseni, ale nemela jsem na to cas
> ani nervy.
> >
> > Jolana
> >
> >
> > -----P�vodn� zpr�va-----
> > Od: dodo(zv)centrum(tec)cz [mailto:dodo(zv)centrum(tec)cz]
> > Odesl�no: 23. kv�tna 2000 21:40
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: re: Zamena carky za tecku v paradox tabulce.
> >
> >
> > Bud pouzij misto VAL StrToFloat - nebo tak nejak, ale to
> nedoporucuju, prave
> > kvuli tem carkam,
> > teckam....
> > Ja sem si udelal jednoduchov funkci, ktera ve stringu
> nahradi carky za tecky
> > a ten retezec pak klidne
> > posli funkci VAL
> > Tak fce vypada takto: (samozrejme si ji muzes prejmenovat :-)))
> >
> >
> > Function Demence (NumberStr:String):String;
> > Begin
> > Result:=StringReplace (NumberStr,',','.',[rfReplaceAll]);
> > End;
> >
> >
> > Takze ty pak napises:
> >
> > Val(Demence (Label1.Caption), r , code);
> >
> > Myslim, ze tohle je nejlepsi reseni a hlavne nezalezi na
> tom, jestli mas ve
> > Windows nastanou carku nebo tecku. Z programu, ktere nejsou
> takhle nebo
> > podobne
> > osetreny vzycky rostu....
> >
> > Dodo
> >
> >
> > ______________________________________________________________
> > > Od: "Michal David" <michal(zv)access-it(tec)cz>
> > > Komu: <delphi-l(zv)fwd(tec)cz>
> > > CC:
> > > Datum: Tue, 23 May 2000 18:13:03 -0400
> > > P�edm�t: Zamena carky za tecku v paradox tabulce.
> > >
> > > Zdravim,
> > > Mam tabulku jedna polozka je typu number a ma hodnotu
> treba 39,40.
> > > Tuto hodnotu si takto nactu :
> > >
> > > Label1.Caption := FloatToStr(FieldByName('cena').AsValue);
> > >
> > > A pote s tim chci dale pracovat v jedne funkci.
> > > Jenze pokud napisi:
> > >
> > > var
> > > r : real;
> > > code: integer;
> > >
> > > Val(Label1.Caption, r , code);
> > >
> > > vraci se mi code 3 prave kvuli carce.
> > >
> > > Nevite nekdo co s tim?
> > >
> > > -md
> > >
> > >
> >
> >
> > Objevujte Internet s http://www.centrum(tec)cz
> > Zalo�te si svuj mail na http://mail.centrum(tec)cz
> >
>
>
> Objevujte Internet s http://www.centrum(tec)cz
> Zalo�te si svuj mail na http://mail.centrum(tec)cz
>
> __________ Informacia od NOD32 __________
>
> Tato sprava bola preverena systemom NOD32 pre Exchange.
> http://www.nod32.com
>

S.O.S - SQL - dik a jeste neco

[*] Petr Sadovsk� <petr(zv)slunce(tec)cz> - 25.5.2000 17:09:35


>> Query.Sql.Text := 'select JDAA,JDAB from stat0211 where JDAB
>> >= :dDatOd
>> and JDAB <= :dDaDo';
>> Query.ParamByName('dDatOd').AsDateTime := EncodeDate(1996,9,29);

Ahojte,
a diky.
Po zadani datumu jako parametry to jede tak jak ma.Funguje i BETWEEN.To
vsechno v IDE Akorat pri behu programu nejsu schopen zmenit hodnotu
parametru.Parametry mam zadane jiz z IDE nevytvarim je pri behu, ale vzdycky
mi zarve, ze takovy parametr nemuze najit, nebo ListIndex out of bounds,
popdle toho, jak se na nej chci dostat.
1) ADODataset1.Parameters.ParamByName(�DATUMod�).Value:=Nejakedatum;
2) ADODataset1.Parameters.Items[0].Value:=Nejakedatum;

Pri zmene parametru musi byt ADODataset1.Active:=False, ze? Zmenou teto
property by se parametry smazet nemeli, ne?

A mam jeste jednu chutovku, jstli by mi nekdo poradil:
Jeden field tabulky (JD14) je znakovy a ma delku 14znaku a potreboval bych
provest GROUP BY SUBSTR(JD14,2,6), tzn. seskupit podle druheho az osmeho
znaku. Ovsem pri SUBSTR() zarve, ze tuto fci nezna. Je tam nejaka jina
podobna?Prolezl jsem snad vsechno a nic nenasel. :o((

Jeste jednou dik.

Petr


Msoft Help Workshop

[*] delphi <delphi(zv)enterkosice.sk> - 25.5.2000 18:15:10

>
> To je sice hezky, ale ne uplny. Ve WIN 2000 jsem to zkousel
> s verzi 4.032 a cestina se jaksi vyparila. Potom jsem to zkousel
> stejnym zpusobem zkompilovat pod WIN 98 a ejhle, cestina
> se objevila.

Pri kombinacii W2000, Word 2000 a WorkShop 4.03 som mal
ten isty problem. Ak zapnem maximalnu kompresiu, co je aj
odporucane, problemy zmiznu. Skus to!

forgo

Pouzivani ActiveX v BCB

[*] Erik Salaj <winsoft(zv)napri.sk> - 25.5.2000 19:59:02

> ty ctyri chyby pri importu TLB jsou 2 a lze je opravit dopsanim
> "(long*)(int*)" pred TVariant(params[3]) na radku 128 a 136 - pretypovani
> TVariant na long*

Vdaka za informaciu, rad Ti pripadne poslem na opravu dalsie
importovane subory, kde je tych chyb vo vygenerovanom kode
radovo sto ;-) (konvertovane z Delphi komponentov s ktorymi CBuilder
tiez ma byt kompatibilny a dovolim si tvrdit, ze nie je, dokonca
mozem zaslat priklad programu, ktory ide prelozit napr. v CB3
a CB5 a neide v CB4 apod.). A su tam chyby aj podstatne vecsie,
napr. uplne chybaju niektore dekladaracie.

Erik


Hookovani

[*] nnfapso(zv)kios.sk - 25.5.2000 21:09:34

Ahojte,

Vsetci zaujemcovia o moje programy na hookovanie si ich mozu stiahnut z err0r.miesto.sk


Pozice caretu v RichEdit v pixelech , D3, W2000

[*] Hurricane <hurricane(zv)email(tec)cz> - 25.5.2000 22:37:26

Zdravim

Je to v demu k RichEditu, sam sem to pouzival. Teda aspon v D3 to mam, ale
na 99,999% je to i v dalsich verzich.

Hurricane
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 24, 2000 11:17 PM
Subject: Re: Pozice caretu v RichEdit v pixelech , D3, W2000


From: Bo�an Hynek <HBocan(zv)cpoj(tec)cz>
> Pot�ebuji nejank p�ev�st pozici caret ve RxRichedit do sou�adnic
formul��e,
> abych mohl na pozici caretu p�em�stit edit box pro zad�n� hodnoty..

Ahoj,

Pozici kurzoru ziskas API funkci GetCaretPos

Petr Vones, amatersky programator

Msoft Help Workshop

[*] Surfman <surfman(zv)volny(tec)cz> - 25.5.2000 22:39:28

Ahoj,

tak jsem se dival na ten subj a pomohlo taky otevrit ten rtf soubor
jako cisty text a ve fonttable nahradit \fcharset0 na \fcharset238.

Pavel


Pdox tabulky

[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 25.5.2000 23:08:15

Cauec,

viz napr. univerzalni heslo (mail z 3.9.1999)

>Na co utilita, kdyz existuje univerzalni heslo?

>Treba: jIGGAe

Bye Ludan


> > > nevite nekdo jak je to se strukturou DB souboru a heslem v Pdox
tabulkach. Potrebuju
> > > pro firmu zjistit jak moc, nebo malo jsou data ulozena v Paradoxu
zabezpecena.
> >
> > Ahoj,
> >
> > data v ni nejsou zabezpecena nijak.
> >
> No, data v PDOX tabulkach se daji sice zaheslovat, ale na Siti se
> daji sehnat programky, ktere umi vygenerovat heslo (byva jine ney
> autorovo), kterym se k datum dostane.
> Podobne jsou tusim i programky, ktere vrati strukturu.

Win32 API function failed

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:36:45

From: "Petr Vale�" <delphipetr(zv)infoware(tec)cz>
> No dobre, ale jak to mam tedy vyresit ? Kdyz ma pocitac 32MB Ram Win98 a
> program 600kB nemuzu zakaznikovi rict, ze mam v programu pouzito 10 gridu
> at si upgraduje pocitac.

Ahoj,

obavam se, ze jinak nez prechodem z hrackovitych Win9x na NT by se to asi
nevyresilo. Nicmene 10 StringGridu neni zase az tak moc. Kolik v nich mas
priblizne polozek. Jsi schopen udelat co nejjednodussi priklad, kdy tato
chyba vzdy vznikne ?

Petr Vones, amatersky programator


TFrame.OnCreate

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:36:25

From: "Daniel Rott" <roxton(zv)atlas(tec)cz>
> Mate nekdo napad, kam napsat inicializaci promennych
> na TFrame ? Pouzivam TFrame jako obraz urcite casti

Ahoj,

Muzes to udelat prepsanim metody Loaded.

Petr Vones, amatersky programator

Konverze hlavickovych soboru...

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:37:20

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> uz mne nejak prestalo bavit delat robota a tak se ptam, neexistuje
> nejaky nastroj pro konverzi ceckovskych hlavickovych souboru
> (*.H) do Delphi?

Ahoj,

Pokud vim tak neni. Jsou sice nektere utility (jako Headconv), ale ty poskytuji
pouze cast prekladu. Vetsinou se to stale dela rucne, maximalne za pomoci velmi
jednoduchych nastroju ktere ti v editoru umi "zkonvertovat" urcitou cast kodu.

Petr Vones, amatersky programator

file properties dialog

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:37:27

From: "pavel minarik" <pavel.minarik(zv)email(tec)cz>
> nevite nekdo, jak programove vyvolat menu, ktere se zobrazi pri stisku praveho
> tlacitka na soubor nebo adresar. nebo aspon, jak vyvolat properties dialog
> pro soubor. ten na kterem jsou zalozky general (s velikosti a casy souboru,
> atd ...) a sharing.

Ahoj,

napriklad takhle. Unit JclShell je soucasti JCL kterou najdes tady:
http://delphi-jedi.org/Jedi:CODELIBJCL

uses
JclShell;

procedure TForm1.Button1Click(Sender: TObject);
begin
DisplayContextMenu(Application.Handle, 'x:\unit1.pas', Point(100, 100));
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
DisplayPropDialog(Application.Handle, 'x:\unit1.pas');
end;

Petr Vones, amatersky programator

API32 funkce pro vytvareni souboru s unique jmenem

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:37:33

From: "Petr Fejfar" <Petr.Fejfar(zv)callnet(tec)cz>
> nejak nemuzu v MSDN najit funkci, ktera by mi v zadanem adresari vytvorila soubor
> s unikatnim jmenem, neco jako byvala pod DOSem funkce 5A - Create temporary file.

Ahoj,

V JCL (http://delphi-jedi.org/Jedi:CODELIBJCL) najdes funkce FileCreateTemp a
FileGetTempName

Petr Vones, amatersky programator

Win32 API function failed

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:37:08

From: "Petr Vale�" <delphipetr(zv)infoware(tec)cz>
> nevite prosim nahodou nekdo z jake duvodu vznika chyba "Win32 API function
> failed". V projektu mam relativne dost pouzitych stringgridu a bylo mi receno,
> ze by to mohlo byt timhle. Proto bych se chtel zeptat zda-li s timto nemate
> nekdo podobne zkusenosti ?

Ahoj,

TStringGrid je pomerne nestastna komponenta. Vyhodnejsi je asi pouzit TDrawGrid
nebo TListView ve virtualnim rezimu a data si ukladat do vlastnich struktur.
Co se tyce te chyby, jedna z moznosti je vycerpani systemovych zdroju na Win9x.
Pokud ti ta chyba vznika opakovane, zkus se pomoci Merice systemovych prostredku
podivat, jestli nektera kategorie zdroju neklesla k nule. Dale by bylo dobre
zjistit ve kterem miste ta vyjimka presne vznika.

Petr Vones, amatersky programator

owner canvas handle

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 25.5.2000 23:39:20

From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
> > To neni pravda :-) GetDeviceContext je v protected sekci aby ji bylo
> > mozne pouzit v odvozenych komponentach, kde lze cekat jeji nejvetsi
> > vyuziti.
>
> :-))) To je pravda, protoze jsem psal _zvnejsku_. Napriklad, kdyz si
> kliknu na komponentu, kterou mam na formulari, tak to u ni pres
> GetDeviceContext nezjistis, pokud si nudelas jejiho zvlastniho

Ne Zbysku, s timhle fakt nemuzu souhlasit :-) Pokud si vzpominam, tak puvodni
dotaz byl jak ziskat DC u komponenty, ktera neni primo TWinControl.

Trida TControl ma metodu GetDeviceContext, ktera vraci potrebny DC a HWND. Pokud
pujde o komponentu odvozenou od T(Graphic)Control, tak se podiva na nejblizsi
TWinControl, v pripade komponenty odvozene od TWinControl pouzije sebe sama.
Mame tedy jednu metodu, ktera v obou pripadech vraci VZDY spravny vysledek,
vcetne kontroly moznych chybovych stavu. Co se tyce dostupnosti teto metody, ano
neni v public sekci, protoze se nepredpoklada jeji velke pouziti primo z kodu.
Najdou se vsak i situace, kdy se prece jen hodi. V tomto pripade je mozne ji
zpristupnit pomoci jednoho(!) radku kodu (v nejhorsim dvou, pokud deklaraci
nepridame do bloku type):

TControlHack = class(TControl);

Prijde mi to porad jednodussi, nez se snazit psat tutez metodu znova, navic to v
tomto pripade neni ani tak jednoduche.

Dalsi mozna vytka je prave k tomuto zpusobu pristupu k metodam v protected sekci.
Jiste muzeme vest debatu o tom, proc je ta ktera metoda v public ci protected.
Tezko bychom se po letech asi dobrali k nejakemu shodnemu vysledku :-) Proto to
Borland nakonec resi timto zpusobem. Ackoli to nevypada jako prilis ciste reseni,
tak i programatori od Borlandu jej pouzivani, ba dokonce i doporucuji jako zcela
korektni zpusob reseni v techto (nestandartnich) sitaucich. Tato otazka padla i
v chatu (http://community.borland.com/article/0,1410,21312,00.html) o OP :

CRConrad: More on "friend" classes within a unit, etc.: Do you (Danny, Borland,
the Delphi team) have an "official" opinion on hacks like 'type TMyHack = class
(TSomethingFromAnotherUnit); ... TMyHack(ASomething).PrivatefieldOrMethod...' ?
Is it "deprecated" or an OK practice, IYO?

echurchill: We use it where needed and we suggest you use it where you need it
as well

> > 4. neorezava oblast pro kresleni na rozmer TControl
>
> ??? Neni treba, o oblast pro kresleni se staraji Windows.
> TWinControl se tim take nezabyva.

TWinControl sice ne, ale TGraphicControl ano. Pokud pouzijes vyse diskutovanou
metodu, nemusis se pak o to dal starat.

Petr Vones, amatersky programator


UDF na Sybase ASA6

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.5.2000 02:55:10

Puvodni zprava, kterou napsal Martin Dupal dne 25 May 00,:

> mam prosbu ohledne SQL serveru Sybase Adaptive Server Anywhere 6.
> Chtel bych pouzit uzivatelsky definovanou funkci (nebo proceduru)
> umistenou v DLL (napsano v Delphi 4) volanou z ulozene procedury ci
> triggeru. Pres dodrzeni vsech zasad (stdcall, zadne pascal stringy, osetrene
> vyjimky) mi to nahodne shazuje server (i lokal. engine). Zjednoduseni kodu i
> predavanych parametru na minimum nevede k lepsim vysledkum. Skoro to
> vypada, ze tam Sybase ma chybku. Hral si s tim taky nekdo? Mam patch
> ASA6.03, zlobi to stejne na WinNT4Wks, Srv, Win2000Prof.

Ja jsem si s tim sice nehral a ani jsem to nestudoval,
ale jestli chces, kdyz posles kus nejakeho jednodussiho
zdrojacku, muzu ti to otestovat na novem ASA 7, ktery mi
konecne priputuje po nedeli. Zatim mam take 6.03, ale uz
se tesim na 7, protoze podporuje OLE DB a cekam na ni
jako na smilovani bozi...


S pozdravem
Petr Zahradnik, pocitacovy expert

==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


Doba trvania licencie v IB6

[*] pcb(zv)atlas(tec)cz - 26.5.2000 08:02:01

Haj hou!

On 25 May 2000, at 13:08, Roland Tur�an (RoTurSoft) wrote:
> Preco Interbase prideluje licencie pre IB6 len na urcite obdobie, vsak
> deklaruju ze to je OpenSource, proste zadara. 23. maja 2000 skoncila
> platnost licencia ktora bola dodavana s instalaciou bety a uz je na
> sieti publikovane nove cislo na licenciu do 31.08.2000.

Ve finalni verzi IB6 samozrejme zadne licence nebudou. Beta byla
uvolnena ve chvili, kdy tenhle kod nebyl z produktu jeste odstranen.
Navic je to dobra pojistka, jak donutit lidi nepouzivat trvale beta
produkt :o) Pockejte si do 21.6.2000

Hodne zdaru


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

DB_KEY field v IB6

[*] pcb(zv)atlas(tec)cz - 26.5.2000 08:02:01

Haj hou!

On 25 May 2000, at 11:33, Roland Tur�an (RoTurSoft) wrote:
> Stiahol som si InterBase Objects version 3.3 lh od Jason Whartona a
> pri prezerani tabuliek on tam ma aj dalsi stlpec s nazovm DB_KEY(zda
> sa mi ako jedinecny), co to je za stlpec ?

Jedna se o jedinecnou identifikaci radku v ramci resultsetu.

Hodne zdaru


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

Win32 API function failed

[*] Petr Vale� - 26.5.2000 08:06:59


Ahoj,

no detekovat chybu nebylo vubec jednoduche, protoze se mi pri ladeni vubec
neprojevila. Pripadne v kriticke casti zatuhlo vyvojove prostredi. Nicmene
mam vyzkousene, ze na Win NT to funguje bez problemu, ale bohuzel nemohu
premluvit zakaznika aby si kvuli jedne aplikaci preinstaloval OS. Chyba v
podstate muze vzniknout v nekolika castich, ale nejcasteji se mi objevovala
pri zavolani funkce "ShowModal" nejakeho formu, stavalo se i ze chyba
vznikla pri vycistovani listboxu metodou "Clear". Systemove zdroje v dany
moment jsou skutecne male, ale neni mi jasne kde se ztrati ? Pises pouzit
"TDrawGrid" ve virtualnim rezimu. Cim myslis virtualni rezim prosim ?

Diik.

PETR

----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 25, 2000 11:37 PM
Subject: Re: Win32 API function failed


> From: "Petr Vale�" <delphipetr(zv)infoware(tec)cz>
> > nevite prosim nahodou nekdo z jake duvodu vznika chyba "Win32 API
function
> > failed". V projektu mam relativne dost pouzitych stringgridu a bylo mi
receno,
> > ze by to mohlo byt timhle. Proto bych se chtel zeptat zda-li s timto
nemate
> > nekdo podobne zkusenosti ?
>
> Ahoj,
>
> TStringGrid je pomerne nestastna komponenta. Vyhodnejsi je asi pouzit
TDrawGrid
> nebo TListView ve virtualnim rezimu a data si ukladat do vlastnich
struktur.
> Co se tyce te chyby, jedna z moznosti je vycerpani systemovych zdroju na
Win9x.
> Pokud ti ta chyba vznika opakovane, zkus se pomoci Merice systemovych
prostredku
> podivat, jestli nektera kategorie zdroju neklesla k nule. Dale by bylo
dobre
> zjistit ve kterem miste ta vyjimka presne vznika.
>
> Petr Vones, amatersky programator
>

multiselect v TDBGrid

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 26.5.2000 08:21:07

Ahoj hosi a devcata
chci v TDBGrid udelat select vice radku. Pochopitelne ze, pokud clovek drzi Ctrl, tak se mysi oznacuji jednotlive radky (vety).
Rad bych umoznil select mysi s drzenim Shift (jako napr. v Excelu), coz od prirody nefunguje.

Je to v Delphi3

Dik

=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================

TFrame.OnDestroy Was: TFrame.OnCreate

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 26.5.2000 08:50:32

> From: "Daniel Rott" <roxton(zv)atlas(tec)cz>
> > Mate nekdo napad, kam napsat inicializaci promennych
> > na TFrame ? Pouzivam TFrame jako obraz urcite casti

> From: "Petr Vones"
> Muzes to udelat prepsanim metody Loaded.

Parada ! To je presne ono. Diky moc.
A kam by bylo mozne dopsat to uklizeni ?

Ahoj
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added

Prace s pameti

[*] Martin Dietl <dietl(zv)4USE(tec)cz> - 26.5.2000 08:56:39

Ahoj vsem !

Mam nasledujici problem. Dve aplikace (v ramci testu) mezi sebou komunikuji
pres sockety. Jedna (testovaci) chrli zpravy do druhe (Router) a ta je vrati
te prvni. Router zapisuje prijate a odeslane zpravy do logu oteviraneho pres
Append (testovaci app ma vlastni log).
V prubehu testu pomalu, ale neustale roste spotreba pameti (sledovano pomoci
task managera - performance). Po cca 6 hodinach to spadne na nedostatek
pameti.
(64 MB RAM, 130 MB virtualni - NT4)
Prvni pokus byl zameren na log - soubor byl po dosazeni 10 MB prejmenovan a
zapis pokracoval do puvodniho - vyprazdneneho - souboru. Bez efektu.

Mate nekdo nejaky tip, jak detekovat pricinu narustu pameti ?
(zdrojaky uz jsem prochazel a niceho si nevsiml)
Delphi 4, Win NT.

Diky, Martin.

Delphi a posta

[*] tomas.mazurek(zv)vitkovice(tec)cz - 26.5.2000 06:58:06

Dobry den,

Uzivatel si preje zasilat vyexportovane sestavy z QuickReportu do
.TXT el. postou. Muzete mi nekdo poradit ci nasmerovat jak programove
zjistit nainstalovanou postu, tu spustit a vlozit do ni prislusnou
postu? Uzivatel ma predstavu neco jako je ve Wordu volba
Soubor/Odeslat. D4Prof.

Nemam v tomto smeru zkusenosti. Za roky s Paradoxem a Oraclem uz
myslim v radcich a sloupcich...

Dik
TM


UDF na Sybase ASA6

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 26.5.2000 09:16:30

> Ja jsem si s tim sice nehral a ani jsem to nestudoval,
> ale jestli chces, kdyz posles kus nejakeho jednodussiho
> zdrojacku, muzu ti to otestovat na novem ASA 7, ktery mi
> konecne priputuje po nedeli. Zatim mam take 6.03, ale uz
> se tesim na 7, protoze podporuje OLE DB a cekam na ni
> jako na smilovani bozi...

Diky za nabidku, ale nebudu te s tim obtezovat. Stahnu si trial
verzi ASA7 a vyzkousim si to podrobne sam a uvidime. Jestli
v te sestce ale maji krpu, tak me to dozere. Novou verzi se mi
kvuli jejich chybe kupovat nechce. A ke vsemu je tady jeste
moznost, ze tam ta chyba bude taky.

Martin Dupal


Prace s pameti

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.5.2000 09:52:59

>Ahoj vsem !
>
>Mam nasledujici problem. Dve aplikace (v ramci testu) mezi sebou komunikuji
>pres sockety. Jedna (testovaci) chrli zpravy do druhe (Router) a ta je
vrati
>te prvni. Router zapisuje prijate a odeslane zpravy do logu oteviraneho
pres
>Append (testovaci app ma vlastni log).
>V prubehu testu pomalu, ale neustale roste spotreba pameti (sledovano
pomoci
>task managera - performance). Po cca 6 hodinach to spadne na nedostatek
>pameti.
>(64 MB RAM, 130 MB virtualni - NT4)
>Prvni pokus byl zameren na log - soubor byl po dosazeni 10 MB prejmenovan a
>zapis pokracoval do puvodniho - vyprazdneneho - souboru. Bez efektu.
>
>Mate nekdo nejaky tip, jak detekovat pricinu narustu pameti ?
>(zdrojaky uz jsem prochazel a niceho si nevsiml)
>Delphi 4, Win NT.
>


nainstalovat MemProof a spustit aplikaci z nej. Hookuje systemova volani a
poznamenava si alokovane zdroje. Po ukonceni programu vypise zdroje, ktere
nebyly dealokovany. Pri spravnem nastaveni kompilace v Delphi poskytne i
radek zdrojaku kde k problemu doslo.


Zdravi
D. Toman

Pouzivani ActiveX v BCB

[*] Miroslav Cipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 26.5.2000 10:12:07


a tady posilam jednoduchy priklad ala Salajuv Visual C++

M.#include <..\\imports\\ADODB_TLB.h>

void __fastcall TForm1::Button1Click(TObject *Sender)
{

TCOM_Recordset rs;

if(FAILED(rs = CoRecordset::Create())) {
ShowMessage("Failed to create Recordset object!");
return;
}

rs->Open("SELECT * FROM ZAMESTNANCI",
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\DB1.mdb",
adOpenUnspecified, adLockUnspecified, -1); while (!(bool)rs->EOF) {
ShowMessage((AnsiString)"Pole: " +
rs->Fields->get_Item(0)->get_Name() + " Hodnota: " +
rs->Fields->get_Item(0)->get_Value());
rs->MoveNext();
}
rs->Close();}


----- Original Message -----
From: <martin.falta(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 24, 2000 1:53 PM
Subject: Pouzivani ActiveX v BCB


> Ahoj,
>
> naimportoval jsem si ADODB_TLB do BCB 5 a potrebuji vyuzit objekty
Connection a Recordset. Ovsem zatim se mi je nepodarilo nadeklarovat. At
zkousim, co zkousim, vzdycky dostanu Access Violation. Nevedel by nekdo z
vas co s tim.
>
> Predem dekuji.
>
> Martin
>
> P.S. Potrebuji pouzit pouze naimportovany ADO jako ActiveX, proto mi
prosim nedoporucujte zadne ADO komponenty.
>

Counter

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 26.5.2000 10:27:15

Pokud to ma bezet na MS IIS, tak ASP jde urcite
psat ve VBScript, JScript. Nevim, jestli ma standardne
modul pro JavaScript, ale snad taky existuje.
(Sam pouzivam VBScript)
MS dodava k IIS dve pocitajici serverove
komponenty-objekty:
MSWC.PageCounter
a
MSWC.Counters
ktery by se pro ty ucely asi daly pouzit.
Doporucuji se podivat na dokumentaci k IIS nebo i PersonalWebServer,
po instalaci je na http://localhost/iishelp
nebo vybornou knihu O'Reilly:Active server pages v kostce, ComputerPress
jsou tam i priklady.
### Petr Jel�nek napsal dne 25 May 00, v 23:04 :
> Ano presne takhle jsem to myslel (pomoci ASP)
>
> Dne 22.�kv�ten�2000, Zdenek Drvota, <drvota(zv)zds(tec)cz> napsal:
>
> > Jen mala poznamka:
> > JavaScript muze byt interpretovan i na serveru,
> > pokud jde o active server pages (ASP).
> >
> > ### Slavek Rydval napsal dne 21 May 00, v 18:17 :
> > > Ahoj,
> > >
> > > protoze JavaScript je interpretovan az na klientu, musi byt cislo
> > > pristupu na klientskem pocitaci, tedy v kolacich (cookies). Ma to dve
> > > nevyhody: uzivatel muze mit JavaScript ci kolace vypnute a nemas zadny
> > > prehled o tom, kam Ti kdo chodi. Doporucuji nejaky cgi script.
> > >
> > > Slavek
> > >
> > > > Ja vim ze tohle je konference o Delphi, ale nevi nekdo kde ziskat
> > > > zdroj = k pocitadlu pristupu (potreboval bych to v JavaScriptu)
> > >
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


Delphi a posta

[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 26.5.2000 10:46:27

> Uzivatel si preje zasilat vyexportovane sestavy z QuickReportu do
> .TXT el. postou. Muzete mi nekdo poradit ci nasmerovat jak programove
> zjistit nainstalovanou postu, tu spustit a vlozit do ni prislusnou
> postu? Uzivatel ma predstavu neco jako je ve Wordu volba
> Soubor/Odeslat. D4Prof.
>
no, to sa tu uz dost dlho pred casom pretriasalo.
V zasade su taketo moznosti:
1) postovy server je POP3/IMAP - Naprogramovat si to sam -
komponenta TSMTP, alebo ine stiahnute z webu
2) postovy server je exchange server - Naprogramovat si to sam -
nevizualna komponenta TMapiMessage - funkcia MapiSendMail alebo vizualna
TEmail stiahnuta z webu
3) postovy server je POP3/IMAP alebo exchange - zavolat nejakeho
mail klienta a poslat mu udaje ako parametre (prip. nejako inak)

/LH


BLOB v MSSQL

[*] Ren� Otisk - 26.5.2000 11:00:53

Hi,

D3, MSSQL, ODBCe, RXLIB 2.75

Potreboval bych mit v MS SQL tabulce pole analogicke k Paradoxovskemu blobu OLE. Potrebuji tam dostat dokumenty Office i obrazky (jpg, bmp...) a vykresy (dwg..). Kterak si v CREATE TABLE definuji tuto polozku?

CREATE TABLE Tejblb
(
ID INT IDENTITY(1,1) PRIMARY KEY,
Blobon NTEXT(?) nebo BINARY(?)
)

Dekuji

Sroub


Realne deleni nulou

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 26.5.2000 11:12:08

Ahojte,

narazil jsem na zajimave chovani (mam D4-SP3-W2000Prof):
Realne deleni nulou nevyvola vyjimku, jak pisou v helpu, ale
vysledek je "+/- nekonecno". Z matematickeho hlediska je
to jiste v poradku, ale jako programatorovi mi to pripada
nezvykle. Co je nejzajimavejsi, ze takhle se to chova jen v
databazovych aplikacich. Schvalne si zkuste tento fragment
kodu (na formulari je take aktivni komponenta TDatabase):

procedure TForm1.Button1Click(Sender: TObject);
var
D,N: Double;
begin
D := 0;
N := 5/D;
ShowMessage(FloatToStr(N));
end;

Martin Dupal


Realne deleni nulou

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.5.2000 11:26:20

Ahoj,

jenom upresneni: z matematickeho hlediska to neni v poradku. Delit nulou
proste nejde (ani v N_0, ani v Z, ani v R ani v C). Maximalne muzes zkoumat,
kam jde limita vysledku, ale to je jiz o necem jinem.

Slavek

> narazil jsem na zajimave chovani (mam D4-SP3-W2000Prof):
> Realne deleni nulou nevyvola vyjimku, jak pisou v helpu, ale
> vysledek je "+/- nekonecno". Z matematickeho hlediska je
> to jiste v poradku, ale jako programatorovi mi to pripada
> nezvykle.
> Martin Dupal


owner canvas handle

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.5.2000 11:49:47

On 25 May 2000, at 23:39, Petr Vones wrote:

> > > To neni pravda :-) GetDeviceContext je v protected sekci aby ji
> > > bylo mozne pouzit v odvozenych komponentach, kde lze cekat jeji
> > > nejvetsi vyuziti.
> >
> > :-))) To je pravda, protoze jsem psal _zvnejsku_. Napriklad, kdyz si
> > kliknu na komponentu, kterou mam na formulari, tak to u ni pres
> > GetDeviceContext nezjistis, pokud si nudelas jejiho zvlastniho
>
> Ne Zbysku, s timhle fakt nemuzu souhlasit :-) Pokud si vzpominam, tak
> puvodni dotaz byl jak ziskat DC u komponenty, ktera neni primo
> TWinControl.

Puvodni dotaz znel doslova:
"lze jednoduchym zpusobem obecne zjistit handle canvasu owner
komponenty ? (pokud canvas ma)"

Avsak napriklad TEdit zadny Canvas (tedy tridu TCanvas)
neobsahuje, ale DC samozrejme ma. GetDeviceContext
samozrejme toto DC vrati, stejne jako GetDC.

> Trida TControl ma metodu GetDeviceContext, ktera vraci potrebny DC a
> HWND. Pokud pujde o komponentu odvozenou od T(Graphic)Control, tak se
> podiva na nejblizsi TWinControl, v pripade komponenty odvozene od
> TWinControl pouzije sebe sama. Mame tedy jednu metodu, ktera v obou
> pripadech vraci VZDY spravny vysledek, vcetne kontroly moznych
> chybovych stavu. Co se tyce dostupnosti teto metody, ano neni v public
> sekci, protoze se nepredpoklada jeji velke pouziti primo z kodu.
> Najdou se vsak i situace, kdy se prece jen hodi. V tomto pripade je
> mozne ji zpristupnit pomoci jednoho(!) radku kodu (v nejhorsim dvou,
> pokud deklaraci nepridame do bloku type):
>
> TControlHack = class(TControl);

OK.

> Prijde mi to porad jednodussi, nez se snazit psat tutez metodu znova,
> navic to v tomto pripade neni ani tak jednoduche.
>
> Dalsi mozna vytka je prave k tomuto zpusobu pristupu k metodam v
> protected sekci. Jiste muzeme vest debatu o tom, proc je ta ktera
> metoda v public ci protected. Tezko bychom se po letech asi dobrali k
> nejakemu shodnemu vysledku :-) Proto to Borland nakonec resi timto
> zpusobem. Ackoli to nevypada jako prilis ciste reseni, tak i
> programatori od Borlandu jej pouzivani, ba dokonce i doporucuji jako
> zcela korektni zpusob reseni v techto (nestandartnich) sitaucich. Tato
> otazka padla i v chatu
> (http://community.borland.com/article/0,1410,21312,00.html) o OP :
>
> CRConrad: More on "friend" classes within a unit, etc.: Do you (Danny,
> Borland, the Delphi team) have an "official" opinion on hacks like
> 'type TMyHack = class (TSomethingFromAnotherUnit); ...
> TMyHack(ASomething).PrivatefieldOrMethod...' ? Is it "deprecated" or
> an OK practice, IYO?

S drobnou pripominkou, ze na private "cosi" jsem to nerozchodil...


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


Instalace komponent od Reggatta Systems Inc.

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 26.5.2000 11:55:04

Ahoj,

potreboval bych nainstalovat Titan BTrieve pres FlashFiler (ktery ma mit
podobne jadro), je to mozne (jak se snaseji?), pripadne jake to ma dusledky?
Puvodne jsem to mel na oddelenych pocitacich a instalacich Delphi (na D2 a
D3) - ted bych to potreboval nejak sjednotit a pred tim bych o tom rad neco
vedel.

Diky
Jaro B.

Realne deleni nulou

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 26.5.2000 12:06:19



> -----P�vodn� zpr�va-----
> Od: Slavek Rydval [mailto:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Odesl�no: 26. kv�tna 2000 11:26
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Realne deleni nulou
>
>
> Ahoj,
>
> jenom upresneni: z matematickeho hlediska to neni v poradku.
> Delit nulou
> proste nejde (ani v N_0, ani v Z, ani v R ani v C). Maximalne
> muzes zkoumat,
> kam jde limita vysledku, ale to je jiz o necem jinem.

Spravne, navic neni mozne, aby vysledek v typu double (nebo behem vypoctu
extended (?)),
byl +/- nekonecno. Pocet hodnot jez je mozne ulozit do typu extended je
konecny, tedy
je nekonecnekrat mensi nez nekonecno a a nekonecno v nem vubec nelze
vyjadrit.
Jakypak je tedy skutecne ten vysledek?

Navic z matematickeho hlediska je vyraz nekonecno nesmysl,
muzeme se bavit o spocetnych (konecnych a nekonecnych) nebo nespocetnych
mnozinach, o jejich ordinalnich a kardinalnich cislech ale nekonecno samo o
sobe neni nic.
Mozna ze formulace "x jdouci k nekonecnu" vzbuzuje pocit, ze nekonecno je
nejaka konkretni hodnota, ale to je pouze nepresny opis vyjadreni
"x roste nad vsechny meze" - pritom nekonecno jako takove neexistuje.

> Martin Dupal:
> narazil jsem na zajimave chovani (mam D4-SP3-W2000Prof):
> Realne deleni nulou nevyvola vyjimku, jak pisou v helpu, ale
> vysledek je "+/- nekonecno". Z matematickeho hlediska je
> to jiste v poradku, ale jako programatorovi mi to pripada
> nezvykle.

Ale abych jenom nefilozofoval - mam pocit, ze o podobnych problemech
tady sly nekdy loni nebo predloni sahodlouhe diskuse, Take se nejake deleni
neceho
chovalo ruzne v zavislosti na pouzitych unitach. Uz si nepamatuju vysledek
tech debat
- zkus se podivat do archivu konference.

Jura


http request

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 26.5.2000 12:21:08

ahoj lidi,

mam nasledujici fragment zdrojaku:

sprintf(loginstr,"jmeno=%s&pass=%s",UserName,Password);
sprintf(buffer,"POST http://%s/node/comlink.zone HTTP/1.1\nHost:
%s\nContent-length:
%d\n\n%s",CS_Name,CS_Name,strlen(loginstr),loginstr);
if (send(Socket, buffer, strlen(buffer), 0) == SOCKET_ERROR)
{
closesocket(Socket);
EndCheck("CS Con ?");
}

pokud to dobre chapu, tak se posle toto:
<http_request>
POST http://matrix.cyberspace(tec)cz/node/comlink.zone HTTP/1.1
Host: matrix.cyberspace(tec)cz
Content-length: 101

jmeno=IDusera&pass=heslousera
</http_request>

vo to by neslo, to chapu, co vsak nevim je, JAK to poslat a JAK sliznout
odpoved.
prosim, prosim, aspon nasmerovat, nejakou url nebo radu, nebo ukazku
kodu pro delphi.
vzivote sem nic podobneho nedelal a vubec netusim kudy do toho...

dekuji peca

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
******* Hi! I'm a signature virus. Copy me into your signature, please.
*******
The signature virus says:
Love isn't only blind, it's also deaf, dumb, and stupid.

Realne deleni nulou

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.5.2000 12:33:04

> Spravne, navic neni mozne, aby vysledek v typu double (nebo behem vypoctu
> extended (?)),
> byl +/- nekonecno.
****Je to mozne. Zpusob ukladani realnych cisel ma specialni posloupnost
bitu, aby to bylo plus nebo minus nekonecno. Tedy je to napr. do
789456.428 a plus 0.001 to je plus nekonecno. ;-) Tohle je popsane napr. v
knize od Brandejse Procesory Intel Pentium a spol a ridi se to dle nejakeho
RTF nebo IEEE, ale to ted nevim presne. Pokud bude zajem, podivam se.

Slavek

> Jura


Optimalizace kodu v Delphi (link)

[*] Hurricane <hurricane(zv)email(tec)cz> - 26.5.2000 12:36:38

Zdravim

Byl sem tam, ale nic zajimavyho sem tam nenasel. Hledal sem neco jako navod
nebo programek, ale v sekci Guides bylo jenom spousta textu a nekolik odkazu
na jiny stranky. Kdybys vedel, jak to pouzivat, tak to muzes napsat do
konference.

Hurricane
----- Original Message -----
> Mozna nekoho bude zajimat nasledujici link:
>
> http://www.optimalcode.com/

sql help

[*] sup(zv)svitap(tec)cz - 26.5.2000 12:39:42

Kdyz spustim nasledujici kod, tak mi to vyhodi vzdy jen prvni record, treba
z dvanacti. Nevi nekdo, proc ?

query1.sql.clear;
query1.sql.add('select
CISFA,CISRA,DRURA,CISZB,TEXT1,TEXT2,TEXT3,MNOZ,CENASK,CENAJE,CENA1,RABAT,CEN
AF1,U_MD,U_DAL,KODMJ,CENAF,DPHF,SKLAD,DPHP,CENAF2 from "LRZ.DBF" where
CISFA='+inttostr(table1.FieldByName('CISFA').asinteger)+' order by CISRA');
query1.open;

D3Profi

Jaroslav Weiss
odd. informatiky

SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02

tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz


C -> Delphi

[*] Pavel Chaloupka <chaloupka(zv)mboxzn(tec)cz> - 26.5.2000 13:27:31

Zdar,

potreboval bych zavolat z Delphi proceduru v dll napsanou v C++ Builderu

deklarace je takto:

void WINAPI (*Test)(int &width,int &height);

da se to udelat jako:

test: procedure (var width, height: integer)

??

Pavel


prace s clipboardem v databazi

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 26.5.2000 13:41:46

Ahojky
potreboval bych oznacene vety z databaze v TDBGrid srtcit do clipboardu (Ctrl C) a pak je opet vlozit (Ctrl V) nekam jinam, napr do Excelu, Notepadu a tak.
V Delphi3

Postrcte mne nekdo kudy na to. Nebo co si mam (a kde) precist?

P.S. Uz je patek a nemysli mi to, coz teprve v nedeli :-(

Dik

=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================

Realne deleni nulou

[*] VOTAVA Jan <Jan.Votava(zv)epe(tec)cz> - 26.5.2000 14:04:02

>
> jenom upresneni: z matematickeho hlediska to neni v poradku.
> Delit nulou
> proste nejde (ani v N_0, ani v Z, ani v R ani v C). Maximalne
> muzes zkoumat,
> kam jde limita vysledku, ale to je jiz o necem jinem.

Spravne, navic neni mozne, aby vysledek v typu double (nebo behem vypoctu
extended (?)),
byl +/- nekonecno. Pocet hodnot jez je mozne ulozit do typu extended je
konecny, tedy
je nekonecnekrat mensi nez nekonecno a a nekonecno v nem vubec nelze
vyjadrit.
Jakypak je tedy skutecne ten vysledek?

-------------------
To, ze je pocet moznych hodnot ulozitelnych do promenne konecny, jeste
neznamena, ze nemohu dve z nich pouzit pro vyjadreji plus a minus nekonecna.
Nepamatuji si z hlavy, pro ktere ciselne typy v delphi to plati konkretne,
ale jsou takove formaty ulozeni cisla, ktere skutecne hodnotu + a -
nekonecno pripousteji.

Honza.

Instalace komponent od Reggatta Systems Inc.

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 26.5.2000 13:07:23

Puvodni zprava, kterou napsal Bene� Jaroslav dne 26 May 00,:

> potreboval bych nainstalovat Titan BTrieve pres FlashFiler (ktery ma mit
> podobne jadro), je to mozne (jak se snaseji?), pripadne jake to ma dusledky?
> Puvodne jsem to mel na oddelenych pocitacich a instalacich Delphi (na D2 a
> D3) - ted bych to potreboval nejak sjednotit a pred tim bych o tom rad neco
> vedel.

To je neco uplne jineho. Pletes si BTrieve a B-Tree Filer. BTrieve
je od Novellu a B-Tree Filer je zaklad toho FlashFileru. FlashFiler
shodou nahod obsahuje nahradu BDE od Reggatta Systems. Pokud mas
FlashFiler, pak nic vic nepotrebujes a samo to chodi primo z Delphi.


S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


konstatovani/prosba - Realne deleni

[*] delphi konference <delphi(zv)energotek(tec)cz> - 26.5.2000 14:34:38

Dobry den panove

projevujete sitce obdivuhodne znalosti zakladu vyssi matematiky, ale
chtel bych vas poprosit, az budete priste poradat prednasky z matematiky,
aby jste pouzili oznaceni OT.


Dekuji Petr Blau

C -> Delphi

[*] voltrr1.epr(zv)mail.cez(tec)cz - 26.5.2000 13:39:00



Asi bych pouzil

function Test (var width,height):Pointer; stdcall;

ale pokud pouzijes directivu stdcall tak ti to asi veme i tu proceduru

Radek

Realne deleni nulou

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 26.5.2000 14:42:49

> -----P�vodn� zpr�va-----
> Od: Slavek Rydval [mailto:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Odesl�no: 26. kv�tna 2000 12:33
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Realne deleni nulou
>
>
> > Spravne, navic neni mozne, aby vysledek v typu double (nebo
> behem vypoctu
> > extended (?)),
> > byl +/- nekonecno.
> ****Je to mozne. Zpusob ukladani realnych cisel ma specialni
> posloupnost
> bitu, aby to bylo plus nebo minus nekonecno. Tedy je to napr. do
> 789456.428 a plus 0.001 to je plus nekonecno. ;-) Tohle je
> popsane napr. v
> knize od Brandejse Procesory Intel Pentium a spol a ridi se
> to dle nejakeho
> RTF nebo IEEE, ale to ted nevim presne. Pokud bude zajem, podivam se.

To je zajimave, to jsem nevedel. Oni se proste rozhodli, ze nebudou vyuzivat
nektere hodnoty a budou je interpretovat jako specialni hodnoty, ktere do
toho
rozsahu nepatri?

Dival jsem se do helpu v D4 a videl, ze je spatne napsany.
Na jedne strance Real types je pouze informace

Extended 3.6 x 10^-4951 .. 1.1 x 10^4932 19-20 10

a ani sluvko navic. Az kdyz vyslovne zadame v hledani heslo "infinities",
vyjede jina
stranka Real types, na niz je popsana realizace a skutecne se do toho
rozsahu
hodnota nekonecno vleze ( :-(( )

The value v of the number is given by
if 0 <= e < 32767, then v = (-1)^s * 2^(e-16383) * (i.f )
if e = 32767 and f = 0, then v = (-1)^s * Inf
if e = 32767 and f <> 0, then v is a NaN

kde e je exponent, f mantisa a s hodnota znamenkoveho bitu.

No - nepusobi to na mne moc dobre, radeji ani nechci zkouset, jaky
vysledek da INF + (-INF) nebo vubec jakakoliv aritmeticka operace s hodnotou
INF. Ale Martinovi se za tu pripominku o nemoznosti mit hodnotu nekonecno
omlouvam - nenapadlo mne, ze lze najit informace popirajici to,
co jsem si prave precetl v helpu :-(

Jura


prace s clipboardem v databazi

[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 26.5.2000 15:27:12

> potreboval bych oznacene vety z databaze v TDBGrid srtcit do clipboardu (Ctrl C) a pak je opet vlozit (Ctrl V) nekam jinam, napr do Excelu, Notepadu a tak.
> V Delphi3
>
> Postrcte mne nekdo kudy na to. Nebo co si mam (a kde) precist?

Nejjednodussi zpusob -
- celou vetu shrnout do stringu

s := '';
for f:=0 to Q.FieldCount-1 do
s := s+Q.FIelds[i].AsString+stOddelovac

- a pak ulozit do Clipboardu:

Clipboard.AsText := s;

- pozdeji vybrat:

s := Clipboard.AsText

- a zase rozebrat:

for f:=0 to Q.FieldCount-1 do
begin
p := pos( stOddelovac, s );
Q.Fields[i].AsString := copy( s,1,p-1 );

s := copy( s, p+length(stOddelovac), length(s) )
end.

O trochu slozitejsi je naalokovat pamet, zamknout, naplnit daty,
odemknout a do Clipboardu ulozit handle.
Kvuli ladeni (a snadne kontrole) bych volil ukladani via string;
aspon do doby nez bude odladeno a nez bude vadit rychlost.

Tom


Vypnuti monitoru

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 26.5.2000 16:01:01

>Jeste by me zajimalo jestli jde v D3 vypnout monitor, nekde >jsem o tom
cetl, ale nevim jestli to jde >v "trojkach". Diky


{** Ak menime IParam mozeme dostat ine stavy }
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);

( Skusane v D5 a Win98 , takze nerucim )

S pozdravom

Pavol Kaka�ka
paka(zv)aktis(tec)cz

Optimalizace kodu v Delphi (link)

[*] Karel Kral <kral(zv)purus(tec)cz> - 26.5.2000 16:34:14

Pouziva se to tak, ze se ten text precte. Myslim, ze je tam spousta
zajimavych veci, zejmena jak se vyhnout neefektivite pri praci s
AnsiStrings.

Hurricane wrote:
>
> Byl sem tam, ale nic zajimavyho sem tam nenasel. Hledal sem neco jako navod
> nebo programek, ale v sekci Guides bylo jenom spousta textu a nekolik odkazu
> na jiny stranky. Kdybys vedel, jak to pouzivat, tak to muzes napsat do
> konference.

--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


BLOB v MSSQL

[*] Lubo Fule <fule(zv)sct.sk> - 26.5.2000 17:09:02

MSSQL ma 3 datove typy, do ktorych mozes ukladat data lubovolnej dlzky:

IMAGE su akekolvek binarne data (to je to vlastne typicky BLOB, teda to co
potrebujes),
TEXT je textove pole lubovolnej dlzky
NTEXT tak ako TEXT ale Unicode

Datovy typ BINARY ma pevnu dlzku rovnako ako CHAR.

Tvoj prikaz bude teda vyzerat takto:

CREATE TABLE Tejblb
(
ID INT IDENTITY(1,1) PRIMARY KEY,
Blobon IMAGE
)
Potreboval bych mit v MS SQL tabulce pole analogicke k Paradoxovskemu
blobu OLE. Potrebuji tam dostat dokumenty Office i obrazky (jpg, bmp...) a
vykresy (dwg..). Kterak si v CREATE TABLE definuji tuto polozku?

CREATE TABLE Tejblb
(
ID INT IDENTITY(1,1) PRIMARY KEY,
Blobon NTEXT(?) nebo BINARY(?)
)

Optimalizace kodu v Delphi (link)

[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 26.5.2000 18:45:53

>
> Byl sem tam, ale nic zajimavyho sem tam nenasel. Hledal sem neco jako
navod
> nebo programek, ale v sekci Guides bylo jenom spousta textu a nekolik
odkazu
> na jiny stranky. Kdybys vedel, jak to pouzivat, tak to muzes napsat do
> konference.
>

No tak tedy:

samozrejme ze je tam spousta textu. Mozna by chtelo si v tom trosku pocist
:)))) Je tam popis urcitych zasad, veci kterych se vyvarovat, optimalizace
cyklu, promennych apod. Pro zkusene programatory (TY?) na strance mozna nic
zajimaveho nebude, ale jak uz sem napsal, rozhodne nezaskodi si ve strankach
pocist a verim, ze spousta lidi tam najde zajimavy tipy na zefektivneni
svych algoritmu (a nebo taky ne, tak uz to na tom nasem bozim svete chodi
:).

Za zminku stoji hlavne sekce "GUIDE" (zasady pro praci s cykly, Integery,
Stringy, cisly v plovouci carce apod.) a "Distributed computing" - tam sou
tri odkazy na stranky o COMu.

Petr Fischer
E-Mail: fifa(zv)praguesoft(tec)cz, ICQ#: 24154715

> Hurricane
> ----- Original Message -----
> > Mozna nekoho bude zajimat nasledujici link:
> >
> > http://www.optimalcode.com/

multiselect v TDBGrid

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

ahoj,

co takhle zkusit komponenty SiVCL (www.sinea(tec)cz) -> uz se to tu myslim
resilo.
Ale jestli pujdou pod D3 tak to fakt nevim

M.Jirman

----- Original Message -----
From: Richard Valny <Richard.Valny(zv)oku-st(tec)cz>> Ahoj hosi a devcata
> chci v TDBGrid udelat select vice radku. Pochopitelne ze, pokud clovek
drzi Ctrl, tak se mysi oznacuji jednotlive radky (vety).
> Rad bych umoznil select mysi s drzenim Shift (jako napr. v Excelu), coz od
prirody nefunguje.
>
> Je to v Delphi3
>
> Dik


Nastaveni obsahu browseru ReadOnly?

[*] L.Svoboda <svoboda(zv)fdsystem(tec)cz> - 26.5.2000 21:44:08

Zdravim

Resil nekdo nasledujici vec?
Napriklad:
Jestlize je instalovan MS-Office,
pak mohu (nejen) z Delphi pomoci komponenty WebBrowser
zobrazovat mimo jine i soubory DOC a XLS.
Ale jak je zobrazit pouze na prohlizeni? Tedy rekneme ReadOnly...

Diky za radu.

L.Svoboda
svoboda(zv)fdsystem(tec)cz


Uvolnovani komponent

[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 26.5.2000 22:34:40


Ahoj,

nevite, prosim, nekdo, v jakem poradi
jsou uvolnovany komponenty vlastnene uvolnovanou
komponentou. (Fuj to je veta...). Myslel jsem,
ze podle seznamu Componens[x]. Pripadne jakym
zpusobem poradi uvolneni nastavit.

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


C -> Delphi

[*] Pavel Chaloupka <chaloupka(zv)mboxzn(tec)cz> - 26.5.2000 22:53:11

Ja si spis nejsem jist jestli je spravne to & - > var...

----- Original Message -----
From: <voltrr1.epr(zv)mail.cez(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, May 26, 2000 2:39 PM
Subject: Re: C -> Delphi


>
>
> Asi bych pouzil
>
> function Test (var width,height):Pointer; stdcall;
>
> ale pokud pouzijes directivu stdcall tak ti to asi veme i tu proceduru
>
> Radek
>

DB_KEY field v IB6

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 27.5.2000 01:29:03

> > Stiahol som si InterBase Objects version 3.3 lh od Jason Whartona a
> > pri prezerani tabuliek on tam ma aj dalsi stlpec s nazovm DB_KEY(zda
> > sa mi ako jedinecny), co to je za stlpec ?
>
> Jedna se o jedinecnou identifikaci radku v ramci resultsetu.


Dik, ale ako sa k nemu dopracujem, a ci to je cislo zapisane v tabulke alebo
ho IB generuje just in time ako jedinecny.


Roland.

Counter

[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 27.5.2000 02:05:51

Problem je, ze server nepodporuje ani jedno.

Zdravi
Petr Jelinek - amatersky programator
http://pjmodos.hyperlink(tec)cz

----- Original Message -----
From: <nnfapso(zv)kios.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 22, 2000 3:27 PM
Subject: RE: Counter


> Ahoj,
>
> V JavaScripte nespravis pocitadlo pristupov. musis to robit v cgi
alebo
> isapi, ... podla toho, ake skripty podporuje server. Ak chces, mozem ti
> poslat pocitadlo v cgi.
>
> ----- Original Message -----
> Od: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> Odoslan�: 21. m�j 2000 18:17
> Predmet: Re: Counter
>
>
> > Ahoj,
> >
> > protoze JavaScript je interpretovan az na klientu, musi byt cislo
> > pristupu na klientskem pocitaci, tedy v kolacich (cookies). Ma to
> > dve nevyhody: uzivatel muze mit JavaScript ci kolace vypnute a
> > nemas zadny prehled o tom, kam Ti kdo chodi. Doporucuji nejaky
> > cgi script.
> >
> > Slavek
> >
> > > Ja vim ze tohle je konference o Delphi, ale nevi nekdo kde ziskat
zdroj
> =
> > > k pocitadlu pristupu (potreboval bych to v JavaScriptu)
> >
> > > Petr Jel=EDnek - amat=E9rsk=FD program=E1tor
> > > http://pjmodos.hyperlink(tec)cz
> >
> >
> > -------------------------------------------------
> > http://atrey.karlin.mff.cuni(tec)cz/~rk
> > -------------------------------------------------
> > http://www.swnet(tec)cz
> > Magazin informacne vyspelych jedincu
> > -------------------------------------------------
>
>

Dynamicke vytvareni promennych

[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 27.5.2000 10:08:34

Jasn� �e jde, ale prace s nimi je pak malilinko jin�:

Bud muzes vytvorit nove misto pro promenne v pameti prikazem NEW a zrusit ji pomoci DISPOSE. Lze
takhle vytvaren nejen napr. integer, ale cela pole ci struktury. Pristupoje se k nim pak pres ukazatel
tj. ^
Nebo pouzit novinky od D4 - dynamicka pole: Par prikladu.

Var PInt:^Integer;
PPole:^TPole;
DynPole: Array of Integer; //nemusi se urcovat rozsah od -do
begin
//Nova pomenna int
New (PInt);
PInt^:=50;
Dispose (PInt);

//Nove pole integeru
New (PPole);
PPole^[10]:=123;
Dispose (PPole);

//Dynamicke pole
SetLength (DynPole,5000); //pole nastav na 5000 prvku
DynPole[5]:=89;
Finalize (DynPole); //uvolni pole
End;

Snad to staci k pochopeni. Kdyz ne tak napis.
Dodo


______________________________________________________________
> Od: Tom� Fr�ba <fryba(zv)volny(tec)cz>
> Komu: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Wed, 26 May 1999 23:04:59 +0200
> P�edm�t: Dynamicke vytvareni promennych
>
> Preji vsem v konferenci prijemny den!
>
> Rad bych se dotazal, zda-li a jak lze vytvaret promenne primo za behu programu.
> Predem dekuji vsem, kteri mi odpovedi.
>
> S pozdravem Tomas Fryba
>


Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz


OT: Caunter jeste jednu

[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 27.5.2000 12:37:33

Zda se, ze problem counter za danyho stavu asi nevyresime. Diky vsem za pomoc (i pokus o pomoc se pocita). Ale rady abych to udelal v CGI nebo PHP jsou mi platny, kdyz ani jedno neumim, ale stejne diky za ne.

Takze nevi nekdo o verejnym pocitadle (neco jako counter.com), ktery by pri kazdym volani nepricitalo - tj. abych si mohl vybrat jestli pricitad nebo ne (potrebuju zobrazit hodnotu jeste driv nez se stahne ten soubor a pricitat a kdyz se ten soubor stahne). A jeste by bylo dobry, aby se to pocitadlo dalo nulovat - abych nemusel znovu vytvaren novy pocitadla - precejen jak rikal Hurricane ty soubory se budou hodne menit a vytvaret porat novy pocitadla je na hlavu.

Zdravi
Petr Jelinek - amatersky programator
http://pjmodos.hyperlink(tec)cz


Vyber zaznamu

[*] Miroslav Evj�k <evjak(zv)atlas(tec)cz> - 27.5.2000 12:53:34

Ahoj,

potrebuji nechat uzivatele individualne oznacit vety v DBGridu (napriklad
mezernikem) a potom pracovat jenom s oznacenymi zaznamy (filtr, tisk ...).

V nesitove verzi jsem to resil primitivne fieldem typu Boolean, pak to nebyl
zadny problem. Na siti to ma samozrejme za nasledek, ze si to uzivatele
navzajem prepisujou.

Takze na to zkousim jit tak, ze si v docasne tabulce udrzuju seznam klicu
oznacenych vet. Prosim o radu, zda je to jedina cesta nebo jestli je jeste
nejake elegantnejsi reseni.

Pozadavky a parametry:
- W98, D4, Paradox
- oznaceni musi byt mozno provest na zaklade vysledku SQL dotazu
- s oznacenymi zaznamy musi jit pracovat v SQL dotazech

Dekuji vsem, kteri se podeli o sve zkusenosti.

"Mirecek" Evjak
mailto:evjak(zv)atlas(tec)cz

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


Counter

[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 27.5.2000 12:54:51

Asi takhle, da se to udelat v ASP, ale ja to mam jenom v ASP, ktery je
udelany ve VBScriptu. Potreboval bych to udelat v ASP, ale v Java Scriptu
(nebo JScriptu - me je to fuk)

Pozn.: MODOS jsem ja ;-)
A nejde jen o to meneni souboru - vetsina pocitadel (vsechny se kteryma jsem
se setkal) ma nastaveny pri kazdym volani automaticky pricitani a to ja taky
nechci (potrebuju si vybrat jestli pricitat a nebo ne).

ADMINe sorry, ze jsem to puvodne neoznacil offtopic - ja si toho v
pravidlech nevsiml. A za tu diakritiku se taky omlouvam. Ja to puvodne
posilal, do jiny konference o Delphi a tam takovy pravidla nejsou.

A jeste jedna vec odpovidam tak pozde, protoze jsem nemohl vybirat postu.
Takze ted mam ve schrance asi 1000 mailu ;-(

Zdravi
Petr Jelinek - amatersky programator
http://pjmodos.hyperlink(tec)cz

----- Original Message -----
From: Martin Lasevi� <vyvoj(zv)atlascon(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, May 23, 2000 6:41 AM
Subject: RE: Re: Counter


> Tak to asi ne. To bys asi musel resit pomoci scritpu na strane serveru,
kde
> se jako parametr preda nazev souboru a script Ti vrati dany soubor ke
> stazeni a zaroven zapocita bodik za stazeni. Jakze se asi PHP nebo CGI
> nevyhnes.
>
> Martin
>
> P�kn� den a pilot�m ��astn� p�ist�n� ...
> ============================
> ML Software - Martin Lasevi�
> Budovatelsk� 459
> 708 00 Ostrava-Poruba
> tel., fax.: +420 ( 69) 691 85 11
> mobil : +420 (603) 338 765
> E-mail : ml_software(zv)email(tec)cz
> WWW: http://www.volny(tec)cz/ml_software
> ============================
>
>
>
> > -----P�vodn� zpr�va-----
> > Od: Hurricane [SMTP:hurricane(zv)email(tec)cz]
> > Odesl�no: 22. kv�tna 2000 23:34
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: Re: Counter
> >
> > A to pocitadlo umi pocitat i soubory na jinym servru (hyperlink) Ja
> (spolu s
> > MODOSem) to potrebuju na pocitani stahnuti ZIP souuboru a zrizovat pro
> kazdy
> > soubor nove pocitadle jeste kdyz se soubory budou casto menit, mi
> pripada
> > silene.
> >
> > Hurricanne
> > ----- Original Message -----
> > btw:
> > Pokud by si chtel vyuzit nektereho z mnoha free-counteru na webu
> > tak doporucuji http://pocitadlo.netway(tec)cz vypada dobre, jednoduse
> > se ovlada a kdyz je clovek sikovnej, tak si muze udelat i vlastni
> > font, zaslat ho tam a odkazovat se na nej.
> >
> > hnd
> > Peter
> >
> >
> >
> >
> >
> >
>
>

jak asociovat soubor ?

[*] Robert Lufinka <r.lufinka(zv)sh.cvut(tec)cz> - 27.5.2000 13:57:31

Zdravim vsechny delphaky.

Potrebuju asociovat urcity typ souboru (*.moje_pripona)
s nejakym programem. Jak to udelat ? ( programove v Delphi )

Dik


jak asociovat soubor ?

[*] Robert Lufinka <r.lufinka(zv)sh.cvut(tec)cz> - 27.5.2000 14:32:32

Tak uz jsem na to prisel :o) stacilo se pohrabat v registrech.
Kdyby to chtel nekdo vedet, at se ozve

----- Original Message -----

> Zdravim vsechny delphaky.
>
> Potrebuju asociovat urcity typ souboru (*.moje_pripona)
> s nejakym programem. Jak to udelat ? ( programove v Delphi )
>
> Dik
>

Quick Abstract Report v QR 3.0.6

[*] Petr Mat�jovsk� <pemasoft(zv)atlas(tec)cz> - 27.5.2000 15:53:51

Zdar,

nevite k cemu je komponenta Quick Abstract Report v Quick reportu
profesional 3.0.6. ???
Mam help pouze k verzi 3 standart.

Petr Matejovsky


Delphi a posta

[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 27.5.2000 16:23:53

Tohle se tady probiralo za poslednich 14 dni uz dvakrat. Uz jsem jednou vsem
nabizel komponentu ktera to umi. Jestli chces muzu ti to taky poslat.

Zdravi
Petr Jelinek - amatersky programator
http://pjmodos.hyperlink(tec)cz

----- Original Message -----
From: <tomas.mazurek(zv)vitkovice(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, May 26, 2000 8:58 AM
Subject: Delphi a posta


> Dobry den,
>
> Uzivatel si preje zasilat vyexportovane sestavy z QuickReportu do
> .TXT el. postou. Muzete mi nekdo poradit ci nasmerovat jak programove
> zjistit nainstalovanou postu, tu spustit a vlozit do ni prislusnou
> postu? Uzivatel ma predstavu neco jako je ve Wordu volba
> Soubor/Odeslat. D4Prof.
>
> Nemam v tomto smeru zkusenosti. Za roky s Paradoxem a Oraclem uz
> myslim v radcich a sloupcich...
>
> Dik
> TM
>

file properties dialog

[*] Petr Jel�nek Konf <pjmodos(zv)seznam(tec)cz> - 27.5.2000 16:26:50

Vim oboji, ale je to moc dlouhy, poslu ti to na tvuj mail jako soubor.

Zdravi
Petr Jelinek - amatersky programator
http://pjmodos.hyperlink(tec)cz

----- Original Message -----
From: pavel minarik <pavel.minarik(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 25, 2000 4:37 PM
Subject: file properties dialog


>
> caute,
>
> nevite nekdo, jak programove vyvolat menu, ktere se zobrazi pri stisku
praveho
> tlacitka na soubor nebo adresar. nebo aspon, jak vyvolat properties
dialog
> pro soubor. ten na kterem jsou zalozky general (s velikosti a casy
souboru,
> atd ...) a sharing.
>
> dik
> PavelMin
>
>

nekvalitni linka a General SQL error

[*] Petr Mat�jovsk� <pemasoft(zv)atlas(tec)cz> - 27.5.2000 16:28:10

Ahoj

Napsal jsem aplikaci client/server , ktera ted chodi na spatne lince (modem
to modem). Dosti casto se stava ze modem se pripoji na mensi rychlosti nez
14400. Jak se da prerusit dlouhy SELECT na teto lince (ne Ctrl+Alt+Del)
potrebuji vytvorit jakesi tlacitko storno.

SQL7 D5

diku za kazdou radu
Petr Matejovsky


Out of memory pri TList

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

Ahoj,

Mam 3 Unity(1=form1) z 1 pouzivam 2 a 3; z 2 pouzivam 3
ve 3 unite je deklarovan tlist(class=(TLIST)-pridany 4 procedury; L) + pointer(ukazatel na record; P)
(P=globalni ve vsech unitech)
z 2 vytvorim novy P procedurou ve 3.unite , i tam ho jinou procedurou mazu
v 2 take vytorim L a mazu ; v 1 vytvorim L a mazu
pocty vsude sedi(vytvoreni/mazani), ale neustale to hlasi "out of memory"
jeden tlist je jako parametr v procedure ve 2.unite(vytvoren v 1, ve 2 modifikovan)

predem diky
M.Jirman


nekvalitni linka a General SQL error

[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 27.5.2000 18:32:10

nevim, jestli se da prerusit hned, ale kdyz inkriminovany kod das
do vlakna (tthread), tak to bude asi lepsi.


______________________________________________________________
> Od: Petr Mat�jovsk� <pemasoft(zv)atlas(tec)cz>
> Komu: "Delphi" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Sat, 27 May 2000 16:28:10 +0200
> P�edm�t: nekvalitni linka a General SQL error
>
> Ahoj
>
> Napsal jsem aplikaci client/server , ktera ted chodi na spatne
lince (modem
> to modem). Dosti casto se stava ze modem se pripoji na mensi
rychlosti nez
> 14400. Jak se da prerusit dlouhy SELECT na teto lince (ne
Ctrl+Alt+Del)
> potrebuji vytvorit jakesi tlacitko storno.
>
> SQL7 D5
>
> diku za kazdou radu
> Petr Matejovsky
>


Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz


SQL - nazev pole DATE

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 27.5.2000 18:47:20

Ahoj,

env. D5 Profi, Pdx

prosim o radu, uz jsem v koncich.
Mam definovanou tabulku v Pdx (S0001.DB)

FieldNo Name Type Size
1 ABRNO ftSmallint 2
2 CTRLNO ftSmallint 2
3 DATE ftDate 4
4 TIME ftTime 4
5 DEDNO ftInteger 4
6 MODULNR ftInteger 4
7 SHFTCNT ftSmallint 2
8 DRIVER ftInteger 4
atd.
a potrebuji udelat select 3..5,8 pole
a vsechny testovat na nejake hodnoty

q_Statistic.SQL.Add('Select ');
q_Statistic.SQL.Add('S0001."DATE" as Field_01'); // jak ??????
q_Statistic.SQL.Add(', "TIME" as Field_02'); // vraci string TIME
q_Statistic.SQL.Add(', DEDNO as Field_03');
q_Statistic.SQL.Add(', DRIVER as Field_04');
q_Statistic.SQL.Add('from "'+Tbl+'"');

Pokud by se pole nejmenovaly 'DATE' a 'TIME', tak je to 'brnkacka'.
BTW, ja tu strukturu nenavrhoval, ale autor by patril ...

Dekuji vsem za pomoc,
preji hezky vikend

Jarek Uher

nekvalitni linka a General SQL error

[*] MJ soft <mjsoft(zv)rychnov(tec)cz> - 27.5.2000 21:38:49

Ahoj

Toto jsem zkousel na InterBase. Mel jsem select v threadu a na storno jsem
ho sestrelil. Program uz na nic necekal a mohlo se pokracovat v necem jinem,
ale server dotaz zpracovaval dal. Asi to jde taky zaridit aby to zrusil
primo server, ale dal jsem to jiz nezkousel.

Jin


----- Original Message -----
From: Ladislav Dole�el <dodo(zv)centrum(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, May 27, 2000 6:32 PM
Subject: re: nekvalitni linka a General SQL error


> nevim, jestli se da prerusit hned, ale kdyz inkriminovany kod das
> do vlakna (tthread), tak to bude asi lepsi.
>
> ______________________________________________________________
> > Od: Petr Mat�jovsk� <pemasoft(zv)atlas(tec)cz>
> > Komu: "Delphi" <delphi-l(zv)fwd(tec)cz>
> > CC:
> > Datum: Sat, 27 May 2000 16:28:10 +0200
> > P�edm�t: nekvalitni linka a General SQL error
> >
> > Ahoj
> >
> > Napsal jsem aplikaci client/server , ktera ted chodi na spatne
> lince (modem
> > to modem). Dosti casto se stava ze modem se pripoji na mensi
> rychlosti nez
> > 14400. Jak se da prerusit dlouhy SELECT na teto lince (ne
> Ctrl+Alt+Del)
> > potrebuji vytvorit jakesi tlacitko storno.
> >
> > SQL7 D5
> >
> > diku za kazdou radu
> > Petr Matejovsky
> >
>
> Objevujte Internet s http://www.centrum(tec)cz
> Zalo�te si svuj mail na http://mail.centrum(tec)cz


W2000 a Delphi

[*] Surfman <surfman(zv)volny(tec)cz> - 28.5.2000 09:43:48

Ahoj,

Tak jsem zase narazil na zajimavy problem.

Aplikace, ktera je navrzena a kompilovana pod W2000
se pod W9.x tvari jinak. Konkretne jde o to, ze na formu
je button, ktery skryje panel v prave casti a okno zmensi
tak, aby levy panel zabiral prave velikost okna.
Pod W2000 je to ok, ale pri spusteni pod W9.x se zobrazi
scrollbary.
Podobne stringgrid na formu (s pouzitim OwnerDraw) beha
na W2000 v pohode a pod W9.x se opakuje situace se scrollbary.
Situace je stejna v D4 i D5.

Nevite nekdo co s tim?

Diky

Pavel

stringgrid + scroll

[*] Jirka Trpko� <trpkosj(zv)seznam(tec)cz> - 28.5.2000 11:12:38

Preji pekny den
mam nasledujici problem - ve Stringgridu mam v jednom sloupci TCombobox, ktery se zobrazi az kdyz na tu bunku kliknu. Problem mam, kdyz uzivatel s takto viditelnym CB scroluje - CB zustava porad na tom samem miste. Potreboval bych nejak zjistit, alespon kterym smerem se scroluje (jestli nahoru, nebo dolu).

Dekuji za jakekoliv nasmerovani
Jirka

out of memory pri TLIST

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

Pomooooc!
pro srozumitelnost prehazeno a zkraceno

unit 3
type tp=^record...
var P:tp;
type C=class(TLIST)
procedure pridej(tp);
begin
new(P);
P^:=tp;
add(P);
end;
procedure vymaz(N);
begin
P:=items[N];
dispose(P);
pack;
end;
function vratP(N):tp;
begin
P:=items[n];
vratP:=P^;
end;
var l1,l2:c;

unit 2 (uses unit 3)
procedure x(var l:c);
begin
pridej(tp);
pridej(tp);
vratP(n);
vratP(n);
....
vymaz(tp);
end;

unit 1 (uses unit 2, unit3)
l1:=c.create;
l2:=c.create;
...

const k=4; var i:byte=1; a:array[1..k] of record
l:c;
j:integer=0;
end;
a[1].l:=l1;
repeat
inc(a[i].j);
if (i<>k) and (a[i].j=a[i].l.count) then
begin
a[i].l.vymaz(0..count-1);
a[i].l.free;
dec(i);
end
else if i<k then
begin
inc(i);
a[i].l:=c.create;
a[i].j:=0;
x(a[i].l);
end;
until i=k;

!chyba=out of memory{win386.swp zaplni cely disk}
pocet new/dispose =OK{overeno}
pocet c.create/c.free=OK{overeno}

IBTalk

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 28.5.2000 16:27:07

Preji vsem pekneho dne,

na adresu

http://atrey.karlin.mff.cuni(tec)cz/~rk/IBTalk.shtml

jsem umistil IBTalk, coz je utilitka k pristupu na InterBase. Pokud
znate nekdo SQL Talk k ORACLE, pak tohle je neco podobneho.
Myslim si, ze se s IBTalkem mnohem prijemneji pracuje nez s
ISQL, kde se musi slozite prechazet mezi jednotlivymi prikazy,
nelze je rozumne ukladat a podobne. IBTalk by mel tohle vse
vynahradit. Blizsi informace na uvedene strance.

Slavek


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------


QuickRep

[*] Petr Matejovsk� <pemasoft(zv)atlas(tec)cz> - 28.5.2000 17:05:20

Ahoj
Do udalosti OnPreview vsech sestav, ktery budou Preview pouzivat napis:

PrevForm.QRPreview.QRPrinter := TQRPrinter (Sender) ;
kde PrevForm je jmeno formulare uzivatelskeho nahledu a QRPreview je jmeno
komponenty TQRPreview

Petr Matejovsky


----- Original Message -----
From: "Roman Sev��k" <r.sevcik(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, May 25, 2000 9:57 AM
Subject: Re: QuickRep


> Tak to uz mi to jede, ale nevim jak rozchodit Preview. Chci tam mit svoje
> okno.
>
> Dik Roman
>
> ----- Original Message -----
> From: <tomas.mazurek(zv)vitkovice(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, May 24, 2000 3:02 PM
> Subject: RE: QuickRep
>
>
> > Hello,
> >
> > ty Add dej do udalosti OnAddReports u CompReportu... Pak staci jen
> > Preview.
> >
> > >Nejak mi to nejede,
> > >vytvoril jsem Form, na ne jsem dal dva TQuickRep a QRCompositeReport.
> > >Na TQuickRep jsem dal Title a dva QRLabely, spustil jsem a nic.
> > >Preview je prazdny, ale kdyz dam jednotlive QuickRep.Preview, tak to
> > >jede. Nevite nekdo co delam spatne ?
> >
> > > Hup := THup.Create(Self);
> > > Hup.QRCompositeReport1.Reports.Add(Hup.QuickRep1);
> > > Hup.QRCompositeReport1.Reports.Add(Hup.QuickRep2);
> > > Hup.QRCompositeReport1.Preview;
> > > Hup.Release;
> >
> > Tomas
>

Uvolnovani komponent

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.5.2000 22:22:17

From: "Pavel Malinsk�" <spiderland(zv)iol(tec)cz>
> nevite, prosim, nekdo, v jakem poradi
> jsou uvolnovany komponenty vlastnene uvolnovanou
> komponentou. (Fuj to je veta...). Myslel jsem,
> ze podle seznamu Componens[x]. Pripadne jakym
> zpusobem poradi uvolneni nastavit.

Ahoj,

Poradi uvolnovani nastavit nepujde (viz metoda TComponent.DestroyComponents).
Spis prozrad k cemu to potrebujes.

Petr Vones, amatersky programator

W2000 a Delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.5.2000 22:22:56

From: "Surfman" <surfman(zv)volny(tec)cz>
> Aplikace, ktera je navrzena a kompilovana pod W2000
> se pod W9.x tvari jinak. Konkretne jde o to, ze na formu
> je button, ktery skryje panel v prave casti a okno zmensi
> tak, aby levy panel zabiral prave velikost okna.
> Pod W2000 je to ok, ale pri spusteni pod W9.x se zobrazi
> scrollbary.

Ahoj,

Zkusil bych nastavit vlastnost AutoScroll na False u toho formulare, ale asi
to nebude presne ono.

Petr Vones, amatersky programator

TFrame.OnDestroy Was: TFrame.OnCreate

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.5.2000 22:23:00

From: "Daniel Rott" <roxton(zv)atlas(tec)cz>
> Parada ! To je presne ono. Diky moc.
> A kam by bylo mozne dopsat to uklizeni ?

Ahoj,

Nezkousel jsem to, ale by melo stacit prepsat destructor, nebo mozna lepe
metodu BeforeDestruction.

Petr Vones, amatersky programator

Win32 API function failed

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

From: "Petr Vale�" <delphipetr(zv)infoware(tec)cz>
> moment jsou skutecne male, ale neni mi jasne kde se ztrati ? Pises pouzit
> "TDrawGrid" ve virtualnim rezimu. Cim myslis virtualni rezim prosim ?
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Ahoj,

Ne, bud TDrawGrid _nebo_ TListView ve virtualnim rezimu. V tomto rezimu dany
ovladaci prvek neobsahuje primo data, pouze mu nastavis rozmer (napriklad
pocet radku) a on si pak pomoci udalosti (napriklad TListView.OnData) rika
o data pro polozky ktere je prave potreba zobrazit. Nikam si je vsak dale
neuklada, pouze je zobrazi. Vlastni data si pak ukladas zcela mimo vizualni
komponentu v nejakych svych vlastnich tridach. Vyhody jsou v tom, ze pri
velkem poctu polozek je neni treba vkladat do nejakeho interniho seznamu
dane komponenty a take se to hodi v pripadech, kdy je potreba rychle menit
obsah (filtrovani polozek, trideni, prepinani vice seznamu apod.) Priklad
pro TListView najdes treba v $(DELPHI)\Demos\Virtual Listview

Petr Vones, amatersky programator

TMyHack = class (TSomethingFromAnotherUnit); Was:

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.5.2000 22:27:58

From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
> > CRConrad: More on "friend" classes within a unit, etc.: Do you (Danny,
> > Borland, the Delphi team) have an "official" opinion on hacks like
> > 'type TMyHack = class (TSomethingFromAnotherUnit); ...
> > TMyHack(ASomething).PrivatefieldOrMethod...' ? Is it "deprecated" or
> > an OK practice, IYO?
>
> S drobnou pripominkou, ze na private "cosi" jsem to nerozchodil...

Ahoj,

To souhlasi, on to v tom dotazu spatne napsal. Pokud si proctes zaznam z
chatu cely, tak je to tam ke konci opraveno. Pouzit to lze samozrejme jen
na metody v protected. Pristup k private polozkam je mozny jen za pomoci
"sablonove" tridy, coz uz ma ale daleko od cistych praktik, nehlede na
mozne pozdejsi problemy s udrzovanim takoveho kodu.

Petr Vones, amatersky programator

Sql dotaz na UNIX

[*] Jiri Vrabec <vrabec(zv)pal.skm.vutbr(tec)cz> - 28.5.2000 22:30:34


Muze mi nekdo poradit jak udelat dotaz z D5(Win2000) do databaze na
linuxu (MySql) ??

ps.: jeden priklad vyda za tisice slov...


Dik Jirka


Problem s instalaci aplikace a s MSACCESS driverem

[*] P�emysl Neuman <p.neuman(zv)email(tec)cz> - 29.5.2000 00:02:51

Dobry den.

Potrebuji nainstalovat svoji aplikaci, ktera vyuziva soubor x.mdb vytvoreny
v Accessech 97 na jiny pocitac W98. Mam problem, ze to nejde. Pri spousteni
to hlasi nejaky chyby IDDAO32.DLL a v BDEAdministratorovi se do toho sveho
aliasu take nedostanu (pro zmenu problem s IDDA3532.dll). Je to driver MSACCESS.
Potrebuji poradit. Kdyz tam nainstaluju Access a Delphi tak to jede. Mohli
byste mi prosim poradit, co mam s tim instalovat (volne siritelneho) aby
to chodilo ?
Zkousel jsem nejake DAO35, ktere mi poslal jeden dobrotivy clovek z teto konference,
ale nepomaha to. Dekuji za kazdou radu.

S pozdravem,

Premysl Neuman


Nastaveni obsahu browseru ReadOnly?

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 29.5.2000 07:49:25

> Resil nekdo nasledujici vec?
> Napriklad:
> Jestlize je instalovan MS-Office,
> pak mohu (nejen) z Delphi pomoci komponenty WebBrowser
> zobrazovat mimo jine i soubory DOC a XLS.
> Ale jak je zobrazit pouze na prohlizeni? Tedy rekneme ReadOnly...

Nevim, jestli to bude k necemu, ale...
Ja jsem tedy provadel upravy xls souboru prostrednictvim OLE
Automation a zjistil jsem, ze Excel zadany soubor otevre jen pro
cteni v pripade, ze ten soubor uz ma otevreny nekdo jiny (napr. jina
aplikace). Pokud by tomu nebranily nejake prekazky, mohl bys ten
soubor nejak otevrit (z Delphi, bez editoru pristupneho uzivateli) a
pak se na nej vrhnout pres WebBrowser.
Ale jak rikam, je to jen napad... Mozna existuje lepsi zpusob,
do tehle problematiky jsem nestihl nejak proniknout.

David


Pouzivani ActiveX v BCB

[*] Miroslav Cipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 29.5.2000 08:12:19


posilam to jeste jednou protoze nevim jestli to doslo - jednoduchy priklad
ala Salajuv Visual C++

M.#include <..\\imports\\ADODB_TLB.h>

void __fastcall TForm1::Button1Click(TObject *Sender)
{

TCOM_Recordset rs;

if(FAILED(rs = CoRecordset::Create())) {
ShowMessage("Failed to create Recordset object!");
return;
}

rs->Open("SELECT * FROM ZAMESTNANCI",
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\DB1.mdb",
adOpenUnspecified, adLockUnspecified, -1); while (!(bool)rs->EOF) {
ShowMessage((AnsiString)"Pole: " +
rs->Fields->get_Item(0)->get_Name() + " Hodnota: " +
rs->Fields->get_Item(0)->get_Value());
rs->MoveNext();
}
rs->Close();}


----- Original Message -----
From: <martin.falta(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 24, 2000 1:53 PM
Subject: Pouzivani ActiveX v BCB


> Ahoj,
>
> naimportoval jsem si ADODB_TLB do BCB 5 a potrebuji vyuzit objekty
Connection a Recordset. Ovsem zatim se mi je nepodarilo nadeklarovat. At
zkousim, co zkousim, vzdycky dostanu Access Violation. Nevedel by nekdo z
vas co s tim.
>
> Predem dekuji.
>
> Martin
>
> P.S. Potrebuji pouzit pouze naimportovany ADO jako ActiveX, proto mi
prosim nedoporucujte zadne ADO komponenty.
>

Program bez formu

[*] kinekus <kinekus(zv)nextra.sk> - 29.5.2000 08:42:49

Zdravim,

prosim o radu, nie som odbornik. Potrebujem spustit program bez formu.
Najlepsie by bolo, keby sa po spusteni program hodil k ikonkam pri
hodinach.Vie mi niekto poradit ?

MR.

Program bez formu

[*] r.tesar(zv)atlas(tec)cz - 29.5.2000 08:54:29

Ahojte Delf�ni

Potreboval bych vedet zda je mozne nastavit zdileni disku
softwarove z Delphi ?? A jestli jo tak jak ??

Dik za vsechny rady
Radek Tesar


Problem s instalaci aplikace a s MSACCESS driverem

[*] Petr Vale� - 29.5.2000 08:57:38

A mas tam nainstalovan Data Access pack ? Dodava se s Office.

PETR

----- Original Message -----
From: P�emysl Neuman <p.neuman(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 12:02 AM
Subject: Problem s instalaci aplikace a s MSACCESS driverem


> Dobry den.
>
> Potrebuji nainstalovat svoji aplikaci, ktera vyuziva soubor x.mdb
vytvoreny
> v Accessech 97 na jiny pocitac W98. Mam problem, ze to nejde. Pri
spousteni
> to hlasi nejaky chyby IDDAO32.DLL a v BDEAdministratorovi se do toho
sveho
> aliasu take nedostanu (pro zmenu problem s IDDA3532.dll). Je to driver
MSACCESS.
> Potrebuji poradit. Kdyz tam nainstaluju Access a Delphi tak to jede.
Mohli
> byste mi prosim poradit, co mam s tim instalovat (volne siritelneho) aby
> to chodilo ?
> Zkousel jsem nejake DAO35, ktere mi poslal jeden dobrotivy clovek z teto
konference,
> ale nepomaha to. Dekuji za kazdou radu.
>
> S pozdravem,
>
> Premysl Neuman


Remote COM

[*] Robert Zak <nrsys(zv)psn.sk> - 29.5.2000 10:00:24

Dobry den,

Vytvoril som si jednoduchy COM objekt (nieco ako HelloWord).
Z klientskej aplikacie spravim CreateComObject a COM objekt sa vytvori.
Pokial sa ale chcem napojit z ineho pocitaca s pouzitim CreateRemoteObject,
nahlasi mi: "OPERACIA VYKONAVANA SERVEROM ZLYHALA". Nainstaloval som aj
DCOM98 a pomocou konfiguracie som pre moj objekt priradil vsetky mozne
pristupove prava.
Co este musim spravit aby som ten objekt dokazal pouzit z ineho pocitaca?
Pouzivam D5Prof.


Dakujem

Robo


Sdileni disku

[*] r.tesar(zv)atlas(tec)cz - 29.5.2000 10:34:17

Ahojte Delf�ni

Potreboval bych vedet zda je mozne nastavit sdileni disku
softwarove z Delphi ?? A jestli jo tak jak ??

Dik za vsechny rady
Radek Tesar

Program bez formu

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 29.5.2000 10:37:58

Dej si do hlavniho formu Visible:=False. Co se tyka ikonky, da se to vyresit hotovymi komponentami. Hladej v archivu konference "Try Icon"

Jan Fiala

----- Original Message -----
From: "kinekus" <kinekus(zv)nextra.sk>> Zdravim,
>
> prosim o radu, nie som odbornik. Potrebujem spustit program bez formu.
> Najlepsie by bolo, keby sa po spusteni program hodil k ikonkam pri
> hodinach.Vie mi niekto poradit ?
>
> MR.
>
>

Tlaciarne HP

[*] J�n Grman�������e���zW��ۛg�$ - 29.5.2000 11:05:42

Ahojte.
U zakaznika sa mi objavil nasledujuci problem:
Nas program netlaci na tlaciarnach HP DeskJet 930c a HP DeskJet 670, ale len
zo systemu W95 (s NTckom to funguje).
Sprava sa to takto:
HP DeskJet 930c
- tlac pripadne nahlad v programe prejde v pohode
- zobrazi sa tlacova uloha (ikona v tray) a potom to spadne na Obecnom
poruseni ochrany v subore DRV
- podotykam ze z WORDU to vraj tlaci v pohode

HP DeskJet 670
- tlac pripadne nahlad v programe prejde v pohode
- zobrazi sa tlacova uloha (ikona v tray) a potom sa strati a nic sa
nevytlaci
- podotykam znova ze z WORDU to vraj tlaci v pohode

Na inych (zvacsa ihlickovych a starsich) tlaciarnach vsetko funguje bez
ohladu na OS. Tieto tlaciarne su uplne nove, kupili ich prave pre pouzivanie
s nasim programom.
Na tlac pouzivame vlastne tlacove komponenty. Vsetko je to napisane cisto s
pouzitim API funkcii (LineTo(DC, ...), TextOut(DC, ...), a podobne).

Ak ste sa niekto s podobnou "zahadou" stretli, prosim napiste mi v com bol
problem a ako ste ho vyriesili / nevyriesili.

Za vsetky odpovede vdaka.

Mgr. Jan Grman
janog(zv)pluto.elf.stuba.sk


W2000 a Delphi

[*] Surfman <surfman(zv)volny(tec)cz> - 29.5.2000 12:14:31

> Zkusil bych nastavit vlastnost AutoScroll na False u toho formulare, ale
asi
> to nebude presne ono.
>
> Petr Vones, amatersky programator
>
Ahoj,

To jsem samozrejme udelal, ale situaci to neresi viz StringGrid.

Pavel


QRComposite a Page Orientation

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 29.5.2000 12:17:02

Ahoj,

Problem (D3C/S, QR2.0k):
s nastavenim Page.Orientation u reportov pri pouziti Composite report. V
tomto pripade tlaci zostavy s nastavenim Page.Orientation = poPortrait aj
ked u jednotlivych reportov je Page.Orientation = poLandscape.

Otazka:
Nevie niekto ako prinutit Composite report akceptovat nastavenie z prveho
reportu v zozname ReportList, resp. ako nastavit tuto vlastnost pre cely
Composite report?

Dik, Pavol Stolc
pstolc(zv)sc.sknet.sk


None

[*] Petr Vales - 29.5.2000 12:27:53

Melo by stacit pridat do registru windows v cetse
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Network\LanMan\
"
novy klic s nazvem sdilene jednotky ( napr. "MujDisk" ) a v nem textovou
hodnotu "Path" s udanou cestou napr. "C:\Data"

mozna se tam toho da nastavit vice. Byt tebou tak to zkusim rucne a potom se
do registru podivam co se stalo ... ?

PETR.

----- Original Message -----
From: <r.tesar(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 8:54 AM


> Ahojte Delf�ni
>
> Potreboval bych vedet zda je mozne nastavit zdileni disku
> softwarove z Delphi ?? A jestli jo tak jak ??
>
> Dik za vsechny rady
> Radek Tesar


stringgrid + scroll

[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 29.5.2000 12:29:11


StringGrid ma OnTopLeftChanged.
Ak vlozis CB priamo do StringGrid, bude ti scrollovat sam, jedine, co
musis zabezpecit je, aby zmizol, ked sa vyscrolluje mimo.

Jirka Trpko� wrote:

> Preji pekny denmam nasledujici problem - ve Stringgridu mam v jednom
> sloupci TCombobox, ktery se zobrazi az kdyz na tu bunku kliknu.
> Problem mam, kdyz uzivatel s takto viditelnym CB scroluje - CB zustava
> porad na tom samem miste. Potreboval bych nejak zjistit, alespon
> kterym smerem se scroluje (jestli nahoru, nebo dolu). Dekuji za
> jakekoliv nasmerovaniJirka


Remote COM

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 29.5.2000 12:45:10

Ahoj

POdle dotazu jsem pochopil, ze pouzivate DCOM pod W98. Nejsem si uplne
jisty, ale mam pocit, ze diky chybe DCOM pod timto systemem nelze
(predpokladam, ze objekt je poskytovan exe programem a ne DLL knihovnou)
vytvorit, jestlize program, ktery objekt poskytuje nebezi. Zkuste server
registrovat na NT nebo ho nejdrive spustte a pak zkosejte vytvorit objekt z
klienta.

Jaromir Cermak

-----Original Message-----
From: Robert Zak [mailto:nrsys(zv)psn.sk]
Sent: Monday, May 29, 2000 10:00 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Remote COM


Dobry den,

Vytvoril som si jednoduchy COM objekt (nieco ako HelloWord).
Z klientskej aplikacie spravim CreateComObject a COM objekt sa vytvori.
Pokial sa ale chcem napojit z ineho pocitaca s pouzitim CreateRemoteObject,
nahlasi mi: "OPERACIA VYKONAVANA SERVEROM ZLYHALA". Nainstaloval som aj
DCOM98 a pomocou konfiguracie som pre moj objekt priradil vsetky mozne
pristupove prava.
Co este musim spravit aby som ten objekt dokazal pouzit z ineho pocitaca?
Pouzivam D5Prof.


Dakujem

Robo
---
Pr�choz� 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


Program bez formu

[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 29.5.2000 13:04:56

jeste lepsi je do projektu (dpr) dat (tam jak je Application.
Initialize;)

Application.ShowMainForm:=false;

A nebo pokud formular vubec nebude treba, muzes vyhodit cely
Application.CreateForm a pak i potrebne resp. nepotrebne Unity.
Aplikace by se mela zkratit.

Ad ikonka) hledej rovnez a spise Tray Icon, myslim ze na
www.torry.ru by se dalo neco najit.
Dodo


______________________________________________________________
> Od: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Mon, 29 May 2000 10:37:58 +0200
> P�edm�t: Re: Program bez formu
>
> Dej si do hlavniho formu Visible:=False. Co se tyka ikonky, da
se to vyresit hotovymi komponentami. Hladej v archivu
konference "Try Icon"
>
> Jan Fiala
>
> ----- Original Message -----
> From: "kinekus" <kinekus(zv)nextra.sk>
>
>
> > Zdravim,
> >
> > prosim o radu, nie som odbornik. Potrebujem spustit program
bez formu.
> > Najlepsie by bolo, keby sa po spusteni program hodil k
ikonkam pri
> > hodinach.Vie mi niekto poradit ?
> >
> > MR.
> >
> >
>


Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz


Vyber zaznamu

[*] Bc. Libor Filip <filip(zv)agrokonzulta(tec)cz> - 29.5.2000 13:25:12


Mam na to napsanou vlastni komponentu, ktera je potomkem DBGrid.
Pracuje na principu, ze se vytvori nova pomocna tabulka, ktera ma jedninecny nazev.
Tato tbl obsahuje jeden field, ve kterem se ukladaji hodnoty oznacenych vet z
prvotni tabulky. Timto fieldem je vetsinou field primarniho klice prvotni tabulky.
Tato komponenta je rozsirena o nasledujici dulezite vlastnosti:
- barva oznacenych vet
- klicova polozka prvotni tabulky
- nazev pomocne tabulky
- vymazat pomocnou tabulku po ukonceni prace

a dulezite metody:
- procedure ObnovPohled;
- procedure CreateTblTemp;
- procedure ActiveTblTemp;
- procedure DeactiveTblTemp;
- procedure DeactiveTblTempBezZruseni;
- procedure OznaceniVsechVet;
- procedure ZruseniOznaceniVsechVet;
- procedure OznaceniVetInverzne;

a udalosti:
- provadi se zmena oznaceni vety s navratovym parametrem povolit/nepovolit
- provedla se zmena oznaceni vety

oznaceni vet lze provadet jako ve WinCommanderu (ins, + , - ,*, prave tlacitko mysi)
a hromadne zmeny oznaceni lze zakazat

-----P�vodn� zpr�va-----
Od: Miroslav Evj�k [SMTP:evjak(zv)atlas(tec)cz]
Odesl�no: 27. kv�tna 2000 12:54
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Vyber zaznamu

Ahoj,

potrebuji nechat uzivatele individualne oznacit vety v DBGridu (napriklad
mezernikem) a potom pracovat jenom s oznacenymi zaznamy (filtr, tisk ...).

V nesitove verzi jsem to resil primitivne fieldem typu Boolean, pak to nebyl
zadny problem. Na siti to ma samozrejme za nasledek, ze si to uzivatele
navzajem prepisujou.

Takze na to zkousim jit tak, ze si v docasne tabulce udrzuju seznam klicu
oznacenych vet. Prosim o radu, zda je to jedina cesta nebo jestli je jeste
nejake elegantnejsi reseni.

Pozadavky a parametry:
- W98, D4, Paradox
- oznaceni musi byt mozno provest na zaklade vysledku SQL dotazu
- s oznacenymi zaznamy musi jit pracovat v SQL dotazech

Dekuji vsem, kteri se podeli o sve zkusenosti.

"Mirecek" Evjak
mailto:evjak(zv)atlas(tec)cz

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

Program bez formu

[*] Petr Vale� - 29.5.2000 13:37:15


Ahoj,

podle toho co pozadujes by melo stacit dat property Formu "Visible" na
FALSE. Formular nebude tak videt na obrazovce. Pokud chces aplikaci mit na
tray baru ( vedle hodin ), staci k tomu pouzit nekterou z komponent. Osobne
bych ti doporucoval z baliku RX components, najdes ji na DSP
http://delphi.icm.edu.pl/ ).

PETR

----- Original Message -----
From: kinekus <kinekus(zv)nextra.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 8:42 AM
Subject: Program bez formu


> Zdravim,
>
> prosim o radu, nie som odbornik. Potrebujem spustit program bez formu.
> Najlepsie by bolo, keby sa po spusteni program hodil k ikonkam pri
> hodinach.Vie mi niekto poradit ?
>
> MR.

Odkaz na existujuci sobor(obrazok)

[*] kinekus <kinekus(zv)nextra.sk> - 29.5.2000 13:47:48

Zdravim vsetkych,

mohol by mi niekto poradit ako obchadzat zrutenie programu v takomto
pripade.

Pri prechadzani databazy program nacitava obrazky, ktore su ulozene v
adresaroch a ich nazov je identicky s obsahom fieldu v databaze. Vsetko je v
poriadku, pokial field odkazuje na subor (obrazok), ktory existuje. Pri
odkaze na subor (obrazok), ktory neexistuje mi spadne program. Predstavujem
si, ze by to islo, keby program testoval korektne otvorenie subor pri
"loadfromfile" alebo keby testoval, ci sa subor nachadza na disku. Iba
neviem ako to urobit.

Dakujem za kazdu pomoc.
Pozn. Som iba zac.

Zobrazeni RTF

[*] Roman �ev��k������Ȥ�*%�̿ - 29.5.2000 14:02:51

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj,
mam nekolik stranek textu a potrebuji zobrazovat jen samostatne odstavce tohoto textu (jde o nejaky popis instrukci, ktere se maji zobrazovat jen pri urcitych funkcich okna). Premyslel jsem udelat to v HTML, ale to bych musel mit na disku asi 100 souboru, nebo do dat do tabulky (to az uplne posledni varianta), nebo to udelat jako HLP soubor, ale nevim jak to dostat do toho RichEditu (tohle se mi zda jako nejlepsi varinta). Nevite nekdo jak to udelat ?


Diky
Roman


MSSQL - typ sloupce v Delphi

[*] Petr Zika <petrz(zv)rts(tec)cz> - 29.5.2000 14:05:06

Ahoj
Mam jeden problem (D2 C/S, MSSQL 7, BDE 5.01):

1. Na MS SQL 7 mam View ve kterem je krome jineho sloupec:
...
LockOnly = CONVERT(int, CASE WHEN (b.Zamc=1) or (b.Pol=1) or THEN 1
ELSE 0 END),
...
2. V Delphi si nactu vsechny sloupce a k nim jejich typ:
...cyklus...
F.FFieldName := FDataset.FieldDefs[I].Name
F.FDataType := FDataset.FieldDefs[I].DataType
...

Pokud nacitam sloupec "LockOnly" ve Win95 a Win NT je vse v pohode a v
DataType je "ftInteger".
Pokud to zkusim ve Win98 - DataType je "ftAutoInc"

Nevite nekdo proc to tak je a jak udelat abych mel vzdy stejny typ sloupce?
P.

Mail

[*] Tibor Galik <tgalik(zv)vsz.sk> - 29.5.2000 14:15:07

>Uz sa tu niekolkokrat hovorilo o %subj.
>Boli odporucane komponenty od PIETTEHO. Pozrel som si aj unit od Synapse.
>Pre SMTP ma byt definovany host (to je jasne).
>Ako vsak zistit, aky host je nastaveny na tej ktorej masine, a pouzit ho v horeuvedenych komponentach do property
>pre host?
>
Dakujem za prispevky na tuto temu.

Urobil som maly pgm, kde som pouzil vsetky moznosti posielania mailov.
Konfiguracia PC:
W95
Windows meassging 4.0 (neviem, ale asi je to Exchange), ktory je poterbny pre
GroupWise Client 5.5
OutlookExpress 5

Moznosti pgm s popisom:

- unity synaps. vsetko OK
- pomocou MapiSendMail odoslanie OK
- ShellExecute padlo to s chybou 'The forem required to view this message cannot be displayd'
- TNMSMTP vsetko OK, ale v prispevkoch konferencie tato komponenta bola niekolko krat zavrhnuta
- Pietteho komponenta priklad mi funguje, ale mne sa s pgm nepodarilo odoslat nic
do form som vlozil komponetu TSMTPCLI a na klik tlacitka som dal prikazy:
SMTPCli1.Connect;
SMTPCli1.Hello;
SMTPCli1.Mail;
SMTPCli1.Quit;

vzdy hlasi chybu, ze komponenta nieje pristupna

- TEmail komponenta odoslanie OK


Avsak vsade kde pouzijem MapiSendMail, ci v komponentach alebo samostatne v pgm, mi vo Widows messaging a GroupWise vznikaju prazdne foldre. Neviem si to vysvetlit.


Chcem sa este spytat na Simple Mapi Client. Co to znamena, ked to je alebo nie je nastavene ?

S pozdravom / Regards

Tibor Galik
tgalik(zv)vsz.sk

Odkaz na existujuci sobor(obrazok)

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 29.5.2000 16:01:45

Pomohl by Ti nasledujici kod ?

if FileExists(JMENO_SOUBORU) then
...
else
...> ----------
> Od: kinekus[SMTP:kinekus(zv)nextra.sk]
>
>
> Pri prechadzani databazy program nacitava obrazky, ktore su ulozene v
> adresaroch a ich nazov je identicky s obsahom fieldu v databaze. Vsetko je v
> poriadku, pokial field odkazuje na subor (obrazok), ktory existuje. Pri
> odkaze na subor (obrazok), ktory neexistuje mi spadne program. Predstavujem
> si, ze by to islo, keby program testoval korektne otvorenie subor pri
> "loadfromfile" alebo keby testoval, ci sa subor nachadza na disku. Iba
> neviem ako to urobit.
>
>

Hladanie pomocou SELECT

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 29.5.2000 16:18:01

Zdravim,

moze mi, prosim vas niekto vysvetlit ako mam postupovat pri hladani retazca
v databaze pomocou SELECT.
Ide o hladanie iba v jednom poli, alebo vo vsetkych. Ak mozem poprosit, taky
maly bodovy zoznam, ako postupovat.
Dakujem.

Miso


TBufStream

[*] Marek ��ek - 29.5.2000 16:21:10


Ahoj,

Nenarazili jste, siim, nekdo na neco, co by by
fungovalo v Delficku jako TBufStream
(bufferovany stream) v starem dobrem
TuboVision ?

Marek

Odkaz na existujuci sobor(obrazok)

[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 29.5.2000 16:39:17

Pri nenalezeni souboru pri volani LoadFromFile nastane vyjimka.
ty ji musis odchytit, pripadne osetrit. na to jsou prikazy try,
except

Priklad:

Function Nacti: Boolean;
Begin
Try
Objekt.LoadFromFile (xxxx);
Nacti:=True; // probehlo OK
Except
Nacti:=False; //chyba
End;

End;

------
Do casti except nemusis psat nic, pokud chces vyjimku jen tise
prejit.

Dodo


______________________________________________________________
> Od: "kinekus" <kinekus(zv)nextra.sk>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Mon, 29 May 2000 13:47:48 +0200
> P�edm�t: Odkaz na existujuci sobor(obrazok)
>
> Zdravim vsetkych,
>
> mohol by mi niekto poradit ako obchadzat zrutenie programu v
takomto
> pripade.
>
> Pri prechadzani databazy program nacitava obrazky, ktore su
ulozene v
> adresaroch a ich nazov je identicky s obsahom fieldu v
databaze. Vsetko je v
> poriadku, pokial field odkazuje na subor (obrazok), ktory
existuje. Pri
> odkaze na subor (obrazok), ktory neexistuje mi spadne program.
Predstavujem
> si, ze by to islo, keby program testoval korektne otvorenie
subor pri
> "loadfromfile" alebo keby testoval, ci sa subor nachadza na
disku. Iba
> neviem ako to urobit.
>
> Dakujem za kazdu pomoc.
> Pozn. Som iba zac.
>


Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz



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