Archív konference Delphi

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

SOAP a Delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.8.2003 15:23:28

From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
> Nevim to presne, ale podpora pro psani klientu je snad i v Professional.

Podle tabulky vlastnosti by to jit melo:
http://www.borland.com/delphi/pdf/del6_feamatrix.pdf

Petr Vones

WakeOnLAN

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 19.8.2003 14:57:25

> bude fungovat WOL na 2PC spojenych cross UTP?

Bude, teda pokud cilovy pocitac vubec wakeOnlan umi.

WOL jde jinak delat prakticky pres cokoliv, co je schopno prenaset
nejake sitove packety. Takze jde pustit WakeOnlan treba pres nejakou
WAN linku, pokud je sikovne udelany. ;-)

--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

TToolBar & TClientDataSet

[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 19.8.2003 14:53:25

Ahoj,

nevite prosim nekdo, co s tim ?

Na formu mam ToolBar a ToolButton NOVY, dale potom DBGrid a DBEdit. Vse je provazano pres ClientDataSet.
Kdyz do OnClick na ToolButton dam ClientDataSet.Append, neudela to, co ma.

Kdyz ale pridam na form klasicky Button a do jeho OnClick dam onen Append, funguje to.

V.

Data & DBEdit

[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 19.8.2003 14:45:21

Tak uz vim, kde je asi prioblem, ale nevim, jak z neho ven.
Pokud pouziju pred Appendem TButton, je to OK. Kdyz ale pouziju TToolButton, je to spatne.
netusite nekdo, co s tim ?
V.


-----Original Message-----
From: Rumcajs-konfera [mailto:konfera(zv)rumcajs.com]
Sent: Tuesday, August 19, 2003 1:07 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Odpoved na: Data & DBEdit




Nemas nastaveny nejaky event na tom DBEditu? Ja takoveto napojeni pouzivam
bezne a zadny proble s tym nemam



Lukas "Rumcajs" Weiss, email(zv)rumcajs.com

------------------------------------------------------

mam D6, Win2000, dtb Informix a prosim o radu.



Mam dva priklady, kde pracuji s datu (append, edit a pod.).



V prvnim prikladu nepouzivam DataModul a vse je na jednom formulari a vse
funguje.



V druhem pripade mam koneckt na dtb atd. v DataModulu a nefunguje mi to. Po
stisku tlacitka NEW se nastavim do Append modu, ale jakmile se postavim do
patricneho DBEditu, natahnou se mi tam data z tabulky.



Diky



V.





..

OT: WakeOnLAN

[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 19.8.2003 14:25:15

Ahoj,
bude fungovat WOL na 2PC spojenych cross UTP?

Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: www.cincura.net


Uprava Delphi komponenty

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

From: <jimys1(zv)centrum(tec)cz>
> chci se zeptat, jak lze upravit Delphi komponentu, konkretne DBGrid.
> Zdrojak najdu, ale jak pak prekompilovat cely balicek?

Nijak, balicky Borlandu nemuzes kompilovat.

Upravy v komponentach se delaji tak, ze si odvodis komponentu novou a ne ze se
rypes v puvodnim zdrojaku.

Petr Vones


Uprava Delphi komponenty

[*] jimys1(zv)centrum(tec)cz - 19.8.2003 14:13:14

Ahoj,

chci se zeptat, jak lze upravit Delphi komponentu, konkretne DBGrid.
Zdrojak najdu, ale jak pak prekompilovat cely balicek?

Diky.

Jirka


MSIE a nacteni HTML z konkretniho frame ...

[*] skalsky(zv)oksystem(tec)cz - 19.8.2003 13:57:12

Ahojky lidi,
Mam JSP aplikaci, ktera mi generuje HTML ... vygeneruje frameset s
dvema ramy. Z duvodu validace onoho HTML (pres webovy W3C validator) bych
potreboval nejakym zpusobem ziskat zdrojove HTML kazdeho ramu a ulozit si to
na disk.

Netusite, jak se dostat na ono zdrojove HTML daneho ramu, abych to
mohl do neceho nacist ?

Milan


prijeti mailu

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 19.8.2003 13:55:12

> Cekal jsem podobnou odpoved, jen jsem si nebyl jisty. Dekuji. Zvazim,
> jestli moji app neudelat jako pop3 klienta a pouzit nejaky hotovy smtp
> server.

To mi pripada jako mnohem rozumnejsi cesta. POP3 lienta mas hotoveho
jak v Synapsi, tak i treba v Indy ci ICS.

--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

Odpoved na: Data & DBEdit

[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 19.8.2003 13:27:10

Nic tam nemam.
Nechapu, proc mi to funguje, kdyz nepouzivam DataModul. Jakmile ale pouzilu DataModul, je to v kyblu.
V.
-----Original Message-----
From: Rumcajs-konfera [mailto:konfera(zv)rumcajs.com]
Sent: Tuesday, August 19, 2003 1:07 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Odpoved na: Data & DBEdit




Nemas nastaveny nejaky event na tom DBEditu? Ja takoveto napojeni pouzivam
bezne a zadny proble s tym nemam



Lukas "Rumcajs" Weiss, email(zv)rumcajs.com

------------------------------------------------------

mam D6, Win2000, dtb Informix a prosim o radu.



Mam dva priklady, kde pracuji s datu (append, edit a pod.).



V prvnim prikladu nepouzivam DataModul a vse je na jednom formulari a vse
funguje.



V druhem pripade mam koneckt na dtb atd. v DataModulu a nefunguje mi to. Po
stisku tlacitka NEW se nastavim do Append modu, ale jakmile se postavim do
patricneho DBEditu, natahnou se mi tam data z tabulky.



Diky



V.





..

Encryption

[*] Dobromil Maly <dmaly(zv)yo(tec)cz> - 19.8.2003 13:21:09

Ahoj vsem,

rad bych se zeptal, jakym zpusbem resite
problematiku AUTOMATICKEHO en/dekryptovani dat
pouzivanych Vasemi aplikacemi*.

Nejde mi ani tak o to, jaky algorytmus pouzit,
ale spis o to, jak do aplikace BEZPECNE ulozit heslo
(klic), kterym se budou data en/dekryptovat**.

Za poskytnute Know-How Vam predem dekuji...

D.M.

*) Rekneme napriklad citliva data v databazich
(nesidlicich na zabezpecenych serverech :-),
konfiguracnich souborech atp...

**) Navic bych veskere sifrovaci mechanismy chtel ulozit
do samostatne DLL abych ji snadno mohl pouzivat v jinych
aplikacich nebo poskytnout tretim stranam. Pokud ale
aplikace bude volat napriklad
Encrypt( [in] datain, [in] passwd, [out] dataout)
bude mozne odchytit pouzite heslo...

Odpoved na: Data & DBEdit

[*] Rumcajs-konfera <konfera(zv)rumcajs(tec)com> - 19.8.2003 13:07:07



Nemas nastaveny nejaky event na tom DBEditu? Ja takoveto napojeni pouzivam
bezne a zadny proble s tym nemam



Lukas "Rumcajs" Weiss, email(zv)rumcajs.com

------------------------------------------------------

mam D6, Win2000, dtb Informix a prosim o radu.



Mam dva priklady, kde pracuji s datu (append, edit a pod.).



V prvnim prikladu nepouzivam DataModul a vse je na jednom formulari a vse
funguje.



V druhem pripade mam koneckt na dtb atd. v DataModulu a nefunguje mi to. Po
stisku tlacitka NEW se nastavim do Append modu, ale jakmile se postavim do
patricneho DBEditu, natahnou se mi tam data z tabulky.



Diky



V.





.

Multi position a TMemorystream

[*] M Nedopil <m.n.hon(zv)volny(tec)cz> - 19.8.2003 12:51:05

zde deklarace:

TThreadMemoryStream = class(TMemoryStream)
private
FLock:TRTLCriticalSection;
public
constructor Create;
destructor Destroy;override;
function Lock:TMemoryStream;
procedure UnLock;
function Used:longint;
end;


zde implementace:
(* TThreadMemoryStream TThreadMemoryStream
TThreadMemoryStream *)

constructor TThreadMemoryStream.Create;
begin
inherited Create;
InitializeCriticalSection(FLock);
end;

destructor TThreadMemoryStream.Destroy;
begin
Lock;
try
inherited Destroy;
finally
UnLock;
DeleteCriticalSection(FLock);
end;
end;

function TThreadMemoryStream.Lock;
begin
EnterCriticalSection(FLock);
Result:=Self;
end;

procedure TThreadMemoryStream.UnLock;
begin
LeaveCriticalSection(FLock);
end;


function TThreadMemoryStream.Used:longint;
begin
Result:=Size - Position;
end;

zde priklad:

function TCustomConnection.Read(var Buffer;Count:longint):longint;
begin
Result:=0;
if not Open then Exit;
if not Assigned(InputBuffer) then Exit;
with InputBuffer do try
Lock;
Result:=Read(Buffer,Count);
if Used = 0 then SetSize(0);
finally
UnLock;
end;
end;

a to ti umozni v ruznych threadech cist stejny stream.

Martin

----- Original Message -----
From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, August 18, 2003 7:38 PM
Subject: Multi position a TMemorystream


> Zdravim konferenci,
>
> preji vsem krasnou okurkovou sezonu :)..
>
> chtel bych se zeptat jestli existuje nejake reseni pro MemoryStream abych
mohl k tomuto
> streamu pristupovat z ruznych vlaken aplikace ?. Neco jako multi position
... Ten jak vime slouzi pro
> praci s timto souborem a urceni aktualni pozice. Promena position je
vlastne jenom jedna a globalni..
>
> DIky milan
>
>
>

Data & DBEdit

[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 19.8.2003 12:45:04

Ahoj,

mam D6, Win2000, dtb Informix a prosim o radu.

Mam dva priklady, kde pracuji s datu (append, edit a pod.).

V prvnim prikladu nepouzivam DataModul a vse je na jednom formulari a vse funguje.

V druhem pripade mam koneckt na dtb atd. v DataModulu a nefunguje mi to. Po stisku tlacitka NEW se nastavim do Append modu, ale jakmile se postavim do patricneho DBEditu, natahnou se mi tam data z tabulky.

Diky

V.

InnoSetup a nabidka start - cestina

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 19.8.2003 12:32:59

Pres clipboard jsem to nekopcil. Mam system WNT a kdyz jsem nastavil v
default.isl z DialogFontName=Tahoma na DialogFontName=Ariel tak je vse OK.
Asi font Tahoma nemam cesky nabo cim to mohly byt....

Diky za pomoc
Vlasta



----- Original Message -----
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 19, 2003 10:48 AM
Subject: Re: InnoSetup a nabidka start - cestina


> Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
> > Diky, nove isl jde prelozit i s 0.7 :))
> > Ale cestina neni ouplne v poradku. Neumi napriklad ceske "hackovane"
>
> To se mi zda pritazene za vlasy. Cestina v Inno funguje naprosto
uspokojive.
> Nekopiroval jsi ty texty pres clipboard na Windows2000/XP a soucasne
> mel prepnutou klavesnici na 'EN'? To se pak prave tyto znaky samy
> "odhackuji".
>
> Martin Schayna
>
>
>

Upper(diakriticky znak) v IB/FB

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 19.8.2003 12:06:53

> Mam problem pri filtrovani zaznamov cez select, ktore
> obsahuju diakriticke znamienka v kombinacii s funkciou upper.

Ahoj,

je potreba funkci upper urcit COLLATE:

upper(priezvisko collate PXW_CSY) nebo jine co pouzivas. Vysledky ruznych
experimentu (predavani parametrem apod.) v teto souvislosti jsem kdysi shrnul a
mel bys to najit v archivu.

David Lebeda

DBGrid a posun doprava

[*] delphi(zv)mjsoft(tec)cz - 19.8.2003 12:32:58

Zkousim to jak pises, ale nedari se me obarvit cely radek. Barvi me to
prave jen tu jednu vybranou bunku.

>
>> -----Original Message-----
>> From: delphi-l-owner(zv)clexpert(tec)cz
>
>Ahoj,
>
>> To jsem zjistil, ale ja potrebuji mit dgRowSelect=True.
>> Nevite nekdo co s tim?
>
> Tak nech False a barvu radku si nastav sam na OnDrawCell nebo
>neco podobneho - ted presne z hlavy nevim jak se ten event jmenuje.
>
> S pozdravem a dikem =====================================
>> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
>=====================================
>> GSM: 602 652 203 | ICQ: 322015967 <
>=====================================

OT: Problemy s postou MS Exchange

[*] Jaromir Cermak <cermak(zv)procom(tec)cz> - 19.8.2003 12:32:58

Ahoj vsichni

Prosim o radu i na soukromy Mail. Nevite, v cem muze byt problem. Kdyz z nasi firmy odeslu postu pres exchange server na jistou schranku na seznamu, ktera existuje, vrati se mi jako nedoruceny. Jinak mi posta, jak vidite chodi. Na serveru je MSExchange 2000. Diky za kazdy typ.
Jaromir Cermak

DoubleClick&MouseUp

[*] jimys1(zv)centrum(tec)cz - 19.8.2003 12:20:55

Ahoj.

Chci se zeptat, zda se nekdo nesetkal s necim podobnym...

Mam na formulari komponentu, u ktere chci vyuzit udalost OnMouseUp.
Uvedu jednoduchi priklad. Formular a na nem panel. U Panelu nastavim
u udalosti OnMouseUp Beep. Spustim aplikaci.

Jestlize chci maximalizovat aplikaci double clickem na hlavni liste
okna, aplikace zabeepuje - vyvola se udalost OnMouseUp Panelu! Panel
se pri maximalizaci okna posune na misto, kde je kurzor a vyvola se
jeho udalost OnMouseUp.

A to se deje u vsech komponent... Neresil toto nekdo?

Delphi 5, Windows 2000

Diky. Jirka


Odchyceni udalosti zamceni stanice

[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 19.8.2003 11:30:24

Ahoj,
snazim se prijit na to, jak odchytit zamceni stanice ve WinNT
(staci, W2k).

Staci male nakopnuti ;-)

Diky.
Jiri Kratochvil
Sprava pocitacovych siti a vyroba
aplikaci na zakazku
---------------------------------
Tel. 724 115 559
WWW: http://kratochvil.sousnet.net,
http://www.sousnet.net
E-mail: jiri.kratochvil(zv)sousnet.net
----------------------------------

Webhosting za skvele ceny ** www.datastore(tec)cz


prijeti mailu

[*] likeapear(zv)centrum(tec)cz - 19.8.2003 11:48:51

Cekal jsem podobnou odpoved, jen jsem si nebyl jisty. Dekuji. Zvazim,
jestli moji app neudelat jako pop3 klienta a pouzit nejaky hotovy smtp
server.

||| likeapear

> pokud si chces napsat vlastni SMTP server tak, aby skutecne ajko
SMTP
> server fungoval, tak se priprav na to, a vlastni SMT komunikace je
na
> tom to nejmensi. mnohem vice starosti ti da nejake rozumne
frontovani
> doslych mailu, musis zajistovat jake maily posles dal, kam je
poslel,
> musis udelat zabezpeceni na to, aby tvuj server nemohl byt zneuti
> jako openrelay, atd.

Zmena fontu v hlavnim menu aplikace

