Archív konference Delphi

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

Zmena polozky v RT

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.1999 00:41:04

Pavel Junek wrote:
>
> Zdravicko,
>
> da se nejak zmenit typ polozky (paradox) pri behu programu?
>
> Konkretne by me zajimal autoinkrement na longint a naopak, ale rad bych se dozvedel, jestli to jde obecne a jak (I treba rozsireni alfanumericke polozky z 10 znaku na 15, ...).
>
> Dekuji za odpoved

Ahoj,

Zmeny ve strukture Paradox tabulky muzes udelat pomoci BDE API funkce DbiDoRestructure.
Priklady mas v BDE API helpu a pak predevsim zde:

http://www.inprise.com/devsupport/bde/bdeapiex/dbidorestructure.html

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

ListBox + VerticalScroll

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.1999 00:46:13

Slavek Rydval wrote:
> > 1) Da se v Delphi 1 zabezpecit, aby listbox mel
> > vertikalni scrollbar?

Ahoj,

Vertikalni scrollbar se zobrazi jakmile do neho pridas vice polozek nez lze
zobrazit (viz odpoved Petra Zahradnika).

> > Mam tam totiz dlouhe nzavy a chtel bych, aby si uzivatel
> > mohl zobrazit postupne cely text.
> ****Na to jsem videl priklad asi ve dvou ucebnicich
> Delphi -- kapitola tvorba vlastnich komponent. Bohuzel si
> nevzpominam, v kterych. :-(

Pak budes potrebovat doplnit horizontalni scrollbar. Ve Win32 to lze udelat
takhle (mohlo by to jit i v 16bit), das to do OnCreate formulare:

SendMessage(ListBox1.Handle, LB_SETHORIZONTALEXTENT, 300, 0);

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

ListBox + VerticalScroll

[*] Ing. Marian Winkler <ag.art(zv)iol(tec)cz> - 29.3.1999 03:30:45


-----P�vodn� zpr�va-----
Od: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 28. b�ezna 1999 20:27
P�edm�t: Re: ListBox + VerticalScroll


> 1) Da se v Delphi 1 zabezpecit, aby listbox mel
> vertikalni scrollbar?
> Mam tam totiz dlouhe nzavy a chtel bych, aby si uzivatel
> mohl zobrazit postupne cely text.
****Na to jsem videl priklad asi ve dvou ucebnicich
Delphi -- kapitola tvorba vlastnich komponent. Bohuzel si
nevzpominam, v kterych. :-(

Slavek

**********
Xavier Pacheco
Steve Teixeira

Delphi - pruvodce vyvojare
kap. 11, str.268 ... Rozsireni komponenty TListBox

(horizontalni scrollbar ... zkus prekopat)

Marian Winkler
ag.art(zv)iol(tec)cz
> | Ing. Petr Jezek |


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


pomoc - lck 2

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 29.3.1999 06:55:51


> [Jan Sebelik]
> Tady neco nehraje.
> InterBase nema s Paradoxem nic spolecneho, soubory
> paradox.lck vxnikaji pouze tehdy, jestlize pouzivam tabulky Paradox.
>

Me vznikaji i tehdy, jestlize pouzivam MS SQL ODBC driver.

> BDE take samo o sobe nema s Paradoxem nic spolecneho, pouze
> spousti Paradox Driver, pokud pristupuje k jeho tabulkam.
>
> Pracuje-li BDE s InterBase, do zadnych adresaru nic
> nezapisuje (takze pristup Read/Write s tim nema nic spolecneho).
> BDE komunikuje prostrednictvim InterBase SQL linku se
> Serverem InterBase. Ten pak saha do prislusneho .gdb souboru
> vlastnimi prostredky.

Nevim, jak InterBase, ale pri pouziti MS SQL je treba mit
nastaven NET DIR pro paradox na adresar s pravem zapisu.
to je kvuli tomu *.LCK.
Stejne tak je potreba mit nastaven aktualni adresar
aplikace na adresar s pravem zapisu. Tam vznikaji
nejake docasne soubory (nechapu). Uz jsem to sem jednou
psal, ja nechavam nastavovat do NET DIR C:\ a aplikaci
nechavam uzivatele spoustet shortcutem se startovnim adresarem
C:\ (a nikde v aplikaci ho nemenim).
Nevim, co je v BDE pomasteno, ale pusobi to na me dojmem, ze
primarne bylo BDE pro borlandi databaze a obecny pristup
tam byl dodelan dodatecne (a nedostatecne).

Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

Spustanie cudzej aplikacie a cakanie na jej koniec

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 29.3.1999 06:05:17

Ahoj,

zde je priklad ze zivota: Pokud potrebujes pockat, az bude volany
program ukonceny, je dobre pouzit funkci CreateProcess, kde se da treba
nastavit, jak dlouho se ma na ukonceni cekat a mnoho dalsich veci. Zde
je priklad, jak pockat, az se program ukonci (v tomto pripade jde o
volani programu AUDATEX.EXE s parametrem /tupdate):

function AudaPadUpdate(DirName:PChar):integer ; stdcall;export;
var Dir,AudaPadPath:string;
i:integer;
ProcessInfo:TProcessInformation;
StartupInfo:TStartupInfo ;
begin
i:=0;
Dir := StrPas(DirName);
AddBackSlash(Dir);
if FileExists(Dir+'AUDATEX.EXE') then
begin
AudaPadPath := Dir + 'AUDATEX.EXE /tupdate'+#0;
with StartupInfo do
begin
cb:=sizeof(StartupInfo)
lpReserved:=nil;
lpDesktop:=nil;
lpTitle:=nil;
dwX:=0; dwY:=0;
dwFlags:=STARTF_USESTDHANDLES;
wShowWindow:=SW_SHOWDEFAULT;
cbReserved2:=0;
lpReserved2:=nil;
end;
if
CreateProcess(nil,PChar(AudaPadPath),nil,nil,false,CREATE_SEPARATE_WOW_V
DM,nil,
nil, StartupInfo, ProcessInfo) then
WaitForSingleObject(ProcessInfo.hProcess,INFINITE);
AudaPadUpdate:= GetLastError;
end

************************************************************************
*******************************

Petr Brant [p.brant(zv)samo(tec)cz] programator v MSVC++, obcas Delphi nebo
Visual Basic

************************************************************************
*******************************
> -----P�vodn� zpr�va-----
> Od: Roman Toda [SMTP:normex(zv)mail.pvt.sk]
> Odesl�no: 27. b�ezna 1999 13:34
> Komu: Delphi-L
> P�edm�t: Spustanie cudzej aplikacie a cakanie na jej koniec.
>
> A do tretice este jedna otazka.
>
> Chcem z mojho programu otvorit povedzme Word (ale v podstate lubovolnu
> aplikaciu) a pockat ked sa tento ukonci a potom pokracovat v
> spracovavani.
>
> Napr. Otvorim okno v ktorom mam Button Otvor. Stlacim Otvor a spusti
> sa Word
> a pocas jeho behu sa neda nic robit v okne (ked ho zavriem zavrie sa
> Word) a
> ked ukoncim Word moje okno sa zavrie tiez. Da sa to ??
>
> Roman Toda
> mailto:normex(zv)mail.pvt.sk
> http://www.technickenormy.com
> Normex l.t.d. - fulltext for technical standard
>

Zjisti hloubku barev

[*] lukas.kubasek(zv)post(tec)cz - 29.3.1999 08:00:03

Pot�ebuji API funkci nebo n�vod, jak zjistit ve Windows hloubku barev aktu�ln�ho grafick�ho re�imu.
(tj. 256 barev/High Color/True Color)

P�edem D�kuji. Kubas.

Odepi�te pros�m na: mouser33(zv)atlas(tec)cz

PATH sput�n�ho EXE

[*] lukas.kubasek(zv)post(tec)cz - 29.3.1999 08:11:52

R�d bych v�d�l, jak m�m zjistit plnou cestu EXE programu, kter� pr�v� b�� v pam�ti.
Funkce ExpandFileName vr�t� AKTU�LN� adres��. �ili kdy� spust�m program "d�lkov�" (nap� p�es BAT d�vku z jin�ho adres��e, ne� kde m�j EXE je), vr�t� tato funkce adres�� BATu a ne EXE souboru.
D�kuji za v�echny rady. Kubas.
Odpov�zte pros�m na: mouser33(zv)atlas(tec)cz

Tisk z RichEditu

[*] lukas.kubasek(zv)post(tec)cz - 29.3.1999 08:19:41

Jak m�m nastavit okraje str�nky p�ed tiskem z RichEditu metodou Print?

D�kuji za v�e. Kubas.

Odepi�te pros�m na: mouser33(zv)atlas(tec)cz


Pozice aktivni bunky v DBGridu

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 29.3.1999 08:25:49

> -----Original Message-----
> From: Polak Jiri [mailto:Jiri.Polak(zv)tconsult(tec)cz]
> Sent: Friday, March 26, 1999 9:24 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Pozice aktivni bunky v DBGridu
>
> Hola, nevite nekdo, jak zjistit
> Top a Left aktivni bunky v DBGridu?
> Nic se mi zatim nepodarilo najit.

Odpovidam si sam. Pro ty, kteri by chteli kod vyuzit,
uvadim, ze je free.
Zjistil jsem, ze pozadovane vlastnosti jsou na predkovi,
ale pouze protected. Je tedy treba udelat potomka a v nem si je
zverejnit.
V unitu MyDBGrids je definovana komponenta s properties
ActiveCellLeft, ActiveCellTop, ActiveCellHeight, ActiveCellWidth.
Mimoto jeste zverejnuje indexy aktivni bunky Col a Row.

unit MyDBGrids;

interface

uses
DBGrids, Classes, Forms;

type
TMyDBGrid = class(TDBGrid)
private
//funkce vraceji pozici aktivni bunky
function GetActCellLeft: integer;
function GetActCellTop: integer;
function GetActCellWidth: integer;
function GetActCellHeight: integer;
published
//Zverejneni udaju o aktivni bunce
property ActCellLeft: integer read GetActCellLeft;
property ActCellTop: integer read GetActCellTop;
property ActCellWidth: integer read GetActCellWidth;
property ActCellHeight: integer read GetActCellHeight;
//Zverejni Col a Row
property Col;
property Row;
end;

procedure Register;

implementation

function TMyDBGrid.GetActCellLeft: integer;
var
i: integer;
begin
//Okraj komponenty
if BorderStyle = bsSingle then
Result := 1
else
Result := 0;

//Nascitat sirky sloupcu
for i := 0 to Col - 1 do
Result := Result + ColWidths[i];

//Pricist sirky vsech ColLines
if dgColLines in Options then
Result := Result + Col + 1;

end;//procedure TMyDBGrid.GetCellLeft: integer;

function TMyDBGrid.GetActCellTop: integer;
var
i: integer;
begin
//Okraj komponenty
if BorderStyle = bsSingle then
Result := 1
else
Result := 0;

//Nascitat vysky radku
for i := 0 to Row - 1 do
Result := Result + RowHeights[i];

//Pricist sirky vsech RowLines
if dgRowLines in Options then
Result := Result + Row + 1;

end;//procedure TMyDBGrid.GetActCellTop: integer;

function TMyDBGrid.GetActCellWidth: integer;
begin
Result := ColWidths[Col];
end;//procedure TMyDBGrid.GetActCellWidth: integer;

function TMyDBGrid.GetActCellHeight: integer;
begin
Result := RowHeights[Row];
end;//procedure TMyDBGrid.GetActCellHeight: integer;

procedure Register;
begin
RegisterComponents('MyDB', [TMyDBGrid]);
end;

end.

Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

pocet radku v projektu

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 29.3.1999 08:26:56

> >
> > No tak pouzivej Build all.
> >
> Pak je to ale i se spoustou hlavickovejch souboru a ma to desetitisice radek.... To asi taky nebude to prave....
>
Melo by se to chovat tak, ze to pocita kompilovane radky.
Pokud jsou budou unity, ktere zapocitat nechces, pouze v .dcu, nemely by byt zapocitany.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
=========================================

PATH sputlniho EXE

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 29.3.1999 08:35:54

> -----Original Message-----
> From: lukas.kubasek(zv)post(tec)cz [mailto:lukas.kubasek(zv)post(tec)cz]
> Sent: Monday, March 29, 1999 8:12 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: PATH sputlniho EXE
>
>
> R�d bych vedel, jak m�m zjistit plnou cestu EXE programu,

Application.ExeName

nebo

ParamStr(0)

> kter� pr�ve bez� v pameti.
> Funkce ExpandFileName vr�t� AKTU�LN� adres�r.

To neni pravda. ExpandFileName prevadi relativni cestu na
absolutni. Navic nevim, proc to rikas, protoze s cestou ke spustenemu
EXE to nijak nesouvisi

> Cili kdyz
> spust�m program "d�lkove" (napr pres BAT d�vku z jin�ho
> adres�re, nez kde muj EXE je), vr�t� tato funkce adres�r BATu
> a ne EXE souboru.

To neni pravda. Zalezi na tom, jaky ma aplikace aktualni adresar.
A to nemusi byt adresar spousteneho souboru.

> Dekuji za vsechny rady. Kubas.
> Odpovezte pros�m na: mouser33(zv)atlas(tec)cz

Jura
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

Zjisti hloubku barev

[*] Libor Valka <valka(zv)brno.cas(tec)cz> - 29.3.1999 09:09:30

> lukas.kubasek(zv)post(tec)cz
> P�edm�t: Zjisti hloubku barev
>
> Pot�ebuji API funkci nebo n�vod, jak zjistit ve Windows hloubku
> barev aktu�ln�ho grafick�ho re?imu.
> (tj. 256 barev/High Color/True Color)
>
> P�edem D�kuji. Kubas.
>
> Odepi?te pros�m na: mouser33(zv)atlas(tec)cz
>

Ahoj,

mohlo by to jit treba takhle:

function GetSysColorsNumber(Canvas: TCanvas): LongInt;
begin
Result := (LongInt(1) shl GetDeviceCaps(Canvas.Handle, BitsPixel))
*LongInt(GetDeviceCaps(Canvas.Handle, Planes));
end;


Libor.
valka(zv)brno.cas(tec)cz
valka(zv)ipm(tec)cz


DBGrid a udalost pri zmene sirky sloupce

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 29.3.1999 09:11:31

Preji vsem pekneho dne,

potrebuji zjistit udalost, kdyz uzivatel zmeni sirku slopce
v DBGridu (neco jako OnColumnResized). Napoveda bohuzel mlci.

Cele to ma pak ten efekt, ze musim v options zakazat
dbColumnResize, coz ma zase ten efekt, ze nesmim menit poradi
sloupecku.

predem dekuji za rady

Slavek

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


Sledovanie adresara

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 29.3.1999 09:17:10

Na prvni zalezitost slouzi API funkce FindFirstChangeNotification a
FindNextChangeNotification, ale existuje na to nekolik free komponent
(na DSP nebo Torry).

> -----P�vodn� zpr�va-----
> Od: Roman Toda [SMTP:normex(zv)mail.pvt.sk]
> Odesl�no: 27. b�ezna 1999 13:34
> Komu: Delphi-L
> P�edm�t: Sledovanie adresara
>
> Ahoj vsetci.
>
> Potreboval by som sledovat isty adresar a vzdy ked sa v nom objavy
> nejaky
> subor tak ho spracovat. Da sa to urobit inac ako v timery testovat
> nove
> subory ??
> A ked by som chcel aby sa tento adresar zobrazoval v explorery s inou
> ikonou
> (ako napr. ked je adresar dany na zdielanie) ??
>
>
> Roman Toda
> mailto:normex(zv)mail.pvt.sk
> http://www.technickenormy.com
> Normex l.t.d. - fulltext for technical standard


Kompilace & chovani aplikace

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.3.1999 09:17:01

>
>Ale ano. Je to 100 x vyzkousene a overene. Pod Winframe (NT 3.5) je Integer
>16 bitovy.


reprezentaci typu definuje kompilator behem kompilace. Pokud pouzije 4 byty
na integer tak je bude pouzivat na kazde platforme. Programy ktere jsem
kompiloval na NT WKS 4.0 chodi na winframu v pohode...

Kdyby skutecne mel byt integer na WF 16 bitovy tak by bez rekompilace (a
nejspis i po ni) nechodilo vubec nic

Zdravi
D. Toman

pocet radku v projektu

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 29.3.1999 09:19:23

No prave. Staci dat na form nejakou komponentu (ne Inprise) a pribude
nekolik radku, ktere tam zustanou i pote, co je ta komponenta
odstranena.

> -----P�vodn� zpr�va-----
> Od: Ales Radikovsky [SMTP:Radik(zv)seznam(tec)cz]
> Odesl�no: 27. b�ezna 1999 10:10
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Re: pocet radku v projektu
>
> > >Jak jde zjistit pocet radku programu v projektu (ve vsech unitach
> > >dohromady) jednoduchym zpusobem ?
> > >Kdyz dam Project --> Information tak tam napise asi jenom pocet
> naposled
> > >zkopilovanych radku (alespon laicky odhaduji ... vzhledem k
> > >inkrementalnimu linkeru).
> >
> > No tak pouzivej Build all.
> >
>
> Pak je to ale i se spoustou hlavickovejch souboru a ma to desetitisice
> radek.... To asi taky nebude to prave....
>
> Ales
>
> -- http://email.seznam(tec)cz
> -- email zdarma na cely zivot


pomoc - lck 2

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 29.3.1999 09:34:55

Ak aplikaciu spustim priamo na servri, tak neni ziadny problem. Ani ziadny
LCK subor sa nevytvory. Iba ak aplikacia ktora je ulozena na servri v
sdielanom adresare a je spustena od klienta, vtedy sa vytvara LCK subor.
Vie mi niekdo vysvetlit preco je to tak ? A preco sa nevitvara LCK ani, ked
aplikaciu nakopirujem na kientsky PC a odtial spustim ?

(Je 100 %, ze nepouzivam paradox iba interbase.)

Poradili mi, ze mam nastavit iny Session.PrivateDir pre kazdu aplikaciu.
Avsak ja mam 14 aplikacii, preto nie je to najlepsie riesenie.

TUNGLI Jan
tungli(zv)pvt.sk
-----P�vodn� zpr�va-----
Od: Jan �ebel�k <honza(zv)haes(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 27. marec 1999 10:23
P�edm�t: Re: pomoc - lck 2


>TUNGLI Jan
>tungli(zv)pvt.sk
>> Mam dve applikacie, ktore pracuje s INTERBASE databazou co je na serveri.
>> ...
>> V adresary sa vytvori nejaky paradox.lck subor, ktory to nedovoli.
Adresar je ponuknuty na Read /Write.
>> Ak applikacie nakopirujem na svoj PC, tak vsetko funguje. Pracujem pod
W95.
>> Predpokladam ze problem rob� BDE. Pravdepodobne BDE defaultne pouziva
paradox strukturu
>> pre uchovanie svojich vlastn�ch informaci. Ja v mojich applikaciach
nepouzivan paradox, iba interbase.
>
>[Jan Sebelik]
>Tady neco nehraje.
>InterBase nema s Paradoxem nic spolecneho, soubory paradox.lck vxnikaji
pouze tehdy, jestlize pouzivam tabulky Paradox.
>
>BDE take samo o sobe nema s Paradoxem nic spolecneho, pouze spousti Paradox
Driver, pokud pristupuje k jeho tabulkam.
>
>Pracuje-li BDE s InterBase, do zadnych adresaru nic nezapisuje (takze
pristup Read/Write s tim nema nic spolecneho).
>BDE komunikuje prostrednictvim InterBase SQL linku se Serverem InterBase.
Ten pak saha do prislusneho .gdb souboru vlastnimi prostredky.
>
>Jan Sebelik
>=========================================
>= HAES - RNDr. Jan Sebelik
>= http://www.haes(tec)cz
>= Skolici a konzultacni stredisko pro Delphi a Win32
>= Vojtiskova 206
>= 507 81 Lazne Belohrad
>= tel. 0434 692 931
>=========================================
>
>

Kopirovani Richeditu

[*] Juraj Nagy <jnagy(zv)nh-trans(tec)cz> - 29.3.1999 08:50:49

Preji prijemny den,

nevite nekdo, jak bych mohl zkopirovat jeden RichEdit do druheho.
Text, atributy, nastaveni vseho, neco jako Assign, ktery tam sice je,
ale pri pouziti vyhazuje roztomile hlaseni Cannot assign TRichedit to
TRichedit. Pres soubor to neni ono, je to pomale. Pres Clipboard se
program zase zasekava.

Diky za kazdy napad.

Jirka


pomoc - lck 2

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 29.3.1999 09:55:18

Jeste mne napada, jestli toto vsechno neni kvuli tomu, ze je nastaveno v BDE|Configuration|System|INIT polozka
DEFAULT DRIVER na PARADOX. Pak by to mohlo blbnout.

Martin Lasevic

-----Puvodni zprava-----
Od: Polak Jiri [SMTP:Jiri.Polak(zv)tconsult(tec)cz]
Odeslano: 29. boezna 1999 6:56
Komu: 'delphi-l(zv)fwd(tec)cz'
Poedmit: RE: pomoc - lck 2


> [Jan Sebelik]
> Tady neco nehraje.
> InterBase nema s Paradoxem nic spolecneho, soubory
> paradox.lck vxnikaji pouze tehdy, jestlize pouzivam tabulky Paradox.
>

Me vznikaji i tehdy, jestlize pouzivam MS SQL ODBC driver.

> BDE take samo o sobe nema s Paradoxem nic spolecneho, pouze
> spousti Paradox Driver, pokud pristupuje k jeho tabulkam.
>
> Pracuje-li BDE s InterBase, do zadnych adresaru nic
> nezapisuje (takze pristup Read/Write s tim nema nic spolecneho).
> BDE komunikuje prostrednictvim InterBase SQL linku se
> Serverem InterBase. Ten pak saha do prislusneho .gdb souboru
> vlastnimi prostredky.

Nevim, jak InterBase, ale pri pouziti MS SQL je treba mit
nastaven NET DIR pro paradox na adresar s pravem zapisu.
to je kvuli tomu *.LCK.
Stejne tak je potreba mit nastaven aktualni adresar
aplikace na adresar s pravem zapisu. Tam vznikaji
nejake docasne soubory (nechapu). Uz jsem to sem jednou
psal, ja nechavam nastavovat do NET DIR C:\ a aplikaci
nechavam uzivatele spoustet shortcutem se startovnim adresarem
C:\ (a nikde v aplikaci ho nemenim).
Nevim, co je v BDE pomasteno, ale pusobi to na me dojmem, ze
primarne bylo BDE pro borlandi databaze a obecny pristup
tam byl dodelan dodatecne (a nedostatecne).

Jiri Polak
----------
Jiri Polak
e-mail:jura.polak(zv)email(tec)cz
jiri.polak(zv)tconsult(tec)cz
web :http://freeweb.coco(tec)cz/jpolak
----------
The only good bug, is a dead bug!

Zalohovani

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 29.3.1999 10:06:45

Preji vsem pekneho dne,

potrebuji ve sve aplikaci zalohovat data z tabulek na diskety. Nevite
o nejake komponente, ktera by toto resila? Nejlepe predat tabulku
a napriklad v udalosti OnChangeDrive vyvolat dialog na vymenu
diskety. Stejne tak pak data obnovovat.

Diky za odpovedi

Slavek


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


Kopirovani Richeditu

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

Zkus tohle:

procedure CopyRichText;
var
InStream: TMemoryStream;
begin
try
InStream := tmemorystream.create;
instream.clear;
richedit1.lines.savetostream (InStream);
instream.position := 0;
richedit2.lines.loadfromstream (InStream);
finally
InStream.free;
end;
end;

Slavek

> Jirka
>
----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------


FreeVCS

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 29.3.1999 10:12:35

Ma nekdo zkusenosti s FreeVCS ?


Radim


Virtualni dataset

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 29.3.1999 10:15:56

Potreboval bych tzv. virtualni dataset. Je to proste
potomek tdataset, ale vsechny jeho metody (first, next, eof atd) jsou
vyvedeny ven jako eventy.
Zatim pouzivam RxMemoryData, je to pekne, ale je to neco
jineho.
Nevidel nekdo nekde neco podobneho ? Abych to nemusel
programovat.

Radim

Zprava pri zmene rozlizeseni

[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 29.3.1999 10:27:26

Ahojte,
potreboval bych dostat zpravu, kdyz se zmeni rozliseni obrazovky.
Netusite jak?
dik
Lukas

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


Vosemetny dotaz - OracleDataSet

[*] Jan Linhart <delphi(zv)mis-net(tec)cz> - 29.3.1999 10:51:11

Zdar,

Predem prosim nebijte me do hlavy.
Pouzivam komponenty na prime pripojeni o Oracle a v soucasnosti uvazuju o
3-vrstve aplikaci.... coz znamena napsat si to ruco fuco. Jenze napsat si
vlastni dataset je prace na 4 roky :-( !
Totiz firma Allroundautomations si s tr�vrstvou technologii nel�me hlavu a
k�c� na ni.

Me jde o jedine - o zdroj�k TOracleDataSet, ktery bych si mohl pocochnit ku
obrazu svemu a ucinit jej 3-vrstvym. Dolary jsou dolary a me jde jenom
pouze o tuto jednu vecicku. Nem�te to nekdo?

Predem diky za pochopeni :-)

..............Honza


Kompilace & chovani aplikace

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 29.3.1999 11:01:21

Jedu to vyzkouset. Vecer budu referovat :-))

Radim

>
>Jak to tedy je? Ja se domnival, ze velikost "problemovych" promennych
>(napr. integer) je definovana pri kompilaci a pak uz zustava stejna.
>Nebo je to jinak?
>
>Jirka

Sledovanie adresara

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 29.3.1999 11:14:39

> Potreboval by som sledovat isty adresar a vzdy ked sa v nom
> objavy nejaky
> subor tak ho spracovat. Da sa to urobit inac ako v timery
> testovat nove
> subory ??

V RXLib je na to TRxFolderMonitor s vlastnostmi DelayTime, Filter,
MonitorSubtree a udalosti OnChange.

==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

Kopirovani Richeditu

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

Puvodni zprava, kterou napsal Juraj Nagy dne 29 Mar 99,:

> nevite nekdo, jak bych mohl zkopirovat jeden RichEdit do druheho.
> Text, atributy, nastaveni vseho, neco jako Assign, ktery tam sice je, ale
> pri pouziti vyhazuje roztomile hlaseni Cannot assign TRichedit to
> TRichedit. Pres soubor to neni ono, je to pomale. Pres Clipboard se
> program zase zasekava.

Treba takhle:

var
Stream: TMemoryStream;
begin
Stream := TMemoryStream.Create;
try
Rich1.Lines.SaveToStream(Stream);
Stream.Seek(0, soFromBeginning);
Rich2.Lines.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;


S pozdravem
Petr Zahradnik, pocitacovy expert

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


TMemIniFile

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 29.3.1999 11:45:35

Zdravim,

mam problem se zapisem polozek do TMemIniFile. Metoda WriteString pozaduje
tri parametry: sekci, nazev klice a hodnotu. Co ovsem uvadet jako nazev
klice?==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

DBGrid a udalost pri zmene sirky sloupce

[*] Jozef Strnadik <strnadik(zv)mbox.mrp(tec)cz> - 29.3.1999 11:46:00

Ja som to riesil tak, ze som si vytvoril potomka DBGridu a prepisal som jeho
virtualnu metodu ColWidthsChanged.

Slavek Rydval wrote:

> potrebuji zjistit udalost, kdyz uzivatel zmeni sirku slopce
> v DBGridu (neco jako OnColumnResized). Napoveda bohuzel mlci.

--
S pozdravom

Jozef Strnadik
E-mail: strnadik(zv)mbox.mrp(tec)cz

FreeVCS

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 29.3.1999 12:02:59

> Ma nekdo zkusenosti s FreeVCS ?
>
> Radim

Mam to nainstalovane, chvilku jsem to zkousel, ale v nejakem ostrem
provozu to nemam (protoze to az tak moc nepotrebuju). Pokud lze i tak
hovorit o zkusenostech, tak jsou dobre....

Ales


ListBox + VerticalScroll

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 29.3.1999 12:15:25

Ale ja tu knihu nemam

+-------------------------------+
| Ing. Petr Jezek |
| Delvina, s.r.o |
| 010 01 Zilina |
+ - - - - - - - - - - - - - - - +
| tel: +421 (89) 624 344 |
| fax: +421 (89) 621 018 |
| email: petr(zv)sevis.sk |
| web: www.delvina.sk |
+-------------------------------+> -----Original Message-----
> From: Ing. Marian Winkler [mailto:ag.art(zv)iol(tec)cz]
> Sent: Monday, March 29, 1999 3:31 AM
> To: Konference DELPHI - Inprise po�spivky
> Subject: Re: ListBox + VerticalScroll
>
>
>
> -----Puvodn� zpr�va-----
> Od: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 28. brezna 1999 20:27
> Predmet: Re: ListBox + VerticalScroll
>
>
> > 1) Da se v Delphi 1 zabezpecit, aby listbox mel
> > vertikalni scrollbar?
> > Mam tam totiz dlouhe nzavy a chtel bych, aby si uzivatel
> > mohl zobrazit postupne cely text.
> ****Na to jsem videl priklad asi ve dvou ucebnicich
> Delphi -- kapitola tvorba vlastnich komponent. Bohuzel si
> nevzpominam, v kterych. :-(
>
> Slavek
>
> **********
> Xavier Pacheco
> Steve Teixeira
>
> Delphi - pruvodce vyvojare
> kap. 11, str.268 ... Rozsireni komponenty TListBox
>
> (horizontalni scrollbar ... zkus prekopat)
>
> Marian Winkler
> ag.art(zv)iol(tec)cz
>
>
>
> > | Ing. Petr Jezek |
>
>
> --------------------------------------------------------------
> -------------
> -
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> --------------------------------------------------------------
> -------------
> -
>
>
>
>

Kompilace & chovani aplikace

[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 29.3.1999 10:16:27 met-1

> reprezentaci typu definuje kompilator behem kompilace. Pokud pouzije 4 byty
> na integer tak je bude pouzivat na kazde platforme. Programy ktere jsem
> kompiloval na NT WKS 4.0 chodi na winframu v pohode...

Jak to tedy je? Ja se domnival, ze velikost "problemovych" promennych
(napr. integer) je definovana pri kompilaci a pak uz zustava stejna.
Nebo je to jinak?

Jirka
+-------------------------+---------------------------------+
| Jiri NOVOTNY, Olomouc, | e-mail: novotny(zv)ftknw.upol(tec)cz |
| Czech Republic | http://risc.upol(tec)cz/~novotnyj |
| | ICQ: 9495586 |
+-------------------------+---------------------------------+
| ... and objects in the rear view mirror can appear closer |
| than they are |
+-----------------------------------------------------------+

SQL Kedy bola maximalna hodnota

[*] Pavol Griga <paly(zv)sct.sk> - 29.3.1999 12:38:40

Nevie mi niekto poradit ako zistit Maximalnu hodnotu za jednotlive dni
a zaroven
chcem urcit hodinu, kedy nastala ta maximalna hodnota, lebo ked zadam:

SELECT Kde, Den, Hodina, Max(Hodnota) FROM tabulka GROUP BY Kde, Den

tak krici, ze Hodina sa nenachadza v GROUP BY, ale ja chcem len GROUP BY
Kde, Den
ale chcem zistit aj Hodinu, kedy nastalo to maximum, viem to urcit cez
vnoreny SELECT
a to sa mi zda dost neefektivne

tabulka ma struktutu:
Kde Den Hodina Hodnota
----------------------------------------------
AAA 1 1 56
AAA 1 2 80
AAA 1 3 70
.....
AAA 2 1 45


Vopred vdaka za kazdu radu.

Pavol Griga


Systemovy cas

[*] Radek KALA <DELPHI(zv)betacontrol(tec)cz> - 29.3.1999 12:39:52

Hi,

V PC Existuje cas, ktery bezi v Real Time obvodu na MB a pri
zapnuti se zkopiruje do pameti a bezi tam. On se ale rozchazi a
nekdy dost. Potreboval bych jednou za nejaky rozumny cas
provest synchonizaci a ne restartem pocitace. Vi nekdo jak na to.

Diky

S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15


FreeVCS

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 29.3.1999 12:48:40

A o co vlastne go ?

> -----P�vodn� zpr�va-----
> Od: Ales Radikovsky [SMTP:radik(zv)seznam(tec)cz]
> Odesl�no: 29. b�ezna 1999 12:03
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: FreeVCS
>
> > Ma nekdo zkusenosti s FreeVCS ?
> >
> > Radim
>
> Mam to nainstalovane, chvilku jsem to zkousel, ale v nejakem ostrem
> provozu to nemam (protoze to az tak moc nepotrebuju). Pokud lze i tak
> hovorit o zkusenostech, tak jsou dobre....
>
> Ales


Vosemetny dotaz - OracleDataSet

[*] jk(zv)tzus(tec)cz - 29.3.1999 12:55:14

>Predem prosim nebijte me do hlavy.
>Pouzivam komponenty na prime pripojeni o Oracle a v soucasnosti uvazuju o
>3-vrstve aplikaci.... coz znamena napsat si to ruco fuco. Jenze napsat si
>vlastni dataset je prace na 4 roky :-( !
>Totiz firma Allroundautomations si s trivrstvou technologii nelame hlavu a
>kaci na ni.

Domnivam se trivrstva technologie je veci komponent TClientDataset a
prilehlych nikoliv vlastniho datasetu, ktery musi stejne jako u TTable a
TQuery pro BDE zustat stejny a zajistuje fyzicky pristup k datum na
aplikacnim serveru. Navic pro spolupraci s TOracleDataset nabizi AA
TOracleProvider.

>Me jde o jedine - o zdrojak TOracleDataSet, ktery bych si mohl pocochnit ku
>obrazu svemu a ucinit jej 3-vrstvym. Dolary jsou dolary a me jde jenom
>pouze o tuto jednu vecicku. Nemate to nekdo?

Doufam, ze jde o aprilovy zert !!!
Jak je vyse uvedeno - ziskat 4 roky prace zadarmo v rozporu s licencnimi
podminkami je kradez. Zatim nevim o tom (a to jsme dealery AA pro CR), ze by
nabizeli zdrojaky zadarmo. Zdrojove texty jsou k dispozici za necelych
deset tisic korun a predstavuji praci mnoha lidi za nekolik poslednich let
pocinaje verzi Delphi 1.0. Pokud se ti to nelibi tak si porid jine knihovny
nebo si napis vlastni, ale nenavadej nikoho ke kradezi, navic v konferenci,
kde se naprosta vetsina lidi zivi programovanim a ne kradenim.

S pozdravem
Jan Kadlecek

******************************************
* kadlecek(zv)htkpro(tec)cz *
* HTK Pro s.r.o., www.htkpro(tec)cz *
* tel : 02-83880361, fax: 02-6896391 *
* Autorizovany dealer TurboPower *
******************************************

QuickReport > Access violation

[*] cerny.roman <cerny.roman(zv)atlas(tec)cz> - 29.3.1999 13:00:32

Pred casem zde probehlo par prispevku k chybe kterou nekdy pri ukonceni
zahlasi QuickReport.Ale nejak to utichlo s tim ze se ma po Preview zavolat
Application.ProcessMessages. Ad to skousim jakkoli porad se mi ta chyba
opakuje pri druhem spusteni Previewu.

Poradte nekdo PLS. DEKUJI


klik na cudzie okno :) II

[*] Lubos <bruce(zv)pobox.sk> - 29.3.1999 13:37:28

> Uff, co to ma byt za silenost ? :-) Nevyplatilo by se ti uz pouzit nejaky
> macrorecorder, podobne jako byla ve starych Windows Makrokamera.

No to by sa urcite oplatilo, ak vies o nejakom free tak posli prosim
nazov alebo priamo adresu.

vdaka.
/LH


Vosemetny dotaz - OracleDataSet

[*] Jan Linhart <delphi(zv)mis-net(tec)cz> - 29.3.1999 14:49:57

Zdar,

Musim se priznat, ze jsem TOracleProvider tak nejak prehledl a odhadoval
jeho pouziti k nejakym blaznivim Oraclim funkcim, ci necemu podobnemu
silenemu.
-d�ky, detailneji ho proklepnu :-)

