Archív konference Delphi

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

Rekurzivne vyhladanie suborov v ceste

[*] pemasoft(zv)atlas(tec)cz - 26.1.2000 13:21:24

Zdravim.

Potreboval by som funkciu na rekurzivne vyhladanie suborov v zadanej ceste.
('*.db','d:\data\')


Ahoj
tak tady mas priklad:

//hledani souboru s maskou;
//FindFiles('c:\sound\', '*.mp3', true) cesta,maska,podadresare (vraci pocet souboru)
//nalezene soubory jsou v memo1

uses
SysUtils;

function FindFiles(const Path, Mask: string; IncludeSubDir: boolean): integer;
var
FindResult: integer;
SearchRec : TSearchRec;
begin
result := 0;

FindResult := FindFirst(Path + Mask, faAnyFile - faDirectory, SearchRec);
while FindResult = 0 do
begin
Form1.Memo1.Lines.Add(Path + SearchRec.Name); //jmena a cesta hledanych souboru
result := result + 1; //pocet souboru

FindResult := FindNext(SearchRec);
end;
FindClose(SearchRec);

if not IncludeSubDir then
Exit;

FindResult := FindFirst(Path + '*.*', faDirectory, SearchRec);
while FindResult = 0 do
begin
if (SearchRec.Name <> '.') and (SearchRec.Name <> '..') then
result := result +
FindFiles (Path + SearchRec.Name + '\', Mask, TRUE);

FindResult := FindNext(SearchRec);
end;
FindClose(SearchRec);
end; Petr Matejovsky
pemasoft(zv)atlas(tec)cz


Vykon SQL

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 26.1.2000 13:34:59

Hi,

Mam dotaz mel bych neco jako sklad. a mam takojem malej dotaz.
Pouzity SQL server Interbase 4.0 Linux.

Nemel bych vubec tabulku se stavy na skladu, ale jen tabulku
pohybu a tabulka karty ( i se stavy ) byla View s pouzitim calc sum
na pohyby.
Pripada mi to skvele pro odstraneni problemu s konzistenci, ktere
jsem mel na souborove databazi, ale mam strach z vykonu.
Muze byt klidne 500.000 tisic pohybu za rok. Pak se to vyprazdni
a nahradi pro kazdou kartu jednim prijmem.

Dekuji za nazory.

S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Abstract error

[*] Bednar��k Dalibor - 26.1.2000 13:47:56




Ahoj..jen bych chtel doplnit
Zkus na to puzit jine reseni.
Kdyz pridas do TStrings polozku s rovnitkem tak se hodnota za rovnitkem bere
jako parametr.

Takze kdyz udelas
Strings:=TStringList.Create(self);
Strings.Add('POZDRAV1=AHOJ');
Strings.Add('POZDRAV2=BLE');

Tak muzes pouzit Strings.Values['POZDRAV1'] aby jsi dostal AHOJ
Vice viz Help....

----- Original Message -----
From: Pavol Kaka�ka <paka(zv)aktis(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 26, 2000 12:20 PM
Subject: Re: Abstract error


> function CachedNAZEV( id: Integer ): String;
> var
> i: Integer;
> begin
> if Xcache=NIL then
> Xcache := TStrings.Create
> else
> for i:=0 to Xcache.Count-1 do
> if TInteger(Xcache.Objects[i]).I = id then
> begin
> Result := Xcache.Strings[i];
> Exit;
> end;
> Result := SelectStr('NAZEV FROM X WHERE ID='+IntToStr(id)); // moje
> fce, vrati string
> Xcache.AddObject( Result, // na tomhle radku to hodi error
> TInteger.Create( id ) );
>
> Muzete mne prosim nekdo nakopnout, co delam spatne?
>
> predem diky

namiesto
> if Xcache=NIL then
TStrings.Create pouzi :

if Xcache=NIL then
Xcache := TStringList.Create
~~~~~~~~

TStrings je absrtaktna trieda, namiesto nej pouzivaj pri vytvarani
TStringList.

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

MSDE licencia

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 26.1.2000 14:02:29

Myslim, ze to tu uz bolo predcasom spomenute ale pre istotu by som sa chcel
este raz spytat, ake su podmienky na volne pouzivanie MSDE.

Quick Report a DLL

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 26.1.2000 14:43:35

From: "Pavol Stolc" <pstolc(zv)sc.sknet.sk>
> (D3,QR2)
> Mam tiez skusenost, ze okamzite uvolnenie kniznice po vytvoreni reportu
> vedie k zamrznutiu aplikacie. Nechavam uvolnenie kniznice az na koniec
> aplikacie v casti finalization prvej unity - aplikacia nezamrzne.
>
> Podobne som zistil, ze ak vytvaram report dynamicky, potom jeho uvolnenie
> sposobi podobne zamrznutie. Myslim ze to sposobuje praca QR v samostatnom
> threade ktory sa este neukoncil.

Pavle diky to s finalization funguje.

a chci se zeptat, jak to myslis s tim
neukoncenym threadem ? Kdyz se divam do
okna s vlakny tak se po volani Print zadne dalsi
vlakno nevytvari....

Petr Motlicek


Drag-and-Drop na DBGrid

[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 26.1.2000 14:50:30

[P��loha v souboru: winmail.dat]
Mam dotaz, zda nekdo neresil nasledujici problem. Stale se nemohu hnout z
mista.

Mam Table1 a Table2, na formulari dva DBGridy. Pomoci Drag-and-Drop
potrebuji pretahovat zaznamy z jednoho do druheho.

Chytnu zaznam z DBGridu1, Pustim ho na konkretni misto v DBGridu2, tam se
Insertem prida a z Table1 vymaze a obracene.

Asi tusim, ze trida DBGrid neposkytuje vsechny potrebne vlastnosti, ale
nevim, jak vyuzit vlastnosti TCustomGrid a zaroven ponechat vlastnosti
TDBGrid.

Diky za kazdou radu.

Ing. Petr Svejda
software specialist

Nacteni promenych DOS/WIN

[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 26.1.2000 15:02:36

Jakym zpusobem se daji nacist vnitrni promene DOS/WIN.
napr: v autoexec.bat mam SET ID=10 a chci si vratit tuto promenou a hodnotu do DELPHI.

Vim ze je to velmi trivialni ale nemuzu to nikde najit. Muze mne nekdo nakopnout?

Zvonda
PROSOFT Kromeriz s.r.o.
Soudni 1293
KROMERIZ 767 01
Czech Republic
tel/fax 0420 (0)634 333545
GSM: 0420 (0)602 305919
GSM 0420 (0)602 305920
e-mail: prosoft(zv)prosoft(tec)cz
ICQ:49532930


Typ ukazatel - scitani, odcitani,...

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 26.1.2000 15:07:46

From: kchodl(zv)email(tec)cz

> Mam promenout typu ukazatel a potrebuju ji posunout o 4 bajty dale?
> Ja mam proste okno. :)

Ukazatel := pointer(longint(Ukazatel)+4);

Abstract error

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 26.1.2000 15:11:15

From: stingp1.eti(zv)mail.cez(tec)cz
> > var
> > Xcache: TStrings;
> >
> >
> > function CachedNAZEV( id: Integer ): String;
> > var
> > i: Integer;
> > begin
> > if Xcache=NIL then
> > Xcache := TStrings.Create

Urcite musis Xcache := TStringList.Create;
TStrings je pouze "abstrakt", kter� nepracuje s
retezci. Koukni do helpu ci zdrojaku.> > else
> > for i:=0 to Xcache.Count-1 do
> > if TInteger(Xcache.Objects[i]).I = id then
> > begin
> > Result := Xcache.Strings[i];
> > Exit;
> > end;
> > Result := SelectStr('NAZEV FROM X WHERE ID='+IntToStr(id)); // moje
> > fce, vrati string
> > Xcache.AddObject( Result, // na tomhle radku to hodi error
> > TInteger.Create( id ) );

Typ ukazatel - scitani, odcitani,...

[*] OLEJNIK Andrej <olej(zv)nt2.asset.sk> - 26.1.2000 15:12:02

Posun pointra o 4:

var Jojo:Pointer;
Jojo := Pointer(LongInt(Jojo)+4);


olej



-----Original Message-----
From: kchodl(zv)email(tec)cz [mailto:kchodl(zv)email(tec)cz]
Sent: Wednesday, January 26, 2000 1:12 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Typ ukazatel - scitani, odcitani,...


Mam promenout typu ukazatel a potrebuju ji posunout o 4 bajty dale?
Ja mam proste okno. :)

Progr-Amather -Kchodl-� 1989-2000

--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email

Volne misto na disku

[*] Ji�� H�sek <HysekJ(zv)mail.spsuh.hiedu(tec)cz> - 26.1.2000 15:34:05

Zdravim vsechny pritomne,
mam takovy problem. Chci zjistit kolik mam volneho mista na disku.
Kdyz pouzivam funkce diskfree a disksize, tak vse funguje bez
problemu, pokud disk nema kapacitu vetsi jak 2GB. Nevite nekdo, jak
to muzu udelat aby program zjistil volne misto a kapacitu disku vetsi
nez 2GB? Jiri Hysek


Pouzivani komponent v nevizualni aplikaci.

[*] Martin Bednar <bednar(zv)ova.cpress(tec)cz> - 26.1.2000 15:59:36

Jak muzu pouzivat komponenty treba TADOConnection v programu ktery nema GUI,
je to jen konzolova aplikace nebo NT service ?
Zkousel jsem
cn:=TADOConnection.Create(nil);
ale tohle nefunguje.
Thanx

_______________________________________________
Martin Bedn��, Computer Press, v�voj internetov�ch aplikac�
tel.: +420-69-6634734, fax: +420-69-6634734
Fr�ni �r�mka 5, 709 00, Ostrava-Mar.Hory
ICQ: 3577914
http://www.zive(tec)cz | http://www.vltava(tec)cz | http://www.aukce(tec)cz |
http://www.vltava2000(tec)cz | http://www.travelguide(tec)cz | http://www.doupe(tec)cz |
http://www.serge(tec)cz | http://www.ceskaskola(tec)cz

API help

[*] Marek Soukup <marek(zv)comberg(tec)cz> - 26.1.2000 16:03:46

Je to nekde na webu ?

MS

> Klidne, ale nesbaleny to ma 23 MB. - samozrejme to sbalim
> Jeste to chces ?
> Dodo


Nacteni promenych DOS/WIN

[*] Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz> - 26.1.2000 17:02:21

Slab�, Petr (Pilsen), 26.01.2000 16:44:57
Josef Zvonicek wrote:
> Jakym zpusobem se daji nacist vnitrni promene DOS/WIN.
> napr: v autoexec.bat mam SET ID=10 a chci si vratit tuto promenou a
> hodnotu do DELPHI.

Ve WIN32 je na to funkce
GetEnvironmentVariable('TEMP', PChar(sWorkDir), 255);
ktera zjisti hodnotu konkretni dosovske promenne

ve WIN16 je funkce
GetDOSEnvironment
ktera vraci vsechny dosovske promenne ve forme xxx=yyy a musi se to jeste rozdelit.

Best regards,
PS.

MSSQL bez BDE

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 26.1.2000 17:28:23

On 26 Jan 00, at 8:59, David Lebeda wrote:

> Mam Windows NT 4, SP4 a MDAC mam stazene a nainstalovane.
> Chci se zeptat:
>
> 1) Toho, ze se nepouzije BDE, se dosahne tim, ze se pouziji jine
> komponenty nez ty z Delphi? Znamena to tedy, ze i pres ODBC se da jet
> bez BDE tak, ze si stahnu komponenty neodkazujici se na BDE,

Presne tak. Pouze v D5 Enterprise jsou ADO komponenty, ktere je
pro D5 Prof mozne dokoupit zvlast. Na svete je vsak cela rada
jinych komponent.

> 2) V ovladacich panelech je nastavovani ODBC. Pro OLEDB
> existuje taky neco takoveho, resp. je to potreba?

Ne. Pri pouziti OLE DB se hleda provider, a ten se nastavuje primo
v aplikaci.

> 4) Pro aplikaci oprenou o BDE + ODBC - je opravdu potreba
> instalovat balik MDAC?

Ne.


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


Nacteni promenych DOS/WIN

[*] sup(zv)svitap(tec)cz - 26.1.2000 17:32:04

>Jakym zpusobem se daji nacist vnitrni promene DOS/WIN.
>napr: v autoexec.bat mam SET ID=10 a chci si vratit tuto promenou a hodnotu
do DELPHI.
>
>Vim ze je to velmi trivialni ale nemuzu to nikde najit. Muze mne nekdo
nakopnout?
>
> Zvonda

Taky jsem se nad tim trapil... Zkus tohle:

var p:pchar;
s:string;
begin
{$IFDEF WIN32}
p := GetEnvironmentStrings;
{$ELSE}
p := GetDOSEnvironment;
{$ENDIF}
while p^ <> #0 do begin
s:=(StrPas(p)); {v promenne s jsou jednotlive radky environmentu}
inc(p, lStrLen(p) + 1);
end;
{$IFDEF WIN32}
FreeEnvironmentStrings(p);
{$ENDIF}
end;

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


Pouzivani komponent v nevizualni aplikaci.

[*] sup(zv)svitap(tec)cz - 26.1.2000 17:35:40

>Jak muzu pouzivat komponenty treba TADOConnection v programu ktery nema
GUI,
>je to jen konzolova aplikace nebo NT service ?
>Zkousel jsem
>cn:=TADOConnection.Create(nil);
>ale tohle nefunguje.
>Thanx

Me chodilo

cn:=neco.Create(Application);

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


ADO + JOIN

[*] Erik Salaj <winsoft(zv)napri.sk> - 26.1.2000 18:40:59

> Delete na recordsetu vymaze danny radek z obou tabulek. Podle
> dokumentace by mel vymazat radek pouze z prvni tabulky. Zkousel jsem
pouzit
> RS.Properties.Get_Item('Update Resync').Value:=0; , ale zadny vliv to
> nemelo. Pracuji primo s interface ADO.

skus RS.Properties['Unique Table'].Value := 'MyTable';

Erik


setup provedl neplatnou operaci

[*] Konference DELPHI <vegainfo(zv)post(tec)cz> - 26.1.2000 19:07:13

Samozrejme se to tyka pouze te chvilky, co to potrebujeme
nainstalovat. Pak uz se to muze vratit.

;-)

Jurasek

> Ahoj,
>
> To je bezva reseni, neni ten pocitac pak trochu pomaly ? :-))
>
> Petr Vones, amatersky programator
>


----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, January 25, 2000 10:48 PM
Subject: Re: setup provedl neplatnou operaci


> From: Konference DELPHI <vegainfo(zv)post(tec)cz>
> > Tento problem se mi objevil take, po instalaci systemu WINDOWS98 SE.
> > Po sahodlouhe komunikaci s podporou a hledani informaci
> > na internetu jsem se dozvedel, ze ani sami autori nevedi, proc
> > k tomu dochazi a vlastne se ted hledaji podklady, proc vlastne....
> > Ta chyba, ke ktere dochazi u me se objevuje jen na nekterych pocitacich
a
> > na systemu 98 SE.
> >
> > Provizorni reseni je v SETUPu vypnout hlavne nasledujici veci
> > -externi cache L2
> > -cachovani BIOSu, VIDEA apod.
>

Volne misto na disku

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 26.1.2000 19:49:40

From: Ji�� H�sek <HysekJ(zv)mail.spsuh.hiedu(tec)cz>

>Nevite nekdo, jak
> to muzu udelat aby program zjistil volne misto a kapacitu disku vetsi
> nez 2GB?

Ahoj,

na jednom CD chipu je unita bsutils od Eddie
Bond ebinfo(zv)compuserve.com (opravdu nevim
cislo, protoze to mam zkopirovane). Je to free.

On to resi takto:

function BSGetDiskFreeSpace(drv:string;var
ffree,fsize:comp):boolean;
{get disk free space for BIG disks ie > 2.1GB }

function BSGetDiskFreeSpace(drv:string;var
ffree,fsize:comp):boolean;
Type LargeInt = Comp; {use INT64 for
delphi versions 3+}
Type pLargeInt = ^Comp;

var
GetDiskFreeSpaceEx: function(
RootName: pChar;
var
FreeForCaller,TotNoOfBytes:LargeInt;
TotNoOfFreeBytes:
pLargeInt
): BOOL; stdcall;

LFree,LSize:comp;
Lib:THandle;
begin
result:=false;
LFree:=-1;
LSize:=-1;
Lib:=GetModuleHandle('Kernel32'); {get the
handle for kernel32.dll}
If (Lib<>0) then
begin