[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 19.8.2003 11:36:40

> -----Original Message-----
> From: Marek Dostal [mailto:konf(zv)agnis(tec)cz]
>
> Obcas se ze strany zakaznika vyskytne pozadavek, aby nabidka
> v nasem programu byla vetsim pismem. Pouzivam komponenty
> TMainMenu a TPopupMenu. Je mozno nastavit ve vlastnostech
> obrazovky font pro nabidku, ale to se projevi v celych
> windows, ja to chci jen v me aplikaci. A kdyz pouziji
> OnDrawItem, neni to ono, protoze to sice vypisi vetsim
> fontem, ale zobrazena plocha pro text (sirka okna s nabidkou,
> vyska radku v nabidce) je jiz dana, nic s ni neudelam a text
> se mi tam nevejde. Lze to nejak resit?

Ahoj,

musis jeste pouzit event OnMeasureItem u MainMenu, ve kterem vratis jak velke menu potrebujes vytvorit.
Tady mas priklad na vlastni vykreslovani v menu:

http://www.marcocantu.com/code/md6htm/Odmenu.htm

A.

jak se pracuje s TFileStream

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 19.8.2003 11:34:25

Ahoj,
var
F : TFileStream;
begin
F := TFileStream.Create (FileName,fmCreate);
Stream.Seek (0,soFromBeginning); // pro jistotu
F.CopyFrom(Stream,Stream.Size);
F.Free;

Vaclav Sazima

mnk(zv)centrum(tec)cz wrote:
> Zdravim, mam funkci a ta mi vtaci TStream, chtel bych se zeptat jak
> data ulozim na disk do souboru. Vim,ze je to TFileStream, ale nevim,
> tak se stim pracuje.

Zmena fontu v hlavnim menu aplikace

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 19.8.2003 11:14:23

Obcas se ze strany zakaznika vyskytne pozadavek, aby nabidka v nasem programu byla vetsim pismem. Pouzivam komponenty TMainMenu a TPopupMenu. Je mozno nastavit ve vlastnostech obrazovky font pro nabidku, ale to se projevi v celych windows, ja to chci jen v me aplikaci. A kdyz pouziji OnDrawItem, neni to ono, protoze to sice vypisi vetsim fontem, ale zobrazena plocha pro text (sirka okna s nabidkou, vyska radku v nabidce) je jiz dana, nic s ni neudelam a text se mi tam nevejde. Lze to nejak resit?

Marek Dostal
D7 Proff

Upper(diakriticky znak) v IB/FB

[*] Peter Ondras <peter.ondras(zv)pse.sk> - 19.8.2003 11:38:45

Mam problem pri filtrovani zaznamov cez select, ktore
obsahuju diakriticke znamienka v kombinacii s funkciou upper.


Napr. select priezvisko from adr where upper(priezvisko)='BILAK'
mi nevrati nic aj ked sa v poli priezvisko v nejakom zazname bilak
nachadza.

A takyto select

select upper(priezvisko) from adr mi vrati toto

BIlAK

namiesto

BILAK


vyzera to tak, ze funkcia upper nedokaze menit znaky s diakritikou
z malych na velke. znaky bez diakritiky su ok.

v aplikacii aj na databaze mam nastavenu kodovu stranku win1250

Delphi 7. Interbase (Firebird)

Peter Ondras - www.ondras.sk
peter.ondras(zv)pse.sk
+421 904 421 925

Ikona klavesnice

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 19.8.2003 11:44:51

diky

nevite jeste nekdo jak zjistit ze klavesnice byla zmenena jinak nez pres
timer, myslel jsem ze by to melo byt WM_INPUTLANGCHANGE, ale to mi nejak
nefunguje


prijeti mailu

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 19.8.2003 11:04:21

> potrebuju aby se moje app chovala jako jednoduchy smtp server. V
> podstate staci zpracovat prijaty mail a nejak na nej zareagovat. Dival
> jsem se napr. do Synapse, ale nenasel. Jestli jsem to prehledl, tak se
> omlouvam.

Na to si potrebujes napsat SMTP server. Na prvni pohled jednoducha
vec. (staci ti TCP socket a cteni+ zapis stringu do nej... vlastne
presny opak SMTPSend.pas.)

pokud si chces napsat vlastni SMTP server tak, aby skutecne ajko SMTP
server fungoval, tak se priprav na to, a vlastni SMT komunikace je na
tom to nejmensi. mnohem vice starosti ti da nejake rozumne frontovani
doslych mailu, musis zajistovat jake maily posles dal, kam je poslel,
musis udelat zabezpeceni na to, aby tvuj server nemohl byt zneuti
jako openrelay, atd.


--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

convert DBF => txt

[*] matesg(zv)centrum.sk - 19.8.2003 10:52:15

Zdravim
mam mozno trosku hlupu otazocku a potreboval by som trosku
nakopnut, ak mi vie niekto poradit.
Mam zhruba 500MB dbf subor ktory by som potreboval
prekonvertovat do *.txt co najjednoduchsim sposobom.
Poradi mi prosim niekto? Dik
WinXP, D7

---------------------------------------------------------
http://mail.centrum.sk/ - Chces novy e-mail, zriad si ho!

OT: SQL Dotaz, ktery mne primo nuti odejit z parad

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 19.8.2003 10:34:12

Tak tento prikaz mi celkem uspesne shazuje BDE a to uz jak v Delphi,
dbOrganizeru, nebo v Database Desktopu. Horsi je, ze nesleti jenom BDE,
ale i onen volajici program :((

SELECT Organ.*, ClenOrg.*, PlatOrg.*,
Jmeno + ' <' +Kraj+ ' '+ Okres+' '+Kod+ '>' AS JmenoP
FROM Organ
LEFT JOIN ClenOrg ON (ClenOrg.KodPop=Organ.KodPop)
LEFT JOIN PlatOrg ON (PlatOrg.kraj+PlatOrg.Okres+PlatOrg.Kod=Organ.KodPop)
WHERE (ClenOrg.Clen_Od<'1.1.2003' OR ClenOrg.Clen_Od IS NULL)
AND (ClenOrg.Clen_Do>'1.1.2003' OR ClenOrg.Clen_Do IS NULL)
AND KodPop LIKE '3409001' ORDER BY JmenoP

No zkusim ho jeste prepracovat a uvidime jestli se mi povede ho nejak
upravit do nepadave podoby.

SQLDMO aWin95

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 19.8.2003 10:54:15

Hi,
Lze SQL DMO (z instalace SQL2000) pouzit i na W95? Jestli ano (jak pisi na
microsoft.com), tak kde muze byt zadrhel pri registraci sqldmo.dll?
Postupuji presne podle msdn ale nedari se

Diky
Sroub


Ovladani LED Svetelnych panelu

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 19.8.2003 11:28:24

Zdravim,
mam jeden problemek.

Potrebuju udelat ovladani Svetelnych panelu.
A absolutne se mi nepodarilo nic na netu najit alespon o tom
kdo to vyrabi nebo jak se s tim komunikuje. Jsou to takove
ty velke panely v konfiguraci 30 znaku X 15 radek
TYP FDS 123/132. Ma to vodorovne 2 a svisle 5 jednotek.
Jo a jsou odporne drahe cca 150 kKc za kus.

Ty panely se delaji i v jinych konfiguracich a maji jedno
spolecne z je k nim dodavan standardne ovladaci
SW WinSPEC. Ten umoznuje zadat texty a nejake dalsi
nastaveni do panelu. SW je v cestine ale abloutne nevim kdo
to delal (pry nekdo v nemecku). Vypada to jako npsane v
Delphi 2.

Problem je ze to sice ma docela jednoduche soubory s daty.
Ktere v Delphi umim vygenerovat ale pak by u toho nekdo
musel sedet a spustit znova WinSPEC a zmackout tlacitko
sinchronizace. Ja to ale chci provozovat tak ze libovolne po
baraku nekdo s mem SW zmeni hodnoty v DB a ja to poslu
i na panel. Tady na PC kde by byla nejaka moje sluzba, ktera
by to udelala. Jenze ten je pripojen na seriovou linku u nejblizsiho
PC kde je WinSPEC ktery to tam umi poslat, A ja nevim jak to
komunikuje s tim panelem.

Delal uz nekdo ovladani techto panelu, a vi jak na to.

Vaclav Halik

convert DBF => txt

[*] Jiri Virt <virt(zv)volny(tec)cz> - 19.8.2003 10:54:15

Pres Excel.

Jirka

Master detail s CliendDataSet

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 19.8.2003 10:34:12

Tak problem jsem vyresil. Aby Master detail v ClientDataSetu fungoval za
behu programu je nutno nastavit PacketRecords na -1 (defoultne je na 0).
V dobe navrhu je pak nutne v komponente Query, ze ktere ClientDataSet
prea Providera bere data, pridat prave to pole pres ktere chcete Master
Detail provadet.

Jinak pkeny weekend preji.
Lukas Benda

Benda Lukas wrote:

>Dobry den,
>
>mam probmle (jinak bych nezadal o radu), kdyz nastavim v ClientDataSet
>master-detail (nastavim MasterDataSource i spojeni) tak pri otevreni
>toho ClientDataSetu mi program havaruje s errorem "Culd not find object"
>nevim co to znamena a proc tato chyba nastava.
>
>Lukas "benzin" Benda
>P.S.: Ani v jedne tabulce nemam nastavene indexy. Master je typu TQuery
>a detail je ClientDataSet.
>

InnoSetup a nabidka start - cestina

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 19.8.2003 10:48:14

Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
> Diky, nove isl jde prelozit i s 0.7 :))
> Ale cestina neni ouplne v poradku. Neumi napriklad ceske "hackovane"

To se mi zda pritazene za vlasy. Cestina v Inno funguje naprosto uspokojive.
Nekopiroval jsi ty texty pres clipboard na Windows2000/XP a soucasne
mel prepnutou klavesnici na 'EN'? To se pak prave tyto znaky samy
"odhackuji".

Martin Schayna


jak se pracuje s TFileStream

[*] mnk(zv)centrum(tec)cz - 19.8.2003 10:22:06

Zdravim, mam funkci a ta mi vtaci TStream, chtel bych se zeptat jak
data ulozim na disk do souboru. Vim,ze je to TFileStream, ale nevim,
tak se stim pracuje.
Dekuji. S pozdravem Martin Novak

prijeti mailu

[*] likeapear(zv)centrum(tec)cz - 19.8.2003 10:22:06

Ahoj,
potrebuju aby se moje app chovala jako jednoduchy smtp server. V
podstate staci zpracovat prijaty mail a nejak na nej zareagovat. Dival
jsem se napr. do Synapse, ale nenasel. Jestli jsem to prehledl, tak se
omlouvam.

Dekuji

||| likeapear

Prodej SW, uctovani a dane

[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 19.8.2003 10:42:13

Smlouva o dilo, nebo o provedeni prace.
Proste na jednorazovou akci neni treba ZL, pokud je to pro firmu,
pokud by to bylo pro fyzickou osobu, tak je tam nejaka hrani, byvalo
6000 tisic rocne (to se pak vubec nedanilo).
Pripadne se to da resit jako vedlejsi pracovni pomer, pokud by to treba trvalo
dele.

Slavek


> Jak ja tento sw ucetne udam. Na ZU mi rekli ze na to ze udelam pro nekoho
> sw nepotrebuju ZL. Coz mi pripada jako blbost, pokud bych se tim chtel zivit
> tak musim mit urce zivnostnak alespon na servis. Ale pokud ja to jen nekomu
> udelam a on to bude dal rozprodavat tak to snad blbost neni.

OT: Prodej SW, uctovani a dane

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 19.8.2003 10:12:05

Zdravim,
mam na vas jeden dotaz a sice:

Situace mam ZL na grafiku. Tuto cinost provozuju jako vedlejsi vydelecnou
cinost pri zamestnani. Do teto cinosti spada to co prevazne delam tedy
grafika, tvorba WWW, atd.

Ted ale nastava situace kdy ja udelam sw a ten chci prodat dalsi firme ktera
jej uz bude pod svou znackou a podporou prodavat svym zakaznikum.

Jak ja tento sw ucetne udam. Na ZU mi rekli ze na to ze udelam pro nekoho
sw nepotrebuju ZL. Coz mi pripada jako blbost, pokud bych se tim chtel zivit
tak musim mit urce zivnostnak alespon na servis. Ale pokud ja to jen nekomu
udelam a on to bude dal rozprodavat tak to snad blbost neni.

V podstate on mi zaplati za praci co jsem pro nej vykonal. Je to tak ? A jak
se
to osetruje. Muzu ja i on tvrdit ze sem mu na zadanem SW provedl graficke
prace a tim si do dat do ucetnictvi na jiz existujici ZL nebo musim to pak
vykazat na danovem priznani jako dalsi prijem z autorske cinosti a co z toho
pro mne vypliva.

Je tu spousta lidi co s tim ma urcite skosenost tak by mne zajimalo jak to
je
a jak na to aby nebyl pruser.

S pozdravem Vaclav Halik

komunikace se sluzbou

[*] martin.ben(zv)ge(tec)com - 19.8.2003 10:12:05

Sluzbu muzes ovladat pomoci OpenSCManageru.
Pokud si se sluzbou potrebujes predavat data, tak muzes pouzit treba TCP/IP
nebo pipe.

Martin Ben

Priklad na zjisteni stavu sluzby:

uses WinSvc;

type
TServiceState = (ssStopped, ssStartPending, ssStopPending, ssRunning,
ssContinuePending, ssPausePending, ssPaused);

const
WinServiceState: array[TServiceState] of LongWord =
(SERVICE_STOPPED, SERVICE_START_PENDING,
SERVICE_STOP_PENDING,
SERVICE_RUNNING, SERVICE_CONTINUE_PENDING,
SERVICE_PAUSE_PENDING, SERVICE_PAUSED);

function ServiceState (const AName: String): TServiceState;
var
SvcStat: TServiceStatus;
I: TServiceState;
begin
Result := ssStopped;
SvcStat := GetServiceStatus(AName);
for I := Low(TServiceState) to High(TServiceState) do
if WinServiceState[I] = SvcStat.dwCurrentState then
begin
Result := I;
Break;
end;
end;

function GetServiceStatus (const AName: String): TServiceStatus;
var
SvcMgr: THandle;
Svc: THandle;
begin
SvcMgr := OpenSCManager(nil, nil, SC_MANAGER_CONNECT);
Win32Check(SvcMgr <> 0);
try
Svc := OpenService(SvcMgr, PChar(AName), SERVICE_QUERY_STATUS);
if Svc <> 0 then
try
Win32Check(QueryServiceStatus(Svc, Result));
finally
CloseServiceHandle(Svc);
end
else
RaiseLastWin32Error;
finally
CloseServiceHandle(SvcMgr);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
case ServiceState('MyService') of
ssStopped: ShowMessage('ssStopped');
ssStartPending: ShowMessage('ssStartPending');
ssStopPending: ShowMessage('ssStopPending');
ssRunning: ShowMessage('ssRunning');
ssContinuePending: ShowMessage('ssContinuePending');
ssPausePending: ShowMessage('ssPausePending');
ssPaused: ShowMessage('ssPaused');
end;
end;

-----Original Message-----
From: likeapear(zv)centrum(tec)cz [mailto:likeapear(zv)centrum(tec)cz]

Ahoj,
mam napsanou sluzbu a potreboval bych z ni ziskavat nejake informace
(napr. v jakem je stavu ci dalsi uziv. udaje) a predavat nejake
hodnoty. Jak se toto dela? Pres posilani zprav nebo COM to asi
nepujde, nebo ano? Poradite mi nekdo?

literatura o aplikacich typu klient/server

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 19.8.2003 10:34:12

T_SQL myslim, znaci Transac SQL coz je specialni rozsireni, ktere
implementuje Microsoft SQL Server. Kniha to neni spatna, ale pro jine
databaze nez je Microsoft SQL Server pouzijete sotva desetinu cele knihy.

Vhodna bude kniha Myslime v Jazyku Delphi 6. Popis jazyka SQL sice neni
vycerpavajici, ale jsou zde obsazeny informace o komponetach Delphi a
jak se s nimi pracuje. Jinak bych to kombinoval s nejakym SQL
standartem. Ostatni knihy, ktere jsem si o SQL precetl a byli jako
prirucky programatora, byli nedostatecne a prilis nepresahovali ramec
vyse zminovane knihy. SQL neni natolik rozsahle a slozite, aby bylo
nutno cist tuny "omacky" a staci jen kompletni standart videl jsme knihu
od nakladatelstvi Grada. Je takova mala (mensi nez A5) v modre vazbe.
Myslim, ze je to nejlepsi SQL dokumentace, ktera se na ceskem trhu
vyskytuje.

Jinak tez je mozo pouzit skripta nektere z ceskych univerzit, ktere jsou
na Internetu volne ke stazeni. Konkretne na webu http://www.fimuni.org.
Budou to skripta k Zakladum Databazim atp.

Borkovec Software Info wrote:

>Urcite Rebecca Riordan - priblizny nazev Vytvarime databazove aplikace
>a castecne Henderson Mistrovstvi v T_SQL
>RB
>
>
>Mohl by mi nekdo doporucit nejakou literaturu o programovani databazovych
>aplikaci klient/server v delphi ? Muze byt i v anglictine.
>Pripadne odkaz na internetove stranky kde by se daly o teto problematice
>nalezt jakekoli informace.
>
>predem dekuji za odpoved
>Lenka Donatova
>
>

IDropTarget & Custom Cursor

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 19.8.2003 09:42:02

> Pouzivam OLE dragging a chci pri DragOver uplne zmenit ksicht kurzoru.
> DragOver ma jen parametr dwEffect - coz jsou jakesi
> modifikace (+,link,...)
> zakladniho kurzoru:
>
> DROPEFFECT_NONE = 0,
> DROPEFFECT_COPY = 1,
> DROPEFFECT_MOVE = 2,
> DROPEFFECT_LINK = 4,
> DROPEFFECT_SCROLL = 0x80000000
>
>
> Jak nahradim cely kurzor?

Myslim, ze musis kurzor zmenit v svojej implementacii
IDropSource.GiveFeedback a vratit S_OK (cize nie
DRAGDROP_S_USEDEFAULTCURSORS).

HTH
TOndrej

Atributy souboru na unixu

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 19.8.2003 09:42:02

Zdravim,

> Uz mne toto reseni taky napadlo, ale:
> - Soubory vytvari nekolik desitek procedur a upravovat takove mnozstvi je
> ponekud pracne
> - Do nekterych procedur nemohu zasahovat, takze to neni reseni, ktere
> postihne vsechny soubory
>

Sambu provozuju, ale o zadnem takovem prepinaci nevim.
Pokud vim tak UNIX obecne snad nema zadny priznak otevreni souboru.
Ja bych to obesel tak ze bych si napsal v BASHI skript ktery zapise do
nejakeho souboru velikost tech tvych souboru a pokud se od posledniho
spusteni skriptu nezmenili tak bych je tim skriptem i prekopiroval na cilove
misto.

Skript bych pak nechal spoustet pres CRON cca po 5 minutach.

To by mnelo byt dostatecne aktualni a automaticke.


S pozdravem Vaclav Halik


InnoSetup a nabidka start - cestina

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 19.8.2003 09:52:03

Diky, nove isl jde prelozit i s 0.7 :))
Ale cestina neni ouplne v poradku. Neumi napriklad ceske "hackovane" c a r,
pritom je v isl toto:

[LangOptions]
LanguageName=Czech
LanguageID=$0405
....

Nevis co s tim??

Diky
Vlasta

----- Original Message -----
From: <js-delphi(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 19, 2003 9:24 AM
Subject: Re: InnoSetup a nabidka start - cestina


> > Jo, a nemate nekdo cestinu pro My Inno Setup
> > 3.0.6.2? Pokud ano, mohl by
> > jste mi ji poslat na muj soukromy mail?
>
> > Vlasta
> > My Inno Setup 3.0.6.2
>
> Ahoj.
> Na strankach Inno - translations:
> Inno Setup 3.0.7 takes a version 3.0.5 file
> -> ze i do 3.0.6.2 ti pujde cestina do 3.0.5
> takze si to stahni z:
> http://www.jrsoftware.org/files/istrans/
> Ahoj
> Jirka
>
>
>

IDropTarget & Custom Cursor

[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 19.8.2003 09:32:01

Pouzivam OLE dragging a chci pri DragOver uplne zmenit ksicht kurzoru.
DragOver ma jen parametr dwEffect - coz jsou jakesi modifikace (+,link,...)
zakladniho kurzoru:

DROPEFFECT_NONE = 0,
DROPEFFECT_COPY = 1,
DROPEFFECT_MOVE = 2,
DROPEFFECT_LINK = 4,
DROPEFFECT_SCROLL = 0x80000000


Jak nahradim cely kurzor?

Marek

--------------------------

IDropTarget = interface(IUnknown)
['{00000122-0000-0000-C000-000000000046}']
function DragEnter(const dataObj: IDataObject; grfKeyState: Longint; pt:
TPoint; var dwEffect: Longint): HResult; stdcall;
function DragOver(grfKeyState: Longint; pt: TPoint; var dwEffect:
Longint): HResult; stdcall;
function DragLeave: HResult; stdcall;
function Drop(const dataObj: IDataObject; grfKeyState: Longint; pt:
TPoint; var dwEffect: Longint): HResult; stdcall;
end;

InnoSetup a nabidka start - cestina

[*] js-delphi(zv)quick(tec)cz - 19.8.2003 09:24:01

> Jo, a nemate nekdo cestinu pro My Inno Setup
> 3.0.6.2? Pokud ano, mohl by
> jste mi ji poslat na muj soukromy mail?

> Vlasta
> My Inno Setup 3.0.6.2

Ahoj.
Na strankach Inno - translations:
Inno Setup 3.0.7 takes a version 3.0.5 file
-> ze i do 3.0.6.2 ti pujde cestina do 3.0.5
takze si to stahni z:
http://www.jrsoftware.org/files/istrans/
Ahoj
Jirka


Chyba pri prehravani hudby MMSystem281 a WinME - n

[*] js-delphi(zv)quick(tec)cz - 19.8.2003 08:49:58

Ahoj!
Omlouvam se, ale problem je uz vyresen. Jednak
dochazelo k chybe viz %subject%, kterou jsem
odstranil dle instrukci MS pridanim do win.ini
sekci mci extensions:

[mci extensions]
mid=Sequencer
rmi=Sequencer
wav=waveaudio
avi=AVIVideo

Duvodem, proc mi uzivatel hlasil, ze mu nic
nehraje bylo to, ze si vypnul zvuky a nevedel,
kde je ma zapnout... Omlouvam se, resil jsem to
na dalku a po telefonu.
Diky vsem za vas cas.
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP2; WinXPProf+SP1
programator amater

> Zakaznik mi odepsal, ze uz
> se mu
> aplikace rozjela, ale ze zvuky nejedou.
> Nesetkal jste se s tim uz nekdo? Proc na
> WinME
> nejsem schopen pomoci Mediaplayeru prehrat
> obyc.
> *.wav??

InnoSetup a nabidka start

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 19.8.2003 08:13:56

Cauki,
nevite nekdo, jak v InnoSetup napsat, aby muj program(zastupce) byl po
instalaci v nabidce "Start/Po spusteni"?
Jo, a nemate nekdo cestinu pro My Inno Setup 3.0.6.2? Pokud ano, mohl by
jste mi ji poslat na muj soukromy mail?

Diky moc

Vlasta
My Inno Setup 3.0.6.2

Chyba pri prehravani hudby MMSystem281 a WinME - n

[*] js-delphi(zv)quick(tec)cz - 19.8.2003 08:07:55

Ahoj.
Trochu se vracim k problemu, na ktery jsem se uz
tady jednou ptal. Mrknul jsem na stranky MS,
ktere mi poslal P. Vones a postupoval jsem podle
nich - viz http://support.microsoft.com/?
kbid=141349 .
Chyba byla popsana jako chyba objevujici se u
Win95 a v mem pripade k ni doslo u zakaznika s
WinME... snad to nebude velky problem.
Z popisu te chyby jsem pochopil, ze system proste
nepozna, cim by mel muj *.wav soubor prehrat.
To by ale znamenalo, ze ani uzivatel napr. pres
pruzkumnika by nemel byt schopen *.wav prehrat...
ALE TO JDE!
Postupoval jsem podle instrukci z MS a zmenil
soubor win.ini. Zakaznik mi odepsal, ze uz se mu
aplikace rozjela, ale ze zvuky nejedou.
Nesetkal jste se s tim uz nekdo? Proc na WinME
nejsem schopen pomoci Mediaplayeru prehrat obyc.
*.wav??
Diky za jakekoliv info ci napad.
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP2; WinXPProf+SP1
programator amater


popup menu v main menu

[*] Kevin Macka <kevin.macka(zv)seznam(tec)cz> - 18.8.2003 22:35:20

zdravim,

rad bych se zeptal jestli existuje nejake main menu ktere by fungovalo tak ze kdyz najedu na nejakou jeho polozku a pak stisknu prave tlacitko tak se mi obevi popup-menu pro tuto polozku. neco jako editor v delphi kde kdyz kliknu pravym na polozku v menu tak se obevi 'Insert', 'Delete' atd ...

cele bych to ale potreboval v runtime

dik za pripadne napady

Kev
____________________________________________________________
Nema pocitadlo kalorii, nema kompas, nema zrcatko - ale za tu cenu ho
budete chti! Samsung C100 za 1977 Kc http://ad2.seznam(tec)cz/redir.cgi?isntance=58377%26url=http://www.oskarmobil(tec)cz/handsets/hs_view1.php3?nob=1?=cz&hs_id=69&ii=1

IB a Svedstina

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.8.2003 21:04:59

From: "Ludek Paral" <ludek.paral(zv)quick(tec)cz>
> nevite proboha nekdo, jak zjistit, v jake kodove sade mam vytvorit databazi
> pro Sveda ?

Dnes jsem o tom zahledl nejaky clanek na Zive:
http://www.zive(tec)cz/h/Programovani/Ar.asp?ARI=112139&CAI=2091

Petr Vones

IB a Svedstina

[*] Ludek Paral <ludek.paral(zv)quick(tec)cz> - 18.8.2003 20:56:54

Ahoj,

nevite proboha nekdo, jak zjistit, v jake kodove sade mam vytvorit databazi
pro Sveda ?


Ludek Paral
lupasoft
Sadova 2
352 01 As
Czech Rep.
mobil :00420/728.167118
email :ludek.paral(zv)atlas(tec)cz
ICQ :178625461
MSN :ludek.paral(zv)telecom(tec)cz


Ikona klavesnice

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.8.2003 19:56:43

From: "Ladislav Fitz" <ladislav.fitz(zv)kodytek(tec)cz>
> nevite nekdo kde bych mohl vytahnout ikonu prave aktivovane klavesnice

Ta ikona se myslim vytvari programove na zaklade dane zkratky jazyka.

> (takovy to EN,CS,... v modrem poli), noebo alespon jeji zkratku (EN,CS,...)?

V JCL na to najdes kompletni unit
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195

uses
JclLocales;

procedure TForm1.Timer1Timer(Sender: TObject);
var
L: TJclKeyboardLayoutList;
begin
L := TJclKeyboardLayoutList.Create;
try
Label1.Caption := L.ActiveLayout.LocaleInfo.ISOAbbreviatedLangName;
finally
L.Free;
end;
end;

Petr Vones


DBGrid a posun doprava

[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 18.8.2003 20:08:45

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz

Ahoj,

> To jsem zjistil, ale ja potrebuji mit dgRowSelect=True.
> Nevite nekdo co s tim?

Tak nech False a barvu radku si nastav sam na OnDrawCell nebo neco
podobneho - ted presne z hlavy nevim jak se ten event jmenuje.

S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================

Multi position a TMemorystream

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.8.2003 19:58:43

From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
> Musis si odvodit komponentu ktera bude ten pristup serializovat. K tomu
^^^^^^^^^^
Nesmysl, samozrejme bylo mysleno tridu ;-)

Petr Vones

Multi position a TMemorystream

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.8.2003 19:48:42

From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
> chtel bych se zeptat jestli existuje nejake reseni pro MemoryStream abych
> mohl k tomuto streamu pristupovat z ruznych vlaken aplikace ?. Neco jako

Musis si odvodit komponentu ktera bude ten pristup serializovat. K tomu muzes
pouzit napriklad mutex, i kdyz efektivnejsi bude neco, kde budes rozlisovat
zapisy a cteni aby nedochazelo ke zbytecnemu blokovani. V Delphi je trida
TMultiReadExclusiveWriteSynchronizer kterou by jsi mohl pouzit. Pozor vsak na
viceprocesorovych strojich, udajne je v tom kodu nekde chyba a nefunguje to
jak ma. Podobnou tridu nabizi i JCL.

Petr Vones


Multi position a TMemorystream

[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 18.8.2003 19:38:40

Zdravim konferenci,

preji vsem krasnou okurkovou sezonu :)..

chtel bych se zeptat jestli existuje nejake reseni pro MemoryStream abych mohl k tomuto
streamu pristupovat z ruznych vlaken aplikace ?. Neco jako multi position ... Ten jak vime slouzi pro
praci s timto souborem a urceni aktualni pozice. Promena position je vlastne jenom jedna a globalni..

DIky milan

komunikace se sluzbou

[*] Martin Cajbik <cajbik(zv)sct.sk> - 18.8.2003 19:04:38

Mne sa ako najjednoduchsie riesenie zda prave DCOM je to vsak samozrejme
zavisle na forme a objeme tych dat.

Martin Cajbik


> Ahoj,
> mam napsanou sluzbu a potreboval bych z ni ziskavat nejake informace
> (napr. v jakem je stavu ci dalsi uziv. udaje) a predavat nejake
> hodnoty. Jak se toto dela? Pres posilani zprav nebo COM to asi
> nepujde, nebo ano? Poradite mi nekdo?
>
> Dik
>
> ||| likeapear
>
>
>

Jak stahnout obrazek z netu

[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 18.8.2003 18:26:35

> jak stahnu v delphi 5 obrazek z internetu kdyz znam uplnou adresu.

Takto postaveny problem je prakticky neriesitelny. Musis upresnit, co
je 'z internetu'. V pocitaci, z ktoreho chces subor tahat, musi vzdy
bezat nejaky program, ktory ti ten subor posle. A takychto moznosti je
asi milion pat. Cize tvoj program by musel mat na zaciatku 'case'
podla typu serveru.

Najviac sa dnes pouziva 'server siete microsoft'. V tom pripade subor
nakopirujes pomocou CopyFile, ktory pomocou 'klienta siete microsoft'
subor prenesie. To same pre 'netware server' / 'klient siete Netware'.

Ina moznost je, ze na tom vzdialenom pocitaci bezi ftp server. Potom
musis pouzit nejaku komponentu s ftp klientom. Ta z Delphi obcas
zatuhava, preto ludia pouzivaju Indy alebo Synapse.

Dalsia moznost je protokol telnet. Cez ten sa rucne pripajas
hypertermnalom a na prenos suboru si kliknes na tlacitko Z-modem
download resp X-modem download. To su specialne protokoly z drevnych
dob komunikacie a existuje spusta implementacii.

Ja napriklad na prenos suborov z internetu pouzivam najcastejsie
protokol BINKP na porte 24554, ale neprogramujem to, pouzivam hotoveho
demona. Je to IP mailer amaterskej siete fidonet. Ine typy fido
mailerov pouzivaju protokol IFC na porte 60179, Vmodem na 3141 a
samozrejme tuneluju aj na telnete, port 23.

Takzvani BFU obvykle pod slovom 'internet' rozumeju klikanie do
exploreru. Aj tak sa daju prenasat subory, vtedy je na druhej strane
nejaky http server a s nim sa musis bavi pomocou nejakeho http
klienta. Plati tu to same, co pre ftp, t.j. nepouzivat http klienta z
Delphi, ale radsej z Indy alebo Synapse.

Dalsa moznost stahovania suborov je napriklad Gopher. To je nieco ako
BBS, no nechodi sa na nu telnetom, ale specialnym klientom
obsluhovanym interaktivne, ale v principe je mozne aj tohoto klienta
imitovat softwarovo a stahovat subory.

Alebo ftp-mail: posles email robotovi a on ti posle email s
attachnutym suborom pristupnym na ftp serveri. Posielat, stahovat a
analyzovat emaily z Delphi mozes napriklad pomocou Synapse.

Ako vravim: tych moznosti 'stiahnut z internetu' je asi milion.
Univerzalne riesenie by mohlo byt aj to, ze adresu odovzdas do
ShellExecute a nech si windows vyberie default browser pre dany
protokol. Potom ale musi user kliknut, kam subor ulozit.

bye
vmlich

DBGrid a posun doprava

[*] delphi(zv)mjsoft(tec)cz - 18.8.2003 17:46:27

To jsem zjistil, ale ja potrebuji mit dgRowSelect=True. Nevite nekdo co
s tim?
>> mam DBGrid v nem sloupce. Sloupce se nevejdou, tak se dole
>> ukaze scrollbar. Kdyz se presunu doprava a nasledne tuknu
>> mysi na libovolny radek, tak se cely DBGrid zobrazi zase od
>> prvniho slouce. Nevite nekdo jak ho mam primet aby zustal tam
>> kde je, jenom aby se vybral jiny radek?
>
> Nastavis-li v Optionech gridu dgRowSelect na False tak budes moct
skakat po >jednotlivych bunkach a nebude se nic posouvat.
>
> S pozdravem a dikem =====================================
>> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
>=====================================
>> GSM: 602 652 203 | ICQ: 322015967 <
>=====================================

DBGrid a posun doprava

[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 18.8.2003 17:30:26

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
>
> Zdravim,

Ahoj,

> mam DBGrid v nem sloupce. Sloupce se nevejdou, tak se dole
> ukaze scrollbar. Kdyz se presunu doprava a nasledne tuknu
> mysi na libovolny radek, tak se cely DBGrid zobrazi zase od
> prvniho slouce. Nevite nekdo jak ho mam primet aby zustal tam
> kde je, jenom aby se vybral jiny radek?

Nastavis-li v Optionech gridu dgRowSelect na False tak budes moct
skakat po jednotlivych bunkach a nebude se nic posouvat.

S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================

komunikace se sluzbou

[*] p.sestak(zv)corag.sk - 18.8.2003 17:06:24

Ak je ta sluzba interaktivna a ma vytvorene nejake okno,
da sa jej poslat klasicky sprava. Problem je vsak v tom, ze ak je spustena
este
pred prihlasenim uzivatela, toto okno je na defaultnom desktope a jeho
handle sa da
asi tazko ziskat, teda mne sa to este nepodarilo.
Ale okrem TCP/IP mas este moznost komunikacie cez zdielanu pamat,
ale treba osetrit synchronizaciu, najlepsie pomocou semaforu.
Zdielana pamat je uzitocna hlavne vtedy, ak nemas nainstalovanu sietovu
podporu :-).

Palo Sestak

7-bit prevod na ASCII u GSM

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 18.8.2003 17:14:24

mno,

zadal jsem do Googlu: PDU SMS GSM, a mimo jine jsem
nasel: http://www.dreamfabric.com/sms/hello.html

peca

Jiri Sedivec wrote:
> Nemate nekdo funkci na dekodovani 7-bit "PDU-textu" ze SMS do ASCII?

Jak stahnout obrazek z netu - dalsi rada

[*] mnk(zv)centrum(tec)cz - 18.8.2003 17:04:23

Zdravim, uz jste mi poradily pouzit HttpGetBinary.

Prosim poradte mi jeste, jak obrazek ulozim. Nevim jak se pouziva
TFileStream. Mam to viz nize a nefunguje to. Prosim Vas poradte.


Moc Dekuji. S pozdravem Martin Novak


soubor:=FileCreate('c:\aa.gif');
FileClose(soubor);

a:=TFileStream.Create('c:\aa.gif',fmOpenWrite);
HttpGetBinary('http://www....../pokus.gif',a);

DBGrid a posun doprava

[*] delphi(zv)mjsoft(tec)cz - 18.8.2003 16:50:22

Zdravim,

mam DBGrid v nem sloupce. Sloupce se nevejdou, tak se dole ukaze
scrollbar. Kdyz se presunu doprava a nasledne tuknu mysi na libovolny
radek, tak se cely DBGrid zobrazi zase od prvniho slouce. Nevite nekdo
jak ho mam primet aby zustal tam kde je, jenom aby se vybral jiny radek?

Jerom

komunikace se sluzbou

[*] Petr Langer <langer(zv)xdom(tec)cz> - 18.8.2003 16:46:22

Pouzivam komunikaci pres TCP/IP. Service bezi jako server a je to bez
problemu...

Petr Langer

----- Original Message -----
From: <likeapear(zv)centrum(tec)cz>
Subject: komunikace se sluzbou


> Ahoj,
> mam napsanou sluzbu a potreboval bych z ni ziskavat nejake informace
> (napr. v jakem je stavu ci dalsi uziv. udaje) a predavat nejake
> hodnoty. Jak se toto dela? Pres posilani zprav nebo COM to asi
> nepujde, nebo ano? Poradite mi nekdo?
>
> Dik
>
> ||| likeapear

komunikace se sluzbou

[*] likeapear(zv)centrum(tec)cz - 18.8.2003 16:32:16

Ahoj,
mam napsanou sluzbu a potreboval bych z ni ziskavat nejake informace
(napr. v jakem je stavu ci dalsi uziv. udaje) a predavat nejake
hodnoty. Jak se toto dela? Pres posilani zprav nebo COM to asi
nepujde, nebo ano? Poradite mi nekdo?

Dik

||| likeapear

FB & unicode_fss

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 18.8.2003 16:02:09

Haj hou!

On 18 Aug 2003 at 13:09, Radek KALA wrote:

> Pokud ale potrebuji ty datasetridit tak se mi to nedari. potrebuji
> napsat za order by napr. collate pxw_csy a s tim mne vyhodi, protoze
> neni pro unicode definovane. co s tim prosim.

Trideni je nutne provadet na klientovi.

S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase

JPG a RES - uz to mam

[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 18.8.2003 15:52:08

Omlouvam se, ze jsem rusil, uz jsem na to asi prisel. Provozni slepota, ten radek v *.RC mel zacinat na ID (nebo jmeno).

-----Original Message-----
From: Vlastimil Bardoo
Sent: Monday, August 18, 2003 3:22 PM

Zdravim. Zkousim nejak dostat JPG do RES, prilinkovat k BPL a pak vytahnout, kdyz to potrebuji. Zkousel jsem to delat podle navodu uvedeneho zde: http://www.delphifaq.com/fq/q1027.shtml

Tedy pripravil jsem si soubor UvodniObrazovka.rc a do nej napsal RCDATA "jmenosouborujpg.jpg"

Pak jsem to zkusil zkompilovat pres brcc32, ale dopadl jsem spatne, zahlasilo mi to

Borland Resource Compiler Version 5.40
Copyright (c) 1990, 1999 Inprise Corporation. All rights reserved.

Error UvodniObrazovka.rc 1 8: Expecting resource name or resource type
name

Ale i kdyby se mi to podarilo, stejne bych narazil. V uvedenem prikladu se totiz pro nacteni pouziva volani konstruktoru:

constructor CreateFromID(Instance: THandle; ResID: Integer; ResType: PChar);

kde

The ResID is the integer ID associated with the resource in the .RC file that was compiled with the application.

Ale jak ja mohu vedet jake ID ma ten obrazek?

Muzete prosim nekdo poradit nebo odkazat na vhodnejsi help ci jinou cestu k reseni?

JPG a RES

[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 18.8.2003 15:22:06

Zdravim. Zkousim nejak dostat JPG do RES, prilinkovat k BPL a pak vytahnout, kdyz to potrebuji. Zkousel jsem to delat podle navodu uvedeneho zde: http://www.delphifaq.com/fq/q1027.shtml

Tedy pripravil jsem si soubor UvodniObrazovka.rc a do nej napsal RCDATA "jmenosouborujpg.jpg"

Pak jsem to zkusil zkompilovat pres brcc32, ale dopadl jsem spatne, zahlasilo mi to

Borland Resource Compiler Version 5.40
Copyright (c) 1990, 1999 Inprise Corporation. All rights reserved.

Error UvodniObrazovka.rc 1 8: Expecting resource name or resource type
name

Ale i kdyby se mi to podarilo, stejne bych narazil. V uvedenem prikladu se totiz pro nacteni pouziva volani konstruktoru:

constructor CreateFromID(Instance: THandle; ResID: Integer; ResType: PChar);

kde

The ResID is the integer ID associated with the resource in the .RC file that was compiled with the application.

Ale jak ja mohu vedet jake ID ma ten obrazek?

Muzete prosim nekdo poradit nebo odkazat na vhodnejsi help ci jinou cestu k reseni?

IB6 vyber hlavicek pres pohyby

[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 18.8.2003 15:22:05

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pospisil Jan
>
> Nejrychlejsi jsou obecne JOINy.

A na pole pres ktera se joinuje udelat index (ve tvem pripade p.F_HLAV)...

S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================

Ikona klavesnice

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 18.8.2003 14:43:57

Dobry den

nevite nekdo kde bych mohl vytahnout ikonu prave aktivovane klavesnice
(takovy to EN,CS,... v modrem poli), noebo alespon jeji zkratku (EN,CS,...)?

InnoSetup a registry

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.8.2003 15:02:03

Martin Schayna <mschayna(zv)aktis(tec)cz> wrote:
> Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
>> ...a jak tedy zapisu do registru promennou kterou mi urci uzivatel
>> pri intalaci typu dword??
>
> function GetPort(Default: string): string;
> begin
> Result := Str(UserPort);

Pardon, samozrejme melo byt:
Result := IntToStr(UserPort);

> end;

Martin Schayna


Jak stahnout obrazek z netu

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 18.8.2003 14:35:56

> prosim poradte mi,jak stahnu v delphi 5 obrazek z internetu kdyz znam
> uplnou adresu.

Pouzij Synapsi, ve ktere najdes i funkci:

function HttpGetBinary(const URL: string; const Response: TStream):
Boolean;

URL je proste URL jakehokoliv dokumentu na webu, treba i toho
obrazku, a onno ti jej stahne to tveho streamu. (ten si udelej jak
potrebujes, TFileStream pro ulozeni na disk, TMemoryStream na ulozeni
do pameti, atd.)


--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

IB6 vyber hlavicek pres pohyby

[*] Pospisil Jan <j.pospisil(zv)aquasoft(tec)cz> - 18.8.2003 13:59:46

Nejrychlejsi jsou obecne JOINy.


Pospa


ORDER BY h.CISLO DESC
-----Original Message-----
From: delphi(zv)mjsoft(tec)cz [mailto:delphi(zv)mjsoft(tec)cz]
Sent: Monday, August 18, 2003 12:54 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: IB6 vyber hlavicek pres pohyby


Zdravim,

pouzivam Interbase 6 a chtel bych se zeptat, jaky vyber je lepsi
pouzit na vetsich datech. Sam bohuzel nemam v databazi moc dat, takze to
nemam kde vyzkouset. Potrebuji vybrat z tabulky jen takove hlavicky,
ktere splnuji podminku v tabulce pohybu.

1) pouziti EXISTS
-----------------
SELECT h.ID, h.NAME
FROM hlavicka h
WHERE EXISTS (SELECT * FROM pohyby p WHERE o.ID=p.F_HLAV and p.KOD
LIKE "100-3%")
ORDER BY h.CISLO DESC


2)pouziti IN
------------
SELECT h.ID, h.NAME
FROM hlavicka h
WHERE h.ID IN (SELECT p.F_HLAV FROM pohyby p WHERE p.KOD LIKE
"100-3%")
ORDER BY h.CISLO DESC


3)pouziti JOIN
--------------
SELECT h.ID, h.NAME
FROM hlavicka h, pohyby p
WHERE h.ID=p.F_HLAV and p.KOD LIKE "100-3%"
ORDER BY h.CISLO DESC

V PLANU se ukazuje vyuziti indexu pro h.CISLO i pro p.F_HLAV pro vsechny
tri varianty, ale zajimalo by me jaky vyber je nejrychlejsi (na malych
datech to vypada stetjne). Osobne bych rekl, ze by to mela byt prvni
varianta, ale nemohu si to prakticky potvrdit.

Diky Jerom

VPN spojeni na 64kbps ?

[*] Dusan Nagy <dnagy(zv)inomacomp.sk> - 18.8.2003 14:41:56

Dobry den,
15. augusta 2003, 19:53:15, napsal jste:


VM> Existuju programy na spomalenie linky, ale na hruby odhat ti staci aj
VM> spustit na klientovi W9x SYSMON (na NW2k PERFMON), zapnut v nom
VM> sledovanie preneseneho objemu out aj in, spustit aplikaciu, z grafu
VM> odhadnut objem a prepocitat, za ako dlho sa ten objem pretlaci po
VM> 64kbit drate pri jednotlivych akciach programu.

VM> bye
VM> vmlich


Existuju programy na spomalenie linky potebovla by som program na
spomalenie sietoveho rozhrania na w2000 neviete o niecom.

Sdilena hodnota mezi aplikacema podle jmena

[*] Pospisil Jan <j.pospisil(zv)aquasoft(tec)cz> - 18.8.2003 13:59:46

Co si to posilat treba pres OLE???


Pospa

-----Original Message-----
From: Petr Langer [mailto:langer(zv)xdom(tec)cz]
Sent: Monday, August 18, 2003 10:57 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Sdilena hodnota mezi aplikacema podle jmena


Ahojte,
existuje ve Windows nejake API pomoci ktereho bych vytvoril globalni
pojmenovany objekt za kterym by byla skryta nejaka hodnota? Neco jako je
mutex, s tim, ze pomoci retezcoveho id bych dostal ciselnou hodnotu. Vim, ze
lze vytvorit namapovat sdileny soubor, ja ale potrebuju uchovat jenom jednu
hodnotu typu WORD, tak mi to prijde zbytecne komplikovane. Mohl bych to
resit i pres registry, ale to bych taky videl jako krajni reseni.

Diky za tipy,
Petr Langer


InnoSetup a registry

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.8.2003 14:03:54

Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
> ...a jak tedy zapisu do registru promennou kterou mi urci uzivatel pri
> intalaci typu dword??

Typ hodnoty dword se specifikuje pomoci ValueType primo v [Registry]
sekci, jde jen o to ze {code:...} vraci string, ktery se doplni do
ValueData.
Pak uz se interpretuje jako hodnota dword. Viz:

[Registry]
Root: HKCU; Subkey: Software\Pokus; ValueType: dword; ValueName: Port;
ValueData: "{code:GetPort}"

[Code]
var
UserPort : word;

procedure InitializeWizard();
begin
UserPort := 2000; <<PAK DOPLNIM Z EDITU...
end;

function GetPort(Default: string): string;
begin
Result := Str(UserPort);
end;

Martin Schayna


Atributy souboru na unixu

[*] martin.ben(zv)ge(tec)com - 18.8.2003 13:47:45

Uz mne toto reseni taky napadlo, ale:
- Soubory vytvari nekolik desitek procedur a upravovat takove mnozstvi je
ponekud pracne
- Do nekterych procedur nemohu zasahovat, takze to neni reseni, ktere
postihne vsechny soubory

Martin Ben

-----Original Message-----
From: mstevlik(zv)gamo.sk [mailto:mstevlik(zv)gamo.sk]

Ak mas to vytvorenie z Oraclu pod kontrolov, resp. vies don zasiahnut, tak
by som to robil tak, ze pocas vytvarania subora by som na disk vytvoril
suborcek (dlzka 0-1 byte) a rovnakym nazvom ako sa bude vytvrarat ten
velky a dal by som mu koncovku lck. Ked by sa velky subor dovytvaral subor
lck by som knemu zmazal Potom aplikacia kt. stahuje Oraclom vytvorene
subory by sa pre kazdy subor pozrela ci existuje lck, ak ano tak by snim
zatial nerobila nic (bo sa este vytvara)

FB & unicode_fss

[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 18.8.2003 13:09:41

Ahoj, kolega ma problem se znakovymi sadami. Zatim jsem vsechno
delal ve Win1250, takze si opravdu nevim rady

Potrebuje databazi pro ruzne jazyky, takze definoval sloupec
character set unicode_fss
pak pri pripojeni reknu napr. Win1250 a krasne se mi konvertuji data
tak jak maji.
Pokud ale potrebuji ty datasetridit tak se mi to nedari.
potrebuji napsat za order by napr. collate pxw_csy a s tim mne
vyhodi, protoze neni pro unicode definovane. co s tim prosim.

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

Jak stahnout obrazek z netu

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 18.8.2003 13:09:41

18.8.2003 mnk(zv)centrum(tec)cz:
> Zdravim,
> prosim poradte mi,jak stahnu v delphi 5 obrazek z internetu kdyz znam
> uplnou adresu.

> Vubec nevim jak na to. Jakou komponentu pouzit, zkratka nic :-(

Knihovna Synapse (www.ararat(tec)cz/synapse), unita HTTPSend, funkce
HTTPGetBinary()


--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

Jak stahnout obrazek z netu

[*] mnk(zv)centrum(tec)cz - 18.8.2003 12:59:39

Zdravim,
prosim poradte mi,jak stahnu v delphi 5 obrazek z internetu kdyz znam
uplnou adresu.

Vubec nevim jak na to. Jakou komponentu pouzit, zkratka nic :-(

Dekuji
Martin Novak

Atributy souboru na unixu

[*] mstevlik(zv)gamo.sk - 18.8.2003 13:13:42

Ak mas to vytvorenie z Oraclu pod kontrolov, resp. vies don zasiahnut, tak
by som to robil tak, ze pocas vytvarania subora by som na disk vytvoril
suborcek (dlzka 0-1 byte) a rovnakym nazvom ako sa bude vytvrarat ten
velky a dal by som mu koncovku lck. Ked by sa velky subor dovytvaral subor
lck by som knemu zmazal Potom aplikacia kt. stahuje Oraclom vytvorene
subory by sa pre kazdy subor pozrela ci existuje lck, ak ano tak by snim
zatial nerobila nic (bo sa este vytvara)

Stevlik Marian
ISYS programator

GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
mail: mstevlik(zv)gamo.sk
tel: +421 48 4137935, 4132942
mobil: +412 905 462010
icq: 34893645

delphi-l-owner(zv)clexpert(tec)cz wrote on 18.08.2003 12:39:37:

> Pochopil jsi to velmi presne.
>
> Zadne pouzitelne prepinace Samby jsem nenasel.
>
> Problem se zatim snazim resit tak, ze si pri prvnim vyskytu souboru
ulozim
> jeho datum vytvoreni a velikost a
> pokud pri nasledne kontrole za 1/2 hod. se tyto hodnoty nezmenily,
soubor
> prenesu. Moc se mi to reseni nelibi,
> protoze se presun souboru odklada, ale zatim me nic chytrejsiho
nenapadlo.
>
> Martin Ben

Atributy souboru na unixu

[*] martin.ben(zv)ge(tec)com - 18.8.2003 12:39:37

Pochopil jsi to velmi presne.

Zadne pouzitelne prepinace Samby jsem nenasel.

Problem se zatim snazim resit tak, ze si pri prvnim vyskytu souboru ulozim
jeho datum vytvoreni a velikost a
pokud pri nasledne kontrole za 1/2 hod. se tyto hodnoty nezmenily, soubor
prenesu. Moc se mi to reseni nelibi,
protoze se presun souboru odklada, ale zatim me nic chytrejsiho nenapadlo.

Martin Ben

-----Original Message-----
From: Martin Schayna [mailto:mschayna(zv)aktis(tec)cz]

Jiri Cincura <jiri(zv)cincura.net> wrote:
> A co ty soubory Locknout? A pokud to nemuzes delat, tak co si udelat
> "zamkovy adresar/soubor"? To by nepomohlo?

Tady asi bude problem v tom ze z jedne strany je aplikace,
kterou nemas az tak dobre pod kontrolou (jestli se dobre
pamatuji tak Oracle) a ktera generuje soubor a na druhe
strane je aplikace ktera na nej ceka ale nedozvi se jestli
je uz hotovy nebo ne. Tedy jestli tomu spravne rozumim.

Ty prepinace Samby jsi kontroloval?

Martin Schayna


InnoSetup a registry

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 18.8.2003 12:39:37

...a jak tedy zapisu do registru promennou kterou mi urci uzivatel pri
intalaci typu dword??

Diky
Vlasta


----- Original Message -----
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, August 18, 2003 12:15 PM
Subject: Re: InnoSetup a registry


> Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
> > Prosil bych o pomoc. V InnoSetup chci zapsat uzivatelem zadanou
> > promennou do registru, ale prekladac vzdoruje...:(
> >
> > Script vypada takto:
> >
> > [Registry]
> > Root: HKCU; Subkey: Software\Pokus; ValueType: dword; ValueName: Port;
> > ValueData: "{code:GetPort}" <<TADY HLASI CHYBU: Parametr "ValueData"
> > is not valid value
>
> vlastni funkce pouzitelna v {code:...} musi vracet string a ma parametr
pro
> default hodnotu. Viz manual isetup.hlp (ale to uz jsem psal :-).
>
> DefaultDirName={code:MyConst|{pf}}\My Program
>
> function MyConst(Default: String): String;
> begin
> Result := ExpandConstant('{pf}');
> end;
>
> Martin Schayna
>
>
>
>

IB6 vyber hlavicek pres pohyby

[*] delphi(zv)mjsoft(tec)cz - 18.8.2003 12:53:38

Zdravim,

pouzivam Interbase 6 a chtel bych se zeptat, jaky vyber je lepsi
pouzit na vetsich datech. Sam bohuzel nemam v databazi moc dat, takze to
nemam kde vyzkouset. Potrebuji vybrat z tabulky jen takove hlavicky,
ktere splnuji podminku v tabulce pohybu.

1) pouziti EXISTS
-----------------
SELECT h.ID, h.NAME
FROM hlavicka h
WHERE EXISTS (SELECT * FROM pohyby p WHERE o.ID=p.F_HLAV and p.KOD
LIKE "100-3%")
ORDER BY h.CISLO DESC


2)pouziti IN
------------
SELECT h.ID, h.NAME
FROM hlavicka h
WHERE h.ID IN (SELECT p.F_HLAV FROM pohyby p WHERE p.KOD LIKE
"100-3%")
ORDER BY h.CISLO DESC


3)pouziti JOIN
--------------
SELECT h.ID, h.NAME
FROM hlavicka h, pohyby p
WHERE h.ID=p.F_HLAV and p.KOD LIKE "100-3%"
ORDER BY h.CISLO DESC

V PLANU se ukazuje vyuziti indexu pro h.CISLO i pro p.F_HLAV pro vsechny
tri varianty, ale zajimalo by me jaky vyber je nejrychlejsi (na malych
datech to vypada stetjne). Osobne bych rekl, ze by to mela byt prvni
varianta, ale nemohu si to prakticky potvrdit.

Diky Jerom

InnoSetup a registry

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.8.2003 12:15:35

Vlastimil Zdenek <delphi(zv)gestore(tec)cz> wrote:
> Prosil bych o pomoc. V InnoSetup chci zapsat uzivatelem zadanou
> promennou do registru, ale prekladac vzdoruje...:(
>
> Script vypada takto:
>
> [Registry]
> Root: HKCU; Subkey: Software\Pokus; ValueType: dword; ValueName: Port;
> ValueData: "{code:GetPort}" <<TADY HLASI CHYBU: Parametr "ValueData"
> is not valid value

vlastni funkce pouzitelna v {code:...} musi vracet string a ma parametr pro
default hodnotu. Viz manual isetup.hlp (ale to uz jsem psal :-).

DefaultDirName={code:MyConst|{pf}}\My Program

function MyConst(Default: String): String;
begin
Result := ExpandConstant('{pf}');
end;

Martin Schayna


InnoSetup a registry

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 18.8.2003 11:09:26

Cau delphisti!

Prosil bych o pomoc. V InnoSetup chci zapsat uzivatelem zadanou promennou do
registru, ale prekladac vzdoruje...:(

Script vypada takto:

[Registry]
Root: HKCU; Subkey: Software\Pokus; ValueType: dword; ValueName: Port;
ValueData: "{code:GetPort}" <<TADY HLASI CHYBU: Parametr "ValueData" is not
valid value

[Code]
var
UserPort : word;

procedure InitializeWizard();
begin
UserPort := 2000; <<PAK DOPLNIM Z EDITU...
end;

function GetPort(I: Integer): Word;
begin
Result := UserPort;
end;

Co mam spatne?
Diky za radu
Vlasta
My Inno Setup 3.0.6.2

Atributy souboru na unixu

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.8.2003 11:01:25

Jiri Cincura <jiri(zv)cincura.net> wrote:
> A co ty soubory Locknout? A pokud to nemuzes delat, tak co si udelat
> "zamkovy adresar/soubor"? To by nepomohlo?

Tady asi bude problem v tom ze z jedne strany je aplikace,
kterou nemas az tak dobre pod kontrolou (jestli se dobre
pamatuji tak Oracle) a ktera generuje soubor a na druhe
strane je aplikace ktera na nej ceka ale nedozvi se jestli
je uz hotovy nebo ne. Tedy jestli tomu spravne rozumim.

Ty prepinace Samby jsi kontroloval?

Martin Schayna

Sdilena hodnota mezi aplikacema podle jmena

[*] delphin(zv)post(tec)cz - 18.8.2003 11:03:25

Asi je to kanon na vrabce, ale CreateFileMapping se da presvedcit, aby
vytvorilo sdilenou oblast ve strankovacim souboru. Tudiz neni treba zadny
soubor, je to pak v podstate jenom sdilena pamet.

----- Original Message -----
From: "Petr Langer" <langer(zv)xdom(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, August 18, 2003 10:57 AM
Subject: Sdilena hodnota mezi aplikacema podle jmena


> Ahojte,
> existuje ve Windows nejake API pomoci ktereho bych vytvoril globalni
> pojmenovany objekt za kterym by byla skryta nejaka hodnota? Neco jako je
> mutex, s tim, ze pomoci retezcoveho id bych dostal ciselnou hodnotu. Vim,
ze
> lze vytvorit namapovat sdileny soubor, ja ale potrebuju uchovat jenom
jednu
> hodnotu typu WORD, tak mi to prijde zbytecne komplikovane. Mohl bych to
> resit i pres registry, ale to bych taky videl jako krajni reseni.
>
> Diky za tipy,
> Petr Langer
>
>
>
>

Sdilena hodnota mezi aplikacema podle jmena

[*] Petr Langer <langer(zv)xdom(tec)cz> - 18.8.2003 10:57:24

Ahojte,
existuje ve Windows nejake API pomoci ktereho bych vytvoril globalni
pojmenovany objekt za kterym by byla skryta nejaka hodnota? Neco jako je
mutex, s tim, ze pomoci retezcoveho id bych dostal ciselnou hodnotu. Vim, ze
lze vytvorit namapovat sdileny soubor, ja ale potrebuju uchovat jenom jednu
hodnotu typu WORD, tak mi to prijde zbytecne komplikovane. Mohl bych to
resit i pres registry, ale to bych taky videl jako krajni reseni.

Diky za tipy,
Petr Langer

podmineny zapis do registru v InnoSetup

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.8.2003 10:53:23

Cizek Milan <cizek.milan(zv)seznam(tec)cz> wrote:
>> Cizek Milan <cizek.milan(zv)seznam(tec)cz> wrote:
>>> muzete mi nekdo poradit jak v innosetup docilim toho, aby se mi
>>> zapsaly udaje do registru pouze v pripade, ze zvolim
>> nejakou konkretni
>>> komponentu?
>>
>
>> na konec radky v sekci [Registry] dopln: "Components: docs"
>
> to je jedna cast problemu, druha je v tom, ze mezi defaultni stranky
> vkladam svou vlastni, na ktere se zadava adresa DB serveru. Potrebuji
> aby se tato stranka zobrazila pouze v pripade instalace ODBC, prolezl
> jsem snad uz cely help, ale reseni nenasel. Jedna se o to, jak v kodu
> zjistit instalovane komponenty, ktere uzivatel zaskrtne na predchozi
> zalozce. Lze to vubec?? Diky za pripadnou pomoc.

Z manualu isetup.hlp [My Inno Setup Extension] (opravdu se ho vyplati
precist):

function ShouldProcessEntry(const Components, Tasks: String): Integer;
Returns srYes if an entry with the specified Components and Tasks parameters
should be installed.

Martin Schayna


DBGrid, insert na poslednim radku, vypnout

[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 18.8.2003 09:35:18

Do udalosti BeforeInsert napis Abort.
a obslus si OnKeyPress a pokud uzivatel stitkne Insert tak to tam
pridej za nej.

> Myslim, ze jsem v to napsl uz v predmetu celkem presne.
>
> Mak DBGrid, ten je napojeny na ReadOnly=False ClientDataSet. Chci, aby
> bylo mozno v tabulce zaznamy editovat, ale nechci, aby bylo mozo
> pouhym posunutim pod posleni radek "Insertovat". Nejsem tento problem
> schopen odladit udalosti KeyPressed, protoze i kdyz tabulka ukazuje,
> ze stoji kurzor na poslednim zaznamu, neni tomu tak (to budou asi v
> BDE skvity First a Last).
>
> Chci ten insert vypnout, protoze
> 1. uzivatel nepredpoklada, ze kdyz kline sipkou tak se mu prida radek
> 2. tabelator mi po dojeti na konec tabulky nepreskoci automaticky na
> jinou komponentu, ale vytvari mi stale nove radky 3. pokud mohu v
> tabulce editovat jen omezenou sadu poli, pricemz pocitam, ze ostatni
> jsou prednastaveny jiz pri vlozeni, uzivatel mi tak navklada radky,
> ktere neobsahuji vsechny potrebne informace a ani je nijak nedoplni.
>
> Dekuji
>
> Lukas Benda


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

Atributy souboru na unixu

[*] martin.ben(zv)ge(tec)com - 18.8.2003 09:35:18

Abych pravdu rekl, tedy vlastne napsal, tak ti nevim co mas na mysli.

Martin Ben

-----Original Message-----
From: Jiri Cincura [mailto:jiri(zv)cincura.net]

A co ty soubory Locknout? A pokud to nemuzes delat, tak co si udelat
"zamkovy adresar/soubor"? To by nepomohlo?

OLE server

[*] Petr Nehez <dpn(zv)atlas(tec)cz> - 18.8.2003 08:13:13

Zkousel, ale to nestaci, potreboval bych vedet jaky interface musi
implementovat, zatim jsem jich odhad asi tak 12, ale to jsem je nejak
vydedukoval z toho, co implementuje Wordpad nebo Excel pomoci OleView. K
tomu bych uvital i kousek kodu.

Petr Nehez

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vones
Sent: Saturday, August 16, 2003 1:06 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: OLE server


From: "Petr Nehez" <dpn(zv)atlas(tec)cz>
> mam vlastni editor, ktery ale zakaznik chce vkladat do Wordu. Nevite, kde

Zkousel si z neho udelat ActiveX komponentu ?

Petr Vones


VPN spojeni na 64kbps ?

[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 18.8.2003 08:13:13

Nejake zkusenosti s tim mame (hlavne kolegove co delaji sluzby, ja osobne s tim pracuju jen obcas). Na prumerne dobre napsanou C/S aplikaci to nestaci. Musela by byt velmi dobre napsana. Ale napriklad Windows Terminal Services (popripade Citrix) chodi na takove rychlosti celkem v pohode. Pouzivame to na poskytovani sluzeb (vzdalene spravy) mnoha nasim zakaznikum a jsme s tim celkem spokojeni.

> Nemate nekdo prakticke zkusenosti s propojenim
> siti pres VPN? Bude mi na rozumnou praci s daty
> stacit 64kbps?

7-bit prevod na ASCII u GSM

[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 18.8.2003 08:07:12

Nemate nekdo funkci na dekodovani 7-bit "PDU-textu" ze SMS do ASCII?
Diky ... Jiri

Konverze dlouhych wavu

[*] Jiri Bily <bily78(zv)tiscali(tec)cz> - 18.8.2003 07:55:11

No to jsem chtel udelat. Jenomze Lame umi zkonvertit jen wavy ve formatu
PCM, ale ja mam zdrojovy wavy ve formatu a-Law.
Pokud budu dostatecne zoufalej, tak jeste muzu konvezci a-Lav na PCM udelat
mym programem bez pouziti kodeku (to umim) a az na vzniklej wav poslat Lame.
Bude to sice funkcni, ale porad to nebude ono.

Jirka

----- Original Message -----
From: "Jiri Cincura" <jiri(zv)cincura.net>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 15, 2003 10:41 PM
Subject: Re: Konverze dlouhych wavu


> A co prikompilovat Lame ke tvemu programu a pak si ho spustit z radku?
> Lame ti udela z wav mp3 vklidu.
>

HelpMaker a Context_ID

[*] Dalibor <dalibor(zv)torola(tec)cz> - 18.8.2003 07:41:10

Ahoj,
na internetu jsem nasel na vytvareni HTML helpu, HelpMakera.
Myslim, ze je dobrej a hlavne je Free.
Jen jsem nasel jednu chybu, kterou nevim jak odstranit.

Pri kompilaci do HTML Helpu(CHM), nefunguje zobrazeni podle Context_ID.

Zjistil jsem, ze se nevytvari soubor s aliasy a proto to asi hapruje.
Prisli jste na to taky? Vyresili jste to nejak?

Ja to zatim resim tak, ze jsem si napsal v Delphi malej programek, kterej to upravi tak, tak aby to vse fungovalo tak jak ma.

*************************************
Dalibor Bednarcik ; bednarcik(zv)torola(tec)cz

TOROLA electronic, spol. s r.o.
tel. : +420 558 638 211
www : http://www.torola(tec)cz
**************************************

dbExpress: TSQLQuery s parametrom typu ftDateTime

[*] econka(zv)softip.sk - 18.8.2003 07:07:08

Sorry, zabudol som napisat, pre ktore DBMS je aplikacia urcena:

MS SQL, Oracle, Informix

Parameter TSQLConnection - SQL Dialect - je urceny len pre IB/FB.


----- Postoupil Erich Conka/BYS/SOFTIP dne 18.08.2003 07:03 -----

Erich Conka
Komu: delphi-l(zv)clexpert(tec)cz
15.08.2003 Kopie:
14:02 Predmet: dbExpress: TSQLQuery s parametrom typu ftDateTime


Dobry den,
pokusam sa migrovat BDE aplikaciu na dbExpress.
Ak do SQLQuery vlozim SQL Select s parametrom typu DateTime, pri pokuse o
otvorenie datasetu (prepnutie Active v dizajne alebo Query.Open za behu
programu) vypise chybu:

"dbExpress Error: Invalid field type."

Ten isty Select v TQuery (BDE) otvori bez problemov.

Prostredie:
Windows XP Professional EN (SP 1), v Regional Options nastavenie "Slovak"
(skusal som aj "English (US)" - nepomohlo)
Delphi 7.0 Enterprise (Build 4.453)

Pomoze niekto iny ako Borland?


S pozdravom

Erich Conka

JpegImage na TCanvas - CLX podruhe

[*] Filip Rozsival <kenny(zv)razdva(tec)cz> - 17.8.2003 14:22:06

Mozna odpovidam trochu pozde, ale zkus se podivat na
http://www.lischke-online.de/ je tam unita GrpahicsEx a ta umi mnohem vic
formatu, vcetne jpg. Chodi to 100% pod D7 - Kylix nevim.

----- Original Message -----
From: "Petr Janousek" <petr.janousek(zv)definity(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 01, 2003 9:51 AM
Subject: Re: JpegImage na TCanvas - CLX podruhe


> >>>PJ> Nebo mi aspon poradte, jak TJepgImage prevest do TImage. Slo by to
pres
> >>>PJ> TStream ? ( jepg.SaveToStream .... TImage.picture.LoadFromStream
apod. )
> >>>
> >>>Neni potreba prevadet, pri pridani unity jpeg do Uses ziska automaticky
> >>>TImage moznost nahrat .jpg soubor.
> >>
> >
> >>Bohuzel to nejde - pri volani jpg.picture.LoadFromFile(x.jpg) mi to
> >>spadne na exception : unknown picture file extension.
> >
> >
> >>( RegisterFileFormat mi nefunguje, protoze TJepgImage neni
> >> TGraphicClass. )
> >
> >
> > A pouzivas vubec standardni unitu z Dephi 7 ?
>
> Delphi 7 sem standartne nainstaloval a zadnou unitu sem tam nedaval.
> Nevite kde aspon najit nejakou komponentu pracujici s Jpeg obrazky,
> ktera by chodila pod Delphi 7 i pod Kylixem 3 ?
>
> --
> Petr Janousek
> DEFINITY Systems, s.r.o.
> Krizikova 2158
> 25601 Benesov u Prahy
> Czech Republic
> Tel: +420 317 726022
> Fax: +420 317 724456
> Petr.Janousek(zv)Definity(tec)cz
> http://www.definity(tec)cz
> -------------------------
> Private:
> Luis99(zv)seznam(tec)cz
> http://www.sweb(tec)cz/Luis99
>
>
>
>
>

TAnimate

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.8.2003 01:45:14

From: "Ponechal Vladimir" <ponechal_vladimir(zv)tesco-europe.com>
> P.S.: Apropo, poradte nejakou dobrou komponentu na prehravani videa. Je
> nutne, aby vedela Click, DoubleClick, MouseDown, MouseMove, MouseUp.

Napriklad TMediaPlayer. TAnimate je urceno pouze pro prehravani jednoduchych
animaci v omezenem rozsahu formatu souboru.

Petr Vones


TAnimate

[*] Ponechal Vladimir <ponechal_vladimir(zv)tesco-europe(tec)com> - 16.8.2003 22:37:02

Cau panove,

Prosba. Vytvoril jsem si z TAnimate vlastni komponentu.Vse jsme zdedil a pridal jsem si

OnClick: funguje
OnMouseDown: nefunguje
OnMouseMove: nefunguje
OnMouseUP: nefunguje

Komponentu jsem nainstaloval.

Problem:

Hlaska kterou obdrzim pri spusteni prg: Property OnMouseDown does not exist.

Do zdroju komponentu jsem pouze pridal:

....
type
TAdvanceAnimate = class(TAnimate)
....
published
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
....

Jsem si vedom, ze jsem nekde neco nezadal. Akorad nevim kde a co.

P.S.: Apropo, poradte nejakou dobrou komponentu na prehravani videa. Je nutne, aby vedela Click, DoubleClick, MouseDown, MouseMove, MouseUp.

Diky,

Vlada

Master detail s CliendDataSet

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 20:14:53

Tak tento problem jsem jiz vyresil. Staci nastavit PacketRecord na -1 a
uz to jede normalne, bohuzel Delphi tento parametr neukladaji a tak pri
kazdem startu ho musim nastavit znovu. (Asi si na to budu muset udelat
komponentu :().

Benda Lukas wrote:

>Dobry den,
>
>mam probmle (jinak bych nezadal o radu), kdyz nastavim v ClientDataSet
>master-detail (nastavim MasterDataSource i spojeni) tak pri otevreni
>toho ClientDataSetu mi program havaruje s errorem "Culdn't find object"
>nevim co to znamena a proc tato chyba nastava.
>
>Lukas "benzin" Benda
>P.S.: Ani v jedne tabulce nemam nastavene indexy. Master je typu TQuery
>a detail je ClientDataSet.
>

DBGrid, insert na poslednim radku, vypnout

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 20:12:53

Myslim, ze jsem v to napsl uz v predmetu celkem presne.

Mak DBGrid, ten je napojeny na ReadOnly=False ClientDataSet. Chci, aby
bylo mozno v tabulce zaznamy editovat, ale nechci, aby bylo mozo pouhym
posunutim pod posleni radek "Insertovat". Nejsem tento problem schopen
odladit udalosti KeyPressed, protoze i kdyz tabulka ukazuje, ze stoji
kurzor na poslednim zaznamu, neni tomu tak (to budou asi v BDE skvity
First a Last).

Chci ten insert vypnout, protoze
1. uzivatel nepredpoklada, ze kdyz kline sipkou tak se mu prida radek
2. tabelator mi po dojeti na konec tabulky nepreskoci automaticky na
jinou komponentu, ale vytvari mi stale nove radky
3. pokud mohu v tabulce editovat jen omezenou sadu poli, pricemz
pocitam, ze ostatni jsou prednastaveny jiz pri vlozeni, uzivatel mi tak
navklada radky, ktere neobsahuji vsechny potrebne informace a ani je
nijak nedoplni.

Dekuji

Lukas Benda


podmineny zapis do registru v InnoSetup

[*] Cizek Milan <cizek.milan(zv)seznam(tec)cz> - 16.8.2003 19:14:49

> Cizek Milan <cizek.milan(zv)seznam(tec)cz> wrote:
> > muzete mi nekdo poradit jak v innosetup docilim toho, aby se mi
> > zapsaly udaje do registru pouze v pripade, ze zvolim
> nejakou konkretni
> > komponentu?
>

> na konec radky v sekci [Registry] dopln: "Components: docs"

Ahoj,
to je jedna cast problemu, druha je v tom, ze mezi defaultni stranky
vkladam svou vlastni, na ktere se zadava adresa DB serveru. Potrebuji
aby se tato stranka zobrazila pouze v pripade instalace ODBC, prolezl
jsem snad uz cely help, ale reseni nenasel. Jedna se o to, jak v kodu
zjistit instalovane komponenty, ktere uzivatel zaskrtne na predchozi
zalozce. Lze to vubec?? Diky za pripadnou pomoc.


function ScriptDlgPages(CurPage: Integer; BackClicked: Boolean):
Boolean; var Next,NextOk: Boolean; CurSubPage: integer; begin
if (not BackClicked and (CurPage = wpSelectComponents)) or
(BackClicked and (CurPage = wpReady)) then
begin
{ First find out on which page we should start }
if not BackClicked then
CurSubPage := 0
else
CurSubPage := 2;

ScriptDlgPageOpen();
ScriptDlgPageSetCaption('Uprava udaju');

while (CurSubPage >= 0) and (CurSubPage <= 0) and not Terminated
do
begin
ScriptDlgPageSetSubCaption1('Zadejte pozadovane udaje');
ScriptDlgPageSetSubCaption2('Zadejte jmeno MS SQL Serveru. Pro
lokalni server muzete zadat tecku.' +#13#10+ 'Pak kliknete na tlacitko
Dalsi.');

Next := InputQuery('Server:',ServerName);
if Next then
if ServerName = '.' then
ServerName := 'localhost';
NextOk := Length(ServerName) <> 0;
if not NextOk and not Terminated then
MsgBox('Zadejte prosim nazev serveru!', mbError, MB_OK);

if Next then
begin
{ Go to the next page, but only if the user entered correct
information }
if NextOk then CurSubPage := CurSubPage + 1;
end
else CurSubPage := CurSubPage - 1;
end;

{ See NextButtonClick and BackButtonClick: return True if the
click should be allowed }
if not BackClicked then Result := Next
else Result := not Next;
{ Close the wizard page. Do a FullRestore only if the click (see
above) is not allowed }
ScriptDlgPageClose(not Result);
end
else Result := True;
end;


function UpdateReadyMemo(Space, NewLine, MemoUserInfoInfo, MemoDirInfo,
MemoTypeInfo, MemoComponentsInfo, MemoGroupInfo, MemoTasksInfo: String):
String; begin
Result := MemoDirInfo+NewLine+NewLine+'Database Server:
'+NewLine+Space+ServerName+NewLine+NewLine+MemoTasksInfo+NewLine+NewLine
+MemoGroupInfo;
end;


function NextButtonClick(CurPage: Integer): Boolean;
begin
Result := ScriptDlgPages(CurPage, False);
end;

function BackButtonClick(CurPage: Integer): Boolean;
begin
Result := ScriptDlgPages(CurPage, True);
end;


S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

Archiv konfery

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.8.2003 16:18:37

From: "Milan" <minkob(zv)stonline.sk>
> Ako sa dostanem do archivu konferencie?

http://delphi(tec)cz/konf.asp
http://delphi(tec)cz/konfview/

Petr Vones

Archiv konfery

[*] Milan <minkob(zv)stonline.sk> - 16.8.2003 16:08:37

Caute.
Ako sa dostanem do archivu konferencie?

Milan


podmineny zapis do registru v InnoSetup

[*] Cizek Milan <cizek.milan(zv)seznam(tec)cz> - 16.8.2003 14:00:29

> Cizek Milan <cizek.milan(zv)seznam(tec)cz> wrote:
> > muzete mi nekdo poradit jak v innosetup docilim toho, aby se mi
> > zapsaly udaje do registru pouze v pripade, ze zvolim
> nejakou konkretni
> > komponentu?
>

> na konec radky v sekci [Registry] dopln: "Components: docs"

Ahoj,
to je jedna cast problemu, druha je v tom, ze mezi defaultni stranky
vkladam svou vlastni, na ktere se zadava adresa DB serveru. Potrebuji
aby se tato stranka zobrazila pouze v pripade instalace ODBC, prolezl
jsem snad uz cely help, ale reseni nenasel. Jedna se o to, jak v kodu
zjistit instalovane komponenty, ktere uzivatel zaskrtne na predchozi
zalozce. Lze to vubec?? Diky za pripadnou pomoc.


function ScriptDlgPages(CurPage: Integer; BackClicked: Boolean):
Boolean;
var Next,NextOk: Boolean; CurSubPage: integer;
begin
if (not BackClicked and (CurPage = wpSelectComponents)) or
(BackClicked and (CurPage = wpReady)) then
begin
{ First find out on which page we should start }
if not BackClicked then
CurSubPage := 0
else
CurSubPage := 2;

ScriptDlgPageOpen();
ScriptDlgPageSetCaption('Uprava udaju');

while (CurSubPage >= 0) and (CurSubPage <= 0) and not Terminated
do
begin
ScriptDlgPageSetSubCaption1('Zadejte pozadovane udaje');
ScriptDlgPageSetSubCaption2('Zadejte jmeno MS SQL Serveru. Pro
lokalni server muzete zadat tecku.' +#13#10+ 'Pak kliknete na tlacitko
Dalsi.');

Next := InputQuery('Server:',ServerName);
if Next then
if ServerName = '.' then
ServerName := 'localhost';
NextOk := Length(ServerName) <> 0;
if not NextOk and not Terminated then
MsgBox('Zadejte prosim nazev serveru!', mbError, MB_OK);

if Next then
begin
{ Go to the next page, but only if the user entered correct
information }
if NextOk then CurSubPage := CurSubPage + 1;
end
else CurSubPage := CurSubPage - 1;
end;

{ See NextButtonClick and BackButtonClick: return True if the
click should be allowed }
if not BackClicked then Result := Next
else Result := not Next;
{ Close the wizard page. Do a FullRestore only if the click (see
above) is not allowed }
ScriptDlgPageClose(not Result);
end
else Result := True;
end;


function UpdateReadyMemo(Space, NewLine, MemoUserInfoInfo, MemoDirInfo,
MemoTypeInfo, MemoComponentsInfo, MemoGroupInfo, MemoTasksInfo: String):
String;
begin
Result := MemoDirInfo+NewLine+NewLine+'Database Server:
'+NewLine+Space+ServerName+NewLine+NewLine+MemoTasksInfo+NewLine+NewLine
+MemoGroupInfo;
end;


function NextButtonClick(CurPage: Integer): Boolean;
begin
Result := ScriptDlgPages(CurPage, False);
end;

function BackButtonClick(CurPage: Integer): Boolean;
begin
Result := ScriptDlgPages(CurPage, True);
end;


S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

OLE server

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.8.2003 13:06:25

From: "Petr Nehez" <dpn(zv)atlas(tec)cz>
> mam vlastni editor, ktery ale zakaznik chce vkladat do Wordu. Nevite, kde

Zkousel si z neho udelat ActiveX komponentu ?

Petr Vones

Generovani OID

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.8.2003 13:06:25

From: "Benda Lukas" <bendal(zv)volny(tec)cz>
> Nemate nekdo nejakou funkci na generovani OID? Potrebuju do databaze,
> problem mam ale ten, ze OID musi byt originalni v ramci vsech instalaci

Co treba GUID, viz funkce CreateClassID.

Petr Vones

Generovani OID

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 11:30:19

Nemate nekdo nejakou funkci na generovani OID? Potrebuju do databaze,
problem mam ale ten, ze OID musi byt originalni v ramci vsech instalaci
databazi (asi 2000 jednotlivych instalaci databaze). Nejvhodnejsi by
bylo generovat jej z cisla procesoru, nebo sitove karty, ale bohuzel
nevim jestli budou cilove stanice natolik vybavene, ale v kazdem pripade
budu rad i za funkci generujici OID z procesoru, nebo sitove karty.

Dekuji
Lukas "benzin" Benda


DBExpress a editovanie zaznamov v DB

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 01:31:37

No na oracl nemam, ale problem by se mohl dat opravit obejitim. Protoze
ClientDataSet ma "Deltu" provadet update rucne. Myslim, ze by to nemelo
byt nic moc sloziteho, protoze jestli to dobre chapu, tak Provider tu
slouzi pouze pro komunikaci se zdrojoviym DataSetem.

P.S.: Nevite nekdo jak co udela odpojeni Providera od ClientDataSetu,
kdyz uz je ClientDataSet aktivni?

p.sestak(zv)corag.sk wrote:

>Pred casom som pisal, ze chcem pomocou DBExpress component
>editovat zaznamy. Ono to zrejme chodi ale mozno nie s kazdym databazovym
>ovladacom.
>Takze po umornom krokovani som dospel k tejto chybe:
>"ORA-00927: Gleichheitszeichen fehlt"
>Ospravedlnujem sa za nemcinu, ale mam nainstalovany nemecky software :o(
>v ORA dokumentacii som nasiel nasledovny vyklad:
>
>ORA-00927: missing equal sign
>Cause: An equal sign has been omitted in one of the following places:
>
>in the SET clause of an UPDATE statement
>following "!" in a search condition to signify not equal
>Action: Correct the syntax. Insert the equal sign where required and retry
>the statement.
>
>Lenze tento dotaz som neskladal ja ale nejaka komponenta (pravdepodobne
>DataSetProvider),
>pretoze to bezi skryte pred uzivatelom DBExpress komponenty. Z toho
>usudzujem ze by tam mohla byt programatorska chyba,
>niekde vo VCL, ale to je len moj dohad.
>Ak sa niekto z citajucich stretol s podobnym problemom (ORACLE + DBExpress
>a update) tak mi plz piste.
>s pozdravom
>
>Pavol Sestak.
>

Master detail s CliendDataSet

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 01:25:36

Dobry den,

mam probmle (jinak bych nezadal o radu), kdyz nastavim v ClientDataSet
master-detail (nastavim MasterDataSource i spojeni) tak pri otevreni
toho ClientDataSetu mi program havaruje s errorem "Culdn't find object"
nevim co to znamena a proc tato chyba nastava.

Lukas "benzin" Benda
P.S.: Ani v jedne tabulce nemam nastavene indexy. Master je typu TQuery
a detail je ClientDataSet.

dbExpress: TSQLQuery s parametrom typu ftDateTime

[*] Benda Lukas <bendal(zv)volny(tec)cz> - 16.8.2003 01:21:36

JJ presne tak. Kdyz u FireBirda volate rucne CREATE TABLE tak polozky
nejsou typu DATE ale typu TIMESTAMP.

Marek Eichler wrote:

>Zdravim,
>
>econka(zv)softip.sk wrote:
>
>
>>Dobry den,
>>pokusam sa migrovat BDE aplikaciu na dbExpress.
>>Ak do SQLQuery vlozim SQL Select s parametrom typu DateTime, pri
>>pokuse o otvorenie datasetu (prepnutie Active v dizajne alebo
>>Query.Open za behu programu) vypise chybu:
>>
>>"dbExpress Error: Invalid field type."
>>
>>
>Vzhledem k tomu, ze nepises o jakou se jedna DB tak je slozitejsi poradit.
>Pokud se jedna o FireBird tak tato chyba muze souviset s nastavnym dialektem
>SQL serveru. Pro praci s DateTime je potreba mit nastaven Dialect na hodnotu
>3
>
>S pozdravem Marek Eichle
>
>

Konverze dlouhych wavu

[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 15.8.2003 22:41:26

A co prikompilovat Lame ke tvemu programu a pak si ho spustit z radku?
Lame ti udela z wav mp3 vklidu.

Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: www.cincura.net


Atributy souboru na unixu

[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 15.8.2003 22:39:26

A co ty soubory Locknout? A pokud to nemuzes delat, tak co si udelat
"zamkovy adresar/soubor"? To by nepomohlo?

Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: www.cincura.net


VPN spojeni na 64kbps ?

[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 15.8.2003 19:53:15

> Nemate nekdo prakticke zkusenosti s propojenim
> siti pres VPN? Bude mi na rozumnou praci s daty
> stacit 64kbps?

Existuju programy na spomalenie linky, ale na hruby odhat ti staci aj
spustit na klientovi W9x SYSMON (na NW2k PERFMON), zapnut v nom
sledovanie preneseneho objemu out aj in, spustit aplikaciu, z grafu
odhadnut objem a prepocitat, za ako dlho sa ten objem pretlaci po
64kbit drate pri jednotlivych akciach programu.

bye
vmlich

Hledani v tabulce - LOCATE ?

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 15.8.2003 15:26:59

LUKES Vaclav <lukes(zv)ans(tec)cz> wrote:
> To je to, co bych chtel...
> Kde bych nasel ono QBE ?
> V.

Hledej na netu, QBE je pouze obecny nazev technologie
pro uzivatelske zadani omezovacich podminek, ale protoze
se v Delphi malo pouziva, myslim ze nic nenajdes.

Martin Schayna


ISTool a "moje" stranka

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 15.8.2003 15:22:54

Dikes moooooooooooooooooooccccccccccccc..............:)))

Vlasta

----- Original Message -----
From: "Dalibor" <dalibor(zv)torola(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 15, 2003 2:56 PM
Subject: Re: ISTool a "moje" stranka


> Musis mit nainstalovany My Inno Setup Extension 3.
> Jenom INNO to neumi
>
> ----- Original Message -----
> From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Friday, August 15, 2003 2:22 PM
> Subject: ISTool a "moje" stranka
>
>
> > Zdravim delphisti!!!
> > Prosil bych o radu:
> > Stahnul jsem si InnoSetup 3 a ISTool a zacinam s tim pracovat.
> > Nemuzu ale prijit na to, jak pridam novou stanku, na ktery budou moje
> > popisky a edity, kam zada uzivatel parametry pro dalsi pokracovani
> > instalace... Parametry se pak zapisi do registru (to uz jsem
nasel...:)))
> a
> > jsou pouzivany naintalovanym programem...
> >
> > Muzete mi poradi kuda na to...?
> >
> > Diky moc
> > Vlasta
> >
> > D5 Ent, WNT
> >
> >
> >
> >
>
>
>

ISTool a "moje" stranka

[*] Dalibor <dalibor(zv)torola(tec)cz> - 15.8.2003 14:56:52

Musis mit nainstalovany My Inno Setup Extension 3.
Jenom INNO to neumi

----- Original Message -----
From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, August 15, 2003 2:22 PM
Subject: ISTool a "moje" stranka


> Zdravim delphisti!!!
> Prosil bych o radu:
> Stahnul jsem si InnoSetup 3 a ISTool a zacinam s tim pracovat.
> Nemuzu ale prijit na to, jak pridam novou stanku, na ktery budou moje
> popisky a edity, kam zada uzivatel parametry pro dalsi pokracovani
> instalace... Parametry se pak zapisi do registru (to uz jsem nasel...:)))
a
> jsou pouzivany naintalovanym programem...
>
> Muzete mi poradi kuda na to...?
>
> Diky moc
> Vlasta
>
> D5 Ent, WNT
>
>
>

dbExpress: TSQLQuery s parametrom typu ftDateTime

[*] Marek Eichler <marek.eichler(zv)seznam(tec)cz> - 15.8.2003 14:36:51

Zdravim,

econka(zv)softip.sk wrote:
> Dobry den,
> pokusam sa migrovat BDE aplikaciu na dbExpress.
> Ak do SQLQuery vlozim SQL Select s parametrom typu DateTime, pri
> pokuse o otvorenie datasetu (prepnutie Active v dizajne alebo
> Query.Open za behu programu) vypise chybu:
>
> "dbExpress Error: Invalid field type."
Vzhledem k tomu, ze nepises o jakou se jedna DB tak je slozitejsi poradit.
Pokud se jedna o FireBird tak tato chyba muze souviset s nastavnym dialektem
SQL serveru. Pro praci s DateTime je potreba mit nastaven Dialect na hodnotu
3

S pozdravem Marek Eichler

OLE server

[*] Petr Nehez <dpn(zv)atlas(tec)cz> - 15.8.2003 14:24:50

Zdravim,
mam vlastni editor, ktery ale zakaznik chce vkladat do Wordu. Nevite, kde
bych o tehle problematice neco nasel, uz jsem toho prosel furu, ale zatim
nic kloudnyho, co by aspon castecne ukazovalo vizualni zpracovani.

Petr


ISTool a "moje" stranka

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 15.8.2003 14:22:49

Zdravim delphisti!!!
Prosil bych o radu:
Stahnul jsem si InnoSetup 3 a ISTool a zacinam s tim pracovat.
Nemuzu ale prijit na to, jak pridam novou stanku, na ktery budou moje
popisky a edity, kam zada uzivatel parametry pro dalsi pokracovani
instalace... Parametry se pak zapisi do registru (to uz jsem nasel...:))) a
jsou pouzivany naintalovanym programem...

Muzete mi poradi kuda na to...?

Diky moc
Vlasta

D5 Ent, WNT

dbExpress: TSQLQuery s parametrom typu ftDateTime

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 15.8.2003 14:14:45

> Ak do SQLQuery vlozim SQL Select s parametrom typu DateTime, pri pokuse o
> "dbExpress Error: Invalid field type."

Mohlo by to souvisel s nastavenim SQL dialectu v property Params komponenty SQLConnection.

dbExpress: TSQLQuery s parametrom typu ftDateTime

[*] econka(zv)softip.sk - 15.8.2003 14:04:44

Dobry den,
pokusam sa migrovat BDE aplikaciu na dbExpress.
Ak do SQLQuery vlozim SQL Select s parametrom typu DateTime, pri pokuse o
otvorenie datasetu (prepnutie Active v dizajne alebo Query.Open za behu
programu) vypise chybu:

"dbExpress Error: Invalid field type."

Ten isty Select v TQuery (BDE) otvori bez problemov.

Prostredie:
Windows XP Professional EN (SP 1), v Regional Options nastavenie "Slovak"
(skusal som aj "English (US)" - nepomohlo)
Delphi 7.0 Enterprise (Build 4.453)

Pomoze niekto iny ako Borland?


S pozdravom

Erich Conka


VPN spojeni na 64kbps ?

[*] Robert <rpvp(zv)vagnerplast(tec)cz> - 15.8.2003 13:36:42

Takze pokud je to na stare xBase bez SQL je to na nic?
Jde o jednu starou aplikaci v Clipperu 5.
A co udelat programek .CGI, ktery by pracoval na serveru
a provadel prikazy od PC na pobocce (pridej, oprav, zrus zaznam atp.)?

R. Plzak


>Spis jde o zpusob, jakym IS zachazi s daty. Pokud je pouzit SQL
server
>a IS pocita a je optimalizovan pro chod pomoci VPN, nemel by byt
>problem.

>--
>Jan Fiala
>mailto:jan.fiala(zv)wo(tec)cz

VPN spojeni na 64kbps ?

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 15.8.2003 13:22:41

15.8.2003 Robert:
> Zdravim a preji pekny den,

> Nemate nekdo prakticke zkusenosti s propojenim
> siti pres VPN? Bude mi na rozumnou praci s daty
> stacit 64kbps. Chci se pripojovat ze stanice
> na pobocce k firemnimu serveru s Netware6.
> Resim externi pobocku s vlastnim skladem, ktera
> by mela mit data na serveru v centrale, kde
> jsou pouzivana firemnim IS.

Spis jde o zpusob, jakym IS zachazi s daty. Pokud je pouzit SQL server
a IS pocita a je optimalizovan pro chod pomoci VPN, nemel by byt
problem.

--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

VPN spojeni na 64kbps ?

[*] Robert <rpvp(zv)vagnerplast(tec)cz> - 15.8.2003 13:12:38

Zdravim a preji pekny den,

Nemate nekdo prakticke zkusenosti s propojenim
siti pres VPN? Bude mi na rozumnou praci s daty
stacit 64kbps. Chci se pripojovat ze stanice
na pobocce k firemnimu serveru s Netware6.
Resim externi pobocku s vlastnim skladem, ktera
by mela mit data na serveru v centrale, kde
jsou pouzivana firemnim IS.

Dik za kazdou radu

pekny vikend...

Robert Plzak

Lan apripojeni klienta

[*] KinDRik <kindrik(zv)centrum(tec)cz> - 15.8.2003 13:02:37

Zdravim
pujdu hned k veci .Lze nejakym spusobem detekovat jestli se nekdo
pripojil k memu pc pomoci LAN {mysleno napr. ke sdilenym souborum
apod}
Predm diky za cokoliv
Jiri Betunak
Delphi5 WinXP SP ALL


Atributy souboru na unixu

[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 14.8.2003 18:57:06

Na jakem UNIXu to bezi?

Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: www.cincura.net

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of martin.ben(zv)ge.com
Sent: Thursday, August 14, 2003 2:17 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Atributy souboru na unixu


Potrebuji poradit s nasledujicim problemem:
Databaze Oracle bezici na unixovem serveru vytvari soubory, ktere
prenasim na jiny server (Windows NT/2K). Do slozky, ve ktere se soubory
vytvareji, mam pristup pres Sambu. Pro prenos souboru jsem udelal
aplikaci, ktera v pravidelnych intervalech vytvorene soubory prenese.
Potykam se vsak s timto
problemem:
Vytvoreni souboru muze trvat i nekolik desitek minut (zalezi na objemu
dat). Nekolikrat se mi stalo, ze jsem soubor prenesl, i kdyz jeste nebyl
dokoncen. Zatim se mi nepodarilo najit spolehlivy zpusob jak zjistit, ze
je soubor otevren jinou aplikaci (v tomto pripade Oraclem).


Martin Ben

Hledani v tabulce - LOCATE ?

[*] Schwarz Ivan Ing. <schwarz(zv)tiba(tec)cz> - 14.8.2003 17:47:01

> Ty chces cosi co uz se dlouho "nenosi" a to je QBE (Query By Example).
> Musim rict ze pro BFU (Bezny Franta Uzivatel :-)) je to docela prijemne
> ovladani, ale zkratka uz neni v mode. Zkus hledat na netu napriklad
> podle "QBE", kdysi jsem videl nejake komponenty ktere to umoznovaly,
> ale uz nevim kde a obavam se ze to byly stejne pouze VBX pro 16-bit VB.
>
> Martin Schayna
>
Co se teda ted nosi ? Znam Query By Example z INFORMIX 4GL a je to opravdu
mocny nastroj.
Vlastne tvori podminku pro select a temer bez programovani.

Ahoj Ivan


Hledani v tabulce - LOCATE ?

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 14.8.2003 17:06:58

LUKES Vaclav <lukes(zv)ans(tec)cz> wrote:
> Ted ale chci hledat v tabulce (asi Locate) a pouzit pri tom ony
> DBEdity. Tak ze kliknu na tlacitko treba FIND a chtel bych, aby se
> vycistily DBEditA a DBEditB a skocit (asi SetFocus) na DBEdit1. Zde
> napsat hledanou hiodnotu, skocit na DBEditB a i sem napsat nejakou
> hledanou hodnotu. Potom bych chtel kliknout na tlacitko START FIND a
> provest hledani v tabulce. A samozrejme skocit na patricny zaznam,
> pokud se najde.

Ty chces cosi co uz se dlouho "nenosi" a to je QBE (Query By Example).
Musim rict ze pro BFU (Bezny Franta Uzivatel :-)) je to docela prijemne
ovladani, ale zkratka uz neni v mode. Zkus hledat na netu napriklad
podle "QBE", kdysi jsem videl nejake komponenty ktere to umoznovaly,
ale uz nevim kde a obavam se ze to byly stejne pouze VBX pro 16-bit VB.

Martin Schayna


Hledani v tabulce - LOCATE ?

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 14.8.2003 17:16:59

ahoj,

tak jak to popisuje by to mohlo fungovat.
akorat je potreba abys mel zakazanej autoedit
dataset(sourcu), protoze jinak misto zadavani
hledanych hodnot budes editovat zaznam.
asi bude jednodussi umistit na pozici tech
DBEditu obycejne Edity a podle potreby je
skryvat ci ukazovat navrchu. opticky to
bude totez, ale vyhnes se potizim.

peca

Zasady psani programu

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 14.8.2003 16:46:57


----- Original Message -----
From: "Vaclav Riha - Soft Consult" <vaclav_riha(zv)softconsult(tec)cz>
>
> vysledky dostavi pouhym formalnim preinstalovanim, smazou adresar Windows
a
> jedou (data tam prece zustaly)

No ale pak prijdou (W9x) o soubory na plose :)

> MS ve ME, W2K a WXP udelal novou strukturu dat. Adresar pro data typu
> "ucto" by byl C:\D...and S...\All Users\Data Aplikaci. Pozor ale, tento
> adresar je skryty!!! a vychozi nastaveni systemu je NEZOBRAZOVAT skryte
> slozky a soubory.

Omyl All Users je pro skupinu Users jen pro cteni....> To plati i o uzivatelskych datech Data Aplikaci a Local Setting\Data
> aplikaci. Co je platne, kdyz do manualu napisete umisteni dat ve WXP, kdyz
> je prumerny uzivatel nenajde??? Tak ze do korene??? Je to univerzalni, bez
> zabran ze strany systemu a jeste na ocich uzivateli. Je to prasecina, ale
> vysledky jsou nejlepsi. A uzivatelum jde o vysledky. Co vy na to,

Ale ja nema nic proti tomu, aby program pri instalaci nabidl volby
"Data ukladat do adresare : " C:\TvujProgram\Data"
"Nastaveni ukladat do adresare : " C:\TvujProgram\Settings"
Pripadne muze nabizet v NT %userprofile%\Data Aplikaci atd..
JENOM PROBOHA NENABIZET Program Files a WINNT !!!
a alespon dat moznost volby.
Co se tyce registru, tak programator s Tvoji filozofii musi zakonite na
registry stejne zapomenout

> prevychovavat nebo byt bez problemu?? A to sem nemicham jeste sdileni v
> siti!!!

Nevidim jeden jediny duvod proc by to znamenalo prevychovu, pouze pak bude
programek pouzitelny i ve velkych sitich, kde je nutna dusledna bezpecnostni
politika. Pet nebo deset useru obcas malou sit nejak zaviruje, odstrani se
to a jede se dal, ale ve vetsi siti ta moznost geometricky stoupa s poctem
uzivatelu a pri poctu nekolik desitek useru by bez bezpecnostni politiky asi
byl "lov na vira" kazdodennim ci spise kazdonocnim chlebem spravce.

Ludek


Zasady psani programu

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.8.2003 15:40:52

14.8.2003 Vaclav Riha - Soft Consult:
> To plati i o uzivatelskych datech Data Aplikaci a Local Setting\Data
> aplikaci. Co je platne, kdyz do manualu napisete umisteni dat ve WXP, kdyz
> je prumerny uzivatel nenajde??? Tak ze do korene??? Je to univerzalni, bez
> zabran ze strany systemu a jeste na ocich uzivateli. Je to prasecina, ale
> vysledky jsou nejlepsi. A uzivatelum jde o vysledky. Co vy na to,
> prevychovavat nebo byt bez problemu??

Program, ktery by mi sam od sebe nacpal data do nejakeho adresare v
Rootu by se mi moc nelibil. Pokud bych nemel pri instalaci volbu
umisteni dat...
Tady byla spis rec o konfiguracnich souborech ne o nejake databazove
sdilene aplikaci.

> A to sem nemicham jeste sdileni v siti!!!

V tomto pripade musi byt data v nejakem nasdilenem sitovem adresari. A
to uz je mimo schopnosti BFU

--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

Hledani v tabulce - LOCATE ?

[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 14.8.2003 15:48:52

Mam obavy, ze to nepujde. Jednodusse. musel by jsi odpojit ty
DBedity od datasourcu, nebo si napsat vlastni komponentu.
Pokud to potrebujes aby se to takto chovalo, tak ty dbedity schovej a
dej si prez ne normalne edity. Dal uz je to jasny.

> Ahoj,
>
> muzete mi prosim poradit ? Mam D6 a Win2000.
> Na formulari FORM mam DBGrid ktery je svazan s tabulkou, ktera ma
> sloupce A a B a DBEditA a DBEditB. Oba DBEdity jsou svazany s
> DataSource. Fajn. Pokud se pohybuju po DBGridu, meni se i obsah v
> DBEditech.
>
> Ted ale chci hledat v tabulce (asi Locate) a pouzit pri tom ony
> DBEdity. Tak ze kliknu na tlacitko treba FIND a chtel bych, aby se
> vycistily DBEditA a DBEditB a skocit (asi SetFocus) na DBEdit1. Zde
> napsat hledanou hiodnotu, skocit na DBEditB a i sem napsat nejakou
> hledanou hodnotu. Potom bych chtel kliknout na tlacitko START FIND a
> provest hledani v tabulce. A samozrejme skocit na patricny zaznam,
> pokud se najde.
>
> Cast jsem udelal, ale cast mi nejde vyresit.
>
> Dekuji
>
> V. S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

TlistView a OwnerDraw

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 14.8.2003 15:44:52

Ahoj vespolek, mam SendLV: TListView se stylem vsReport a potrebuji vybarvit
chlivek s Caption jednou barvou a ostatni chlivky se SubItems jinou barvou.
OwnerDraw mam nastaveno na true a mam napsano toto:

procedure TConnectLogWnd.SendLVCustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var Rect: TRect;
begin
DefaultDraw:= false;
Sender.Canvas.Brush.Color:= $00FFF5D5;
Rect:= Item.DisplayRect(drLabel);
Sender.Canvas.FillRect(Rect);
Sender.Canvas.TextOut(Rect.Left, Rect.Top, Item.Caption);
end;
Funguje to podle ocekavani.


nasledujici kod je opsan z 1001 T&T:

procedure TConnectLogWnd.SendLVCustomDrawSubItem(Sender: TCustomListView;
Item: TListItem; SubItem: Integer; State: TCustomDrawState;
var DefaultDraw: Boolean);
var Rect: TRect;
begin
if SubItem = 0 then exit;
DefaultDraw:= false;
if ListView_GetSubItemRect(sender.Handle, Item.Index, SubItem, 0, (zv)Rect)
then
begin
Sender.Canvas.Brush.Color:= $00FAA5D5;
Sender.Canvas.FillRect(Rect);
Sender.Canvas.TextOut(Rect.Left, Rect.Top, Item.SubItems[SubItem - 1]);
end;
end;

Problem je v tom, ze do te druhe procedury to VUBEC NEVLEZE (data tam
samozrejme vkladam, takze je co kreslit) a ja nechapu z jakeho duvodu.
Nevite nekdo, co mam spatne?

Diky

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant

D&COMM s.r.o.
Korunovacni 6
Praha 7
tel. +420724007234

Hledani v tabulce - LOCATE ?

[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 14.8.2003 15:30:51

Ahoj,

muzete mi prosim poradit ? Mam D6 a Win2000.
Na formulari FORM mam DBGrid ktery je svazan s tabulkou, ktera ma sloupce A a B a DBEditA a DBEditB. Oba DBEdity jsou svazany s DataSource. Fajn. Pokud se pohybuju po DBGridu, meni se i obsah v DBEditech.

Ted ale chci hledat v tabulce (asi Locate) a pouzit pri tom ony DBEdity. Tak ze kliknu na tlacitko treba FIND a chtel bych, aby se vycistily DBEditA a DBEditB a skocit (asi SetFocus) na DBEdit1. Zde napsat hledanou hiodnotu, skocit na DBEditB a i sem napsat nejakou hledanou hodnotu.
Potom bych chtel kliknout na tlacitko START FIND a provest hledani v tabulce. A samozrejme skocit na patricny zaznam, pokud se najde.

Cast jsem udelal, ale cast mi nejde vyresit.

Dekuji

V.

Zasady psani programu

[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 14.8.2003 15:26:50

Nevyhody umisteni Windows\DataAplikaci pripadne Windows\Application Data a
nekdy to vse riznute profily.

V tomto obdobi minuleho stoleti, vetsina aplikaci sve data umistovala:
- v podadresari spolecne s programem, nejcasteji v Program Files\XXX\Data
(pozustatek z DOSovskych uloh, s pridanim Program Files)
- to same, ale v koreni C:\XXX\Data, (DOS jak vysity)

Data v adresari Windows by vetsina uzivatelu necekali, a s tim souvisi dve
veci:
- zalohovani, DOSovske programy vetsinou resily zalohovani samostatne, a
data si davaly do sveho adresare. To ocekaval uzivatel u novych
Windowsowskych aplikaci, ktere jiz nektere (logicky) zalohovani nenabizeji.
Uzivatel zvykly z DOSu, na data v adresari aplikace zalohuje napr. pomoci
MS Backup adresare s programem. (Ale data tam nebudou). MS behem sveho
vyvoje nekolikrat zmenil pojmenovani a umisteni adresaru pro spolecna a
uzivatelska data. V tomto hokeji neslo uzivatele naucit, pravidla pro
ukladani dat. Potom se vyvojarum nedivim ze si netroufli zhora uvedene
adresare pouzivat.

- druhy duvod je jeste horsi. Nekteri uzivatele resi problemy s PC (a nekdy
i jakekoliv jine) pravidelnym preinstalovani Windows. Nikdy jsem to
nepochopil, ale je jich kupodivu dost. Tak jako vy se kazdy (druhy) tyden
mejete, oni preinstalovavaji OS. A protoze casem zjistili, ze ne vzdy se
vysledky dostavi pouhym formalnim preinstalovanim, smazou adresar Windows a
jedou (data tam prece zustaly)


MS ve ME, W2K a WXP udelal novou strukturu dat. Adresar pro data typu
"ucto" by byl C:\D...and S...\All Users\Data Aplikaci. Pozor ale, tento
adresar je skryty!!! a vychozi nastaveni systemu je NEZOBRAZOVAT skryte
slozky a soubory.

To plati i o uzivatelskych datech Data Aplikaci a Local Setting\Data
aplikaci. Co je platne, kdyz do manualu napisete umisteni dat ve WXP, kdyz
je prumerny uzivatel nenajde??? Tak ze do korene??? Je to univerzalni, bez
zabran ze strany systemu a jeste na ocich uzivateli. Je to prasecina, ale
vysledky jsou nejlepsi. A uzivatelum jde o vysledky. Co vy na to,
prevychovavat nebo byt bez problemu?? A to sem nemicham jeste sdileni v
siti!!!

S pozdravem Vaclav Riha

> Je fakt, ze do %userprofile%\Data aplikaci\ maloktery program zapisuje;
> mozna je to z duvodu kompatibility s Win98 ...

>Ahoj.
>No a co tomu vadi ?
>I ve Win98 existuji profily jen jsou jinde, ale tam zase ty kritizovane
>techniky nevadi

>Ludek


Atributy souboru na unixu

[*] martin.ben(zv)ge(tec)com - 14.8.2003 15:16:50

Potrebuji poradit s nasledujicim problemem:
Databaze Oracle bezici na unixovem serveru vytvari soubory, ktere prenasim
na jiny server (Windows NT/2K). Do slozky, ve ktere se soubory vytvareji,
mam pristup pres Sambu. Pro prenos souboru jsem udelal aplikaci, ktera v
pravidelnych intervalech vytvorene soubory prenese. Potykam se vsak s timto
problemem:
Vytvoreni souboru muze trvat i nekolik desitek minut (zalezi na objemu dat).
Nekolikrat se mi stalo, ze jsem soubor prenesl, i kdyz jeste nebyl dokoncen.
Zatim se mi nepodarilo najit spolehlivy zpusob jak zjistit, ze je soubor
otevren jinou aplikaci (v tomto pripade Oraclem).


Martin Ben

Sluzba, registry, prihlaseny uzivatel - jak to dat

[*] little_bobes(zv)centrum(tec)cz - 14.8.2003 14:30:46

> > Veskere prace s registrem se provadi pouze v te sluzbe a to jenom cteni.
> > {
> > Pro zapis udaju do registru jsem si udelal jednoduchy obsluzny
programek,
> > protoze nevim, jak udelat obsluhu primo ze sluzby.
> > Umim udelat, aby se mi obycejny program zobrail jako ikonka v tray
liste,
> > ktera po kliknuti zobrazi formular s parametry.
> > U sluzby nevim, jak na to.
> > {}
> > A jelikoz tato sluzba pobezi na serveru, predpokladam, ze zadny uzivatel
by
> > nemusel byt prihlaseny.
> > Na klientovi nastavuji akorat, kam se ma pripojit a na jakem portu -
toho
> > zadne registry s timto souvisejici nezajimaji.
>
> Dobre. Takze se da predpokladat, ze clovek, ktery to bude obsluhovat,
> bude admin nebo nekdo podobny, protoze jiny by asi pristup k serveru
> mit nemel.
> Pak opravdu nechapu, proc resis problem se zapisem do HKCU a
> nezapisujes to do HKLM
>

A vis, ze ja to take nechapu? :o)
Ted jsi me tedy dostal ...

Ja spise resil (ted uz je mi to tedy jedno), proc se jednou otevre to a hned
podruhe neco jineho.
Ale ted uz je to vlastne jedno.

Diky Bob


Sluzba, registry, prihlaseny uzivatel - jak to dat

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.8.2003 14:02:34

14.8.2003 little_bobes(zv)centrum(tec)cz:
>> Zeptam se jinak.
>> Bude klientska cast, ktera sluzbu vyuziva neco zapisovat zpet do
>> registru nebo si jen cte nastaveni ?
>> Pokud jen cte nastaveni, klidme muzes pouzit HKLM a nemusis premyslet,
>> jaky profil se ti nastavi v HKCU
>>

> Veskere prace s registrem se provadi pouze v te sluzbe a to jenom cteni.
> {
> Pro zapis udaju do registru jsem si udelal jednoduchy obsluzny programek,
> protoze nevim, jak udelat obsluhu primo ze sluzby.
> Umim udelat, aby se mi obycejny program zobrail jako ikonka v tray liste,
> ktera po kliknuti zobrazi formular s parametry.
> U sluzby nevim, jak na to.
> {}
> A jelikoz tato sluzba pobezi na serveru, predpokladam, ze zadny uzivatel by
> nemusel byt prihlaseny.
> Na klientovi nastavuji akorat, kam se ma pripojit a na jakem portu - toho
> zadne registry s timto souvisejici nezajimaji.

Dobre. Takze se da predpokladat, ze clovek, ktery to bude obsluhovat,
bude admin nebo nekdo podobny, protoze jiny by asi pristup k serveru
mit nemel.
Pak opravdu nechapu, proc resis problem se zapisem do HKCU a
nezapisujes to do HKLM

--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

Nasilne ukonceni FireBirdu

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 14.8.2003 14:20:40

On 14 Aug 2003 at 11:50, Marek Dostal wrote:

> Zakaznik ma server se SUSE linuxem, kde mi bezi Firebird 1.0.2. Obcas
> pri vypadku proudu pri bource se po restartu pocitace Firebird
> nespusti korektne a kdyz si dam vypsat status napise mi Firebird
> unused. Musim ho pak nastartovat rucne Firebird stop/start. Nevite
> nekdo co s tim, krom toho, ze by si meli poridit k serveru upsku?

Zvaz, jestli nebude UPS levnejsi a bezpecnejsi nez jakekoliv jine
reseni. A v tomto pripade nejde jen o FB, ale cely server se vsim
vsudy.

S pozdravem

Zbysek Hlinka


Sluzba, registry, prihlaseny uzivatel - jak to dat

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.8.2003 13:26:31

14.8.2003 little_bobes(zv)centrum(tec)cz:
> Mam tu pocitac s Win2000, ktery je v siti, tudiz jsem jako uzivatel
> prihlaseny do domeny.
> Prihlaseny jsem jako administrator sveho pocitace.
> Mam zde nainstalovane D4 c/s.
> Udelal jsem si drive popisovanou sluzbu (ve sluzbe bezi TidTCPServer (TCPS)
> a TidTrivialFTPServer (FTPS)).
> Pro zjisteni spravne funkcnosti jsem si ji na tomto svem pocitaci
> nainstaloval (sluzba.exe -install) a v Services spustil.
> Jsem stale prihlaseny pod svym jmenem.
> Nyni jsem si udelal program, ktery se k teto sluzbe pripojuje.
> Nejprve se pomoci TidTCPClient pripoji k TCPS, zjisti si udaje a na jejich
> zaklade se pomoci TidTrivialFTP pripoji s pozadavkem k FTPS.
> Vsechno probiha pod mym prihlasenim, tudiz vychozi klic registru by mel byt
> pokazde HKCU, ale neni.
> V obsluze pozadavku na TCPS se otevre HKU\.DEFAULT, pri nasledne obsluze
> pozadavku na FTPS se otevre HKCU.
> U vlastnosti sluzby je v Services nastaveno pro prihlaseni: Mistni systemovy
> ucet.

Zeptam se jinak.
Bude klientska cast, ktera sluzbu vyuziva neco zapisovat zpet do
registru nebo si jen cte nastaveni ?
Pokud jen cte nastaveni, klidme muzes pouzit HKLM a nemusis premyslet,
jaky profil se ti nastavi v HKCU

--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

DbGrid- hlavicky sloupcu

[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.8.2003 13:26:31

14.8.2003 Ing. Josef Staufcik:
> Mam jednoduchy datovy soubor v Paradoxu, ktery zobrazuji pomoci DbGridu.
> Nazvy sloupcu v tabulce jsou odvozeny od nazvu poli databazoveho
> paradoxoveho souboru a to mi nevyhovuje. Jenze nemohu nikde najit, jak si
> nazvy hlavicek sloupcu DbGridu nadefinovat sam. Prece to tam nekde byt musi.
> Poradi mi prosim nekdo? Dekuji.

Ze jsi nezkousel prave tlacitko na DBGridu a Column editor (prvni
polozka) ? :-)


--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz

Sluzba, registry, prihlaseny uzivatel - jak to dat

[*] little_bobes(zv)centrum(tec)cz - 14.8.2003 13:50:33

> > Mam tu pocitac s Win2000, ktery je v siti, tudiz jsem jako uzivatel
> > prihlaseny do domeny.
> > Prihlaseny jsem jako administrator sveho pocitace.
> > Mam zde nainstalovane D4 c/s.
> > Udelal jsem si drive popisovanou sluzbu (ve sluzbe bezi TidTCPServer
(TCPS)
> > a TidTrivialFTPServer (FTPS)).
> > Pro zjisteni spravne funkcnosti jsem si ji na tomto svem pocitaci
> > nainstaloval (sluzba.exe -install) a v Services spustil.
> > Jsem stale prihlaseny pod svym jmenem.
> > Nyni jsem si udelal program, ktery se k teto sluzbe pripojuje.
> > Nejprve se pomoci TidTCPClient pripoji k TCPS, zjisti si udaje a na
jejich
> > zaklade se pomoci TidTrivialFTP pripoji s pozadavkem k FTPS.
> > Vsechno probiha pod mym prihlasenim, tudiz vychozi klic registru by mel
byt
> > pokazde HKCU, ale neni.
> > V obsluze pozadavku na TCPS se otevre HKU\.DEFAULT, pri nasledne obsluze
> > pozadavku na FTPS se otevre HKCU.
> > U vlastnosti sluzby je v Services nastaveno pro prihlaseni: Mistni
systemovy
> > ucet.
>
> Zeptam se jinak.
> Bude klientska cast, ktera sluzbu vyuziva neco zapisovat zpet do
> registru nebo si jen cte nastaveni ?
> Pokud jen cte nastaveni, klidme muzes pouzit HKLM a nemusis premyslet,
> jaky profil se ti nastavi v HKCU
>

Veskere prace s registrem se provadi pouze v te sluzbe a to jenom cteni.
{
Pro zapis udaju do registru jsem si udelal jednoduchy obsluzny programek,
protoze nevim, jak udelat obsluhu primo ze sluzby.
Umim udelat, aby se mi obycejny program zobrail jako ikonka v tray liste,
ktera po kliknuti zobrazi formular s parametry.
U sluzby nevim, jak na to.
{}
A jelikoz tato sluzba pobezi na serveru, predpokladam, ze zadny uzivatel by
nemusel byt prihlaseny.
Na klientovi nastavuji akorat, kam se ma pripojit a na jakem portu - toho
zadne registry s timto souvisejici nezajimaji.

Bob


DbGrid- hlavicky sloupcu

[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 14.8.2003 13:28:32

Jsou dve moznosti.
1. Grid.Columns[i].Title
2. Field.DisplayLabel

Ta druha je lepsi, protoze pokud to budes zobrazovat ve vice gridech,
delas to na jednom miste.

> Mam jednoduchy datovy soubor v Paradoxu, ktery zobrazuji pomoci
> DbGridu. Nazvy sloupcu v tabulce jsou odvozeny od nazvu poli
> databazoveho paradoxoveho souboru a to mi nevyhovuje. Jenze nemohu
> nikde najit, jak si nazvy hlavicek sloupcu DbGridu nadefinovat sam.
> Prece to tam nekde byt musi. Poradi mi prosim nekdo? Dekuji. S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

Sluzba, registry, prihlaseny uzivatel - jak to dat

[*] little_bobes(zv)centrum(tec)cz - 14.8.2003 13:00:29

> > Sluzba bezi pod systemovym uctem a neni vazana (a ani nechci, aby byla
> > vazana) na prihlaseneho uzivatele.
> > Proto ctu z HKEY_USERS\.DEFAULT (snad je to tak spravne).
>
> > Me ale stale zarazi ta vec, proc jednou ten samy program v jedne funkci
cte
> > jako vychozi HKCU a v jine funkci jako vychozi HKU\.DEFAULT.
>
> Pokud neni prihlasen zadny uzivatel, neni zadnu HKCU a proto
> pouzije HKU\.Default.
> HKU obsahuje sekce pro jednotlive uzivatele. Po prihlaseni se
> prislusna sekce namapuje do HKCU jako aktivni uzivatel.
>

Tohle je jasne a odvoditelne.
Napisu to tedy jinak:

Mam tu pocitac s Win2000, ktery je v siti, tudiz jsem jako uzivatel
prihlaseny do domeny.
Prihlaseny jsem jako administrator sveho pocitace.
Mam zde nainstalovane D4 c/s.
Udelal jsem si drive popisovanou sluzbu (ve sluzbe bezi TidTCPServer (TCPS)
a TidTrivialFTPServer (FTPS)).
Pro zjisteni spravne funkcnosti jsem si ji na tomto svem pocitaci
nainstaloval (sluzba.exe -install) a v Services spustil.
Jsem stale prihlaseny pod svym jmenem.
Nyni jsem si udelal program, ktery se k teto sluzbe pripojuje.
Nejprve se pomoci TidTCPClient pripoji k TCPS, zjisti si udaje a na jejich
zaklade se pomoci TidTrivialFTP pripoji s pozadavkem k FTPS.
Vsechno probiha pod mym prihlasenim, tudiz vychozi klic registru by mel byt
pokazde HKCU, ale neni.
V obsluze pozadavku na TCPS se otevre HKU\.DEFAULT, pri nasledne obsluze
pozadavku na FTPS se otevre HKCU.
U vlastnosti sluzby je v Services nastaveno pro prihlaseni: Mistni systemovy
ucet.

Bob


DbGrid- hlavicky sloupcu

[*] Dalibor <dalibor(zv)torola(tec)cz> - 14.8.2003 13:06:29

Mozna tohle pomuze

DBData.Columns[i].Title.Caption:=

----- Original Message ----- > Mam jednoduchy datovy soubor v Paradoxu,
ktery zobrazuji pomoci DbGridu.
> Nazvy sloupcu v tabulce jsou odvozeny od nazvu poli databazoveho
> paradoxoveho souboru a to mi nevyhovuje. Jenze nemohu nikde najit, jak si
> nazvy hlavicek sloupcu DbGridu nadefinovat sam. Prece to tam nekde byt
musi.
> Poradi mi prosim nekdo? Dekuji.
>
>

DbGrid- hlavicky sloupcu

[*] Ing. Josef Staufcik <j.staufcik(zv)msp.mesit(tec)cz> - 14.8.2003 12:58:29

Mam jednoduchy datovy soubor v Paradoxu, ktery zobrazuji pomoci DbGridu.
Nazvy sloupcu v tabulce jsou odvozeny od nazvu poli databazoveho
paradoxoveho souboru a to mi nevyhovuje. Jenze nemohu nikde najit, jak si
nazvy hlavicek sloupcu DbGridu nadefinovat sam. Prece to tam nekde byt musi.
Poradi mi prosim nekdo? Dekuji.
© Delphi.cz, program netcode.cz, 2008-9.