A jinak ... o zadny aprilovy zert vubec nejde.
1. Zivim se programovan�m a ne kraden�m.
2. Nejsem idiot....!

Ano, firma kter� me zamestn�v� tyto komponenty pouz�v� k software, za jehoz
prod�v�n� jdou nejake penizky i me. Samozrejme, ze m�me tyto komponenty
leg�lne koupen�. Nejenom tyto komponenty, ale i Delphi, W95 atd...
V dobe, kdy se kupovaly bylo zbytecne kupovat k nim i zdroj�ky.

K�men urazu je v tom, ze jsem uveden� zdroje v zivote nevidel a tud�z
nemuzu vedet, jestli se v nich vyzn�m a budu schopen je pozmenit ku obrazu
memu.
Abych pravdu rekl prizn�v�m, ze m� pocin�n� je zbesil�, ale nev�m, jak
jinak...
Kuprikladu MIDAS� komponenty jsou zaj�mav� a funkcn�, ale rozchodit tu
s�lenost na dvou pocitacich - oddelit jednotlive vrstvy se me nepodarilo
ani s vyuzitim informac� na t�to konferenci. / at zije DCOM

Co se toho "kradeni" tyce, tak u dealera to tak trochu chapu, ovsem ....
pane kolego, nejsme prece pejsci, abychom na dvorku cenily zuby a vrceli na
sebe.