(zv)GetDiskFreeSpaceEx:=GetProcAddress(Lib,'
GetDiskFreeSpaceExA');
if ((zv)GetDiskFreeSpaceEx<>nil) then
if
GetDiskFreeSpaceEx(pchar(drv),LFree,LSize,nil
) then
begin
FFree:=LFree;
FSize:=LSize;
result:=true;
end;
FreeLibrary( Lib );
end;
end;

Petr Motlicek

Anchors + zmena velikosti pisma

[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 26.1.2000 20:06:12

Ahoj,

pokud si uzivatel v OS vybere jinou velikost pisma
nez jaka byla pri navrhu formulare, tak se pri pouziti vlastnosti
Anchors (right,bottom) cudliky na formulari kotvi nejak divne za roh.

Lze to obejit nebo zapomenout na kotvy (D4) ?
Diky.

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


Co je to za blbost? (FillRect)

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 26.1.2000 20:24:01

Preji vsem pekneho dne,

dovolim si malou uvahu na zacatek. TRect ve VCL je definovan jako
obdelnik, ktery ma souradnice leveho horniho a praveho dolniho
rohu. Napisu-li napr. Rect (0,0,8,19), dostanu obdelnik s hornim
levym rohem [0,0], dolnim pravym [8,19]. Sirka je 9, vyska 20. Vse
v poradku, az sem me matematicke znalosti druhaka prvniho
stupne zakladni skoly staci.

Ted chci tento ctverec vyplnit. Pouziji metodu Canvasu FillRect a
brutalne narazim, nebot mi to udela vypln pouze obdelnika
(0,0,7,18)! Proc? Vim, ze je tato vlastnost napsana v napovede, ale
neni tam duvod, proc tahle pitomost (?) nekoho napadla. Sem jiz
nestaci ani me (temer) vysokoskolske znalosti.

Druha otazka: jak dany Rect vyplnit, aniz bych ho musel umele
zvetsit a nasledne zmensit?

Diky za pripadne odpovedi.

Slavek


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


Text z DBGridu

[*] Lud�k ZITA - 26.1.2000 20:48:31


From: MJsoft <mjsoft(zv)rychnov(tec)cz>
> Ahoj
>
> nevite jestli v komponente DBGrid lze zjistit text v prave rozeditovanem
> sloupci? Nemuzu to najit.
>
> JJ
>

Asi nejjednodussi mas pouzit RxDBGrid z RxLib. Ten ma podedenou property(po
TCustomGrid) InplaceEditor.
Pak uz jen pises :
RxDBGrid1.InplaceEditor.Text
nebo
RxDBGrid1.InplaceEditor.EditText
atd ......

Ludek ZITA

QR3 - save to TXT, RTF, HTML format

[*] J�n Tungli - 26.1.2000 21:02:51

Mam QuckReport 3 pre D4
Ako mozem povolit pri standard Preview aby dokazal report ulozit (save) do
TXT,RTF,HTML formatu?

J�n TUNGLI
Email: tungli(zv)datapac.sk
URL: http://free.netlap.hu/4321/

BDE - rozdilne langdriver na siti - restructure (l

[*] Lud�k ZITA - 26.1.2000 21:17:46

> > Problem
> > mi prave nastava, pokud si aplikce sama vytvari za behu novou tabulku,
> > tak ta pak nemusi mit vzdy autory pozadovany langdriver. Obavam se
> > tedy, ze s tim dokud se vsichni nedohodnou na stejnem langdrive nic
> > neudelam
>
> V tom pripade bych to hodil zpet na vyrobce, at se staraji oni.
> Pripadne s doporucenim, at opusti BDE a souborove databaze.
>
> BTW - tam, kde jsem daval Paradox, se modlim, aby u techto
> zakazniku nedochazelo prave k podobnym konfliktum. Ted makam
> usilovne na nove verzi, abych tyto problemy zcela smetl ze sveta.
> :-)

Mozna by stacilo zjistit, ktery SW vytvari za behu tabulky a pokud bude sam
podridit mu defaultni nastaveni. Pripadne pozadat dodavatele SW aby doplnil
vytvareni tabulky o nasledne restructure langdriveru.

Bohuzel Local SQL nezna CREATE CHARACTER SET takze by to melo jit jinak.
Sam jsem vzdy na vytvareni pouzival SQL a tak s API BDE nemam zkusenosti.
V helpu pisou "The default language driver setting can be overridden at
creation by specifying optional parameters to DbiCreateTable"
a dale "A table's language driver can be changed after creation by using
DbiDoRestructure." takze by to melo jit.

Takze prosim (i ty nejzkusenejsi, kteri jiz hodili BDE a Paradox pres
palubu) o radu jak na to.

Rozhodne je asi jednodusi doplnit do stavajicich aplikaci za vytvoreni
tabulky jeji restrukturalizaci na pozadovany LangDriver nez to cele
preklapet na jiny "databazovy stroj". I kdyz se tim samozrejme odstrani i
jine problemy.

Pokud se nemylim, tak pri spravnem pristupu by pak jiz na defaultnim
nastaveni BDE nezbyvalo temer nic, co by melo vest ke kolizim mezi ruznymi
SW.

Ludek ZITA


Nova verze KonfView

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 26.1.2000 21:57:53

Takze uz je to tady....nova verze KONFVIEW.
Naleznete ji jako vzdy na adrese:
http://atrey.karlin.mff.cuni(tec)cz/~bla/konfview.shtml

Par podrobnosti o teto verzi:

Opravene chyby:
- Pri scrolovani pomoci scrollbaru se obcas zjevila chybova hlaska
,,List index out of Bounds''
- Pri nacitani dlouhe zpravy se na nekterych pocitacich objevila
chyba ,,Invalid parameter''
- Nekdy se po vyhledani nezobrazily vsechny zaznamy (obvzlaste
pokud se tridilo podle subjectu)

Neopravene chyby:
Na nekterych pocitacich (zatim zjisteno na Win NT 4 (SP 5), IDAPI
verze 4.0) po nacteni asi tak 5000 zaznamu nastane chyba:
Some internal limit (see context)
Table: C:\....\XX.MB
Po dosazeni tohoto limitu se do tabulky neda narvat vice zaznamu (ani
z jineho souboru). Zatim netusim jak to opravit (zkousel jsem zvysit
nektere hodnoty v BDE Administratorovi, ale bez uspechu (BlockSize,
MaxBufSize, SharedMemSize)).
Takze pokud mi chcete pomoci, napiste mi, na jakem systemu pouzivate
KonfView a zda je OK, nebo hlasi tento limit. Snad z techto udaju
vypozoruji na cem to zavisi -- predem diky.

Vylepseni:
- Nove si pamatuje 4 drive otevrene soubory (v menu Soubor).
- Oddeleni nekterych nastaveni zavislych na aktualni otevrene
databazi - nyni jsou tato nastaveni zapsana v ini souboru, ktery se
jmenuje stejne jako databaze a je ulozen na stejnem miste jako
aktualni INI soubor cele aplikace.
V tomto souboru je ulozeno:
- Historie vyhledavani (hledana slova)
- Zalozky do teto databaze
- Komentare o plneni databaze (podrobnosti viz nasledujici bod)

- Informace o plneni databaze
- Casto jsem horkotezko premyslel, zda jsou v databazi data z
urciteho mesice, nebo ne a musel jsem si to overovat listovanim. Nyni
uz pocitac automaticky zaznamenava plneni databaze a zapisuje to do
ini souboru teto databaze. V tomto logu jsou nasledujici informace:
- Datum vytvoreni DB
- Ze ktereho souboru se pridavaly data
- Kolik bylo predtim v DB zaznamu
- Pocet zaznamu po nacteni dalsich dat
- Celkem pridanych zaznamu
- Pocet zpracovanych radku
- ID, Subject a Autor posledniho zaznamu pred pridavanim a po
nem Uzivateluv komentar k pridavanym datum, ktery muze uzivatel zadat
pri nacitani do DB.
Samozrejme pokud do databaze znovu nactete jiz drive nacteny soubor,
nic se do ni nezapise, nebot kontroluje duplicitu zaznamu.
- Pohyb v gridu byl vylepsen dvema klavesovymi zkratkami:
ALT+NAHORU a ALT+DOLU pro scrolovani prispevku v RichEditu na prave
strane
- Obdobne v RichEditu pribyly zkratky ALT+NAHORU a ALT+DOLU pro
skok na predchozi/dalsi zaznam v databazi
- Pro zjednoduseni opakovaneho vyhledavani jsou tu dve polozky (v
menu Soubor pripadne na tlcitkove liste), ktere ukladaji IDecka
vybranych zaznamu do souboru a zpetne jej nacitaji. Takze kdyz si na
pomale masine po peti minutach usilovneho chroupani disku neco
vyhledate, muzete si tento vyber ulozit a pozdeji znovu nacist bez
opetovneho prolezani celou databazi.
- Pribyla zvyraznena syntaxe hledanych slov (v Nastaveni lze
samozrejme vypnout)
- Pri najeti mysi nad odkaz (http nebo ftp adresa) se zmeni
ukazatel a po kliknuti se spusti prohlizec s danou adresou. V takovem
pripade navic v popup menu pribude moznost zkopirovat adresu do
clipboardu.
- Pridana moznost vyhledavat slovicka v aktualnim (CTRL+F3), a
dalsich (F3) prispevcich bez nutnosti hledani v cele DB (CTRL+F)

Pristi verze bude mozna obsahovat:
Editace a mazani prispevku (snad....uz...konecne....)

Petr


,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -


Paradox & limit

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 26.1.2000 22:00:33

> > Na nekterych pocitacich (nebo systemech?) je to OK (na koleji na
> > Win95), jinde (na WinNT 4 SP5) to asi po 5000 zaznamech vyhodi hlasku:
> >
> > Some internal limit (see context)
> > Table: C:\....\XX.MB
>
> Kdysi jsem mel stejny problem. Vyresil jsem to tak, ze jsem po
> urcitem poctu cyklu dal oddychovou pauzu cca 1 vterinu. :-) Mozna
> by pomohlo take pustit uvnitr cyklu ke slovu ostatni procesy.
> Nerikam, ze je to koser reseni, ale kdysi mi takto fungovalo. :-)

*** Bohuzel tady to nepomuze, protoze pote, co tabulka dosahne toho
limitu, muzu klidne aplikaci ukoncit, znovu spustit, otevrit tu
databazi a pokusit se vlozit dalsi zaznam -- ale marne.
Taky jsem zkousel davat to tam tak po 1000 zaznamech, ale v okamziku,
kdy tam bylo neco malo pres 5000 zaznamu tak to opet narazilo na ten
limit.

Petr

,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -


Volne misto na disku

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 26.1.2000 22:09:24

> Zdravim vsechny pritomne,
> mam takovy problem. Chci zjistit kolik mam volneho mista na disku.
> Kdyz pouzivam funkce diskfree a disksize, tak vse funguje bez
> problemu, pokud disk nema kapacitu vetsi jak 2GB. Nevite nekdo, jak
> to muzu udelat aby program zjistil volne misto a kapacitu disku vetsi
> nez 2GB? Jiri Hysek
Pokud pouzijes prislusne api funkce, tak si musis zjistit, na jakym
jsi operacnim systemu (je to jinak na Win 95 a Win95 OSR2 (prip. NT))
nebot pod Win95 muzou byt jen disky se systemem FAT tedy do tech 2GB.
Resil jsem stejny problem a zde v konferenci mi dobre poradili abych
pouzil fce DiskFree a DiskSize, ktere toto delaji za tebe (zjisti si
OS a podle toho zavolaji prislusnou API funkci). Pouzivam tyto funkce
k plne spokojenosti -- viz
http://atrey.karlin.mff.cuni(tec)cz/~bla/free2.shtml

Problem u tebe muze byt ze misto Int64 ukladas vysledek do Integeru a
on ti samozrejme u vetsich disku pretece.

Petr


,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -


Co je to za blbost? (FillRect)

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 26.1.2000 22:15:51

Existuji dva zpusoby, kterymi se pracuje se souradnicemi.
Souradnice stredove - prochazi stredem pixelu
Souradnice intersticialni - prochazi rozhranim mezi pixely.
Funkce pro praci s pixelem, primkami a krivkami
pracuji se stredovymi souradnicemi, naproti tomu
pri praci s uzavrenymi obrazci se pouzivaji souradnice
intersticialni.

Pokud chci vyplnit plochu (pouzivam intersticialni souradnice)
velikosti 9x20 pixelu, musim vyplnit obdelnik lezici uvnitr
oblasti ohranicene souradnicemi [0,0] a [9,20].

Mozna se to nekomu zda nelogicke, ale je to tak.
VCL je v tomto zcela nevinne. Toto je dano z GDI.

Vaclav Krmela


From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Preji vsem pekneho dne,
>
> dovolim si malou uvahu na zacatek. TRect ve VCL je definovan jako
> obdelnik, ktery ma souradnice leveho horniho a praveho dolniho
> rohu. Napisu-li napr. Rect (0,0,8,19), dostanu obdelnik s hornim
> levym rohem [0,0], dolnim pravym [8,19]. Sirka je 9, vyska 20. Vse
> v poradku, az sem me matematicke znalosti druhaka prvniho
> stupne zakladni skoly staci.
>
> Ted chci tento ctverec vyplnit. Pouziji metodu Canvasu FillRect a
> brutalne narazim, nebot mi to udela vypln pouze obdelnika
> (0,0,7,18)! Proc? Vim, ze je tato vlastnost napsana v napovede, ale
> neni tam duvod, proc tahle pitomost (?) nekoho napadla. Sem jiz
> nestaci ani me (temer) vysokoskolske znalosti.
>
> Druha otazka: jak dany Rect vyplnit, aniz bych ho musel umele
> zvetsit a nasledne zmensit?
>
> Diky za pripadne odpovedi.
>
> Slavek
>

Paradox & limit

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 26.1.2000 22:20:19

> > Na nekterych pocitacich (nebo systemech?) je to OK (na koleji na
> > Win95), jinde (na WinNT 4 SP5) to asi po 5000 zaznamech vyhodi
> > hlasku:
> > Some internal limit (see context)
> > Table: C:\....\XX.MB
> Ahoj,
> Zkus jeste nastavit v BDE Adminu v System\INIT polozky MAXBUFSIZE nebo MEMSIZE.
*** Zkusil jsem, zvetsil jsem oboje na 4096, znovu vytvoril tabulku,
ale nepomohlo to :-(
Pak jsem jeste zkusil vzit tabulku, ktera byla vyplnena na Win95 za
ten limit, smazal jsem jeji obsah a zkusil do ni vlozit znovu ty
zaznamy a opet jsem narazil na ten samy limit.
Takze pokud vas jeste neco napada, tak sem s tim.
Jinak kdo by mel zajem se v tom trochu postourat, tak zdrojaky i exac
nalezne v podobe posledni verze konfview na adrese:
http://atrey.karlin.mff.cuni(tec)cz/~bla/konfview.shtml
Prispevky, ktere se do toho laduji jsou pro zmenu zde:
http://atrey.karlin.mff.cuni(tec)cz/~rk/DataZKonference.shtml

Petr


,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -


Quick Report a DLL

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

From: <Petr.Motlicek(zv)bcbrno(tec)cz>
> a chci se zeptat, jak to myslis s tim
> neukoncenym threadem ? Kdyz se divam do
> okna s vlakny tak se po volani Print zadne dalsi
> vlakno nevytvari....

Ahoj,

Pri Print jsem to taky nezaznamenal, ale pri Preview jej QR pouziva.

Petr Vones, amatersky programator

casopis Delphi informant.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:31:47

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Kde zozeniem casopis Delphi informant ?

Ahoj,

Zkus se podivat tady:
http://www.informant.com/delphi/

Petr Vones, amatersky programator

Nahrada SYSUTILS

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:31:40

From: Dalibor Toman <dtoman(zv)fortech(tec)cz>
> k prekladu je nutny TASM32 (me to chodi s verzi 4.1). Bohuzel Borlandi za
> nej chteji dalsi penize, coz mi prijde ponekud ujety.

Ahoj,

V krabici s Delphi 5 je i CD s C++ Builderem 3. Jeho soucasti je TASM, nevim
ted presne ale jaka verze.

Petr Vones, amatersky programator


Drag-and-Drop na DBGrid

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

From: Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz>
> Mam Table1 a Table2, na formulari dva DBGridy. Pomoci Drag-and-Drop
> potrebuji pretahovat zaznamy z jednoho do druheho.
>
> Chytnu zaznam z DBGridu1, Pustim ho na konkretni misto v DBGridu2, tam se
> Insertem prida a z Table1 vymaze a obracene.

Ahoj,

Narazil jsem pri tom hned na jeden problem. Pokud se nastavi u TDBGridu
vlastnost DragKind na dmAutomatic, tak prestane fungovat leve tlacitko
mysi u teto komponenty (vlastne u vsech potomku TControl). Vypada to na
chybu ve VCL, muze to nekdo zkusit v nizsich verzich Delphi ?

Jinak velmi jednoduchy priklad mas tady. U obou DBGridu nastav DragKind na
dmAutomatic a taktez vsechny udalosti jsou spolecne pro oba gridy. Dale se
predpoklada, ze pretahovani probiha mezi dvema tabulkami ktere maji zcela
shodnou strukturu.

type
TControlHack = class(TControl);

// pokus o castecne odstraneni chyby pri TControl.DragMode = dmAutomatic
procedure FixControlBug(Sender: TObject);
var
P: TPoint;
begin
if Sender is TControl then
with TControlHack(Sender) do
begin
P := ScreenToClient(Mouse.CursorPos);
Perform(WM_RBUTTONDOWN, MK_LBUTTON, MakeLong(P.x, P.y));
end;
end;

procedure TForm1.DBGrid1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept := (Source is TDBGrid) and (Source <> Sender) and
not TDBGrid(Source).DataSource.DataSet.Eof;
end;

procedure TForm1.DBGrid1DragDrop(Sender, Source: TObject; X, Y: Integer);
var
SourceDataSet, DestDataSet: TDataSet;
begin
SourceDataSet := TDBGrid(Source).DataSource.DataSet;
DestDataSet := TDBGrid(Sender).DataSource.DataSet;
DestDataSet.Append;
CopyMemory(DestDataSet.ActiveBuffer, SourceDataSet.ActiveBuffer, DestDataSet.RecordSize);
DestDataSet.Post;
SourceDataSet.Delete;
end;

procedure TForm1.DBGrid1StartDrag(Sender: TObject;
var DragObject: TDragObject);
begin
FixControlBug(Sender);
end;

Petr Vones, amatersky programator

Nacteni promenych DOS/WIN

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:32:42

From: Josef Zvonicek <prosoft(zv)prosoft(tec)cz>
>Jakym zpusobem se daji nacist vnitrni promene DOS/WIN.
>napr: v autoexec.bat mam SET ID=10 a chci si vratit tuto promenou a hodnotu do DELPHI.

Ahoj,

Napriklad takhle:

function GetEvnVar(const Name: String): String;
var
L: DWORD;
begin
L := GetEnvironmentVariable(PChar(Name), nil, 0);
SetString(Result, nil, L);
if GetEnvironmentVariable(PChar(Name), PChar(Result), L) <> L - 1 then
RaiseLastWin32Error;
end;

procedure GetEnvVarList(List: TStrings);
var
P, StartVar: PChar;
begin
P := GetEnvironmentStrings;
try
StartVar := P;
while StartVar^ <> #0 do
begin
List.Add(StartVar);
StartVar := StrEnd(StartVar) + 1;
end;
finally
FreeEnvironmentStrings(P);
end;
end;


Petr Vones, amatersky programator

Telefonovani pres modem

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:32:08

From: Petr <Mys(zv)post(tec)cz>
> Komponenty od TurboPower (demo) me v WNT nepodporovaly hlasove funkce.
> TAPI v NT samozrejme je, ale nejsou tam podporovany hlasove funkce.

Ahoj,

No jo, mas pravdu. Microsoft je teda pekne vykutaleny, v NT4 neni opravdu
podporovan Unimodem V, jak pravi v MSDN :-) Je treba si pockat na W2000.

Petr Vones, amatersky programator


Owner tabulky v D5 nemuze byt TDatabase

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:32:34

