Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Pristup k DB polozce typu memo
[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 29.5.2000 17:36:01
Caute,
Mam Delphi 5, Informix na UNIXU (pristup pres NATIVE + BDE).
Mam zde vytvorenou jednu tabulku, do ktere uchovam data z ruznych souboru
(do polozky typu memo). Doted jsem pristupoval k hodnote pres AsString a
fungovalo to.
Nyni jsem nacetl nejaky novy soubor (neni nejdelsi) a tento pristup uz
nefunguje.
Kdyz pouziji Text property, tak mi vrati '(MEMO)' misto obsahu. Nevi nekdo
nejaky spravny a vzdy
bezchybny pristup k MEMO polozkam. Jak to resite vy.
Zajimave je ze SQL Explorer vzdy vse zobrazi spravne.
Petr
Hladanie pomocou SELECT
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 29.5.2000 17:49:28
ahoj,
priklad : potrebuju najit v databazi tel. cisla vsech Janu Nov....
s polozkami prijmeni, jmeno, tel, id
SELECT * FROM DB1 WHERE prijmeni LIKE "%Nov%" AND jmeno LIKE "Jan%"
(+ nekde [treba misto tech uvozovek] doplnit apostrofy podle toho jestli to
chces pouzit v delphi nebo ne)
-Kde jsou ty procenta tak tam doplni mozne zbyle znaky (treba %irm% najde
moje jmeno)
M.Jirman
P.S: Uz tu nekolikrat doporucuju precist serial o SQL v Chipech min roku
nebo jinou knihu o zakldech SQL
----- Original Message -----
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>> Zdravim,
>
> moze mi, prosim vas niekto vysvetlit ako mam postupovat pri hladani
retazca
> v databaze pomocou SELECT.
> Ide o hladanie iba v jednom poli, alebo vo vsetkych. Ak mozem poprosit,
taky
> maly bodovy zoznam, ako postupovat.
> Dakujem.
>
> Miso
>
>Odkaz na existujuci sobor(obrazok)
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 29.5.2000 17:50:07
Tohle vsak neresi pripadne chyby pri cteni (pristupova prava a
pod...). Kod na osetreni uz jsem zde uvedel.
Dodo
______________________________________________________________
> Od: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> CC:
> Datum: Mon, 29 May 2000 16:01:45 +0200
> P�edm�t: RE: Odkaz na existujuci sobor(obrazok)
>
> Pomohl by Ti nasledujici kod ?
>
> if FileExists(JMENO_SOUBORU) then
> ...
> else
> ...
>
>
> > ----------
> > Od: kinekus[SMTP:kinekus(zv)nextra.sk]
> >
> >
> > Pri prechadzani databazy program nacitava obrazky, ktore su
ulozene v
> > adresaroch a ich nazov je identicky s obsahom fieldu v
databaze. Vsetko je v
> > poriadku, pokial field odkazuje na subor (obrazok), ktory
existuje. Pri
> > odkaze na subor (obrazok), ktory neexistuje mi spadne
program. Predstavujem
> > si, ze by to islo, keby program testoval korektne otvorenie
subor pri
> > "loadfromfile" alebo keby testoval, ci sa subor nachadza na
disku. Iba
> > neviem ako to urobit.
> >
> >
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
MSSQL - typ sloupce v Delphi
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 29.5.2000 17:56:50
On 29 May 2000, at 14:05, Petr Zika wrote:
> 1. Na MS SQL 7 mam View ve kterem je krome jineho sloupec:
> ...
> LockOnly = CONVERT(int, CASE WHEN (b.Zamc=1) or (b.Pol=1) or THEN 1
> ELSE 0 END),
> ...
> 2. V Delphi si nactu vsechny sloupce a k nim jejich typ:
> ...cyklus...
> F.FFieldName := FDataset.FieldDefs[I].Name
> F.FDataType := FDataset.FieldDefs[I].DataType
> ...
>
> Pokud nacitam sloupec "LockOnly" ve Win95 a Win NT je vse v pohode a v
> DataType je "ftInteger". Pokud to zkusim ve Win98 - DataType je
> "ftAutoInc"
To vypada, ze by mohla byt chyba v knihovne DBLib ve W98
(IMHO). Kazdopadne si myslim, ze i z hlediska budoucnosti je
lepsi upgradovat na vyssi verzi Delphi a prejit napr. na ADO.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Zobrazeni RTF
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 29.5.2000 17:57:12
ahoj,
podle toho kolik to ma (?) to muzes oindexovat a vyhledavat podle
osamocenyho cisla na radku
(takhle mam treba udelan prg na titulky)
a vzdy do Richedit pridat tolik lines nez se dostanes k dalsimu cislu.
M.Jirman
P.S: Jestli si chtel neco jinyho tak sorry
----- Original Message -----
From: Roman �ev��k
Ahoj,
mam nekolik stranek textu a potrebuji zobrazovat jen samostatne odstavce
tohoto textu (jde o nejaky popis instrukci, ktere se maji zobrazovat jen pri
urcitych funkcich okna). Premyslel jsem udelat to v HTML, ale to bych musel
mit na disku asi 100 souboru, nebo do dat do tabulky (to az uplne posledni
varianta), nebo to udelat jako HLP soubor, ale nevim jak to dostat do toho
RichEditu (tohle se mi zda jako nejlepsi varinta). Nevite nekdo jak to
udelat ?
Diky
Roman
QRComposite a Page Orientation
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 29.5.2000 17:59:51
ahoj,
s tim uz se tady nekdo trapil a nevim jak to dopadlo,
tak ti musim asi blbe poradit ale prohledej archiv konference
M.Jirman
----- Original Message -----
From: Pavol Stolc <pstolc(zv)sc.sknet.sk>> Ahoj,
>
> Problem (D3C/S, QR2.0k):
> s nastavenim Page.Orientation u reportov pri pouziti Composite report. V
> tomto pripade tlaci zostavy s nastavenim Page.Orientation = poPortrait aj
> ked u jednotlivych reportov je Page.Orientation = poLandscape.
>
> Otazka:
> Nevie niekto ako prinutit Composite report akceptovat nastavenie z prveho
> reportu v zozname ReportList, resp. ako nastavit tuto vlastnost pre cely
> Composite report?
>
> Dik, Pavol Stolc
> pstolc(zv)sc.sknet.sk
> Tlaciarne HP
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 29.5.2000 18:12:09
ahoj,
me zase padal QuickRep i Sinea kdyz jsem chtel tisknout na NOVE HP LJ1100
a pomohlo stahnout z webu nove ovladace. Z toho poruseni DRV myslim ze jde
o podobny problem.
M. Jirman
----- Original Message -----
From: J�n Grman <janog(zv)pluto.elf.stuba.sk>
> Ahojte.
> U zakaznika sa mi objavil nasledujuci problem:
> Nas program netlaci na tlaciarnach HP DeskJet 930c a HP DeskJet 670, ale
len
> zo systemu W95 (s NTckom to funguje).
> Sprava sa to takto:
> HP DeskJet 930c
> - tlac pripadne nahlad v programe prejde v pohode
> - zobrazi sa tlacova uloha (ikona v tray) a potom to spadne na Obecnom
> poruseni ochrany v subore DRV
> - podotykam ze z WORDU to vraj tlaci v pohode
>
> HP DeskJet 670
> - tlac pripadne nahlad v programe prejde v pohode
> - zobrazi sa tlacova uloha (ikona v tray) a potom sa strati a nic sa
> nevytlaci
> - podotykam znova ze z WORDU to vraj tlaci v pohode
>
> Na inych (zvacsa ihlickovych a starsich) tlaciarnach vsetko funguje bez
> ohladu na OS. Tieto tlaciarne su uplne nove, kupili ich prave pre
pouzivanie
> s nasim programom.
> Na tlac pouzivame vlastne tlacove komponenty. Vsetko je to napisane cisto
s
> pouzitim API funkcii (LineTo(DC, ...), TextOut(DC, ...), a podobne).
>
> Ak ste sa niekto s podobnou "zahadou" stretli, prosim napiste mi v com bol
> problem a ako ste ho vyriesili / nevyriesili.
>
> Za vsetky odpovede vdaka.
>
> Mgr. Jan Grman
> janog(zv)pluto.elf.stuba.sk
>
>OT: Rat.tpu
[*] Daniel Krej�� <fredycrueger(zv)volny(tec)cz> - 29.5.2000 19:50:14
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Toto neni tak uplne OT, protoze se jedna o Pascal a to ma s Delfama taky par veci spolecnych. Jde o to, ze se mymu kamosovi dostala do ruky knihovna Rat.tpu , ale nevi co s tim, tak jesli jste o tom nekdy nekdo slysel a nebude vas to obtezovat, mohli by jste...
Ja se moc v Pascalu nepohybuju (i kdyz Delphi...), tak nevim. Diky.
It's all.Problem s instalaci aplikace a s MSACCESS driverem
[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 29.5.2000 21:29:02
Ahoj,
ten problem jsem kdysi taky resil.
Bud jej lze vyresit tak, ze si nakopirujes IDDA3532.DLL do stejneho adresare
jako mas nyni IDDAO32.DLL a rucne zmenis v registrech IDDAO32.DLL ->
IDDA3532.DLL (zkus si vyhledat IDDAO32.DLL) a nebo si nainstalujes Update na
BDE 5.11 stazitelny z Internetu. BDE Administrator ti pak nabizi Combobox s
obema DLLkama.
Jeste poznamka: Pro pristup k Access 97 databazi je treba IDDA3532.DLL, kdyz
jsem si ale nainstaloval Access2000, tak to naopak s IDDA3532.DLL nefunguje
a je treba IDDAO32.DLL.
S pozdravem, Lada
----- P�vodn� zpr�va -----
Od: P�emysl Neuman <p.neuman(zv)email(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 29. kv�tna 2000 0:02
P�edm�t: Problem s instalaci aplikace a s MSACCESS driverem
> Dobry den.
>
> Potrebuji nainstalovat svoji aplikaci, ktera vyuziva soubor x.mdb
vytvoreny
> v Accessech 97 na jiny pocitac W98. Mam problem, ze to nejde. Pri
spousteni
> to hlasi nejaky chyby IDDAO32.DLL a v BDEAdministratorovi se do toho
sveho
> aliasu take nedostanu (pro zmenu problem s IDDA3532.dll). Je to driver
MSACCESS.
> Potrebuji poradit. Kdyz tam nainstaluju Access a Delphi tak to jede.
Mohli
> byste mi prosim poradit, co mam s tim instalovat (volne siritelneho) aby
> to chodilo ?
> Zkousel jsem nejake DAO35, ktere mi poslal jeden dobrotivy clovek z teto
konference,
> ale nepomaha to. Dekuji za kazdou radu.
>
> S pozdravem,
>
> Premysl Neuman
>MSSQL - typ sloupce v Delphi
[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 29.5.2000 21:35:14
Ahoj
To posledni or by tam byt nemelo, ale predpokladam, ze to je Cut&Paste chyba
pri vytvareni Tveho mailu.
Zkus si stahnout BDE 5.11 upgrade a nainstaluj si SP2 pro MS SQL 7.0, a to i
na klienta !
Mohlo by to pomoct.
S pozdravem, Lada
> > LockOnly = CONVERT(int, CASE WHEN (b.Zamc=1) or (b.Pol=1) or THEN 1
> > ELSE 0 END),
----- P�vodn� zpr�va -----
Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 29. kv�tna 2000 17:56
P�edm�t: Re: MSSQL - typ sloupce v Delphi
> On 29 May 2000, at 14:05, Petr Zika wrote:
>
> > 1. Na MS SQL 7 mam View ve kterem je krome jineho sloupec:
> > ...
> > LockOnly = CONVERT(int, CASE WHEN (b.Zamc=1) or (b.Pol=1) or THEN 1
> > ELSE 0 END),
> > ...
> > 2. V Delphi si nactu vsechny sloupce a k nim jejich typ:
> > ...cyklus...
> > F.FFieldName := FDataset.FieldDefs[I].Name
> > F.FDataType := FDataset.FieldDefs[I].DataType
> > ...
> >
> > Pokud nacitam sloupec "LockOnly" ve Win95 a Win NT je vse v pohode a v
> > DataType je "ftInteger". Pokud to zkusim ve Win98 - DataType je
> > "ftAutoInc"
>
> To vypada, ze by mohla byt chyba v knihovne DBLib ve W98
> (IMHO). Kazdopadne si myslim, ze i z hlediska budoucnosti je
> lepsi upgradovat na vyssi verzi Delphi a prejit napr. na ADO.
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
FTP a Proxy
[*] WEB ATLAS - SUKY <suky(zv)atlas(tec)cz> - 29.5.2000 21:55:34
Mam problem s FTP pripojenim pomoci proxyserveru:
Provedu:
FTP.Connect
Nahraju soubor na server
Provedu neco po HTTP protokolu
Stahnu soubor ze serveru ---- (Hodi to Not Connected)
FTP.Disconnect
Pridal jsem v procedure "Sthahni soubor" kontrolu zda jsem pripojen, pokud ne, pripojit.
Po pripojeni to hodi chybu (421 - QUIT)
Nastavoval jsem FTP na aktivni, pasivni, ale nic. Neni nejake reseni jak domluvit kloudnemu chovani FTP pres ProxyServer?
Pouzivam standardni FTP v D5-Prof.
Michal Soukup
Uvolnovani komponent
[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 29.5.2000 22:10:01
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Petr Vones
> Sent: Sunday, May 28, 2000 10:22 PM
> To: Konference Delphi
> Subject: Re: Uvolnovani komponent
>
>
> From: "Pavel Malinsk�" <spiderland(zv)iol(tec)cz>
> > nevite, prosim, nekdo, v jakem poradi
> > jsou uvolnovany komponenty vlastnene uvolnovanou
> > komponentou. (Fuj to je veta...). Myslel jsem,
> > ze podle seznamu Componens[x]. Pripadne jakym
> > zpusobem poradi uvolneni nastavit.
>
> Ahoj,
>
> Poradi uvolnovani nastavit nepujde (viz metoda
> TComponent.DestroyComponents).
To jsem tusil:(, ale chtel jsem si to overit.
> Spis prozrad k cemu to potrebujes.
Jde o to, ze pri creatu formu vytvorim DataModul,
ktery provadi jakesi monitorovani komponent formulare.
Kazdy formular v aplikaci(neni jich moc) si vytvari svuj.
Pri zavreni formulare zavolam DataModule.Free a v Destroy
DataModulu zapisuju do souboru nejake hodnoty ostatnich
komponent formu. Slo mi jen o to, abych pri vytvareni
DataModulu mohl dat jako Ownera formular a ten se pak
o uvolneni DataModulu postaral sam. Jenze ac je DataModul
jako posledni v seznamu Components, formular nejdriv
uvolni nektere komponenty(zrovna ty, ktere potrebuju),
potom DataModul a potom zbytek vlastnenych komponent.
Potreboval bych, aby se jako prvni udelal Free na
DataModul.(Uf..snad je to trochu srozumitelne).
S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203
>
> Petr Vones, amatersky programator
>
>chybejici knihovna
[*] Daniel Krej�� <fredycrueger(zv)volny(tec)cz> - 29.5.2000 22:22:50
Delphi 3 mi pri ukonceni hlasej chybu: "Unable to load BOWF520.DLL or
VMWF520.DLL Version Manager functions are not available". Na funkcnost to
podle me nema vliv, ale stve me to. Sehnal jsem si je od kamose, ale nevim
kam je nakopirovat. Zkousel jsem do Windows\System a vyhledavaci cesty
nastaveny v Delphach. Porad se mu to nelibi. Pokud jste se s tim nekdo
setkal, tak napiste.Problem s instalaci aplikace a s MSACCESS driverem
[*] Erik Salaj <winsoft(zv)napri.sk> - 29.5.2000 22:31:15
> Potrebuji nainstalovat svoji aplikaci, ktera vyuziva soubor x.mdb
vytvoreny
> v Accessech 97 na jiny pocitac W98. Mam problem, ze to nejde. Pri
spousteni
> to hlasi nejaky chyby IDDAO32.DLL a v BDEAdministratorovi se do toho
sveho
> aliasu take nedostanu (pro zmenu problem s IDDA3532.dll). Je to driver
MSACCESS.
> Potrebuji poradit. Kdyz tam nainstaluju Access a Delphi tak to jede.
Mohli
> byste mi prosim poradit, co mam s tim instalovat (volne siritelneho) aby
> to chodilo ?
> Zkousel jsem nejake DAO35, ktere mi poslal jeden dobrotivy clovek z teto
konference,
> ale nepomaha to. Dekuji za kazdou radu.
Pre pristup k Access-u 97 cez BDE potrebujes este DAO 3.5. DAO 3.5 nie je
volne siritelne.
Erik
TBufStream
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.5.2000 23:11:58
From: "Marek ��ek" <cizek(zv)ica(tec)cz>
> Nenarazili jste, siim, nekdo na neco, co by by
> fungovalo v Delficku jako TBufStream
> (bufferovany stream) v starem dobrem
> TuboVision ?
Ahoj,
Myslim ze neco takoveho neni treba. Win32 jiz toto dela samo. Pro vetsi
soubory je pro cteni idealni pouzit mapovani souboru do pameti.
Petr Vones, amatersky programator
Remote COM
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.5.2000 23:12:11
From: "CERMAK" <CERMAK(zv)procomcr(tec)cz>
> POdle dotazu jsem pochopil, ze pouzivate DCOM pod W98. Nejsem si uplne
> jisty, ale mam pocit, ze diky chybe DCOM pod timto systemem nelze
> (predpokladam, ze objekt je poskytovan exe programem a ne DLL knihovnou)
> vytvorit, jestlize program, ktery objekt poskytuje nebezi. Zkuste server
Ahoj,
Pokud vim, tak toto nepovazuje Microsoft za chybu, ale za vlastnost DCOMu
na Win9x :-)
Petr Vones, amatersky programator
Sdileni disku
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.5.2000 23:12:04
From: <r.tesar(zv)atlas(tec)cz>
> Potreboval bych vedet zda je mozne nastavit sdileni disku
> softwarove z Delphi ?? A jestli jo tak jak ??
Ahoj,
zalezi na tom, jestli to chces pro Win9x nebo NT. Podivej se na LanManager
konverzi na JEDI (http://delphi-jedi.org/Jedi:APILIBRARY), tam mas i demo
aplikaci NetWatch (pouze pro Win9x).
Petr Vones, amatersky programator
BDE a vice uzivatelu na jednom pocitaci
[*] garalda <garalda(zv)mail(tec)cz> - 30.5.2000 07:20:57
Zdravim.
Napsal jsem program ( v D5), ktery pres BDE cte data z Accesovske databaze.
Instaloval jsem jej u jednoho zakaznika (cca 10 pocitacu - W95, W98). Ta
databaze je umistena na serveru a je pro vsechny spolecna. Maji tam
novelovskou sit. Problem je v tom, ze kdyz se ten program a BDE nainstaluje
pod urcitym uzivatelem, tak kdyz se k tomu pocitaci prihlasi jiny uzivatel,
tak mu to nechodi, dokud se to nenainstaluje i pod nim. Predpokladam, ze
problem je v BDE, ktere se instaluje pod tim konkretnim uzivatelm a dalsi
uzivatel uz nema odkazy v registru nebo nekde... Netusite prosim nekdo, jak
to vyresit, abych to nemusel instalovat pro kazdeho znova?
Diky za radu
Garalda
FTP a Proxy
[*] Tomas Burger <slune(zv)yahoo(tec)com> - 29.5.2000 22:43:45 -0700 (pdt)
-- WEB ATLAS - SUKY <suky(zv)atlas(tec)cz> wrote:
> Mam problem s FTP pripojenim pomoci proxyserveru:
To zalezi na tom, co to je za proxy server a jak je nastaveny: nektere proxy
skutecne zprostredkuji klientu ftp protokol, ale nektere (treba ta nase) vyridi
venku ftp pozadavek, ale vrati na browser uz zformatovane html v http
protokolu. Jakykolivftp klient pak samozrejme nema sanci.
Tomas
=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/
__________________________________________________
Do You Yahoo!?
Kick off your party with Yahoo! Invites.
http://invites.yahoo.com/Pristup k DB polozce typu memo
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 30.5.2000 07:44:37
Ahoj,
pripada mi to ako polozka typu blob, tak to skus nasledovne:
var
MemoField: TField;
MS: TMemoryStream;
S: string;
...
MemoField := DataSet.FieldByName('MemoFieldname');
if MemoField.IsBlob then begin
MS := TMemoryStream.Create;
try
TBlobField(MemoField).SaveToStream(MS);
MS.Position := 0;
... urob s datami v MS co chces, napr. ...
// SetLength(S, MS.Size);
// Move(MS.Memory^, PChar(S)^, MS.Size);
finally
MS.Free;
end;
end;
...
Palo.
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Jezek Petr, Ing. <PETR(zv)sevis.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 5:36 PM
Subject: Pristup k DB polozce typu memo
> Caute,
>
> Mam Delphi 5, Informix na UNIXU (pristup pres NATIVE + BDE).
> Mam zde vytvorenou jednu tabulku, do ktere uchovam data z ruznych souboru
> (do polozky typu memo). Doted jsem pristupoval k hodnote pres AsString a
> fungovalo to.
> Nyni jsem nacetl nejaky novy soubor (neni nejdelsi) a tento pristup uz
> nefunguje.
> Kdyz pouziji Text property, tak mi vrati '(MEMO)' misto obsahu. Nevi nekdo
> nejaky spravny a vzdy
> bezchybny pristup k MEMO polozkam. Jak to resite vy.
>
> Zajimave je ze SQL Explorer vzdy vse zobrazi spravne.
>
> Petr
Hladanie pomocou SELECT
[*] Petr Vale� - 30.5.2000 07:46:58
Ahoj,
mas napriklad tabulku "Data" se zaznamy :
A1 A2 A3 A4 A5
------------------------------
1 5 8 10 test
12 13 15 2 petr
9 7 4 1 pavel
Jde o to co chces samozrejme delat, ale pro vyhledani vsech zaznamu :
SELECT * FROM Data
pro vyhledani jenom nekterych
SELECT A1,A3 FROM Data
pokud chces omezit vyber
SELECT A1,A3 FROM Data WHERE (A3=15) AND (A4>1)
pokud chces tridit
SELECT A1,A3 FROM Data WHERE (A3=15) AND (A4>1) ORDER BY A1
nebo tridit obracene
SELECT A1,A3 FROM Data WHERE (A3=15) AND (A4>1) ORDER BY A1 DESC
a samozrejme to lze vsechno kombinovat, nemusis tam mit jenom cisla ... s
retezcem je to obdobne
SELECT A1,A3 FROM Data WHERE (A5='petr') ORDER BY A1
pak uz staci vysledny SQL dotaz polozit ...
Query1->SQL->Add( SQL);
Query1->Open();
...
staci ?
PETR
----- Original Message -----
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>
To: Delphi F�rum <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 4:18 PM
Subject: Hladanie pomocou SELECT
> Zdravim,
>
> moze mi, prosim vas niekto vysvetlit ako mam postupovat pri hladani
retazca
> v databaze pomocou SELECT.
> Ide o hladanie iba v jednom poli, alebo vo vsetkych. Ak mozem poprosit,
taky
> maly bodovy zoznam, ako postupovat.
> Dakujem.
>
> Miso
Odkaz na existujuci sobor(obrazok)
[*] Petr Vale� - 30.5.2000 07:53:25
1. mozna dat kriticke misto do try ... catch,
nevim jak v pascalu, ale bude to obdobne jako v C
try {
Image1->Picture->LoadFromFile( "C:\\img.bmp");
catch (...) {
ShowMessage( "Chyba");
}
2. nebo testovat existenci souboru pomoci pokusu otevreni souboru, mela by
na to existovat funkce FileExists(...)
PETR
----- Original Message -----
From: kinekus <kinekus(zv)nextra.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 1:47 PM
Subject: Odkaz na existujuci sobor(obrazok)> Zdravim vsetkych,
>
> mohol by mi niekto poradit ako obchadzat zrutenie programu v takomto
> pripade.
>
> Pri prechadzani databazy program nacitava obrazky, ktore su ulozene v
> adresaroch a ich nazov je identicky s obsahom fieldu v databaze. Vsetko je
v
> poriadku, pokial field odkazuje na subor (obrazok), ktory existuje. Pri
> odkaze na subor (obrazok), ktory neexistuje mi spadne program.
Predstavujem
> si, ze by to islo, keby program testoval korektne otvorenie subor pri
> "loadfromfile" alebo keby testoval, ci sa subor nachadza na disku. Iba
> neviem ako to urobit.
>
> Dakujem za kazdu pomoc.
> Pozn. Som iba zac.FTP a Proxy
[*] delphi konference <delphi(zv)energotek(tec)cz> - 30.5.2000 07:54:21
Dobry den
S touto FTP komponentou mam uz nejake zkusenosti, tak poslete nejakou adresu na Vas, nejlepe zdrojaky, nebo uryvek zdrojaku, ja to porovnam s tim co mam hotove a co funguje dobre a dam Vam vedet.
Piste na petrbl(zv)energotek(tec)cz at s tim zbytecne neotravujeme ostatni. Predpokladam ze to bude na delsi dobu.
Petr Blau software developer
Hladanie pomocou SELECT
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 30.5.2000 07:56:34
Ahoj,
jednoduchy fulltext search by mohol vypadat takto:
select * from table
where f1+f2+...+fn like '%pattern%'
kde f1..fn su polia v ktorych chces prehladavat vzorku pattern
Palo.
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>
To: Delphi F�rum <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 4:18 PM
Subject: Hladanie pomocou SELECT
> Zdravim,
>
> moze mi, prosim vas niekto vysvetlit ako mam postupovat pri hladani
retazca
> v databaze pomocou SELECT.
> Ide o hladanie iba v jednom poli, alebo vo vsetkych. Ak mozem poprosit,
taky
> maly bodovy zoznam, ako postupovat.
> Dakujem.
>
> Miso
Zobrazeni RTF
[*] Petr Vale� - 30.5.2000 07:58:17
Jestli tomu dobre rozumim tak bych to mozna zkusil takto :
1. Do zdrojoveho souboru si dat bookamarky k jednotlivym kapitolam, napr.
[Kapitola1]
blabla ....
[KonecKapitola1]
[Kapitola2]
atd.
2. Potom pouzit dve komponenty pro zobrazeni RTF souboru a do te jedne pri akci nacist cely dokument a pomoci vyhledavani si najit zacatek a konec potrebne kapitoly, potom ji zkopirovat do schranky a vlozit do toho druheho zobrazeni pomoci Paste();
myslis, ze by to slo ?
PETR
----- Original Message -----
From: Roman �ev��k
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, May 29, 2000 2:02 PM
Subject: Zobrazeni RTF
Ahoj,
mam nekolik stranek textu a potrebuji zobrazovat jen samostatne odstavce tohoto textu (jde o nejaky popis instrukci, ktere se maji zobrazovat jen pri urcitych funkcich okna). Premyslel jsem udelat to v HTML, ale to bych musel mit na disku asi 100 souboru, nebo do dat do tabulky (to az uplne posledni varianta), nebo to udelat jako HLP soubor, ale nevim jak to dostat do toho RichEditu (tohle se mi zda jako nejlepsi varinta). Nevite nekdo jak to udelat ? Diky
Roman
DB_KEY field v IB6
[*] pcb(zv)atlas(tec)cz - 30.5.2000 08:02:37
Haj hou!
On 27 May 2000, at 1:29, Roland Turcan (RoTurSoft) wrote:
> > Jedna se o jedinecnou identifikaci radku v ramci resultsetu.
>
> Dik, ale ako sa k nemu dopracujem, a ci to je cislo zapisane v
tabulke
> alebo ho IB generuje just in time ako jedinecny.
>
> Roland.
No, dostat by jsi se k nemu mel normalne, napr. select RDB$KEY,
... FROM ...
Vzhledem k tomu, ze jeho soucasti je i cislo transakce, tak je
generovano on the fly :o)
Hodne zdaru
Pavel Cisar <pcisar(zv)inprise(tec)cz>
Borland s.r.o.Vyber zaznamu
[*] delfinojd <delfinojd(zv)atlas(tec)cz> - 30.5.2000 08:24:12
To ale musi byt priserne pomale. Nedovedu si predstavit, ze mam v gridu
1000 zaznamu a uzivatel stiskne "oznac vse".
At 13:25 29.5.2000 +0200, you wrote:
>Mam na to napsanou vlastni komponentu, ktera je potomkem DBGrid.
>Pracuje na principu, ze se vytvori nova pomocna tabulka, ktera ma
>jedninecny nazev.
>Tato tbl obsahuje jeden field, ve kterem se ukladaji hodnoty oznacenych vet z
>prvotni tabulky. Timto fieldem je vetsinou field primarniho klice prvotni
>tabulky.
>Tato komponenta je rozsirena o nasledujici dulezite vlastnosti:
> - barva oznacenych vet
> - klicova polozka prvotni tabulky
> - nazev pomocne tabulky
> - vymazat pomocnou tabulku po ukonceni prace
>
> a dulezite metody:
> - procedure ObnovPohled;
> - procedure CreateTblTemp;
> - procedure ActiveTblTemp;
> - procedure DeactiveTblTemp;
> - procedure DeactiveTblTempBezZruseni;
> - procedure OznaceniVsechVet;
> - procedure ZruseniOznaceniVsechVet;
> - procedure OznaceniVetInverzne;
>
> a udalosti:
> - provadi se zmena oznaceni vety s navratovym parametrem povolit/nepovolit
> - provedla se zmena oznaceni vety
>
>oznaceni vet lze provadet jako ve WinCommanderu (ins, + , - ,*, prave
>tlacitko mysi)
>a hromadne zmeny oznaceni lze zakazat
>
>-----P�vodn� zpr�va-----
>Od: Miroslav Evj�k [SMTP:evjak(zv)atlas(tec)cz]
>Odesl�no: 27. kv�tna 2000 12:54
>Komu: delphi-l(zv)fwd(tec)cz
>P�edm�t: Vyber zaznamu
>
>Ahoj,
>
>potrebuji nechat uzivatele individualne oznacit vety v DBGridu (napriklad
>mezernikem) a potom pracovat jenom s oznacenymi zaznamy (filtr, tisk ...).
>
>V nesitove verzi jsem to resil primitivne fieldem typu Boolean, pak to nebyl
>zadny problem. Na siti to ma samozrejme za nasledek, ze si to uzivatele
>navzajem prepisujou.
>
>Takze na to zkousim jit tak, ze si v docasne tabulce udrzuju seznam klicu
>oznacenych vet. Prosim o radu, zda je to jedina cesta nebo jestli je jeste
>nejake elegantnejsi reseni.
>
>Pozadavky a parametry:
>- W98, D4, Paradox
>- oznaceni musi byt mozno provest na zaklade vysledku SQL dotazu
>- s oznacenymi zaznamy musi jit pracovat v SQL dotazech
>
>Dekuji vsem, kteri se podeli o sve zkusenosti.
>
>"Mirecek" Evjak
>mailto:evjak(zv)atlas(tec)cz
>
>---
>Odchoz� zpr�va neobsahuje viry.
>Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
>Verze: 6.0.151 / Virov� b�ze: 72 - datum vyd�n�: 19.05.2000
>TBufStream
[*] Marek ��ek - 30.5.2000 08:53:50
Zdravim,
Dik za info. No, taky jsem si to rikal, ale pak mi
zase vrtalo hlavou, proc se pro ukladani/cteni
komponent pouziva TWriter/TReader, ktery frci
prez buffer, ale neumi cteni/zapis nad jednim
bufferem, MemoryStreamy si zas neumi odswapnout
na disk (teda, nez dojde systemova pamet ;-)).
Zkousel jsem ukladat mnoho "malych" dat do velkych
souboru TWriterem s delkou bufferu 32~64kB (Delphi3)
a maka to evidentne efektivneji, nez zapis do holeho
FileStreamu. ..chjooo, ten pokrok, kdy se to zastavi :)
Preju vsem Delfakum peknej den,
Marek
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
Sent: Monday, May 29, 2000 11:11 PM
Subject: Re: TBufStream
>
> Ahoj,
>
> Myslim ze neco takoveho neni treba. Win32 jiz toto dela samo. Pro vetsi
> soubory je pro cteni idealni pouzit mapovani souboru do pameti.
>
> Petr Vones, amatersky programator
> From: "Marek ��ek" <cizek(zv)ica(tec)cz>
> > Nenarazili jste, siim, nekdo na neco, co by by
> > fungovalo v Delficku jako TBufStream
> > (bufferovany stream) v starem dobrem
> > TuboVision ?
Sql dotaz na UNIX
[*] Mik Radim <mik(zv)oce(tec)cz> - 30.5.2000 09:15:31
Podivej se na TZEOS komponenty. Pak staci:
Var
Vysl : TMySQLResult;
MySQL1: TMySQL;
begin
Vysl := TMySQLResult.Create( MySQL1);
Vysl.query( 'Select s2 from db where a1="start";');
For I := 0 To Vysl.RowCount - 1 Do
ListBox1.Items.Add( Vysl[ I, 0]);
Vysl.Free;
End;
pisu to z hlavy, tak tam muze byt chybicka
---------------------------------------
Radim Mik, SyCo DPS
Oc� �esk� republika, spol. s r.o.
Hanusova 18, 140 21 Praha 4
tel.: +420(2)440 103 60
fax: +420(2)440 103 90
e-mail: mik(zv)oce(tec)cz
ICQ: 32730861
---------------------------------------
> -----Original Message-----
> From: Jiri Vrabec [mailto:vrabec(zv)pal.skm.vutbr(tec)cz]
> Sent: Sunday, May 28, 2000 10:31 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Sql dotaz na UNIX
>
>
>
> Muze mi nekdo poradit jak udelat dotaz z D5(Win2000) do
> databaze na
> linuxu (MySql) ??
>
> ps.: jeden priklad vyda za tisice slov...
>
>
> Dik Jirka
> Hladanie pomocou SELECT
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 30.5.2000 09:17:31
ahoj,
co zkusit toto:
SELECT
*
FROM
Tabulka
WHERE
polozka LIKE "%hledany_text%"
ty procenta tam patri...
jo a hleda to teda jen v poli _polozka_
dekuji
peca
> moze mi, prosim vas niekto vysvetlit ako mam postupovat pri
> hladani retazca
> v databaze pomocou SELECT.
> Ide o hladanie iba v jednom poli, alebo vo vsetkych.users list
[*] Robert Zak <nrsys(zv)psn.sk> - 30.5.2000 09:38:54
Zdravim,
Ako zistim ma MSSQL7 zoznam prave prihlasenych uzivatelov k danej
databaze? Potrebujem aspon ich pocet.
Dakujem
Robo
BDE a vice uzivatelu na jednom pocitaci
[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 30.5.2000 10:04:12
Ano problem je v uzivatelske casti registru s BDE.
Maji-li novelovskou sit mohou k instalaci pouzit SnapShot a k distribuci NAL. Vse je to soucasti standardniho Z.E.N. works dodavaneho s Novellem zdarma.
Dalsi moznost je ta, ze pokud mas konfiguraci BDE (idapi32.cfg) ulozenou na stejnem miste na vsech strojich, vyexportujes si z cerstve nainstalovane masiny vetev registru HKEY_LOCAL_MACHINE - software - Borland a na ostatnich strojich (pod jinymi uzivateli) to naimportujes.
Ona istalace BDE zapise jeste do vetve HKEY_LOCAL_MACHINE - Software - Microsoft - Windows - Current Version - Uninstall informace o odinstalaci BDE, ale to neni dulezite.
Takto to zapisuji uzavtelum pomoci NAL a chodi to.
Opatrne je treba pristupovat k cestam smerujicim do profilu, nejlepe takove vubec nepouzivat, tzn. vse instalovat tak, aby cesty pod vsemi uzivateli byly stejne.
S pozdravem
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================
>>> garalda(zv)mail(tec)cz 30.5.2000 7:20:57 >>>
Zdravim.
databaze je umistena na serveru a je pro vsechny spolecna. Maji tam
novelovskou sit. Problem je v tom, ze kdyz se ten program a BDE nainstaluje
pod urcitym uzivatelem, tak kdyz se k tomu pocitaci prihlasi jiny uzivatel,
tak mu to nechodi, dokud se to nenainstaluje i pod nim. Predpokladam, ze
problem je v BDE, ktere se instaluje pod tim konkretnim uzivatelm a dalsi
uzivatel uz nema odkazy v registru nebo nekde... Netusite prosim nekdo, jak
to vyresit, abych to nemusel instalovat pro kazdeho znova?
Pristup k DB polozce typu memo
[*] Petr Vale� - 30.5.2000 10:07:11
Zkousel jsi AsMemo ???
respektive "AsMemo.Text"
PETR
----- Original Message -----
From: Jezek Petr, Ing. <PETR(zv)sevis.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, May 29, 2000 5:36 PM
Subject: Pristup k DB polozce typu memo
> Caute,
>
> Mam Delphi 5, Informix na UNIXU (pristup pres NATIVE + BDE).
> Mam zde vytvorenou jednu tabulku, do ktere uchovam data z ruznych souboru
> (do polozky typu memo). Doted jsem pristupoval k hodnote pres AsString a
> fungovalo to.
> Nyni jsem nacetl nejaky novy soubor (neni nejdelsi) a tento pristup uz
> nefunguje.
> Kdyz pouziji Text property, tak mi vrati '(MEMO)' misto obsahu. Nevi nekdo
> nejaky spravny a vzdy
> bezchybny pristup k MEMO polozkam. Jak to resite vy.
>
> Zajimave je ze SQL Explorer vzdy vse zobrazi spravne.
>
> Petr
BDE a vice uzivatelu na jednom pocitaci
[*] Petr Vales - 30.5.2000 10:09:58
Ahoj,
to je divny, protoze mne uplne stejnem problem funguje a to bez problemu.
Jak se ti ta chyba projevuje ?
PETR.
----- Original Message -----
From: garalda <garalda(zv)mail(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, May 30, 2000 7:20 AM
Subject: BDE a vice uzivatelu na jednom pocitaci
> Zdravim.
>
> Napsal jsem program ( v D5), ktery pres BDE cte data z Accesovske
databaze.
> Instaloval jsem jej u jednoho zakaznika (cca 10 pocitacu - W95, W98). Ta
> databaze je umistena na serveru a je pro vsechny spolecna. Maji tam
> novelovskou sit. Problem je v tom, ze kdyz se ten program a BDE
nainstaluje
> pod urcitym uzivatelem, tak kdyz se k tomu pocitaci prihlasi jiny
uzivatel,
> tak mu to nechodi, dokud se to nenainstaluje i pod nim. Predpokladam, ze
> problem je v BDE, ktere se instaluje pod tim konkretnim uzivatelm a dalsi
> uzivatel uz nema odkazy v registru nebo nekde... Netusite prosim nekdo,
jak
> to vyresit, abych to nemusel instalovat pro kazdeho znova?
>
> Diky za radu
> Garalda
>nekvalitni linka a General SQL error
[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 30.5.2000 10:12:04
Ahoj,
s timto problemem jsem se take zabyval. Dat to do threadu nepomuze, protoze
pri ukonceni threadu sql prikaz dale bezi na databasovem servru. V napovede
D5 uvadeji, ze resenim je pouzit komponentu ADOCommand, ale kdyz jsem to sni
zkousel, tak to nechodilo tak jak pisou. Nehlede na to, ze pokud chci
odstrelit sql dotaz, tak ho musim spustit asynchronne a komponenta
ADOCommand nema udalost OnExecuteComplete nebo neco podobneho. A pokud
nezjistim jestli sql dotaz skoncil, nemuzu dale pracovat s daty.
Ja jsem nakonec pouzil primo komponentu ADOConnection a jeji property
ConnectionObject, ktery vola primo funkce ADO. V napovede o tom neni ani
zminka(jako vzdy), tak nezbiva nic jinyho nez prolest zdrojaky ADO
komponent. Jestli mas MSDN tak se mrkni na 'connection class', tam s da neco
vycist. Ty funkce, ktere asi budes potrebovat jsou
ADOConnection.ConnectionObject.Execute() a
ADOConnection.ConnectionObject.Cancel. ADOConnection ma i udalost
OnExecuteComplete, ve ktere muzes testovat, jestli dotaz jiz skoncil. Funkce
Execute vraci _RecordSet a property RecordSet typu _RecordSet ma kazda
komponenta ADO, ktera je odvozena od TCustomADODataSet. ADODataSet se
neotevira standardne procedurou Open nebo Active = True, ale navratova
hodnota se priradi property RecordSet a ADODataSet se tvari jako, kdyby byla
otevrena.
Pri asynchronnim pouziti dotazu musis zajistit, aby aplikace nemohla poslat
jiny dotaz, jinak nastane vyjimka.
var
RecordCount: olevariant;
begin
// cislo 17 zajisti asynchronni dotaz(nastaveni asynchronniho
provedeni jsem vycetl ze zdrojaku
ADODataSet.RecordCount:= ADOConnection.ConnectionObject.Execute('select *
from tabulka', RecordCount, 17);
end;
procedure CancelSQL;
var
RecordCount: olevariant;
begin
ADOConnection.ConnectionObject.Cancel;
end;
hodne uspechu
Ales
----- Original Message -----
From: Petr Mat�jovsk� <pemasoft(zv)atlas(tec)cz>
To: Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, May 27, 2000 4:28 PM
Subject: nekvalitni linka a General SQL error
> Ahoj
>
> Napsal jsem aplikaci client/server , ktera ted chodi na spatne lince
(modem
> to modem). Dosti casto se stava ze modem se pripoji na mensi rychlosti nez
> 14400. Jak se da prerusit dlouhy SELECT na teto lince (ne Ctrl+Alt+Del)
> potrebuji vytvorit jakesi tlacitko storno.
>
> SQL7 D5
>
> diku za kazdou radu
> Petr Matejovsky
>
users list
[*] Tomas Skoda <tomas.skoda(zv)jdsoftware.sk> - 30.5.2000 10:18:45
Ahoj
skus ulozenu proceduru "sp_who"
V SQL Server Books je opisana takto:
sp_who (T-SQL)
Provides information about current Microsoft� SQL Server� users and processes. The information returned can be filtered to return only those processes that are not idle.
Syntax
sp_who [[(zv)login_name =] 'login']
Arguments
[(zv)login_name =] 'login'
Is a user login name on SQL Server. login is sysname, with a default of NULL. If no name is specified, the procedure reports all active users of SQL Server. login can also be a specific process identification number (SPID). To return information on active processes, specify ACTIVE. ACTIVE excludes from the report processes that are waiting for the next command from the user.
Return Code Values
0 (success) or 1 (failure)
Tomas
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Robert Zak
> Sent: Tuesday, May 30, 2000 9:39 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: users list
>
>
> Zdravim,
>
> Ako zistim ma MSSQL7 zoznam prave prihlasenych uzivatelov k danej
> databaze? Potrebujem aspon ich pocet.
>
>
> Dakujem
>
> Robo
FTP a Proxy
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 30.5.2000 10:24:36
Ahoj,
kdybych mel mluvit za sebe, tak bych rekl, ze od toho
konference jsou... a pokud by to nekoho otravovalo, tak
necht se z ni odhlasi...
Dobra.
> ----------
> Od: delphi konference[SMTP:delphi(zv)energotek(tec)cz]
> �>
> S touto FTP komponentou mam uz nejake zkusenosti, tak poslete nejakou adresu na Vas, nejlepe zdrojaky, nebo uryvek zdrojaku, ja to porovnam s tim co mam hotove a co funguje dobre a dam Vam vedet.
> Piste na petrbl(zv)energotek(tec)cz at s tim zbytecne neotravujeme ostatni. Predpokladam ze to bude na delsi dobu.
> �>
> TThread a RaiseLastWin32Error
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 30.5.2000 10:51:43
Ahoj,
> A jeste jeden dotaz: jak elegantne pockat na skonceni a uvolneni threadu a
pote ho ihned vytvorit znovu?
ja by som skusil na mieste kde uzivatel ukoncuje thread predcasne
vygenerovat vlastnu spravu WM_USER+xxx, odpovedou na ktoru sa nasledne
vytvori a spusti novy thread.
Palo.
pstolc(zv)sc.sknet.sk
Odkaz na existujuci sobor(obrazok)
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 30.5.2000 10:58:45
V Delphi je to takhle:
try
Image1.LoadFromFile(Nazev_Souboru);
except
on E: Exception do
messageDlg('Nelze otevrit soubor s obrazkem !!!',mtError,[mbOK],0);
end;
misto obecne tridy Exception lze pouzit primo vyjimku, ktera nastava pri
situaci, kdy soubor neexistuje. Pokud se pouzije tato konstrukce je osetrena
jakakoliv vyjimka !!!
Milan Tomes
> 1. mozna dat kriticke misto do try ... catch,
>
> nevim jak v pascalu, ale bude to obdobne jako v C
>
> try {
> Image1->Picture->LoadFromFile( "C:\\img.bmp");
> catch (...) {
> ShowMessage( "Chyba");
> }
>
> 2. nebo testovat existenci souboru pomoci pokusu otevreni souboru, mela by
> na to existovat funkce FileExists(...)
>
> PETR
> > Zdravim vsetkych,
> >
> > mohol by mi niekto poradit ako obchadzat zrutenie programu v takomto
> > pripade.
> >
> > Pri prechadzani databazy program nacitava obrazky, ktore su ulozene v
> > adresaroch a ich nazov je identicky s obsahom fieldu v
> databaze. Vsetko je
> v
> > poriadku, pokial field odkazuje na subor (obrazok), ktory existuje. Pri
> > odkaze na subor (obrazok), ktory neexistuje mi spadne program.
> Predstavujem
> > si, ze by to islo, keby program testoval korektne otvorenie subor pri
> > "loadfromfile" alebo keby testoval, ci sa subor nachadza na disku. Iba
> > neviem ako to urobit.
> >
> > Dakujem za kazdu pomoc.
> > Pozn. Som iba zac.users list
[*] Z�le��k Tom� <TZ(zv)lcs(tec)cz> - 30.5.2000 11:01:45
Pocet:
SELECT COUNT(*) FROM master..sysprocesses WHERE dbid=DB_ID('jmeno databaze')
Prihlasovaci jmena:
SELECT loginame FROM master..sysprocesses WHERE dbid=DB_ID('jmeno databaze')
Nezapomen na to, ze v systemove tabulce sysprocesses nejsou evidovani jen
prihlaseni uzivatele, ale i systemove procesy samotneho SQL-serveru,
pripadne tez SQLServerAgent apod.
Tomas Zalesak
> -----Original Message-----
> From: Robert Zak [mailto:nrsys(zv)psn.sk]
> Sent: Tuesday, May 30, 2000 9:39 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: users list
>
> Zdravim,
>
> Ako zistim ma MsSQL7 zoznam prave prihlasenych uzivatelov k danej
> databaze? Potrebujem aspon ich pocet.
>
> Dakujem
>
> Robo
Pristup k DB polozce typu memo
[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 30.5.2000 11:07:38
Cau,
Skusil jsem to, ale dostal jsem stejnou chybu jako pri pristupu pres
AsString:
INVALID BLOB HANDLER IN RECORD BUFFER.
Ale SQL Explorer data ukaze bez problemu.
Petr
-----Original Message-----
From: Pavol Stolc [mailto:pstolc(zv)sc.sknet.sk]
Sent: Tuesday, May 30, 2000 7:45 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Pristup k DB polozce typu memo
Ahoj,
pripada mi to ako polozka typu blob, tak to skus nasledovne:
var
MemoField: TField;
MS: TMemoryStream;
S: string;
...
MemoField := DataSet.FieldByName('MemoFieldname');
if MemoField.IsBlob then begin
MS := TMemoryStream.Create;
try
TBlobField(MemoField).SaveToStream(MS);
MS.Position := 0;
... urob s datami v MS co chces, napr. ...
// SetLength(S, MS.Size);
// Move(MS.Memory^, PChar(S)^, MS.Size);
finally
MS.Free;
end;
end;
...
Palo.
pstolc(zv)sc.sknet.sk
seznam prihlasenych uzivatelu v NT domene
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 30.5.2000 11:16:14
Zdravim...
neznate nekdo nejaky mechanizmus, jakym zjistit seznam prave
prihlasenych lidi v NT domene?
diky...
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.mlp(tec)cz/space/gebauerl/synapse - Synapse Delphi TCP/IP Library
TThread a RaiseLastWin32Error
[*] <sw.maurice(zv)centrum(tec)cz> - 30.5.2000 11:48:09
Ahoj,
mam v aplikaci jeden thread a pokud v Execute toho threadu provedu RaiseLastWin32Error, tak se ukonci
beh cele aplikace a podle MemProof zustane v pameti viset krom threadu i hlavni okno formulare :-(
Podle napovedy ma dojit k vyvolani EWin32Error, ale proc to zavira aplikaci?
Jak muzu osetrit obsah Execute, aby v pripade vyjimky /chyby/ doslo jen k ukonceni a uvolneni threadu, bez
vlivu na jiny thread /try...finally nepomaha/?
A jeste jeden dotaz: jak elegantne pockat na skonceni a uvolneni threadu a pote ho ihned vytvorit znovu?
Napadlo me jenom
repeat Application.ProcessMessages; until MyThread=nil;
ale prijde me to neprofesionalni :-) /Jedna se o reakci na stisk tlacitka, kdy se bezici uloha neprodlene ukonci a
ihned se vytvori a spusti znovu s novymi parametry/
Dekuji predem.
Hezky den
preje M.
e-mail: sw.maurice(zv)centrum(tec)cz
homepage: http://www.mujweb(tec)cz/Zabava/sw.maurice
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Uvolnovani komponent
[*] Karel Kral <kral(zv)purus(tec)cz> - 30.5.2000 11:48:58
> Pri zavreni formulare zavolam DataModule.Free a v Destroy
> DataModulu zapisuju do souboru nejake hodnoty ostatnich
> komponent formu. Slo mi jen o to, abych pri vytvareni
> DataModulu mohl dat jako Ownera formular a ten se pak
Na to pouzij mnohem jednodussi metodu:
Udelej si v DataModulu public metodu nazvanou treba WriteSettings (ta
zapise ty hodnoty).
Pak si udelej do OnCloseQuery formulare volani: MyDataMod.WriteSettings
a je to.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Tvorba sestav
[*] Bab�k Martin (+42035620,MUS a.s. M.Babik) <M.Babik(zv)mus(tec)cz> - ay 2000 11:15:53
Zdravim,
neznate nekdo nejaky uzivatelsky prijemny software na tvorbu tiskovych sestav
i grafickych. Pokud mozno jednoduse zaclenit do Delphi V, neni vsak podminkou.
Objevil jsem pouze Sineu a ReportBuilder.
Je to pro koncove uzivatele, takze to musi byt jednoduse ovladatelne s mozno
sti tvorby vlastnich uzivatelem navrzenych sestav. Potrebuji jim udelat nejako
u nabidku z ceho si mohou vybrat.
Staci mi jen nazvy pripadne nejaky odkaz. Dik za namety.
S pozdravem Martin Babik
COM Threading
[*] Ond�ej Male�ek - 30.5.2000 12:21:14
Vazeni,
mam dotaz tykajici se volani metod COM objektu. U out-of-process serveru se
mi nedari ovlivnit z jakeho vlakna budou obsluhovana volani jeho metod.
Laboroval jsem s parametrem ThreadingModel konstruktoru TComObjectFactory,
ale bez valneho vysledku => volani metod je obsluhovano vzdy z primarniho
vlakna serveru. Da se nejak ovlivnit, z jakeho (jineho nez primarniho
vlakna) budou volani provadena. Pripadny prikladek potesi.
Diky
Ond�ej Male�ek
Pretypovanie STRING na PCHAR ?
[*] kinekus <kinekus(zv)nextra.sk> - 30.5.2000 12:22:29
Ahojte delphaci,
Kto mi vie poradit ako vyriesit nasledujuci problem :
Do objektu edit zadam text, ktory je nazvom suboru. Do tohot suboru sa ma
nasledne skopnut iny subor. Ke� zapisem
CopyFile('nieco',(edit.text),true) vypisuje mi konflikt typov string a
pchar. Ako z edit.text-u urobit pchar ? Alebo idem na to zle ?
Zac. Mr.Problemy s ref. integritou u Paradoxu
[*] Filip <delphi007(zv)angelfire(tec)com> - 30.5.2000 03:26:21 -0700
Cau lidi!
Doufam, ze mi aspon nekdo poradi, protoze vim, ze vetsina z vas pdox zavrhuje...
Mam takovy celkem podstatny problem. Jednou za cas se mi, nevim proc, u nekterych detail tabulek podela ref. integrita - hazi to hlasku "master table not found", pritom je master furt na stejnym miste.... Pak musim tu ref. integritu nastavit znova a nejakou chvili to zase drzi. Zatim je programek jen ve stadiu vyvoje, ale desim se okamziku, kdy se to stane u zakaznika... Nemate nekdo nejake pokyny, jak predchazet takovymhle nepeknostem u PDOXu???
Dik za odpovedi.
---
Filip, student
Angelfire for your free web-based e-mail. http://www.angelfire.com
QR a dlouhy formular
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 30.5.2000 12:55:19
Ahoj,
mam v QR vyvedeny formular o 32 banerech. Poslednich pet baneru mi vylezlo z
obrazovky a nemuzu je nijak vizualne editovat. Nevite, prosim, nekdo co s
tim nebo jak na to?
mam D3 a QR1.1
Diky
Jaro B.users list
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 30.5.2000 13:01:00
> Ako zistim ma MSSQL7 zoznam prave prihlasenych uzivatelov k danej
> databaze? Potrebujem aspon ich pocet.
Nepises, jestli to potrebujes z kodu nebo jinak. Z kodu nevim, ale v
Enterpise manageru se to da vycist z Management\Current
Activity\Process Info
David
multiselect v TDBGrid
[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 30.5.2000 13:21:28
Asi jsem slepy, ale neumim je nastavit aby fungoval multiselect se Shift (ve verzi D3)
>co takhle zkusit komponenty SiVCL (www.sinea(tec)cz) -> uz se to tu myslim
>> chci v TDBGrid udelat select vice radku. Pochopitelne ze, pokud clovek
drzi Ctrl, tak se mysi oznacuji jednotlive radky (vety).
>> Rad bych umoznil select mysi s drzenim Shift (jako napr. v Excelu), coz od
prirody nefunguje.
>>
> >Je to v Delphi3
>
>> Dik
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================Obnova zaznamov v DB
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 30.5.2000 13:21:03
Zdravim,
predstavme si, ze dvaja ludia robia naraz s jednym zaznamom v jednej
tabulke, v jednej databaze. Zmeni ho prvy, da applyUpdates, chce ho zmenit
druhy, a tu by sa malo stat to (co vlastne neviem), zistit, ze zaznam bol
medzitym zmeneny, a dat druhemu uzivatelovi moznost zmenit ho na jeho data.
Ako by sa to dalo urobit. Dakujem.
Alebo sa to da aj inak?
D5, SYbase SQL Anywhere 5.5 on Novell Netware
Vdaka, Miso
Problemy s ref. integritou u Paradoxu
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 30.5.2000 13:45:27
Nevim co nekteri proti paradoxu maji, ja s nim pracuji jiz pres 10 let
a je to docela slusnej system ( jak format dat tak stary dobry
paradox for DOS) Nicmene referencni integrita je dodelana az do
poslednich verzi formatu a opravdu neni to zadna bomba.
Zaver : Paraxovy format dat ano, ale ref.i. si radeji hlidat v programu
sam.
> Cau lidi!
> Doufam, ze mi aspon nekdo poradi, protoze vim, ze vetsina z vas pdox zavrhuje...
> Mam takovy celkem podstatny problem. Jednou za cas se mi, nevim proc, u nekterych detail tabulek podela ref. integrita - hazi to hlasku "master table not found", pritom je master furt na stejnym miste.... Pak musim tu ref. integritu nastavit znova a nejakou chvili to zase drzi. Zatim je
programek jen ve stadiu vyvoje, ale desim se okamziku, kdy se to stane u zakaznika... Nemate nekdo nejake pokyny, jak predchazet takovymhle nepeknostem u PDOXu???
> Dik za odpovedi.
> ---
> Filip, student
>
>
>
>
> Angelfire for your free web-based e-mail. http://www.angelfire.com
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
Pretypovanie STRING na PCHAR ?
[*] Lubo Fule <fule(zv)sct.sk> - 30.5.2000 14:07:21
> Do objektu edit zadam text, ktory je nazvom suboru. Do tohot suboru sa ma
> nasledne skopnut iny subor. Ke� zapisem
>
> CopyFile('nieco',(edit.text),true) vypisuje mi konflikt typov string a
> pchar. Ako z edit.text-u urobit pchar ? Alebo idem na to zle ?
>
Nenapisal si verziu Delphi, ale predpokladam, ze to nebude >D2, takze Ti
pomoze obycajne pretypovanie teda:
CopyFile('nieco', PChar(edit.text), true)
users list (2)
[*] Robert Zak <nrsys(zv)psn.sk> - 30.5.2000 14:21:18
Dakujem za radu... zistil som ale ze to neriesi moj problem.
Potrebujem (MSSQL7) docielit, aby sa k 'aplikacii' (delphi5prof) mohlo
pripojit maximalne N uzivatelov, pricom cislo N je urcene v tabulke Tab1.
Server aj databazu vyuzivaju aj uzivatelia inych aplikacii, preto spocitanie
uzivatelov pripojenych k serveru ci databaze nema zmysel.
Ako sa to da vyriesit.. Napadaju ma same nepouzitelne riesenia ...
Napr. V tabulke uzivatelov aplikacie si drzat priznak ktory uzivatel je
prihlaseny a ktory nie, co ale v pripade ze aplikacia spadne .. da sa
spustit na serveri nejaka procedura v momente pripojenia ci odpojenia
uzivatela?
Robo
Pretypovanie STRING na PCHAR ?
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 30.5.2000 15:58:19
Mezi stringy a pchary lze pretypovavat jednoduse String(pchar_promenna) nebo
PChar(string_promenna). Ale mozna to funguje az od Delphi4, nejsem si
jist...
Petr Fischer
E-Mail: fifa(zv)praguesoft(tec)cz, ICQ#: 24154715
----- Original Message -----
From: "kinekus" <kinekus(zv)nextra.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, May 30, 2000 12:22 PM
Subject: Pretypovanie STRING na PCHAR ?> Ahojte delphaci,
>
> Kto mi vie poradit ako vyriesit nasledujuci problem :
>
> Do objektu edit zadam text, ktory je nazvom suboru. Do tohot suboru sa ma
> nasledne skopnut iny subor. Ke� zapisem
>
> CopyFile('nieco',(edit.text),true) vypisuje mi konflikt typov string a
> pchar. Ako z edit.text-u urobit pchar ? Alebo idem na to zle ?
>
>
> Zac. Mr.Automaticke ukonceni programu
[*] Michal Kus <kus(zv)tangosw(tec)cz> - 30.5.2000 16:13:13
Ahoj,
delam program, ktery v prikazovem radku dostane jmeno souboru ke zpracovani.
Po zpracovani
se program musi ukoncit. Problem je, ze program musi bezet jako
minimalizovany a tak se
neuplatni zadne FormActivate atd.
Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
procedure TForm1.FormCreate(Sender: TObject);
begin
Sestava := '';
if ParamCount>0 then
begin
WindowState := wsMinimized;
Sestava := ParamStr(1);
Tiskni;
Close; // Tohle close nefunguje.
end;
end;
Diky
Michal Kus
Pretypovanie STRING na PCHAR ?
[*] martin.falta(zv)obi.de - 30.5.2000 15:17:20
Napis to takhle:
CopyFile('neco', PChar(edit.text), true);
Martin
---------------------- Weitergeleitet von Martin Falta/OBI/CZ am 30.05.2000
15:19 ---------------------------
Von: kinekus(zv)nextra.sk(zv)fwd(tec)cz am 30.05.2000 12:22 OEZ
Bitte antworten an delphi-l(zv)fwd(tec)cz
Gesendet von: owner-delphi-l(zv)fwd(tec)cz
An: delphi-l(zv)fwd(tec)cz
Kopie:
Thema: Pretypovanie STRING na PCHAR ?
Ahojte delphaci,
Kto mi vie poradit ako vyriesit nasledujuci problem :
Do objektu edit zadam text, ktory je nazvom suboru. Do tohot suboru sa ma
nasledne skopnut iny subor. Ke� zapisem
CopyFile('nieco',(edit.text),true) vypisuje mi konflikt typov string a
pchar. Ako z edit.text-u urobit pchar ? Alebo idem na to zle ?
Zac. Mr.
IMPORTANT NOTICE:
This email is confidential, may be legally privileged, and is for the
intended recipient only. Access, disclosure, copying, distribution, or
reliance on any of it by anyone else is prohibited and may be a criminal
offence. Please delete if obtained in error and email confirmation to the sender.Automaticke ukonceni programu
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.5.2000 16:53:29
Ahoj,
Zkus misto Close dat Application.Terminate;
Slavek
> zpracovani. Po zpracovani se program musi ukoncit. Problem je, ze program
> musi bezet jako minimalizovany a tak se neuplatni zadne FormActivate atd.
>
> Michal Kus
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Pristup k DB polozce typu memo
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 30.5.2000 17:03:10
ahoj,
v memo polozkach v Accessu mam ulozeny cele soubory *.jpg a pristupuju k nim
pres ADOExpress z D5
takto:
var stream: TMemoryStream;
begin
if Datamodule2.ADSVyrobekobr.BlobSize>0 then
begin
stream:=TMemoryStream.create;
try
datamodule2.ADSVyrobekobr.SaveToStream(stream); // adsvyrobekobr je
TMemoField
stream.position:=0;
jimImage1.picture.graphic:=TJPEGImage.create;
jimImage1.picture.graphic.LoadFromStream(stream);
finally
stream.free;
end;
end
na pristup do PDX tabulek jsem ted dal na svuj web
(www.glass(tec)cz/software/dbimage.zip) priklad,
ktery mi sem kdysi prihral P.Vones
M.Jirman
P.S: Nevim jestli to pomuze, ale ptal ses jak to delame my.
----- Original Message -----
From: Jezek Petr, Ing. <PETR(zv)sevis.sk>
> Caute,
>
> Mam Delphi 5, Informix na UNIXU (pristup pres NATIVE + BDE).
> Mam zde vytvorenou jednu tabulku, do ktere uchovam data z ruznych souboru
> (do polozky typu memo). Doted jsem pristupoval k hodnote pres AsString a
> fungovalo to.
> Nyni jsem nacetl nejaky novy soubor (neni nejdelsi) a tento pristup uz
> nefunguje.
> Kdyz pouziji Text property, tak mi vrati '(MEMO)' misto obsahu. Nevi nekdo
> nejaky spravny a vzdy
> bezchybny pristup k MEMO polozkam. Jak to resite vy.
>
> Zajimave je ze SQL Explorer vzdy vse zobrazi spravne.
>
> Petr
Automaticke ukonceni programu
[*] Nade�da Chrap�iakov� <chrapciakova(zv)vuje.sk> - 30.5.2000 17:24:55
Co tak pouzit Application.Terminate()? I ked neviem, co to urobi vo FormCreate.
Nada
Michal Kus wrote:
>
> Ahoj,
> delam program, ktery v prikazovem radku dostane jmeno souboru ke zpracovani.
> Po zpracovani
> se program musi ukoncit. Problem je, ze program musi bezet jako
> minimalizovany a tak se
> neuplatni zadne FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
>
> Diky
> Michal Kus
Problemy s ref. integritou u Paradoxu
[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 30.5.2000 17:27:01
Ja mam aplikaciu, fici mi celku v pohode u viacerych uzivateloch aj v sieti, a nemam taketo problemy.
Je fakt, ze v case vyvoja to hlasilo obcas aj mne, ale vacsinou vtedy, ked som nejako nepekne zachadzal so subormi databazy (kopiroval som ich, mazal apod.), takze Paradox z toho nebol velmi stastny...
Filip wrote:
> Cau lidi!
> Doufam, ze mi aspon nekdo poradi, protoze vim, ze vetsina z vas pdox zavrhuje...
> Mam takovy celkem podstatny problem. Jednou za cas se mi, nevim proc, u nekterych detail tabulek podela ref. integrita - hazi to hlasku "master table not found", pritom je master furt na stejnym miste.... Pak musim tu ref. integritu nastavit znova a nejakou chvili to zase drzi. Zatim je programek jen ve stadiu vyvoje, ale desim se okamziku, kdy se to stane u zakaznika... Nemate nekdo nejake pokyny, jak predchazet takovymhle nepeknostem u PDOXu???
> Dik za odpovedi.
> ---
> Filip, student
>
> Angelfire for your free web-based e-mail. http://www.angelfire.com
Problemy s ref. integritou u Paradoxu
[*] Ji�� Kr�l jr. - 30.5.2000 17:34:02
Pripojuji se k nazoru: RI ano, ale aplikacne. Definovat to pres Pdox format
je krkolomne a nespolehlive.
JK
Automaticke ukonceni programu
[*] Lubo Fule <fule(zv)sct.sk> - 30.5.2000 17:39:08
Principialne to nerobis spravne. Ked nepotrebujes ziadne okno, tak si otvor
priamo zdrojak projektu (menu Project -> View Source), vsetko odtial vymaz a
Tvoj kod vloz priamo do tela projektu. Tvoje .dpr by teda mohlo vyzerat asi
takto nejako:
program blabla;
uses SysUtils;
var Sestava:string;
procedure Tiskni;
begin
....
....
end;
begin
Sestava := '';
if ParamCount>0 then
begin
WindowState := wsMinimized;
Sestava := ParamStr(1);
Tiskni;
end;
end.
Ked je to urobene takto, tak program proste vykona to co ma a skonci.
Klasicka Delphi aplikacia totiz spusta Application.Run, cim sa spusti
nekonecny cyklus spracovavania windowsovych sprav.
L.
> delam program, ktery v prikazovem radku dostane jmeno souboru ke
> zpracovani.
> Po zpracovani
> se program musi ukoncit. Problem je, ze program musi bezet jako
> minimalizovany a tak se
> neuplatni zadne FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
>
>
> Diky
> Michal Kus
>
>
>
User
[*] Boris Pe�ka <duhasystem(zv)volny(tec)cz> - 30.5.2000 18:04:39
Zdravim!
Nevite nekdo, jakou API funkci mam zjistit jmeno, kterym se prihlasuji do Windows?
Diky vsem.
Boris
User
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.5.2000 18:28:01
Ahoj,
GetUserName, priklad je na
http://www.swnet(tec)cz/article.php?id=10636
nebo tu:
function GetUserNameString: string;
var
user: PChar;
l : DWord;
begin
l := 1024;
user := StrAlloc(Succ(l));
if GetUserName(User, l) then
Result:=StrPas(user)
else
Result:=``;
StrDispose(User);
end;
Slavek
> Nevite nekdo, jakou API funkci mam zjistit jmeno, kterym se prihlasuji
> do Windows?
> Boris
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
User
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 30.5.2000 19:21:05
Je to myslim fce
GetUserName
Dodo
______________________________________________________________
> Od: Boris Pe�ka <duhasystem(zv)volny(tec)cz>
> Komu: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Tue, 30 May 2000 18:04:39 +0200
> P�edm�t: User
>
> Zdravim!
>
> Nevite nekdo, jakou API funkci mam zjistit jmeno, kterym se
prihlasuji do Windows?
>
> Diky vsem.
>
> Boris
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
users list (2)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.5.2000 19:26:33
On 30 May 2000, at 14:21, Robert Zak wrote:
> Dakujem za radu... zistil som ale ze to neriesi moj problem.
> Potrebujem (MSSQL7) docielit, aby sa k 'aplikacii' (delphi5prof) mohlo
> pripojit maximalne N uzivatelov, pricom cislo N je urcene v tabulke
> Tab1. Server aj databazu vyuzivaju aj uzivatelia inych aplikacii,
> preto spocitanie uzivatelov pripojenych k serveru ci databaze nema
> zmysel. Ako sa to da vyriesit.. Napadaju ma same nepouzitelne riesenia
> ... Napr. V tabulke uzivatelov aplikacie si drzat priznak ktory
> uzivatel je prihlaseny a ktory nie, co ale v pripade ze aplikacia
> spadne .. da sa spustit na serveri nejaka procedura v momente
> pripojenia ci odpojenia uzivatela?
Udelej si COM server, ktery si povede evidenci prihlasenych
klientu. Na jine nez NT siti vsak mohou byt problemy...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
users list (2)
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 30.5.2000 19:34:56
Ahoj,
kdysi jsem to delal jeste ve starem dobrem BP a pri startu aplikace jsem
sitoveho uzivatele (tehdy na novelu) zapsal do tabulky aktualnich uzivatelu.
V casovem intervalu (asi 1x za 20 vterin podle nastaveni v konfiguraci) jsem
aktualizoval cas ve svem zaznamu v tabulce a zaroven zkontroloval, jestli
tam nejsou prosle zaznamy (tedy starsi nez nastaveny limit - tehdy asi 60-90
vterin), pokud ano, smazal jsem tento zaznam - patrne dana stanice spadla a
program si neodmazal svuj zaznam. Pokud by se stalo, ze me aktualni zaznam
odstrelila jina stanice (jina instance aplikace, treba vlivem zastaveni
cinnosti programu na delsi dobu - tehdy v DOSu to byla treba novellovska
hlaska pote, co si obsluha odskocila uvarit kafe), potom tedy pri dalsi
kontrole se program opet zapsal do tabulky jako novy zaznam a pokud byl
prekrocen limit uzivatelu (za tu dobu, kdy byl zaznam sestrelen se mohl
prihlasit nekdo dalsi), zahlasil jsem to uzivateli s tim, ze jsem mel cekaci
smycku - tedy test na uvolneni pozice nebo moznost regulerne program uzavrit
(pozavirat tabulky a ukoncit program), podle nalady uzivatele.
Jeste poznamka: pri startu programu jsem musel take zkontrolovat aktualnost
casovych kontrol v tabulce, pro pripad ze, by byly vsechny licence obsazene
a vsechny (hypoteticky) najednou spadly, takze by tabulka zustala obsazena).
Honza.
----- Original Message -----
From: Robert Zak <nrsys(zv)psn.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, May 30, 2000 2:21 PM
Subject: users list (2)> Dakujem za radu... zistil som ale ze to neriesi moj problem.
> Potrebujem (MSSQL7) docielit, aby sa k 'aplikacii' (delphi5prof) mohlo
> pripojit maximalne N uzivatelov, pricom cislo N je urcene v tabulke Tab1.
> Server aj databazu vyuzivaju aj uzivatelia inych aplikacii, preto
spocitanie
> uzivatelov pripojenych k serveru ci databaze nema zmysel.
> Ako sa to da vyriesit.. Napadaju ma same nepouzitelne riesenia ...
> Napr. V tabulke uzivatelov aplikacie si drzat priznak ktory uzivatel je
> prihlaseny a ktory nie, co ale v pripade ze aplikacia spadne .. da sa
> spustit na serveri nejaka procedura v momente pripojenia ci odpojenia
> uzivatela?
>
> Robo
>Hlidani pristupu na IP adresu
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 30.5.2000 19:51:31
Preji vsem pekneho dne,
potreboval bych udelat ohlidani pristupu na IP proxy serveru. (Je to v
organizaci, kde chodi na sit i deti a ne kazdy by se mel dostat na
internet.) Mam takovou predstavu, ze bych mel na kazde WIN95 stanici bezici
proces, ktery by monitoroval pristup na IP adresu proxy a nedovolil by
pripojit se. Schudnejsi by to asi bylo spise obracene - tedy proces na
stanici, kde bezi proxy a monitorovat pristup z venku (pozadavky na proxy) a
podle adresy pozadavku dovolit nebo zakazat pristup.
Psat novy proxy (bezi tam WinRoute) se mi moc nechce, i kdyz by se to tim
asi vyresilo a zadavat pristupy primo na WinRoutu, ktery to nejakym zpusobem
umi taky, neni administratorsky schudne, protoze se tam uzivatele dost
stridaji.
Jedna se mi tedy o to, jak lze monitorovat (na TCP/IP protokolu), co kudy
chodi, na proxy - z ktere adresy jde pozadavek na proxy a jak ho "stronovat"
nebo ze strany stanice - kdy jde pozadavek na proxy.
Nedelal jste nekdo nekdy neco podobneho? Za kazde popostrceni kudy se dat
predem dekuji.
Honza.
users list (2)
[*] Erik Salaj <winsoft(zv)napri.sk> - 30.5.2000 21:39:17
> Dakujem za radu... zistil som ale ze to neriesi moj problem.
> Potrebujem (MSSQL7) docielit, aby sa k 'aplikacii' (delphi5prof) mohlo
> pripojit maximalne N uzivatelov, pricom cislo N je urcene v tabulke Tab1.
U MS SQL servera mas moznost stanovit maximalny pocet paralelnych
pripojeni, pokial Ti taketo riesenie bude vyhovovat.
Erik Salaj, WINSOFT
Uvolnovani komponent
[*] Pavel Malinsk� <spiderland(zv)iol(tec)cz> - 30.5.2000 21:54:21
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Karel Kral
> Sent: Tuesday, May 30, 2000 11:49 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Uvolnovani komponent
>
> > Pri zavreni formulare zavolam DataModule.Free a v Destroy
> > DataModulu zapisuju do souboru nejake hodnoty ostatnich
> > komponent formu. Slo mi jen o to, abych pri vytvareni
> > DataModulu mohl dat jako Ownera formular a ten se pak
>
> Na to pouzij mnohem jednodussi metodu:
> Udelej si v DataModulu public metodu nazvanou treba WriteSettings (ta
> zapise ty hodnoty).
> Pak si udelej do OnCloseQuery formulare volani: MyDataMod.WriteSettings
> a je to.
Ahoj,
Asi jsi to spatne pochopil, vzdyt to ted v podstate
tak mam, je jedno jestli budu pri Close nebo CloseQuery
volat public metodu ktera provede zapis nebo Free,
ktere zapis provede taky. Slo o to se prave tohoto zbavit.
S pozdravem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
>===================================<
> ...The Truth Is Out There... <
=====================================
GSM: 0602 652 203
QR a dlouhy formular
[*] Tomas Vesely <veselyt(zv)atlas(tec)cz> - 30.5.2000 22:10:09
Zoom in/out
Vesna
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. kv�tna 2000 15:44
P�edm�t: QR a dlouhy formular
>Ahoj,
>
>mam v QR vyvedeny formular o 32 banerech. Poslednich pet baneru mi vylezlo
z
>obrazovky a nemuzu je nijak vizualne editovat. Nevite, prosim, nekdo co s
>tim nebo jak na to?
>
>mam D3 a QR1.1
>
>Diky
>Jaro B.Automaticke ukonceni programu
[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 30.5.2000 23:34:37
A nebylo by teda lepsi udelat takovyto program jako konzolovou
aplikaci???
add k tomu Close - mam pocit, ze to Close nefachci kvuli tomu, ze je to
v metode FormCreate...
Michal Kus wrote:
>
> Ahoj,
> delam program, ktery v prikazovem radku dostane jmeno souboru ke zpracovani.
> Po zpracovani
> se program musi ukoncit. Problem je, ze program musi bezet jako
> minimalizovany a tak se
> neuplatni zadne FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
>
> Diky
> Michal Kus
--
Martin Pe�ava
/--------------------------------------------------------------\
| Known as JimX on http://www.webchat(tec)cz & http://www.xchat(tec)cz |
| Webmaster of http://miss.misto(tec)cz |
| Email: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
\--------------------------------------------------------------/Zmena farby a fontu v StatusBare.
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 30.5.2000 23:42:10
Zdravim.
Ako by som mohol nastavit farbu a font pre konkretny panel v TStatusBare,
alebo mi poradte kde sa za zohnat lepsi ako standartny z D.
PS:Mozte mi to aj poslat.
Thanx.
Roland.DateEdit ako v starej foxke.
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 30.5.2000 23:57:02
Zdarvim.
Poradte mi kde by som zohnal nieco ako DateEditBox ako bol v Dos Foxke.
Dakujem.
Roland.Problemy s ref. integritou u Paradoxu
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 31.5.2000 00:00:11
> Cau lidi!
> Doufam, ze mi aspon nekdo poradi, protoze vim, ze vetsina z vas pdox
zavrhuje...
> Mam takovy celkem podstatny problem. Jednou za cas se mi, nevim proc, u
nekterych detail tabulek podela ref. integrita - hazi to hlasku "master
table not found", pritom je master furt na stejnym miste.... Pak musim tu
ref. integritu nastavit znova a nejakou chvili to zase drzi. Zatim je
programek jen ve stadiu vyvoje, ale desim se okamziku, kdy se to stane u
zakaznika... Nemate nekdo nejake pokyny, jak predchazet takovymhle
nepeknostem u PDOXu???
ja som tiez po roku vyvoja odisiel od PDX ako vacsina z nas, ale ako dobry
nastroj na opravu PDX fajlov sa mi javil:
Pdxrbld 3.10 - Paradox tables repair utility http://www.rksolution(tec)cz ,
E-Mail INFO(zv)rksolution(tec)cz
Skus a uvidis.
PS:Pozri sa po InterBase 6.
roland.
Zmena farby a fontu v StatusBare.
[*] MJ soft <mjsoft(zv)rychnov(tec)cz> - 31.5.2000 00:34:23
Ahoj
toto jsem u sebe vyresil tak, ze jsem si udelal svoji komponentu odvozenou
od TStatusBar. Jedine co jsem zmenil je povoleni vkladat jine komponenty na
muj status bar. No a tam uz vkladam label a menim si font jak chci u kazdeho
zvlast.
takto vypada kod komponenty:
*********************
unit frstatus;
interface
uses classes, Controls, comctrls;
type
TJinStatusBar = class(TStatusBar)
private
public
constructor Create(AOwner: TComponent); override;
published
end;
procedure Register;
implementation
constructor TJinStatusBar.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
ControlStyle:= ControlStyle + [csAcceptsControls];
end;
procedure Register;
begin
RegisterComponents('Jindra', [TJinStatusBar]);
end;
end.
*********************
Jin
----- Original Message -----
From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
To: Delphi CZ konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, May 30, 2000 11:42 PM
Subject: Zmena farby a fontu v StatusBare.> Zdravim.
>
> Ako by som mohol nastavit farbu a font pre konkretny panel v TStatusBare,
> alebo mi poradte kde sa za zohnat lepsi ako standartny z D.
>
> PS:Mozte mi to aj poslat.
>
> Thanx.
>
> Roland.Automaticke ukonceni programu
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 31.5.2000 07:38:46
> delam program, ktery v prikazovem radku dostane jmeno souboru ke
> zpracovani. Po zpracovani se program musi ukoncit. Problem je, ze
> program musi bezet jako minimalizovany a tak se neuplatni zadne
> FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
V dobach svych zacatku jsem to delal tak, ze jsem v OnCreate
nastavil nejakou promennou a v dpr souboru jsem se podival po
zavolani AutoCreate na tuto promennou a bud jsem pokracoval,
nebo skoncil. (to pro pripad, ze by Application.Terminate
nefungovalo v konstruktoru).
David
Problemy s ref. integritou u Paradoxu
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 31.5.2000 07:46:46
Jsem dalsi, ktery po zkusenostech rika - ref. integrita ano, ale programove.
Sam delam nad paradoxovyma tabulkama aplikaci (odhadem tak 10-20) a s docela
velkym poctem zaznamu (1000-150000) a narazim pri tomto zatizeni na spoustu
chyb tohoto typu tabulek. Dalsi z hlavnich chyb je spatna prace s indexama.
Pokud je nad tabulkou definovano vice jak 4-5 sec. indexu tak pri pristupu z
nekolika dalsich mist v siti je problemem neustale porusovani techto indexu.
Stalo se mi jiz take to, ze mi spadla hlavicka DB filu a jakoby se ztratilo
asi 80% vsech zaznamu. Nutno dodat, ze nad hlavnima tabulkama se NEDELA
zadna prima editace. Vse se odehrava nad pracovnima tabulkama a aktualizace
se deje pomoci SQL dotazu.
M.T.
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Filip
> Sent: Tuesday, May 30, 2000 12:26 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Problemy s ref. integritou u Paradoxu
>
>
> Cau lidi!
> Doufam, ze mi aspon nekdo poradi, protoze vim, ze vetsina z vas
> pdox zavrhuje...
> Mam takovy celkem podstatny problem. Jednou za cas se mi, nevim
> proc, u nekterych detail tabulek podela ref. integrita - hazi to
> hlasku "master table not found", pritom je master furt na stejnym
> miste.... Pak musim tu ref. integritu nastavit znova a nejakou
> chvili to zase drzi. Zatim je programek jen ve stadiu vyvoje, ale
> desim se okamziku, kdy se to stane u zakaznika... Nemate nekdo
> nejake pokyny, jak predchazet takovymhle nepeknostem u PDOXu???
> Dik za odpovedi.
> ---
> Filip, student
>
>
>
> Angelfire for your free web-based e-mail. http://www.angelfire.com
Obnova zaznamov v DB
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 31.5.2000 07:51:47
Osobne tento problem resim tak, ze jakmile nekdo otevre detail zaznamu tak
si explicitne uzamknu zaznam a nikoho jineho do editace nepustim. Ale pokud
chces zachovat moznost editace obou (i kdyz je to dost nevhodne) tak to
musis udelat tak, ze das refresh dat z hlavni tabulky a porovnas jednotlive
fieldy v hlavni tabulce se stavem pred editaci (ten si pri otevreni detailu
ulozis do nejakeho bufferu)
Milan Tomes
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Michal Hlavac
> Sent: Tuesday, May 30, 2000 1:21 PM
> To: Delphi F�rum
> Subject: Obnova zaznamov v DB
>
>
> Zdravim,
>
> predstavme si, ze dvaja ludia robia naraz s jednym zaznamom v jednej
> tabulke, v jednej databaze. Zmeni ho prvy, da applyUpdates, chce ho zmenit
> druhy, a tu by sa malo stat to (co vlastne neviem), zistit, ze zaznam bol
> medzitym zmeneny, a dat druhemu uzivatelovi moznost zmenit ho na
> jeho data.
>
> Ako by sa to dalo urobit. Dakujem.
>
> Alebo sa to da aj inak?
>
> D5, SYbase SQL Anywhere 5.5 on Novell Netware
>
> Vdaka, Miso
users list (2)
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 31.5.2000 07:56:47
Ja to v paradoxove aplikaci resim pomoci spocitani kolik zamku je nad
urcitou tabulkou. Na hlavnim formulari aplikace (musi byt vzdycky otevren,
pokud dojde k uzavreni tak se vypina cely program + paradox) je v datovem
modelu uvedena ona tabulka (MUSI byt uvedena pouze jednou v cele aplikaci
!!! - to resime tak, ze je to proste tabulka s polozkou xxx:A1 a nikde ji
nepouzivame) a potom uz je sejmuti seznamu uzivatelu (potazmo i pocet) dilem
okamziku. Snad by to slo takhle delat i nad MS SQL
Milan Tomes
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Robert Zak
> Sent: Tuesday, May 30, 2000 2:21 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: users list (2)
>
> Dakujem za radu... zistil som ale ze to neriesi moj problem.
> Potrebujem (MSSQL7) docielit, aby sa k 'aplikacii' (delphi5prof) mohlo
> pripojit maximalne N uzivatelov, pricom cislo N je urcene v tabulke Tab1.
> Server aj databazu vyuzivaju aj uzivatelia inych aplikacii, preto
> spocitanie
> uzivatelov pripojenych k serveru ci databaze nema zmysel.
> Ako sa to da vyriesit.. Napadaju ma same nepouzitelne riesenia ...
> Napr. V tabulke uzivatelov aplikacie si drzat priznak ktory uzivatel je
> prihlaseny a ktory nie, co ale v pripade ze aplikacia spadne .. da sa
> spustit na serveri nejaka procedura v momente pripojenia ci odpojenia
> uzivatela?
>
> Robo
>An: Problem s RXLib - trojsky kun -
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 31.5.2000 08:34:19
Ahoj,
podarilo se mi vysledovat chybu, kdy doslo k pozmeneni zdrojaku v Delphi.
Souvisi to zrejme s nedostatkem zdroju systemu a urcite funkce se pak
chovaji nedefinovane. Pri ladeni meho programu se program choval, jako by
byl v pameti 2x. Pokud jsem formulare v editoru uzavrel a jen spoustel
program tak bylo vsechno OK. Jakmile jsem zacal krokovat soubor s velkym
DFM, tak se otevrel v editoru, zabral i 25% zdroju a dostal se na kritickou
hranici 6% zdroju. K zavaznym problemum doslo, bezel-li predtim M$ Outlook.
I kdyz byl regulerne ukoncen, zrejme nevratil vsechny zdroje systemu a po
naslednem spusteni IDE Delphi a ladeni zdroje spadly az na 2% a system se
zacal chovat nedefinovanym zpusobem. Minimalizace IDE nepomuze. V tomto
pripade doslo k poskozeni souboru napr. CLASSES.PAS znamym zpusobem - casove
razitko nezmeneno, delka souboru nezmenena, ale uvnitr kod pozmenen nahodne
na nekolika mistech.
128MB RAM je tedy asi malo?!
Jaro B.Problemy s ref. integritou u Paradoxu
[*] tomas.mazurek(zv)vitkovice(tec)cz - 31.5.2000 06:47:19
Hello,
pracuji s PDOXem asi 10 let (DOS,Win) a k poskozovani tabulek opravdu
obcas dochazi. U DOSovskeho Paradoxu jsem urcil jako hl. pricinu
vypadek el. proudu u Win3.1-1 pad Windowsu. Mam pocit, ze u BDE32 je
uz to podstatne lepsi, ale mohu se samozrejme mylit.
Jinak RI je super vec a usetri spoustu kodu. U Paradoxu jsem s ni
nikdy problemy nemel.
Pro kontrolu a obnovu poskozenych tabulek pouzivam vlastni program
postaveny na knihovne TUTIL32.DLL. Pokud ma nekdo zajem je volny i se
zdrojakama...
Ovsem v dnesni dobe pomerne vykonneho HW, Interbase6 a non BDE komp.
pro Interbasi, Oracle je cesta pomerne jasna... Anebo psat aplikace
tak, aby byla databaze lehce vymenitelna...
TM
obrazky pro Access
[*] Miroslav Cipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 31.5.2000 09:19:17
Ahoj,
potreboval bych do databaze Accessu naimportovat asi 200 obrazku ale tak
aby je bylo mozne prohlizet i v Accessu. Delam to nejak takhle:
.
.
stream := TMemoryStream.Create;
OLEContainer1.OldStreamFormat := false;
OLEContainer1.CreateObjectFromFile('c:\data\1.bmp',
false);
OLEContainer1.SaveToStream(stream);
stream.Seek(soFromBeginning, 0);
ADOQuery1.Open;
ADOQuery1.Insert;
(ADOQuery1.FieldByName('Fotka') As
TBlobField).LoadFromStream(stream);
ADOQuery1.Post;
.
.
ale problem je ze v tabulce Accessu vidim pole Fotka jako 'Dlouha binarni
data' a ne jako 'Balicek' nevite sakra nekdo jak nato, uz jsem z toho
docela zoufalej.
M.
Automaticke ukonceni programu
[*] Petr Smol�k <psmolik(zv)fides(tec)cz> - 31.5.2000 09:33:45
> Ahoj,
> delam program, ktery v prikazovem radku dostane jmeno souboru ke
zpracovani.
> Po zpracovani
> se program musi ukoncit. Problem je, ze program musi bezet jako
> minimalizovany a tak se
> neuplatni zadne FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
>
>
> Diky
> Michal Kus
>
Pokud uz chces vytvaret formular (lepe bez nej, jak jiz radili jini), tak
tam dej
...
PostMessage(Self.Handle, WM_CLOSE, 0, 0);
...
Petr Smol�k
psmolik(zv)fides(tec)cz
IbObjects & Interbase
[*] mkotaska(zv)atlas(tec)cz - 31.5.2000 09:42:31
Ahoj,
nainstaloval jsem si Interbase 6.0 a IbOjects a mam nekolik dotazu.
1. V komponente TIB_Connection (umistene v TDataModule) se nastavuji vlastnosti (Server, Path, DatabaseName, atd.)v dobe navrhu programu. Jak tyto parametry nastavit pri behu programu? Potreboval bych, aby se TIB_Connection nastavila napr. podle hodnot zapsanych v INI souboru pri startu aplikace.
2. Prostrednictvim komponenty TIB_Query vyberu jistou mnozinu zaznamu z databaze. Nasledne tuto mnozinu potrebuji "projizdet" od zacatku do konce (TIB_Query.Next). V archivu konference jsem se docetl, ze tento zpusob prochazeni neni z hlediska client/server prave to prave. Jak mam tedy postupovat?
Dekuji za kazdy namet
Milan KOTASKA
mkotaska(zv)atlas(tec)cz
mbYesNoCancel v BCB5
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 31.5.2000 10:18:35
Ahoj
Pri prechodu mezi BCB4 a BCB5 jsem narazil na jeden problem a
to je
konstanta mbYesNoCancel.
Drive jsem mohl mit neco takoveho:
Res = (MessageDlg("Update Record?", mtConfirmation,
mbYesNoCancel,
0));
Ale ted mi to tam zahlasi Expression Error prave na te konstante.
Pokud predtim nadefinuji mbYesNoCancel presne podle toho, jak
to je v
helpu:
#define mbYesNoCancel (System::Set<TMsgDlgBtn, mbYes,
mbHelp> () <<
mbYes << mbNo << mbCancel )
tak se zase objevi warning:
Redefinition of 'mbYesNoCancel' is not identical
Jediny zpusob na jaky jsem prisel, je predefinovat tu konstantu a
nazvat ji treba _mbYesNoCancel ale to se mi vubec nelibi.
Muze mi nekdo poradit? Treba nejaky amatersky programator :-)
Diky
Petr
P.S. Jsou nejake opravne packy na BCB 5.0?[-- Petr Vaclavek --- read: http://www.swnet(tec)cz --]
[-- visit: http://atrey.karlin.mff.cuni(tec)cz/~bla --]Problemy s ref. integritou u Paradoxu
[*] Pavel Kahle <kahle(zv)atlas(tec)cz> - 31.5.2000 12:07:53
Nerad bych vyvolal flame war, ale presto se zeptam:
Jakou pouzivat databazi,
aby byla zadarmo, umela vnoreny select,
a byla spolehliva ?
Diky P.Kahle
users list (2)
[*] Robert Zak <nrsys(zv)psn.sk> - 31.5.2000 12:08:44
Dakujem za rady, nakoniec som to vyriesil tak, ze si do prihlasovacieho
retazca (TADODatabase.DatabaseConnect) pridam Application Name='MojaApl1'
a potom cez
SELECT count(*) FROM master..sysprocesses WHERE (dbid=DB_ID('MyDatabase')
and PROGRAM_NAME = '1')
ziskam pocet ludi prihlasenych k danej aplikacii.
Dakujem este raz vsetkym
Robo
proxy server
[*] nnfapso(zv)kios.sk - 31.5.2000 12:23:22
Ahojte,
Potreboval by som spravit proxy server, cez ktory by som sa mohol napajat na internet. Ten program by bol na jednom pocitaci v LAN. Prosim, pomozte mi.
Dakujem
Problemy s ref. integritou u Paradoxu
[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 31.5.2000 12:28:48
Milan Tomes wrote:
> Jsem dalsi, ktery po zkusenostech rika - ref. integrita ano, ale programove.
> Sam delam nad paradoxovyma tabulkama aplikaci (odhadem tak 10-20) a s docela
> velkym poctem zaznamu (1000-150000) a narazim pri tomto zatizeni na spoustu
> chyb tohoto typu tabulek. Dalsi z hlavnich chyb je spatna prace s indexama.
> Pokud je nad tabulkou definovano vice jak 4-5 sec. indexu tak pri pristupu z
> nekolika dalsich mist v siti je problemem neustale porusovani techto indexu.
> Stalo se mi jiz take to, ze mi spadla hlavicka DB filu a jakoby se ztratilo
> asi 80% vsech zaznamu. Nutno dodat, ze nad hlavnima tabulkama se NEDELA
> zadna prima editace. Vse se odehrava nad pracovnima tabulkama a aktualizace
> se deje pomoci SQL dotazu.
Ja mam aplikaciu nad PDOX-tabulkami, ktora sa pouziva v sieti a v jednej tabulke
je momentalne 400.000 zaznamov. Pouzivam aj indexy aj ref. int. a aplikacia
chodi. Ovsem, urobil som jeden udrzbovy program, ktory zakaznik raz za mesiac
musi povinne spustit. Ten program zoberie DB a MB subory, nacita z nich data a
zapise ich do pripravenej prazdnej databazy, v ktorej su ref. int. a indexy
definovane. Tymto sa vyriesia vsetky pripadne problemy s indexami a ref.
integritou, kt. sa pocas prevadzky nazbieraju. Kupodivu, je to celkom stabilne,
v jednej instalacii pristupuje do aplikacie 7 klientov sucasne a denne do toho
mlatia. Servisny zasah som robil naposledy tusim pred pol rokom.
Samozrejme, dnes by som tu aplikaciu uz robil nad Interbase....Problemy s ref. integritou u Paradoxu
[*] MJ soft <mjsoft(zv)rychnov(tec)cz> - 31.5.2000 12:29:19
InterBase6
Jindra
----- Original Message -----
From: Pavel Kahle <kahle(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 31, 2000 12:07 PM
Subject: Re: Problemy s ref. integritou u Paradoxu
> Nerad bych vyvolal flame war, ale presto se zeptam:
>
> Jakou pouzivat databazi,
> aby byla zadarmo, umela vnoreny select,
> a byla spolehliva ?
>
> Diky P.Kahle
> Bezpecnost programov
[*] nnfapso(zv)kios.sk - 31.5.2000 12:38:49
Ahojte,
Rad by som otvoril diskusiu na temu 'Bezpecnost programov' (resp. 'Ochrana proti crackovaniu'). Ak ma niekto dobre napady, ako ochranit programy pred crackermi, velmi rad by som sa dozvedel viac informacii z tejto oblasti.
Za pomoc vopred dakujem.Obnova zaznamov v DB
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 31.5.2000 12:43:49
> Osobne tento problem resim tak, ze jakmile nekdo otevre detail zaznamu tak
> si explicitne uzamknu zaznam a nikoho jineho do editace nepustim.
Ok. A ako by sa to dalo uzamknut.
PS: Pouziva niekto komponenty SQL Direct? Aky je Vas nazor.
PS2: Ten nazor Vas poprosim radsej na sukr. mail, aby sme si nepohnevali
bohov.
Dakujem, Miso
Problem s RXLib - trojsky kun -
[*] BONNEL TECHNOLOGIE, vyvoj <bonnel(zv)telecom(tec)cz> - 31.5.2000 12:46:01
> -----Original Message-----
> Bene� Jaroslav
> Subject: An: Problem s RXLib - trojsky kun -
> podarilo se mi vysledovat chybu, kdy doslo k pozmeneni zdrojaku v Delphi.
> .........
> 128MB RAM je tedy asi malo?!
Ne, 128 MB je dost, Win 9x je malo. Je treba NT nebo W2k
Mira
aplikace pro MS SQL 7
[*] Ji�� Kr�l jr. - 31.5.2000 13:37:00
muze se nekdo rozdelit o info, jak resi login k MSSQL ze svych aplikaci?
mam na mysli:
1 jmeno/heslo natvrdo v aplikaci ?
vice def. uzivatelu napr. podle nazvu stanic?
nebo podle uzivatelu v domene NT?
diky za any info
JK
Obdelniky v grafice
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 31.5.2000 14:01:11
Porovnanim, zda alespon jeden ze ctyr bodu jednoho obdelniku lezi
uvnitr druheho obdelniku.
pro jeden bod:
result:= ((O2.top<=Y)and(Y<=O2.bottom) and (O2.left<=X)and(X<=O2.right);
Slavek
PS: Pokud ma byt nekde otsre mensi, tak mne nebijte
> -----Puvodni zprava-----
> Od: Parizsky Ladislav [SMTP:parizsky(zv)access-it(tec)cz]
> Odeslano: 31. kvitna 2000 14:28
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: Obdelniky v grafice
>
> Jak zjistim ze v canvasu mi jeden obdelnik zasahl do druheho ?
>
> ladap
Zajimavost s definici tridy
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 31.5.2000 14:13:39
Preji vsem pekneho dne,
muzete mi nekdo rict, proc nasledujici kod je ok a ten dalsi ne?
Tohle je ok:
type
TMyClassA = class;
TMyClassB = class
end;
TMyClassA = class
end;
Tohle je ko:
type
TMyClassA = class;
TMyClassB = class
end;
type {tenhle radek pribyl}
TMyClassA = class
end;
Az doted jsem mel za to, ze trida, pokud je dopredne deklarovana, musi byt
dozadne deklarovana v danem souboru. Ze to ale musi byt v tom samem
type bloku je pro me novinkou. Proc to tak je?
Diky za pripadne odpovedi
Slavek
Problem s RXLib - trojsky kun -
[*] L. ZITA <konference(zv)sales(tec)cz> - 31.5.2000 14:15:13
Behalf Of Bene� Jaroslav
...
> DFM, tak se otevrel v editoru, zabral i 25% zdroju a dostal se na
> kritickou
> hranici 6% zdroju. K zavaznym problemum doslo, bezel-li predtim
> M$ Outlook.
> I kdyz byl regulerne ukoncen, zrejme nevratil vsechny zdroje systemu a po
> naslednem spusteni IDE Delphi a ladeni zdroje spadly az na 2% a system se
> zacal chovat nedefinovanym zpusobem. Minimalizace IDE nepomuze. V tomto
Toho jsem si take vsiml. Se startem Outlooku (2000) pribyde v tasklistu
proces mdm, ktery tam jiz zustava trvale a zere 10-15% prostredku !!!
Vi nekdo jak se toho regulerne zbavit ?
....
> 128MB RAM je tedy asi malo?!
Co se tyce prostredku muzes mit treba 512MB RAM a je to stejne (Win9x).
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
aplikace pro MS SQL 7
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 31.5.2000 14:18:33
> -----P�vodn� zpr�va-----
> Od: Jio� Kr�l jr. [mailto:admin(zv)printo(tec)cz]
> Odesl�no: 31. kv�tna 2000 13:37
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: aplikace pro MS SQL 7
>
>
> muze se nekdo rozdelit o info, jak resi login k MSSQL ze
> svych aplikaci?
>
> mam na mysli:
>
> 1 jmeno/heslo natvrdo v aplikaci ?
To tedy rozhodne ne.
>
> vice def. uzivatelu napr. podle nazvu stanic?
To nechapu - co maji spolecneho uzivatele s nazvy stanic?
jestli vice def. uzivatelu znamena vice definovanych
uzivatelu, tak ano, smozrejme jsou aplikace bezici proti MS SQL Serveru 7.0
viceuzivatelske.
> nebo podle uzivatelu v domene NT?
jestli myslis trusted connection, tak take.
Nevim,co vsechno vis o MS SQL Server, z tech dotazu to nejde poznat.
Umoznuje dva zpusoby autentikace:
1) SQL Server autentikace - uzivatel zadava jmeno a heslo
2) Windows NT autentikace (v 6.5 se tomu tusim rikalo trusted connection),
kdy se identita uzivatele bere z jeho sezeni v NT siti.
Pokud pouzivas NT autentikaci, je zbytecne zobrazovat dialog pro zadani
jmena a hesla, tedy
MyDatabase.LoginPrompt := false;
Jinak neresim nic, vsechno potrebne si vyresi aplikace s SQL Serverem sama.
Konektujes se k databazi prikazem
MyDatabase.Connected := true;
a je to.
Jura
Obdelniky v grafice
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 31.5.2000 08:28:11 -0400
Jak zjistim ze v canvasu mi jeden obdelnik zasahl do druheho ?
ladap
Obdelniky v grafice
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 31.5.2000 14:28:42
Jenodu�e asi nijak. Bude� si muset porovnat sou�adnice prvn�ho a
druh�ho a prostou matematikou a podm�nkama zjistit, jestli se se
prot�naj�. To je st�edo�kolsk� matematika.
Ale graficky jak to zjistit, to by bylo asi slo�it�. Jednodu�e
nev�m.
Dodo
______________________________________________________________
> Od: "Parizsky Ladislav" <parizsky(zv)access-it(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Wed, 31 May 2000 08:28:11 -0400
> P�edm�t: Obdelniky v grafice
>
> Jak zjistim ze v canvasu mi jeden obdelnik zasahl do druheho ?
>
> ladap
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Problem s RXLib - trojsky kun -
[*] Ji�� Kr�l jr. - 31.5.2000 15:02:20
>>Ne, 128 MB je dost, Win 9x je malo. Je treba NT nebo W2k
Ano, urcite to bude OS. Programuju na NT4 a neni problem, a to mam porad
spusteny Outlook, ICQ, EnterpriseManager,Delphi5, Query Analyzer a casto i
kus Office. A taky se 128 MB RAM.
JK
Obdelniky v grafice
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 31.5.2000 15:13:50
Docela jednoduse - podivej se do Win32API helpu na funkce pro
praci s rectangly:
The following functions are used with rectangles.
CopyRect
EqualRect
InflateRect
IntersectRect
IsRectEmpty
OffsetRect
PtInRect
SetRect
SetRectEmpty
SubtractRect
UnionRect
A takova fce IntersectRect by mela byt ta prava.
The IntersectRect function calculates the intersection of two source
rectangles and places the coordinates of the intersection rectangle
into the destination rectangle. If the source rectangles do not
intersect, an empty rectangle (in which all coordinates are set to
zero) is placed into the destination rectangle.
BOOL IntersectRect(
LPRECT lprcDst, // address of structure for intersection
CONST RECT *lprcSrc1, // address of structure with first
rectangle
CONST RECT *lprcSrc2 // address of structure with second
rectangle
);
Petr
[-- Petr Vaclavek --- read: http://www.swnet(tec)cz --]
[-- visit: http://atrey.karlin.mff.cuni(tec)cz/~bla --]Obnova zaznamov v DB
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 31.5.2000 15:18:37
Ja si sejmu pomoci paradoxove funkce getNetUserName() jmeno uzivatele
prihlaseneho do Windows
a pak mam v tabulce polozku Zamek, kterou naplnim tim jmenem. Pokud je
prazdna tak je odemceno, pokud je jina je zamceno. Zamozdrejme pri ukonceni
editace musim tuhle polozku vyprazdnit. Taky tam mam zadni vratka, ze stejny
uzivatel (tj. se stejnym jmenem) muze i do zamceneho zaznamu. Ale to je
kvuli havarii v okamziku uzamceneho zaznamu...
Milan Tomes
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Michal Hlavac
> Sent: Wednesday, May 31, 2000 12:44 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Obnova zaznamov v DB
>
>
> > Osobne tento problem resim tak, ze jakmile nekdo otevre detail
> zaznamu tak
> > si explicitne uzamknu zaznam a nikoho jineho do editace nepustim.
>
> Ok. A ako by sa to dalo uzamknut.
>
> PS: Pouziva niekto komponenty SQL Direct? Aky je Vas nazor.
> PS2: Ten nazor Vas poprosim radsej na sukr. mail, aby sme si nepohnevali
> bohov.
>
> Dakujem, Miso
Problemy s ref. integritou u Paradoxu
[*] Filip <delphi007(zv)angelfire(tec)com> - 31.5.2000 06:21:19 -0700
Diky vsem zucastnenym za tipy, ja se z toho nejak poucim a doufam, ze to chvili vydrzi - mam to jit nainstalovat uz v sobotu...
---
Filip, student
Angelfire for your free web-based e-mail. http://www.angelfire.com
TextWidth s kurzivou
[*] Anton�n Blatn� - 31.5.2000 16:27:37
Zdravim vsechny a dekuji za pripadnou odpoved:
Otazka je prakticky cela v predmetu. Zjistil jsem, ze mi funkce textwidth
spatne pocita delku textu, pokud je napsan (TCanvas je tak nastaven) fontem
s kurzivou. Lisi se skoro presne prave o to nakloneni, coz u velkych fontu
(size 50 a vice) uz je slusny pocet pixelu. Nevite nekdo, jak to spocitat
presne?
Mgr. Anton�n Blatn�
blatny(zv)atlas(tec)cz
Automaticke ukonceni programu
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 31.5.2000 16:29:45
ahoj,
nebylo by lepsi si to dat do OnShow. Me totiz pri OnCreate nefungujou ruzne
TQuery apod.
M.Jirman
----- Original Message -----
From: Petr Smol�k <psmolik(zv)fides(tec)cz>> Ahoj,
> delam program, ktery v prikazovem radku dostane jmeno souboru ke
zpracovani.
> Po zpracovani
> se program musi ukoncit. Problem je, ze program musi bezet jako
> minimalizovany a tak se
> neuplatni zadne FormActivate atd.
>
> Nevim kam dat prikaz Close, nebo jak jinak mu dat prikaz k zavreni.
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Sestava := '';
> if ParamCount>0 then
> begin
> WindowState := wsMinimized;
> Sestava := ParamStr(1);
> Tiskni;
> Close; // Tohle close nefunguje.
> end;
> end;
>
>
> Diky
> Michal Kus
>Paradox - ztraceni zaznamu
[*] P�emysl Neuman <p.neuman(zv)email(tec)cz> - 31.5.2000 17:13:20
Vazeni pratele,
mam na Vas prosbu tykajici se Paradoxu. Rekneme, ze mam table1 a DBNaviator,
pripojeny pres DataSource k table1. Vse je zobrazeno v DBGridu. Poradte mi
prosim, jak lze udelat, aby kdyz vlozim novy zaznam a stisknu Post, a potom
treba po minute resetuji pocitac, aby mi zaznamy nezmizely. Neco jako aby
se to ulozilo na disk ? Je to asi neco jednoducheho, ale ja opravdu netusim,
jak to zaridit. Mockrat dekuji.
Premysl Neuman
W NT 4.0 + D5prof.Maximalizace okna
[*] r.tesar(zv)atlas(tec)cz - 31.5.2000 17:19:52
Ahojte Delf�ni
Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo nahodit okno normalni velikosti z minimalizovaneho okna jakekoliv bezici aplikace. (Pokud se nepletu tak minimalizaci jsem udelal jako CloseWindow(Handle Okna).
Dik za vsechny rady
Radek Tesar
Timage a zobrazen� obr�zku vedle sebe
[*] Ale� Kresta <ales.kresta(zv)atlas(tec)cz> - 31.5.2000 17:42:50
Ahoj,
m�m takov� probl�m: Vlo��m na Form dva TImage (jeden pojmenuji "obrazek" druhy "pozadi"). Pozadi bude mit Align alClient a chci do n�j povkl�dat obrazek vedle sebe. Ud�lal jsem to takhle:
procedure TForm1.Button1Click(Sender: TObject);
var x,y:integer;
begin
for x:=0 to round(pozadi.width/obrazek.width)+1 do
for y:=0 to round(pozadi.height/obrazek.height)+1 do
begin
pozadi.canvas.copyrect(rect(x*obrazek.width,y*obrazek.height,(x+1)*obrazek.width,(y+1)*obrazek.height),obrazek.canvas,rect(0,0,obrazek.width,obrazek.height));
Application.ProcessMessages;
end;
end;
Ale kdy� aplikaci spust�m, zm��knu Button1 a ono se to nakop�ruje dob�e, potom zv�t��m okno aplikace a zm��knu Button1 a ono to nakop�ruje tak jak p�edt�m, ne p�es cel� okno aplikace. Cht�l bych aby se to nakop�rovalo p�es celou plochu aplikace, ale nev�m jak to ud�lat. M�m Delphi 5.
P�edek d�kuji za radu
Paradox - ztraceni zaznamu
[*] bures <bures(zv)ssakhk(tec)cz> - 31.5.2000 17:53:48
Ahoj dej do Table1.AfterPost tento kod dbisavechanges(table1.handle);
Vlada
----- Original Message -----
From: P�emysl Neuman <p.neuman(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 31, 2000 5:13 PM
Subject: Paradox - ztraceni zaznamu
> Vazeni pratele,
>
> mam na Vas prosbu tykajici se Paradoxu. Rekneme, ze mam table1 a
DBNaviator,
> pripojeny pres DataSource k table1. Vse je zobrazeno v DBGridu. Poradte
mi
> prosim, jak lze udelat, aby kdyz vlozim novy zaznam a stisknu Post, a
potom
> treba po minute resetuji pocitac, aby mi zaznamy nezmizely. Neco jako aby
> se to ulozilo na disk ? Je to asi neco jednoducheho, ale ja opravdu
netusim,
> jak to zaridit. Mockrat dekuji.
>
> Premysl Neuman
>
> W NT 4.0 + D5prof.
>Hlidani pristupu na IP adresu
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 31.5.2000 18:34:19
Melo by to jit spravnym nastavenim routovani, tedy
rozdelit sit do subnetu tak, aby stanice nevideli proxy
napriklad:
proxy: 192.168.1.233
stanice s pristupem 192.168.2.1 maska 255.255.0.0
stanice bez pristupu 192.168.2.2 maska 255.255.255.0 (tady tento pocitac vidi jen
subnet 192.168.2.xx
Snad ti to pomuze, jen je otazkou, zda je toto schudne.
Slavek
> -----Puvodni zprava-----
> Od: Jan Naiser [SMTP:tua(zv)ltm(tec)cz]
> Odeslano: 30. kvitna 2000 19:52
> Komu: Delphi konference
> Poedmit: Hlidani pristupu na IP adresu
>
> Preji vsem pekneho dne,
>
> potreboval bych udelat ohlidani pristupu na IP proxy serveru. (Je to v
> organizaci, kde chodi na sit i deti a ne kazdy by se mel dostat na
> internet.) Mam takovou predstavu, ze bych mel na kazde WIN95 stanici bezici
> proces, ktery by monitoroval pristup na IP adresu proxy a nedovolil by
> pripojit se. Schudnejsi by to asi bylo spise obracene - tedy proces na
> stanici, kde bezi proxy a monitorovat pristup z venku (pozadavky na proxy) a
> podle adresy pozadavku dovolit nebo zakazat pristup.
> Psat novy proxy (bezi tam WinRoute) se mi moc nechce, i kdyz by se to tim
> asi vyresilo a zadavat pristupy primo na WinRoutu, ktery to nejakym zpusobem
> umi taky, neni administratorsky schudne, protoze se tam uzivatele dost
> stridaji.
>
> Jedna se mi tedy o to, jak lze monitorovat (na TCP/IP protokolu), co kudy
> chodi, na proxy - z ktere adresy jde pozadavek na proxy a jak ho "stronovat"
> nebo ze strany stanice - kdy jde pozadavek na proxy.
>
> Nedelal jste nekdo nekdy neco podobneho? Za kazde popostrceni kudy se dat
> predem dekuji.
>
> Honza.
>
> TActionList
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 31.5.2000 19:19:15
Preji pekneho dne,
(D5.01P, W98)
muzu nejakym zpusobem pridat k nabidce standartni komponenty TActionList
svoji kategorii akci tak, aby se zaradila k Standard Actions? Pokud ano, tak
jak.
Nemate nekdo nejaky priklad nebo odkaz na priklad?
Diky, Honza.
Maximalizace okna
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 31.5.2000 19:32:29
No ve sve aplikaci je to jasny. Pres objekt
Application.Maximize , pak je tam Restore a Minimize. - teda
nevim, jestli je tam maximize, ale asi jo, ale minimize a restore
je tam urcite.
A u jine aplikace: Musis zjistit handle okna aplikace treba
pomoci API fce FindWindow a pak
Zavreni okna
PostMessage (Handle toho okna ,WM_CLOSE,0,0);
Maxim.
PostMessage (Handle toho okna ,WM_MAXIMIZE,0,0);
Minimalizace
PostMessage (Handle toho okna ,WM_MINIMIZE,0,0);
Atd. tech konstant WM_??????? je tuna. Asi tam bude i neco jako
RESTORE
Dodo
______________________________________________________________
> Od: r.tesar(zv)atlas(tec)cz
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Wed, 31 May 2000 17:19:52 +0200
> P�edm�t: Maximalizace okna
>
> Ahojte Delf�ni
>
> Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo
nahodit okno normalni velikosti z minimalizovaneho okna jakekoliv
bezici aplikace. (Pokud se nepletu tak minimalizaci jsem udelal
jako CloseWindow(Handle Okna).
> Dik za vsechny rady
> Radek Tesar
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Problem s grafikou
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 31.5.2000 15:15:41 -0400
Ahoj
Mam problem s kresleni obdelniku. Mam dva obdelniky pricemz s nima mohu pohybovat po canvasu. Pokud tim jednim prejedu pres ten druhy tak se smaze. Nevite nekdo jak zjistit zda tim obdelnikem nejedu pres ten druhej ?
Ladap
D3 a W2000
[*] Ma��k Petr <rtepema(zv)mbox.vol(tec)cz> - 31.5.2000 22:27:24
Pred casem jsem vznesl dotaz na provoz D3 a W2000. Jelikoz jsem nedostal
odpoved, ptam se pro jistoto jeste jednou, pokud to lze, ci zda jsou nejaka
omezeni.
Diky vsem
RT electronic
Petr Ma��k
rtepema(zv)mbox.vol(tec)cz
Zmena farby a fontu v StatusBare.
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2000 22:36:48
From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> Ako by som mohol nastavit farbu a font pre konkretny panel v TStatusBare,
Ahoj,
U daneho TStatusPanelu nastavis Style na psOwnerDraw a text si budes sam
vykreslovat:
procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar;
Panel: TStatusPanel; const Rect: TRect);
begin
with StatusBar do
begin
Canvas.Font := Font;
Canvas.Font.Color := clBlue;
Canvas.TextRect(Rect, Rect.Left + 1, Rect.Top + 1, Panel.Text);
end;
end;
Petr Vones, amatersky programator
TActionList
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2000 22:36:07
From: "Jan Naiser" <tua(zv)ltm(tec)cz>
> muzu nejakym zpusobem pridat k nabidce standartni komponenty TActionList
> svoji kategorii akci tak, aby se zaradila k Standard Actions? Pokud ano, tak
> jak.
Ahoj,
Podivej se na metodu RegisterActions, priklad najdes ve zdrojaku property
editoru - dbreg.pas
Petr Vones, amatersky programator
TThread a RaiseLastWin32Error
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2000 22:36:37
From: <sw.maurice(zv)centrum(tec)cz>
> mam v aplikaci jeden thread a pokud v Execute toho threadu provedu RaiseLastWin32Error, tak se
ukonci
> beh cele aplikace a podle MemProof zustane v pameti viset krom threadu i hlavni okno formulare
:-(
> Podle napovedy ma dojit k vyvolani EWin32Error, ale proc to zavira aplikaci?
> Jak muzu osetrit obsah Execute, aby v pripade vyjimky /chyby/ doslo jen k ukonceni a uvolneni threadu, bez
> vlivu na jiny thread /try...finally nepomaha/?
Ahoj,
protoze tak dojde k neosetrene vyjimce. V threadu si je musis osetrit sam.
Podivej se ve VCL do zdrojaku ScktComp na tridu TServerClientThread a jeji
metody Execute, HandleException a DoHandleException, z toho by ti melo byt
jasne jak na to.
> A jeste jeden dotaz: jak elegantne pockat na skonceni a uvolneni threadu a pote ho ihned vytvorit znovu?
Nesmis u neho nastavit FreeOnTerminate na True, pak lze pouzit sekvenci
volani metod Terminate, WaitFor, Free.
Pozor vsak na chybu, ktera se tahla az do D4 (v D5 je to uz opraveno), kde
pri ukonceni a znovuvytvoreni threadu muze dojit k trvale nefunkcnosti metody
TThread.Synchronize.
Petr Vones, amatersky programator
Zajimavost s definici tridy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2000 22:40:31
From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Az doted jsem mel za to, ze trida, pokud je dopredne deklarovana, musi byt
> dozadne deklarovana v danem souboru. Ze to ale musi byt v tom samem
> type bloku je pro me novinkou. Proc to tak je?
Ahoj,
Zkratka je to tak definovano ;-) asi by to slo vyhledat nekde v dokumentaci.
Stejne je to s deklaraci interface.
Petr Vones, amatersky programator
Obdelniky v grafice
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 31.5.2000 16:41:53 -0400
A vis tu rovnici jak se to da zjistit matematicky ?
Ladap
aplikace pro MS SQL 7
[*] =?windows-1252?B?Smn47SBLcuFs?= <admin(zv)printo(tec)cz> - 31.5.2000 23:07:00
;-))
vidim, ze musim dotaz blize specifikovat..ufff, no asi takhle:
situace:
-aplikace bezici na "verejnych" terminalech (v ramci firmy)
-tzn. trusted conn je na houby, musi byt vsude vsechna prava nad dB
-chci zabranit tomu, aby nejaky chytrysek s ISQL (nebo necim takovym) prisel
k terminalu, a pomoci sveho NT hesla se hrabal v dB
-app se nejak musi lognout, ale jak to nejlepe vyresit, aby uzivatele vubec
loginy/pwds do dB neznali?
je patrne kam dotazem mirim?
JK
D3 a W2000
[*] ShiCola <P.Sikola(zv)sh.cvut(tec)cz> - 31.5.2000 23:35:53
jede mi to f pohode
ShiCola
----- Original Message -----
From: "Ma��k Petr" <rtepema(zv)mbox.vol(tec)cz>
To: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 31, 2000 10:27 PM
Subject: D3 a W2000
Pred casem jsem vznesl dotaz na provoz D3 a W2000. Jelikoz jsem nedostal
odpoved, ptam se pro jistoto jeste jednou, pokud to lze, ci zda jsou nejaka
omezeni.
Diky vsem
RT electronic
Petr Ma��k
rtepema(zv)mbox.vol(tec)cz
ClientSocket a Error 11001
[*] bures <bures(zv)ssakhk(tec)cz> - 31.5.2000 23:35:50
Ahoj, uz nejako dobu se zlobim se komponentama TClientScoket a
TServerSocket. Kdyz nastane chyba tak se rozeznava podle Errorcode v
procedure OnError a pak se Errorcode nastavi na 0. Ale je jedna chyba ktera
se v teto procedure neda osetrit a to je chyba : Windows socket error:
(11001), On Api 'Async Lookup' . A proto se ptam jestli nekdo ma se Sockety
nejakou zkusenost a poradil by mi, co s touto chybou mam delat ???
Predem dekuji Vlada
aplikace pro MS SQL 7
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.6.2000 06:52:43
> -----P�vodn� zpr�va-----
> Od: Jio� Kr�l [mailto:admin(zv)printo(tec)cz]
> Odesl�no: 31. kv�tna 2000 23:07
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: aplikace pro MS SQL 7
>
>
> ;-))
> vidim, ze musim dotaz blize specifikovat..ufff, no asi takhle:
>
> situace:
>
> -aplikace bezici na "verejnych" terminalech (v ramci firmy)
> -tzn. trusted conn je na houby, musi byt vsude vsechna prava nad dB
> -chci zabranit tomu, aby nejaky chytrysek s ISQL (nebo necim
> takovym) prisel
> k terminalu, a pomoci sveho NT hesla se hrabal v dB
> -app se nejak musi lognout, ale jak to nejlepe vyresit, aby
> uzivatele vubec
> loginy/pwds do dB neznali?
>
> je patrne kam dotazem mirim?
Asi chces mit spolecny ucet pro vsechny uzivatele,
na ktery by se mohli prihlasit pouze z Tve aplikace,
pritom aby se nemohli prihlasit jinak. A je Ti jedno,
ze potom nepoznas, kdo jake zmeny v DB prostrednictvim
te aplikace udelal. V tom pripate klidne dej
login a password natvrdo do aplikace.
Budes spolehat na utajeni techto udaju?
Jakmile to nekdo zjisti, udela si v databazi co chce
a ani nezjistis, kdo to je.
Nevim, co je lepsi na tomto stavu oproti situaci, kdy
je znam prihlaseny uzivatel, muze se sice prihlasit pomoci ISQL
ale ma omezena prava prostredky MS SQL Serveru -
napr. tabulky jen pro cteni anebo vubec, procedury pracuji pouze
v urcitem kontextu (ktery nastavi prihlaseni pomoci Tve aplikace).
Nebylo by to lepsi vymyslet takto?
Jura
Maximalizace okna
[*] r.tesar(zv)atlas(tec)cz - 1.6.2000 07:11:24
Ahojte Delf�ni
Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo nahodit okno normalni velikosti z minimalizovaneho okna jakekoliv bezici aplikace. (Pokud se nepletu tak minimalizaci jsem udelal jako CloseWindow(Handle Okna).
Dik za vsechny rady
Radek Tesar
P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE atd.) nefunguje. Delphi mi hlasi ze takove konstanty nezna !!Paradox - ztraceni zaznamu
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 1.6.2000 07:38:52
Tusim, ze ja jsem pouzival Table.FlushBuffers
Milan Tomes
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> P�emysl Neuman
> Sent: Wednesday, May 31, 2000 5:13 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Paradox - ztraceni zaznamu
>
>
> Vazeni pratele,
>
> mam na Vas prosbu tykajici se Paradoxu. Rekneme, ze mam table1 a
> DBNaviator,
> pripojeny pres DataSource k table1. Vse je zobrazeno v DBGridu.
> Poradte mi
> prosim, jak lze udelat, aby kdyz vlozim novy zaznam a stisknu
> Post, a potom
> treba po minute resetuji pocitac, aby mi zaznamy nezmizely. Neco jako aby
> se to ulozilo na disk ? Je to asi neco jednoducheho, ale ja
> opravdu netusim,
> jak to zaridit. Mockrat dekuji.
>
> Premysl Neuman
>
> W NT 4.0 + D5prof.Maximalizace okna
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.6.2000 07:59:38
> -----P�vodn� zpr�va-----
> Od: r.tesar(zv)atlas(tec)cz [mailto:r.tesar(zv)atlas(tec)cz]
> Odesl�no: 1. �ervna 2000 7:11
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Maximalizace okna
>
>
> Ahojte Delf�ni
>
> Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo
> nahodit okno normalni velikosti z minimalizovaneho okna
> jakekoliv bezici aplikace. (Pokud se nepletu tak minimalizaci
> jsem udelal jako CloseWindow(Handle Okna).
>
> Dik za vsechny rady
> Radek Tesar
>
> P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE
> atd.) nefunguje. Delphi mi hlasi ze takove konstanty nezna !!
Zkus funkci ShowWindow, pouziti je v helpu pro Win32 API
Jura
Paradox - ztraceni zaznamu
[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 01.6.2000 08:04:23
Nastav v BDEADMIN premennu LOCAL SHARE na TRUE.
P�emysl Neuman wrote:
> Vazeni pratele,
>
> mam na Vas prosbu tykajici se Paradoxu. Rekneme, ze mam table1 a DBNaviator,
> pripojeny pres DataSource k table1. Vse je zobrazeno v DBGridu. Poradte mi
> prosim, jak lze udelat, aby kdyz vlozim novy zaznam a stisknu Post, a potom
> treba po minute resetuji pocitac, aby mi zaznamy nezmizely. Neco jako aby
> se to ulozilo na disk ? Je to asi neco jednoducheho, ale ja opravdu netusim,
> jak to zaridit. Mockrat dekuji.
>
> Premysl Neuman
>
> W NT 4.0 + D5prof.DateEdit ako v starej foxke.
[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 01.6.2000 08:09:01
www.rxlib.com
Toto je cela kniznica komponentov, medzi nimi aj editacne pole na Date.
Neviem, ako to fungovalo vo Foxke, ale osobne pouzivam tieto a su celkom
dobre.
Roland Tur�an (RoTurSoft) wrote:
> Zdarvim.
>
> Poradte mi kde by som zohnal nieco ako DateEditBox ako bol v Dos Foxke.
>
> Dakujem.
>
> Roland.aplikace pro MS SQL 7
[*] Robert Zak <nrsys(zv)psn.sk> - 1.6.2000 08:26:24
Ak treba zabranit iba tomu aby sa uzivatelia pomocou hesla NT nemohli dostat
k databaze, postaci asi nastavit pri instalacii SQL, aby prist. prava boli
riadene SQL serverom a nie domenou NT. Prihlasovacie meno potom moze byt
bud jedno (vymyslene a velice tajne), alebo jemne (prip.viac) prekodovany
prihlasovaci login k NT (napr 'Piknova' -> login.. 'Pkionav',
heslo..'Pknv1') a pokial tento kodovaci algoritmus nezverejnis, myslim ze je
to pouzitelne riesenie.
Robo
-----P�vodn� spr�va-----
Od: Ji�� Kr�l <admin(zv)printo(tec)cz>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 1. j�n 2000 0:37
Predmet: RE: aplikace pro MS SQL 7
>;-))
>vidim, ze musim dotaz blize specifikovat..ufff, no asi takhle:
>
>situace:
>
>-aplikace bezici na "verejnych" terminalech (v ramci firmy)
>-tzn. trusted conn je na houby, musi byt vsude vsechna prava nad dB
>-chci zabranit tomu, aby nejaky chytrysek s ISQL (nebo necim takovym)
prisel
>k terminalu, a pomoci sveho NT hesla se hrabal v dB
>-app se nejak musi lognout, ale jak to nejlepe vyresit, aby uzivatele vubec
>loginy/pwds do dB neznali?
>
>je patrne kam dotazem mirim?
>
>JK
Maximalizace okna
[*] bures <bures(zv)ssakhk(tec)cz> - 1.6.2000 08:41:31
Ahoj zkus to takhle ShowWindow(handle,SW_RESTORE);
Vlada
ps funkci CloseWindow snad okno zavres a ne minimalizujes.... ????
----- Original Message -----
From: <r.tesar(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, June 01, 2000 7:11 AM
Subject: Maximalizace okna
> Ahojte Delf�ni
>
> Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo nahodit okno
normalni velikosti z minimalizovaneho okna jakekoliv bezici aplikace. (Pokud
se nepletu tak minimalizaci jsem udelal jako CloseWindow(Handle Okna).
>
> Dik za vsechny rady
> Radek Tesar
>
> P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE atd.)
nefunguje. Delphi mi hlasi ze takove konstanty nezna !!
>Problemy s ref. integritou u Paradoxu
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 1.6.2000 08:57:54
Ja bych si vybral MSDE.
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
----- Original Message -----
From: Pavel Kahle <kahle(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, May 31, 2000 12:07 PM
Subject: Re: Problemy s ref. integritou u Paradoxu
> Nerad bych vyvolal flame war, ale presto se zeptam:
>
> Jakou pouzivat databazi,
> aby byla zadarmo, umela vnoreny select,
> a byla spolehliva ?
>
> Diky P.Kahle
>
>aplikace pro MS SQL 7
[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 1.6.2000 09:46:30
Ahoj,
ja to resim takto:
1. uzivatel zada username a password
2. jeste pred nalogovanim na server nejakym zpusobem zasifruji heslo a na
server poslu user name a zasifrovane heslo. V databazi maji vsichni prava ke
vsemu a to kam je pustim nebo ne, o to se stara aplikace.
Dulezite je, ze si uzivatele nemohou pustit ISQL/Query Analyzer a delat si s
DB co chteji, protoze jejich heslo nefunguje.
Vyjimkou je sa, kteremu heslo nesifruji.
S pozdravem, Lada
> ;-))
> vidim, ze musim dotaz blize specifikovat..ufff, no asi takhle:
>
> situace:
>
> -aplikace bezici na "verejnych" terminalech (v ramci firmy)
> -tzn. trusted conn je na houby, musi byt vsude vsechna prava nad dB
> -chci zabranit tomu, aby nejaky chytrysek s ISQL (nebo necim takovym)
prisel
> k terminalu, a pomoci sveho NT hesla se hrabal v dB
> -app se nejak musi lognout, ale jak to nejlepe vyresit, aby uzivatele
vubec
> loginy/pwds do dB neznali?
>
> je patrne kam dotazem mirim?
>
> JK
>Open - Close
[*] Lauko �tefan <lauko(zv)salamon.sk> - 1.6.2000 09:51:56
Dobry,
vedel by mi niekto poradit v tomto probleme:
- jeden proces vytvory subor na lokalnom disku zapise obsah uzatvory ho.
- druhy proces ho chce otvorit ale Windows ho fizycky este neuzatvoril.
V druhom procese je tento kod:
Var
F :File;
Result:Integer;
begin
AssignFile(F,'Subor.txt');
{$I-}
Reset(F,1);
Result:= IoResult;
While Result <> 0 do
begin
Reset(F,1);
Result:= IoResult;
Application.ProcessMessages;
end;
{$I+}
CloseFile(F);
SpracujSubor('Subor.txt');
end;
Subor existuje, prvy proces ho uzatvoril ale pre druhy je este nezdielatelny???
Doba nezdielatelnosti je rozna 10s,15s,5s... (nahodna).
Je mozne v druhom procese poslat spravu (SendMessage...) pre Windows
aby aktualizoval subor aj na fizyckej urovni.
Pre uplnost:
Prvy proces je DOS-applikacia, druhy je program v D5 ktory ma spracovat TXT-subor.
Odozva je niekedy neuveritelne dlha...
Za odpovede vopred dakujem.
Lauko.
Paradox - ztraceni zaznamu
[*] Milan Schembera <spravce(zv)spektrum(tec)cz> - 1.6.2000 09:52:10
Jeste lze na udalost AfterPost povesit prikaz
TTable(DataSet).FlushBuffers
To funguje bezpecne, mam to odzkousene.
S pozdravem a pranim hezkeho dne
Milan Schembera
Spravce IT
SPEKTRUM CZ a.s.
mailto:spravce(zv)spektrum(tec)cz
mailto:milan(zv)missoftware(tec)cz
P�emysl Neuman wrote:
> Vazeni pratele,
>
> mam na Vas prosbu tykajici se Paradoxu. Rekneme, ze mam table1 a DBNaviator,
> pripojeny pres DataSource k table1. Vse je zobrazeno v DBGridu. Poradte mi
> prosim, jak lze udelat, aby kdyz vlozim novy zaznam a stisknu Post, a potom
> treba po minute resetuji pocitac, aby mi zaznamy nezmizely. Neco jako aby
> se to ulozilo na disk ? Je to asi neco jednoducheho, ale ja opravdu netusim,
> jak to zaridit. Mockrat dekuji.
>
> Premysl Neuman
>
> W NT 4.0 + D5prof.TextWidth s kurzivou
[*] Anton�n Blatn� - 1.6.2000 10:58:08
To prave nejde. Potrebuji to na vsechna aktualni pisma v systemu. Ale dela
to i na obycejny Arial a Times.
T.
Mgr. Anton�n Blatn�
blatny(zv)atlas(tec)cz
OT: Paradox
[*] azeleny(zv)csas(tec)cz - 1.6.2000 10:00:08
DDV,
nevite nekdo prosim (moc), jak z PX formulare, knihovny... (fsl, lsl...)
vydumpovat cely zdrojak?
Standardne je totiz treba v Object expolreru najit nejaky objekt, zobrazit
si jeho metodu a o je ten kamen urazu, vzdy je videt zdrojak pouze od teto
jedne metody, neznam zadny zpusob, jak si prohlidnout nejaky vypis, aby byla
videt implementace vsech metod.
Nejaka funkce v PX7, kterou jsem nenasel, nebo utilita, ktera by to umela...
Za kazdou uzitecnou radu _VELMI_ dekuji.
----------------------------------------------------------------------
Ale� Zelen�
�esk� spo�itela a.s
Na Per�t�n� 1
113 98 Praha 1
Email: azeleny(zv)csas(tec)cz
tel: +420 2 24995 236
----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.Problem s RXLib - trojsky kun -
[*] BONNEL TECHNOLOGIE, vyvoj <bonnel(zv)telecom(tec)cz> - 1.6.2000 10:08:06
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> L. ZITA
> Sent: Wednesday, May 31, 2000 2:15 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Problem s RXLib - trojsky kun -
>
> Toho jsem si take vsiml. Se startem Outlooku (2000) pribyde v tasklistu
> proces mdm, ktery tam jiz zustava trvale a zere 10-15% prostredku !!!
> Vi nekdo jak se toho regulerne zbavit ?
To je divne, mne se zadny "mdm" ani nestartuje, natoz aby zustal. Nesouvisi
to s nainstalovanymi sluzbami pro Outlook? Ja napr. nepouzivam Exchange,
jede mi to lokalne...
Mira
Spusteni DCOM a MDAC v InstallShieldu
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 1.6.2000 10:09:04
Ahoj,
myslim ze omnoho vhodnejsi na tento ucel je instalacny program InnoSetup
http://www.jordanr.dhs.org/isinfo.htm (freeware) aj s nadstavbou SkripMaker
http://www.tafweb.com/scriptmaker.html .
Ak chces uzivatelsku instalaciu mdac hladaj v MSDN "MDAC unattended". Mozem
poslat ak to nenajdes.
Na co su prepinace /r:n /q:u ? Moje dcom95.exe v napovede (dcom95 /?) uvadza
iba /q /t /c.
Palo.
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Ren� Otisk
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, June 01, 2001 8:56 AM
Subject: Spusteni DCOM a MDAC v InstallShieldu
> Hi,
>
> D3, InstallShield Express for D3
>
> Uz jsem tady s tim otravoval, ale k vysledku to nevedlo. Potreboval bych v
> prubehu instalace meho programku instalovat DCOM a MDAC (pouze ODBC
> ovladac pro MS SQL7), ale nevim jak nakonfigurovat IS, aby se mu na pozadi
> spustil DCOM a MDAC. DCOM bych tam mel spustit prikazem DCOM95.EXE /r:n
> /q:u, ale nevim jakym prikazem spustit MDAC aby mi tam necpal vse, ale jen
> ten ovladac a hlavne kde tyto prikazy umistit a kde by mely byt ty
> spustitelne soubory (DCOM95.exe a MDAC_typ.exe)?Maximalizace okna
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 1.6.2000 10:18:23
Musis si do uses pridat knihovnu Windows
Milan Tomes
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of r.tesar(zv)atlas(tec)cz
> Sent: Thursday, June 01, 2000 7:11 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Maximalizace okna
>
>
> Ahojte Delf�ni
>
> Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo
> nahodit okno normalni velikosti z minimalizovaneho okna jakekoliv
> bezici aplikace. (Pokud se nepletu tak minimalizaci jsem udelal
> jako CloseWindow(Handle Okna).
>
> Dik za vsechny rady
> Radek Tesar
>
> P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE atd.)
> nefunguje. Delphi mi hlasi ze takove konstanty nezna !!aplikace pro MS SQL 7
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.6.2000 10:31:27
> -----P�vodn� zpr�va-----
> Od: Ladislav Nagy [mailto:lnag7384(zv)mail.kolej.mff.cuni(tec)cz]
> Odesl�no: 1. �ervna 2000 9:47
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: aplikace pro MS SQL 7
>
>
> Ahoj,
>
> ja to resim takto:
> 1. uzivatel zada username a password
> 2. jeste pred nalogovanim na server nejakym zpusobem
> zasifruji heslo a na
> server poslu user name a zasifrovane heslo. V databazi maji
> vsichni prava ke
> vsemu a to kam je pustim nebo ne, o to se stara aplikace.
>
> Dulezite je, ze si uzivatele nemohou pustit ISQL/Query
> Analyzer a delat si s
> DB co chteji, protoze jejich heslo nefunguje.
> Vyjimkou je sa, kteremu heslo nesifruji.
>
Takove reseni se mi libi :-)
Ale vidim tam problemy
a) V kazdem pripade existuje sifrovaci algoritmus
ve smeru uzivatel -> ucet. Jak ale vzniknou ty ucty - resp. kdo jim zada
heslo?
Mela by to delat Tvoje aplikace, aby si uzivatel mohl zvolit heslo do
aplikace a pritom
zasifrovane heslo bylo pro vsechny tajne. Mas v aplikaci funkci "zmena
hesla"?
b) V MS SQL Serveru je heslo konstantni - proto to sifrovani musi byt pouze
nejaky kodovaci
tajny algoritmus a to neni bezpecna ochrana.
Kdyz to shrnu, moje pripominka b) neni vazna, protoze asi neuvazujeme
soustredeny utok
odbornika a myslim, ze takova ochrana dostacuje. A jestli je vyresen bod a),
aby vubec
nikdo neznal heslo k databazi a heslo k aplikaci zna jenom prislusny
uzivatel,
je to myslim, dobre reseni, ktere pokryva vsechny od pocatku kladene
pozadavky,
teda lze se prihlasit pouze pomoci aplikace a v db je znama identita
prihlaseneho uzivatele.
Fakt se mi to libi, i kdyz jsem spise konzervativni a asi bych nepovolil v
databazi prava na vsechno
(Co kdyz nekdo zalozi novy ucet, nekdo zjisti sve db heslo - napr kvuli
chybe v aplikaci
se vypise zasifrovane heslo do logu? Nebo se nekdo dostane k sifrovacimu
algoritmu
a zjisti si heslo sam?) Bojim se byt optimistou a radeji vzdycky pocitam s
tim,
ze neco nezafunguje tak jak ma, takze bych neprideloval zbytecne velka prava
na databazove
objekty.
V otazce bezpecnosti je lepsi, kdyz je nejaka sluzba nedostupna,
nez kdyz ma nekdo dostupnou sluzbu na niz by nemel mit pravo. Na to se totiz
hned prijde,
ten dotycny si stezuje, ze "neco nemuzu udelat, ONO mi to pise....". Kdezto
druhy pripad
je bezpecnostni dira, o ktere nikdo nevi. A je tam tak dlouho, nez nekdo
zautoci...
Jura
Maxim okna - konstanty
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 01.6.2000 10:31:54
Musis mit pripojeny unit Windows, pak to musi jet. (v casti nahore zdrojaku kde je klausule Uses tak
tam napises k ostatnim jeste Windows).
Dodo
______________________________________________________________
> Od: r.tesar(zv)atlas(tec)cz
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Thu, 1 Jun 2000 07:11:24 +0200
> P�edm�t: Maximalizace okna
>
> Ahojte Delf�ni
>
> Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo nahodit okno normalni velikosti z
minimalizovaneho okna jakekoliv bezici aplikace. (Pokud se nepletu tak minimalizaci jsem udelal jako
CloseWindow(Handle Okna).
>
> Dik za vsechny rady
> Radek Tesar
>
> P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE atd.) nefunguje. Delphi mi hlasi ze
takove konstanty nezna !!
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Maxim okna - to uz je dobre - konstanty
[*] Ladislav =?ISO-8859-1?Q?Dole=BEel?= <dodo(zv)centrum(tec)cz> - 01.6.2000 10:38:10
Aha, jsem to uplne po..al.
Takze musis mit pripojeny unit Windows, tam jsou ty konst. a pak to vypada takto (to jsem taky
pokazil)
PostMessage (Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
SC_MINIMIZE,SC_RESTORE a pod... je jich spousta.
Zavreni okna se provede - jak jsem asi psal treba
PostMessage (H,WM_CLOSE,0,0);
Dodo
______________________________________________________________
> Od: Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz>
> Komu: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Thu, 1 Jun 2000 07:59:38 +0200
> P�edm�t: RE: Maximalizace okna
>
>
>
> > -----P�vodn� zpr�va-----
> > Od: r.tesar(zv)atlas(tec)cz [mailto:r.tesar(zv)atlas(tec)cz]
> > Odesl�no: 1. �ervna 2000 7:11
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Maximalizace okna
> >
> >
> > Ahojte Delf�ni
> >
> > Potreboval bych vedet zda nekdo nevite jak maximalizovat nebo
> > nahodit okno normalni velikosti z minimalizovaneho okna
> > jakekoliv bezici aplikace. (Pokud se nepletu tak minimalizaci
> > jsem udelal jako CloseWindow(Handle Okna).
> >
> > Dik za vsechny rady
> > Radek Tesar
> >
> > P.S. priklad ze vcerejska posilat oknu WM_MAXIMIZE (RESTORE
> > atd.) nefunguje. Delphi mi hlasi ze takove konstanty nezna !!
>
> Zkus funkci ShowWindow, pouziti je v helpu pro Win32 API
>
> Jura
>
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Aktualni okno
[*] r.tesar(zv)atlas(tec)cz - 1.6.2000 10:39:19
Ahojte Delf�ni
Potreboval mam aplikaci, kde projizdim vsechna okna, funkci IsWindowVisible(Handle). Jakym zpusobem zjistim, ze prave kontrolovane okno je aktivni
Dik za vsechny rady
Radek Tesar
Spusteni URL apod. pod WinNT
[*] DiGi <DiGi(zv)MujMail(tec)cz> - 1.6.2000 11:14:23
Ahoj,
Pomoci ceho se da pod WinNT/2k spustit URL nebo treba mailto: ?
Pod win9x to funguje v pohode pres WinEXEC ale pod NT to hazi chybu
ERROR_FILE_NOT_FOUND. Ostatni veci (soubory) se spousti pomoci
ShellExecute a chodi to celkem v pohode..
D5/ Windows-System-kde-furt-neco-nechodi (api funkce)
DiGi
aplikace pro MS SQL 7
[*] Bab�k Martin (+42035620,MUS a.s. M.Babik) <M.Babik(zv)mus(tec)cz> - un 2000 10:18:49
S MS SQL 7 nemam zkusenosti, delam v Informixu. Nechapu proc by mely byt pro k
azdeho vsechna prava a prihlasovat se stejne? To skutecne delaji vsichni se vs
im, pak nema cenu to osetrovat. Nevim jestli to MS SQL 7 zvladne, ale jde urci
tym lidem pridelit urcita prava k urcitym tabulkam a i k jednotlivym fieldum (
Informix) osobne to resim pres role, neb urcite skupiny uzivatelu maji stejna
prava.
M&B
>>> MUS.TC."SMTP: Polak Jiri #Jiri.Polak(zv)tconsult(tec)cz" 06/01 6:59 >>>> -----Puvodn� zpr�va-----
> Od: Jio� Kr�l [mailto:admin(zv)printo(tec)cz]
> Odesl�no: 31. kvitna 2000 23:07
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: RE: aplikace pro MS SQL 7
>
>
> ;-))
> vidim, ze musim dotaz blize specifikovat..ufff, no asi takhle:
>
> situace:
>
> -aplikace bezici na "verejnych" terminalech (v ramci firmy)
> -tzn. trusted conn je na houby, musi byt vsude vsechna prava nad dB
> -chci zabranit tomu, aby nejaky chytrysek s ISQL (nebo necim
> takovym) prisel
> k terminalu, a pomoci sveho NT hesla se hrabal v dB
> -app se nejak musi lognout, ale jak to nejlepe vyresit, aby
> uzivatele vubec
> loginy/pwds do dB neznali?
>
> je patrne kam dotazem mirim?
Asi chces mit spolecny ucet pro vsechny uzivatele,
na ktery by se mohli prihlasit pouze z Tve aplikace,
pritom aby se nemohli prihlasit jinak. A je Ti jedno,
ze potom nepoznas, kdo jake zmeny v DB prostrednictvim
te aplikace udelal. V tom pripate klidne dej
login a password natvrdo do aplikace.
Budes spolehat na utajeni techto udaju?
Jakmile to nekdo zjisti, udela si v databazi co chce
a ani nezjistis, kdo to je.
Nevim, co je lepsi na tomto stavu oproti situaci, kdy
je znam prihlaseny uzivatel, muze se sice prihlasit pomoci ISQL
ale ma omezena prava prostredky MS SQL Serveru -
napr. tabulky jen pro cteni anebo vubec, procedury pracuji pouze
v urcitem kontextu (ktery nastavi prihlaseni pomoci Tve aplikace).
Nebylo by to lepsi vymyslet takto?
Jura
Aktualni okno
[*] bures <bures(zv)ssakhk(tec)cz> - 1.6.2000 11:20:42
Ahoj zkus api funkci GetForgroundWindow
Vlada
----- Original Message -----
From: <r.tesar(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, June 01, 2000 10:39 AM
Subject: Aktualni okno
> Ahojte Delf�ni
>
> Potreboval mam aplikaci, kde projizdim vsechna okna, funkci
IsWindowVisible(Handle). Jakym zpusobem zjistim, ze prave kontrolovane okno
je aktivni
> Dik za vsechny rady
> Radek Tesar
>