Slovo zlodej je oskliv� a jak tak sleduji okoln� svet a vsechno spatne v
nem, byl bych opravdu nerad, kdyby si me nekdo pletl s nekym tak spatnym
:-)

...............Honza

PS: Vzdyt je jaro :-)


----------
> Odes�latel: jk(zv)tzus(tec)cz
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Vosemetny dotaz - OracleDataSet
> Datum: 29. b�ezna 1999 12:55
>
> >Predem prosim nebijte me do hlavy.
> >Pouzivam komponenty na prime pripojeni o Oracle a v soucasnosti uvazuju
o
> >3-vrstve aplikaci.... coz znamena napsat si to ruco fuco. Jenze napsat
si
> >vlastni dataset je prace na 4 roky :-( !
> >Totiz firma Allroundautomations si s trivrstvou technologii nelame hlavu
a
> >kaci na ni.
>
> Domnivam se trivrstva technologie je veci komponent TClientDataset a
> prilehlych nikoliv vlastniho datasetu, ktery musi stejne jako u TTable a
> TQuery pro BDE zustat stejny a zajistuje fyzicky pristup k datum na
> aplikacnim serveru. Navic pro spolupraci s TOracleDataset nabizi AA
> TOracleProvider.
>
> >Me jde o jedine - o zdrojak TOracleDataSet, ktery bych si mohl pocochnit
ku
> >obrazu svemu a ucinit jej 3-vrstvym. Dolary jsou dolary a me jde jenom
> >pouze o tuto jednu vecicku. Nemate to nekdo?
>
> Doufam, ze jde o aprilovy zert !!!
> Jak je vyse uvedeno - ziskat 4 roky prace zadarmo v rozporu s licencnimi
> podminkami je kradez. Zatim nevim o tom (a to jsme dealery AA pro CR), ze
by
> nabizeli zdrojaky zadarmo. Zdrojove texty jsou k dispozici za necelych
> deset tisic korun a predstavuji praci mnoha lidi za nekolik poslednich
let
> pocinaje verzi Delphi 1.0. Pokud se ti to nelibi tak si porid jine
knihovny
> nebo si napis vlastni, ale nenavadej nikoho ke kradezi, navic v
konferenci,
> kde se naprosta vetsina lidi zivi programovanim a ne kradenim.
>
> S pozdravem
> Jan Kadlecek
>
> ******************************************
> * kadlecek(zv)htkpro(tec)cz *
> * HTK Pro s.r.o., www.htkpro(tec)cz *
> * tel : 02-83880361, fax: 02-6896391 *
> * Autorizovany dealer TurboPower *
> ******************************************

personal oracle

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 29.3.1999 14:52:00

Hi
pisi si v PO8 stored proceduru a potreboval bych poradit jak zjistit zda je
urcity rok prestupny ci neni a jak to ve stored procedure realizovat ?
Dale mam jeste dotaz zda jde zabranit tomu aby se mi urcite stored procedury
pustili vicekrat soucasne (kdyz je zavola vice uzivatelu v jeden okamzik)
potreboval bych to osetrit tak aby se mi spustila pouze 1 x instance v
jednom okamziku a ostatni volani by se ignorovali

predem diky za help


FreeVCS

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 29.3.1999 15:02:59

> A o co vlastne go ?

FreeVersionControlSystem.
http://www.thensle.de/

>
> > > Ma nekdo zkusenosti s FreeVCS ?
> > >
> > Mam to nainstalovane, chvilku jsem to zkousel, ale v nejakem ostrem
> > provozu to nemam (protoze to az tak moc nepotrebuju). Pokud lze i tak
> > hovorit o zkusenostech, tak jsou dobre....

Ales


property Visible na TToolButton

[*] Pavel Slovacek <silvan(zv)atlas(tec)cz> - 29.3.1999 15:41:49

Ahoj,

Narazil sem na zajimavy problem mam TToolBar a na nem nejake TToolButton. K
nim sou prirazene pres TActionList nejake akce, jakmile nastavim na akci k
prvnimu buttonu visible=false, tak se mi sice button nezobrazi, ale
aplikace se chova tak jako by tam porad byl. (Kdyz stlacim button tak je
akce o jedno posunuta). Setkal se stim nekdo?

Pavel Slovacek


TMemIniFile

[*] Marek Soukup <marek(zv)comberg(tec)com> - 29.3.1999 16:10:33

Ahoj,
neznam presne tenhle objekt, ale ini je asi tohle:

[SEKCE]
NazevKlice=hodnota

takze v cem je problem ?

Marek Soukup

Krayzel Libor wrote:

> Zdravim,
>
> mam problem se zapisem polozek do TMemIniFile. Metoda WriteString pozaduje
> tri parametry: sekci, nazev klice a hodnotu. Co ovsem uvadet jako nazev
> klice?
>
> ==[ eLK(zv) ]===================================================
> http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
> http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
> ============================================================

TMemIniFile

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 29.3.1999 16:48:48

> neznam presne tenhle objekt, ale ini je asi tohle:
>
> [SEKCE]
> NazevKlice=hodnota
> takze v cem je problem ?

No TMemIni umoznuje ulozit do INI fajlu takto:

[SEKCE]
prvni_radek
druhy_radek
treti_radek
atd

bez nazvu klicu. Kdyz si takto vytvorim soubor, tak z nej v pohode prectu
vse pomoci ReadString:
var
IniFile:TMemIniFile;
begin
IniFile := TMemIniFile.Create('TEST.INI');
IniFile.ReadSectionValues('SEKCE',Memo5.Lines);
IniFile.Free;
end;

ale nikde jsem nenasel metodu, jak zapsat jen ty hodnoty (neco jako
WriteSectionValues.

personal oracle

[*] Pavel Slovacek <silvan(zv)atlas(tec)cz> - 29.3.1999 16:51:10

Sice v PO8 nedelam, ale nemel by to byt takovy rozdil.
Jedno spusteni procedury na serveru? Musi se to resit opravdu takto?
Realizace neceho takoveho je znacne osemetna zalezitost, myslim tim
hledisko provedeni a pristup k psani aplikace. Jedno z reseni ktere znam je
ze udelas nejakou tabulku, kde budes mit nejakou promenou(radek) a tu podle
toho nastavis. Abys ji mohl cist i z ostatnich session musis provest
commit. Druhe reseni spociva v prime komunikaci session mezi sebou, ale to
se jedna o pomerne slozitou problematiku, kterou bych tady nerad probiral,
pokud bys chtel nasmerovat precti si neco o DBMS_pipe. (doufam ze to je
dostupne i na PO8).
Prestupny rok. Pokud se nepletu procedury pro Oracle se mohou psat v PL/SQL
coz je programovaci jazyk Oracle, takze tam reseni neceho takoveho je
pomerne trivialni problem.

Hodne zdaru
Pavel Slovacek


>pisi si v PO8 stored proceduru a potreboval bych poradit jak zjistit zda je
>urcity rok prestupny ci neni a jak to ve stored procedure realizovat ?
>Dale mam jeste dotaz zda jde zabranit tomu aby se mi urcite stored procedury
>pustili vicekrat soucasne (kdyz je zavola vice uzivatelu v jeden okamzik)
>potreboval bych to osetrit tak aby se mi spustila pouze 1 x instance v
>jednom okamziku a ostatni volani by se ignorovali


Formular

[*] Jiri Vrabec Java -5 rocnok <xvrabe00(zv)kapr.fme.vutbr(tec)cz> - 29.3.1999 17:03:29


Prosim prosim, muzete my poradit jak na formu od ktereho mam jenom
handle muzu zjistit kolik ma prvku, jake (typ), jejich hadle,.....
jednoduse vsechny parametry. Vztahuje se to k problemu toho jak v jedne
aplikaci zmacknot button z jine aplikace. Proto znam jen handle. Takze
nejlepe API...
Dik J.

FreeIB a pristup na IB bez BDE

[*] Pavel Bare� <atoll(zv)telecom(tec)cz> - 29.3.1999 17:42:05

Nemate nekdo skusenosti s FreeIB komponentami 20
Ja nemuzu vlozit cesky znak do databaze

Pokud nekdo pouzivate komponenty pro pristup k IB bez BDE budu vdecny za vsechny skusenosti.
Hledam nco rychleho a spolehliveho.

Pavel Bare�
Atoll s.r.o.
www.atoll(tec)cz

Systemovy cas

[*] Radoslav Jalc, ProNet <pronet(zv)ke.telecom.sk> - 29.3.1999 18:38:44

Sorry za "silny offtopic" ale, problem s casom som mal dnes na Novell 3.12
serveri ...az ma to zarazilo ...
Ak nastavim v Biose cas na 12:00, bootnem server, vlastne iba do dos promptu
a dam time tak mam 12:00. Je to ok. potom..Pustim server.exe ....po spusteni
napisem na konzole servera time a mam tam 12:00 (+/boot time)...zatial
vsetko ok....necham bezat server 10 min ...potom ho DOWNem a nasledne EXITom
skocim spat do DOSu ....TU NAPISEM TIME A :::: dostanem odpoved 12:00 ...Co
je to za blbost ? Ked masinu restartnem a vojdem do BIOSu, tak tam mam
aktualny cas 12:10 alebo trosku viac...Jednoducho cas ktory je v DOSe po
ukonceni Novell Servera je presne taky, aky je cas pred zavedenim server.exe
....
Konfiguracia : Novell Netware 3.12 + vsetky patche (mozno)
MALI STE NIEKTO TAKY PROBLEM ??? Ak ano ako ste to riesili ..Skusal som to
na 3 serveroch a TO ISTE !!! pri tom to boli rozne konfiguracie s roznym
poctom uzivatelov ...a od roznych dodavatelov ..

S pozdravom
Radoslav Jalc - ProNet development
E-Mail: pronet(zv)ke.telecom.sk | Mobil: +421-905-489364

-----P�vodn� zpr�va-----
Od: Radek KALA <DELPHI(zv)betacontrol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 29. marec 1999 13:42
P�edm�t: Systemovy cas


Hi,

V PC Existuje cas, ktery bezi v Real Time obvodu na MB a pri
zapnuti se zkopiruje do pameti a bezi tam. On se ale rozchazi a
nekdy dost. Potreboval bych jednou za nejaky rozumny cas
provest synchonizaci a ne restartem pocitace. Vi nekdo jak na to.

Diky

S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4555 1269
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15

personal oracle

[*] Ale� Kle�ka - 29.3.1999 18:50:12

Ahoj,
osetreni, jestli je nejaky rok prestupny se da provest dvema zpusoby:
a) vezmes dany rok, udelas z nej datum 29.02.YYYY a prozenes to pres
funkci StrToDate a pokud se nejedna o prestupny rok, tak Ti to vyhodi chybu,
kterou odchytnes na vyjimce ( rychle, ucinne, ale podle me je to lehce
programatorsky 'prasacke' )
b) 'programatorsky cistci' zpusob je vzit dany rok a overit jestli:
v_Year mod 4 = 0) and (( v_Year mod 100 <> 0) or ( v_Year mod 400 = 0)) =
TRUE, pak v_Year je prestupny rok

Tak si nech darit

Ales Klecka
{ a.klecka(zv)email(tec)cz }

----- Original Message -----
From: sula milos <crkstrobe(zv)geocities.com>
To: delphi konference <delphi-l(zv)fwd(tec)cz>
Sent: 29. b�ezna 1999 14:52
Subject: personal oracle


> Hi
> pisi si v PO8 stored proceduru a potreboval bych poradit jak zjistit zda
je
> urcity rok prestupny ci neni a jak to ve stored procedure realizovat ?
> Dale mam jeste dotaz zda jde zabranit tomu aby se mi urcite stored
procedury
> pustili vicekrat soucasne (kdyz je zavola vice uzivatelu v jeden okamzik)
> potreboval bych to osetrit tak aby se mi spustila pouze 1 x instance v
> jednom okamziku a ostatni volani by se ignorovali
>
> predem diky za help


personal oracle

[*] jk(zv)tzus(tec)cz - 29.3.1999 19:11:08

>Hi
>pisi si v PO8 stored proceduru a potreboval bych poradit jak zjistit zda je
>urcity rok prestupny ci neni a jak to ve stored procedure realizovat ?

podminka je znama a myslim, ze vypada v pascalu nasledovne :

(rok mod 4 = 0) and ((rok mod 100 <> 0) or (rok mod 400 = 0))

coz je v pl/sql muze vypadat nasledovne :

create or replace function je_prestupny(rok number) return integer as
begin
if (mod(rok,4)=0) and ((mod(rok,100)<>0) or (mod(rok,400)=0)) then
return 1;
else
return 0;
end if;
end;

>Dale mam jeste dotaz zda jde zabranit tomu aby se mi urcite stored
>procedury
>pustili vicekrat soucasne (kdyz je zavola vice uzivatelu v jeden okamzik)
>potreboval bych to osetrit tak aby se mi spustila pouze 1 x instance v
>jednom okamziku a ostatni volani by se ignorovali

mozna jsou nasledujici reseni :
1/ snazit se vyhnout teto potrebe - zmena navrhu db, uzavreni do transakce,
zamceni zaznamu atd.
2/ pouzit DBMS_LOCK
3/ pouzit jednoradkovou tabulku s unikatnim klicem pro synchronizaci
4/ pouzit DBMS_PIPE

Nevim ale jestli jsou package lock a pipe dostupne na personalu

S pozdravem
Jan Kadlecek

******************************************
* kadlecek(zv)htkpro(tec)cz *
* HTK Pro s.r.o., www.htkpro(tec)cz *
* tel : 02-83880361, fax: 02-6896391 *
* Autorizovany dealer TurboPower *
******************************************

TMemIniFile

[*] Roman Fi�er <fiser(zv)gbn(tec)cz> - 29.3.1999 19:18:20

Doporucuji ti podivat se na Tinifile v helpu.


Roman Fiser

-----P�vodn� zpr�va-----
Od: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 29. b�ezna 1999 17:48
P�edm�t: RE: TMemIniFile