From: Stepan Cerny <chaosz(zv)atlas(tec)cz>
> V Delphi 3 (Professional) jsem pri vytvareni tabulek zadaval jako Ownera
> TDatabase (TTable.Create(TDatabase)).
> Ale v Delphi 5 (Professional) mi to pri vytvareni hazi chybu
> EAccessViolation - cteni z adresy FFFFFFFF :-))) / :-(

Ahoj,

Nebylo by lepsi jako Owner uvest datovy modul.

Petr Vones, amatersky programator

Volne misto na disku

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:33:39

From: Ji�� H�sek <HysekJ(zv)mail.spsuh.hiedu(tec)cz>
> mam takovy problem. Chci zjistit kolik mam volneho mista na disku.
> Kdyz pouzivam funkce diskfree a disksize, tak vse funguje bez
> problemu, pokud disk nema kapacitu vetsi jak 2GB. Nevite nekdo, jak
> to muzu udelat aby program zjistil volne misto a kapacitu disku vetsi
> nez 2GB? Jiri Hysek

Ahoj,

Nepises jakou mas verzi Delphi. Napriklad v D5 funkce DiskFree z SysUtils
vraci typ Int64, takze je to bez problemu. Od Win95 OSR2 vyse existuje API
funkce GetDiskFreeSpaceEx, ktera je prave v SysUtils dynamicky importovana.

Petr Vones, amatersky programator

Typ ukazatel - scitani, odcitani,...

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.1.2000 22:34:16

From: <kchodl(zv)email(tec)cz>
> Mam promenout typu ukazatel a potrebuju ji posunout o 4 bajty dale?

Ahoj,

Mas nekolik moznosti. Pokud bude offset vzdy 4 byty (Integer), tak muzes pouzit
typ PInteger (P1). Dale lze vyuzit pointerove aritmetiky pri pouziti typu PChar,
budto neprimo (P2) nebo tak, ze budes misto ukazatele na obecna data (Pointer)
pouzivat primo PChar (P3):

procedure TForm1.Button1Click(Sender: TObject);
var
P1: PInteger;
P2: Pointer;
P3: PChar;
begin
P1 := nil;
Inc(P1);

P2 := nil;
P2 := PChar(P2) + 4;
// nebo
Inc(PChar(P2), 4);

P3 := nil;
Inc(P3, 4);

ShowMessageFmt('%p %p %p', [P1, P2, Pointer(P3)]);
end;

Petr Vones, amatersky programator

C++ Builder 5 is here

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

Ahoj,

Tak tu mame novou verzi C++ Builderu:
http://www.borland.com/bcppbuilder/

Zajimave bude i tohle:
http://community.borland.com/article/0,1410,20633,00.html

Petr Vones, amatersky programator


Nahrada SYSUTILS

[*] lustyl1.edu(zv)mail.cez(tec)cz - 27.1.2000 00:17:05



Diky vsem za namety a abych vec uvedl na spravnou
miru,uvadim duvod pro zmenu: pri praci s DataTime promennou
nelze zobrazit datum mensi 1.1.0100 ja potrebuji pracovat
s roky mensimi nez 100. A nasel jsem ve funkci ScanDate, kterou
pouziva procedure StrToDate(), ktera provadi natvrdo if Datum
je mensi nebo rovno 99 then pricti aktualni stoleti. Rad bych
touto upravou ponechal vsechny datumove funkce i procedury
k dispozici pro praci s timto typem.
Napsat nove funkce do nove unity by byla dobra vec, ale asi
to nebude mozne, nebot je nutno zachovat typ TDateTime. Nebo
je mozne nejakym zpusobem predefinovat systemove funkce a procedury
se stejnym jmenem ?

Diky L.Lustyk z tovarny na elektricky proud


From: <lustyl1.edu(zv)mail.cez(tec)cz>
> potreboval bych upravit datumove funkce v SYSUTILS, ale pri kompilaci
> mi chybi prelozeny modul FFMT.OBJ, ktery je k dispozici jen v ASM.
> Poradi mi nekdo, jak spravne postupovat (zatim vidim jen cestu
> v nahrazeni knihovny pres ALIAS a rekompilaci upravene
> SYSUTILS s jinym jmenem). Jaky assembler. prekladac pouzit?

>Ahoj,

>upravy ve standartnich knihovnach Delphi bych nedoporucoval. Co ti tam
>presne vadi ? Neslo by to resit napsanim novych funkci do noveho unitu ?

>Petr Vones, amatersky programator

Nahrada SYSUTILS

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 27.1.2000 07:21:56

From: lustyl1.edu(zv)mail.cez(tec)cz

> Napsat nove funkce do nove unity by byla dobra vec, ale asi
> to nebude mozne, nebot je nutno zachovat typ TDateTime. Nebo
> je mozne nejakym zpusobem predefinovat systemove funkce a procedury
> se stejnym jmenem ?

Ahoj,

proste si to napis do jine unity a v pripade, ze ti
to bude kolidovat, tak pred nazev rutiny napises
unity. Napr.

MyDateRoutineUnit.DateToStr().....

Petr Motlicek


MSDE licencia

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 07:24:04

On 26 Jan 00, at 14:02, Marcant wrote:

> Myslim, ze to tu uz bolo predcasom spomenute ale pre istotu by som sa
> chcel este raz spytat, ake su podmienky na volne pouzivanie MSDE.

Je treba koupit MS Visual Xxxx ve vyssich variantach, nebo MS
Office Developer, nebo MSDN Universal.


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


Pouzivani komponent v nevizualni aplikaci.

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 07:24:04

On 26 Jan 00, at 15:59, Martin Bednar wrote:

> Jak muzu pouzivat komponenty treba TADOConnection v programu ktery
> nema GUI, je to jen konzolova aplikace nebo NT service ? Zkousel jsem
> cn:=TADOConnection.Create(nil); ale tohle nefunguje. Thanx

Pouzivej primo surove ADO, pokladam to pro tento pripad za
vyhodnejsi.


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


MSSQL bez BDE

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 07:24:04

On 26 Jan 00, at 9:47, Mal� Dobromil wrote:

> No, predpokladam, ze ano, ale berte to tak, ze na tuto
> oblast (a zcla urcite nejen na tuto :-) jsem absolutne
> tupej.
>
> Mam tedy jedno PC na kterem bezi MS SQL (nyni uz v7.0)
> a druhe PC, kde mam W95 (+DCOM5 +MDAC), D3prof. a
> pouziju naprikald Adonis komponentu ADODataSet.
>
> Co mam kam napsat (nebo kde co nastavit), abych
> se napojil na ten SQL server ?
>
> Pres ovladaci panely jsem si vytvoril ODBC DSN
> (pomoci toho pruvodce) a potom jsem se v Delphi
> jen na tento DSN napojil.

Neeeee! Kdyz se pripojujes pres ADO, vyhledej si provider pro SQL
Server a pripoj se pres nej. Urcite ne pres ODBC.


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


Nova verze KonfView

[*] Pavel Junek <junek(zv)hrk.pvtnet(tec)cz> - 27.1.2000 08:07:00

Nemohlo by to souviset s verzi BDE? Zkousel jsi nejake pokusy s ruznymi
verzemi?

Mne to funguje dobre (soubory Delphi - nepamatuju si to presne, ale bylo to
neco kolem 28000 zaznamu) - W95,BDE z D5 Prof.

Pavel

> Neopravene chyby:
> Na nekterych pocitacich (zatim zjisteno na Win NT 4 (SP 5), IDAPI
> verze 4.0) po nacteni asi tak 5000 zaznamu nastane chyba:
> Some internal limit (see context)
> Table: C:\....\XX.MB
> Po dosazeni tohoto limitu se do tabulky neda narvat vice zaznamu (ani
> z jineho souboru). Zatim netusim jak to opravit (zkousel jsem zvysit
> nektere hodnoty v BDE Administratorovi, ale bez uspechu (BlockSize,
> MaxBufSize, SharedMemSize)).
> Takze pokud mi chcete pomoci, napiste mi, na jakem systemu pouzivate
> KonfView a zda je OK, nebo hlasi tento limit. Snad z techto udaju
> vypozoruji na cem to zavisi -- predem diky.
>
>

Problemy s prosredim Delphi 5

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

Mam tu nekolik problemu s Delphi 5, mozna ze uz je nekdo vyresil, obesel.
Prosim o radu:

1. Pracuje nas vice na jednom programu, soucasne. Kazdy ma svuj projekt,
ktery obsahuje skoro vsechny formulare, ty ktere neobsahuje jsou v
nacestovanych adresarich. Nekdy se mi stane, ze mi delphi neumozni ulozit
formular s tim ze nemuze prepsat soubor ~pas. Nikdo z kolegu ho pri tom nema
otevreny, jen ma otevreny svuj odpovidajici projekt. Kdyz ukonci svoje
Delphi, je vse v poradku. Data mame na serveru WIN NT 4.0 SP5. Nevite cim by
to mohlo byt, a co s tim. Nekdy nas to selkem brzdi v praci

2.Mam projekt vyuzivajici technologii MIDAS. Prevedl jsem ho z Delphi 3 do
Delphi 5. Vse funguje dobre az na to, ze kdyz udelam nejakou akci na
serveru (pridani modulu, pridani metody do TLB), delphi zacne otevirat,
vsechny moduly serveru. Proc to dela (potvurka podivna)? Mam nekde chybu?
Jak se s tim vyrovnat?

Telefonovani pres modem

[*] Petr <Mys(zv)post(tec)cz> - 27.1.2000 08:17:22


> From: Petr
> > Komponenty od TurboPower (demo) me v WNT nepodporovaly hlasove funkce.
> > TAPI v NT samozrejme je, ale nejsou tam podporovany hlasove funkce.
>
> Ahoj,
>
> No jo, mas pravdu. Microsoft je teda pekne vykutaleny, v NT4 neni opravdu
> podporovan Unimodem V, jak pravi v MSDN :-) Je treba si pockat na W2000.
>
> Petr Vones, amatersky programator
>

Ale program dodavany s modemem to umi. Nevite tedy jak to delaji?

MSDE licencia

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 27.1.2000 08:38:13

V poriadku, ale nie je tu podmienkou, ze musim pouzivat MSDE iba pomocou
tychto programov od MS (teda napriklad uz nie pomocou Delphi) ? A ak ano,
ako by to bolo, keby sa na pristup k MSDE pouzila moja DLL napisana v MS
VC++, ale tato DLL by sa zasa pouzila v Delphi ?

----- Original Message -----
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 27, 2000 7:24 AM
Subject: Re: MSDE licencia


> On 26 Jan 00, at 14:02, Marcant wrote:
>
> > Myslim, ze to tu uz bolo predcasom spomenute ale pre istotu by som sa
> > chcel este raz spytat, ake su podmienky na volne pouzivanie MSDE.
>
> Je treba koupit MS Visual Xxxx ve vyssich variantach, nebo MS
> Office Developer, nebo MSDN Universal.
>

BPL - "Application is not licensed to use this fea

[*] Rjanus <janus(zv)foresta(tec)cz> - 27.1.2000 08:48:44

Hi ,
potreboval bych poradit --
mam balicek BPL -(delphi 4, je to pouze jedna unita bez formulare) a z neho
volam proceduru.
vse ptrobehne v poradku , pokud vsak zkousim otevrit v teto procedure tabuku
zahlasi to
"Application is not licensed to use this feature"
mohl by mi nekdo poradit co s tim ?

Diky moc
Radek Janu�
janus(zv)foresta(tec)cz

Pouzivani komponent v nevizualni aplikaci.

[*] Martin Bednar <bednar(zv)ova.cpress(tec)cz> - 27.1.2000 08:51:22

Jak ?
Muzes mi o tom napsat podrobneji ?
Diky

-----Original Message-----
From: Zbysek Hlinka [mailto:zhlinka(zv)login(tec)cz]
Sent: Thursday, January 27, 2000 7:24 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Pouzivani komponent v nevizualni aplikaci.


On 26 Jan 00, at 15:59, Martin Bednar wrote:

> Jak muzu pouzivat komponenty treba TADOConnection v programu ktery
> nema GUI, je to jen konzolova aplikace nebo NT service ? Zkousel jsem
> cn:=TADOConnection.Create(nil); ale tohle nefunguje. Thanx

Pouzivej primo surove ADO, pokladam to pro tento pripad za
vyhodnejsi.


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


Vykon SQL

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 27.1.2000 08:58:44

Ahoj,

zalezi na tom jak casto budes potrebovat vedet celkovy stav na skladu.
Pokud casto (napr. uzivatel bude videt v zahlavi karty akt. stav), tak aby
sis vzhledem k mnozstvi dat udrzoval i akt. stav na skladu. Integritu dat
zajistis
pomoci triggeru.
Pokud bys potreboval vedet akt. stav jen velmi zridka (napr. jen pri rocni
zaverce)
tak bych doporucoval si jej vypocitat az podle potreby.

Na 99% Te zajima spis pripad jedna - tedy udrzovany akt. stav.

S pozdravem, Ladislav Nagy


> Hi,
>
> Mam dotaz mel bych neco jako sklad. a mam takojem malej dotaz.
> Pouzity SQL server Interbase 4.0 Linux.
>
> Nemel bych vubec tabulku se stavy na skladu, ale jen tabulku
> pohybu a tabulka karty ( i se stavy ) byla View s pouzitim calc sum
> na pohyby.
> Pripada mi to skvele pro odstraneni problemu s konzistenci, ktere
> jsem mel na souborove databazi, ale mam strach z vykonu.
> Muze byt klidne 500.000 tisic pohybu za rok. Pak se to vyprazdni
> a nahradi pro kazdou kartu jednim prijmem.
>
> Dekuji za nazory.
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Cerneho 58/60, 635 00
> tlf. : + 420 5 4622 3491
> fax : + 420 5 4622 3470
> GSM : + 420 603 85 75 15


casopis Delphi informant.

[*] Marcel Langr <ivar(zv)ivar(tec)cz> - 27.1.2000 09:01:29

> From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> > Kde zozeniem casopis Delphi informant ?

Odebiram ho pres Starman Bohemia ke sve plne spokojenosti jiz nekolik let

www.starman.net

Marcel Langr
mlangr(zv)ivar(tec)cz

Jakou DB zvolit?

[*] Tomas Vesely <veselyt(zv)bigfoot(tec)com> - 27.1.2000 09:11:21

Ahoj vsem,

chtel jsem se zeptat nezli sahnu po necem a pak to budu predelavat do jine
db (asi to vsichni zname).

Potreboval bych asi takovou db. Pristup 5 uzivatelu soucasne, pocet polozek
cca
1 000 000. Nejdulezitejsi je vsak aby DB umela radit jeden klic podle
jednoho jazyka a dalsi dle jineho. Tech 5 mozna 7 uzivatelu do toho bude ale
busit porad. Dalsi pozadavek aby mela pole na kterych se to vse odehrava
vetsi nez 255 delku (samozrejme indexy na nich atd).

Doufam ze nejsou me pozadavky moc "out of order".

Diky za jakekoli namety.

Tomas


Nova verze KonfView

[*] Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz> - 27.1.2000 09:46:39

Tak jsem se tesil, rychle jsem stahnul novou verzi, zkusil jsem to

aaaaaaaaa

je tam znova 'Invalid parameter'

NT WKST 4.0, SP 5, BDE 5.10

Udelal jsem novou databazi
Veliky archiv DELPHI.TXT se nepodarilo nacist (konec pri 1532 zprave)
udelal jsem novou databazi
Archiv RIJEN.TXT bez problemu.
Archiv LISTOPAD.TXT pridavan k rijen.txt, chyba po 1522 zprave.
udelal jsem novou databazi
Archiv LISTOPAD.TXT pridavan k rijen.txt, chyba po 1531 zprave.

S pozdravem Zdenek Sraier

o__o E-mail: sraierzd(zv)email(tec)cz HTTP://www.byll(tec)cz/scuba/zdenek/
( o o) -----------------------------------------------------------
(. .) Strany Potapecske (SP) HTTP://www.byll(tec)cz/scuba/

----- Original Message -----
From: Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 26, 2000 9:57 PM
Subject: Nova verze KonfView


> Takze uz je to tady....nova verze KONFVIEW.
> Naleznete ji jako vzdy na adrese:
> http://atrey.karlin.mff.cuni(tec)cz/~bla/konfview.shtml
>
> Par podrobnosti o teto verzi:
>
> Opravene chyby:
> - Pri scrolovani pomoci scrollbaru se obcas zjevila chybova hlaska
> ,,List index out of Bounds''
> - Pri nacitani dlouhe zpravy se na nekterych pocitacich objevila
> chyba ,,Invalid parameter''
> - Nekdy se po vyhledani nezobrazily vsechny zaznamy (obvzlaste
> pokud se tridilo podle subjectu)
>
> Neopravene chyby:
> Na nekterych pocitacich (zatim zjisteno na Win NT 4 (SP 5), IDAPI
> verze 4.0) po nacteni asi tak 5000 zaznamu nastane chyba:
> Some internal limit (see context)
> Table: C:\....\XX.MB
> Po dosazeni tohoto limitu se do tabulky neda narvat vice zaznamu (ani
> z jineho souboru). Zatim netusim jak to opravit (zkousel jsem zvysit
> nektere hodnoty v BDE Administratorovi, ale bez uspechu (BlockSize,
> MaxBufSize, SharedMemSize)).
> Takze pokud mi chcete pomoci, napiste mi, na jakem systemu pouzivate
> KonfView a zda je OK, nebo hlasi tento limit. Snad z techto udaju
> vypozoruji na cem to zavisi -- predem diky.
>
> Vylepseni:
> - Nove si pamatuje 4 drive otevrene soubory (v menu Soubor).
> - Oddeleni nekterych nastaveni zavislych na aktualni otevrene
> databazi - nyni jsou tato nastaveni zapsana v ini souboru, ktery se
> jmenuje stejne jako databaze a je ulozen na stejnem miste jako
> aktualni INI soubor cele aplikace.
> V tomto souboru je ulozeno:
> - Historie vyhledavani (hledana slova)
> - Zalozky do teto databaze
> - Komentare o plneni databaze (podrobnosti viz nasledujici bod)
>
> - Informace o plneni databaze
> - Casto jsem horkotezko premyslel, zda jsou v databazi data z
> urciteho mesice, nebo ne a musel jsem si to overovat listovanim. Nyni
> uz pocitac automaticky zaznamenava plneni databaze a zapisuje to do
> ini souboru teto databaze. V tomto logu jsou nasledujici informace:
> - Datum vytvoreni DB
> - Ze ktereho souboru se pridavaly data
> - Kolik bylo predtim v DB zaznamu
> - Pocet zaznamu po nacteni dalsich dat
> - Celkem pridanych zaznamu
> - Pocet zpracovanych radku
> - ID, Subject a Autor posledniho zaznamu pred pridavanim a po
> nem Uzivateluv komentar k pridavanym datum, ktery muze uzivatel zadat
> pri nacitani do DB.
> Samozrejme pokud do databaze znovu nactete jiz drive nacteny soubor,
> nic se do ni nezapise, nebot kontroluje duplicitu zaznamu.
> - Pohyb v gridu byl vylepsen dvema klavesovymi zkratkami:
> ALT+NAHORU a ALT+DOLU pro scrolovani prispevku v RichEditu na prave
> strane
> - Obdobne v RichEditu pribyly zkratky ALT+NAHORU a ALT+DOLU pro
> skok na predchozi/dalsi zaznam v databazi
> - Pro zjednoduseni opakovaneho vyhledavani jsou tu dve polozky (v
> menu Soubor pripadne na tlcitkove liste), ktere ukladaji IDecka
> vybranych zaznamu do souboru a zpetne jej nacitaji. Takze kdyz si na
> pomale masine po peti minutach usilovneho chroupani disku neco
> vyhledate, muzete si tento vyber ulozit a pozdeji znovu nacist bez
> opetovneho prolezani celou databazi.
> - Pribyla zvyraznena syntaxe hledanych slov (v Nastaveni lze
> samozrejme vypnout)
> - Pri najeti mysi nad odkaz (http nebo ftp adresa) se zmeni
> ukazatel a po kliknuti se spusti prohlizec s danou adresou. V takovem
> pripade navic v popup menu pribude moznost zkopirovat adresu do
> clipboardu.
> - Pridana moznost vyhledavat slovicka v aktualnim (CTRL+F3), a
> dalsich (F3) prispevcich bez nutnosti hledani v cele DB (CTRL+F)
>
> Pristi verze bude mozna obsahovat:
> Editace a mazani prispevku (snad....uz...konecne....)
>
> Petr
>
>
> ,=====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )===--- -- - -
> --=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
> `======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
> `======----( read: http://www.swnet(tec)cz )=-- -- -


Skript pre MSSQL

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 27.1.2000 09:58:19

A mohl by jsi mi priblizit co myslis tou "celou skalou prikazov jazyka
Tansact-SQL, ktor� podporuje MSSQL 7.0" ?
Ja az do tedka zil v tom, ze pres adoquery lze pustit jakykoliv prikaz
T-SQL.

Navic, jak se domnivam (po kratkem nahlednuti do dokumentace), je utilita
OSQL urcena pro volani davek na SQL z ruznych command-line skriptu a tedy
pro noramlni pouziti v Delphi programu nevhodne.

Jinak informace o utilite OSQL zjistis v SQL Server Books OnLine.
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Miroslav Hro��o
Sent: Wednesday, January 26, 2000 10:44 AM
To: DELPHI - L
Subject: Skript pre MSSQL


Dobr� de�,

Chcem sa op�ta� ako sa d� zisti� �i skript poslan� cez program OSQL (ktor�
je s��as�ou MSSQL servera 7.0). Viem posla� pr�kazy cez ADOQuery, ale tento
mi neposta�uje a chcel by som vyu�i� cel� �k�lu pr�kazov jazyka Tansact-SQL,
ktor� podporuje MSSQL 7.0.

Zatia� som zistil ako sa daj� posiela� tieto skripty pomocou OSQL.EXE, ale
neviem zisti� �i sa vykonali alebo nie.
Pros�m V�s poradte mi ako posla� tieto skripty cez OSQL s sp�tnou
kontrolou, alebo �i sa to ned� posiela� in�m sp�sobom a aj so sp�tnou
kontrolou.


Miro.

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


Batchmove, paradox tabullky a problem...

[*] Vladimir Ponechal <Vladimir_Ponechal(zv)tesco-europe(tec)com> - 27.1.2000 10:01:19

Preji hezky den,

mam nasledujici problem. Snazim se za pomoci Batchmove prevest z paradox7
tabulek data do jinych tabulek, ktere maji slouzit pro docasne odkladani
dat. Pouzivam pritom mod batAppend, tudiz tabulky nemusi byt indexovane.
Jenze me se stava zajimava vec. Kdyz to necham prevest z 99 procent se
stane, ze posledni dve vety z tabulky, kterou prevadim se zobrazi dvakrat v
nove vytvorene. Nejdriv jsem si myslel, ze je nejak divne korupnuta
databaze, ale potom jsem zjistitl, ze mi to dela u vsech tabulek a je jich
asi 12. Zajimave jeste je, ze kdyz mazu polozky v tabulce tak s treti od
konce, to znamena z 'normalne' posledni polozkou se najednou smazou i ty
dve nove. Uz me nejak nenapada, cim by to mohlo byt... A co vy nenapada vas
neco??? Diky...

Mam D3 prof.

Vladap

Trace tool pro ASE11.2.9

[*] Radek Pospisil <radek.pospisil(zv)sprinx(tec)cz> - 27.1.2000 10:28:09

Preji vsem hezky den,

Muze mi nekdo prosim poradit jakykoliv traceovaci nastroj pro Sybase ASE 11
? Potreboval bych zachytit vsechny SQL prikazy od vybraneho spojeni. SQL
Monitor z Delphi neni to prave, protoze neumi chytat klienty,kteri nejedou
pres BDE. Tracovani pres samotny server (dbcc traceon...) umi jen 512 znaku
a to je malo.

predem diky,

R.Pospisil


BPL - "Application is not licensed to use this fea

[*] Rjanus <janus(zv)foresta(tec)cz> - 27.1.2000 10:34:23

Hi ,
potreboval bych poradit --
mam balicek BPL -(delphi 4, je to pouze jedna unita bez formulare) a z neho
volam proceduru.
vse ptrobehne v poradku , pokud vsak zkousim otevrit v teto procedure tabuku
zahlasi to
"Application is not licensed to use this feature"
mohl by mi nekdo poradit co s tim ?

Diky moc
Radek Janu�
janus(zv)foresta(tec)cz

Jakou DB zvolit?

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 27.1.2000 10:38:59

Haj hou!

From: Tomas Vesely <veselyt(zv)bigfoot.com>
> Potreboval bych asi takovou db. Pristup 5 uzivatelu soucasne, pocet
polozek
> cca
> 1 000 000. Nejdulezitejsi je vsak aby DB umela radit jeden klic podle
> jednoho jazyka a dalsi dle jineho. Tech 5 mozna 7 uzivatelu do toho bude
ale
> busit porad. Dalsi pozadavek aby mela pole na kterych se to vse odehrava
> vetsi nez 255 delku (samozrejme indexy na nich atd).

Odpovedi je InterBase :o)

Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