>> neznam presne tenhle objekt, ale ini je asi tohle:
>>
>> [SEKCE]
>> NazevKlice=hodnota
>> takze v cem je problem ?
>
>No TMemIni umoznuje ulozit do INI fajlu takto:
>
>[SEKCE]
>prvni_radek
>druhy_radek
>treti_radek
>atd
>
>bez nazvu klicu. Kdyz si takto vytvorim soubor, tak z nej v pohode prectu
>vse pomoci ReadString:
>var
> IniFile:TMemIniFile;
>begin
> IniFile := TMemIniFile.Create('TEST.INI');
> IniFile.ReadSectionValues('SEKCE',Memo5.Lines);
> IniFile.Free;
>end;
>
>ale nikde jsem nenasel metodu, jak zapsat jen ty hodnoty (neco jako
>WriteSectionValues.

Systemovy cas

[*] Peter Rus <peterrus(zv)intesys(tec)cz> - 29.3.1999 19:54:18

Ahoj Rado,

neviem ti takto z fleku odpovedat, ale prosim ta, potreboval by som par
drobnosti:

- je server v bezpecnom mode? (pouzity prikaz REMOVE DOS)
- je cas na srv v poriadku? (aj po tych 10-tich minutach?) (myslim time
z konzole servera, ev. cez systime na stanici?)

Prosim ta este raz, posli mi odpovede, (ev. na sukromy mail :
peterrus(zv)intesys(tec)cz)

prajem ti prijemny den,

Peter

-------------
"Radoslav Jalc, ProNet" wrote:
> Sorry za "silny offtopic" ale, problem s casom som mal dnes na Novell 3.12
> serveri ...az ma to zarazilo ...
> Ak nastavim v Biose cas na 12:00, bootnem server, vlastne iba do dos promptu
> a dam time tak mam 12:00. Je to ok. potom..Pustim server.exe ....po spusteni
> napisem na konzole servera time a mam tam 12:00 (+/boot time)...zatial
> vsetko ok....necham bezat server 10 min ...potom ho DOWNem a nasledne EXITom
> skocim spat do DOSu ....TU NAPISEM TIME A :::: dostanem odpoved 12:00 ...Co
> je to za blbost ? Ked masinu restartnem a vojdem do BIOSu, tak tam mam
> aktualny cas 12:10 alebo trosku viac...Jednoducho cas ktory je v DOSe po
> ukonceni Novell Servera je presne taky, aky je cas pred zavedenim server.exe
> ....
> Konfiguracia : Novell Netware 3.12 + vsetky patche (mozno)
> MALI STE NIEKTO TAKY PROBLEM ??? Ak ano ako ste to riesili ..Skusal som to
> na 3 serveroch a TO ISTE !!! pri tom to boli rozne konfiguracie s roznym
> poctom uzivatelov ...a od roznych dodavatelov ..

SQL Kedy bola maximalna hodnota

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 29.3.1999 20:04:28

No problem je v tom, ze GROUP BY garantuje, ze pro kazdou hodnotu "klice" dostaneme jediny radek.
V tvem pripade toto nelze garantovat: maximum muze nastat behem dne treba i nekolikrat.
Takze se obavam, ze bez vnoreneho selectu to nepujde. Navic se musis smirit s tim, ze (teoreticky) dostanes pro kazde "Kde, Den" vice radku.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
=========================================
----------
> Odes�latel: Pavol Griga <paly(zv)sct.sk>
> P�edm�t: SQL Kedy bola maximalna hodnota
>
> Nevie mi niekto poradit ako zistit Maximalnu hodnotu za jednotlive dni
> a zaroven
> chcem urcit hodinu, kedy nastala ta maximalna hodnota, lebo ked zadam:
>
> SELECT Kde, Den, Hodina, Max(Hodnota) FROM tabulka GROUP BY Kde, Den
>
> tak krici, ze Hodina sa nenachadza v GROUP BY, ale ja chcem len GROUP BY
> Kde, Den
> ale chcem zistit aj Hodinu, kedy nastalo to maximum, viem to urcit cez
> vnoreny SELECT
> a to sa mi zda dost neefektivne
>
> tabulka ma struktutu:
> Kde Den Hodina Hodnota
> ----------------------------------------------
> AAA 1 1 56
> AAA 1 2 80
> AAA 1 3 70
> .....
> AAA 2 1 45
>
>
> Vopred vdaka za kazdu radu.
>
> Pavol Griga


HotKeys

[*] Ji�� �ern� <cernyi(zv)vscht(tec)cz> - 29.3.1999 20:22:09

Dobry den,

mohl by mi nekdo z vas poradit jak zprovoznit komponentu HotKey na formu,
ktery je rozdelen nekolika spliterama. Ta zkratka by mela fungovat jen v
jednom ListView. Me se zatim "podarilo", ze to nefunguje vubec.

Diky za rady
Jiri Cerny

FreeVCS

[*] Mirun <forcom(zv)telecom(tec)cz> - 29.3.1999 21:56:22

Ja jsem ho kratce testoval, ale potom co jsem narazil v helpu na warning ze
nesmi byt pri checkinu otevreny zadny dataset jsem to zavrhl.
Osobne pouzivam CS-RCS (http://www.ComponentSoftware.com/) a jsem s nim
spokojeny, ma i add-on pro delfi.

Mirun

----- Original Message -----
From: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
To: Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Monday, March 29, 1999 10:12 AM
Subject: FreeVCS


> Ma nekdo zkusenosti s FreeVCS ?
>
> Radim
>

QuickReport > Access violation

[*] Mirun <forcom(zv)telecom(tec)cz> - 29.3.1999 21:58:30

Pokud pouzivas svuj preview form, tak uved v OnDestroy QRPreview.QRPrinter
:= nil, melo by to pomoci. Pokud to nepomuze, muze byt chyba jeste asi na
1000 jinych mistech nekde u tebe. Nejlepsi je pouzit memproof nebo podobny
program, a prelozit i VCL s debug info. Pak se da chyba vetsinou najit.

Mirun

----- Original Message -----
From: cerny.roman <cerny.roman(zv)atlas(tec)cz>
To: Konference DELPHI <delphi-l(zv)fwd(tec)cz>
Sent: Monday, March 29, 1999 1:00 PM
Subject: QuickReport > Access violation


> Pred casem zde probehlo par prispevku k chybe kterou nekdy pri ukonceni
> zahlasi QuickReport.Ale nejak to utichlo s tim ze se ma po Preview zavolat
> Application.ProcessMessages. Ad to skousim jakkoli porad se mi ta chyba
> opakuje pri druhem spusteni Previewu.
>
> Poradte nekdo PLS. DEKUJI
>
>
>

Balicky, komponenty ...

[*] eL <eL_z_Prahy(zv)seznam(tec)cz> - 29.3.1999 21:58:16

Zdravim vsechny.

Jiz jsem to zde jednou zkousel ale nikdo se neozval. Mam prosbu poradte mi
jak nejlepe zachazet s pridavanymi balicky a novymi komponentami a unity
(napriklad co stahnu z webu). To znamena do jakych adresaru to davat. Do
jakeho package to prikompilovat. Proste jak nejlepe si to zorganizovat aby s
tim nebyly problemy. Podelte se se mnou o sve zkusenosti a pripadne mi
poradte literaturu.
Dekuji.

eL..

TMemIniFile

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.3.1999 21:56:19

Puvodni zprava, kterou napsal Krayzel Libor dne 29 Mar 99,:

> mam problem se zapisem polozek do TMemIniFile. Metoda WriteString pozaduje
> tri parametry: sekci, nazev klice a hodnotu. Co ovsem uvadet jako nazev
> klice?

To, co chces mit pred rovnitkem (=).


S pozdravem
Petr Zahradnik, pocitacovy expert

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


HotKeys

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.1999 23:14:32

Ji�� �ern� wrote:
>
> Dobry den,
>
> mohl by mi nekdo z vas poradit jak zprovoznit komponentu HotKey na formu,
> ktery je rozdelen nekolika spliterama. Ta zkratka by mela fungovat jen v
> jednom ListView. Me se zatim "podarilo", ze to nefunguje vubec.

Ahoj,

Uprime receno moc tomu nerozumim, ale mozna je to tak trochu diky tomu
prisernymu letnimu casu :-)) Jedna se ti o pouziti komponenty THotKey,
nebo o klavesovou zkratku ktera ma udelat focus na nejaky ovl.prvek ?

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

klik na cudzie okno :) II

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.1999 23:14:40

Lubos wrote:
>
> > Uff, co to ma byt za silenost ? :-) Nevyplatilo by se ti uz pouzit nejaky
> > macrorecorder, podobne jako byla ve starych Windows Makrokamera.
>
> No to by sa urcite oplatilo, ak vies o nejakom free tak posli prosim
> nazov alebo priamo adresu.

Ahoj,

Na Zive o tom byl kdysi clanek:

http://zive.cpress(tec)cz/r-art.asp?id=2807&app=0x6877405&ref=9

Druha moznost je si neco podobneho napsat (jsme tu preci programatori :-),
nejaky priklad je u Borlandu :

http://www.borland.com/delphi/papers/winAPI/part2.html

a taky tusim na DSP.

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

JPG to BLOB

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.3.1999 23:14:58

Jaro wrote:
>
> 1. Jak se ti to "nejak" podarilo.
> 2. Do jake databaze to ukladas, jakeho typu je pole a jak to do neho
> nacitas ... LoadFromFile ???

Ahoj,

Jeste k tomuto problemu. Uvazoval jsem o reseni pomoci napsani noveho
pole, napriklad TJpegGraphicField odvozeneho od TGraphicField, ktere
by se navenek pro Assign a AssignTo tvarilo jako bitmapa, ale data by
ukladalo v JPEGu. Ma to vsak hned problem, a to jak zaridit aby bylo
v dobe navrhu pouzito misto TGraphicField. Je sice mozne puvodni pole
ve Fields editoru odstranit a vytvorit nove s timto typem, ale to se
mi prilis nelibi. Dalsi moznost je pridat editor komponenty ktery pak
provede zmenu vybraneho pole a pripadnou konverzi dat v tabulce. Mozna
ze uz ale neco takoveho existuje hotove, pokud jeste to nekdo videl,
tak dejte prosim vedet.

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

Zprava pri zmene rozlizeseni

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

Lukas Voborsky wrote:
>
> Ahojte,
> potreboval bych dostat zpravu, kdyz se zmeni rozliseni obrazovky.
> Netusite jak?

Ahoj,

Je to WM_DISPLAYCHANGE.

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

property Visible na TToolButton

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

Pavel Slovacek wrote:
>
> Ahoj,
>
> Narazil sem na zajimavy problem mam TToolBar a na nem nejake TToolButton. K
> nim sou prirazene pres TActionList nejake akce, jakmile nastavim na akci k
> prvnimu buttonu visible=false, tak se mi sice button nezobrazi, ale
> aplikace se chova tak jako by tam porad byl. (Kdyz stlacim button tak je
> akce o jedno posunuta). Setkal se stim nekdo?

Ahoj,

Zkousel jsem to (na prikladu MDI aplikace z Object Repository) a chova se to
spravne, k zadnemu posunuti nedochazi. Mozna to byla nejaka chyba kterou pak
opravili v update packu, mas je nainstalovane ?

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

Formular

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

Jiri Vrabec Java -5 rocnok wrote:
>
> Prosim prosim, muzete my poradit jak na formu od ktereho mam jenom
> handle muzu zjistit kolik ma prvku, jake (typ), jejich hadle,.....
> jednoduse vsechny parametry. Vztahuje se to k problemu toho jak v jedne
> aplikaci zmacknot button z jine aplikace. Proto znam jen handle. Takze
> nejlepe API...

Ahoj,

Lze to udelat pomoci funkce EnumChildWindows. Nedavno jsem sem posilal
priklad funkce, ktera vlastne toto hledani provadi, treba by to k tomu
slo pouzit. Bylo to u zprav "klik na cudzie okno :)"


--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

SQL Kedy bola maximalna hodnota

[*] Jaro <jaro(zv)sinea(tec)cz> - 29.3.1999 23:20:34

V GROUP BY musi byt opravdu stejny seznam poli jako v seznamu SELECT,
protoze jinak to nedava smysl.
Za udaje Kde a Den je skupinovano, takze je to secteno, resp. Max za
stejne hodnoty. Pokud ale v V GROUP BY nebude Cas, pak ho nema cenu
ani vracet v SELECT. Ktera hodnota se tam ma zapsat, kdyz GRUP BY
slouci vice radku a v kazdem muze byt jina hodnota casu. Ktery vzit? Z
prvniho radku, z posledniho nebo nahodne? Ja vim, pises, ze z toho,
kteremu odpovida to MAX. Jenze to je jeden pripad. Stejny zapis je
treba pro SUM a COUNT. Jednoduchy SELECT to tedy nevyresi. Jestlize
nechces slozeny SELECT, protoze by byl pomalejsi, tak si udelej
ulozenou proceduru a pouzij treba FOR SELECT. Muzes ten cas pak
vratit vystupnim parametrem.
Vice moznosti asi nebude.
Jaro
> Nevie mi niekto poradit ako zistit Maximalnu hodnotu za
jednotlive dni
>a zaroven
>chcem urcit hodinu, kedy nastala ta maximalna hodnota, lebo ked
zadam:
>
>SELECT Kde, Den, Hodina, Max(Hodnota) FROM tabulka GROUP BY Kde, Den
>
>tak krici, ze Hodina sa nenachadza v GROUP BY, ale ja chcem len GROUP
BY
>Kde, Den
>ale chcem zistit aj Hodinu, kedy nastalo to maximum, viem to urcit
cez
>vnoreny SELECT
>a to sa mi zda dost neefektivne
>
>tabulka ma struktutu:
>Kde Den Hodina Hodnota
>----------------------------------------------
>AAA 1 1 56
>AAA 1 2 80
>AAA 1 3 70
>.....
>AAA 2 1 45
>
>
> Vopred vdaka za kazdu radu.
>
> Pavol
Griga
>

property Visible na TToolButton

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.3.1999 22:22:42

Puvodni zprava, kterou napsal Pavel Slovacek dne 29 Mar 99,:

> Narazil sem na zajimavy problem mam TToolBar a na nem nejake TToolButton.
> K nim sou prirazene pres TActionList nejake akce, jakmile nastavim na
> akci k prvnimu buttonu visible=false, tak se mi sice button nezobrazi, ale
> aplikace se chova tak jako by tam porad byl. (Kdyz stlacim button tak je
> akce o jedno posunuta). Setkal se stim nekdo?

Jo, to znam, to je spatna verze COMCTL32.DLL, resp. delalo mi to,
kdyz jsem mel napsanou aplikaci v D3 a pustil jsem ji na pocitaci,
kde byla jiz COMCTL32.DLL z Delphi 4.


S pozdravem
Petr Zahradnik, pocitacovy expert

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


Informace o verzi programu

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

"SPELZA s.r.o." wrote:
>
> Zdravim vas a mam opet jeden vlezly dotaz. Kdyz v D4 nastavim
> do projektu informace o verzi programu (Projekt/Options/Version Info), jak
> se k nim dostanu v dobe behu aplikace?

Ahoj,

Pomoci API funkci GetFileVersionInfo & spol. Nicmene napriklad v RxLib to
jiz mas hotove v unitu RxVerInf.

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

Spustanie cudzej aplikacie a cakanie na jej koniec

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

Roman Toda wrote:
>
> A do tretice este jedna otazka.
>
> Chcem z mojho programu otvorit povedzme Word (ale v podstate lubovolnu
> aplikaciu) a pockat ked sa tento ukonci a potom pokracovat v spracovavani.
>
> Napr. Otvorim okno v ktorom mam Button Otvor. Stlacim Otvor a spusti sa Word
> a pocas jeho behu sa neda nic robit v okne (ked ho zavriem zavrie sa Word) a
> ked ukoncim Word moje okno sa zavrie tiez. Da sa to ??

Ahoj,

Reseni to bude mit patrne vic, ja to delam tak ze volam CreateProcess v threadu.
Vypada to nejak takhle:

type
TExecThread = class(TThread)
private
FApplicationName: String;
FExitCode: DWORD;
FVisibility: Word;
protected
procedure Execute; override;
public
constructor Create(const ApplicationName: String; Visibility: Word);
property ApplicationName: String read FApplicationName;
property ExitCode: DWORD read FExitCode;
end;

{ TExecThread }

constructor TExecThread.Create(const ApplicationName: String; Visibility: Word);
begin
inherited Create(True);
FApplicationName := ApplicationName;
FVisibility := Visibility;
FreeOnTerminate := True;
Priority := tpLower;
Resume;
end;

procedure TExecThread.Execute;
var
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
begin
ZeroMemory((zv)StartupInfo, Sizeof(StartupInfo));
ZeroMemory((zv)ProcessInfo, Sizeof(ProcessInfo));
StartupInfo.cb := Sizeof(StartupInfo);
StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow := FVisibility;
if CreateProcess(nil, PChar(FApplicationName),
nil, nil, False, NORMAL_PRIORITY_CLASS, nil, nil,
StartupInfo, ProcessInfo) then
with ProcessInfo do
begin
WaitForSingleObject(hProcess, INFINITE);
GetExitCodeProcess(hProcess, FExitCode);
CloseHandle(hThread);
CloseHandle(hProcess);
end else FExitCode := $FFFF;
end;

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

TMemIniFile

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.3.1999 22:29:03

Puvodni zprava, kterou napsal Krayzel Libor dne 29 Mar 99,:

> No TMemIni umoznuje ulozit do INI fajlu takto:

Kdepak, on neumoznuje to takhle ulozit, ale precist. Resp. soubory
INI jsou jasne definovane jako SEKCE, KLIC, HODNOTA. Muzes to
udelat treba tak, ze si tam ulozis:

[SEKCE]
prvni_radek=nic
druhy_radek=nic
treti_radek=nic

a odfiltrujes si pak =nic


S pozdravem
Petr Zahradnik, pocitacovy expert

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


Zalohovani

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

Slavek Rydval wrote:
>
> Preji vsem pekneho dne,
>
> potrebuji ve sve aplikaci zalohovat data z tabulek na diskety. Nevite
> o nejake komponente, ktera by toto resila? Nejlepe predat tabulku
> a napriklad v udalosti OnChangeDrive vyvolat dialog na vymenu
> diskety. Stejne tak pak data obnovovat.

Ahoj,

Pomerne s uspechem pouzivam Zalohovani (Microsoft Backup), ktere je soucasti
instalace Windows. Jedinym problemem je ze seznam zalohovanych souboru nelze
vytvorit programove, ale musis jej udelat rucne dle konkretniho umisteni na
disku.

--

Internet proti monopolu. Petr Vones, amatersky programator
* http://www.bojkot(tec)cz *
************************

Kopirovani Richeditu

[*] Jaro <jaro(zv)sinea(tec)cz> - 29.3.1999 23:29:21

Co treba
RichEdit2.Text := RichEdit1.Text
Jaro;

-----P�vodn� zpr�va-----
Od: Juraj Nagy <jnagy(zv)nh-trans(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 29. b�ezna 1999 10:50
P�edm�t: Kopirovani Richeditu


>Preji prijemny den,
>
>nevite nekdo, jak bych mohl zkopirovat jeden RichEdit do druheho.
>Text, atributy, nastaveni vseho, neco jako Assign, ktery tam sice je,
>ale pri pouziti vyhazuje roztomile hlaseni Cannot assign TRichedit to
>TRichedit. Pres soubor to neni ono, je to pomale. Pres Clipboard se
>program zase zasekava.
>
>Diky za kazdy napad.
>
>Jirka
>

TIniFile

[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 30.3.1999 06:50:29

Ahojte.
vidim, ze probirate TIniFile, tak bych se chtel na neco zeptat.
Nedavno jsem udelal programek (D4 C/S), ktery ukladal nastaveni do INI
souboru a pri jak�mkoli z�pisu do INI souboru se mi odmazali pr�zdn� r�dky
mezi sekcemi a pak to nejak divne nac�talo hodnoty zpet. Na W98 mi to
udelalo opravdu ojedinele, ale na NT pri jak�mkoli z�pisu.
Vyre�il jsem to tak (potreboval jsem to moc rychle�:-( ),�e jsem ini soubor
otevrel jako TextFile ( Readln(), Writeln() ) a po ka�d�m ulo�en� jsem INI
soubor preskl�dal.Nen� to "echt", ale funguje to.
Setkali jste se s t�m taky ?

D�ky.

Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz

P.S. Do registru si nekdy v brzk� dobe zkus�m neco zapsat, ale zat�m me
zaj�maj� opravdu jen TIniFile.

DCOM Server a klient v jednom EXE

[*] APEL, Petr Vobornik <vobornik(zv)apel(tec)cz> - 30.3.1999 07:47:19

Ahoj,
chtel bych se zeptat zda nekdo nevite jak umistnit 'S' i 'C' do jednoho
spolecneho EXE. Pokud vytvarim server pomoci
TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
cimultiInstance), tak mi aplikace pri volani vzdaleneho servu pomoci
MujObj:=CoMyChat.CreateRemote(CompName) zavola server umistneny ve stejnem
EXE misto ve vzdalenem. Resenim je pouzit misto parametru cimultiInstance
paranetr cisingleInstance nebo ciInternalInstance. V mem pripade vsak
potrebuji pouzit cimultiInstance z duvodu vicenasobnych pristupu k serveru.
Mam priklad, ktery toto resi, ale je napsan v Delphi 4, ktere nemam a
nepouzivam. K vytvoreni serveru je tam pouzit prikaz
TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
cimultiInstance, tmApartment). Je zde navic parametr tmApartment o
kterem nic nevim a Delphi 3 ho nepodporuje.

Budu vdecny za kazdy napad.

Diky Petr

Systemovy cas

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 30.3.1999 08:43:27

Zkusim svoje vysvetleni. Treba se ani moc neseknu a nebudu za blbce.

1. pokud se da remove dos, tak uz se po down a exit do dosu nevratis. Nepouzivam
to, ale tak to chapu podle manualu.
2. Po startu serveru se Dos uplne odstavi a nedostava ani preruseni
(pochopitelne), pouze se zakonzervuje pro exit. No a po exitu se opet vrati, ale
vlastne do puvodniho stavu, v jakem byl pri startu serveru. Takze v nem je cas
jako pri startu serveru. A pokud se dobre pamatuji, tak Dos si pocita prubezny cas
sam a bere ho z Cmosky jen pri startu. Takze je to vlastne vsechno v poradku.....

Ales

> Ahoj Rado,
>
> neviem ti takto z fleku odpovedat, ale prosim ta, potreboval by som par
> drobnosti:
>
> - je server v bezpecnom mode? (pouzity prikaz REMOVE DOS)
> - je cas na srv v poriadku? (aj po tych 10-tich minutach?) (myslim time
> z konzole servera, ev. cez systime na stanici?)
>
> Prosim ta este raz, posli mi odpovede, (ev. na sukromy mail :
> peterrus(zv)intesys(tec)cz)
>
> prajem ti prijemny den,
>
> Peter
>
> > Sorry za "silny offtopic" ale, problem s casom som mal dnes na Novell 3.12
> > serveri ...az ma to zarazilo ...
> > Ak nastavim v Biose cas na 12:00, bootnem server, vlastne iba do dos promptu
> > a dam time tak mam 12:00. Je to ok. potom..Pustim server.exe ....po spusteni
> > napisem na konzole servera time a mam tam 12:00 (+/boot time)...zatial
> > vsetko ok....necham bezat server 10 min ...potom ho DOWNem a nasledne EXITom
> > skocim spat do DOSu ....TU NAPISEM TIME A :::: dostanem odpoved 12:00 ...Co
> > je to za blbost ? Ked masinu restartnem a vojdem do BIOSu, tak tam mam
> > aktualny cas 12:10 alebo trosku viac...Jednoducho cas ktory je v DOSe po
> > ukonceni Novell Servera je presne taky, aky je cas pred zavedenim server.exe
> > ....
> > Konfiguracia : Novell Netware 3.12 + vsetky patche (mozno)
> > MALI STE NIEKTO TAKY PROBLEM ??? Ak ano ako ste to riesili ..Skusal som to
> > na 3 serveroch a TO ISTE !!! pri tom to boli rozne konfiguracie s roznym
> > poctom uzivatelov ...a od roznych dodavatelov ..

FreeIB a pristup na IB bez BDE

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 30.3.1999 08:44:24

Haj hou!

V parametrech (TStrings) TFIBDatabase je zapotrebi doplnit Paramsters.Add (...) parametr

isc dpb lc ctype=WIN1250

Tim se bude pracovat s cestinou.

Jinak mame s FIB dobre skusenosti, ale nevim jak je to s FIB potomkem TDataset ktery nepouzivame (pouze TFIBDatabase, TFIBTransaction a TFIBQuery). Pry je ale pouzitelny.
Nemate nekdo skusenosti s FreeIB komponentami 20
Ja nemuzu vlozit cesky znak do databaze

Pokud nekdo pouzivate komponenty pro pristup k IB bez BDE budu vdecny za vsechny skusenosti.
Hledam nco rychleho a spolehliveho.

FreeVCS

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 30.3.1999 08:53:22

U jake to bylo verze? Ja jsem to nikde v helpu ani ve FAQ a bug podobne omezeni
nenasel (verze 1.2.0).

Ales

> Ja jsem ho kratce testoval, ale potom co jsem narazil v helpu na warning ze
> nesmi byt pri checkinu otevreny zadny dataset jsem to zavrhl.
> Osobne pouzivam CS-RCS (http://www.ComponentSoftware.com/) a jsem s nim
> spokojeny, ma i add-on pro delfi.
>
> Mirun
>
> ----- Original Message -----
> From: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
> To: Delphi <delphi-l(zv)fwd(tec)cz>
> Sent: Monday, March 29, 1999 10:12 AM
> Subject: FreeVCS
>
> > Ma nekdo zkusenosti s FreeVCS ?
> >
> >
> > Radim
> >

TIniFile

[*] Grubhoffer(zv)software602(tec)cz - 30.3.1999 8:56:34

>Ahojte.
> vidim, ze probirate TIniFile, tak bych se chtel na neco zeptat.
> Nedavno jsem udelal programek (D4 C/S), ktery ukladal nastaveni do INI
>souboru a pri jakUmkoli z�pisu do INI souboru se mi odmazali pr�zdnU r�dky
>mezi sekcemi a pak to nejak divne nacYtalo hodnoty zpet. Na W98 mi to
>udelalo opravdu ojedinele, ale na NT pri jakUmkoli z�pisu.
> VyreUil jsem to tak (potreboval jsem to moc rychleE:-( ),�e jsem ini soubor
>otevrel jako TextFile ( Readln(), Writeln() ) a po ka�dUm ulo�enY jsem INI
>soubor preskl�dal.NenY to "echt", ale funguje to.
>Setkali jste se s tYm taky ?
>
>DYky.
>
> Petr Sadovskr
>p.sadovsky(zv)atlas(tec)cz
>
>P.S. Do registru si nekdy v brzkU dobe zkusYm neco zapsat, ale zatYm me
>zajYmajY opravdu jen TIniFile.
>

INI soubory jsou "cacheovane" a to dost hloupe. Pokud neco do INI zapisi,
a vzapeti to zkusim precist, casto dostanu neco jineho. Nastesti lze
v takovemto pripade zavolat mezi zapisem a ctenim
WritePrivateProfileString(nil,nil,nil,JmenoINI),
coz zajisti ulozeni "cache" a vse bude Ok.

Jindra


DCOM Server a klient v jednom EXE

[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 30.3.1999 09:41:21

Priznam se, ze otazce prilis nerozumim.

COM server muze byt
in-process (to myslis tim "do jednoho EXE"?), pak je to zpravidla .dll,
nebo
out-of-process, pak je to .exe a muze bezet budto na stejnem pocitaci (CreateCOMObject) nebo na vzdalenem pocitaci (CreateRemoteCOMObject).

Parametr ciSingleInstance/ciMultiInstance nesouvisi s tim, zda pobezi klient a server v jednom .EXE, ale zda out-of-process COM Server (.exe) poskytne COM-Objekty pro vsechny klienty nebo zda se pro kazdeho klienta spusti samostatny COM-Server (.exe) s jedinym COM-Objektem.

Pokud si dobre pamatuji skoleni Vladi Bodecka, pak parameter tmApartnent (threading model) vubec nesouvisi s out-of-process servery (.exe), tam se to nastavuje jinak, ale tyka se pouze in-process serveru (mam pravdu, Vlado?).

Navic se teto problematiky tyka spousta dalsich fajnovosti.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
=========================================
----------
> Odes�latel: APEL, Petr Vobornik <vobornik(zv)apel(tec)cz>
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: DCOM Server a klient v jednom EXE
> Datum: 30. b�ezna 1999 7:47
>
> Ahoj,
> chtel bych se zeptat zda nekdo nevite jak umistnit 'S' i 'C' do jednoho
> spolecneho EXE. Pokud vytvarim server pomoci
> TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance), tak mi aplikace pri volani vzdaleneho servu pomoci
> MujObj:=CoMyChat.CreateRemote(CompName) zavola server umistneny ve stejnem
> EXE misto ve vzdalenem. Resenim je pouzit misto parametru cimultiInstance
> paranetr cisingleInstance nebo ciInternalInstance. V mem pripade vsak
> potrebuji pouzit cimultiInstance z duvodu vicenasobnych pristupu k serveru.
> Mam priklad, ktery toto resi, ale je napsan v Delphi 4, ktere nemam a
> nepouzivam. K vytvoreni serveru je tam pouzit prikaz
> TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance, tmApartment). Je zde navic parametr tmApartment o
> kterem nic nevim a Delphi 3 ho nepodporuje.
>
> Budu vdecny za kazdy napad.
>
> Diky Petr


DCOM Server a klient v jednom EXE

[*] Martin VLK <mavlk(zv)helpforest(tec)cz> - 30.3.1999 10:42:43

>Ahoj,
>chtel bych se zeptat zda nekdo nevite jak umistnit 'S' i
'C' do jednoho
>spolecneho EXE. Pokud vytvarim server pomoci
>TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
>cimultiInstance), tak mi aplikace pri volani vzdaleneho
servu pomoci
>MujObj:=CoMyChat.CreateRemote(CompName) zavola server
umistneny ve stejnem
> EXE misto ve vzdalenem. Resenim je pouzit misto parametru
cimultiInstance
>paranetr cisingleInstance nebo ciInternalInstance. V mem
pripade vsak
>potrebuji pouzit cimultiInstance z duvodu vicenasobnych
pristupu k serveru.
>Mam priklad, ktery toto resi, ale je napsan v Delphi 4,
ktere nemam a
>nepouzivam. K vytvoreni serveru je tam pouzit prikaz
>TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance, tmApartment). Je zde navic parametr
tmApartment o
>kterem nic nevim a Delphi 3 ho nepodporuje.
>
>Budu vdecny za kazdy napad.
>
>Diky Petr
>

Je to tim ze funkce CreateRemoteComObject, ktera je volana
pri vytvareni
COM objektu, testuje jmeno pocitace se zadanym jmenen
vzdaleneho
serveru a pokud je stejne pouzije tento priznak pri jeho
vytvareni :

CLSCTX_LOCAL_SERVER or CLSCTX_REMOTE_SERVER or
CLSCTX_INPROC_SERVER

cimz se vytvori COM na stejnem pocitaci.

Aby to fungovalo tak jak chces ty je nutne funkci
CreateRemoteComObject
upravit, nebo lepe napsat svou vlastni (je to snadne, pouze
zmenis
to nastaveni priznaku pred vytvorenim vlastniho COM objektu
a
zbytek opises (je to v unitu ComObj.PAS)

Co se tyka toho parametru tmApartment, tak to se vztahuje na
zpusob
komunikace COM objektu s thready. To je jiz trochu
slozitejsi.Zkus se podivat
na stanku

www.castle.net/~bly/Programming/index.html

tam je to popsane uplne do detailu. Je to fakt vyborny
material pro studovani
COMu/DCOMu.

S pozdravem

Martin VLK

***************************************
* Help forest s.r.o.
* Dr.E.Benese 14, Sumperk, 78701
*
* tel : 0649/217149
* fax : 0649/226930
* e-mail : mavlk(zv)helpforest(tec)cz
*
***************************************

ASCII file, CSV file

[*] eL <eL_z_Prahy(zv)seznam(tec)cz> - 30.3.1999 10:45:21

Dobry den.

Mam problem. Potrebuji importovat do Paradox tabulky *.csv soubor (tak jak
ho vyexportuje Excel). Problem je navic trochu komlikovany tim, ze jedno
znakove pole muze byt delsi nez 255 znaku a v tabulce by tedy melo byt jako
memo pole a dale tim, ze import by mel byt obecny, tzn nevim predem jaka
bude struktura a pocet poli v tabulce.

Kdyz jsem se tim probiral nedokazal jsem z dokumentace zjistit jak ma
vypadat soubor *.sch pro pristup k ASCII souborum.

Predem diky za kazdou radu.

eL..

Delphi & PowerPolicies

[*] dds <dds(zv)uh(tec)cz> - 30.3.1999 10:47:40

Zdravim vsechny,
nevim kde zacit hledat, chci z programu prepnout mezi nastavenimi
rezimu spotreby (v Control Panelu W98)
Jsou tam prednastavene klice v HKEY_CURRENT_USER\Control
Panel\PowerCfg\PowerPolicie\cislo_polozky
Jak pridat polozku je jasne, jen to prepnuti. Pujde to jen API?
Jaka funkce?
Predem vam dekuji za ochotu.
Martin Kucera


TTreeView

[*] Karel Kral <kral(zv)purus(tec)cz> - 30.3.1999 10:49:19

Nejlep�� p��klad je Resource Explorer z Demos Delphi.

Lukes V�clav wrote:
>
> Hi,
>
> ��our�m se v TTreeView a jsem z toho n�jak mimo. M��ete m� pros�m n�kdo
> zasv�tit, pop�. poslat n�jak� p��klady ?
>
> D�ky moc
>
> Va�ek
>
> V�clav Lukes
>
> E-mail: Vaclav.Lukes(zv)pvt(tec)cz
> Tel.: 0603-511247

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


QReport a Landscape

[*] Bednarcik Dalibor <d.bednarcik(zv)vpfm(tec)cz> - 30.3.1999 11:00:01


Ahoj ...

Pouzivam DELPHI 3..
Mam navrzeny QRForm, u ktereho mam nastavenou orientaci na sirku
(landscape...)
Pri prohlizeni se mi formular zobrazi spravne. Ovsem pri tisku mi tiskarna
tiskne porad na vysku (portrait).
Pokud ovsem nastavim tisk na sirku primo ve Win95. tak to tiskne spravne..

Muze te mi nekdo poradit co s tim?

Scanner

[*] Ondrej Krajicek <krajicek(zv)promedia(tec)cz> - 30.3.1999 11:50:32

Zdravim osazenstvo konference, dobry den,

pred casem se zde diskutoval problem "VMM32.VXD is missing"
Hledal jsem v archivech konference, ale delphi(tec)cz je pro me v tuto
chvili nedostupne, takze mohl by mi nekdo preposlat vysledek
debaty - vim ze problem byl v ovladacich pro scanner Umax Astra a chci
se zeptat jestli je v tom jeste nejaky jiny figl krome stazeni
nove verze a reinstalace windows.

Ondrej Krajicek


oracle

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 30.3.1999 12:03:28

diky za odpovedi :))
ale jeste mam jednu otazku zda je mozne v Oraclu vytvorit a jak globalni
promennou, ketra tedy nebude dostupna v ramci stored procedury , ale
globalne v celem oraclu


Zalohovani

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.3.1999 12:03:44

> Pomerne s uspechem pouzivam Zalohovani (Microsoft Backup), ktere je
> soucasti instalace Windows. Jedinym problemem je ze seznam zalohovanych
> souboru nelze vytvorit programove, ale musis jej udelat rucne dle
> konkretniho umisteni na disku.
****V tom bude asi problem. Zakaznici jsou vetsinou lide
pocitacu neznali a dela problem jim vysvetlit, ze kdyz chteji neco
zazalohovat, musi pouzit menu Zaloha a vyplnit dva casy, natoz
aby se patlali s nejakymi soubory (co to je, kde se to tu vzalo, 1,
2, 3, 5, 6, 7 malych souboru...).

Slavek

> Internet proti monopolu. Petr Vones, amatersky
> programator * http://www.bojkot(tec)cz *
> ************************


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


Zalohovani

[*] Nov�k Radek <Radek.Novak(zv)pvt(tec)cz> - 30.3.1999 12:09:50

Vi nekdo jak slusne predat parametry do constructoru Create objektu,
ktery je dynamicky vytvaren az za behu?
...
MujObjekt := TMujObjekt.Create(Application) /

Nechci, nebo nemuzu prepisovat constructor,
nechci - nelibi se mi pouzivani globalnich promenych - stejne neni
vhodne
pro moznost lib.poctu instanci objektu - paramerty se mohou lisit

Dik. Radek


DCOM Server a klient v jednom EXE

[*] APEL, Petr Vobornik <vobornik(zv)apel(tec)cz> - 30.3.1999 12:28:09