Problemy s prosredim Delphi 5

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 27.1.2000 10:43:06

Haj hou!

From: CERMAK <CERMAK(zv)procomcr(tec)cz>
>
> 1. Pracuje nas vice na jednom programu, soucasne. Kazdy ma svuj projekt,
> ktery obsahuje skoro vsechny formulare, ty ktere neobsahuje jsou v
> nacestovanych adresarich. Nekdy se mi stane, ze mi delphi neumozni ulozit
> formular s tim ze nemuze prepsat soubor ~pas. Nikdo z kolegu ho pri tom
nema
> otevreny, jen ma otevreny svuj odpovidajici projekt. Kdyz ukonci svoje
> Delphi, je vse v poradku. Data mame na serveru WIN NT 4.0 SP5. Nevite cim
by
> to mohlo byt, a co s tim. Nekdy nas to selkem brzdi v praci

Mno nevim, ale tymova prace se vetsinou dela trochu jinak. Kazdy ma vlastni
uplny strom zdroju na lokalnim disku, nic se nikde nesdili. Synchronizace se
pak dela pres nejaky VCS.


Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


Gener�tor sestav pro DELPHI 16

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 27.1.2000 11:11:13

Marek Hejl <mhejl(zv)vyko(tec)cz> wrote:

> Do relativn� obs�hl� aplikace jsem zakompiloval
> novou verzi gener�toru 16bit ( kv�li WRITETOFILE )
> a od t� doby mi aplikace po chv�li provozu ve WIN 3.11
> za�ne h�zet chybu CANNOT CREATE WINDOW .


Ach jo, to je zase dotaz :-(((( To se ma tykat D1?

Jestli ano, tak chyba CANNOT CREATE WINDOW je nejcasteji dusledkem pretekani lokalniho heapu, ktery se musi spolu se stackem a statickymi promennymi vejit do 64K data segmentu. Pro dalsi info se podivej se do helpu na popis direktivy $M.

Zkus lokalni heap zvetsit. Ja jsem se u hodne velke aplikace ustalil na hodnotach {$M $7000,$5000}.


bye pf, Petr.Fejfar(zv)callnet(tec)cz

MSSQL bez BDE

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 27.1.2000 11:19:34

Panenko skakava, ja jsem ale vuuul...
Koncim s programovanim a jdu prodavat
ty burty...

Me tam vzdycky rovnou skocil ten ovladac
pro ODBC a me nenapadlo se prepnout na
tu prvni zalozku a tam to zmenit...

Diky...
...Dobra.> ----------
> Od: Zbysek Hlinka[SMTP:zhlinka(zv)login(tec)cz]
>
> On 26 Jan 00, at 9:47, Mal> � Dobromil wrote:
>
> > Pres ovladaci panely jsem si vytvoril ODBC DSN...
>
> Neeeee! Kdyz se pripojujes pres ADO, vyhledej si provider pro SQL
> Server a pripoj se pres nej. Urcite ne pres ODBC.
>

Nahrada SYSUTILS

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 11:31:16

On 26 Jan 00, at 22:31, Petr Vones wrote:

> V krabici s Delphi 5 je i CD s C++ Builderem 3. Jeho soucasti je TASM,
> nevim ted presne ale jaka verze.

Dival jsem se na CD, a TASM tam neni samostatne. Jestli je
zabudovan natvrdo v Builderu, jsem nezkoumal.


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


Batchmove, paradox tabullky a problem...

[*] Pavel Junek <junek(zv)hrk.pvtnet(tec)cz> - 27.1.2000 11:31:00

Ahoj,

a ty recordy tam jsou opravdu pridane (podivej se pres nejaky db explorer)?
Tusim, ze to byl problem se zobrazenim dat v gridu. Data fyzicky v tabulce
nebyla, ale grid to spatne zobrazil.

Pavel

>Kdyz to necham prevest z 99
> procent se
> stane, ze posledni dve vety z tabulky, kterou prevadim se
> zobrazi dvakrat v
> nove vytvorene. Nejdriv jsem si myslel, ze je nejak divne korupnuta
> databaze, ale potom jsem zjistitl, ze mi to dela u vsech
> tabulek a je jich
> asi 12. Zajimave jeste je, ze kdyz mazu polozky v tabulce tak
> s treti od
> konce, to znamena z 'normalne' posledni polozkou se najednou
> smazou i ty
> dve nove.
>
> Mam D3 prof.
>
> Vladap
>
>
>
>

Problemy s prosredim Delphi 5

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 27.1.2000 11:46:04



> -----P�vodn� zpr�va-----
> Od: CERMAK [mailto:CERMAK(zv)procomcr(tec)cz]
> Odesl�no: 27. ledna 2000 8:14
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Problemy s prosredim Delphi 5
>
>
> Mam tu nekolik problemu s Delphi 5, mozna ze uz je nekdo
> vyresil, obesel.
> Prosim o radu:
>
> 1. Pracuje nas vice na jednom programu, soucasne. Kazdy ma
> svuj projekt,
> ktery obsahuje skoro vsechny formulare, ty ktere neobsahuje jsou v
> nacestovanych adresarich. Nekdy se mi stane, ze mi delphi
> neumozni ulozit
> formular s tim ze nemuze prepsat soubor ~pas. Nikdo z kolegu
> ho pri tom nema
> otevreny,

Tipl bych si, ze ten soubor nekdo otevreny ma.
Treba ho ma jen pro cteni a mysli, ze to nevadi?
Nebo ho oteviralo neci Delphi behem kompilace a ty ses trefil?

Ale jinak - ten pristup k tymove praci se mi zda prinejmensim
nepromysleny. Bud pouzivejte nejaky VCS nebo si stejnou praci
delejte za zvysene naklady sami, ale nikdy by nikdo nemel
editovat veci umistene ve sdilene lokalite.
Jak zacnes vyvijet novou verzi teto sdilene veci?
Co kdyz ulozis nezkompilovatelny soubor, ve kterem jsou chyby?
Anebo provedes takove zmeny, se kterymi ostatni casti projektu
nepocitaji?
Znemoznis vsem clenum tymu testovat projekt.
Takze - urcite casti projektu mohou byt sdilene,
editovat by se ale mely lokalne.

Jak psal Pavel Cisar, hodne VCS ukladaji vsechno lokalne
a az po odladeni to programatori prenasi do sdilenych lokalit.
Jsou i jine VCS, ktere pouzivaji casti projektu sdilene,
ale upravy libovolne casti projektu se provadi na lokale.
Nesetkal jsem se jeste s zadnym jinym pristupem a myslim,
ze to je zakladni pravidlo - nesmis nic upravovat ve sdilene lokalite.

Jura


MSDAC a DCOM95 (WAS: MSSQL bez BDE)

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 27.1.2000 12:20:37

Jeste bych se rad zeptal, jak bezpecne
detekovat, zda je MSDAC a DCOM95 jiz
nainstalovan ?

Abych podle toho povolil/zakazal
tlacitka v instalacnim programu.

Diky...
...Dobra


Seznam tabulek na InterBase a zamykani tabulek

[*] Petr Fischer <petr.fischer.dk(zv)email(tec)cz> - 27.1.2000 12:53:30

Zdravim,

1) lze na InterBase ziskat seznam vsech tabulek??? Jsou tam vsechny mozne
systemove tabulky (napr: RDB$FIELDS, RDB$INDICES), ale nic jako RDB$TABLES
tam neni.

2) lze uzamknout tabulku na InterBase a jak?

Win2000, Interbase 4 (Linux)

Petr Fischer
E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715


Skript pre MSSQL

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 27.1.2000 12:55:57

Pres TQuery (a urcite i pres TADOQuery) jde poslat jakykoli prikaz SQL, mas
tedy k dispozci celou skalu prikazu jazyka Transact-SQL. Jediny problem
muze nastat, pokud chces provadet skript, ktery vyuziva GO. Ten musis
rozdelit na jednotlive prikazy vzdy po GO a tyto prikazy vykonavat
samostatne.

-----P�vodn� zpr�va-----
Od: Miroslav Hro��o [SMTP:hrossik(zv)atlas(tec)cz]
Odesl�no: 26. ledna 2000 10:44
Komu: DELPHI - L
P�edm�t: Skript pre MSSQL

Dobr� de�,

Chcem sa op�ta� ako sa d� zisti� �i skript poslan� cez program OSQL (ktor�
je s��as�ou MSSQL servera 7.0). Viem posla� pr�kazy cez ADOQuery, ale tento
mi neposta�uje a chcel by som vyu�i� cel� �k�lu pr�kazov jazyka
Tansact-SQL, ktor� podporuje MSSQL 7.0.

Zatia� som zistil ako sa daj� posiela� tieto skripty pomocou OSQL.EXE, ale
neviem zisti� �i sa vykonali alebo nie.
Pros�m V�s poradte mi ako posla� tieto skripty cez OSQL s sp�tnou
kontrolou, alebo �i sa to ned� posiela� in�m sp�sobom a aj so sp�tnou
kontrolou.


Miro. <<Soubor: ATT00012.htm>>

Vykon SQL

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 27.1.2000 12:57:59

Nedoporucuji toto reseni. Radeji si pohlidej integritu pres transakce ...

-----P�vodn� zpr�va-----
Od: Radek KALA [SMTP:Kala(zv)atlas(tec)cz]
Odesl�no: 26. ledna 2000 13:35
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Vykon SQL

Hi,

Mam dotaz mel bych neco jako sklad. a mam takojem malej dotaz.
Pouzity SQL server Interbase 4.0 Linux.

Nemel bych vubec tabulku se stavy na skladu, ale jen tabulku
pohybu a tabulka karty ( i se stavy ) byla View s pouzitim calc sum
na pohyby.
Pripada mi to skvele pro odstraneni problemu s konzistenci, ktere
jsem mel na souborove databazi, ale mam strach z vykonu.
Muze byt klidne 500.000 tisic pohybu za rok. Pak se to vyprazdni
a nahradi pro kazdou kartu jednim prijmem.

Dekuji za nazory.

S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

pripojeni mobilu k PC - ovladani mobilu

[*] Pavel �imek <kejchal(zv)volny(tec)cz> - 27.1.2000 13:13:57

Ahoj delfini,

nema nekdo zkusenost s pripojenim mobilniho telefonu (nevim ani jaky typ) k
PC a moznosti zasilat pres tento mobil SMS zpravy na jine mobily?

S pozdravem Kejchal


ovladani UPS

[*] Pavel �imek <kejchal(zv)volny(tec)cz> - 27.1.2000 13:15:14

Ahoj delfini,

hazim do placu jeste jeden dotaz -

ovladani UPS z D3. Nevite nekdo o necem ?

Kejchal


BPL - "Application is not licensed to use this fea

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 27.1.2000 13:16:49

From: "Rjanus" <janus(zv)foresta(tec)cz>

> potreboval bych poradit --
> mam balicek BPL -(delphi 4, je to pouze jedna unita bez formulare) a z neho
> volam proceduru.
> vse ptrobehne v poradku , pokud vsak zkousim otevrit v teto procedure tabuku
> zahlasi to
> "Application is not licensed to use this feature"
> mohl by mi nekdo poradit co s tim ?

...zaregistruj ci kup si to :-)

Petr Motlicek


Tisk do grafic. souboru

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 27.1.2000 13:24:08

Potreboval bych z Delphi + QReportu tisknout do grafickeho souboru
t.j. bmp, jpg, atd. Chtel bych treba vytisknout fakturu (tak jak to delam
nyni) ale aby mi to vytvorilo soubor, ktery muzu poslat treba mailem.

Tusi nekdo kudy na to ?

Pavel

BDE error

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 27.1.2000 13:25:25

Zdravim a jsem tu opet s malym problemkem :

U jednoho zakaznika se mi p�i pokusu o vytvo�en� tabulky a nastaven� LANGUAGE projev� chyba
s n�sleduj�c� hl�kou :

EDBEngineError
k�d 1108
text Not exact read/write

Podotykam, ze ma na disku 13 GB volneho prostoru.


D3, W95, PARADOX 7, BDE 5.1

Diky za pomoc nebo nakopnuti

Martin

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

Seznam tabulek na InterBase a zamykani tabulek

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 27.1.2000 13:41:59

Haj hou!

From: Petr Fischer <petr.fischer.dk(zv)email(tec)cz>
> 1) lze na InterBase ziskat seznam vsech tabulek??? Jsou tam vsechny mozne
> systemove tabulky (napr: RDB$FIELDS, RDB$INDICES), ale nic jako RDB$TABLES
> tam neni.

V relacni databazi nejsou tabulky, ale relace :o) Prislusna tabulka se tedy
jmenuje RDB$RELATIONS :o))))))

> 2) lze uzamknout tabulku na InterBase a jak?

Uff, nikde jsem o takove moznosti nenasel ani zminku. Ale mohu se prirozene
mylit.

Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


pripojeni mobilu k PC - ovladani mobilu

[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 27.1.2000 14:03:32

Ahoj,
ja jsem si trochu hral s NOKIA 5110 a NCDS. Po instalaci Ti pribudou v
PC dalsi dva modemy. Pro praci se SMS to obsahuje rozsireni AT
prikazu. Myslim, ze tudy by to urcite slo.

Vaclav Sazima

Pavel �imek wrote:
>
> Ahoj delfini,
>
> nema nekdo zkusenost s pripojenim mobilniho telefonu (nevim ani jaky typ) k
> PC a moznosti zasilat pres tento mobil SMS zpravy na jine mobily?
>
> S pozdravem Kejchal


ovladani UPS

[*] Petr BRABEC <elra(zv)telecom(tec)cz> - 27.1.2000 14:26:29

K jake UPS? Ona neni UPS jako UPS
Petr BRABEC

-----P�vodn� zpr�va-----
Od: Pavel �imek <kejchal(zv)volny(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 27. ledna 2000 13:18
P�edm�t: ovladani UPS


>Ahoj delfini,
>
>hazim do placu jeste jeden dotaz -
>
>ovladani UPS z D3. Nevite nekdo o necem ?
>
>Kejchal
>

TStringGrid

[*] Petr Vale� - 27.1.2000 14:36:25

Ahoj vsem,


prosim Vas o radu. Ve sve aplikaci vyttvorene pod C++ Builder 4.0 Ent. se mi
dosti casto stava, ze kdyz se snazim otevrit jeden dialog (Form->Show()),
kde je obsazeno cca 8 StringGridu, hlasi mi chybu "Win32 API function
failed". Uz pred davnem jsem se zde na konferneci na toto tema ptal, ale
bohuzel mi nikdo nedokazal poradit. Vzhledem k tomu, ze projekt je jiz
rozebehnut a toto zjisteni je pro nas fatalni, volal jsem i na support
Inprise, ale zde mi bylo sdeleno, ze se o tomto vi a ze TStringGrid v sobe
obsahuje chyby. Ale kdy to bude vyreseno to nikdo nevi.

Pro Vas prosim, jestli nahodou nekdo nevite o podobne komponente, ktera
funguje a ktera ma alespon trochu podobne vlastnosti jako TStringGrid
kvuli prepsani kodu ).

S pozdravem

Petr Vales


Skript pre MSSQL

[*] Miroslav Hro��o�����,�(�j�Z��3 - 27.1.2000 14:49:28

M�m na mysli prikazy typu :

While ... do ...
If ... then ... else ...
Case ... of ...
Begin ... end

Tieto �tukt�ry neviem posla� cez ADOQuery.

Ja by som potreboval vlatne vedie� vysledok programu OSQL, a to tipu TRUE alebo FALSE.

Miro.


-----P�vodn� spr�va-----
Od: Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 27. janu�r 2000 10:59
Predmet: RE: Skript pre MSSQL


A mohl by jsi mi priblizit co myslis tou "celou skalou prikazov jazyka Tansact-SQL, ktor� podporuje MSSQL 7.0" ?
Ja az do tedka zil v tom, ze pres adoquery lze pustit jakykoliv prikaz T-SQL.

Navic, jak se domnivam (po kratkem nahlednuti do dokumentace), je utilita OSQL urcena pro volani davek na SQL z ruznych command-line skriptu a tedy pro noramlni pouziti v Delphi programu nevhodne.

Jinak informace o utilite OSQL zjistis v SQL Server Books OnLine.
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

Zvuk

[*] Marek Robert <robert.marek(zv)vsp(tec)cz> - 27.1.2000 15:09:29

Cau lidi.
Jsem tu v konferenci novy, proto nevim, jestli toto tema tady nahodou
nebezi.
Nemate n�kdo zkusenosti s praci se soubory WAV v Delphi ? Interni help o
praci se zvukem mlci a
komponenta MediaPlayer slouzi jen k praci se zvukovym CD,
Diky
Robin


OT: Word dokument

[*] Michal Hlav�� - 27.1.2000 15:23:36

Zdravim,
sorry za OffTopic, ale mam jeden velky problem. mame wordowsky file s
dolezitymi datami a nejde otvorit. Chyba pri otvoreni suboru. Pritom
kopirovat, prezerat a editovat ide. Pravdepodobne hlavicka suboru. Neviem
co mam robit.

Vdaka Miso


BDE

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 27.1.2000 15:26:52

Zdravim a mam jeden dotaz,

da se nejak urychlit interval pro aktualizaci dat na sitovych stanicich.

Problem se ma tak :

Mam sitovou PARADOX tabulku se sitovym NETDIRem a na jedne stanici provedu zmenu v teto tabulce
Soucasne pripojena stanice vsak tuto zmenu zaregistruje az po nejake dobe ( cca 3-4 min).

Lze to tedy nejak urychlit nebo prinutit k okamzite reakci?

D3 Profi, PARADOX, BDE 5.1, Win 9x

Diky za napovedu.

Martin

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================

VG VCL Library

[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 27.1.2000 15:40:25

Ahojte,
mel bych takovy otevreny dotaz. Po nekolika zminkach v konferenci o VG VCL
Library jsem na tyto knihovny kouknul a shledal je docela zajimavymi.
Chtel bych se vas zeptat, jake s ni mate zkusenosti, pouzivat/nepouzivat,
co je tam vlastne hodne zajimave a pouzitelne, a tak...
dik
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano


Nova verze KonfView

[*] Jiri Kozubik <jiri_k(zv)mrp(tec)cz> - 27.1.2000 16:00:07

Stejne problemy jako Zdenek, tedy Invalid parametr,
pri 1532 zprave z DELPHI.TXT
Konfigurace W98 4.10.1998, BDE 5.01

Jirka

> Udelal jsem novou databazi
> Veliky archiv DELPHI.TXT se nepodarilo nacist (konec pri 1532 zprave)
> udelal jsem novou databazi
> Archiv RIJEN.TXT bez problemu.
> Archiv LISTOPAD.TXT pridavan k rijen.txt, chyba po 1522 zprave.
> udelal jsem novou databazi
> Archiv LISTOPAD.TXT pridavan k rijen.txt, chyba po 1531 zprave.
>
> S pozdravem Zdenek Sraier

Nastaveni palety

[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 27.1.2000 16:35:11

Zdravim !!!
V Pascalu (myslim DOSovskej) sem si udelal programek, kterej umi otevirat PCX obrazky. Pak jsem si rekl, ze bych si to mohl udelat i pro delphi. Soubor vykresluju na TPaintBox a nevim jak nastavit paletu. Poradi mi nekdo jak ji mam nastavit ? Predem dik a cau Martin.

E-Mail:
pesek.martin(zv)mymail(tec)cz


Interbase a prechod na ni

[*] Ale� Radikovsk� <radik(zv)volny(tec)cz> - 27.1.2000 15:43:38

V posledni dobe jsem asi jako mnoho lidi kolem zacal uvazovat o prechodu
na Interbase. Proc asi :-)
Na spoustu veci se da prijit celkem snadno z manualu (nektere se musi
trosku hledat), na neco je odpoved v archivu konference, neco je na
internetu. Ale protoze to bude asi zajimat mnoho lidi, bylo by dobre to
nejak sesumarizovat. Mozna se take nektere vlastnosti zmeni v InterBase
6.

Zkusim proto sepsat nektere sve poznatky a hlavne otazky z priblizne
dvou veceru stravenych "prenasenim" dat z Paradoxu na Interbase 5.x v
Delphi 4. Myslim ze je to celkem standardni malinka aplikace s priblizne
5 tabulkami, takze to jsou problemy dost obecne.

1. Tvorba databaze - da se nejak vytvorit databazovy soubor hodne velky?
Lze sice zadat nejakou delku v CREATE DATABASE, ale at delam co delam,
vzdycky to ma nejakych 300 kB. Docela bych byl rad, abych mohl vytvorit
soubor s definovanou delkou (ala Oracle).

2. Cestina - to je asi jesna velka otazka (snad ne problem).
Jake zvolit kodovani? Jsme ve Windows, takze WIN1250, ale nema nahodou
nejakou vyhodu DOS852?
Jake dat trideni? Asi jedine pouzitelne je PDOX_CSY, ale tam nefunguje
CH, coz ve vetsine pripadu neni problem, ale precejen jsme v cechach a
obcas to nekdo chce. Tak co s tim?
Jak nastavit implicitni trideni pro sloupec? Asi nejlepsi je definovat
domeny se spravnou kodovou strankou (CHARACTER SET) a tridenim
(COLLATE) a ty pak pouzivat k definovani sloupcu. S pouzitim COLLATE ale
souvisi omezeni dalsi omezeni delky klice indexu. V konferenci jsem
nasel postup, kdy se prepise defaultni trideni v RDS$CHARACTER_SET, ale
to mi nejak nefunguje, a omezeni v delce indexu to nevyresi.

3. Generatory. Asi kazdy kdo delal s Paradoxem je nekdy pouzil a prechod
na generator+trigger je vic nez prijemny a je popsan v manualech
nekolikrat. Jedine co mi chybi k radosti, je moznost zjistit aktualni
hodnotu generatoru. Asi se na to da udelat nejaka berlicka, ale jaka?

4. Indexy. V Paradoxu jsem nikdy nenarazil na to, ze by klic indexu byl
prilis dlouhy, s InterBase se to snadno stane. Pokud mam pole
nazev_firmy, prijmeni, jmeno a pouziju COLLATE a chci udelat pres
vsechny index, tak jsem skoncil. Z ruznych pramenu jsem pochopil, ze
standardni maximalni delka klice je sice 255 bytu, ale pri pouziti
COLLATE jen asi 60 znaku, coz je zalostne malo. Jak tedy tridit? Nebo
spis: Jak pomalu to bude tridit kdyz nebudu mit zadne indexy nebo indexy
pro jednotlive sloupce a dam ORDER BY nazev, prijmeni, jmeno? Nebo jak
to vyresit lepe? A co kdyz budu potrebovat, aby takovy index byl
jedinecny, to mam proste smulu?

5. Pripojeni z Delphi. Je lepsi pouzit BDE nebo IB Express/FreeIB (kdyz
pominu pomalu odchazejici BDE a vezmu v uvahu jen vlastnosti)? Je nejaky
vyrazny rozdil mezi IB Express a FreeIB, krome pridani vlastnosti z IB6
a nekterych prizpusobovacich komponent pro prechod z BDE na IB Express,
ktery ba me nutil k prechodu na Delphi 5? Jak je v IB Expressu vyresena
cestina?

Tak to je snad vsechno. Pripadam si jako grafoman, ale snad se najde
nekdo ochotny podelit se o sve zkusenosti, a snad to me i nekomu dalsimu
pomuze. Nebo se podari dat dohromady neco, co pujde dat do FAQ na
Delphi(tec)cz.

Ales


MSSQL bez BDE

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 16:58:13


----- Original Message -----
From: "David Lebeda" <david.lebeda(zv)comarr(tec)cz>

> Ahoj, dekuju moc za informace, nicmene dovolim si otravovat jeste
> jednou.

;-)

> Mam Windows NT 4, SP4 a MDAC mam stazene a nainstalovane.
> Chci se zeptat:
>
> 1) Toho, ze se nepouzije BDE, se dosahne tim, ze se pouziji jine
> komponenty nez ty z Delphi?

Ano.

> Znamena to tedy, ze i pres ODBC se
> da jet bez BDE tak, ze si stahnu komponenty neodkazujici se na
> BDE, nebo je treba udelat i neco jineho?

Presne tak. Taky si muzes naimportovat knihovnu typu (Import type library)
pro ADO (MS ActiveX Data Objects) a pouzivat to bez komponent (coz je leckdy
vyhodnejsi ;-)

> 2) V ovladacich panelech je nastavovani ODBC. Pro OLEDB
> existuje taky neco takoveho, resp. je to potreba?

Ano - jmenuje se to cliconfg.exe (tusim ve Windows\System )

> 3) Tohle je dotaz z uplne jineho soudku (prosim vsechny, kdo to
> nekdy resili):

> Neumim ale nastavit co, cemu se rika Client. Mam na mysli
> Network Library. Implicitne ODBC leze na SQL server pres Named
> Pipes, ja potrebuji nastavit pristup pres TCP/IP.

To se prave nastavuje v tom ciconfg.exe, ale programove to neumim. Ale
nezkousel jsem to ;-)

> V registru
> Windows jsem nalezl prislusne klice, ale jen na strojich, kde je
> nainstalovan SQL Client. Na strojich bez tohoto produktu jsem
> nastaveni Network Library nedokazal najit. Je to v registru, nebo v
> nejakem souboru? Event. - jak to z kodu vubec nastavit?

Podle me to nebude tam, kde neni MDAC a onen cliconfg.exe.

> 4) Pro aplikaci oprenou o BDE + ODBC - je opravdu potreba
> instalovat balik MDAC? Postradam v nem neco jako instalaci jen
> urcitych casti, napr. jen ODBC, ale hlavne: v jiz vyse zminene
> sekci v Registru je odkaz pouze na jedinou DLL ->SQLSRV32.DLL.
> To me privadi na myslenku, zda by nestacilo s aplikaci distribuovat
> pouze tuto DLL, pripadne i dalsi nezbytne soubory, namisto
> nutnosti u zakaznika instalovat cely MDAC balik?

MDAC je bran jako Windows Update (neco jako service pack) - proto taky nejde
odnistalovat. Proto ta omezeni. Jinak pokud mas pouze BDE a ODBC tak staci
onu SQLSRV.DLL zkopirovat na kazdeho klienta (aspon jsem to tak delaval) -
dnes radeji instaluju MDAC ;-)

Mac


Simulace behu prostredi Delphi

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 17:06:37

Mam pocit, ze jsi chtel nejspise toto:

Je to od e-mail: xmojmr(zv)volny(tec)cz - sorry jmeno nemam ;-)

Simuluje Delphi IDE running.

Pro �sp�n� pou�it� je pot�eba p�idat modul na �eln� m�sto do Uses v
Project Source.

tj.
program BlaBla;
uses
IDERunning,
Forms,
...;

begin
...
end.

zaru�en� funguje pro:
TSyntaxMemo
TExtPageControl
Titan
RSD stromov� datov� komponenty

vzhledem k tomu, �e tento jednoduch� mechanismus detekce pou��vaj� i jin�
auto�i,
funguje pravd�podobn� i pro jin� sou��stky.

d�kladn�j�� detekce by m�la sledovat bin�rn� zdroj oken ( modul procesu ) a
ten
pak porovnat podle bin�rn�ch sn�mk� ( kusy k�du na vybran�ch pozic�ch
atp. ).
pon�vad� napodobenina tohoto by musela v nejhor��m p��pad� vypadat stejn�
jako Delphi
samo, muselo by se p�istoupit k od��znut� detek�n�ch ��st� z aplikace.

Za b�hu by se mohly odchytit jakmile volaj� syst�m a pak sledov�n�m
z�sobn�ku je naj�t
v pam�ti. Problematick� by mohla b�t jejich odpreparace, proto�e modifikace
k�du za b�hu
je ve Windows zt�en� n�sobn�m pou�it�m stejn�ho k�du pro v�ce aplikac� -
pro�e�to je chr�n�n�
proti z�pisu.

Jednodu��� se zd� jejich znehybn�n� je�t� ve studen�m stavu - po kompilaci
prozkoumat EXE
a od�ezat je kdy� nejsou p�i v�dom�. V�hoda: simula�n� mechanismus nemus�
b�t vestav�n� do
programu. Nev�hoda: nalezen� t�chto sou��st� vy�aduje jejich d�kladn�j��
pr�zkum v TD32, a to
pro ka�d� p��pad jednotliv�.

}
unit IDERunning;

interface

implementation
uses Windows;

type
TFakeWindow=class
private
Handle:HWND;
public
constructor Create(AClassName:ShortString; ACaption:ShortString);
destructor Destroy;override;
end;

constructor TFakeWindow.Create;
var
WndClass:TWndClass;
begin
ACaption:=ACaption+#0;
AClassName:=AClassName+#0;

FillChar(WndClass,sizeof(WndClass),0);
WndClass.hInstance:=HInstance;
WndClass.lpszClassName:=(zv)AClassName[1];
WndClass.lpfnWndProc:=(zv)DefWindowProc;

RegisterClass(WndClass);

Handle:=Windows.CreateWindow((zv)AClassName[1],(zv)ACaption[1],0,cw_usedefault,cw_
usedefault,cw_usedefault,cw_usedefault,0,0,HInstance,nil)
end;

destructor TFakeWindow.Destroy;
begin
DestroyWindow(Handle);
inherited
end;

var
count:integer;
fakes:array [0..5 { TUNE: }] of TFakeWindow;

atoms:array [0..0] of Atom;

// zajist�, �e FindWindow usp�je
procedure CreateWindow(className:string; caption:string);
begin
fakes[count]:=TFakeWindow.Create(className,caption);
inc(count)
end;

initialization
count:=0;
FillChar(fakes,sizeof(fakes),0);

{
Dream controls:
CreateWindow('TAlignPalette',cokoliv)
CreateWindow('TAppBuilder',cokoliv)
CreateWindow('TPropertyInspector',cokoliv)

TSyntaxMemo:
CreateWindow('TAppBuilder',cokoliv) p�ed vytvo�en�m komponenty

TExtPageControl:
CreateWindow('TAppBuilder','Delphi 3' nebo 'C++ Builder') p�ed
inicializac� modulu

Titan:
CreateWindow('TAppBuilder',cokoliv)
CreateWindow('TPropertyInspector',cokoliv)
CreateWindow('TApplication','Delphi 3') p�ed inicializac� modulu

RSD:
CreateWindow('TPropertyInspector','Object Inspector') p�ed inicializac�
modulu

PlasmaTech ShellControl Pack:
AddAtom(''ShellControlPackFVC') p�ed inicializac� modulu
}
CreateWindow('TAlignPalette','Align');
CreateWindow('TAppBuilder','Delphi 3');
CreateWindow('TPropertyInspector','Object Inspector');
CreateWindow('TApplication','Delphi 3');

{ $DEFINE HACKER}
{$IFDEF HACKER}
MessageBox(0,'adf','bb',0);
if FindAtom('xx')=123 then exit;
if GlobalFindAtom('xx')=123 then exit;
{$ENDIF}

atoms[0]:=AddAtom('ShellControlPackFVC');

finalization
while count>0 do begin
fakes[count-1].Free;
dec(count)
end;
for count:=Low(atoms) to High(atoms) do DeleteAtom(atoms[count])
end.


----- Original Message -----
From: "Ladislav Dolezel" <dolezel(zv)scova.vabo(tec)cz>

> mam problem. Potrebuji "nasimulovat" to, ze bezi prostredi Delphi. Mam
> to kvuli jedne komponente, kterou potrebuju odzkouset jinde, ale neni
> prijemne vsude instalovat Delphi.
> Zpravidla se to pry dela, ze se vytvori objekty TApplication,
> Tneco,....., - zpravidla tak to i ty komponenty testuji. Mate nekdo
> nekde zdrojak, odkazy ci ripadne cenne rady ? nebo jestli se to tu uz
> probiralo, tak me nasmerujte.
> Diky vsem
> -Dodo-
>

MSDE licencia

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 17:17:07

Vzhledem k tomu, ze toto prezentoval Jiri Burian z MS CR na Delphi
konferencich a seminarich (napr. u Honzy Sebelika - bylo to super ;-) ke
komunite Delphi vyvojaru tak bych to povazoval za korektni pristupovat k
MSDE z Delphi. Koneckoncu jde o legalni sireni MSDE ne? A ne o to cim do
toho lezu.

Mac

----- Original Message -----
From: "Martin �ajbik (Marcant)" <marcant(zv)sct.sk>> V poriadku, ale nie je tu podmienkou, ze musim pouzivat MSDE iba pomocou
> tychto programov od MS (teda napriklad uz nie pomocou Delphi) ? A ak ano,
> ako by to bolo, keby sa na pristup k MSDE pouzila moja DLL napisana v MS
> VC++, ale tato DLL by sa zasa pouzila v Delphi ?

Jakou DB zvolit?

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 17:18:51

----- Original Message -----
From: "Pavel Cisar" <pcisar(zv)aktis(tec)cz>> > 1 000 000. Nejdulezitejsi je vsak aby DB umela radit jeden klic podle
> > jednoho jazyka a dalsi dle jineho. Tech 5 mozna 7 uzivatelu do toho bude
> ale
> > busit porad. Dalsi pozadavek aby mela pole na kterych se to vse odehrava
> > vetsi nez 255 delku (samozrejme indexy na nich atd).
>
> Odpovedi je InterBase :o)

A dalsi odpoved je ze MS SQL 7 toto urcite NEumi ;-)

Mac


MSDAC a DCOM95 (WAS: MSSQL bez BDE)

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 17:20:49

Pripravuju takovy instalacni programek na DCOM, MDAC a MSDE. Pak to hodim
nekam na web se zdrojakama. Jinak vse najdes v MSDN ;-)

Mac

P.S. At zijou zkratky ;-)))

----- Original Message -----
From: "Mal� Dobromil" <dodo(zv)rak.pr.ds.mfcr(tec)cz>> Jeste bych se rad zeptal, jak bezpecne
> detekovat, zda je MSDAC a DCOM95 jiz
> nainstalovan ?
>
> Abych podle toho povolil/zakazal
> tlacitka v instalacnim programu.

pripojeni mobilu k PC - ovladani mobilu

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 27.1.2000 17:22:45

Je to snad jako modem. Neco je tu:

http://www.exit99(tec)cz/s25/

v Dokumentaci (jsou tam AT prikazy pro Siemens S25)

+ mraky linku

Mac

----- Original Message -----
From: "Pavel Simek" <kejchal(zv)volny(tec)cz>

> nema nekdo zkusenost s pripojenim mobilniho telefonu (nevim ani jaky typ)
k
> PC a moznosti zasilat pres tento mobil SMS zpravy na jine mobily?
>
> S pozdravem Kejchal
>

OT: pripojeni k internetu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 17:26:59

Ahoj,

pripojil se nekdo k internetu z Windows2000 RC2? Ja to nemohu
rozchodit, a i privolany technik odesel se sklopenyma usima...

Odpovedi prosim na muj mail.


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


Pouzivani komponent v nevizualni aplikaci.

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 17:26:59

On 27 Jan 00, at 8:51, Martin Bednar wrote:

> Jak ?
> Muzes mi o tom napsat podrobneji ?
> Diky

Podivej se do zdrojaku tech komponent, tam najdes vsechno
potrebne. Na popis zde to neni, protoze je to trochu delsi povidani
(pokud by to melo byt uplnejsi).

> -----Original Message-----
> From: Zbysek Hlinka [mailto:zhlinka(zv)login(tec)cz]
> Sent: Thursday, January 27, 2000 7:24 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Pouzivani komponent v nevizualni aplikaci.
>
>
> On 26 Jan 00, at 15:59, Martin Bednar wrote:
>
> > Jak muzu pouzivat komponenty treba TADOConnection v programu ktery
> > nema GUI, je to jen konzolova aplikace nebo NT service ? Zkousel
> > jsem cn:=TADOConnection.Create(nil); ale tohle nefunguje. Thanx
>
> Pouzivej primo surove ADO, pokladam to pro tento pripad za
> vyhodnejsi.


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


MSDE licencia

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 17:26:59

On 27 Jan 00, at 8:38, Marcant wrote:

> V poriadku, ale nie je tu podmienkou, ze musim pouzivat MSDE iba
> pomocou tychto programov od MS (teda napriklad uz nie pomocou Delphi)
> ?

Neni.


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


ztrata frames pri exportu do RTF formatu