Jde mi o to, jak vytvorit aplikaci C/S pomoci DCOM kde bude obousmerna
komunikace. Neboli, budu mit dva EXE, ve kterych bude jak klient, tak
server a budou si moci vzajemne volat funkce obsazene v danem serveru
druheho EXE.
Me se deje to, ze kdy? volam vzdaleny server v druhem EXE, tak se mi client
nakonekti k serveru obsazenem ve stejnem EXE jako je volajici klient.

Diky Petr

-----Puvodni zprava-----
Od: Jan ?ebelik [SMTP:honza(zv)haes(tec)cz]
Odeslano: 30. boezna 1999 9:41
Komu: delphi-l(zv)fwd(tec)cz
Kopie: Vladimir Bodecek
Poedmit: Re: DCOM Server a klient v jednom EXE

Priznam se, ze otazce prilis nerozumim.

COM server muze byt
in-process (to myslis tim "do jednoho EXE"?), pak je to zpravidla .dll,
nebo
out-of-process, pak je to .exe a muze bezet budto na stejnem pocitaci
(CreateCOMObject) nebo na vzdalenem pocitaci (CreateRemoteCOMObject).

Parametr ciSingleInstance/ciMultiInstance nesouvisi s tim, zda pobezi
klient a server v jednom .EXE, ale zda out-of-process COM Server (.exe)
poskytne COM-Objekty pro vsechny klienty nebo zda se pro kazdeho klienta
spusti samostatny COM-Server (.exe) s jedinym COM-Objektem.

Pokud si dobre pamatuji skoleni Vladi Bodecka, pak parameter tmApartnent
(threading model) vubec nesouvisi s out-of-process servery (.exe), tam se
to nastavuje jinak, ale tyka se pouze in-process serveru (mam pravdu,
Vlado?).

Navic se teto problematiky tyka spousta dalsich fajnovosti.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931
=========================================
----------
> Odesilatel: APEL, Petr Vobornik <vobornik(zv)apel(tec)cz>
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: DCOM Server a klient v jednom EXE
> Datum: 30. boezna 1999 7:47
>
> Ahoj,
> chtel bych se zeptat zda nekdo nevite jak umistnit 'S' i 'C' do jednoho
> spolecneho EXE. Pokud vytvarim server pomoci
> TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance), tak mi aplikace pri volani vzdaleneho servu pomoci
> MujObj:=CoMyChat.CreateRemote(CompName) zavola server umistneny ve
stejnem
> EXE misto ve vzdalenem. Resenim je pouzit misto parametru
cimultiInstance
> paranetr cisingleInstance nebo ciInternalInstance. V mem pripade vsak
> potrebuji pouzit cimultiInstance z duvodu vicenasobnych pristupu k
serveru.
> Mam priklad, ktery toto resi, ale je napsan v Delphi 4, ktere nemam a
> nepouzivam. K vytvoreni serveru je tam pouzit prikaz
> TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance, tmApartment). Je zde navic parametr tmApartment o
> kterem nic nevim a Delphi 3 ho nepodporuje.
>
> Budu vdecny za kazdy napad.
>
> Diky Petr

Richedit a zacatek radku

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 30.3.1999 12:49:01

Zdravim,

problemek. Mam umisten kurzor v Richeditu rekneme na radku 5 a ve sloupci
15. Jak bych zjistil hodnotu SelStart z prvniho sloupce tohoto radku?

==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

Skleroza

[*] Nosek Libor <nosek(zv)ujf.cas(tec)cz> - 30.3.1999 13:02:45

Omlouvam se za to ze tento dotaz nepatri sem.
Nevite existuje-li nekde program na zjisteni hesla u ZIP souboru?
Zazipoval, zahesloval a potrebuju data.
Dekuji za jakoukoli radu.
S omluvou Nosek Libor

Nosek Libor
OJS
UJF AV CR
Rez u Prahy 250 68

tel: 66173163
fax: 6857003

nosek(zv)ujf.cas(tec)cz


Remote Procedure Calls

[*] voltrr1.epr(zv)mail.cez(tec)cz - 30.3.1999 12:12:51



Zdar,

nehral jste si s timdle nekdo ???


Radek Voltr
voltrr1.epr(zv)mail.cez(tec)cz

PageControl bez zalozek

[*] Karel Kral <kral(zv)purus(tec)cz> - 30.3.1999 13:28:37

Nevite, jak odstranit z TPageControl zalozky?
Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
jedina stranka mela videt zalozku.
TabHeight = 0 nefunguje, to nastavi implicitni velikost
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


SQL a z�vorky

[*] Josef Slan� <slany(zv)fpozn(tec)cz> - 30.3.1999 13:31:14

Ahoj,

zkousim zacit s SQL a hned mam dotaz:

Lze v prikazu Select v podmince Where pouzit nejake zavorky a pripadne jak ?

Josef Slany

PageControl bez zalozek

[*] Marek Soukup <marek(zv)comberg(tec)com> - 30.3.1999 13:37:50

Ahoj,
podivej se do sekce Win 3.11 na komp. TNotebook, myslim, ze to bude to co
potrebujes.

Marek Soukup

Karel Kral wrote:

> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost
> --
> ______________________________________________________
> Karel Kral, informatik
> Purus, s.r.o., Cezavy 627, 664 56 Blucina
> Tel: 05/47235000, 0602/552432, Fax: 05/47231203
> E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
> ______________________________________________________


DCOM Server a klient v jednom EXE

[*] iturcan(zv)gamo.sk - 30.3.1999 13:40:58



Hi,

>Jde mi o to, jak vytvorit aplikaci C/S pomoci DCOM kde bude obousmerna
>komunikace. Neboli, budu mit dva EXE, ve kterych bude jak klient, tak
>server a budou si moci vzajemne volat funkce obsazene v danem serveru
>druheho EXE.

hmm, presne na takomto principe funguje ten prikladik , ktori som uz par
krat posielal "chat", je vsak urceny
pre D4, ale uprava pre D3 mozna samozrejme je. ak priklad mas tak si ho
uprav, je velmi jednoduchy, ak nie napis a poslem ti ho.


Ivan Turcan


PageControl bez zalozek

[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 30.3.1999 13:50:47



Hi,

pod�vej se u TTabSheet na TabVisible. Tam je pes zakop�n.

Va�ek

-----P�vodn� zpr�va-----
Od: Karel Kral [mailto:kral(zv)purus(tec)cz]
Odesl�no: 30. b�ezna 1999 13:29
Komu: Konference Delphi
P�edm�t: PageControl bez zalozek


Nevite, jak odstranit z TPageControl zalozky?
Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
jedina stranka mela videt zalozku.
TabHeight = 0 nefunguje, to nastavi implicitni velikost
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


PageControl bez zalozek

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 30.3.1999 13:51:05

> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost

Je treba nastavit na jednotlivych TabSheetech vlastnost TabVisible na false.

==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

PageControl bez zalozek

[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 30.3.1999 13:52:04

Dne Tue, 30 Mar 1999 13:28:37 +0200 Karel Kral napsal:

> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost
Neni lepsi pouzit TNotebook?
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772


PageControl bez zalozek

[*] kelleon(zv)nnsk.sk - 30.3.1999 14:05:27

> -----Original Message-----
> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost
TTabSheet ma vlastnost TabVisible.

Ondrej Kelle
kelleon(zv)nnsk.sk


SQL a z�vorky

[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 30.3.1999 14:07:06

No nejspis bych zkusil je pro zacatek pouzit asi jako zavorky v
jakemkoliv jinem programovacim jazyce :-)

where ((cislo=1) and (text="AAA")) or (cislo=2)

----------------------------------
David Vodnansky - database analyst
<mailto: vodnansky(zv)allianz(tec)cz>
----------------------------------


> -----P�vodn� zpr�va-----
> Od: Josef Slan� [mailto:slany(zv)fpozn(tec)cz]
> Odesl�no: 30. b�ezna 1999 13:31
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: SQL a z�vorky
>
>
> Ahoj,
>
> zkousim zacit s SQL a hned mam dotaz:
>
> Lze v prikazu Select v podmince Where pouzit nejake zavorky a
> pripadne jak ?
>
> Josef Slany
>
>

DCOM Server a klient v jednom EXE

[*] APEL, Petr Vobornik <vobornik(zv)apel(tec)cz> - 30.3.1999 14:10:48

Moc diky za radu nad zlato. Prepsal jsem to, jak jsi napsal a vse funguje jak ma.

Diky Petr

-----Puvodni zprava-----
Od: Martin VLK [SMTP:mavlk(zv)helpforest(tec)cz]
Odeslano: 30. boezna 1999 10:43
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: DCOM Server a klient v jednom EXE

>Ahoj,
>chtel bych se zeptat zda nekdo nevite jak umistnit 'S' i
'C' do jednoho
>spolecneho EXE. Pokud vytvarim server pomoci
>TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
>cimultiInstance), tak mi aplikace pri volani vzdaleneho
servu pomoci
>MujObj:=CoMyChat.CreateRemote(CompName) zavola server
umistneny ve stejnem
> EXE misto ve vzdalenem. Resenim je pouzit misto parametru
cimultiInstance
>paranetr cisingleInstance nebo ciInternalInstance. V mem
pripade vsak
>potrebuji pouzit cimultiInstance z duvodu vicenasobnych
pristupu k serveru.
>Mam priklad, ktery toto resi, ale je napsan v Delphi 4,
ktere nemam a
>nepouzivam. K vytvoreni serveru je tam pouzit prikaz
>TAutoObjectFactory.Create(ComServer, TMyChat, Class_MyChat,
> cimultiInstance, tmApartment). Je zde navic parametr
tmApartment o
>kterem nic nevim a Delphi 3 ho nepodporuje.
>
>Budu vdecny za kazdy napad.
>
>Diky Petr
>

Je to tim ze funkce CreateRemoteComObject, ktera je volana
pri vytvareni
COM objektu, testuje jmeno pocitace se zadanym jmenen
vzdaleneho
serveru a pokud je stejne pouzije tento priznak pri jeho
vytvareni :

CLSCTX_LOCAL_SERVER or CLSCTX_REMOTE_SERVER or
CLSCTX_INPROC_SERVER

cimz se vytvori COM na stejnem pocitaci.

Aby to fungovalo tak jak chces ty je nutne funkci
CreateRemoteComObject
upravit, nebo lepe napsat svou vlastni (je to snadne, pouze
zmenis
to nastaveni priznaku pred vytvorenim vlastniho COM objektu
a
zbytek opises (je to v unitu ComObj.PAS)

Co se tyka toho parametru tmApartment, tak to se vztahuje na
zpusob
komunikace COM objektu s thready. To je jiz trochu
slozitejsi.Zkus se podivat
na stanku

www.castle.net/~bly/Programming/index.html

tam je to popsane uplne do detailu. Je to fakt vyborny
material pro studovani
COMu/DCOMu.

S pozdravem

Martin VLK

***************************************
* Help forest s.r.o.
* Dr.E.Benese 14, Sumperk, 78701
*
* tel : 0649/217149
* fax : 0649/226930
* e-mail : mavlk(zv)helpforest(tec)cz
*
***************************************

SQL Kedy bola maximalna hodnota

[*] Pavol Griga <paly(zv)sct.sk> - 30.3.1999 14:11:20

>No problem je v tom, ze GROUP BY garantuje, ze pro kazdou hodnotu "klice"
dostaneme jediny radek.
>V tvem pripade toto nelze garantovat: maximum muze nastat behem dne treba i
nekolikrat.
>Takze se obavam, ze bez vnoreneho selectu to nepujde. Navic se musis smirit
s tim, ze (teoreticky) dostanes pro kazde "Kde, Den" vice radku.
>
>Honza


O tych problemoch som vedel, len som dufal, ze existuje nejaka
cesta, ako to jednoducho
obist.


Pavol Griga


oracle

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 30.3.1999 14:13:49

chybicka zapomel jsem na slovicko jen takze :zda je mozne v Oraclu vytvorit
a jak globalni promennou, ketra tedy nebude dostupna JEN v ramci stored
procedury , ale globalne v celem oraclu



Od: sula milos <crkstrobe(zv)geocities.com>
Komu: delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 30. b�ezna 1999 12:02
P�edm�t: oracle


>diky za odpovedi :))
>ale jeste mam jednu otazku zda je mozne v Oraclu vytvorit a jak globalni
>promennou, ketra tedy nebude dostupna v ramci stored procedury , ale
>globalne v celem oraclu
>

Richedit a zacatek radku

[*] Lubos <bruce(zv)pobox.sk> - 30.3.1999 14:22:05

> problemek. Mam umisten kurzor v Richeditu rekneme na radku 5 a ve sloupci
> 15. Jak bych zjistil hodnotu SelStart z prvniho sloupce tohoto radku?
>

hm, nerozumiem.
SelStart je hodnota prveho vyselektovaneho znaku od zaciatku RichEditu.

nechapem co chces.

/LH


klik na cudzie okno :) II

[*] Lubos <bruce(zv)pobox.sk> - 30.3.1999 14:25:25

> > > Uff, co to ma byt za silenost ? :-) Nevyplatilo by se ti uz pouzit nejaky
> > > macrorecorder, podobne jako byla ve starych Windows Makrokamera.
> > No to by sa urcite oplatilo, ak vies o nejakom free tak posli prosim
> > nazov alebo priamo adresu.
> Druha moznost je si neco podobneho napsat (jsme tu preci programatori :-),
> nejaky priklad je u Borlandu :

vdaka.
vsak som si to pisal, ty si naznacil ze existuje lahsia cesta...
Nefunguje mi prepnutie zaloziek, riesil som to posielanim
klavesy "sipka vpravo" , ale vobec sa to nechova, ako ked
skutocne stlacim "sipku vpravo".

/LH


PageControl bez zalozek

[*] Lubos <bruce(zv)pobox.sk> - 30.3.1999 14:27:15

> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost

musis ich vymazat - pozri archiv

/LH


PageControl bez zalozek

[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 30.3.1999 14:34:25

> Nevite, jak odstranit z TPageControl zalozky?
> Jde o to, ze chci zobrazovat vzdy pouze jednu stranu podle toho, co se
> vybere v pripojenem TTreeView. Pak je samozrejme nesmysl, aby ta pouze
> jedina stranka mela videt zalozku.
> TabHeight = 0 nefunguje, to nastavi implicitni velikost
> --

Neni jednodusi pouzit TNotebook? Je to sice uz z D1, ale je to presne
ono....

Ales


TreeView - pom���c

[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 30.3.1999 14:45:57


Hi,

tr�p�m se, tr�p�m. Nem�te pros�m n�kdo zku�enosti s TreeView ?

Va�ek



V�clav Lukes

E-mail: Vaclav.Lukes(zv)pvt(tec)cz
Tel.: 0603-511247


SQL a z�vorky

[*] Ales Kle�ka - 30.3.1999 14:50:11

Ahoj,
v klauzuli WHERE muzes samozrejme zavorky pouzit, jen si musis davat
pozor na to aby se parovaly :-)
Jedna se o to, ze podle toho jak zavorky v teto klauzuly umistis, to se
provede ( at uz se jedna o prikaz SELECT, UPDATE ... ), jen si musis davat
pozor aby to vybralo to, co si predstavujes, protoze neco jineho se stane
kdyz to bude vypadat napr.

UPDATE Adresa
SET Valid = 'N'
WHERE ( IsValid = 'Y' AND ValidTo <= SysDate ) OR IsValid IS NULL

nebo

UPDATE Faktury
SET Valid = 'N'
WHERE IsValid = 'Y' AND ( ValidTo <= SysDate OR IsValid IS NULL )

Pozn. Asi to neni nejlepsi priklad, ale nic lepsiho me v tom fofru nenapada
( prosim nekamenovat )

Ales Klecka
{ a.klecka(zv)email(tec)cz }

----- Original Message -----
From: Josef Slan� <slany(zv)fpozn(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: 30. b�ezna 1999 13:31
Subject: SQL a z�vorky


> Ahoj,
>
> zkousim zacit s SQL a hned mam dotaz:
>
> Lze v prikazu Select v podmince Where pouzit nejake zavorky a pripadne jak
?
>
> Josef Slany
>

SQL a z�vorky

[*] Lubo Fule <fule(zv)sct.sk> - 30.3.1999 15:00:33

Samozrejme, robi sa to uplne noemarne ako hociktorom vyraze napr:
... where (Stlpec1 >=0 or Stlpec2<1) and Stlpec3 = 1

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Josef Slan�
Sent: Tuesday, March 30, 1999 1:31 PM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: SQL a z�vorky


Ahoj,

zkousim zacit s SQL a hned mam dotaz:

Lze v prikazu Select v podmince Where pouzit nejake zavorky a pripadne jak ?

Josef Slany


Richedit a zacatek radku

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 30.3.1999 15:04:26

> hm, nerozumiem.
> SelStart je hodnota prveho vyselektovaneho znaku od zaciatku
> RichEditu.

V podstate potrebuju tohle:

* mam kurzor nekde uprostred textu
* potrebuju oznacit do bloku text od toho mista, kde je kurzor po zacatek
radku, kde je kurzor


DELx.MB a LCK subory

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 30.3.1999 15:17:28

T�ma: Pr�stup na datab�zu INTERBASE na z�pis od klienta cez zdialen� adres�r.

M�m delphi aplik�cie (exe) subory ulo�ene na servri v zdielanom adres�ry (Read/Write), ktor� pracuj� s tabulkami datab�zy (z�pis, mazanie at�), ktor� je tie� na servri. Ak exe spust�m od zdialen�ho klienta, bez toho aby som exe nakop�roval na klientsk� PC, tak sa vytvor� v zdielanom adres�ri DEL2.MB (DEL3.MB...) s�bor. Potom u� in� klinet nie je schopn� spusti� in� aplik�ciu (exe) zo zdialen�ho adres�ra (exe sa pust� ale konektovanie na datab�zu je nemo�n�).

Chybov� hl�senie z delphi :

Project XY.exe raised exception class EDBEngineError with message Share violation.
File : path\Del2.MB Table: path\Del2.MB
Process stopped Use Step or Run to continue.

Tie� sa vytvor� v adresari pdoxusrs.lck s�bor ale ja pou��vam iba INTERBASE. Ni� nepou��vam z PARADOXu. (BDE default database som tie� skusil prep�sa� z Paradox na ASCII, ale nepomohlo)

TUNGLI Jan
tungli(zv)pvt.sk


klik na cudzie okno :) II

[*] Filip Jirs�k <Jirsak(zv)gymnacel(tec)cz> - 30.3.1999 15:42:53

Resil jsem kdysi podobny problem, poslal jsem programu zpravu o stiku
klavesy a ono se nic nedelo. Pak mne napadlo pouzit WinSight (ci jak se to
jmenuje, sleduje to zpravy a okna a ma to takovy krasny design, ze si vzdy
vzpomenu na Win3.1). No a tam jsem sledoval jak si ten program ty zpravy
posila, az jsem objevil zpravu, ktere znamenala primo to, co jsem chtel
(napr. tedy ne "sipka", ale primo uz prepnout zalozku"). Problem je vetsinou
v tom, ze ty v programu zjistis handle hlavniho okna, jenze ony jsou v nem
tlacitka (= specialni okna), edit (= specialni okno) atd., takze jsem musel
nejprve zjistit handle zainteresovaneho okna, take ve vyse jmenovanem
programu.
Filip Jirsak


-----P�vodn� zpr�va-----
Od: Lubos <bruce(zv)pobox.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. b�ezna 1999 15:33
P�edm�t: Re: klik na cudzie okno :) II


>> > > Uff, co to ma byt za silenost ? :-) Nevyplatilo by se ti uz pouzit
nejaky
>> > > macrorecorder, podobne jako byla ve starych Windows Makrokamera.
>> > No to by sa urcite oplatilo, ak vies o nejakom free tak posli prosim
>> > nazov alebo priamo adresu.
>> Druha moznost je si neco podobneho napsat (jsme tu preci programatori
:-),
>> nejaky priklad je u Borlandu :
>
>vdaka.
>vsak som si to pisal, ty si naznacil ze existuje lahsia cesta...
>Nefunguje mi prepnutie zaloziek, riesil som to posielanim
>klavesy "sipka vpravo" , ale vobec sa to nechova, ako ked
>skutocne stlacim "sipku vpravo".
>
>/LH
>

ovladani klavesnici

[*] Marek Soukup <marek(zv)comberg(tec)com> - 30.3.1999 15:44:36

Ahoj,
asi bych si udelal nejakou proceduru kde bych nastavil chovani po stisku
ruznych klaves a presmeroval bych na ni eventy onKeyDown u tech
tlacitek.

Marek Soukup

Jan Pomikalek wrote:

> Zdravim,
>
> mam maly problem. Kdyz si vlozim na formular vice tlacitek a chci je
> ovladat pouze pomoci mysi a pomoci horkych klaves, tedy ne pomoci
> tabelatoru a enteru, jak na to? Jde samozrejme nastavit u vsech
> tlacitek TabStop:= false, ale jakmile se pak na nejake tlacitko
> klikne mysi, stane se bez ohledu na toto nastaveni aktivnim. Takze
> kdyz pak stisknu enter, ktery mam nastaveny jako horkou hlavesu, tak
> se mi misto prikazu prirazeneho horke klavese, stiskne aktivni
> tlacitko.
> Da se tomu nejak zamezit?
>
> Za odpoved predem dekuje a za nesrozumitelnost tohoto dotazu se
> omlouva Jan Pomikalek
>
> -------------------------------------------------------------------
> Jan Pomikalek (Muf) http://web.pinknet(tec)cz/~muf/
> E-mail: muf(zv)pinknet(tec)cz http://tetrinet.pinknet(tec)cz/
> ICQ: 2198989 http://muf.pinknet(tec)cz/
> -------------------[pinknet on every screen]-----------------------


Shutdown

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 30.3.1999 15:49:51

Zdravim,

jak lze ukoncit Windows pomoci aplikace?==[ eLK(zv) ]===================================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz - (069)6201375
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
============================================================

SQL a UPDATE

[*] Bob <delphi(zv)alf.dingo(tec)cz> - 30.3.1999 16:09:33

Ahojte lidi,

nevite, zda je to moje chyba, nebo se to pise jinak nebo je to chyba
Inprise?
Mam nasledujici SQL prikaz:

UPDATE Tab SET AA=3 WHERE BB = 2

Do sloupecku AA, kdyz je BB=2 me tu hodnotu na 3 nenahradi.
Pokud vsak napisu (je to trochu prasarna...):

UPDATE Tab SET AA=3 WHERE not BB <> 2

Tak to nahradi spravne.
Nevim, zda jsem problem nastinil dobre, ale sak vy to pochopite.

Bob


Skleroza

[*] roman.vasicek(zv)email(tec)cz - 30.3.1999 15:33:41

Nazdarek,

hledej na adrese http://www.hedgie.com/passwords/index.html

Phoenix

> Nevite existuje-li nekde program na zjisteni hesla u ZIP souboru?

+-----
| Roman Vasicek - Phoenix
| E-mail: roman.vasicek(zv)email(tec)cz
| WWW: http://roman.manes.skm.vutbr(tec)cz/


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

SQL a z�vorky

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 30.3.1999 16:34:42

nebo jednoduseji
where text="(:-)"

Mti. :-)))

ale to uz je spis off.t. :-(>No nejspis bych zkusil je pro zacatek pouzit asi jako zavorky v
>jakemkoliv jinem programovacim jazyce :-)
>
>where ((cislo=1) and (text="AAA")) or (cislo=2)

PageControl bez zalozek

[*] Karel Kral <kral(zv)purus(tec)cz> - 30.3.1999 16:48:44

> Je treba nastavit na jednotlivych TabSheetech vlastnost TabVisible na false.

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


delsi integer

[*] Jan Pomikalek <pomikaj(zv)feld.cvut(tec)cz> - 30.3.1999 14:52:39 met-1mest

Zdravim,

muze mi prosim nekdo poradit, zda se da v Pascalu nebo v Delphi
nadeklarovat delsi nez 32bitova celociselna promenna (tedy neco
delsiho nez je longint)?

Predem diky, J.P.

-------------------------------------------------------------------
Jan Pomikalek (Muf) http://web.pinknet(tec)cz/~muf/
E-mail: muf(zv)pinknet(tec)cz http://tetrinet.pinknet(tec)cz/
ICQ: 2198989 http://muf.pinknet(tec)cz/
-------------------[pinknet on every screen]-----------------------


Rozdilovy select

[*] Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.3.1999 17:02:09


Preji vsem pekneho dne,

nejak jsem se zamotal do selectu a proto prosim o radu.

Mam tabulku ZARIZENI, kde je primarni klic ID a pak Nazev a Aktivita.
Druha tabulka se jmenuje OS_ZAR a v prvnim sloupci je ID toho zarizeni
(zde se jmenuje ID_Z) a ve druhem je ID_O, coz je identifikator nejake
osoby.

V te tabulce OS_ZAR kazdy radek znamena, ze osoba ID_O muze k zarizeni
ID_Z a ja potrebuji zjistit nasledujici dotaz:

Vybrat vsechna zarizeni (ID a NAZEV), ke kterym osoba s konkretnim ID_O,
ktere znam,
nemuze.

Zkousel jsem nasledujici dotaz:

select ID, NAZEV
from ZARIZENI
where not exists
(
select *
from OS_ZAR
where ID_O = 1277
)

ale to neni spravne.

Diky vsem za radu.

Slavek

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

Shutdown

[*] hrenovcik(zv)ns.basl.sk - 30.3.1999 17:05:00



On Tue, 30 Mar 1999, Krayzel Libor wrote:

> Zdravim,
>
> jak lze ukoncit Windows pomoci aplikace?
>
>
>
Nazdar


skus ExitWindowsEx (Win32API)

ovladani klavesnici

[*] Jan Pomikalek <pomikaj(zv)feld.cvut(tec)cz> - 30.3.1999 15:12:22 met-1mest

Zdravim,

mam maly problem. Kdyz si vlozim na formular vice tlacitek a chci je
ovladat pouze pomoci mysi a pomoci horkych klaves, tedy ne pomoci
tabelatoru a enteru, jak na to? Jde samozrejme nastavit u vsech
tlacitek TabStop:= false, ale jakmile se pak na nejake tlacitko
klikne mysi, stane se bez ohledu na toto nastaveni aktivnim. Takze
kdyz pak stisknu enter, ktery mam nastaveny jako horkou hlavesu, tak
se mi misto prikazu prirazeneho horke klavese, stiskne aktivni
tlacitko.
Da se tomu nejak zamezit?

Za odpoved predem dekuje a za nesrozumitelnost tohoto dotazu se
omlouva Jan Pomikalek

-------------------------------------------------------------------
Jan Pomikalek (Muf) http://web.pinknet(tec)cz/~muf/
E-mail: muf(zv)pinknet(tec)cz http://tetrinet.pinknet(tec)cz/
ICQ: 2198989 http://muf.pinknet(tec)cz/
-------------------[pinknet on every screen]-----------------------


oracle

[*] Pavel Slovacek <silvan(zv)atlas(tec)cz> - 30.3.1999 17:14:19

Globalni promenou muzes vytvorit v Package, ale ta bude pristupna jen v
ramci Session (jednoho prihlaseni). Jednotlive Sessions neumoznuji sdileni
promenych. Sessions mohou mezi sebou komunikovat pomoci DBMS_Pipe. Pokud
potrebujes mit nejakou promenou sdilenou mezi jednotlivymy Sessions tak
doporucuji predavat si hodnotu pres tabulku, ale to hodne zalezi k cemu to
potrebujes. Mozna postaci zamknout nejaky zaznam a pokud se o stejnou akci
pokusi nekdo jiny tak ji nepovolit.


Jinak k te globalni promene

CREATE OR REPLACE PACKAGE sys_inifile IS
--
-- deklarace public procedur a funkci
PROCEDURE write_boolean(i_skupina VARCHAR2 , i_nazev VARCHAR2
, i_hodnota Boolean );
...
...
-- deklarace globalni promene
GlobalniPromena VARCHAR2(10) := 'Nastaveni';
END sys_inifile;

CREATE OR REPLACE PACKAGE BODY sys_inifile IS
--
-- tady muzes nadeklarovat promene ktere budou platne jen v ramci PACKAGE
PrivatePromena NUMBER := 0;
PROCEDURE write_boolean(i_skupina VARCHAR2 , i_nazev VARCHAR2
, i_hodnota Boolean );
IS
BEGIN
...
....
END;
......
......
END sys_inifile;

K promene pak pristupujes z ktere-koliv procedury nebo funkce odkazem
"sys_inifile.GlobalniPromena := ...."


Pavel Slovacek



At 12:03 30.3.1999 +0200, you wrote:
>diky za odpovedi :))
>ale jeste mam jednu otazku zda je mozne v Oraclu vytvorit a jak globalni
>promennou, ketra tedy nebude dostupna v ramci stored procedury , ale
>globalne v celem oraclu


Delphi & PowerPolicies

[*] dds <dds(zv)uh(tec)cz> - 30.3.1999 17:18:35

Zdravim vsechny,
nevim kde zacit hledat, chci z programu prepnout mezi nastavenimi
rezimu spotreby (v Control Panelu W98)
Jsou tam prednastavene klice v HKEY_CURRENT_USER\Control
Panel\PowerCfg\PowerPolicie\cislo_polozky
Jak pridat polozku je jasne, jen to prepnuti. Pujde to jen API?
Predem vam dekuji za ochotu.
Martin Kucera

Delphi a assembler

[*] Petr Kro�a ml. <pkroca(zv)compact(tec)cz> - 30.3.1999 17:22:04

Ahoj, mel bych jeden dotaz.
V assembleru jsem delal naposledy jeste v Turbo Pascalu. Ted ale potrebuji
naprogramovat kratky kousek kodu na nejakou kodovaci rutinu a chci, aby to
bylo rychle, takze bych to rad napsal v ASM.

Hned pri prvnim kroku, tedy zavadeni do pointeru, jsem narazil na problem,
ze v 32bit nelze pouzit instrukci

lds si, ADDRESSPTR .

V jakemsi zdrojaku jsem zahledl jine reseni, ale presto: potreboval bych,
jestli by se nekdo obtezoval s vypsanim jak v bloku ASM:

1) zavest pointer a do kterych registru (lze pouzit ESI pro offset misto SI
?)
2) jak DELPHI predava parametry procedury (na jake adrese)
3) lze pouzivat instrukce LODSB, STOSB, STOSW atd.. nebo se musi
inkrementovat/dekrem. citac a nacitat primo z nejake adresy

Proste bych rad, aby nekdo popsal nejpalcivejsi rozdily mezi 16 a 32 bit
ASM.

Dekuji
PK


Shutdown

[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 30.3.1999 17:38:10

On Tue, 30 Mar 1999, Krayzel Libor wrote:

> Zdravim,
>
> jak lze ukoncit Windows pomoci aplikace?
>

The ExitWindowsEx function either logs off, shuts down, or shuts down and
restarts the system.

BOOL ExitWindowsEx(

UINT uFlags, // shutdown operation
DWORD dwReserved // reserved
);

Vice viz Win32.hlp
caj
Lukas

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


nahrada za ExtractAssociatedIcon

[*] Jan Stuchlik <xstuchli(zv)feld.cvut(tec)cz> - 30.3.1999 16:54:47



Delphi a assembler

[*] Lubo Fule <fule(zv)sct.sk> - 30.3.1999 18:17:16

1) V prvom rade, v 32-bit uz neexistuje pojem Segment:Offset, pretoze cely
pointer sa zmesti do 32-bitoveho registra, teda na ulozenie pointra sa
nepouziva kombinacia dvoch registrov ako v 16-bit, ale 32-bitove registre
(ESI, EDI, EDX, EAX, ECX ...).

Kombinaciu ES:DI nahradzuje register EDI a kombinaciu DS:SI nahradzuje ESI.
Teda namiesto:

lds si, ADDRESSPTR

sa urobi

MOV EAX, ADDRESSPTR
MOV ESI, EAX // zda sa mi, ze do ESI (EDI) je mozne priradit len hodnotu z
ineho registra

2) Zalezi od sposobu ulozenia parametrov. Viem, ze ked sa za hlavickou
proceduri nenapise ziadne klucove slovo (napr. stdcall), tak delphi uklada
prve tri parametre priamo do registrov EAX, EDX, ECX a dalsie asi do
zasobnika (nie som si isty), ale neviem v akom poradi. Viac o tom neviem.

3) da sa, pricom ES:DI a DS:SI nahradzuju 32-bitove registre (pozri 1)

Lubo.


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Petr Kro�a ml.
Sent: Tuesday, March 30, 1999 5:22 PM
To: Delphi KONFERENCE
Subject: Delphi a assembler


Ahoj, mel bych jeden dotaz.
V assembleru jsem delal naposledy jeste v Turbo Pascalu. Ted ale potrebuji
naprogramovat kratky kousek kodu na nejakou kodovaci rutinu a chci, aby to
bylo rychle, takze bych to rad napsal v ASM.

Hned pri prvnim kroku, tedy zavadeni do pointeru, jsem narazil na problem,
ze v 32bit nelze pouzit instrukci

lds si, ADDRESSPTR .

V jakemsi zdrojaku jsem zahledl jine reseni, ale presto: potreboval bych,
jestli by se nekdo obtezoval s vypsanim jak v bloku ASM:

1) zavest pointer a do kterych registru (lze pouzit ESI pro offset misto SI
?)
2) jak DELPHI predava parametry procedury (na jake adrese)
3) lze pouzivat instrukce LODSB, STOSB, STOSW atd.. nebo se musi
inkrementovat/dekrem. citac a nacitat primo z nejake adresy

Proste bych rad, aby nekdo popsal nejpalcivejsi rozdily mezi 16 a 32 bit
ASM.

Dekuji
PK

Balicky, komponenty ...

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.3.1999 18:21:45

eL wrote:

> Jiz jsem to zde jednou zkousel ale nikdo se neozval. Mam prosbu poradte mi
> jak nejlepe zachazet s pridavanymi balicky a novymi komponentami a unity
> (napriklad co stahnu z webu). To znamena do jakych adresaru to davat. Do
> jakeho package to prikompilovat. Proste jak nejlepe si to zorganizovat aby
> s tim nebyly problemy. Podelte se se mnou o sve zkusenosti a pripadne mi
> poradte literaturu.

Komponenty pro D3 a vyse by uz mely tahnout s sebou balicky.
Povazuji za vhodne mit balicek v adresari se zdrojaky. Na
osamocene komponenty je dobre si zalozit zvlast balicek, a tam je
strkat.

Situace muze byt jina, kdyz chces balicky distribuovat - tam se
nekdy muze vyplatit sestavovat balicky podle toho, jake
komponenty pouzivas v programu - chce to ale dost peclivosti.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Rozdilovy select

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 30.3.1999 18:28:03

Skus nieco take:

select ID, NAZEV
from ZARIZENI
where ID not in ( select ID from OS_ZAR where ID_O = 1277 )

TUNGLI Jan
tungli(zv)pvt.sk
-----P�vodn� zpr�va-----
Od: Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. marec 1999 17:27
P�edm�t: Rozdilovy select