[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 27.1.2000 08:31:43 -0800


Hi all,

Snazime se konvertovat z ReportBuilderu 4.22pro(D5) pres komponentu
TExtraDevices sestavy do formatu RTF. Bohuzel po konverzi se ztrati ze
sestavy veskere ramecky :( (napriklad u faktury je to pak peknej humus)
Nevite nekdo v cem je problem, nekdo mi rikal ze je to problem specifikace
RTF formatu, ale ja videl uz program, ktery konvertovat do RTF umel i s
rameckama (napriklad konvertor z FANDu od firmy Alis). Docela bych to
potreboval nejak vyresit, dik za jakoukoliv radu.


Heretic-X, SOFTWARE specialist


BDE

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 27.1.2000 17:36:43

Ano. Jsou dve moznosti.

1. periodicky volat TTable.Refresh
( pozor nesmi se udelat kdyz ..... spousta podminek) mam na to
komponentu,

2. pokud potrebujes opravdu okamzite musis se hooknout do BDE
a pak to vis temer okazite a navic nemusis zjistovat zda byla
zmena. I na to mam komponentu.

Rozdil je ze v pripade refresh se prekresli vse pro uzivatele, ale
program nevi, jestli byla provedena zmena, nebo ne. V pripade
druhem se dozvis o okamziku zmeny, i kdyz nevis ktery record.


From: Martin Lasevic <vyvoj(zv)atlascon(tec)cz>
To: "'DELPHI FORUM 98'" <delphi-l(zv)fwd(tec)cz>
Subject: BDE
Date sent: Thu, 27 Jan 2000 15:26:52 +0100
Organization: ATLAS consulting, Ostrava
Send reply to: delphi-l(zv)fwd(tec)cz

> Zdravim a mam jeden dotaz,
>
> da se nejak urychlit interval pro aktualizaci dat na sitovych stanicich.
>
> Problem se ma tak :
>
> Mam sitovou PARADOX tabulku se sitovym NETDIRem a na jedne stanici provedu zmenu v teto tabulce
> Soucasne pripojena stanice vsak tuto zmenu zaregistruje az po nejake dobe ( cca 3-4 min).
>
> Lze to tedy nejak urychlit nebo prinutit k okamzite reakci?
>
> D3 Profi, PARADOX, BDE 5.1, Win 9x
>
> Diky za napovedu.
>
> Martin
>
> P�kny den a pilotum mnoho stastnych pristani...
> ====================================
>
> ML Software - Martin Lasevic
> Budovatelska 459
> Ostrava - Poruba, 708 00
> tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
> fax.: +420 (69) 691 85 11
> E-mail : ml_software(zv)email(tec)cz
> WWW: http://www.volny(tec)cz/ml_software
> Miror : http://freeweb.coco(tec)cz/ml_software
> ====================================
>
>
>
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


AVI + analogova hodnota

[*] Gadourek <gadourek(zv)centrum(tec)cz> - 27.1.2000 18:06:45

Ahoj,

neresil jste nekdo jak online dodat do AVI souboru nejake cislo?
Mam tento problem: snimam pres video kartu do pocitace video signal (25 snimku za sekundu) a zaroven merim nejakou velicinu (konkretne tlak) a potrebuji hodnotu tlaku primixovat do ukladaneho obrazku. Neresil jste nekdo neco podobneho? Jedinne co me napada, je snimat video a hodnoty tlaku samostatne a pak to to ve vlastnim vieweru soucasne zobrazovat.

Diky za rady

Petr Gadourek

Interbase a prechod na ni

[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 27.1.2000 18:22:04

Ahoj,

Ale� Radikovsk� wrote:

> V posledni dobe jsem asi jako mnoho lidi kolem zacal uvazovat o prechodu
> na Interbase. Proc asi :-)
> Na spoustu veci se da prijit celkem snadno z manualu (nektere se musi
> trosku hledat), na neco je odpoved v archivu konference, neco je na
> internetu. Ale protoze to bude asi zajimat mnoho lidi, bylo by dobre to
> nejak sesumarizovat. Mozna se take nektere vlastnosti zmeni v InterBase
> 6.

To se zmeni, a k lepsimu :-)

> 1. Tvorba databaze - da se nejak vytvorit databazovy soubor hodne velky?
> Lze sice zadat nejakou delku v CREATE DATABASE, ale at delam co delam,
> vzdycky to ma nejakych 300 kB. Docela bych byl rad, abych mohl vytvorit
> soubor s definovanou delkou (ala Oracle).

Velikost databaze se nestanovuje pri vytvareni (LENGTH parametr se pouziva
podle dokumentace pouze tehdy, kdyz se vytvari zaroven sekundarni soubory).
IB zvetsuje velikost databazoveho souboru podle potreby.

> 2. Cestina - to je asi jesna velka otazka (snad ne problem).
> Jake zvolit kodovani? Jsme ve Windows, takze WIN1250, ale nema nahodou
> nejakou vyhodu DOS852?
> Jake dat trideni? Asi jedine pouzitelne je PDOX_CSY, ale tam nefunguje
> CH, coz ve vetsine pripadu neni problem, ale precejen jsme v cechach a
> obcas to nekdo chce. Tak co s tim?
> Jak nastavit implicitni trideni pro sloupec? Asi nejlepsi je definovat
> domeny se spravnou kodovou strankou (CHARACTER SET) a tridenim
> (COLLATE) a ty pak pouzivat k definovani sloupcu. S pouzitim COLLATE ale
> souvisi omezeni dalsi omezeni delky klice indexu. V konferenci jsem
> nasel postup, kdy se prepise defaultni trideni v RDS$CHARACTER_SET, ale
> to mi nejak nefunguje, a omezeni v delce indexu to nevyresi.

Pouzivam WIN1250 a collation PXW_CSY. Reseni s domenou je spravne - POZOR!
vyplaci se striktne pouzivat domeny pro kazdy sloupec kazde tabulky, protoze
jinak si IB pro kazdy nove vytvareny sloupec nezalozeny na domene vytvori
novou domenu (napr. RDB$259), i kdyby datovy typ odpovidal nejakemu jiz
existujicimu sloupci. To ma za nasledek zbytecny rust poctu domen a mozne
snizeni rychlosti.

> 3. Generatory. Asi kazdy kdo delal s Paradoxem je nekdy pouzil a prechod
> na generator+trigger je vic nez prijemny a je popsan v manualech
> nekolikrat. Jedine co mi chybi k radosti, je moznost zjistit aktualni
> hodnotu generatoru. Asi se na to da udelat nejaka berlicka, ale jaka?

gen_id(generator_name, 0)

> 4. Indexy. V Paradoxu jsem nikdy nenarazil na to, ze by klic indexu byl
> prilis dlouhy, s InterBase se to snadno stane. Pokud mam pole
> nazev_firmy, prijmeni, jmeno a pouziju COLLATE a chci udelat pres
> vsechny index, tak jsem skoncil. Z ruznych pramenu jsem pochopil, ze
> standardni maximalni delka klice je sice 255 bytu, ale pri pouziti
> COLLATE jen asi 60 znaku, coz je zalostne malo. Jak tedy tridit? Nebo
> spis: Jak pomalu to bude tridit kdyz nebudu mit zadne indexy nebo indexy
> pro jednotlive sloupce a dam ORDER BY nazev, prijmeni, jmeno? Nebo jak
> to vyresit lepe? A co kdyz budu potrebovat, aby takovy index byl
> jedinecny, to mam proste smulu?

COLLATE obecne nema za nasledek snizeni poctu znaku v jednom zaznamu v
indexu. Pouze tehdy, jedna-li se o UNICODE znaky (2 bytove, nekdy 3 bytove).
Lze vytvorit indexy na jednotlivych sloupcich pouzitych pro trideni a IB je
pak pouzije vsechny najednou (tzv. bitmapove indexy) - nemelo by dojit k
viditelnemu zpomaleni oproti variante jednoho indexu na 3 polich. Potrebu
jedinecnosti kombinace techto 3 poli toto reseni ovsem nevyresi ...

> 5. Pripojeni z Delphi. Je lepsi pouzit BDE nebo IB Express/FreeIB (kdyz
> pominu pomalu odchazejici BDE a vezmu v uvahu jen vlastnosti)? Je nejaky
> vyrazny rozdil mezi IB Express a FreeIB, krome pridani vlastnosti z IB6
> a nekterych prizpusobovacich komponent pro prechod z BDE na IB Express,
> ktery ba me nutil k prechodu na Delphi 5? Jak je v IB Expressu vyresena
> cestina?

Jednoznacne je lepsi pouzit IBX (oproti BDE - FIB jsem nepouzival). Odpadaji
tim omezeni BDE jako napr. uroven izolace transakci nastavena na urovni
aliasu => tuto uroven lze menit pro kazdou transakci, coz je velmi pruzne.
Take prace s daty je celkove rychlejsi ... S cestinou snad zadne problemy
zpusobene IBX nejsou.

O jednotlivych vecech by se dalo psat vice, ale snad to aspon takhle
postaci.

S pozdravem,
Tom

=================================

Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic

e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446

MSSQL bez BDE

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 27.1.2000 19:48:38

On 27 Jan 00, at 11:19, Mal� Dobromil wrote:

> Panenko skakava, ja jsem ale vuuul...
> Koncim s programovanim a jdu prodavat
> ty burty...

:-))) Tohle misto jsem si zamluvil uz ja.


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


ovladani UPS

[*] Pavel Simek <kejchal(zv)volny(tec)cz> - 27.1.2000 19:40:16 -0000

Ona UPS je APC Smart 2200

Diky


----- P�vodn� zpr�va -----
Od: Petr BRABEC <elra(zv)telecom(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 27. ledna 2000 13:26
P�edm�t: Re: ovladani UPS


> K jake UPS? Ona neni UPS jako UPS
> Petr BRABEC
>
> -----P�vodn� zpr�va-----
> Od: Pavel Simek <kejchal(zv)volny(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 27. ledna 2000 13:18
> P�edm�t: ovladani UPS
>
>
> >Ahoj delfini,
> >
> >hazim do placu jeste jeden dotaz -
> >
> >ovladani UPS z D3. Nevite nekdo o necem ?
> >
> >Kejchal
> >
>
>

konverze cisel

[*] Libor Nosek <nosek(zv)ujf.cas(tec)cz> - 27.1.2000 21:43:09

Zdravim vsechny.
Morim se s tokovou blbosti.
Potrebuju prevadet cislo na hexreprezentaci - to je jasne pres funkci inttohex.
Ale nemuzu najit opacnou funkci. tedy hextoint.
Nemate nekdo odkaz nebo radu?

Diky
Libor Nosek


Co je to za blbost? (FillRect)

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 27.1.2000 22:02:49

Ahoj,

a co je vlastne vyhodne na nize popsanem zpusobu? Me to
pripadne znacne matouci.

Slavek

> Existuji dva zpusoby, kterymi se pracuje se souradnicemi.
> Souradnice stredove - prochazi stredem pixelu
> Souradnice intersticialni - prochazi rozhranim mezi pixely.
> Funkce pro praci s pixelem, primkami a krivkami
> pracuji se stredovymi souradnicemi, naproti tomu
> pri praci s uzavrenymi obrazci se pouzivaji souradnice
> intersticialni.
> ...
> Mozna se to nekomu zda nelogicke, ale je to tak.
> VCL je v tomto zcela nevinne. Toto je dano z GDI.
>
> Vaclav Krmela


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


Win 2000 (was RE: pripojeni k internetu)

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 27.1.2000 22:07:29


> 17.2.2000 budou W2000 oficialne k dispozici
> a udajne to ma byt RC3.
****Komplet RC3 nebo to prelozili bez spousty ladicich
informaci? Myslim, ze 600 MB, co mi tu RC 2 zabiraji je preci
jenom trosku moc.

> Delphi 5 na tom chodi velmi dobre a D4 se da take zprovoznit.
****Mohu jen potvrdit.

Slavek

> Jaro


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


Owner tabulky v D5 nemuze byt TDatabase

[*] �ern� Roman - 27.1.2000 22:18:52

Skus to takhle :
Table1 := TTable.Create(Database1.owner);

----- Original Message -----
From: Stepan Cerny <chaosz(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 26, 2000 11:58 AM
Subject: Owner tabulky v D5 nemuze byt TDatabase


> Preji pekny den.
>
> V Delphi 3 (Professional) jsem pri vytvareni tabulek zadaval jako Ownera
> TDatabase (TTable.Create(TDatabase)).
> Ale v Delphi 5 (Professional) mi to pri vytvareni hazi chybu
> EAccessViolation - cteni z adresy FFFFFFFF :-))) / :-(
>
> Nevite nekdo co s tim ?!?
>
> Priklad:
> ~~~~~~~~
>
> procedure TDataModule1.CreateTabs;
> var
> Table1 : TTable;
> begin
> Table1 := TTable.Create(Database1); // no a tady to zarve.
> end;
>
>
> Stepan Cerny
> chaosz(zv)atlas(tec)cz


Pozdrav

[*] David Viktora <viktora(zv)volny(tec)cz> - 27.1.2000 22:23:00

Zdravim,

jsem novacek v Delphi, presto se mi povedlo udelat par kupodivu funkcnich
aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam me
to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky
jednodussi zpusob?

Dik za radu.

David Viktora


Nahrada SYSUTILS

[*] lustyl1.edu(zv)mail.cez(tec)cz - 27.1.2000 22:39:58



Ano, tohle je to samozrejme mozne, ale jen pro
pripad primeho volani funkce z projektu nebo nove unity.
Ale co delat v pripade neprimeho volani, napr. pri
editaci DBGRID. Asi jsem nebyl konktretni: potrebuji
editovat bunku v DBGRID, ktera je TDATETIME v zaznamu databaze s tim,
aby slo zadat rok<100. Nekde po OnExit se provede prevod data
string na TDateTime, a jestlize je rok<=99 pak prida stoleti,
prevede na string a zobrazi . A to je prave v tom SYSUTIULS.

Zkousel jsem ten Y2K.ZIP, tam je hlavne ten zkompilovany FFMT.OBJ,
ali i SYSUTILS.DCU. To sa mi pak podarilo zkompilovat, novy SYSUTILS.DCU
jsem dal do \Lib. Zkompilovany byly i vsechny VCL komponenty. Ale pak
jsem narazil: aby se zmena promitla do napr. TDBEDIT
neno TDBGRID, bylo by nutne zrejme vytvorit run-time package VCL30.DPL
nebo run-time package collection VCL30.DCP. A tady jsem skoncil,
neb nemam zdroj VCL30.DPK .
Tak toto nebude to prave orechove, asi by se musela prekompilovat
cela soustava VCL vcetne packages to se mi vubec nelibi.

Diky za namety

L.Lustyk z elektrarny na elektricky proud


>TDateTime muzes klidne zachovat i v novych funkcich. Klidne
>muzes jit i do minusu, je to na tobe, co s tim udelas. Pouze si
>musis dat pozor, abys omylem nepouzil standardni funkce.>S pozdravem

>Zbysek Hlinka

Owner tabulky v D5 nemuze byt TDatabase

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 27.1.2000 22:54:37

Ahoj,
jen doplnim:
pokud je tTable na nejakem formulari nebo datovem modulu, dej jako parametr
Self:
Table1 := TTable.Create((Self).

Pokud vytvaris tTable v kodu a zase ji rusis, klidne staci
Table1 := TTable.Create(nil);

Zdar
Mirek

| Skus to takhle :
| Table1 := TTable.Create(Database1.owner);
|
| ----- Original Message -----
| From: Stepan Cerny <chaosz(zv)atlas(tec)cz>
| To: <delphi-l(zv)fwd(tec)cz>
| Sent: Wednesday, January 26, 2000 11:58 AM
| Subject: Owner tabulky v D5 nemuze byt TDatabase
|
|
| > Preji pekny den.
| >
| > V Delphi 3 (Professional) jsem pri vytvareni tabulek zadaval jako Ownera
| > TDatabase (TTable.Create(TDatabase)).
| > Ale v Delphi 5 (Professional) mi to pri vytvareni hazi chybu
| > EAccessViolation - cteni z adresy FFFFFFFF :-))) / :-(
| >
| > Nevite nekdo co s tim ?!?
| >
| > Priklad:
| > ~~~~~~~~
| >
| > procedure TDataModule1.CreateTabs;
| > var
| > Table1 : TTable;
| > begin
| > Table1 := TTable.Create(Database1); // no a tady to zarve.
| > end;
| >
| >
| > Stepan Cerny
| > chaosz(zv)atlas(tec)cz
|
|

BPL - "Application is not licensed to use this fea

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 27.1.2000 22:58:16

Ahoj,
tohle udela napr. kdyz mas Delphi Professional a pokusis se pouzit nejakym
figlem napr. tClientDataSet.

Takze asi delas neco podobneho

Mirek


----- Original Message -----
From: Rjanus <janus(zv)foresta(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 27, 2000 8:48 AM
Subject: Re: BPL - "Application is not licensed to use this feature"


Hi ,
potreboval bych poradit --
mam balicek BPL -(delphi 4, je to pouze jedna unita bez formulare) a z neho
volam proceduru.
vse ptrobehne v poradku , pokud vsak zkousim otevrit v teto procedure tabuku
zahlasi to
"Application is not licensed to use this feature"
mohl by mi nekdo poradit co s tim ?

Diky moc
Radek Janus
janus(zv)foresta(tec)cz


konverze cisel

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 27.1.2000 23:29:28

Ahoj,
poskladej si to z takoveto funkce:

function HexToByte (C:char):byte;
const HH = '0123456789ABCDEF';
var HPos: byte;
begin
HPos := pos (UpCase(C),HH);
if HPos > 0 then
Result := HPos-1
else // non hex char
Result := 0;
end;
Mirek

----- Original Message -----
From: Libor Nosek
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, January 27, 2000 9:43 PM
Subject: konverze cisel


Zdravim vsechny.
Morim se s tokovou blbosti.
Potrebuju prevadet cislo na hexreprezentaci - to je jasne pres funkci inttohex.
Ale nemuzu najit opacnou funkci. tedy hextoint.
Nemate nekdo odkaz nebo radu?

Diky
Libor Nosek


Tisk do grafic. souboru

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 28.1.2000 00:35:41

From: "Pavel Medek" <<Pavel.Medek(zv)talema(tec)cz><color><param>7F00,0000,0000</param>> Potreboval bych z Delphi + QReportu tisknout do grafickeho souboru

> t.j. bmp, jpg, atd. Chtel bych treba vytisknout fakturu (tak jak to delam

> nyni) ale aby mi to vytvorilo soubor, ktery muzu poslat treba mailem.</color>Ahoj,


nevim, jestli to jde v QR 2, ale od QR3 by to
podle QR dokumentace melo jit. Ja to jeste
nepotreboval:<color><param>0000,0000,FF00</param><FontFamily><param>Courier</param>How do I use the WMF export filter
outside of the preview?

<bold><color><param>FF00,0000,0000</param><FontFamily><param>Courier-Bold</param>A. </bold></color><FontFamily><param>Courier</param>The WMF export filter works
differently than the other
filters. The other export

filters render the report using
the filter. The WMF filter takes
the pages rendered to

the preview and saves each page as
a metafile. To use this filter
outside of the preview,

you have to render the report
first using Prepare.


Example:

quickrep1.Prepare;

quickrep1.qrprinter.ExportToFilter(
TQRWMFExportFilter.Create('c:\repor
t'));

quickrep1.qrprinter.Free;

quickrep1.qrprinter := nil;


Please note that the file named
extension is picked by the
Enhanced property to the

export filter. EMF if it's True,
WMF if it's false.<FontFamily><param>Arial</param><nofill>

Batchmove, paradox tabullky a problem...

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 28.1.2000 00:54:50

From: Vladimir Ponechal <Vladimir_Ponechal(zv)tesco-europe.com>
> mam nasledujici problem. Snazim se za pomoci Batchmove prevest z paradox7
> tabulek data do jinych tabulek, ktere maji slouzit pro docasne odkladani
> dat. Pouzivam pritom mod batAppend, tudiz tabulky nemusi byt indexovane.
> Jenze me se stava zajimava vec. Kdyz to necham prevest z 99 procent se
> stane, ze posledni dve vety z tabulky, kterou prevadim se zobrazi dvakrat v
> nove vytvorene. Nejdriv jsem si myslel, ze je nejak divne korupnuta
> databaze, ale potom jsem zjistitl, ze mi to dela u vsech tabulek a je jich
> asi 12. Zajimave jeste je, ze kdyz mazu polozky v tabulce tak s treti od
> konce, to znamena z 'normalne' posledni polozkou se najednou smazou i ty
> dve nove. Uz me nejak nenapada, cim by to mohlo byt... A co vy nenapada vas
> neco??? Diky...

Ahoj,

to co pises, mi neco pripomina. Tak snad je to
podobne.....

Delal jsem na vlastni (respektive predelaval,
opravoval a rozsiroval jednu free) komponente
pro DBF III+. Opravoval jsem metodu
PackTable. Pakovani v DBF spociva v tom, ze
zaznami, ktere jsou oznacene jako smazane,
se fyzicky "opravdu" vymazou. Takze
PackTable hezky sel zaznam poznamu a
oznacene neulozil....

...ovsem vysledek byl presne takovy, jak
popisujes..., v gridu se mi objevily jako posleni
"duplikovane radky". Jednalo se samozrejme o
posledni fyzicky zaznam v DBF souboru.
Objevil se tolikrat, kolik bylo smazanych
(oznacenych jako smazane) zaznamu.

Problem byl v tom, ze autor puvodni
komponenty zapomnel napsat do hlavicky novy
pocet zaznamu....,no a diky zpusobu
implementace TDataSet-u (a snad i te
komponenty) nedoslo pri prohlizeni k zadne
chybe....

Dovolim si tvrdit, ze je to podobne s tim
Batchem...., nerekl bych ze by chyba byla v
BDE, ale spis v implementaci TBDEDataSet ci
TTable.

Petr Motlicek


QRP load

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 28.1.2000 01:02:28

From: "Zdenek Moravec" <<zmo(zv)telecom(tec)cz><color><param>7F00,0000,0000</param>> nevite nahodou nekdo, jestli se da programove zobrazit ulozeny QRP soubor ?

> Pres Preview Quick Reportu, ale bez nutnosti jej z tohoto okna nacist pres

> tlacitko Load.</color>Ahoj,


ve FAQ z www.qusoft.no jsem nasel toto:
<bold><color><param>FF00,0000,0000</param><FontFamily><param>Courier-Bold</param>Q. </bold><color><param>0000,0000,FF00</param><FontFamily><param>Courier</param>I have an application that
saves a series of reports to the
QRP format. I would like

to print them all at once as a
single print job, is that posible?

<bold><color><param>FF00,0000,0000</param><FontFamily><param>Courier-Bold</param>A. </bold></color><FontFamily><param>Courier</param>In the QR3RNGD4.ZIP project on
our download page, we have a
function named

CombineQRP() in the qrqrp.pas
unit. The function takes a
stringlist of QRP filenames and

combines them into a single QRP
file. You can then load that file
into a preview or the

TQRPHandler class for viewing or
printing. This can be used as an
alternative to the

CompositeReport.


A nebo toto


<bold><color><param>FF00,0000,0000</param><FontFamily><param>Courier-Bold</param>Q. </bold><color><param>0000,0000,FF00</param><FontFamily><param>Courier</param>What are the steps to load
reports and preview composite
reports. I add reports to

the TList property of QRComposite
and then call preview and the
preview is empty.

<bold><color><param>FF00,0000,0000</param><FontFamily><param>Courier-Bold</param>A. </bold></color><FontFamily><param>Courier</param>You must add the reports in the
TQRCompositeReport's OnAddReports
event or they will

not be picked up.

Example:

procedure
TMainForm.QRCompositeReport1AddRepo
rts(Sender: TObject);

begin

with QRCompositeReport1 do

begin

Reports.Add(ListForm.QuickRep);

<color><param>0100,0100,0100</param>Reports.Add(GrpListForm.QuickRep);

Reports.Add(MDForm.QuickRep);

Reports.Add(ManyGrpForm.QuickRep);

end;

end;


A naslo by se toho vic. Zkus si
stahnout kb.zip.


Petr Motlicek</color><FontFamily><param>Arial</param>

<nofill>

QR -txt,HTM,RTF

[*] J�n Tungli - 28.1.2000 01:03:31

Mam QuckReport 3 pre D4
Ako mozem povolit pri standard Preview aby dokazal report ulozit (save) do
TXT,RTF,HTML formatu?

J�n TUNGLI
Email: tungli(zv)datapac.sk
URL: http://free.netlap.hu/4321/

Menu

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 28.1.2000 01:04:48

From: "Jakub M�lek" <malek(zv)ssakhk(tec)cz>

> Nevite nekdo jak udelat, aby cast menu ('Napoveda') byla od prava a zbytek normalne od leva.

Ahoj,


koukni se na TMenuItem.GroupIndex.

Petr Motlicek

Pozdrav

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 28.1.2000 01:15:16

From: "David Viktora" <<viktora(zv)volny(tec)cz><color><param>7F00,0000,0000</param>> aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe

> program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam me

> to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky

> jednodussi zpusob?</color>Ahoj,


jde to vseljak. Uz to tady v konferenci slo nekolikrat. Tak
bud hledej v archivu. A treba ve WIN API helpu koukni na:


CreateProcess, WinExec, ShellExecute....


Odkaz pro inspiraci CreateProcess:<color><param>0100,0100,0100</param><FontFamily><param>Times New Roman</param><bigger>{HYPERLINK "pages/api.htm" \l <FontFamily><param>Arial</param><smaller>http://www.gnomehome.demon.nl/uddf/pages/api.htm#api5


</color>Petr Motlicek

<nofill>

OT: Poskytnite informacne ceny InterBase sietovej

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.1.2000 01:18:17

Zdravim, aka je cenova politika InterBase ?

Tenk j� veri ma�.

H�j. Roland Tur�an


ADMIN: Re: Simulace behu prostredi Delphi

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.1.2000 02:23:34

Puvodni zprava, kterou napsal Ladislav Dolezel dne 26 Jan 00,:

> mam problem. Potrebuji "nasimulovat" to, ze bezi prostredi Delphi. Mam
> to kvuli jedne komponente, kterou potrebuju odzkouset jinde, ale neni
> prijemne vsude instalovat Delphi.
> Zpravidla se to pry dela, ze se vytvori objekty TApplication,
> Tneco,....., - zpravidla tak to i ty komponenty testuji. Mate nekdo
> nekde zdrojak, odkazy ci ripadne cenne rady ? nebo jestli se to tu uz
> probiralo, tak me nasmerujte.

VAZENI, TOTO TU NECHCI VIDET. TA KOMPONENTA MA OCHRANU PRAVE
KVULI TOMU, ABYS TO NESPUSTIL BEZ DELPHI. TAKZE TOTO SEM DO
KONFERENCE NEPATRI.


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


pripojeni k internetu

[*] Jaro <jaro(zv)sinea(tec)cz> - 27.1.2000 18:00:51 -0800

Myslim, ze by to mohlo zajimat i nektere jine ucastniky konference.
Na Internet jsem se pripojil zcela bez problemu.
I tento mail je posilan z W2000 RC2
Zajimave je i to, ze pouzivam RC2 jiz dele nez mesic
a za tuto dobu mi system ani jednou nespadnul.
17.2.2000 budou W2000 oficialne k dispozici
a udajne to ma byt RC3.
Delphi 5 na tom chodi velmi dobre a D4 se da take zprovoznit.
Jaro

>
> Ahoj,
>
> pripojil se nekdo k internetu z Windows2000 RC2? Ja to nemohu
> rozchodit, a i privolany technik odesel se sklopenyma usima...
>
> Odpovedi prosim na muj mail.
>
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
>

Interbase a prechod na ni

[*] Jaro <jaro(zv)sinea(tec)cz> - 27.1.2000 18:50:41 -0800

> Delphi 4. Myslim ze je to celkem standardni malinka aplikace s priblizne
> 5 tabulkami, takze to jsou problemy dost obecne.

Otazkou je, co rozumime pod pojmem standardni
>
> 1. Tvorba databaze - da se nejak vytvorit databazovy soubor hodne velky?
> Lze sice zadat nejakou delku v CREATE DATABASE, ale at delam co delam,
> vzdycky to ma nejakych 300 kB. Docela bych byl rad, abych mohl vytvorit
> soubor s definovanou delkou (ala Oracle).

Interbase si nastavuje velikost sama, kdyz potrebuje.

> 2. Cestina - to je asi jesna velka otazka (snad ne problem).
> Jake zvolit kodovani? Jsme ve Windows, takze WIN1250, ale nema nahodou
> nejakou vyhodu DOS852?

DOS852 se hodi pouze, kdyz potrebujes napr. importovat data s timto kodem.
Jinak je lepsi WIN1250, protoze az budes exportovat napr do Word a Excel, tak
nebudes mit problemy.

> Jake dat trideni? Asi jedine pouzitelne je PDOX_CSY, ale tam nefunguje
> CH, coz ve vetsine pripadu neni problem, ale precejen jsme v cechach a
> obcas to nekdo chce. Tak co s tim?
> Jak nastavit implicitni trideni pro sloupec? Asi nejlepsi je definovat
> domeny se spravnou kodovou strankou (CHARACTER SET) a tridenim
> (COLLATE) a ty pak pouzivat k definovani sloupcu. S pouzitim COLLATE ale
> souvisi omezeni dalsi omezeni delky klice indexu. V konferenci jsem
> nasel postup, kdy se prepise defaultni trideni v RDS$CHARACTER_SET, ale
> to mi nejak nefunguje, a omezeni v delce indexu to nevyresi.

Omezeni je na 60 znaku. Indexovani delsich poli povazuji za pitomost, protoze
takove indexy pak silne zpomaluji praci serveru. Vubec premira indexu na dlouha
stringova pole neni dobra.

> 3. Generatory. Asi kazdy kdo delal s Paradoxem je nekdy pouzil a prechod
> na generator+trigger je vic nez prijemny a je popsan v manualech
> nekolikrat. Jedine co mi chybi k radosti, je moznost zjistit aktualni
> hodnotu generatoru. Asi se na to da udelat nejaka berlicka, ale jaka?

Neni potreba berlicka. Staci zavolat generator s hodnotou 0

> 4. Indexy. V Paradoxu jsem nikdy nenarazil na to, ze by klic indexu byl
> prilis dlouhy, s InterBase se to snadno stane. Pokud mam pole
> nazev_firmy, prijmeni, jmeno a pouziju COLLATE a chci udelat pres
> vsechny index, tak jsem skoncil. Z ruznych pramenu jsem pochopil, ze
> standardni maximalni delka klice je sice 255 bytu, ale pri pouziti
> COLLATE jen asi 60 znaku, coz je zalostne malo.

To neni malo. Tak to neindexuj. U serveru neni potreba vsechno indexovat.
Trideni zajisti ORDER BY. Indexy se pouziji pouze tam, kde to ma vyznam pro
rychlost zpracovani pri optimalizaci. Mnoho dlouhych indexu ale rozhodne vykon
nezvysi. To je problem zvyku programatoru z Paradaxu. Co nebylo indexovano neslo
tridit. Tady je to jinak.

Jak tedy tridit? Nebo
> spis: Jak pomalu to bude tridit kdyz nebudu mit zadne indexy nebo indexy
> pro jednotlive sloupce a dam ORDER BY nazev, prijmeni, jmeno? Nebo jak
> to vyresit lepe? A co kdyz budu potrebovat, aby takovy index byl
> jedinecny, to mam proste smulu?

Zadne indexy je nesmysl podobne jako mnoho indexu. Nejprve vytvor indexy na
vsechny ID a cici klice. Pak pridej indexy na pole, ktere se casto objevuji v
podminkach WHERE, ale to
uz je dobre optimalizovat pomoci nejakeho monitoru a dobre zvazovat.
Pro bezne zobrazeni dat pomoci SELEC ... ORDER BY to neni nutne.

> 5. Pripojeni z Delphi. Je lepsi pouzit BDE nebo IB Express/FreeIB (kdyz
> pominu pomalu odchazejici BDE a vezmu v uvahu jen vlastnosti)? Je nejaky
> vyrazny rozdil mezi IB Express a FreeIB, krome pridani vlastnosti z IB6
> a nekterych prizpusobovacich komponent pro prechod z BDE na IB Express,
> ktery ba me nutil k prechodu na Delphi 5? Jak je v IB Expressu vyresena
> cestina?

IB Express je lepsi nez BDE. Pokud jej vyuzijes hned nebudes to pak muset
predelavat. Programovani na klientovi je totiz dost odlisne.

> Tak to je snad vsechno. Pripadam si jako grafoman, ale snad se najde
> nekdo ochotny podelit se o sve zkusenosti, a snad to me i nekomu dalsimu
> pomuze. Nebo se podari dat dohromady neco, co pujde dat do FAQ na
> Delphi(tec)cz.

Nezapomen, ze sice muzes za dva vecery prevest program z Paradoxu na Interbasi,
ale vyuzijes tak zpravidla jen malou cast ze schopnosti serveru. Ziskas jen
kompaktnost a vetsi stabilitu dat. Hlavni prinosem by vsak mela byt datova
integrita, transakcni zpusob prace a zejmena zrychleni nekterych operaci
vyuzitim ulozenych procedur. Dobre je myslet na rozumnou segregaci dat. Casto si
lze na klientovi znacne znednodusit praci vyuzitim trigru, procedur (for select)
a view. Databaze se pak chova jako trochu inteligentne reagujici datovy system,
ktery zije svym zivotoem a svou vlastni vnitrni logikou. K tomu ovsem dva vecery
zpravidla nestaci.
Jaro

>
> Ales
>

Vykon SQL

[*] Jaro <jaro(zv)sinea(tec)cz> - 27.1.2000 18:50:44 -0800


> Hi,
>
> Mam dotaz mel bych neco jako sklad. a mam takojem malej dotaz.
> Pouzity SQL server Interbase 4.0 Linux.
>
> Nemel bych vubec tabulku se stavy na skladu, ale jen tabulku
> pohybu a tabulka karty ( i se stavy ) byla View s pouzitim calc sum
> na pohyby.
> Pripada mi to skvele pro odstraneni problemu s konzistenci, ktere
> jsem mel na souborove databazi, ale mam strach z vykonu.
> Muze byt klidne 500.000 tisic pohybu za rok. Pak se to vyprazdni
> a nahradi pro kazdou kartu jednim prijmem.

To by se dalo pouzit jen v omezene podobe.
Kdybys napr. stavy na skladu zobrazoval vzdy jen na formulari pro
jednu kartu nebo pro jejich velmi omezeny pocet, tak by to fungovalo dostatecne
rychle. Jinak by to ale opravdu pro velke mnozstvi karet a hlavne pohybu
fungovalo
dosti pomalu. Asi by se znacne zpomalily i vypocty vychazejici z techto stavu.

Lepsi je dat polozku stavu na kartu a integritu zajistit trigrem, ktry
stav zaktualizuje pri kazde zmene na databazi pohybu tak, ze tyto pohyby secte
a zapise na kartu. To se zpravidla provadi vzdy pro velmi omezeny pocet karet
(i pohybu) pri ukladani jednoho dokladu. Stavy potrebujes ovsem vedet stale ...
i pri tvorbe kazde polozky dokladu - a tam by zpomaleni bylo bolestnejsi
nez pri ukladani dokladu, ktery se uklada najednou a urcite zdrzeni uz
neni tak zavazne.
Jaro
>
> Dekuji za nazory.
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Cerneho 58/60, 635 00
> tlf. : + 420 5 4622 3491
> fax : + 420 5 4622 3470
> GSM : + 420 603 85 75 15
>

Default usesname and password for Intebase ?

[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 28.1.2000 03:58:04

Ake je Default usesname and password for Intebase ?
Meno pyta SYSDBA ale ake je heslo


Hi Roland ?

Jakou DB zvolit?

[*] Jaro <jaro(zv)sinea(tec)cz> - 27.1.2000 19:10:00 -0800

>
> Ahoj vsem,
>
> chtel jsem se zeptat nezli sahnu po necem a pak to budu predelavat do jine
> db (asi to vsichni zname).
>
> Potreboval bych asi takovou db. Pristup 5 uzivatelu soucasne, pocet polozek
> cca
> 1 000 000. Nejdulezitejsi je vsak aby DB umela radit jeden klic podle
> jednoho jazyka a dalsi dle jineho. Tech 5 mozna 7 uzivatelu do toho bude ale
> busit porad. Dalsi pozadavek aby mela pole na kterych se to vse odehrava
> vetsi nez 255 delku (samozrejme indexy na nich atd).

Tve pozadavky zvladne vetsina databazovych serveru
Jaro

>
> Doufam ze nejsou me pozadavky moc "out of order".

>
> Diky za jakekoli namety.
>
> Tomas
>

SQL & Commit & RoolBack

[*] Jaro <jaro(zv)sinea(tec)cz> - 27.1.2000 19:10:02 -0800

Pokud jsi nepouzil Database.StartTransaction a Database.Commit
nebo Database.RolBack, pak se uplatni tzv. AutoCommit po
kazdem radku nastaveny jako vlastnost BDE.
Zalezi ovsem jeste na nastaveni RequstLive na TQuery.

Co ovsem vubec nechapu je, proc jedes pres BDE, kdyz mas
Delphi 5! Nalistuj si zalozku Interbase a na BDE zapomen.
Tam je pro transakce samostatny objekt, takze si muzes ridit
transakce jednotlivych tabulek nebo jejich skupin dle libosti.
Krom toho se zbavis molochu BDE
Jaro

>
> Hi,
> Jiz predem se omlouvam za rozsahly mail, ale neumim to popsat
> strucneji.
>
> Maly dotaz, nechapu nasledujici chovani, muze mi to nekdo prosim
> vysvetlit.
> Pouzivat D5, Interbase ( Ladil jsem na lokalnim dodanem s
> DELPHI) a komponenty z DELPHI, ktere nepouzivaji SQL.
> Pouzil jsem TQuery a tam select * from table, samozrejme
> databazi a transakci, Potom jsem tam dal TUpdateQuery tam
> vypsal ModifySQL polozil DateSource a DataGrid.
> A ted pozor uzivatel prepise jeden zaznam, prejde na jiny, tim se
> udela post, ale zmeny nejsou videt z jine stanice ( to chapu nikdou
> neudelal commit. potom stiskne tlacitko kde je jediny radek kodu
> Transakce.rollback. To samozrejme uzavre Query, ale POZOR ulozi
> zmeny to znamena provede commit. Jak to ? To nejde
> RollBacknout ? Co delam spatne ????
>
> Dekuji za pokus o vysvetleni.
> V Helpu jsem nic nenasel. Staci i odkaz na nejakou literaturu.
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Cerneho 58/60, 635 00
> tlf. : + 420 5 4622 3491
> fax : + 420 5 4622 3470
> GSM : + 420 603 85 75 15
> Memo1


konverze cisel

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.1.2000 06:22:30

Zkus pouzit StrToInt('$' + HexaPrezentace)

Jan Fiala
----- Original Message -----
From: Libor Nosek Zdravim vsechny.
Morim se s tokovou blbosti.
Potrebuju prevadet cislo na hexreprezentaci - to je jasne pres funkci inttohex.
Ale nemuzu najit opacnou funkci. tedy hextoint.
Nemate nekdo odkaz nebo radu?

Diky
Libor Nosek


Pozdrav

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.1.2000 06:26:12

Podivej se ho helpu na funkce
WinExec
ShellExecute

Jan Fiala

----- Original Message -----
From: David Viktora <viktora(zv)volny(tec)cz>> Zdravim,
>
> jsem novacek v Delphi, presto se mi povedlo udelat par kupodivu funkcnich
> aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
> program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam me
> to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky
> jednodussi zpusob?
>
> Dik za radu.
>
> David Viktora
>
>

Win 2000 (was RE: pripojeni k internetu)

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 28.1.2000 06:31:54

Urcite jsi nainstaloval RC1 a pak pres nej RC2. Podivej se do adresare
WinNT\System32\DLLCache a vse co tam je muzes vymazat - jsou to starsi verze
DLL, ktere byly nahrazeny novejsimi (asi 200 MB)

Jan Fiala

----- Original Message -----
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>>
> > 17.2.2000 budou W2000 oficialne k dispozici
> > a udajne to ma byt RC3.
> ****Komplet RC3 nebo to prelozili bez spousty ladicich
> informaci? Myslim, ze 600 MB, co mi tu RC 2 zabiraji je preci
> jenom trosku moc.
>
> > Delphi 5 na tom chodi velmi dobre a D4 se da take zprovoznit.
> ****Mohu jen potvrdit.
>
> Slavek
>
> > Jaro
>
>
> -------------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> -------------------------------------------------
> http://www.swnet(tec)cz
> Magazin informacne vyspelych jedincu
> -------------------------------------------------
>

Pozdrav

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 28.1.2000 07:25:43

Podivej se do WinApi.hlp na funkci ShellExecute.

Martin

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================
> aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
> program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam me

Word dokument

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 28.1.2000 07:41:55


> -----P�vodn� zpr�va-----
> Od: Michal Hlav�� [mailto:7hlavac(zv)st.fmph.uniba.sk]
> Odesl�no: 27. ledna 2000 15:24
> Komu: Delphi F�rum
> P�edm�t: OT: Word dokument
>
>
> Zdravim,
> sorry za OffTopic, ale mam jeden velky problem. mame wordowsky file s
> dolezitymi datami a nejde otvorit. Chyba pri otvoreni suboru. Pritom
> kopirovat, prezerat a editovat ide. Pravdepodobne hlavicka
> suboru. Neviem
> co mam robit.

Nechapu to. Ty editujes zavreny soubor? To ja neumim,
ja ho musim nejdriv otevrit a potom teprve muzu editovat.
Bylo by dobre dotaz upresnit a poslat i chybovou hlasku,
kterou to hlasi. To, ze soubor nejde otevrit, mi vubec nic nerika,
zvlaste v kombinaci s vetou, ze jde prohlizet a editovat.

Jura


Pozdrav

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 28.1.2000 07:47:38



> -----P�vodn� zpr�va-----
> Od: David Viktora [mailto:viktora(zv)volny(tec)cz]
> Odesl�no: 27. ledna 2000 22:23
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Pozdrav
>
>
> Zdravim,
>
> jsem novacek v Delphi, presto se mi povedlo udelat par
> kupodivu funkcnich
> aplikaci a narazil jsem na problem - jakym zpusobem muzu
> spustit jiny exe

Najdi si v helpu WinAPI funkci ShellExecute

Jura


Windows 2000 vs Delphi4

[*] BYS5_Delphi_Diskusia(zv)softip.sk - 28.1.2000 07:49:00

Pozdravujem vsetkych ucastnikov diskusie ako aj vsetkych okoloiducich.

Prosim Vas, neskusal niekto z Vas pracovat v Delphi 4 C/S pod Windows 2000
Premium ? Ja som to skusal, ale na rozdiel od RC2 a RC3, kde D4 chodilo bez
problemov, ostra verzia W2000 priniesla so sebou take zmeny, ktore D4
nedokaze bez problemov zvladnut.


Dakujem za kazdy napad.


Marek Sedliak
msedliak(zv)softip.sk


Windows 2000 vs Delphi4

[*] BYS5_Delphi_Diskusia(zv)softip.sk - 28.1.2000 07:50:51

Pozdravujem vsetkych ucastnikov diskusie ako aj vsetkych okoloiducich.

Prosim Vas, neskusal niekto z Vas pracovat v Delphi 4 C/S pod Windows 2000
Premium ? Ja som to skusal, ale na rozdiel od RC2 a RC3, kde D4 chodilo bez
problemov, ostra verzia W2000 priniesla so sebou take zmeny, ktore D4
nedokaze bez problemov zvladnut.


Dakujem za kazdy napad.


Marek Sedliak
msedliak(zv)softip.sk


DBGrid versus Table

[*] Zbynek Ceska <zbyces(zv)physics.muni(tec)cz> - 28.1.2000 08:05:15


Preji vsem prijemny den.

Obracim se na vsechny s malou prosbou o radu:

Mam Delphi 4, DBase (dbf) a pouzivam Table a DBGrid. Dela mi to neco
podivneho. Kdyz chci zadat dalsi polozku, tak sjedu o radek niz (pod
posledni radek) a vtvori se mi dalsi radek.
Podotykam, ze dopisu hodnotu do urciteho ramecku a potom aniz bych
zmackl ENTER popojedu sipkou dolu.

Zvlastni je, ze kdyz mam DBGrid vyplneny jenom do pulky okna, tak
mi tam potom naskoci "hnede" okenko a ja si muzu popojet na jakykoliv
sloupec vpravo ci vlevo. Ale pokud mi uz DBGrid naplneny az dolu a
posunutim se to vse SCROLUJE nahoru, nenaskoci mi dole "hnede" okenko, ale
uz primo okenko s otevrenou editaci. A tam se pochopitelne posouvat vpravo
a vlevo neda.

Netusite nekdo, kde je problem, proc to tak dela a co muzu udelat,
aby to delalo pokazde to stejne. Prece by se DBGrid nemel chovat pokazde
jinak.

Snad jsem to objasnil dost srozumitelne, chtelo by to videt. Ale
Vy me urcite rozumite.

PREDEM DIKY MOC ZA RADU.

Zbynek Ceska

PS: Me by to az tak nevadilo, ale zakaznika to pry rozcilluje.*************************************************************************
** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
** Plasma Physics ** High Technology Physics ** Microwave Physics **
*************************************************************************

MIDAS-registrace

[*] tomas.mazurek(zv)vitkovice(tec)cz - 28.1.2000 07:11:03

Hello,

jen tak zkusno jsem si zkousel priklady z D5 DEMOS/MIDAS/ADHOC.
Kdyz jsem mel klienta i servr na jednom PC, slo vse v pohode. Ovsem v
okamziku, kdyz jsem klienta prenesl na jine PC, komponenta
TDCOMConnection. vypisovala hlasku: Not available server, i kdyz u ni
ComputerName, ServerGUID a ServerName byl nastaven OK. Neni treba
jeste server nejak registrovat?

Dik...

TM


generovani nazvu

[*] sup(zv)svitap(tec)cz - 28.1.2000 8:28:22

Dobry den, mam malinkaty problem. Mam za ukol vygenerovat nazvy v tomto
rozmezi : A...ZZZZZZZZ.
Asi takhle: A,B,C...Z,AA,AB,AC...AZ,BA,BB,BC az po
ZZZZZZZX,ZZZZZZZY,ZZZZZZZZ.
Jsem az po usi zamotanej do vselijakejch for...end, if...else...end a
repeat...until, ale furt se mi to nedari... :-(((((( Poradte mi prosim
nejakej algoritmus, nez se z toho zblaznim...
W98,D3Profi.

PS: Prave jsem se dozvedel, ze nejen interval A..Z, ale A..Z + 0..9.
Bueeeee!

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


SQL & Commit & RoolBack

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 28.1.2000 08:42:37

Sorry psal jsem fsude TQuery atd. ale samozrejme pouzivam
TIBQuery atd.,....
Otazka je to u nich stejne ???

Muzu to mit na jine transakci nez default u dqatabase ?

Musim delat StartTransaction, kdyz transakce uz je spustena
automaticky ????

Co se stane, kdyz jeste nedam commit a jiny uzivatel se to
pokusi zmenit ???

Mohl by nekdo zkusit popsat neco strucne o tom jak pouzit ty
zatraceny transakce, tak aby mi to fungovalo. Ja do ted delal na
paradoxu a kdyz uz delat na interbase tak poradne. Trigery a
podobne veci uz jsem pochopil a tam funguje fsechno sqele, jen ty
transakce mi nedaj spat. Princiiip samozrejme chapu, ale detaily
realizace ne. Diky Radek


From: "Jaro" <jaro(zv)sinea(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Subject: RE: SQL & Commit & RoolBack
Date sent: Thu, 27 Jan 2000 19:10:02 -0800
Send reply to: delphi-l(zv)fwd(tec)cz

> Pokud jsi nepouzil Database.StartTransaction a Database.Commit
> nebo Database.RolBack, pak se uplatni tzv. AutoCommit po
> kazdem radku nastaveny jako vlastnost BDE.
> Zalezi ovsem jeste na nastaveni RequstLive na TQuery.
>
> Co ovsem vubec nechapu je, proc jedes pres BDE, kdyz mas
> Delphi 5! Nalistuj si zalozku Interbase a na BDE zapomen.
> Tam je pro transakce samostatny objekt, takze si muzes ridit
> transakce jednotlivych tabulek nebo jejich skupin dle libosti.
> Krom toho se zbavis molochu BDE
> Jaro
>
> >
> > Hi,
> > Jiz predem se omlouvam za rozsahly mail, ale neumim to popsat
> > strucneji.
> >
> > Maly dotaz, nechapu nasledujici chovani, muze mi to nekdo prosim
> > vysvetlit.
> > Pouzivat D5, Interbase ( Ladil jsem na lokalnim dodanem s
> > DELPHI) a komponenty z DELPHI, ktere nepouzivaji SQL.
> > Pouzil jsem TQuery a tam select * from table, samozrejme
> > databazi a transakci, Potom jsem tam dal TUpdateQuery tam
> > vypsal ModifySQL polozil DateSource a DataGrid.
> > A ted pozor uzivatel prepise jeden zaznam, prejde na jiny, tim se
> > udela post, ale zmeny nejsou videt z jine stanice ( to chapu nikdou
> > neudelal commit. potom stiskne tlacitko kde je jediny radek kodu
> > Transakce.rollback. To samozrejme uzavre Query, ale POZOR ulozi
> > zmeny to znamena provede commit. Jak to ? To nejde
> > RollBacknout ? Co delam spatne ????
> >
> > Dekuji za pokus o vysvetleni.
> > V Helpu jsem nic nenasel. Staci i odkaz na nejakou literaturu.
> >
> > S pozdravem Radek KALA
> > BetaControl, s.r.o.
> > Cerneho 58/60, 635 00
> > tlf. : + 420 5 4622 3491
> > fax : + 420 5 4622 3470
> > GSM : + 420 603 85 75 15
> > Memo1
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


Pozdrav

[*] sorbo <sorbo(zv)centrum(tec)cz> - 28.1.2000 08:43:04

> ... narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
> program z prostredi sve aplikace? ...

- mrkni se na Windows API funkci ShellExecute.
Pokud si to dobre pamatuji, soucasti Delphi (2) bylo i demo
filemanageru s prikladem pouziti
(\Borland\Delphi2.0\DEMOS\DOC\filmanex\FMXUTILS.PAS)

sorbo

Pozdrav

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 28.1.2000 08:48:36

Najjednoduchsie cez pr�kaz ShellExecute (0, PChar('open'),
PChar('Program.exe'), NIL, PChar(''), SW_RESTORE);

Najdi si help vo WinAPI 32 Help.

----- Original Message -----
From: David Viktora <viktora(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 27, 2000 10:23 PM
Subject: Pozdrav


> Zdravim,
>
> jsem novacek v Delphi, presto se mi povedlo udelat par kupodivu funkcnich
> aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
> program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam
me
> to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky
> jednodussi zpusob?
>
> Dik za radu.
>
> David Viktora
>
>

Rychlost INSERTu pres ADO

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 28.1.2000 08:52:00

"Zajimava zkusenost s inserty do DBF pres ADO"

Ahoj,

kolega insertoval do DBF z Delphi 5 pres MDAC 2.1 s pouzitim ADODataSet;
Bylo to strasne pomale; Nastaveni cDirectTable mu fungovalo jen s
cClientCursorLocation;
Pokus cDirectTable s cServerCursorLocation mu hlasil nejakou chybu s
Bookmarkama pri volani Open;
Na mem PC cDirectTable a cServerCursorLocation fungovalo a bylo mnohem
rychlejsi.
Rozdil byl dany verzi MDAC. Mel jsem MDAC2.1 (myslim, ze SP2). Kolega mel
MDAC2.1 ale starsi verzi
(poznali jsem podle Properties / verze providera
"Microsoft.JET.4.0.Driver").
Tedy vrele doporucuji stahnout nejnovejsi verzi MDAC.

S pozdravem, Ladislav Nagy


> Delphi 4 (SP2), Win95 OSR2, MDAC 2.1, Adonis
>
> Cau,
>
> 1) mam pro ukazku jednoduchou TTable (paradox pres BDE) s polozkama JMENO
> (CHAR 20) a PRIJMENI (CHAR 20). Pokud do ni v cyklu pridam 10000 polozek
> (Append -> Post) tak to trva asi 3 vteriny a vysledna velikost *.DB
> souboru je asi 500kB
>
> 2) mam TADOTable (z Adonisu) se stejnyma polozkama jako v pripade (1) pres
> ODBC Driver for Paradox. Pridani 10000 polozek (Append -> Post) trva
> nekolik minut a velikost souboru je stejna...
>
> 3) nebyl jsem spokojen a pripojil jsem se pres ADOTable,
> Microsoft.JET.4.0.Driver (nebo tak nejak) na *.MDB soubor v ocekavani
> brutalni rychlosti. Vysledek: pridani 10000 polozek trvalo opet minuty a
> vysledna velikost souboru byla pres 7 (slovy SEDM!!!) mega...
>
> Ono se na BDE obcas pekne nadava (i kdyz je proc), ale ted mi nekdo
> poradte, co si mam zvolit za format souborovy databaze a pres co na ni
> pristupovat, abych nemusel roky cekat nez se neco provede (a to se mi ten
> Adonis tak libil). Svizny pridavani tisicu zaznamu do tabulky neni vymysl,
> to bych opravdu potreboval...
>
> Petr Fischer
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
>
>

konverze cisel

[*] rdocekal(zv)csas(tec)cz - 28.1.2000 09:04:07

Zkus StrToInt('$'+ HexStr)

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

-----P�vodn� zpr�va-----
Od: Libor Nosek [mailto:nosek(zv)ujf.cas(tec)cz]
Odesl�no: 27. ledna 2000 21:43
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: konverze cisel


Zdravim vsechny.
Morim se s tokovou blbosti.
Potrebuju prevadet cislo na hexreprezentaci - to je jasne pres funkci
inttohex.
Ale nemuzu najit opacnou funkci. tedy hextoint.
Nemate nekdo odkaz nebo radu?

Diky
Libor Nosek


OT: Nabidka zamestnani

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 28.1.2000 09:08:25

Ahoj omlouvam se za OT,

ale kde jinde hledat programatory v Delphi nez v Delphi konferenci.

S pozdravem, Ladislav Nagy


SW firma Baader Computer se 100% zahranicni ucasti hleda dva programatory na
plny nebo castecny uvazek.

Moznost zarazeni do pracovni skupiny, ktera by se mela vyhledove stat
zakladem nove pobocky v Ceskych Budejovicich a nebo do prazske pracovni
skupiny.

Pozadujeme:
* zodpovednost
* logicke mysleni
* ochotu a schopnost dalsiho sebevzdelavani
* zakladni teoreticke znalosti z oblasti databazovych systemu
* znalost jednoho z jazyku - Aj, Nj
* zkusenosti s programovanim v Delphi

Vyhodou:
* zkusenosti s MS SQL

Preferujeme:
* praci na plny uvazek, u castecneho uvazku uprednostnujeme studenty

Nabizime:
* zajimavou dobre ohodnocenou praci v mladem kolektivu
* profesni rust
* pro studenty VS moznost studijniho volna


V pripade zajmu zaslete svuj strukturovany zivotopis na
Alena.Bastova(zv)bcpraha.com.

Baader Computer, s.r.o.
Sokolska 66
120 00 Praha 2
tel: 02 - 24 94 19 62


Skript pre MSSQL

[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 28.1.2000 09:08:58

Takze:
CASE neni prikaz ale vyraz -> normalka ho pouzijes v selectu (i v takovem,
ktery spoustis pres Query)
IF, WHILE a begin|end muzes normalne pouzit i ve skriptu:

TADOQuery.SQL.Clear;
TADOQuery.SQL.Add('while blabla');
TADOQuery.SQL.Add('begin');
TADOQuery.SQL.Add('bla sdvf');
TADOQuery.SQL.Add('end');
atd.

Melo by to jet - zkousel jsem i takovy prikazik jako SHUTDOWN.
Zjistit stav, s jakym davka ukoncila zpracovani muzes udelat napr. tak, ze
ve scriptu provedes SELECT s priskusnym kodem, kteremu bude tvuj program
rozumet.


Osobne bych asi v pripade casto se opakujicich skruiptu sahnul po lozene
procedure, ta je mnohem efektivnejsi.
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Miroslav Hro��o
Sent: Thursday, January 27, 2000 2:49 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Skript pre MSSQL


M�m na mysli prikazy typu :

While ... do ...
If ... then ... else ...
Case ... of ...
Begin ... end

Tieto �tukt�ry neviem posla� cez ADOQuery.

Ja by som potreboval vlatne vedie� vysledok programu OSQL, a to tipu TRUE
alebo FALSE.


Miro. -----P�vodn� spr�va-----
Od: Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 27. janu�r 2000 10:59
Predmet: RE: Skript pre MSSQL


A mohl by jsi mi priblizit co myslis tou "celou skalou prikazov jazyka
Tansact-SQL, ktor� podporuje MSSQL 7.0" ?
Ja az do tedka zil v tom, ze pres adoquery lze pustit jakykoliv prikaz
T-SQL.

Navic, jak se domnivam (po kratkem nahlednuti do dokumentace), je
utilita OSQL urcena pro volani davek na SQL z ruznych command-line skriptu a
tedy pro noramlni pouziti v Delphi programu nevhodne.

Jinak informace o utilite OSQL zjistis v SQL Server Books OnLine.
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================


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


Pozdrav

[*] Lubo� RYBN��EK - 28.1.2000 09:11:11

Taky zdravim,

jde to docela jednoduse. Muzes pouzit ShellExecute (tusim ze to je z unity
ShellAPI)

procedure OpenObject(sObjectPath : PChar);
begin
Screen.Cursor := crAppStart;
try
ShellExecute(0, Nil, sObjectPath, Nil, Nil, SW_NORMAL);
finally
Screen.Cursor := crDefault;
end;
end;

a pak to pouzijes treba takhle (je asi jasny co to udela):
CoOtevrit := 'C:\windows\calc.exe';
OpenObject(PChar(CoOtevrit));

Vyhoda tohohle reseni je v tom, ze muzes otevrit cokoliv, co system znaNapr:
CoOtevrit := 'http://www.zive(tec)cz'; //otevre defaultni browser se strankou
Zive
CoOtevrit := 'X:\dopis.doc'; //pusti (treba) Word a v nem dopis.doc
CoOtevrit := 'mailto:delphi-l(zv)fwd(tec)cz'; // co to asi udela? :-)

No a to je cela veda
LR

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
David Viktora
Sent: Thursday, January 27, 2000 10:23 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Pozdrav


Zdravim,

jsem novacek v Delphi, presto se mi povedlo udelat par kupodivu funkcnich
aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam me
to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky
jednodussi zpusob?

Dik za radu
David Viktora

OT: pripojeni k internetu

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 28.1.2000 09:13:01

Mne to chodi, bez problemu :-)
Chtelo by to podrobneji popsat priznaky...
### Zbysek Hlinka napsal dne 27 Jan 00, v 17:26 :
> Ahoj,
>
> pripojil se nekdo k internetu z Windows2000 RC2? Ja to nemohu
> rozchodit, a i privolany technik odesel se sklopenyma usima...
>
> Odpovedi prosim na muj mail.
>
>
> 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
>


-----------------------------------------------
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


SQL server zdarma

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 28.1.2000 09:14:46

Ahoj,
dostala se ke mne informace, ze pry
Winbase602 ma byt uz brzy zdarma nejen na
Linuxu, ale i na Windows!
Stoji to za tu cenu?

-----------------------------------------------
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


BDE

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 28.1.2000 09:23:15

> Mam sitovou PARADOX tabulku se sitovym NETDIRem a na jedne stanici provedu
zmenu v teto tabulce
> Soucasne pripojena stanice vsak tuto zmenu zaregistruje az po nejake dobe
( cca 3-4 min).
>
> Lze to tedy nejak urychlit nebo prinutit k okamzite reakci?

Predpokladam, ze je nastaven LOCAL SHARE na TRUE. Na druhe stanici je treba
zavolat pro tabulku refresh. Napr. si tam dat casovac a jednou za 15 sec.
tabulku refreshnout. Ma to vsak jednu neprijemnost, protoze pri refreshi
tabulka poskoci a prave akualni zaznam se zobrazi uprostred gridy.

J. N�dhera

CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz

Co je to za blbost? (FillRect)

[*] Foldyna Ji�� <jiri.f(zv)avizo(tec)cz> - 28.1.2000 09:25:17

Ahoj,

ja bych rekl, ze to je docela logicke - asi se mi nepodari nakreslit caru,
jejiz sirka je jeden pixel a ktera by byla adresovana v intersticialnich
souradnicich - to by musela jit rozsviti pulka pixelu :-). Analogicky pro
vyplnovani plochy musim jednoznacne rici, kde plocha konci a to zase nemuze
byt souradnice stredova, protoze jak jiz receno, neumim vysvitit pulku
pixelu. Tim padem musim pouzivat oba druhy souradnic a z kontextu ulohy
musim zvolit ten spravny. Takhle to aspon vidim ja...

Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> Ahoj,
>
> a co je vlastne vyhodne na nize popsanem zpusobu? Me to
> pripadne znacne matouci.
>
> Slavek
>
> > Existuji dva zpusoby, kterymi se pracuje se souradnicemi.
> > Souradnice stredove - prochazi stredem pixelu
> > Souradnice intersticialni - prochazi rozhranim mezi pixely.
> > Funkce pro praci s pixelem, primkami a krivkami
> > pracuji se stredovymi souradnicemi, naproti tomu
> > pri praci s uzavrenymi obrazci se pouzivaji souradnice
> > intersticialni.
> > ...
> > Mozna se to nekomu zda nelogicke, ale je to tak.
> > VCL je v tomto zcela nevinne. Toto je dano z GDI.
> >
> > Vaclav Krmela


Pozdrav

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 28.1.2000 09:46:08

> jsem novacek v Delphi, presto se mi povedlo udelat par kupodivu funkcnich
> aplikaci a narazil jsem na problem - jakym zpusobem muzu spustit jiny exe
> program z prostredi sve aplikace? Patral jsem v delfackem helpu, ale tam
me
> to odkazalo na stream procecy a multi-threads aplikace. Neexistuje nejaky
> jednodussi zpusob?

Treba takto:

Procedure (const Cmd: String);
var
ProcessInfo: TProcessInformation;
StartupInfo: TStartupInfo;
begin
FillChar(StartupInfo, SizeOf(StartupInfo), 0);
CreateProcess(nil, PChar(Cmd), nil, nil, False,
CREATE_DEFAULT_ERROR_MODE + NORMAL_PRIORITY_CLASS,
NIL, NIL, StartupInfo, ProcessInfo);
end;

kde Cmd je cesta + vlastni exe. A asi bz to jeste chtelo osetrit, kdzy se to
nepovede.

J. N�dhera

CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz

----- Original Message -----
From: David Viktora <viktora(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 27, 2000 10:23 PM
Subject: Pozdrav


>
> Dik za radu.
>
> David Viktora
>
>

Nahrada SYSUTILS

[*] Robert Kindl <rob(zv)exec(tec)cz> - 28.1.2000 09:49:40

> Zkousel jsem ten Y2K.ZIP, tam je hlavne ten zkompilovany FFMT.OBJ,
> ali i SYSUTILS.DCU. To sa mi pak podarilo zkompilovat, novy SYSUTILS.DCU
> jsem dal do \Lib. Zkompilovany byly i vsechny VCL komponenty. Ale pak
> jsem narazil: aby se zmena promitla do napr. TDBEDIT
> neno TDBGRID, bylo by nutne zrejme vytvorit run-time package VCL30.DPL
> nebo run-time package collection VCL30.DCP. A tady jsem skoncil,
> neb nemam zdroj VCL30.DPK .
> Tak toto nebude to prave orechove, asi by se musela prekompilovat
> cela soustava VCL vcetne packages to se mi vubec nelibi.
> Diky za namety
> L.Lustyk z elektrarny na elektricky proud

Teoreticky mas pravdu, ale
- runtime package je jen VCL30.DPL.
- pokud nepouzivas balicky tak neni treba VCL30.DPL rekompilovat ani
distribuovat
- muzes zkusit kompilovat primo zdroje (tj. das cestu do SOURCE\RTL resp
SOURCE\VCL)

Rob



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