>
>Preji vsem pekneho dne,
>
>nejak jsem se zamotal do selectu a proto prosim o radu.
>
>Mam tabulku ZARIZENI, kde je primarni klic ID a pak Nazev a Aktivita.
>Druha tabulka se jmenuje OS_ZAR a v prvnim sloupci je ID toho zarizeni
>(zde se jmenuje ID_Z) a ve druhem je ID_O, coz je identifikator nejake
>osoby.
>
>V te tabulce OS_ZAR kazdy radek znamena, ze osoba ID_O muze k zarizeni
>ID_Z a ja potrebuji zjistit nasledujici dotaz:
>
>Vybrat vsechna zarizeni (ID a NAZEV), ke kterym osoba s konkretnim ID_O,
>ktere znam,
>nemuze.
>
>Zkousel jsem nasledujici dotaz:
>
> select ID, NAZEV
> from ZARIZENI
> where not exists
> (
> select *
> from OS_ZAR
> where ID_O = 1277
> )
>
>ale to neni spravne.
>
>Diky vsem za radu.
>
>Slavek
>
>---------------------------------------------------------------------------
-
>http://atrey.karlin.mff.cuni(tec)cz/~rk
>---------------------------------------------------------------------------
-
>
>
>

Skleroza

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 30.3.1999 18:37:23

No nazdar,
ja u nekolika aplikaci pouzil zaheslovane paradox tabulky pro ulozeni
seznamu uzivatelu vc. jejich hesel a pristupovych prav :-( Nepouzil
jsem zadne hashovani, nic (z lenosti) a spolehnul se na ochranu
od Borlandu.
Melo me to trknout... Priste budeme chytrejsi, starousi...

// je tam totiz i programek na zjisteni hesla pdox-tabulek, pisou tam
// ze to umi jen verze 3.5 a 4.0, ale v pohode mi to (po nekolika
// sekundach!) vyplivlo ekvivalent hesla i pro verzi 7.0

Dobra.

>hledej na adrese http://www.hedgie.com/passwords/index.html

>> Nevite existuje-li nekde program na zjisteni hesla u ZIP
souboru?

Scanner

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 30.3.1999 18:41:58

> From: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
> Zdravim osazenstvo konference, dobry den,
>
> pred casem se zde diskutoval problem "VMM32.VXD is missing"
> Hledal jsem v archivech konference, ale delphi(tec)cz je pro me v tuto
> chvili nedostupne, takze mohl by mi nekdo preposlat vysledek
> debaty - vim ze problem byl v ovladacich pro scanner Umax Astra a chci
> se zeptat jestli je v tom jeste nejaky jiny figl krome stazeni
> nove verze a reinstalace windows.

Reinstalace windows nepomuze, zato staci skutecne
jen prehrat novejsi (17.04.98) soubor Umaxis11.386
a zazrak je hotov! (Diky za radu a pomoc)
Od te doby se ta prokleta hlaska po startu uz
neobjevila.
Vyzkouseno se scannerem UMAX Astra 610S.

>
> Ondrej Krajicek
>
>
-----------------------------------------------
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
Internet proti monopolu http://www.bojkot(tec)cz


Systemovy cas

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 30.3.1999 18:41:59

> From: "Radek KALA" <DELPHI(zv)betacontrol(tec)cz>
> V PC Existuje cas, ktery bezi v Real Time obvodu na MB a pri
> zapnuti se zkopiruje do pameti a bezi tam. On se ale rozchazi a
> nekdy dost. Potreboval bych jednou za nejaky rozumny cas
> provest synchonizaci a ne restartem pocitace. Vi nekdo jak na to.
Staci precist pres porty hodnoty RT, popis
se da najit tusim v SYSMANovi nebo TechHelpu.
Momentalne sedim u jineho PC, takze je tady nemam :-(,
ale pripadne bych to mohl zjistit. Jeste si vzpominam,
ze jsem kdysi neco podobneho take resil (v Packalu),
mrknu se vecer do archivu tamtez.

>
> Diky
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Mostecka 15, 614 00
> tlf. : + 420 5 4555 1269
> fax : + 420 5 4521 1501
> GSM : + 420 603 85 75 15
>
>
-----------------------------------------------
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
Internet proti monopolu http://www.bojkot(tec)cz


Delphi a assembler

[*] Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz> - 30.3.1999 20:12:14

"Petr Kro�a ml." wrote:

> Ahoj, mel bych jeden dotaz.
> V assembleru jsem delal naposledy jeste v Turbo Pascalu. Ted ale potrebuji
> naprogramovat kratky kousek kodu na nejakou kodovaci rutinu a chci, aby to
> bylo rychle, takze bych to rad napsal v ASM.
>
> 2) jak DELPHI predava parametry procedury (na jake adrese)
>

Zalezi na pouzite volaci konvenci (stdcall, register...), pak se parametry
predavaji bud pres registry (EAX,ECX,EDX) nebo pres zasobnik. Na parametry v
zasobniku se lze pak odvolat napr. MOV EAX, Parametr1 apod.

> 3) lze pouzivat instrukce LODSB, STOSB, STOSW atd.. nebo se musi
> inkrementovat/dekrem. citac a nacitat primo z nejake adresy
>

Ano, lze napr.
MOV ECX, PocetBytu
MOV ESI, Odkud // var Odkud: Pointer
MOV EDI, Kam // var Kam: Pointer
MOVSB


>
> Proste bych rad, aby nekdo popsal nejpalcivejsi rozdily mezi 16 a 32 bit
> ASM.
>

Implicitni nepouzivani segmentovych registru (vzhledem k 32bit. linearni
adresaci) a standartni vyuzivani 32bit. registru (E?X) atd.

Doporucuji se kouknout do helpu Object Pascal Reference na polozku assembler...

--
<TT>
/* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
/* xcibulka(zv)hwlab.felk.cvut(tec)cz */
/* KCibulka(zv)seznam(tec)cz */
/* ardour(zv)usa.net */
/* OnLine: If you have ICQ my ICQ# is 4111110. */
/* If you don't have ICQ you can page me through: My Personal */
/* Communication Center: http://wwp.mirabilis.com/4111110 */
/* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
/* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
/* Msgs with word "SMS:" in subject will be sent to my GSM phone */
</TT>

SQL: Vyber 5 nejvetsich radku

[*] Cibulka Karel <K.Cibulka(zv)sh.cvut(tec)cz> - 30.3.1999 20:25:18

Ahoj (tohle nesouvisi primo z Delphi ale snad to nevadi),

dneska jsem psal pisemku z SQL a meli jsme tam takovy jednoduchy
prikladek:
Z nejake tabulky vybrat 5 radku, ktere obsahuje 5 nejvetsich hodnot.
Tj, mam tabulku zamestnancu a ta obsahuje sloupec s jejich platy, cilem
bylo vybrat 5 zamestnancu s nejvetsim platem serazene sestupne podle
hodnoty platu.
A to vsechno pomoci 1 SQL dotazu.

Nejdrive jsme si vsichni mylsleli, ze to je jednoduchy, ale nakonec to
nevedel ani ucitel, co si ten priklad vymyslel.

Celou dobu mi to vrta hlavou, ale na nic jsem neprisel, treba to napadne
nejakou chytrou hlavicku na tehle konferenci??

--
<TT>
/* Cibulka Karel, K.Cibulka(zv)sh.cvut(tec)cz */
/* xcibulka(zv)hwlab.felk.cvut(tec)cz */
/* KCibulka(zv)seznam(tec)cz */
/* ardour(zv)usa.net */
/* OnLine: If you have ICQ my ICQ# is 4111110. */
/* If you don't have ICQ you can page me through: My Personal */
/* Communication Center: http://wwp.mirabilis.com/4111110 */
/* Or when I'm OnLine try: http://char.sh.cvut(tec)cz/ */
/* Or you can send me e-mail to 4111110(zv)pager.mirabilis.com */
/* Msgs with word "SMS:" in subject will be sent to my GSM phone */
</TT>

TreeView - pom���c

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 30.3.1999 20:34:34

Ja ted prave se stromem delam, ale nevim co potrebujes poradit.
Konkretne napis, co by si s nim chtel delat a uvidim jestli je v mojich
silach ti pomoct.

P.S. mimochodem, zkuste ve stromu zacit BEGINDRAG, chvili jezdete s
uchycenou polozkou a ...... "Zhuci wokna" hehe :))))))))))
A to mam vsecky 3 servisepacky pro D4
Nevi nekdo, vo co go?


-----Original Message-----
From: Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Date: 30. b�ezna 1999 15:49
Subject: TreeView - pom���c


>
>Hi,
>
>tr�p�m se, tr�p�m. Nem�te pros�m n�kdo zku�enosti s TreeView ?
>
>Va�ek
>
>
>
>
>
>V�clav Lukes
>
>E-mail: Vaclav.Lukes(zv)pvt(tec)cz
>Tel.: 0603-511247
>

delsi integer

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.3.1999 20:53:11

Jan Pomikalek wrote:

> muze mi prosim nekdo poradit, zda se da v Pascalu nebo v Delphi
> nadeklarovat delsi nez 32bitova celociselna promenna (tedy neco
> delsiho nez je longint)?

Delphi 4, int64.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Indexy v SQL, BDE funkce

[*] Peter Rus <peterrus(zv)intesys(tec)cz> - 30.3.1999 21:01:57

Ahoj Delphici,

poradil by mi nekdo v nasledujicim:

1) Jak pouzivat sekundarni indexy v SQL vyrazu, je to vubec mozne?
2) Muze mi nekdo poslat priklad pouziti CallBack funkce BDE (a
souvisejicich)?

Dekuji mnohokrat, preji prijemne jaro a hodne vajec,

Peter


Scanner

[*] Jaro <jaro(zv)sinea(tec)cz> - 30.3.1999 21:17:56

Windws reinstalovat nemusis. Ani by to nepomohlo, jak pise Ondrej.
Je potreba pouzit novejsi verzi ovladace, kterou stahnes z Internetu
nebo
ti ji nekdo posle. Funguje to i pro Umax 1200S
Jaro
> From: Ondrej Krajicek <krajicek(zv)promedia(tec)cz>
> Zdravim osazenstvo konference, dobry den,
>
> pred casem se zde diskutoval problem "VMM32.VXD is missing"
> Hledal jsem v archivech konference, ale delphi(tec)cz je pro me v tuto
> chvili nedostupne, takze mohl by mi nekdo preposlat vysledek
> debaty - vim ze problem byl v ovladacich pro scanner Umax Astra a
chci
> se zeptat jestli je v tom jeste nejaky jiny figl krome stazeni
> nove verze a reinstalace windows.

Reinstalace windows nepomuze, zato staci skutecne
jen prehrat novejsi (17.04.98) soubor Umaxis11.386
a zazrak je hotov! (Diky za radu a pomoc)
Od te doby se ta prokleta hlaska po startu uz
neobjevila.
Vyzkouseno se scannerem UMAX Astra 610S.

>
> Ondrej Krajicek
>
>
-----------------------------------------------
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
Internet proti monopolu http://www.bojkot(tec)cz

Kalend�r ...

[*] dds <dds(zv)uh(tec)cz> - 30.3.1999 21:49:18

| Ahoj ...
| Najde sa nejaky "dobrodruh" ktory vlastni zoznam mien a sviatkov v
| kalendari (Slovensky, Cesky) ...

Mam pocit, ze je v Lotus Organizer 2.1
M. Kucera


JPG to BLOB

[*] Tomas Bradle <tomas(zv)cobra(tec)cz> - 30.3.1999 22:21:35

Zdravim,

a coz takhle zkusit misto TDBImage -> TDBJpegImage, ktera by pracovala s
JPEGy
popripade s obojim (treba i s GIFy) podle obsahu hlavicky binarnich dat
(bitmapa zacina BM, GIF zacina GIF, JPEG ma na offsetu 6 JFIF).
V pripade TJpegGraphicField: neslo by predefinovat constantu:

DefaultFieldClasses: array[TFieldType] of TFieldClass;

v unite DB ? popripade predefinovat metodu:

function GetFieldClass(FieldType: TFieldType): TFieldClass;

Ja to zatim nezkousel, jsou to jen napady. (Delphi 4)

Tomas
tomas(zv)cobra(tec)cz


-----P�vodn� zpr�va-----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. b�ezna 1999 0:15
P�edm�t: Re: JPG to BLOB


>Jaro wrote:
>>
>> 1. Jak se ti to "nejak" podarilo.
>> 2. Do jake databaze to ukladas, jakeho typu je pole a jak to do neho
>> nacitas ... LoadFromFile ???
>
>Ahoj,
>
>Jeste k tomuto problemu. Uvazoval jsem o reseni pomoci napsani noveho
>pole, napriklad TJpegGraphicField odvozeneho od TGraphicField, ktere
>by se navenek pro Assign a AssignTo tvarilo jako bitmapa, ale data by
>ukladalo v JPEGu. Ma to vsak hned problem, a to jak zaridit aby bylo
>v dobe navrhu pouzito misto TGraphicField. Je sice mozne puvodni pole
>ve Fields editoru odstranit a vytvorit nove s timto typem, ale to se
>mi prilis nelibi. Dalsi moznost je pridat editor komponenty ktery pak
>provede zmenu vybraneho pole a pripadnou konverzi dat v tabulce. Mozna
>ze uz ale neco takoveho existuje hotove, pokud jeste to nekdo videl,
>tak dejte prosim vedet.
>
>--
>
>Internet proti monopolu. Petr Vones, amatersky programator
>* http://www.bojkot(tec)cz *
>************************
>

Zdrojaky pre NMPOP3 & NMSMTP

[*] Mat�� Kiczko����H��I��g���!��l��� - 30.3.1999 22:22:31

Zdravim,
neviete niekto, kde su pristupne zdrojove subory k nativnym komponentam
NMSMTP a NMPOP3, ktore su standartne dodavane s D4?
Mali to urobit chlapci z NetMasters L.L.C., ale URL www.netmastersllc.com je
nedostupne a nic ine s podobnym zameranim som nenasiel.
Pripadne, ktoru inu (konkretnu) SMTP, POP3 komponentu odporucate. ( nieco so
zdrojovym kodom, nie v OCX)
Dakujem.
S pozdravom Matus.

Balicky, komponenty ...

[*] eL <eL_z_Prahy(zv)seznam(tec)cz> - 30.3.1999 22:43:09

>Komponenty pro D3 a vyse by uz mely tahnout s sebou balicky.
>Povazuji za vhodne mit balicek v adresari se zdrojaky. Na
>osamocene komponenty je dobre si zalozit zvlast balicek, a tam je
>strkat.

>Situace muze byt jina, kdyz chces balicky distribuovat - tam se
>nekdy muze vyplatit sestavovat balicky podle toho, jake
>komponenty pouzivas v programu - chce to ale dost peclivosti.
>


Diky za odpoved.
Jeste se zeptam k cemu slouzi v delphi adresar Imports a zda je tedy uplne
jedno v kterem adresari na disku budou balicky se zdrojaky.
Pouzivam Delphi 4.

Diky

eL..

Balicky, komponenty ...

[*] dds <dds(zv)uh(tec)cz> - 30.3.1999 23:31:36

| To akoze je tam normalne kalendar.pas ???
| Ak ano prosim Ta posli mi to .... ;-))))))))

Neni, ale aspon jsem pobavil ;)

M. Kucera

DbGrid a Drag and Drop

[*] Miki Vom��ka����h������� - 31.3.1999 00:28:41

Ahoj vsem,

pouzivam RxDbGrid a v OnMouseDown spoustim Drag and Drop. Poradi mi nekdo,
jak udalost osetrit, aby se BeginDrag spoustel jen pokud se kliklo levym
mysitkem, a prave aby dal zobrazovalo Popup menu?

Diky
Miki Vomacka
vmiki(zv)atlas(tec)cz

Zdrojaky pre NMPOP3 & NMSMTP

[*] eL <eL_z_Prahy(zv)seznam(tec)cz> - 31.3.1999 00:38:21

Pouzivam free komponenty Fpiette, zcela bezproblemu mam na 2 aplikacich (cca
po trech az ctyrech instalacich na ruznych PC a OS (W95, W98)) odzkousenno
HTTP a SMTP.

http://sunsite.icm.edu.pl/delphi/ftp/d10free/ics.zip
(633,464 bytes) Internet Component Suite (ICS) is a set of native VCL
components for Internet/Intranet programming. It supports winsock, TCP, UDP,
FTP, TELNET, FINGER, HTTP, SMTP, POP3, PING, NNTP, ANSI terminal emulation
and more. Free support mailing list. (ver. 2.50, added 5/1/98, Freeware
product with full source code and free support using a mailing list. Updated
frequently, consult website.)


eL..


-----P�vodn� zpr�va-----
Od: Mat�� Kiczko <4kiczko(zv)gmet.schools.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. b�ezna 1999 22:52
P�edm�t: Zdrojaky pre NMPOP3 & NMSMTP


>Zdravim,
>neviete niekto, kde su pristupne zdrojove subory k nativnym komponentam
>NMSMTP a NMPOP3, ktore su standartne dodavane s D4?
>Mali to urobit chlapci z NetMasters L.L.C., ale URL www.netmastersllc.com
je
>nedostupne a nic ine s podobnym zameranim som nenasiel.
>Pripadne, ktoru inu (konkretnu) SMTP, POP3 komponentu odporucate. ( nieco
so
>zdrojovym kodom, nie v OCX)
>Dakujem.
>S pozdravom Matus.
>
>

Invalid Blob length

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.3.1999 00:42:37

Puvodni zprava, kterou napsal Roman Toda dne 31 Dec 98,:

> Hmmmm do paradoxu sa mi podari dat aj 5MB vely subor.

Paradox jsem nezkousel, ale to omezeni na 1MB plati pro
BDE spolu s ODBC (jak na to byl prave dotaz)...


S pozdravem
Petr Zahradnik, pocitacovy expert

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


SQL a z�vorky

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.3.1999 00:45:48

Puvodni zprava, kterou napsal Josef Slan� dne 30 Mar 99,:

> Lze v prikazu Select v podmince Where pouzit nejake zavorky a pripadne jak
> ?

Ano, uplne normalne...


S pozdravem
Petr Zahradnik, pocitacovy expert

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



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