Archív konference Delphi

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

tADODataSet

[*] JIM Design <jim.design(zv)iol(tec)cz> - 11.1.2001 21:24:57

ahoj,

to je docela zajimave, nemohl bys o tom napsat vic (co je v tabulce, SQL
ktere pises, atd.)?
me a vetsine z nas to totiz normalne funguje.
a ta chyba znamena ze nestojis na zadnem recordu - coz je logicke.

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of zeman
Sent: Thursday, January 11, 2001 5:47 PM
To: delphi-l(zv)fwd(tec)cz
Subject: tADODataSet


Ahoj vsichni,

mel bych jeden problem, na ktery jsem kratky :

kdyz pouzivam v Delphi objekt typu tADODataSet (nebo tADOQuery) pro pristup
to databaze MS Acces a ten po Open vrati prazdny RecordSet, nejde objekt ani
zavrit (Close), ani uvolnit (Free).
Vzdy to ohlasi chybu : Operation requires current record.

Je to normalni ? Prazdne dotazy naveky ?

Zdvorile dekuji za pripadna reseni.

Martin Zeman


ADOExpress Update Patch

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2001 21:48:21

Ahoj,

ADOExpress Update available for download
http://community.borland.com/article/0,1410,26606,00.html

Petr Vones, amatersky programator

Prebitecna okna

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 11.1.2001 22:03:20

Asi to nechapu. Proc je nutne neco pretahovat na IEFrame a zjistovat handle
IEFrame ? Proste si lze zjisti handle pod ukazatelem mysi:

function GetWinHandle: HWND;
var cpoint: TPoint;
begin
GetCursorPos(cpoint);
Result := WindowFromPoint(cpoint);
end;

Nepise tu nekdo nahodou simulator surfovani po internetu ?

Jan Skopovy

----- Original Message -----
From: "Milan #ݿek" <Cizek.Milan(zv)seznam(tec)cz>
Subject: Re: Prebitecna okna


a nevite prosim nekdo, jak by se dala udelat takova ta machrovina, kdy se
pomoci drag&drop pretahne nejaky objekt na cast okna (treba IEFrame) a vrati
se Handle??

Zarovnanie textu v tlacitku do strany

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2001 22:06:51

From: "Jan Skopov�" <jsdelphi(zv)atlas(tec)cz>
> To je prilis obecne. V jakem tlacitku ? Ve standartnim TButton nikoliv. Je
> moznost si stahnout nejakou free komponentu nebo si odvodit vlastni tlacitko

Ahoj,

napriklad TJvImgBtn (http://www.egroups.com/files/JEDI-VCL/JediVCLpv.zip), kde
nastavis Margin na 0..n a pomoci Layout urcis zarovnani vlevo ci vpravo.

Petr Vones, amatersky programator


Tlacitka na Taskbaru

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2001 22:15:20

From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> chtel bych se zeptat, jak udelat dalsi tlacitka v taskbaru (ne v system
> tray). Stejne jak to dela MS Outlook. Potreboval bych to do sve
> aplikace, kde si uzivatel poklepe v gridu na nejaky zaznam a vyskoci mu
> nove okno s detailnim popisem. Uzivatel si muze otevrit kolik oken chce
> a rad by se mezi nemi prepinal na taskbaru po vzoru MS Office.

Ahoj,

napriklad takhle:

type
TForm2 = class(TForm)
private
{ Private declarations }
protected
procedure CreateParams(var Params: TCreateParams); override;
public
{ Public declarations }
end;

var
Form2: TForm2;

implementation

{$R *.DFM}

{ TForm2 }

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
with Params do
begin
ExStyle := ExStyle or WS_EX_APPWINDOW;
WndParent := GetDesktopWindow;
end;
end;

end.

Petr Vones, amatersky programator


TWinControl a spotreba systemovych zdroju

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.2001 22:24:05

From: "Petr Adasek" <petr.adasek(zv)iol(tec)cz>
> Ve sve aplikaci mam neco na zpusob gridu - tzn. tabulka napr. 4 x 50 bunek.
> Je to neco jako "rozvrh" - vyrobni plan stroje (napr. 4 smeny x 50 dni.)
> V bunkach jsou umistene dalsi objekty - jednotlive zakazky (na bazi TShape).
> Asi namitnete, ze by to slo udelat napr. pomoci DrawGridu, ale ja potrebuju,
> abych mohl ke kazde bunce (TPanelu) pristupovat jako k samostatnemu
> "objektu"- tzn. aby ten TPanel byl Owner tech TShape umistenych uvnitr nej.
> Asi to neni nejlepsi reseni, ale v te aplikaci uz je to tak "zazrane", ze
> bych
> to musel od zakladu predelat - a do toho se mi moc nechce...

Ahoj,

obavam se, ze to bude ale jedine reseni, protoze takhle je to koncepcne
ponekud silene.

Petr Vones, amatersky programator

DLL a MDI

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

From: "Radek Janu# FSG" <janus(zv)foresta(tec)cz>
> Z MDI aplikace vol�m DLL knihovnu , ktera je s formularem. Tento formular se
> vsak vzdy zobrazi jako modalni. Nevi nekdo jak udelat aby formular
> obsazeny v DLL knihovne se zobrazit jako MDI child v me MDI aplikaci ?

Ahoj,

tohle je pomerne problematicke, pokud ale prelozis jak apliakci tak DLL s
balicky, tak si usetris mnoho prace. Patrne to ma byt nejaka aplikace, do
ktere budes pak pomoci DLL pridavat dalsi moduly. Podivej se treba na tenhle
clanek: http://www.obsof.com/delphi_tips/DL613.html

Petr Vones, amatersky programator

MDI Form & Menu & AutoHotKeys

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

From: "Radek KALA" <Kala(zv)atlas(tec)cz>
> Problem, mam D5 Update Pack
> Kdyz udelam MDI Form a v nem oteviram dalsi MDIChild tak pokud
> mam nastaveno WindowMenu tak se mi tam pekne skladaji
> vsechny okna, ktera otevru a uzivatel se muze pekne prepinat.
> Chci-li si ale ulehcit praci a nastavim AutoHotKeys na automatic
> tak se tam nic nenasklada.

Ahoj,

je to chyba ve VCL v D5.

Petr Vones, amatersky programator


Record nebo TClass

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

From: "Ji�� Fait" <fait(zv)jakl(tec)cz>
> Jaky je rozdil mezi nasledujicimi pristupy, jde mi o zatizeni pameti, zdroju
> atp.
>
> Type
> TTestRecord = record
> NejakyRetezec:string[20];
> NejakeCislo:integer;
> end;
>
> var
> MujRecord:TTestRecord;

Timto vytvoris bezny zaznam, velikost jeho fyzicke reprezentace v pameti
zjistis funkci SizeOf(TTestRecord)

> -----------------------------
> NEBO
> -----------------------------
>
> Type
> TTestRecord = Class
> NejakyRetezec:string[20];
> NejakeCislo:integer;
> end;

Timto definujes tridu a ne zaznam, kterou pak musis vytvorit a zrusit. Pokud
ji chces pouzit podobne jako zaznam, tak to v tomto pripade nema prilis smysl.

Petr Vones, amatersky programator

DAO

[*] Erik Salaj <winsoft(zv)napri.sk> - 11.1.2001 22:41:36

> Co potrebujem aby mi isly komponety DAO 3.5 ale bez ACCESU ? A kde sa to da zohnat ?

Napr. nase DAO komponenty podporuju DAO 3.5 aj DAO 3.6
( http://www.cybermagic.co.nz/winsoft ), pripadne pozri
http://www.kylecordes.com .

Erik

Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 11.1.2001 23:11:51

Zdravim vsechny,

existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
Pokud napisu

select text from all_views where view_name='....';

tak mi to sice vrati, ale ne cely (pouze zacatek).
Dik za radu
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741

terminalove ctecky carkoveho kodu

[*] M. Winkler <m.winkler(zv)seznam(tec)cz> - 11.1.2001 23:15:15

Nazdar,

prave na zaklade tech zprav me napadlo pozadat o link
nebo vice informaci.
Potrebuji ziskat zakladni prehled o standardech, pro ktere
budu treba schopen generovat stitky a take je tisknout (Sinea ???).

A take link na slusne dodavatele, mate-li nekdo nejake zkusenosti.
Tohle ovsem zavani reklamou, takze poprosim o pripadne odpovedi na soukromy
mail.

Dik za Vas cas.


M. Winkler


----- Original Message -----
From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 11, 2001 6:30 PM
Subject: RE: terminalove ctecky carkoveho kodu


> Nazdar,
>
> asi pred 14 dny probihala diskuze o cteckach caroveho kodu v delphi
> konferenci. Zkus se podivat do archivu, urcite to tam najdes. V archivu
> muzes hledat tady: http://www.delphi(tec)cz/hledani.asp
>
> Ales
>
> > -----Original Message-----
> > From: Marian Winkler [mailto:M.Winkler(zv)seznam(tec)cz]
> > Subject: terminalove ctecky carkoveho kodu
> >
> > Ahoj,
> >
> > dostal jsem za ukol zabudovat vyhledove do
> > sklad. hospodarstvi zpracovani udaju ze ctecek
> > kodu.

Dialog pro vyber adresare (jako v instalacnich pro

[*] Jiri Stepanek <jiri.stepanek(zv)atlas(tec)cz> - 11.1.2001 23:33:56

Zdravim cleny mailing listu!

Mam problem se zobrazenim dialogu pro vyber adresare. Existuje sice funkce
SelectDirectory, ale ta (alespon v Del3) zobrazuje nejake podivne okno,
ktere obsahuje i seznam souboru. Jde nejak zobrazit stejne okno jako
pouzivaji instalatory (nejlepe pomoci API funkce).

Zkousel jsem sledovat jeden instalator program ApiSpy, pro otevreni dialogu
se spoustela funkce GetSaveFileNameA, ktera ma skoro stejne parametry jako
GetSaveFileName. Kdyz jsem ale tohle zkousel, zobrazil se mi normalni dialog
pro ulozeni souboru.... ????


Dekuji za pomoc
======================================================
Jiri Stepanek <jstep(zv)volny(tec)cz, jiri.stepanek(zv)atlas(tec)cz>
student Gymnazia trida Kapitana Jarose Brno
Web: www.jaroska(tec)cz, math.jaroska(tec)cz
W(zv)P: wap.jaroska(tec)cz
======================================================

DATA Z KONFERENCE ZA LISTOPAD 2000

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 00:32:56

Preji vsem pekneho dne po delsi dobe,

konecne se mi podarilo dat na web dalsi data z nasi konference:

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

Zacatkem pristiho tydne dodam jeste prosinec 2000 a zase budou
chvili data kompletni.

Soucasne s tim mensi informace: docasne nefunguje stahovani
starsich dat z managementu(tec)cz, ale z delphi(tec)cz to jde v pohode.

Slavek


Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


Dialog pro vyber adresare (jako v instalacnich pro

[*] Tom� Kru��k�����+�8��k)�g���� - 12.1.2001 06:22:23

Zkus se podivat na komponentu, implementovanou v PRO Library nazvanou
ProSelDirDialog. Ta zobrazuje dialogove okno pro vyber adresare.

Tom�# KRU�#K
(PROGRAM#TOR)

e-mail: t.kruzik(zv)msp.mesit(tec)cz
tel.: 0632-522632
mobil: 0603-947060
ICQ: 99789730


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Jiri Stepanek
Sent: Thursday, January 11, 2001 11:34 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Dialog pro vyber adresare (jako v instalacnich programech - ne
SelectDirectory)


Zdravim cleny mailing listu!

Mam problem se zobrazenim dialogu pro vyber adresare. Existuje sice funkce
SelectDirectory, ale ta (alespon v Del3) zobrazuje nejake podivne okno,
ktere obsahuje i seznam souboru. Jde nejak zobrazit stejne okno jako
pouzivaji instalatory (nejlepe pomoci API funkce).

Zkousel jsem sledovat jeden instalator program ApiSpy, pro otevreni dialogu
se spoustela funkce GetSaveFileNameA, ktera ma skoro stejne parametry jako
GetSaveFileName. Kdyz jsem ale tohle zkousel, zobrazil se mi normalni dialog
pro ulozeni souboru.... ????


Dekuji za pomoc
======================================================
Jiri Stepanek <jstep(zv)volny(tec)cz, jiri.stepanek(zv)atlas(tec)cz>
student Gymnazia trida Kapitana Jarose Brno
Web: www.jaroska(tec)cz, math.jaroska(tec)cz
W(zv)P: wap.jaroska(tec)cz
======================================================


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

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

sloupcove bloky

[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 12.1.2001 07:36:59

Tusim ze to asi nepujde, ale prece jen: nevite, jestli se u TRichEdit
daji nejak delat sloupcove bloky?
Diky i za zapornou odpoved (jen abych mel jistotu).

Milan Dvorak
dvorak(zv)gymzn(tec)cz


Dynamicka tvorba menu podle pritomnych baliku v MD

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 08:07:05

Ahoj,

sice ponekud starsi, ale jsem jeste mailama v minulem stoleti a odpovezeno nebylo. :-)

Pokud se podivas na tu stranku, kterou hlasa Petr Vones a prectes si ji dukladne,
naleznes i jak to psat v Bui;deru. Konkretne sekce initialization a finalization provedes
nasledujicimi direktivami:

pragma startup initUnit2
#pragma exit finalUnit2

Slavek

> Ahoj,
>
> nebylo by neco podobnyho i pro C++ Builder 5?
> Nevim, jak udelat v BCB initialization sekci.
>
> Predem dekuji.
>
> Martin Falta
> martin.falta(zv)atlas(tec)cz
>
> >
> > Ahoj,
> >
> > ohledne pluginu je pak vycerpavajici clanek jeste tady:
> > http://www.obsof.com/delphi_tips/DL613.html
> >
> > Petr Vones, amatersky programator
> >
> >
>
>
>
>
--------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
* K Jezisku, panacka, ja se budu kolebati...
* Narodil jsem se, radujte se...
--------------------------------------


Dialog pro vyber adresare (jako v instalacnich pro

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 12.1.2001 08:08:27

Ahoj,

Zkus BrowseDirectory() z RxLib misto SelectDirectory(Directory,[],0)
napr.
If BrowseDirectory(Directory,'Vyhled�n� adres߰e nebo c�lov�ho disku pro
...',0) Then ..
Vzhled prvku se ridi promennou ve standardni UNIT Controls
var
NewStyleControls: Boolean;

Pokud je TRUE, budou pouzity nove styly ovladacich prvku.

Jaro B.

> -----P�vodn� zpr�va-----
> Od: Jiri Stepanek [SMTP:jiri.stepanek(zv)atlas(tec)cz]
> Odesl�no: 11. I 2001 23:34
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Dialog pro vyber adresare (jako v instalacnich
> programech - ne SelectDirectory)
>
> Zdravim cleny mailing listu!
>
> Mam problem se zobrazenim dialogu pro vyber adresare. Existuje sice
> funkce
> SelectDirectory, ale ta (alespon v Del3) zobrazuje nejake podivne
> okno,
> ktere obsahuje i seznam souboru. Jde nejak zobrazit stejne okno jako
> pouzivaji instalatory (nejlepe pomoci API funkce).
>
> Zkousel jsem sledovat jeden instalator program ApiSpy, pro otevreni
> dialogu
> se spoustela funkce GetSaveFileNameA, ktera ma skoro stejne parametry
> jako
> GetSaveFileName. Kdyz jsem ale tohle zkousel, zobrazil se mi normalni
> dialog
> pro ulozeni souboru.... ????
>
>
> Dekuji za pomoc
> ======================================================
> Jiri Stepanek <jstep(zv)volny(tec)cz, jiri.stepanek(zv)atlas(tec)cz>
> student Gymnazia trida Kapitana Jarose Brno
> Web: www.jaroska(tec)cz, math.jaroska(tec)cz
> W(zv)P: wap.jaroska(tec)cz
> ======================================================
>
>
>

Chranen pristup do databaze...

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 08:14:46

Ahoj,

jestli se nemylim, pak sice universalni heslo neexistuje, ale pokud se
dostanes k souboru, ve kterem je db ulozena, dostanes se i k datum (stejne
jako v Paradoxu). Staci si otevrit databazi jinde, kde znas adminske heslo.
Hesla totiz nejsou ulozena ve stejne databazi jako data. Tohle povazuju za
velkou bezpecnostni diru.

Slavek


>
> ----- Original Message -----
> From: "JIM Design" <jim.design(zv)iol(tec)cz>
>
> > ahoj,
> >
> > jakou databazi mas na mysli?!
> > Jestli to je Access nebo IB tak heslo nema vyznam, protoze existuji
> > univerzalni hesla.
> >
> > M.Jirman
>
> Ahoj.
>
> Nepreklepl jsi se ? Opravdu existuje universalni heslo pro IB (InterBasi)
> ????
>
> Ludek
>
>
--------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
* K Jezisku, panacka, ja se budu kolebati...
* Narodil jsem se, radujte se...
--------------------------------------


terminalove ctecky carkoveho kodu

[*] Michal K�s <kus(zv)tangosw(tec)cz> - 12.1.2001 08:38:54

Ahoj,
pou�iteln� jsou jen tyto dva zp�soby:

1) bezdratove snimace caraku (RF)
Pou�iteln� jsou jen pro sn�man� car�ku napr. na velk�
krabici, kde nestaci kabel od standarniho snimace.
Prakticky jich neni mozne k jednomu PC pripojit v�c,
proto�e program musi na data ze snimace nejak reagovat
a uzivatel musi vedet co se deje.

2) Mobilni termin�ly vybavene scanerem
Existuje rada zarizeni Psion, BARman, Formula, Systel.
Tady musis napsat aplikaci pro terminal a pak
neco pro import dat do tveho programu. Nektere
ti data nasypou do souboru, z jinych si je muzes
pres seriak vytahnout sam.
POZOR! - vyvojov� prostredi muze stat i 60 tisic!!

Pouzivame BARmana, protoze je levny :-) (20-30 tis. kc),
jednoduchy a hlavne mame protokol pro primou komunikaci
s terminalem, takze nemusime data posilat pres nejaky
soubor. Podivej se k nam na www.tangosw(tec)cz.

Dalsi adresy www.droptop(tec)cz, www.tpc(tec)cz, firmy POINT.X a ESP
(web nevim).

Michal K�s
TANGO software s.r.o.
pokladn� syst�my pro restaurace a obchody
Krymsk� 42
360 01 Karlovy Vary
kus(zv)tangosw(tec)cz
www.tangosw(tec)cz


> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Marian Winkler
> Sent: Thursday, January 11, 2001 4:47 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: terminalove ctecky carkoveho kodu
>
>
> Ahoj,
>
> dostal jsem za ukol zabudovat vyhledove do
> sklad. hospodarstvi zpracovani udaju ze ctecek
> kodu. Nemam s tim zadne zkusenosti a potreboval
> bych poradit nejaky link, kde o %subj% muzu
> sehnat potrebne informace (standardy, nejrozsirenejsi typy,
> vyrobci, komponenty pro D5, ...),
> uvital bych take informace jak obslouzit zpracovani udaju
> v Delphi.
>
> Vyhledove maji byt nasazeny terminalove ctecky (vzdalenost
> k PC cca 50m - hraje-li to roli) a v provozu jich bude
> zaroven 2 - 5. Pocet sklad polozek do 20.000.
> Vice informaci zatim nemam.
>
> D5Prof SP1, W2k
>
> Budu vdecny za kazdou radu.
>
> M. Winkler
>
>
> _____________________________________________________________________
> Po�ten��ko pro ka�d� den: http://www.novinky(tec)cz
>
>

Komponenty Edit

[*] Miroslav Hro��o���#�,�(�j�Z��3 - 12.1.2001 09:24:56

Dobry,

Neviete mi poradi#, kde by sa dali zohnat komponenty pre Edit.
Potreboval by som take komponenty, pre ktore je mozne nastavit masku editu pre textove alebo numericke polia.
MaskEdit mi po funkcnej stranke nevyhovuje.

Miro Hrosso


Chranen pristup do databaze...

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 12.1.2001 09:41:40

ahoj,

> jestli se nemylim, pak sice universalni heslo neexistuje, ale
> pokud se

pavel cisar psal:
Pro ty co nevladnou anglictinou:
Interbase obsahuje od verze 4 hned dve bezpecnostni diry
nebyvaleho rozsahu a nebezpecnosti. Prvni je zabudovany ucet a
heslo s administratorskymi pravy. Na rozdil od uctu SYSDBA tento
ucet nelze zrusit a heslo nelze zmenit. Ucet byl doplnen
vyvojarskym tymem IB fy Borland v roce 1992 pro interni pristup k
bezpecnostni databazi ISC4.GDB. Druha se tyka zabudovane
funkce, ktera dovoluje sestrelit bezici server nebo zrusit jakoukoliv
databazi (podle predanych parametru). Tuto "funkcionalitu" si
vyzadal tym pro testovani IB v roce 1994 a naleza se take v
produkcni verzi kodu.> dostanes k souboru, ve kterem je db ulozena, dostanes se i k
> datum (stejne jako v Paradoxu). Staci si otevrit databazi jinde, kde
znas
> adminske heslo.
> Hesla totiz nejsou ulozena ve stejne databazi jako data.
> Tohle povazuju za velkou bezpecnostni diru.

to je otazka bezpecnosti systemy na serveru, ne DB.
pokud ti lidi nemuzou kopirovat fajly ze serveru, na DB se nedostanou.

Chranen pristup do databaze...

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 09:45:03

Ahoj,

> > jestli se nemylim, pak sice universalni heslo neexistuje, ale
> > pokud se
> pavel cisar psal:
> Pro ty co nevladnou anglictinou:
> Interbase obsahuje od verze 4 hned dve bezpecnostni diry
> nebyvaleho rozsahu a nebezpecnosti. Prvni je zabudovany ucet a
> heslo s administratorskymi pravy. Na rozdil od uctu SYSDBA tento
> ucet nelze zrusit a heslo nelze zmenit.
****Mas pravdu. Ja jsem zapomnel, ze ne vsichni provedli upgrade. :-)

Slavek


--------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
* K Jezisku, panacka, ja se budu kolebati...
* Narodil jsem se, radujte se...
--------------------------------------


Chranen pristup do databaze...

[*] L. ZITA <konference(zv)sales(tec)cz> - 12.1.2001 09:50:19

Ahoj.

ad uniheslo
No. Vcera tu probehlo, ze existuje. Uz je na to opravny Path.

ad. data
Tohle nelze povazovat za diru.
Pokud se mi uz nekdo naboura na server a stahne se data, Pak uz ma tisic a
jednu moznost jak
se dostat i k ostatnim udajum a rozlousknout je.
Predpokladam, ze se nebavime o bezpecnosti IB bezici na Win9x.
Spise mi vadi, ze ze ics4.gdb je pro vsechny viditelna a citelna. Hesla
jsou sice zakodovana,
ale v dnesni dobe pri max delce 8 znaku mi to nepripada az tak bezpecne.

Ludek


----- Original Message -----
From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>> Ahoj,
>
> jestli se nemylim, pak sice universalni heslo neexistuje, ale pokud se
> dostanes k souboru, ve kterem je db ulozena, dostanes se i k datum (stejne
> jako v Paradoxu). Staci si otevrit databazi jinde, kde znas adminske
heslo.
> Hesla totiz nejsou ulozena ve stejne databazi jako data. Tohle povazuju za
> velkou bezpecnostni diru.
>
> Slavek
>
>
> >
> > ----- Original Message -----
> > From: "JIM Design" <jim.design(zv)iol(tec)cz>
> >
> > > ahoj,
> > >
> > > jakou databazi mas na mysli?!
> > > Jestli to je Access nebo IB tak heslo nema vyznam, protoze existuji
> > > univerzalni hesla.
> > >
> > > M.Jirman
> >
> > Ahoj.
> >
> > Nepreklepl jsi se ? Opravdu existuje universalni heslo pro IB
(InterBasi)
> > ????
> >
> > Ludek
> >
> >
>
>
> --------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> http://swnet(tec)cz
> * K Jezisku, panacka, ja se budu kolebati...
> * Narodil jsem se, radujte se...
> --------------------------------------
>

DAO

[*] Martin <geoplan(zv)pp.sinet.sk> - 12.1.2001 09:52:09

Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
MAm problem . Urobil som si programcek v D5 s komponentamy od Erika Salaje DAO, ktorymi pristupujem na databazu Acces. Ak to spustam pod NT 4.00 tak to ide dobre . Ale ak to spustim pod Win95 tak sa to ruca. Ale iba dovtedy kym nenaistalujem Internet explorer. Potom to uz bezi v pohode. Pravdepodobne zaktualizuje nejake DLL, nie ? V NT40 uz IE je standartne.
Musim instalovat IE ? Nestacilo by len nejake DLL 20

Martin


Dialog pro vyber adresare (jako v instalacnich pro

[*] L. ZITA <konference(zv)sales(tec)cz> - 12.1.2001 09:55:44

Ahoj.
Ja to doplnim o podotazku. Jak se da nastavit pocatecni adresar u
BrowseDirectory ?
Mne to zacina vzdy od rootu. Nekdy bych to chtel mit uz "predrozbalene".

Ludek

----- Original Message -----
From: "Bene# Jaroslav" <JBenes(zv)cpoj(tec)cz>


Ahoj,

Zkus BrowseDirectory() z RxLib misto SelectDirectory(Directory,[],0)
napr.
If BrowseDirectory(Directory,'Vyhled�n� adres߰e nebo c�lov�ho disku pro
...',0) Then ..
Vzhled prvku se ridi promennou ve standardni UNIT Controls
var
NewStyleControls: Boolean;

Pokud je TRUE, budou pouzity nove styly ovladacich prvku.

Jaro B.> -----P�vodn� zpr�va-----
> Od: Jiri Stepanek [SMTP:jiri.stepanek(zv)atlas(tec)cz]
> Odesl�no: 11. I 2001 23:34
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Dialog pro vyber adresare (jako v instalacnich
> programech - ne SelectDirectory)
>
> Zdravim cleny mailing listu!
>
> Mam problem se zobrazenim dialogu pro vyber adresare. Existuje sice
> funkce
> SelectDirectory, ale ta (alespon v Del3) zobrazuje nejake podivne
> okno,
> ktere obsahuje i seznam souboru. Jde nejak zobrazit stejne okno jako
> pouzivaji instalatory (nejlepe pomoci API funkce).
>
> Zkousel jsem sledovat jeden instalator program ApiSpy, pro otevreni
> dialogu
> se spoustela funkce GetSaveFileNameA, ktera ma skoro stejne parametry
> jako
> GetSaveFileName. Kdyz jsem ale tohle zkousel, zobrazil se mi normalni
> dialog
> pro ulozeni souboru.... ????
>
>

ulozeni obsahu TIMAGE do JPEG

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 12.1.2001 10:07:17

Ahoj

Da se nejak ulozit TIMAGE, ktery obsahuje obrazek formatu BMP, do souboru
typu JPEG.

Dik

Dalibor

D5Prof


INTERBASE SECURITY ALERT !!!

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 12.1.2001 10:30:41

Ahoj,
stahnul jsem si ten patch z IBPhoenix, zjistil jsem to jmeno a heslo, zkusil
jsem to pred patchem, abych po patchi poznal ten rozdil :), ale ono nic.
Vyhodilo me to s tim, ze mam spatny jmeno nebo heslo. Pritom to heslo jsem
nasel i ve zdrojacich od IB.

Zkousel to nekdo, treba p.Cisar? muzu poslat jmeno a heslo pro porovnani,
ale jen na soukromy mail, do konference mi to nepripada jako dobry napad.
Ted mam sice ibserver.exe patchnutej, ale dobrej pocit z toho rozhodne
nemam.

(IB6 ve verzi WI-V6.0.0.627)

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Pavel Cisar
> Sent: Thursday, January 11, 2001 8:09 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: INTERBASE SECURITY ALERT !!!
>
> Druhy pokus, protoze prvni pokus se jaksi do konference nedostal.
> Vsem co tuto zpravu jiz obdrzeli se omlouvam.
>
> Vazeni pratele,
>
> TATO ZPRAVA NENI VTIP!
>
> Pokud pouzivate Interbase 4.x nebo novejsi (na jakekoliv
> platforme), meli by jste se podivat na http://www.interbase2000.org
> a http://firebird.ibphoenix.com
>
> Pro ty co nevladnou anglictinou:
> Interbase obsahuje od verze 4 hned dve bezpecnostni diry
> nebyvaleho rozsahu a nebezpecnosti. Prvni je zabudovany ucet a
> heslo s administratorskymi pravy. Na rozdil od uctu SYSDBA tento
> ucet nelze zrusit a heslo nelze zmenit. Ucet byl doplnen
> vyvojarskym tymem IB fy Borland v roce 1992 pro interni pristup k
> bezpecnostni databazi ISC4.GDB. Druha se tyka zabudovane
> funkce, ktera dovoluje sestrelit bezici server nebo zrusit jakoukoliv
> databazi (podle predanych parametru). Tuto "funkcionalitu" si
> vyzadal tym pro testovani IB v roce 1994 a naleza se take v
> produkcni verzi kodu.
>
> Obe tyto bezpecnostni diry objevili vyvojari projektu Firebird a v
> posledni verzi Firebird 0.9.4 jsou jiz odstraneny. Uzivatele ostatnich
> verzi IB mohou BEZPLATNE ziskat patch na jakoukoliv postizenou
> verzi a platformu (vcetne napr. VMS) od fy IBPhoenix (autor Jim
> Strakey).
>
> Diky za pozornost
>
>
> Pavel Cisar <pcisar(zv)inprise(tec)cz>
> Borland s.r.o.
>
>

Chranen pristup do databaze...

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 12.1.2001 10:33:31

Ahoj,
pokud se jako hacker dostanes k souboru databaze, uz to je podle mne
bezpecnostni chyba.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Slavek Rydval
> Sent: Friday, January 12, 2001 8:15 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Chranen pristup do databaze...
>
> Ahoj,
>
> jestli se nemylim, pak sice universalni heslo neexistuje, ale pokud se
> dostanes k souboru, ve kterem je db ulozena, dostanes se i k
> datum (stejne
> jako v Paradoxu). Staci si otevrit databazi jinde, kde znas
> adminske heslo.
> Hesla totiz nejsou ulozena ve stejne databazi jako data. Tohle
> povazuju za
> velkou bezpecnostni diru.
>
> Slavek
>
>
> >
> > ----- Original Message -----
> > From: "JIM Design" <jim.design(zv)iol(tec)cz>
> >
> > > ahoj,
> > >
> > > jakou databazi mas na mysli?!
> > > Jestli to je Access nebo IB tak heslo nema vyznam, protoze existuji
> > > univerzalni hesla.
> > >
> > > M.Jirman
> >
> > Ahoj.
> >
> > Nepreklepl jsi se ? Opravdu existuje universalni heslo pro IB
> (InterBasi)
> > ????
> >
> > Ludek
> >
> >
>
>
> --------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> http://swnet(tec)cz
> * K Jezisku, panacka, ja se budu kolebati...
> * Narodil jsem se, radujte se...
> --------------------------------------
>

Vytvoreni ikonky

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 11:06:13

[Delphi 4]
Ahoj
V ImageListu mam dva male obrazky (16*16) a potrebuji z nich
vytvorit novy, stejne velky, ktery vznikne tim, ze jeden z obrazku
nakreslim na druhy.
Konkretne potrebuji pridat sipecku oznacujici zastupce na jinou
libovolnou ikonu. Muze mi nekdo poradit, jak na to?
Zkousel jsem exampl s ,,CreateIconIndirect'' ale nejak se mi
nedari...

Predem diky za rady..
P. --=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
`======----( icq: 73995087 )==--- -- -


IB6 a Error: invalid request BLR at offset 932

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 12.1.2001 11:19:47

Nee.

----- Original Message -----
From: "Petr Palicka" <petr.palicka(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 11, 2001 8:04 AM
Subject: RE: IB6 a Error: invalid request BLR at offset 932


> ehm,
>
> vystrel do tmy: a co ton strednik na konci?
>
> dekuji PeC(zv)
>
> CU onTheFutureOfMatrix
> MatriX.CyberSpace.Cz
>
> /~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
> |[smtp:petr.palicka(zv)atlas(tec)cz]|
> |[smtp:peca(zv)email(tec)cz] |
> \~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
>
>
> > CREATE PROCEDURE TEST_AddRefObject2
> > (TableName VARCHAR(30),
> > OID CHAR(10))
> > AS
> > DECLARE VARIABLE TABLEID INTEGER;
> > BEGIN
> > SELECT RDB$RELATION_ID FROM RDB$RELATIONS WHERE
> > RDB$RELATION_NAME =
> > UPPER(:TableName) INTO TABLEID;
> > INSERT INTO SYS$REFCOUNT(TABLE_ID, ID, REFERENCE) VALUES
> > (:TABLEID,
> > :OID, 0);
> > END;
> -------^

IB6 a Error: invalid request BLR at offset 932

[*] Pavol Kakacka <paka(zv)aktis(tec)cz> - 12.1.2001 11:21:53

TIBSQL == je to iste, bez vysledku.


ahoj,

jeste zkus pouzit komponentu IBSQL, ta by mela slouzit primo k provadeni
dotazu, u kterych te moc nezajima vraceny vysledek. mam dojem, ze ti
vrati stream rovnou ze serveru, proste nic pro grid a podobne dalsi
veci.

dekuji PeC(zv)

CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/> -----Original Message-----
> From: Pavol Kaka�ka [mailto:paka(zv)aktis(tec)cz]
> Sent: Wednesday, January 10, 2001 2:33 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: IB6 a Error: invalid request BLR at offset 932
>
>
> Aj ked dam ExecSQL je to iste.
>
> btw: Nejak mam pocit ze nam blbne "Delphi" server, chodia mi
> totiz maily o
> nedorucitelnosti a moje odpovede meskaju aj dva-tri dni?
>
> Pavol Kaka�ka
> kasix(zv)atlas(tec)cz
>
>
> | > Ked dam na TIBQurry do SQL.Text na vyrobenie procedure "CREATE
> | > PROCEDURE......"
> | > tak zavolam Prepare. OK. Potom zavolam OPEN. OK Potom chcem
> | > zavolat Commit a
> |
> | misto toho prepare a open dej ExecSQL
>
>
>

TWinControl a spotreba systemovych zdroju

[*] Petr Adasek <petr.adasek(zv)iol(tec)cz> - 12.1.2001 11:45:08

> > ... ze bych to musel od zakladu predelat - a do toho se mi moc nechce...
>
> Ahoj,
> obavam se, ze to bude ale jedine reseni, protoze takhle je to koncepcne
> ponekud silene.
>
> Petr Vones, amatersky programator

Ahoj,
Nejprve diky za predchozi odpovedi.

Vim, ze to reseni je koncepcne ponekud silene (proto to resim),
ale tajne jsem doufal, ze by mozna bylo resenim napsat si vlastni
komponentu na bazi TControl.
Jenom nevim, jestli neco na bazi TControl muze byt Ownerem
dalsich komponent.
Ktera vlastnost (soubor vlastnosti) umoznuje jedne komponente
vlastnit dalsi komponenty. A ma to vazbu na Handle nebo ne ?

Petr Adasek


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

INTERBASE SECURITY ALERT !!!

[*] Karel Brichn�c <brichna(zv)atlas(tec)cz> - 12.1.2001 12:10:17

Zdravim,

ja to zkousel pred patchem taky a opravdu to funguje (WI-V6.0.0.627). Jen
jsem se musel pouzit nejakeho klienta, ktery nepravadi username a password
na velka pismena (napr. isql). Po aplikaci patche to uz neslo. Pouzil jsem
patch od Borlandu. Zkousel jsem taky Firebird WI-T0.9.4.41 a tam mne to
podle predpokladu taky nepustilo.

Brichna


> Ahoj,
> stahnul jsem si ten patch z IBPhoenix, zjistil jsem to jmeno a heslo,
zkusil
> jsem to pred patchem, abych po patchi poznal ten rozdil :), ale ono nic.
> Vyhodilo me to s tim, ze mam spatny jmeno nebo heslo. Pritom to heslo jsem
> nasel i ve zdrojacich od IB.

> Zkousel to nekdo, treba p.Cisar? muzu poslat jmeno a heslo pro porovnani,
> ale jen na soukromy mail, do konference mi to nepripada jako dobry napad.
> Ted mam sice ibserver.exe patchnutej, ale dobrej pocit z toho rozhodne
> nemam.

sloupcove bloky

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 12.1.2001 12:13:13

Ahoj,

From: Milan Dvo �k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz>

> Tusim ze to asi nepujde, ale prece jen: nevite, jestli se u TRichEdit
> daji nejak delat sloupcove bloky? Diky i za zapornou odpoved (jen
> abych mel jistotu).

sloupcove bloky jsou nastavit, napr takto

procedure SetTabStops(RichEdit: TRichEdit; TabStops: array of
integer);
var
I: integer;
begin
with RichEdit.Paragraph do
begin
TabCount := High(TabStops) + 1;
for I := 0 to TabCount - 1 do
Tab[I] := TabStops[I];
end;
end;

nasledujici procedura vytiskne info o jednotlivych polich tabulky

procedure XXX(Table: TTable; RichEdit: TRichEdit);
const
TABCHAR = #9;
var
I: integer;

begin
with Table, RichEdit, SelAttributes do
begin
SetTabStops(RichEdit, [5, 45, 150, 210]);
Lines.Add('FieldNo' + TABCHAR + 'Name' +
TABCHAR + 'Type' + TABCHAR + 'Size');

for I := 0 to FieldCount - 1 do
with Fields[I] do
Lines.Add(IntToStr(FieldNo) + TABCHAR + FieldName +
TABCHAR +
FldTyps[DataType] + TABCHAR + IntToStr(DataSize));
end;
end;

Jarek Uher


Otvorenie tabulky MS Access

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 12.1.2001 12:35:46

Zdravim

Vytvoril som alias v SQL Exploreri

type: MSACCESS
database Name: d:\skuska\subor.mdb
lengdriver: none
open mode Read/Write
system database: none
user name: admin

a heslo som mu pri otvoreni dal "admin"

zahlasi mi ze "Cannot load an IDAPI service library File: MSJT3032.DLL ,..."


Co stym, dakujem

roland.

ulozeni obsahu TIMAGE do JPEG

[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 12.1.2001 13:03:36

Cau,

ja pouzivam toto:


var
bmp : TImage;
jpg : TJpegImage;
begin
try
bmp := TImage.Create(nil);
jpg := TJpegImage.Create;
jpg.CompressionQuality:= 30; //nastavi stupen komprese
bmp.Picture.Bitmap:=image1.Picture.Bitmap;
jpg.Assign( bmp.picture.bitmap );
jpg.SaveToFile ( 'c:\Webcam\cam.jpg' );
jpg.Free;
bmp.Free;
finally
end;


funguje na jednicku :))

S pozdravem

Batex


Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] Radim Kunz <privat(zv)casestudio(tec)com> - 12.1.2001 13:11:52



> Zdravim vsechny,
>
> existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
> Pokud napisu
>
> select text from all_views where view_name='....';
>
> tak mi to sice vrati, ale ne cely (pouze zacatek).
> Dik za radu
> Pavel

Zdrojaky jsou v all_source.

Radim


Ako zistit vsetky beziace procesy na WinNT a syste

[*] Jano <jj_delphi(zv)ke.ubp.sk> - 12.1.2001 13:18:55

Ahojte delfini,

ma niekto so %subj% nejake skusenosti? Potrebujem zistit vsetky natiahnute
DLL-ky jednotlivych programov beziacich na WinNT. ProcessID od ktoreho sa
odvija vsetko dokazem zistit, ale ako zistim "modBaseSize" a "modBaseAddr"
natiahnutych DLL kniznic? Na W9x aj W2k to ide cez API
"CreateToolhelp32Snapshot" a "Module32First(SnapProcHandle..."

Budem povdacny za kazdu radu,

Jano

IB6 a Error: invalid request BLR at offset 932

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 12.1.2001 13:24:40

Haj hou!

On 12 Jan 2001,, Pavol Kakacka wrote:

> Hoop, tak uz sme blizsie Pavle :-)) Je fakt ze to s tymi dvojbodkami :::::
> moze mat nieco spolocne. Skusil som porceduru vytvorit s otaznikmi ale
> hodilo to tu istu chybu. Potom som miesto tych parametrov dal natvrdo nejake
> hodnoty a ono to preslo. :-((( ale netusim kde je problem. :-))) ale uz sme
> blizsie.

Mno, takze to mame :o) Musis trasovat az do IBX (hledej otaznik)
a najit misto, kde se nahrazuje ":" za "?". Bude tam chyba. Tahle
nahrada se MUSI provadet pri DML prikazech (jako select, insert
atd.) ale NESMI se provadet pri DDL prikazech (jako create, alter
apod.). Zrejmne jste provedli aktualizaci IBX, a tam je tahle chyba.
Ja vim ze uz jstem tohle jedno kdysi v IBX opravoval.

Hodne zdaru
-- Pavel

Firebird - The most addictive database
http://firebird.sourceforge.net


OT: Prihlaseni do WIN98

[*] Jan Naiser <tua(zv)wo(tec)cz> - 12.1.2001 13:26:57

Preji pekny den,

da se nejak donutit (bez pouziti POLEDIT) Win98 aby vyzadovaly heslo (resp.
prihlasovaci dialog), ktere se neda obejit? Mam pocit, ze to nejde, ale
kdosi mi tvrdil, ze zeditovanim registru snad ano.

Diky, Honza Naiser.

INTERBASE SECURITY ALERT !!!

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 12.1.2001 13:28:46

Haj hou!

On 12 Jan 2001,, Ota Maly wrote:

> Ahoj,
> stahnul jsem si ten patch z IBPhoenix, zjistil jsem to jmeno a heslo, zkusil
> jsem to pred patchem, abych po patchi poznal ten rozdil :), ale ono nic.
> Vyhodilo me to s tim, ze mam spatny jmeno nebo heslo. Pritom to heslo jsem
> nasel i ve zdrojacich od IB.

Vsechny bezne nastroje jako IBConsole, WISQL atd. konvertuji
jmeno na velka pismena. Zminene jmeno je malimy, a to je duvod
proc ti to nefunguje. S IBX by to fungovat mohlo (netestoval jsem).
Minimalne to funguje s precompilatorem a jazykem C, nazto to
testoval Jim Strakey.

> muzu poslat jmeno a heslo pro porovnani,
> ale jen na soukromy mail, do konference mi to nepripada jako dobry napad.

Kolem tohohle tematu je tolik hubuku, ze je to jedno. CERT (a
napriklad Register) to zverejnil i se jmenem a heslem.

hodne zdaru


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

ZNOVA: Trideni CH v Interbase - vyreseno

[*] azeleny(zv)csas(tec)cz - 12.1.2001 13:43:01

DDV,

diky, bylo to ono, jsem trouba, ze mne nenapadlo de/aktivovat indexy.
Uz to chodi jak ma.

Dopnujici dotaz:
Poslal autor teto uzasne upravy zmenu do IBPhoenix, aby se to objevilo v
dalsich verzich IB?

Diky za radu!!!
a.
-----------------------------------------------------------------------
Ales Zelen� (OK1UUE)
#esk� spo�itelna a.s.
Na Perst�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.
> -----Original Message-----
> From: Radek KALA [mailto:Kala(zv)atlas(tec)cz]
> Sent: Monday, January 08, 2001 12:39 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: ZNOVA: Trideni CH v Interbase
>
>
> Pochopil jsem spravne, ze musim po nahrani teto knihocvny
> pregenerovat indexy ???
> Pokud ano tak staci udelat zalohu a databaze a pak restore ???
> Pokud nestaci tak jak to co nejjednoduseji udelat.
>
> Dekuji.
>
> > Dobry den,
> >
> > zkusil jsem pouzit trideni stazene z nize uvedene adresy a
> narazil jsem na
> > jeden zasadni problem:
> > (radi to krasne, coz o to), pri hledeani
> > select NAZEV from VECI where NAZEV like 'C%' to korektne
> vrati jen ty od C
> > nikoliv Ch, ale
> > select NAZEV from VECI where NAZEV like 'Ch%' nevrati nic,
> i kdyz tam takove
> > zaznamy jsou (select * from VECI) to vrati a korektne seradi.
> >
> > Databaze ma deafult character set WIN_1250 a NAZEV ma
> collate PXW_CSY.
> >
> > Delam neco spatne?
> > Ma nekdo podobnou zkusenost?
> > Testoval to nekdo?
> >
> > Tento problem cini jinak krasne DLL nepouzitelnym, doufam,
> ze je to moje
> > chyba.
[...]

Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] delphi(zv)htkpro(tec)cz - 12.1.2001 13:53:54



>Zdravim vsechny,
>
>existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
>Pokud napisu
>
> select text from all_views where view_name='....';
>
>tak mi to sice vrati, ale ne cely (pouze zacatek).


Mam takovy pocit ze
select text_length, text from all_views
vraci cely text (alespon u me - nejdelsi view ma cca 9000 znaku). Problem
bych spis videl nekde na ceste z Oracle do Delphi kde nedojde k nacteni
celeho sloupce text. Mluvim o Oracle 8.x a lepsim.

S pozdravem
Jan Kadlecek
HTK Pro s.r.o.
www.dev-shop(tec)cz


> Dik za radu
> Pavel
>-------------------------------------------------
>Pavel Skalick�
>e-mail - P.Skalicky(zv)seznam(tec)cz
>www - http://pts.kvalitne(tec)cz
>mobil - 0604 844 698
>ICQ - 38169741
>
>
>

Ako zistit vsetky beziace procesy na WinNT a syste

[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 12.1.2001 15:01:35

http://www.dependencywalker.com/depends20_x86.zip

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Jano
> Sent: Friday, January 12, 2001 1:19 PM
> To: DELPHI Konferencia
> Subject: Ako zistit vsetky beziace procesy na WinNT a systemove
> informacie o nich?
>
> Ahojte delfini,
>
> ma niekto so %subj% nejake skusenosti? Potrebujem zistit vsetky natiahnute
> DLL-ky jednotlivych programov beziacich na WinNT. ProcessID od ktoreho sa
> odvija vsetko dokazem zistit, ale ako zistim "modBaseSize" a "modBaseAddr"
> natiahnutych DLL kniznic? Na W9x aj W2k to ide cez API
> "CreateToolhelp32Snapshot" a "Module32First(SnapProcHandle..."
>
> Budem povdacny za kazdu radu,
>
> Jano
>
>
>

OT: Prihlaseni do WIN98

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 12.1.2001 15:03:42

Pokud mas modem (cili sit), staci ve vlastnostech site nastavit misto
prihlasovani do Windows na Prihlasovani do site Microsoft

12.1.2001 Jan Naiser :
> Preji pekny den,

> da se nejak donutit (bez pouziti POLEDIT) Win98 aby vyzadovaly heslo (resp.
> prihlasovaci dialog), ktere se neda obejit? Mam pocit, ze to nejde, ale
> kdosi mi tvrdil, ze zeditovanim registru snad ano.

> Diky, Honza Naiser.



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

Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 12.1.2001 15:06:43

Ten Oracle je 64-bit. verze 7.3.2.1.0 pro Alpha. Delka toho textu je asi 270
znaku a me se vypise pouze

select polozka1, polozka2 polozka3

a to je vse. Ja bych potreboval spise ten konec (kvuli podminkam). Jinak o
Delphi zatim vubec nejde, zkousim to pro zacatek v SQL*Plus.
Dik
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
----- Original Message -----
From: <delphi(zv)htkpro(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 12, 2001 1:53 PM
Subject: Re: Zjisteni zdrojaku od pohledu nad Oraclem ...>
>
> >Zdravim vsechny,
> >
> >existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
> >Pokud napisu
> >
> > select text from all_views where view_name='....';
> >
> >tak mi to sice vrati, ale ne cely (pouze zacatek).
>
> Mam takovy pocit ze
> select text_length, text from all_views
> vraci cely text (alespon u me - nejdelsi view ma cca 9000 znaku). Problem
> bych spis videl nekde na ceste z Oracle do Delphi kde nedojde k nacteni
> celeho sloupce text. Mluvim o Oracle 8.x a lepsim.
>
> S pozdravem
> Jan Kadlecek
> HTK Pro s.r.o.
> www.dev-shop(tec)cz
>
>
> > Dik za radu
> > Pavel
> >-------------------------------------------------
> >Pavel Skalick�
> >e-mail - P.Skalicky(zv)seznam(tec)cz
> >www - http://pts.kvalitne(tec)cz
> >mobil - 0604 844 698
> >ICQ - 38169741
> >
> >
> >
> >
>

Chranen pristup do databaze...

[*] azeleny(zv)csas(tec)cz - 12.1.2001 15:10:09

DDV,
pominu univerzalni heslo, takze k citelnosti hesel s isc4.gdb, salt, ktery
pouziva IB pri generovani hesla je znamy, takze rozlousknou to heslo je uz
jen otazka chvile (a vykonu stroje), ale podle mne zcela nepodstatna,
protoze bud se hacker zna heslo SYSDBA, aby se mohl pripojit k isc4.gdb
(cestu si muze tipnout, pokusu ma dost) a pak je chyba v tom, ze zna heslo a
nema duvod se zaobirat louskanim hesel (pokud jsou jeho cilem data - muze se
rovnou pripjit), nebo ma zpusob jak ukrast datovy soubor a tak je na tom IB
stejne jako treba Oracle - pokud si ukradnu datafiles, podivam se
initorcl.ora (dle jmena instance i jiny nazev init souboru), prinesu si je
na svuj Oracle a jako internal se do te databaze taky dostanu.

Tohle nema reseni, jedine sifrovat data v gdb souboru, ale pak by cela
databaze byla _DESNE_ pomala, zapomenme na indexy...

Progress tusim k problemu sifrovani pristupoval tak, ze zasifrovana verze
hesla byla nekde v databazovem souboru a kdesi v hlavicce souboru byl jakysi
bit, ktery rozhodoval, zda se bude databzovy stroj dotazovat na heslo pro
umozneni pristupu k DB. Samozrejme, kdo vi, ktery bit zmenit, ma vyhrano,
takze toto reseni je mozna pekne, dokud neni produkt OpenSource :-)

Suma sumarum, myslim, ze zakazt pristup do isc4.gdb ze site by mohlo hodne
pomoci a jinak je uz jen vec, nedat si ukrast datove soubory (a pokud je
hacker tak daleko ze muze na filesystem, je bezpecnost uz davno v kopru,
takze IB ani jiny DB server to uz nezachrani).

a.
-----------------------------------------------------------------------
Ales Zelen� (OK1UUE)
#esk� spo�itelna a.s.
Na Perst�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.
> -----Original Message-----
> From: Ota Maly [mailto:ota.maly(zv)volny(tec)cz]
> Sent: Friday, January 12, 2001 10:34 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Chranen pristup do databaze...
>
>
> Ahoj,
> pokud se jako hacker dostanes k souboru databaze, uz to je podle mne
> bezpecnostni chyba.
>
> S pozdravem
> Ota Maly
>
> PaPouch elektronika
> http://www.papouch.com
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > Behalf Of Slavek Rydval
> > Sent: Friday, January 12, 2001 8:15 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: Chranen pristup do databaze...
> >
> >
> > Ahoj,
> >
> > jestli se nemylim, pak sice universalni heslo neexistuje,
> ale pokud se
> > dostanes k souboru, ve kterem je db ulozena, dostanes se i k
> > datum (stejne
> > jako v Paradoxu). Staci si otevrit databazi jinde, kde znas
> > adminske heslo.
> > Hesla totiz nejsou ulozena ve stejne databazi jako data. Tohle
> > povazuju za
> > velkou bezpecnostni diru.
> >
> > Slavek
> >
> >
> > >
> > > ----- Original Message -----
> > > From: "JIM Design" <jim.design(zv)iol(tec)cz>
> > >
> > > > ahoj,
> > > >
> > > > jakou databazi mas na mysli?!
> > > > Jestli to je Access nebo IB tak heslo nema vyznam,
> protoze existuji
> > > > univerzalni hesla.
> > > >
> > > > M.Jirman
> > >
> > > Ahoj.
> > >
> > > Nepreklepl jsi se ? Opravdu existuje universalni heslo pro IB
> > (InterBasi)
> > > ????
> > >
> > > Ludek
> > >
> > >
> >
> >
> >
> > --------------------------------------
> > http://atrey.karlin.mff.cuni(tec)cz/~rk
> > http://swnet(tec)cz
> > * K Jezisku, panacka, ja se budu kolebati...
> > * Narodil jsem se, radujte se...
> > --------------------------------------
> >
>

IB refresh

[*] Mephisto <mephisto(zv)akvila(tec)cz> - 12.1.2001 15:43:36

Jak donutik klientskou stranu po pridani zaznamu do databaze k refreshi? Povesit refresh na timer rozhodne nepovazuji za elegantni reseni. TIBEvents mi nejak nefunguje. Please !!!


---
Odchozi zprava neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 5.1.2001

Ako zistit vsetky beziace procesy na WinNT a syste

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.1.2001 15:51:49

From: "Jano" <jj_delphi(zv)ke.ubp.sk>
> ma niekto so %subj% nejake skusenosti? Potrebujem zistit vsetky natiahnute
> DLL-ky jednotlivych programov beziacich na WinNT. ProcessID od ktoreho sa
> odvija vsetko dokazem zistit, ale ako zistim "modBaseSize" a "modBaseAddr"
> natiahnutych DLL kniznic? Na W9x aj W2k to ide cez API

Ahoj,

podivej se na zdrojaky aplikace ToolHelpViewer:
http://www.volweb(tec)cz/pvones/delphi/

Petr Vones, amatersky programator


IB6 - dotazy p�es v�ce datab�z�

[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 12.1.2001 15:59:37

Dobr�ho odpoledne v#em
Narazil jsem na drobn� probl�m (viz. subj.) Nev�te n�kdo jak se to v IB6 �e#�?
d�ky a p�kn� v�kend
PavelC


Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] delphi(zv)htkpro(tec)cz - 12.1.2001 16:02:00



>Ten Oracle je 64-bit. verze 7.3.2.1.0 pro Alpha. Delka toho textu je asi
>270
>znaku a me se vypise pouze
>
> select polozka1, polozka2 polozka3


A jakeho typu je ten sloupec v tom pohledu ?
Pokud je to long pak je nejspis treba zmenit nastaveni v SQLPlus na
zobrazeni sirsich sloupcu (mel by to byt nejaky prikaz primo v SQLPlus),
pokud to vsak ve verzi 7.3.2 neni typu long pak asi nezbyva nic jineho nez
zkusit pohled all_source jak radil Radim Kurz.
Doporucuji dokumentaci k SQLPlus tam bude urcite popis zobrazovani sloupcu
typu long nebo zavolat Oracle na hotline nejspis to budou vedet z hlavy.

S pozdravem
Jan Kadlecek
HTK Pro s.r.o.
www.dev-shop(tec)cz

>
>a to je vse. Ja bych potreboval spise ten konec (kvuli podminkam). Jinak o
>Delphi zatim vubec nejde, zkousim to pro zacatek v SQL*Plus.
> Dik
> Pavel
>-------------------------------------------------
>Pavel Skalick�
>e-mail - P.Skalicky(zv)seznam(tec)cz
>www - http://pts.kvalitne(tec)cz
>mobil - 0604 844 698
>ICQ - 38169741
>----- Original Message -----
>From: <delphi(zv)htkpro(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Sent: Friday, January 12, 2001 1:53 PM
>Subject: Re: Zjisteni zdrojaku od pohledu nad Oraclem ...
>
>>
>>
>> >Zdravim vsechny,
>> >
>> >existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
>> >Pokud napisu
>> >
>> > select text from all_views where view_name='....';
>> >
>> >tak mi to sice vrati, ale ne cely (pouze zacatek).
>>
>>
>> Mam takovy pocit ze
>> select text_length, text from all_views
>> vraci cely text (alespon u me - nejdelsi view ma cca 9000 znaku). Problem
>> bych spis videl nekde na ceste z Oracle do Delphi kde nedojde k nacteni
>> celeho sloupce text. Mluvim o Oracle 8.x a lepsim.
>>
>> S pozdravem
>> Jan Kadlecek
>> HTK Pro s.r.o.
>> www.dev-shop(tec)cz
>>
>>
>> > Dik za radu
>> > Pavel
>> >-------------------------------------------------
>> >Pavel Skalick�
>> >e-mail - P.Skalicky(zv)seznam(tec)cz
>> >www - http://pts.kvalitne(tec)cz
>> >mobil - 0604 844 698
>> >ICQ - 38169741
>> >
>> >
>> >
>> >
>>
>
>

Zjisteni zdrojaku od pohledu nad Oraclem ...

[*] Pavel Skalicky <P.Skalicky(zv)sh.cvut(tec)cz> - 12.1.2001 16:12:16

Ano, ano, to je ono - nastaveni sirky u longu.
Bylo tim.
Dik moc
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
----- Original Message -----
From: <delphi(zv)htkpro(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 12, 2001 4:02 PM
Subject: Re: Zjisteni zdrojaku od pohledu nad Oraclem ...>
>
> >Ten Oracle je 64-bit. verze 7.3.2.1.0 pro Alpha. Delka toho textu je asi
> >270
> >znaku a me se vypise pouze
> >
> > select polozka1, polozka2 polozka3
>
>
> A jakeho typu je ten sloupec v tom pohledu ?
> Pokud je to long pak je nejspis treba zmenit nastaveni v SQLPlus na
> zobrazeni sirsich sloupcu (mel by to byt nejaky prikaz primo v SQLPlus),
> pokud to vsak ve verzi 7.3.2 neni typu long pak asi nezbyva nic jineho nez
> zkusit pohled all_source jak radil Radim Kurz.
> Doporucuji dokumentaci k SQLPlus tam bude urcite popis zobrazovani sloupcu
> typu long nebo zavolat Oracle na hotline nejspis to budou vedet z hlavy.
>
> S pozdravem
> Jan Kadlecek
> HTK Pro s.r.o.
> www.dev-shop(tec)cz
>
> >
> >a to je vse. Ja bych potreboval spise ten konec (kvuli podminkam). Jinak
o
> >Delphi zatim vubec nejde, zkousim to pro zacatek v SQL*Plus.
> > Dik
> > Pavel
> >-------------------------------------------------
> >Pavel Skalick�
> >e-mail - P.Skalicky(zv)seznam(tec)cz
> >www - http://pts.kvalitne(tec)cz
> >mobil - 0604 844 698
> >ICQ - 38169741
> >----- Original Message -----
> >From: <delphi(zv)htkpro(tec)cz>
> >To: <delphi-l(zv)fwd(tec)cz>
> >Sent: Friday, January 12, 2001 1:53 PM
> >Subject: Re: Zjisteni zdrojaku od pohledu nad Oraclem ...
> >
> >
> >>
> >>
> >> >Zdravim vsechny,
> >> >
> >> >existuje nejaky postup jak z databaze Oracle dostat zdrojak pohledu ?
> >> >Pokud napisu
> >> >
> >> > select text from all_views where view_name='....';
> >> >
> >> >tak mi to sice vrati, ale ne cely (pouze zacatek).
> >>
> >>
> >> Mam takovy pocit ze
> >> select text_length, text from all_views
> >> vraci cely text (alespon u me - nejdelsi view ma cca 9000 znaku).
Problem
> >> bych spis videl nekde na ceste z Oracle do Delphi kde nedojde k nacteni
> >> celeho sloupce text. Mluvim o Oracle 8.x a lepsim.
> >>
> >> S pozdravem
> >> Jan Kadlecek
> >> HTK Pro s.r.o.
> >> www.dev-shop(tec)cz
> >>
> >>
> >> > Dik za radu
> >> > Pavel
> >> >-------------------------------------------------
> >> >Pavel Skalick�
> >> >e-mail - P.Skalicky(zv)seznam(tec)cz
> >> >www - http://pts.kvalitne(tec)cz
> >> >mobil - 0604 844 698
> >> >ICQ - 38169741
> >> >
> >> >
> >> >
> >> >
> >>
> >
> >
> >
>

RECORDING AUDIO TO DISK IN WAV FORMAT

[*] #u�ka R�bert <spravca(zv)lumen.sk> - 12.1.2001 17:16:31

Prosim kto mate poslite mi komponentu na zaznam audia do PCM WAV formatu kde
by som si mohol menit nastavenia ako samplovaciu frekvenciu, dalej 8 - 16
bitovy zaznam a prepinat medzi mono a stereo zaznamom. Pokial mozno aj zo
zdrojovym kodom. Dakujem

Na adresu spravca(zv)lumen.sk


LoadPackage nefunguje jak ma

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 18:17:54

Preji pekneho dne,

pouziju-li nasledujici kod:

LoadPackage('C:\NejakaCesta\pcgFirstPlugin.bpl');

pak me exac vyhodi hlasku: The dynamic link library
pcgFirstPlugin.bpl could not be found it the specified path
vypsanacestazpromennepath. Nasledne mi Delphi zahlasi vyjimku
Project nazev.exe raised exception class EPackageError with
message 'Can't load package C:\NejakaCesta\pcgFirstPlugin.bpl.
The specified module could not be found.'

Soubor tam samozrejme je, jde o balicek prelozeny teze verzi
prekladace (par sekund predtim).

Pokud tedy potrebny soubor nahraju do libovolne cesty a opravim
cestu ve volani nebo ji neuvedu vubec, vysledek je stejny.

V cem delam chybu? Postupuju podle prikladu na jiz nekolikrat
zminene strance (http://www.obsof.com/delphi_tips/DL613.html),
otamtud stazene priklady funguji, ale me se nedari. Musi byt
balicek nejak nakonfigurovan, nez standardne?

Diky za pripadne odpovedi.

Slavek


Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


LoadPackage: neco jsem nepochopil?

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 12.1.2001 18:28:20

Preji vsem pekneho dne,

pri hrani s balicky jsme narazil na nasledujici problem: nahraji si
balicek, ktery pouzivaji Delphi:

hm := LoadPackage ('C:\Borland\Delphi5\Bin\dclstd50.bpl');

a pak ho uvolnim:

UnloadPackage (hm);

coz je kruta chyba (access violation).


V helpu me ujistuji, ze LoadPackage natahne balicek do pameti,
otestuje duplicitu unit (co to vlastne znamena?) a zavola inicializaci
vsech unit. Navic predpokladam, ze si system zvedne citac a po
zavolani UnloadPackage citac snizi a v pripade, ze jiz balicek
nikdo nepouziva, odstrani jej z pameti. Jenze to jaksi odporuje
uvedenemu testu. Co se tedy doopravdy deje?

Jen pro upresneni: s natazenym balickem samozrejme pracovat
jde, jen ten Unload...

Diky za pripadne odpovedi

Slavek



Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


QR - "A component named QRStandardPreview already

[*] Ladislav Nagy <delphi-konference(zv)bcpraha(tec)com> - 12.1.2001 18:48:18

Ahoj,

obcas se nam stava, ze za behu programu pri tisku pomoci QR system obcas zpusobi Exception "A component named QRStandardPreview already exists".

Myslim, ze je to interni chyba QR, nebot mi s zadnym objekte QRStandardPreview nepracujeme.
(D5 Prof.)

Nesetkali jste se s tim nekdo? Mohli byste mi prosim poradit?

Dekuji, Ladislav Nagy
................................................................................
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com


DBMS_ALERT - HELP!!!

[*] olesia <olesia(zv)idirect(tec)com> - 12.1.2001 13:30:56 -0500

Ahojte

Stale sa trapim s tym nestastnym dbms_alertom. Zatial som prisla k
nasledovnemu:
Pri dbms_alert.register('nieco') sa zapisuje jeden riadok do tabulky
sys.dbms_alert_info
s unique_session_id.
Mne sa stava nasledovne: Ked spustim dve rovnake aplikacie, kde
zaregistrujem alerty, posledna registracia alertu vymaze vsetky riadky z
dbms_alert_info, teda sa to tvari, ze tie sessions uz su off. Skusala som to
aj cez doa- oracleevent alebo doa bez oracleevent - sama som si v threde
registrovala & waitone, skusala som aj v BDE- SQL explorer ako aj v samotnom
oraclovskom sql plus. Robi to nahodne, alebo aspon neviem najst reason preco
to niekedy vymaze tie riadky a niekedy nie.
Teda mozno chyba je nejakom db nastaveni. Skusala som hladat v oracle
dokumentacii, ale nie je tam nic co sa tyka nastaveni
Nasla som len toto:
If a session exits (or dies) while there exist registered alerts,
they will eventually be cleaned up by future users of this package.
Lenze tie session boli zive, tak som zase tam, kde som zacala.

Prosim pekne tych, kto pisal, ze nema absolutne ziadne problemy s
dbms_alertom, mi poslali malicky priklad, v ktorom im to funguje, alebo
mozno poznaju nejake specialne nastavenia v oracle.(mozno som naozaj nieco
prehliadla)

Budem vdacna za kazdu radu,


Lelitka


Struktura WAV

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 12.1.2001 21:43:04

> Dobry den,
>
> Potreboval bych strukturu WAV souboru. A nebo komponentu, ktera dokaze
> praci s WAV daty a poskytnout zakladni informace o WAVu.

MS Multimedia API Help:
Pro informace o wavu hledej: WaveFormat, WaveFormatEx...
Pro informace o obsahu hledej cokoliv, co ma v nazvu "audio", "wave", "riff",
"file" :-)

Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO

D1 a Mysql + D1 a Paradox5

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 12.1.2001 22:07:16



> Ahoj,
>
> urcite by slo pouzit pristup pres ODBC na MySQL a vyuzit standardnich
> komponent. Ale nejak se mi nezamlouva MySQL por Win98. Ja to tak pouzivam
> pri tvorbe WWW stranek s databazema a vzdy po hodine aktivni prace musim
> server shodit a znova nastartovat - zere prostredky jako strhany).

Po hodine? Uf... ja tedka delal taky nejake weby na MySQL /pres MyODBC/ pod
Win95sp2, cirka 10 hodin v kuse to bezelo a v poho... /Apache, PHP3/
Me prostredky zerou zas jiny veci :-)

Abych nebyl uplne offtopic:
Delam ted malinkou aplikaci taky pod D1 a za DB jsem zvolil Paradox5 /jenom 2
tabulky/, a chtel jsem pouzit syntaxi "select ... union select..." a ono to
nejde :-(
Nenasel jsem zadnou zminku o nejakem takovem omezeni v D1 ci Pxd5. Verzi BDE
by to byt nemelo, na stejnem pocitaci bezi i D4 a v nich "union" pouzivam bez
problemu... nevi nekdo co s tim?

Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO


USB

[*] Luk� Lou�ansk����#��#�o��#�� - 12.1.2001 23:12:33

BTW Nemaj nahodou W98 na USB svuj ovladac,...
jinak o USB se taky tak trochu zajimam v ramci jednoho meho projektu
princip spociva ve vytvoreni seznamu ramcu (1 ramec=1ms)
Sou tam jeset nejaky pointery na dalsi datovy struktury atd....
Neco (docela HW zavisly) se da sehnat na developerskejch strankach intelu,
jinak asi neco jako usb.org (asi).> Ahoj,
> podarilo se Vam nekomu ovladnout USB z Delphi? Zacal jsem se tomu trochu
> venovat a jak uz to byva, nasel jsem priklady jenom v C a vubec se mi
> nechce se tim prokousavat. Pro Delphi jsem nalezl akorat obsluhu HID ale
> to pro me bohuzel neni to prave.
> Vaclav Sazima


Data z netu na COM ?

[*] Luk� Lou�ansk����#��#�o��#�� - 12.1.2001 23:18:24

Nazdar,
No ja sem o sem o tom taky tak troch uvazoval - podle me by se asi musel
vytvorit dalsi transportni vrstva pro TCP/IP nebo jenom programek, kterej
bude analyzovat ten COM a podle toho co mu druha strana posle tak bude chtit
data po tom microw. spojeni. Asi nejlepsi by byl nejakej VXD, ale jak to
zaonacit, aby se ten pocitac na COMu tvaril jako se svim IP nevim...
----- Original Message -----
From: L. ZITA <konference(zv)sales(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 05, 2001 1:21 PM
Subject: Re: Data z netu na COM ?>
> ----- Original Message -----
> From: "Peter Luk�cs" <batex(zv)astrafren(tec)cz>
>
> > Dik za radu, ale obavam se, ze toto nepostaci... Proc? Protoze
> kazda
> > komunikace po seriovem portu(modem i prime propojeni) pouziva nejen
datove
> > linky TxD a RxD, ale take pomocne "dotazovaci" vstupy a vystupy. Ja
> > potrebuji tyto vystupy k napajeni modemu. Toto se da sice nahradit
> externim
> > zdrojem, ale zustava problem v prenosu... Kvuli jednoduchosti modemoveho
> > zarizeni se ho nemuzu dotazovat na stavy bufferu jako to dela napr.
> > telefonni modem.... Toto by vsechno mela zastavat aplikace a prenaset uz
> > jenom data na RxD.
> > To jen tak na upresnenou...
> >
> > S pozdravem Batex
> >
>
> Ahoj.
>
> Nejsem si zcela jist, ale v nastaveni COMu se da nastavit i SW rizeni
> prenosu.
> Zkusit to muzes jednoduse, zkus si udelat ve Win9x prime propojeni PC
pomoci
> ser. portu
> a pak vymen propojeni za kabel s pouze "datovymi" draty a uvidis.
>
> Ludek
>
>
>
>
>
>
>
>
>

Dialog pro vyber adresare (jako v instalacnich pro

[*] Hurricane <hurricane(zv)quick(tec)cz> - 13.1.2001 00:19:15

Zdravim

Nejlepsi je pouzit API dialog.

BrowseDirectory je WinAPI dialog.
Je t�m jazykem, kter�m je OS.
Je nutn� pou��t prom�nnou, do kter� dialog cestu p�ed�.

uses FileUtil;

procedure TForm1.Button1Click(Sender: TObject);
var dir: string;
begin
BrowseDirectory(dir, 'Vyberte adres߰:',0);
Label1.Caption := dir;
end;

Hurricane
----- Original Message -----
From: "Jiri Stepanek" <jiri.stepanek(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 11, 2001 11:33 PM
Subject: Dialog pro vyber adresare (jako v instalacnich programech - ne
SelectDirectory)> Zdravim cleny mailing listu!
>
> Mam problem se zobrazenim dialogu pro vyber adresare. Existuje sice funkce
> SelectDirectory, ale ta (alespon v Del3) zobrazuje nejake podivne okno,
> ktere obsahuje i seznam souboru. Jde nejak zobrazit stejne okno jako
> pouzivaji instalatory (nejlepe pomoci API funkce).
>
> Zkousel jsem sledovat jeden instalator program ApiSpy, pro otevreni
dialogu
> se spoustela funkce GetSaveFileNameA, ktera ma skoro stejne parametry jako
> GetSaveFileName. Kdyz jsem ale tohle zkousel, zobrazil se mi normalni
dialog
> pro ulozeni souboru.... ????
>
> Dekuji za pomoc
> ======================================================
> Jiri Stepanek <jstep(zv)volny(tec)cz, jiri.stepanek(zv)atlas(tec)cz>
> student Gymnazia trida Kapitana Jarose Brno
> Web: www.jaroska(tec)cz, math.jaroska(tec)cz
> W(zv)P: wap.jaroska(tec)cz
> ======================================================
>
>

Chranen pristup do databaze...

[*] L. ZITA <konference(zv)sales(tec)cz> - 13.1.2001 02:56:32


----- Original Message -----
From: <azeleny(zv)csas(tec)cz>
> DDV,
> pominu univerzalni heslo, takze k citelnosti hesel s isc4.gdb, salt,
ktery
> pouziva IB pri generovani hesla je znamy, takze rozlousknou to heslo je uz
> jen otazka chvile (a vykonu stroje), ale podle mne zcela nepodstatna,
> protoze bud se hacker zna heslo SYSDBA, aby se mohl pripojit k isc4.gdb

Pro pripojeni k isc4.gdb bohuzel heslo SYSDBA nepotrebujes, staci se
pripojit jako
uplne bezpravny user a mas pravo na cteni. Zjistit heslo obycejneho
uzivatele
nebyva az tak velky problem ze....
Zkousel jsem nastavit tabulku aby na heslo nebylo ani ke cteni, ale IB to
neprekousla.
Nechapu proc je nutne ty hesla takhle vystavovat. Klient prece to zakodovane
heslo znat nepotrebuje.


ad "VYKON STROJE"
V dobe internetu a win9x k nim pripojenych neni myslim (ne ze bych to sam
umel)
pro zkusenejsiho "lamace" vyuzit spojene vypocetni sily mnoha pocitaci ve
stylu DOS
utoku na velmi rychle rozlousknuti i mnohem slozitejsiho algoritmu prostou
hrubou silou.


Ludek


DAO pod W98

[*] Martin <geoplan(zv)pp.sinet.sk> - 13.1.2001 07:23:50

Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
MAm problem . Urobil som si programcek v D5 s komponentamy od Erika Salaje DAO, ktorymi pristupujem na databazu Acces. Ak to spustam pod NT 4.00 tak to ide dobre . Ale ak to spustim pod Win95 tak sa to ruca. Ale iba dovtedy kym nenaistalujem Internet explorer. Potom to uz bezi v pohode. Pravdepodobne zaktualizuje nejake DLL, nie ? V NT40 uz IE je standartne.
Musim instalovat IE ? Nestacilo by len nejake DLL 20

Martin


Chranen pristup do databaze...

[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 13.1.2001 09:52:45

Dobry den,
ja zde k tomuto tematu uvedu jen par kacirskych myslenek...
Uvodem - vratme se na zem.

1) pokud obsahuje Vase databaze nejaka externe velmi hodnotna data,
pak je VELMI NESTASTNE nechat takovou databazi pristupnou z internetu.
Je v podstate lhostejne, jaky system tam budete mit - je to jen o mire
slozitosti to prolomit. A interbase bude z uvedenych argumentu spise
snadnejsi.

2) pokud pouzivate IB jako databazi na WWW serveru,
pak je treba, aby k takovemu serveru byl omezen pristup jen na
administratora,
a samozrejme jen kryptovanym kanalem (SSH). Ostatni pak maximalne postu
a dobre osetrene FTP. Pro pristup k IB pak je treba povolit pristup jen
z lokalniho pocitace. To jde u Classic, nevim jak u Superserver.
U NT je predpokladam treba instalova firewall, standardne to pokud vim
neumi.

3) v beznych podnicich vetsinou neni snadne zabezpecit ani smysluplna hesla
uzivatelu,
protoze predpisy, nepredpisy stejne si tam uzivatel rafinovane da krestni
jmeno :-((.
Leda snad generovat hesla. Opet zalezi na interni strukture IS. Pokud nekdo
muze z kose
vytahnout sestavu obratu vsech zakazniku firmy, nebude platit stovky tisic
specialistovi,
aby prolomil hesla u Interbase. Nebo da stovky tisic nekomu, kdo mu tu
sestavu prinese
ve trech kopiich domu. I tak je treba samozrejme takto "zabezpeceny" system
poradne
ochranit pred internetem.

4) banky a dalsi instituce, kde se da predpokladat velky zajem o data
pak vetsinou pouzivaji vicevrstve architektury, specializovane systemy,
auditing pristupu a nevim co jeste a k internetu nemaji tyto systemy pristup
ani nahodou.

Tolik muj skromny nazor
L.

TToolBar Width prirazeni

[*] Dan Svozil <dsvozil(zv)highchem(tec)com> - 13.1.2001 11:03:01

Ahoj Delfini,

mozna stupidni dotaz, ale nemuzu na to prijit.

Mam tridu odvozenou od TToolBaru, asi takhle:

type
TNewToolBar = class(TToolBar)
private
FOriginalWidth: Integer;
FOriginalHeight: Integer;
protected

public
constructor Create(AOwner:TComponent); override;
.
.
.

FOriginalWidth a FOriginalHeight maji uchovavat velikost toolbaru pri jeho
vytvoreni. Domnival jsem se ze jejich hodnoty pujde naplnit v
konstruktoru, asi takhle:

constructor TNewToolBar.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FOriginalWidth := Width;
FOriginalHeight := Height;
end;

To ale jaksi nefunguje, volany inherited konstruktor (odpovidajici
konstruktoru TToolBar.Create) inicializuje hodnoty Width := 150; a
Height := 29;

Nevite nahodou kde a jak se priradi do instance tridy TNewToolBar
(nebo TToolBar) hodnota Width a Height nastavena v ObjectInspectoru?
Fakt jsem se domnival ze v konstruktoru, ale zjevne ne.

Diky

Dan

QR - "A component named QRStandardPreview already

[*] Vladislav Cadsky <delphi(zv)cadsky(tec)cz> - 13.1.2001 11:51:07

Ahoj, ja jsem se s tim setkal velmi intenzivne !!!
Par navodu na odstraneni problemu:
1. Za QuickRep.Preview; zapsat: Application.ProcessMessages;
2. Pokud jsem volal kratce po ukonceni tisku: Screen.ActiveForm.handle tak
to taky blblo
3. Neuvolnuji tiskovy formular po ukonceni tisku z pameti jak jsem to mohl
delat bez problemu v delphi 3.

Snad je to vse co mi pomohlo k odstraneni tohoto problemu. QR je dobrej
nastroj, ale ma hodne nebezpecnych chyb !
Vlada Cadsky

----- Original Message -----
From: Ladislav Nagy
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, January 12, 2001 6:48 PM
Subject: QR - "A component named QRStandardPreview already exists"


Ahoj,

obcas se nam stava, ze za behu programu pri tisku pomoci QR system obcas
zpusobi Exception "A component named QRStandardPreview already exists".

Myslim, ze je to interni chyba QR, nebot mi s zadnym objekte
QRStandardPreview nepracujeme.
(D5 Prof.)

Nesetkali jste se s tim nekdo? Mohli byste mi prosim poradit?

Dekuji, Ladislav Nagy
............................................................................
....
Mgr. Ladislav Nagy, Tel: 00-420-606-612717
Baader Computer, s.r.o.
Sokolsk� 66, Praha 2, 120 00
Tel: 00-420-2-24941962, Fax: 00-420-2-24942564
Ladislav.Nagy(zv)bcpraha.com


Data z netu na COM ?

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 13.1.2001 12:13:41



> Dik za radu, ale obavam se, ze toto nepostaci... Proc? Protoze
kazda
> komunikace po seriovem portu(modem i prime propojeni) pouziva nejen datove
> linky TxD a RxD, ale take pomocne "dotazovaci" vstupy a vystupy. Ja
> potrebuji tyto vystupy k napajeni modemu. Toto se da sice nahradit
externim
> zdrojem, ale zustava problem v prenosu... Kvuli jednoduchosti modemoveho
> zarizeni se ho nemuzu dotazovat na stavy bufferu jako to dela napr.
> telefonni modem.... Toto by vsechno mela zastavat aplikace a prenaset uz
> jenom data na RxD.
> To jen tak na upresnenou...


RTS, CTS, DSR RI, a spol nejsou nutne k vlastnimu rs232 prenosu..... Pokud
je driver/zarizeni vyzaduje staci je vetsinou vhodnym zpusobem propojit na
konektoru (kabelem dal pak vest nemusi).

Samozrejme je mozne pouzit vystupy ze seriovky k napajeni zarizeni, _ALE_
tyto vystupy jsou velice velice slabe (pokud se pamatuju tak max proud je
cca radove 1mA). Neverim tomu, ze radiovy modem bude mit tak malou
spotrebu...

PS - proc tu trasu nezrealizujes zase pomoci wireless LAN karty? Nemyslim,
ze by radiovy modem byl vyrazne levnejsi nez napriklad WaveLan od Lucentu...
(nacic dosahnes rychlosti o ktere se radiovemu modemu ani nesni)

D. Toman

Code Explorer

[*] Marek Soukup <msoukup(zv)btt(tec)cz> - 13.1.2001 13:40:17

Hi hou,
mam D5 Enterprise a zlobi mi Code explorer, zobrazi strom, ale zadna vetev
nejde rozbalit. Koukal jsem do archivu a na inprise, ale s touhle chybou
jsem se nesetkal. Fix, patch, update atd. nemam zadnej.
Nevite nekdo nahodou co s tim ? Pracovat s tim samolitr jde, ale zdrzuje to.

MS


DAO pod W98

[*] Erik Salaj <winsoft(zv)napri.sk> - 13.1.2001 14:55:37

>MAm problem . Urobil som si programcek v D5 s komponentamy od Erika Salaje DAO, ktorymi pristupujem na databazu Acces. Ak to spustam pod NT 4.00 tak >to ide dobre . Ale ak to spustim pod Win95 tak sa to ruca. Ale iba dovtedy kym nenaistalujem Internet explorer. Potom to uz bezi v pohode. Pravdepodobne >zaktualizuje nejake DLL, nie ? V NT40 uz IE je standartne.

Pozri http://www.cybermagic.co.nz/winsoft/daofaq.htm#Q3
pripadne mi posli chybovu hlasku, ktoru dostanes.

Erik


Stay on Top

[*] Ondrej Skipala <OSkip(zv)seznam(tec)cz> - 13.1.2001 19:59:29


Nev�te n�kdo zda-li existuje n�jak� vlastnost, aby n�kter� form z�stala st�le naho�e, pokud je zobrazen�? a to i v p��pad� �e kliknete na n�jakou jinou nebo n�kterou novou zobraz�te?

P�edem d�kuji za odpov��.
_____________________________________________________________________
Mapy Prahy, Brna a #ech najdete na http://www.mapy(tec)cz


OT:Pomale pripojeni WinNT -> Win9x

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 13.1.2001 21:09:06

Ahoj,
pokud se pripojuju po siti z WinNT na Win98, trva to nekolik vterin (cca 8),
nevite si s tim nekdo rady?

Projevuje se to z WinCommandera, Pruzkumnikem, jako connect na InterBase,
proste vsude.
S Delphi to ma sice pramalo spolecnyho, ale strasne to otravuje..:-(

WinNT4 SP5; TCP/IP; pevne IP adresy v mistni siti;

Diky
Ota Maly

PaPouch elektronika
http://www.papouch.com


TToolBar Width prirazeni

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 14.1.2001 01:15:25

Musis to opravit nasledovne:

type
TNewToolBar = class(TToolBar)
private
FOriginalWidth: Integer;
FOriginalHeight: Integer;
protected
procedure Loaded; override;
public
constructor Create(AOwner:TComponent); override;
.
.
.

constructor TNewToolBar.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
end;

procedure TNewToolBar.Loaded;
begin
FOriginalWidth := Width;
FOriginalHeight := Height;
end;

Jan Skopovy


Paradox klient

[*] Jirka Virt <virt(zv)volny(tec)cz> - 14.1.2001 10:29:17

Ahoj vsem,
nemate nekdo zkusenosti s psanim klienta na SQL Server.
Mame aplikace , ktere pracuji s paradox tabulkami. A protoze jsou jeste
nektere aplikace v Dosu je potreba u techto tabulek zustat.Nove aplikace
piseme v Delphi 5 Pro a protoze vysledky se dostavaji po siti velice pomalu
(pomaleji nez v klasicke Dosovem Paradoxu) je zrejme nutnost si napsat
vlastni SQL server.A tady je problem .
Odeslat pozadavek a spustit ho na serveru umim , ale nemam vubec zadny
slusny napad jak dostat data zpet.nemate nekdo jakykoliv napad nebo link???

Mockrat
predem dekuji

Jirka Virt

email: virt(zv)volny(tec)cz

Form a Thread

[*] Jirka Virt <virt(zv)volny(tec)cz> - 14.1.2001 10:32:14

Ahoj,
nevite, jak vytvorit nove okno s vlaknem ?
Zkousim to takto:

constructor TFormThread.Create(TFormular:TComponentClass;Form:TForm);
begin
Application.CreateForm(TFormular,Form);
From.Show;
FreeOnTerminate := True;
inherited Create(True);
end;

okno se sice spusti , ale ne v novem vlakne.Zrejme je na vine vytvareni pres
Application??Jak toto udelat dle me predstavy.

Stay on Top

[*] Bosnis <bosnis(zv)atlas(tec)cz> - 14.1.2001 10:54:12

Podivej se na vlastnost FormStyle je tam volba fsStayOnTop.

----------------------------------------------------------------------------
---
Ing. Pavel SPEJTEK
bosnis(zv)atlas(tec)cz
http://freeweb.coco(tec)cz/ps/index.html
----------------------------------------------------------------------------
---

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ondrej Skipala
Sent: Saturday, January 13, 2001 7:59 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Stay on Top


Nev�te n�kdo zda-li existuje n�jak� vlastnost, aby n�kter� form z�stala
st�le naho�e, pokud je zobrazen�? a to i v p��pad� �e kliknete na n�jakou
jinou nebo n�kterou novou zobraz�te?

P�edem d�kuji za odpov��.
_____________________________________________________________________
Mapy Prahy, Brna a #ech najdete na http://www.mapy(tec)cz

Paradox klient

[*] L. ZITA <konference(zv)sales(tec)cz> - 14.1.2001 14:06:15


From: "Jirka Virt" <virt(zv)volny(tec)cz>
> Ahoj vsem,
> nemate nekdo zkusenosti s psanim klienta na SQL Server.
> Mame aplikace , ktere pracuji s paradox tabulkami. A protoze jsou jeste
> nektere aplikace v Dosu je potreba u techto tabulek zustat.Nove aplikace
> piseme v Delphi 5 Pro a protoze vysledky se dostavaji po siti velice
pomalu
> (pomaleji nez v klasicke Dosovem Paradoxu) je zrejme nutnost si napsat
> vlastni SQL server.A tady je problem .
> Odeslat pozadavek a spustit ho na serveru umim , ale nemam vubec zadny
> slusny napad jak dostat data zpet.nemate nekdo jakykoliv napad nebo
link???
>
> Mockrat
> predem dekuji
>

Zdaleka nejrozumnejsi by asi bylo prepsat to cele do SQL. Pozor ale na pouhe
"preklopeni" aplikace. Je nutna cela nova filizofie pristupu k datum.
Uvedi priklad:
99% puvodne jednouzivatelskych programu nad souborovou databazi pri otevreni
nejake agendy zobrazi vsechny zaznamy v nejakem gridu. Uzivatel pak pridava,
vybira edituje....
Pokud pouzijes toto v SQL samozrejme to oteverni a updaty budou strasne
pomale (v zasade temer stejne jako
v souborove databazi).
Lepsi je nejprve nechat uzivatele rici co chce a pak teprve zobrazovat jen
to co potrebuje.

Psat vlastni SQL server nepovazuji za stastne reseni.

Pokud ty "nektere aplikace v DOSU" nepotrebuji s daty pracovat "online",
muzes pouzit postup
export do Paradoxu -> zpracovani v DOSu -> Import na SQL server.

Ludek


Zarovnanie textu v tlacitku do strany

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2001 14:43:10

From: "Roland Turcan (RoTurSoft)" <rotursoft(zv)nextra.sk>
> Pouzivam svojho potomka z TJvImgBtn z JCL lib.

... z JEDI-VCL .... coz neni totez co JCL (tam nejsou nastesti zadne
komponenty ;-)

Petr Vones, amatersky programator

Form a Thread

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

From: "Jirka Virt" <virt(zv)volny(tec)cz>
> nevite, jak vytvorit nove okno s vlaknem ?

Ahoj,

ve VCL muzes vytvaret vizualni komponenty pouze v hlavnim threadu. Vse ostatni
musis resit volanim TThread.Synchronize.

Petr Vones, amatersky programator


SInfo

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2001 14:47:37

From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> stahnul jsem si program SInfo a nemohu ho spustit pod W2000 Adv. Server.
> Nesetkal se s tim nekdo? Pise to chybu:
> Styler.DLL is not a valid Windows image. Please check this against your
> installation diskette.

Ahoj,

a nemuze byt problem v tom, ze ten soubor je jen poskozeny (napadeny virem) ?
Pokud jsi jej pred tim pouzival na Win9x tak by to mohlo byt ono. PE loader ve
WinNT je nastesti mene tolerantni k pripadnym chybam v PE souboru.

Petr Vones, amatersky programator


Code Explorer

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2001 14:53:16

From: "Marek Soukup" <msoukup(zv)btt(tec)cz>
> mam D5 Enterprise a zlobi mi Code explorer, zobrazi strom, ale zadna vetev
> nejde rozbalit. Koukal jsem do archivu a na inprise, ale s touhle chybou
> jsem se nesetkal. Fix, patch, update atd. nemam zadnej.

Ahoj,

Update Packem #1 by jsi mel zacit, uz jen proto ze jsou tam opraveny pomerne
zavazne chyby ve VCL (pri pouzivani udalosti OnCustomDrawXXX u viz.komponent).
Ohledne problemu s Code Explorerem, tohle trva jiz od doby kdy byl do IDE
prvne zaclenen. Obvykle pomuze zavreni a znovuotevreni projektu, navic ta
chyba vznika jen obcas.

Petr Vones, amatersky programator

Sessions

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2001 14:56:31

From: "Ing. Leopold Grepl" <Grepl(zv)melzer(tec)cz>
> v Delphi 5, NT4 SP6 si dynamicky vytvarim 20 objectu TSession a 20 objectu
> TDatabase vzajemne propojenych pres TDatabase.SessionName, protoze to
> potrebuji poustet ve vlaknech. Pri Open techto databazi mi to spadne asi u
> patnacte databaze s hlasenim "Insufficient memory for this operation". V

Ahoj,

problem je ve starickem BDE (pokud mas jen trochu moznost jej nepouzivat tak
se tou cestou vydej). Zkus v BDE Adminu v Configuration/System/INIT zvetsit
hodnoty SHAREDMEMSIZE, MAXFILEHANDES atd ... dale viz help.

Petr Vones, amatersky programator

Stay on Top

[*] Hurricane <hurricane(zv)quick(tec)cz> - 14.1.2001 15:59:20

Zdravim

TForm neni ta Form, ale ten Form. Nastav property Formu FormStyle na
fsStayOnTop. Ale obcas to zlobi, jestli chces, poslu komponentu ktera
funguje bez problemu.

Hurricane

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

Nev�te n�kdo zda-li existuje n�jak� vlastnost, aby n�kter� form z�stala
st�le naho�e, pokud je zobrazen�? a to i v p��pad� �e kliknete na n�jakou
jinou nebo n�kterou novou zobraz�te?

terminalove ctecky carkoveho kodu

[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 14.1.2001 18:48:50

Ahoj,

no, kdysi jsem mival (mozna jeste nekde mam) sadu fontu pro carove
kody. Stacilo napsat "*123456*" v tomto fontu a kod byl na svete a fungoval
(delal jsem pro skladove hospodarstvi). Takze pak by sel stitek i tisknout
z Delphi primo na Canvas tiskarny - je to mnohem rychlejsi a lepsi nez
nejake generatory sestav ala QuickReport, Sinea,...

Mam i unitu pro prepocet milimetru na velikost pixelu pro danou vybranou
tiskarnu. Kdysi jsem delal mapy a tam jsem delal tisk map s docela slusnou
presnosti...

>prave na zaklade tech zprav me napadlo pozadat o link
>nebo vice informaci.
>Potrebuji ziskat zakladni prehled o standardech, pro ktere
>budu treba schopen generovat stitky a take je tisknout (Sinea ???).

S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------


LoadPackage nefunguje jak ma

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 14.1.2001 23:38:53

From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> LoadPackage('C:\NejakaCesta\pcgFirstPlugin.bpl');
>
> pak me exac vyhodi hlasku: The dynamic link library
> pcgFirstPlugin.bpl could not be found it the specified path

Ahoj,

a opravdu tam je ? Obvykle byvaji prelozene balicky v BPL adresari.

Petr Vones, amatersky programator


LoadPackage: neco jsem nepochopil?

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

From: "Slavek Rydval" <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> pri hrani s balicky jsme narazil na nasledujici problem: nahraji si
> balicek, ktery pouzivaji Delphi:
>
> hm := LoadPackage ('C:\Borland\Delphi5\Bin\dclstd50.bpl');
>
> a pak ho uvolnim:
>
> UnloadPackage (hm);
>
> coz je kruta chyba (access violation).

Ahoj,

vzhledem k tomu, ze nahravas design time balicek IDE, tak je to pomerne mozne.
Volani UnloadPackage je totiz pri dynamickem nahravani balicku ponekud
slozitejsi (viz ten clanek), protoze si musis byt jisty, ze v dobe volani uz
neexistuje zadna instance objektu v nem obsazena.

> V helpu me ujistuji, ze LoadPackage natahne balicek do pameti,
> otestuje duplicitu unit (co to vlastne znamena?) a zavola inicializaci

Aby v ruznych baliccich nebyl unit stejneho jmena.

> vsech unit. Navic predpokladam, ze si system zvedne citac a po
> zavolani UnloadPackage citac snizi a v pripade, ze jiz balicek
> nikdo nepouziva, odstrani jej z pameti. Jenze to jaksi odporuje

Volani UnloadPackage je chovanim vicemene totozne s FreeLibrary. Bylo by mozne
vytvorit jakysi 'manager', ktery by pri vytvoreni komponenty z balicku zvedl
citac a po uvolneni snizil. Jakmile by dosahl nuly tak by volal UnloadPackage.
Treba TComponentList se pro toto pomerne hodi. V helpu se take mimo jine pise:

To unload a package dynamically, call UnloadPackage. Be careful to destroy any
instances of classes defined in the package and to unregister classes that
were registered by it.

Petr Vones, amatersky programator

DAO

[*] Erik Salaj <winsoft(zv)napri.sk> - 15.1.2001 00:42:43

>MAm problem . Urobil som si programcek v D5 s komponentamy od Erika Salaje DAO, ktorymi >pristupujem na databazu Acces. Ak to spustam pod NT 4.00 tak to ide dobre . Ale ak to spustim >pod Win95 tak sa to ruca. Ale iba dovtedy kym nenaistalujem Internet explorer. Potom to uz bezi v >pohode. Pravdepodobne zaktualizuje nejake DLL, nie ? V NT40 uz IE je standartne.

Pozri http://www.delphi.pari.bg, klikni Services, najdes
tam odkazy na MSDN ohladom instalovania DAO.

Erik


QR - "A component named QRStandardPreview already

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.1.2001 02:42:31

From: "Ladislav Nagy" <delphi-konference(zv)bcpraha.com>
> obcas se nam stava, ze za behu programu pri tisku pomoci QR system obcas
> zpusobi Exception "A component named QRStandardPreview already exists".

Ahoj,

je to chyba v QR, nejake reseni je popsano tady:
http://x57.deja.com/getdoc.xp?AN=564317926.1

Petr Vones, amatersky programator


Vytvoreni ikonky

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

From: "Petr Vaclavek" <bla(zv)atrey.karlin.mff.cuni(tec)cz>
> V ImageListu mam dva male obrazky (16*16) a potrebuji z nich
> vytvorit novy, stejne velky, ktery vznikne tim, ze jeden z obrazku
> nakreslim na druhy.
> Konkretne potrebuji pridat sipecku oznacujici zastupce na jinou
> libovolnou ikonu. Muze mi nekdo poradit, jak na to?

Ahoj,

V JCL (http://delphi-jedi.org/Jedi:JCLDOWNLOADS) je funkce OverlayIconShortCut

uses
JclShell;

procedure TForm1.Button1Click(Sender: TObject);
var
Icon: TIcon;
LargeIcon, SmallIcon: HICON;
begin
Icon := TIcon.Create;
try
ImageList1.GetIcon(0, Icon);
LargeIcon := 0;
SmallIcon := Icon.Handle;
OverlayIconShortCut(LargeIcon, SmallIcon);
Icon.Handle := SmallIcon;
ImageList1.AddIcon(Icon);
finally
Icon.Free;
end;

PaintBox1.Invalidate;
end;

procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
ImageList1.Draw(PaintBox1.Canvas, 0, 0, 0);
ImageList1.Draw(PaintBox1.Canvas, 30, 30, 1);
end;

Popripade jeste zjednodusena verze za pomoci primeho volani API:

uses
CommCtrl, JclShell;

procedure TForm1.Button1Click(Sender: TObject);
var
LargeIcon, SmallIcon: HICON;
begin
SmallIcon := ImageList_GetIcon(ImageList1.Handle, 0, ILD_NORMAL);
LargeIcon := 0;
OverlayIconShortCut(LargeIcon, SmallIcon);
ImageList_AddIcon(ImageList1.Handle, SmallIcon);
DestroyIcon(SmallIcon);

PaintBox1.Invalidate;
end;


Petr Vones, amatersky programator

Highlighters pro SynEdit

[*] Jan Krizek <krizek(zv)krizkules(tec)cz> - 15.1.2001 07:21:34

Ahoj,

Chci si vytvorit vlastni highlighter pro komponentu SynEdit a zatim se mi nezdarilo najit zadnou dokumentaci. Delal to jiz nekdo z vas, kdo by mi mohl poradit kde zacit. Hlavne zda existuje nastroj pro generovani z popisu gramatiky, nebo se pise rovnou zdrojak objektu. Vim, ze je v distribucnim balicku SynEditu je program SynGen, ktery chce soubor *.msg (Grammar file), ale netusim jakou ma mit strukturu, protoze jsem zadny nikde nenasel.

Diky Honza +

ZAKAZ ROLOVANI V RICHEDITU

[*] Uniplet T�eb�� - elektronika - 15.1.2001 07:38:17

Ahoj

mam nasledovny problem, ve svem programu mam
umistnenou komponentu RICHEDIT98 ve ktere muze
uzivatel psat ruznym typem pisma o ruzne vysce pisma
a potreboval bych zakazat rolovani textu, to je kdyz dojde
na konec pomyslneho papiru, aby se text neposunul o radek vys,
( pres maxlength to kontrolovat nejde kvuli ruzne vysce pisma )
a nejak ho na to upozornit ( potrebuju odchytit zacatek rolovani,
zakazat ho a zobrazit message s varovanim )

DIK


IB refresh

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 15.1.2001 07:41:27

Eventy musi fungovat, sam je pouzivam a naprosto bez problemu.

> Jak donutik klientskou stranu po pridani zaznamu do databaze k refreshi? Povesit refresh na timer rozhodne nepovazuji za elegantni reseni. TIBEvents mi nejak nefunguje. Please !!!
>
>
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 5.1.2001
>
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


Background v ListView

[*] Ing. Csaba Kissi <ckissi(zv)email(tec)cz> - 15.1.2001 07:56:48

Zdravim Vas,

Pozna niekto 100%-ny sposob pre pridanie bitmapy do pozadia ListView a TreeView
? Potrebujem aby to fungovalo dobre aj v pozadi ikoniek a aj pri prekreslovani.
Zatial vdaka.

EMAIL.CZ - Vase posta je vzdy s Vami
http://www.email(tec)cz

IB6 - dotazy p es v�ce datab�z�

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.1.2001 08:02:20

Haj hou!

On 12 Jan 2001,, ing.Pavel Cabalka wrote:

> Dobr�ho odpoledne v em
> Narazil jsem na drobn probl�m (viz. subj.) Nev�te n kdo jak se to v IB6 e �?
> d�ky a p kn v�kend

Dotazy pres vice databazi jsou vlastnosti (s mnoha omezenimi)
BDE, tedy Local SQL. InterBase sama o sobe nic takoveho
nepodporuje.

Hodne zdaru


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

Sessions

[*] Ing. Leopold Grepl <Grepl(zv)melzer(tec)cz> - 15.1.2001 08:20:20

Zdravim vsechny,

v Delphi 5, NT4 SP6 si dynamicky vytvarim 20 objectu TSession a 20 objectu
TDatabase vzajemne propojenych pres TDatabase.SessionName, protoze to
potrebuji poustet ve vlaknech. Pri Open techto databazi mi to spadne asi u
patnacte databaze s hlasenim "Insufficient memory for this operation". V
Task Manageru mam ale volnou jak Ramku tak i mista na disku je dost. Po
ladeni jsem dosel az na fci dbiOpenDatabase, ktera toto hlaseni dava jako
Result. V helpech o ni skoro nic neni. Opravdu me nenapada cim by to mohlo
byt.

Zkousel jsem vytvorit a otevrit asi 500 TDatabase na jeden TSession (bez
problemu) i 200 TSession bez TDatabase (bez problemu). Spolu to ale nejede.
Nesetkal se uz nekdo s podobnym problemem ?

Leopold Grepl
DC Concept a.s.

Kostra kodu :

procedure Pokus;
var DataBase : TDatabase;
i : Integer;
ConSession : TSession;
begin
for i := 0 to 1000 do
begin
ConSession := Sessions.OpenSession('Ses'+IntToStr(i));
Database := TDatabase.Create(self);
with Database do
begin
.....naplneni TDatabase prihlasovacimi parametry.....
end;
Database.SessionName := ConSession.SessionName;
ConSession.OpenDatabase(Database.DatabaseName); nebo Database.Open;
end;
end;
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.225 / Virova baze: 107 - datum vydani: 22.12.2000

Kde sehnat Ikony, bbitmapy ...?

[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 15.1.2001 08:21:03

ahoj,
nevite nekdo o nejakem paku ikon a bmp pro pouziti napr. na BitBtn nebo MainMenu? Hledal jsem na DSP a Torry, ale asi spatne. Treba podobne bitmapy, jako maji Delphi v MainMenu.

PS: Cim vice, tim lepe.

Diky moc. S pozdravem Milan Cizek, D5Ent
_____________________________________________________________________
Po�ten��ko pro ka�d� den: http://www.novinky(tec)cz


Highlighters pro SynEdit

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 15.1.2001 08:26:34

Ahoj,

zadna dokumentace zatim neni, musis studovat zdrojaky.

Slavek

> Chci si vytvorit vlastni highlighter pro komponentu SynEdit a zatim se mi nezdarilo najit zadnou dokumentaci. Delal to jiz nekdo z vas, kdo by mi mohl poradit kde zacit. Hlavne zda existuje nastroj pro generovani z popisu gramatiky, nebo se pise rovnou zdrojak objektu. Vim, ze je v distribucnim
balicku SynEditu je program SynGen, ktery chce soubor *.msg (Grammar file), ale netusim jakou ma mit strukturu, protoze jsem zadny nikde nenasel.

> Diky Honza +


--------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
* K Jezisku, panacka, ja se budu kolebati...
* Narodil jsem se, radujte se...
--------------------------------------


IB refresh

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 15.1.2001 08:30:43

> Jak donutik klientskou stranu po pridani zaznamu do databaze k
> refreshi? Povesit refresh na timer rozhodne nepovazuji za elegantni
> reseni. TIBEvents mi nejak nefunguje. Please !!!

Na to se prece kvuli nedostatku informaci neda odpovedet. My
jsme pouzivali IBEvents a vse bylo v pohode. Napis, proc Ti to
nejde, co to hlasi apod.

David


LoadPackage nefunguje jak ma

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 15.1.2001 08:42:27

Ahoj,

jsem si tim 100% jisty. Prekladam tento balicek a nasledne projekt v
jedinem ProjectGroup. Kdyz se podivam do toho adresare, je to tam, kdy
zavolam predtim napriklad FileExists, je to ok. Zkousel jsem to volat
nekolika zpusoby:

* uvedenym, tj. absolutni cestou, balicek byl i v pozadavanych cestach
* bez uvedeni cesty, soubor byl v adresari aplikace nebo v pozadovanych
cestach (mezi nimi samozrejme byl aktualni adresar).

Bohuzel bez uspechu. :-(

Co se tyce uvedeni BPL adresare, jak rikas, predpokladam, ze je to pouze
nejaka konvence, nikoliv vsak podminka. :-)

Slavek


> Ahoj,
>
> a opravdu tam je ? Obvykle byvaji prelozene balicky v BPL adresari.
>
> Petr Vones, amatersky programator
>
>
--------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
* K Jezisku, panacka, ja se budu kolebati...
* Narodil jsem se, radujte se...
--------------------------------------


kopirovani a nahrazeni oznaceneho textu v cizi apl

[*] Mion <mion(zv)quick(tec)cz> - 15.1.2001 09:06:04

Moc toho nenaprogramuji, takze prosim o radu (snazil jsem se to najit v
helpech cely vikend, ale marne) - nicmene to zrejme bude trivialni:

Jde o to, ze mam aplikaci, ktera bezi na pozadi a pri stisku definovane
hotkey vezme oznaceny text z okna prave aktivni aplikace, zformatuje jej
a vlozi ho zpet na misto oznaceneho textu. Zadrhnul jsem se prave na tom
zjisteni, kde se naleza kurzor v aktivnim okne cizi aplikace, popr, kde
se naleza onzaceny text (abych tak zjistil, odkud prevzit data).

Jak zjistit cizi bezici okno cizi aplikace, ktera je momentalne "na
vrchu", jsem nasel, to neni problem. Najit vsechny jeho prvky je take
snadne. Ale nemuzu prijit na zpusob, jak zjistit objekt onoho okna (typu
edit, memo, richedit), v kterem se momentalne nachazi focus, abych z nej
mohl nejak zkopirovat text. Jak postupovat dale (tj nahradit oznaceny
text), k tomu jsem se jeste nedostal (dalsi krok), ale pokud to nekdo
vi, budu moc rad, kdyz mi usetri cas radou ci odkazem na vhodne funkce.

Diky,diky,diky za pomoc

Michal Ondrej


SMS Oskar

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 15.1.2001 09:15:52


>Ahoj,
>jak m��u ud�lat, aby m�j program pos�lal SMS na Oskara? Nem�te s t�m n�kdo
zku#enosti?

Tak jednoduche to nebude, rozhodne nie cez email format ale pojde to iba cez
Web. Ako to funcguje presne nevoiem ale tetnto problem riesi celkom slusny
programek DreamCom http://kubik.mute(tec)cz/dreamcom/

Pavol Kaka�ka
kasix(zv)atlas(tec)cz


IB6 - dotazy p�es v�ce datab�z�

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 15.1.2001 09:19:22

ahoj,

IB6 umoznuje zahajit jednu transakci nad vice databazemi a/nebo db
servery. to umozni vykonat dotazy nad vice databazemi a zplatnit je
jedinym commitem. ta metoda se jmenuje nejak jako two phaze commit. v
podstate, das commit, ten se prednachysta (servery/databaze vrati jestli
jako ze jo, nebo jako ze ne) a pokud jo, taxe commitovana data uvedou do
jakeho si (konkretne limbo) stavu, kdy jeste neplati a ceka se na
potvrzeni ze ridiciho serveru. teprve az vsecky srvr/db potvrdi, vyda
ridici server povel k prevedeni z limbo stavu mezi ziva data. smula je,
pokud vypadne spojeni mezi servery a data zustanou v limbu. potom lze
pomoci utilitky (gfix?) limbo data zahodit nebo ozivit, dle uvazeni
admina.

presny postup neznam, ale princip je doufam jasny. imho staci zahajit
transakci nad vice db a vono to bude fungovat.

dekuji PeC(zv)

CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

> Dobr�ho odpoledne v#em
> Narazil jsem na drobn� probl�m (viz. subj.) Nev�te n�kdo jak se to v
IB6 �e#�?
> d�ky a p�kn� v�kend
> PavelC


DBMS_ALERT - HELP!!!

[*] azeleny(zv)csas(tec)cz - 15.1.2001 09:27:10

NO, v nejakem okamziku (po inicializaci aplikace) si spostim thread.

Oracle session mam nastavene threadsafe = true (viz dokumenatce k DOA).
Thread execute vola proceduru CheckAlert, ktera obashuje zhruba neco
takoveho:

var
ac_alert, ac_msg:String;
ac_state:Integer;

inicializace promennych procedury...
...
while not terminated do
begin
if terminated then exit;
ac_alert := '';
Datamodul.OraSession.DBMS_Alert.WaitAny(ac_alert,ac_msg,ac_state,5);
if ac_alert = 'NECO' then
...

a.
-----------------------------------------------------------------------
Ales Zelen� (OK1UUE)
#esk� spo�itelna a.s.
Na Perst�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.

Vyvolani nabidky praveho tlacitka na souboru

[*] Tom� =?ISO-8859-1?Q?V�tek <tvitek(zv)centrum(tec)cz> - 15.1.2001 09:31:46

Potreboval bych vyvolat nabidku, ktera se normalne v Pruzkumniku
zobrazi po stisku praveho tlacitka mysi na souboru. Podobne to
funguje napr. v Salamanderovi.
Dekuji Tomas Vitek

K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz


IB refresh

[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 15.1.2001 09:41:36

Zde je dobre si provest update na verzi IBX4.4, v predchozich
verzich neni implementace IBEvent korektni.
Dale je treba si dat pozor na to, ze Event se vola v jinem threadu.
dalsi moznosti je pouziti IBSuper events component, odkaz
je na www.ipphoenix.com

Slavek

>
> Eventy musi fungovat, sam je pouzivam a naprosto bez problemu.
>
> > Jak donutik klientskou stranu po pridani zaznamu do databaze k
refreshi? Povesit refresh na timer rozhodne nepovazuji za elegantni reseni.
TIBEvents mi nejak nefunguje. Please !!!

IB refresh

[*] azeleny(zv)csas(tec)cz - 15.1.2001 09:53:47

> > Jak donutik klientskou stranu po pridani zaznamu do databaze k
> > refreshi? Povesit refresh na timer rozhodne nepovazuji za elegantni
> > reseni. TIBEvents mi nejak nefunguje. Please !!!
>
> Na to se prece kvuli nedostatku informaci neda odpovedet. My
> jsme pouzivali IBEvents a vse bylo v pohode. Napis, proc Ti to
> nejde, co to hlasi apod.

V NT4 bez SP 4 byla chyba (nikoliv v IB) v implemetaci TCP/IP (opravuje SP4
a vyssi), proto na takovychto sitich mohou eventy zlobit. ale top asi nebude
ten pripad.

a.

Velke bitmapy a Jpeg

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 15.1.2001 10:00:11

> > Narazil jsem ale na jiny problem: pomoci unity JPEG (soucast
> > instalace Delphi Pro) jsem to chtel ulozit do formatu JPG, nacez se
> > objevilo suche hlaseni JPEG error #36. Nevite prosim nekdo, zda tato
>
> toto je pomerne kuriozni chyba Jpeg unitu, ktera vznika pokud ma
> vysledny JPEG obrazek velikost cca mezi 1 a 2 MB, pod a nad tuto
> hranici to funguje.

Aha, spodni hranici 1 MB jsem uz objevil, tu horni ne... Nevite nekdo
o zpusobu, jak to obejit, napr. jestli by nebylo mozne mu hned na
zacatku nejakym zpusobem 2 MB pameti "spotrebovat"?

Karel Rys

poskozene ikony na palete Delphi

[*] Erik Salaj <winsoft(zv)napri.sk> - 15.1.2001 10:31:46

> > A tymto konstatovanim je uz tento problem zo strany Borland-u vyrieseny?
>
> Nevim ...

Zda sa, ze ano.

> > To je tak narocne zmenit system zobrazovania, ci uchovavania obrazkov
> > aby sa tych par ikoniek zobrazilo korektne? To koli takejto somarine
>
> Tohle je spis dotaz na Microsoft. Skutecnost, ze vyuzivanim ImageListu,
coz je
> udajne zdroj te chyby (http://x64.deja.com/getdoc.xp?AN=692912262) muze
dojit
> k zablokovani celeho systemu je vcelku problem OS a/nebo driveru.

Je to zaroven aj problem kazdej aplikacie, ktora to pouziva.

> Otazka je co by s tim mel Borland delat. Nepouzivat vlastnost OS jen pro
to,
> ze nekteri vyrobci nejsou schopni napsat ani funkcni driver ? Problem se
navic

Riesit tento problem, napriklad pouzit ine funkcie OS. Nemyslim, ze korektne
zobrazenie ikon je zlozita zalezitost.

> ocividne tyka jen S3 karet, je opravdu treba pouzivat donekoncna takovy
srot ?

Na mnohe ucely takato karta postacuje. Bez ohladu, ci je to srot alebo nie
(co v PC-cku nie je srot?) tieto karty su znacne rozsirene (nielen u nas).
Ja
som mal obycajnu S3 kartu, teraz mam GeForce 2 ale pri programovani
v Delphi nevidim medzi nimi ziadny rozdiel (az na rozhadzane ikony ;-)).

Erik


SMS Oskar

[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 15.1.2001 10:40:06

Bohuzel Oskar zatim neni na zasilani sms z Internetu na mobil pripraven.
Pracuje se na tom a udajne by to melo byt spusteno v nejblizsich tydnech.
S pozdravem Michal Tiller,

Michal.Tiller(zv)oskarmobil.Cz :o)
RF Support Coordinator, OSKAR, RF - Engineering
+420 (02) 7117 1388, +420 (0608) 011 327

-----Original Message-----
From: Ji�� H�sek [mailto:jiri.hysek(zv)worldonline(tec)cz]
Sent: Thursday, January 11, 2001 9:20 PM
To: delphi-l(zv)fwd(tec)cz
Subject: SMS Oskar


Ahoj,
jak m��u ud�lat, aby m�j program pos�lal SMS na Oskara? Nem�te s t�m n�kdo
zku#enosti?

Paradox - language drive

[*] Ales Janda <ales.janda(zv)atlas(tec)cz> - 15.1.2001 10:55:38

Ahoj,
program Database Desktop umoznuje nastavit jazyk u paradoxove tabulky, ale
ja bych potreboval, aby to umela ma aplikace. V napovede pro BDE jsem nasel
funkci DbiSetProp(), ktera by to mela umoznit.
DbiSetProp(hDBIObj(Table1.Handle), curLANGDRVNAME, PropValue) - treti
parametr je typu longint, ale language drivers(napr.DB852CZ0, anczech ...)
jsou nezname typy, takze volani funkce konci chybou.
Nevi nekdo jak tuto funkci pouzit na zmenu jazyka nebo nejaky jiny zpusob
jak tuto zmenu provest, popripade jestli nekdo nevi offset, na kterem je v
hlavicce souboru ulozena informace o jazyku.

Ales Janda
CTI Software

IB6 - Foreing key

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 15.1.2001 10:56:17

Zdravim.

Chcem vykonat tento prikaz:

alter table OBJEDPOLOZKY
add constraint FK_OBJEDPOLOZKY
foreign key (CISLO)
references OBJEDNAVKY(CISLO)
on delete CASCADE
on update CASCADE

A vrati sa mi toto hlasenie:

This operation is not defined for system tables.
unsuccessful metadata update.
STORE RDB$REF_CONSTRAINTS failed.
action cancelled by trigger (1) to preserve data integrity.
Name of Referential Constraint not defined in constraints table.


Nie je mi jasne ze preco mi to hlasi.


Tabulky su vytvorene:

/* Table: OBJEDNAVKY */

CREATE TABLE OBJEDNAVKY (
JEDIN AUTOINTEGER NOT NULL,
ROK SMALLINT,
CISLO INTEGER NOT NULL,
ICOKOD ICO_KOD NOT NULL,
PARTJEDIN INTEGER NOT NULL,
DATUM TIMESTAMP NOT NULL,
DODLEHOTA TIMESTAMP,
VYSTAVIL INTEGER,
SYSDATUM TIMESTAMP,
VYBAVENA BOOLEAN NOT NULL,
POTVRDENA BOOLEAN NOT NULL,
TEXT VARCHAR(5000) character set WIN1250 collate PXW_CSY);
/* Primary keys definition */

ALTER TABLE OBJEDNAVKY ADD CONSTRAINT PK_OBJEDNAVKY PRIMARY KEY (JEDIN);/* Foreign keys definition */

ALTER TABLE OBJEDNAVKY ADD CONSTRAINT FK_OBJEDNAVKY_ICOKOD FOREIGN KEY
(ICOKOD) REFERENCES PART1 (ICOKOD) ON UPDATE CASCADE;
ALTER TABLE OBJEDNAVKY ADD CONSTRAINT FK_OBJEDNAVKY FOREIGN KEY (PARTJEDIN)
REFERENCES PART2 (JEDIN);/* Indices definition */

CREATE UNIQUE INDEX OBJEDNAVKY_CISLO ON OBJEDNAVKY (CISLO);

set term ## ;

CREATE TRIGGER OBJEDNAVKY_ID FOR OBJEDNAVKY
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
NEW.JEDIN = GEN_ID(OBJEDNAVKY_ID,1);
END##

set term ; ##
/* Table: OBJEDPOLOZKY */

CREATE TABLE OBJEDPOLOZKY (
JEDIN AUTOINTEGER NOT NULL,
CISLO INTEGER,
JEDNOTKA VARCHAR(3) character set WIN1250 collate WIN1250,
CENA MENA,
MENA VARCHAR(5) character set WIN1250 collate WIN1250,
POCET MENA,
DODANY BOOLEAN,
TOVAR INTEGER);
/* Primary keys definition */

ALTER TABLE OBJEDPOLOZKY ADD CONSTRAINT PK_OBJEDPOLOZKY PRIMARY KEY (JEDIN);
/* Foreign keys definition */

ALTER TABLE OBJEDPOLOZKY ADD CONSTRAINT FK_OBJEDPOLOZKY_TOVAR FOREIGN KEY
(TOVAR) REFERENCES OBJEDKARTY (JEDIN);


Dakujem.

roland.

Sessions

[*] CERMAK <CERMAK(zv)procom(tec)cz> - 15.1.2001 11:01:49

Ahoj

Setkal jsem se s timto problemem a pomohlo mi nasledujici:

If your application is not reaching one of
the limits covered there and you are also getting the above error message,
most likely the SHAREDMEMSIZE setting in the BDE will solve your problem.
This setting
will allow you to increase the BDE's internal object memory pool. A setting
between 4096
and 8192 should be more than plenty.

Tim se ale problem neresi uplne, jen se posune hranice, pri niz dojde k
ohlaseni chyby nebo k jinym problemum. Delphi proste velka mnozstvi session
a tabulek, ke kterym pristupuje pres BDE, nezvlada. Lepsi by bylo pouzit
ADO, nebo neco jineho. Jaromir Cermak

-----Original Message-----
From: Ing. Leopold Grepl [mailto:Grepl(zv)melzer(tec)cz]
Sent: Monday, January 15, 2001 8:20 AM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: Sessions


Zdravim vsechny,

v Delphi 5, NT4 SP6 si dynamicky vytvarim 20 objectu TSession a 20 objectu
TDatabase vzajemne propojenych pres TDatabase.SessionName, protoze to
potrebuji poustet ve vlaknech. Pri Open techto databazi mi to spadne asi u
patnacte databaze s hlasenim "Insufficient memory for this operation". V
Task Manageru mam ale volnou jak Ramku tak i mista na disku je dost. Po
ladeni jsem dosel az na fci dbiOpenDatabase, ktera toto hlaseni dava jako
Result. V helpech o ni skoro nic neni. Opravdu me nenapada cim by to mohlo
byt.

Zkousel jsem vytvorit a otevrit asi 500 TDatabase na jeden TSession (bez
problemu) i 200 TSession bez TDatabase (bez problemu). Spolu to ale nejede.
Nesetkal se uz nekdo s podobnym problemem ?

Leopold Grepl
DC Concept a.s.

Kostra kodu :

procedure Pokus;
var DataBase : TDatabase;
i : Integer;
ConSession : TSession;
begin
for i := 0 to 1000 do
begin
ConSession := Sessions.OpenSession('Ses'+IntToStr(i));
Database := TDatabase.Create(self);
with Database do
begin
.....naplneni TDatabase prihlasovacimi parametry.....
end;
Database.SessionName := ConSession.SessionName;
ConSession.OpenDatabase(Database.DatabaseName); nebo Database.Open;
end;
end;
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.225 / Virova baze: 107 - datum vydani: 22.12.2000

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


IB backdoor

[*] Ale� Kle�ka - 15.1.2001 11:46:41

zdroj: svet.namodro(tec)cz
Predpokladam, ze to dost z Vas bude zajimat a neodsoudite me za OT :-)

Alesh

Borland/Inprise InterBase obsahuje zadn� vr�tka
umo��uj�c� komukoliv z�skat p��stup k datab�zi a n�sledn� dokonce i k
administraci stroje, na kter�m Inprise b���.
Vyd�no dne (15.1.2001) / rubrika SE-SOFTWARE


Alarmuj�c� zji#t�n� se objevilo minul� t�den. Borland/Interprise Interbase
produkt m� v sob� napevno zak�dovan� jm�no ("Politically") a heslo
("corrent") umo��uj�c� obej�t ve#ker� ochrann� mechanismy a dostat se jak do
datab�z�, tak k administraci po��ta�e, na kter�m Interbase b��� (s pomoc�
u�ivatelsky definovan�ch funkc�).

Tato "zadn� vr�tka" (backdoor) jsou v Interbase p��stupna ji� minim�ln� sedm
let a v#ichni u�ivatel� t�to st�le pom�rn� obl�ben� datab�ze jsou vystaveni
enormn�mu nebezpe��. Jm�no "Politically" heslo "correct" nen� mo�n� ani
zm�nit, ani zak�zat. Funguje v�dy a v#ude a je mo�n� jej vyu��t i pro
vzd�len� p��stup. Po��ta�ov� hacke�i ji� vypustili pom�cky zji##uj�c�
p��tomnost Interbase serveru (pomoc� detekce na portu 3050) a nic jim tak
nebr�n� za��t v masov�m m���tku vyu��vat t�to nebezpe�n� d�ry.

Zadn� vr�tka v podob� "politically correct" (vcelku parodie, uv߿�te-li
souvislosti) byla do Interbase implantov�na jako mo�nost posledn� z�chrany
p�i ztr�t� p��stupov�ch jmen a hesel - praktika, kterou bohu�el vyu��v�
mnoho firem produkuj�c�ch software. Takov� software, kter� je bezpe�n� a� do
okam�iku prozrazen� zadn�ch vr�tek.

Na p��tomnost zadn�ch vr�tek se p�itom p�i#lo a� v okam�iku, kdy Borland
uvolnil Interbase do open source a n�meck� program�tor Frank Schottman-Goedd
(pracuj�c� pro Firebird projekt) nezjistil podez�elou p��tomnost �et�zce
"Politically correct" na n�kolika m�stech ve zdrojov�m k�du.

Pr�v� na http://firebird.ibphoenix.com/ m��ete naj�t dal#� informace,
zejm�na v#ak postup, jak odstranit toto akutn� nebezpe��. Borland nab�z�
opravu na adrese www.borland.com/interbase/downloads/patches.html.


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


CERTR Advisory CA-2001-01 Interbase Server Contains Compiled-in Back Door
Account

Original release date: January 10, 2001
Last revised: --
Source: CERT/CC


A complete revision history is at the end of this file.

Systems Affected
a.. Borland/Inprise Interbase 4.x and 5.x
b.. Open source Interbase 6.0 and 6.01
c.. Open source Firebird 0.9-3 and earlier


Overview
Interbase is an open source database package that had previously been
distributed in a closed source fashion by Borland/Inprise. Both the open and
closed source verisions of the Interbase server contain a compiled-in back
door account with a known password.

I. Description
Interbase is an open source database package that is distributed by
Borland/Inprise at http://www.borland.com/interbase/ and on SourceForge. The
Firebird Project, an alternate Interbase package, is also distributed on
SourceForge. The Interbase server for both distributions contains a
compiled-in back door account with a fixed, easily located plaintext
password. The password and account are contained in source code and binaries
previously made available at the following sites: a.. http://www.borland.com/interbase/
b.. http://sourceforge.net/projects/interbase
c.. http://sourceforge.net/projects/firebird
d.. http://firebird.sourceforge.net
e.. http://www.ibphoenix.com
f.. http://www.interbase2000.com
This back door allows any local user or remote user able to access port
3050/tcp [gds_db] to manipulate any database object on the system. This
includes the ability to install trapdoors or other trojan horse software in
the form of stored procedures. In addition, if the database software is
running with root privileges, then any file on the server's file system can
be overwritten, possibly leading to execution of arbitrary commands as root.

This vulnerability was not introduced by unauthorized modifications to the
original vendor's source. It was introduced by maintainers of the code
within Borland. The back door account password cannot be changed using
normal operational commands, nor can the account be deleted from existing
vulnerable servers [see References].

This vulnerability has been assigned the identifier CAN-2001-0008 by the
Common Vulnerabilities and Exposures (CVE) group:

http://cve.mitre.org/cgi-bin/cvename.cgi?name=CAN-2001-0008

The CERT/CC has not received reports of this back door being exploited at
the current time. We do recommend, however, that all affected sites and
redistributors of Interbase products or services follow the recommendations
suggested in Section III, as soon as possible due to the seriousness of this
issue.

II. Impact
Any local user or remote user able to access port 3050/tcp [gds_db] can
manipulate any database object on the system. This includes the ability to
install trapdoors or other trojan horse software in the form of stored
procedures. In addition, if the database software is running with root
privileges, then any file on the server's file system can be overwritten,
possibly leading to execution of arbitrary commands as root.

III. Solution
Apply a vendor-supplied patch
Both Borland and The Firebird Project on SourceForge have published fixes
for this problem. Appendix A contains information provided by vendors
supplying these fixes. We will update the appendix as we receive more
information. If you do not see your vendor's name, the CERT/CC did not hear
from that vendor. Please contact your vendor directly.

Users who are more comfortable making their own changes in source code may
find the new code available on SourceForge useful as well: a.. http://sourceforge.net/projects/interbase
b.. http://sourceforge.net/projects/firebird
Block access to port 3050/tcp
This will not, however, prevent local users or users within a firewall's
adminstrative boundary from accessing the back door account. In addition,
the port the Interbase server listens on may be changed dynamically at
startup.

Appendix A. Vendor Information
Borland
Please see:

a.. http://www.borland.com/interbase/downloads/patches.html
IBPhoenix
The Firebird project uncovered serious security problems with InterBase. The
problems are fixed in Firebird build 0.9.4 for all platforms. If you are
running either InterBase V6 or Firebird 0.9.3, you should upgrade to
Firebird 0.9.4.

These security holes affect all version of InterBase shipped since 1994, on
all platforms.

For those who can not upgrade, Jim Starkey developed a patch program that
will correct the more serious problems in any version of InterBase on any
platform. IBPhoenix chose to release the program without charge, given the
nature of the problem and our relationship to the community.

At the moment, name service is not set up to the machine that is hosting the
patch, so you will have to use the IP number both for the initial contact
and for the ftp download.

To start, point your browser at


http://firebird.ibphoenix.com/

Apple
The referenced database package is not packaged with Mac OS X or Mac OS X
Server.

Fujitsu
Fujitsu's UXP/V operating system is not affected by this problem because we
don't support the relevant database.

IBM
IBM's AIX operating system does not incorporate the Borland Interbase server
software.

References
1.. VU#247371: Borland/Inprise Interbase SQL database server contains
backdoor superuser account with known password CERT/CC, 01/10/2001,
https://www.kb.cert.org/vuls/id/247371

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

Author: This document was written by Jeffrey S Havrilla. Feedback on this
advisory is appreciated.
----------------------------------------------------------------------------
----
This document is available from:
http://www.cert.org/advisories/CA-2001-01.html
----------------------------------------------------------------------------
----

CERT/CC Contact Information
Email: cert(zv)cert.org
Phone: +1 412-268-7090 (24-hour hotline)
Fax: +1 412-268-6989
Postal address:

CERT Coordination Center
Software Engineering Institute
Carnegie Mellon University
Pittsburgh PA 15213-3890
U.S.A.

CERT personnel answer the hotline 08:00-20:00 EST(GMT-5) / EDT(GMT-4) Monday
through Friday; they are on call for emergencies during other hours, on U.S.
holidays, and on weekends.

Using encryption
We strongly urge you to encrypt sensitive information sent by email. Our
public PGP key is available from


http://www.cert.org/CERT_PGP.key
If you prefer to use DES, please call the CERT hotline for more information.

Getting security information
CERT publications and other security information are available from our web
site

http://www.cert.org/
To subscribe to the CERT mailing list for advisories and bulletins, send
email to majordomo(zv)cert.org. Please include in the body of your message

subscribe cert-advisory

* "CERT" and "CERT Coordination Center" are registered in the U.S. Patent
and Trademark Office.
----------------------------------------------------------------------------
----
NO WARRANTY
Any material furnished by Carnegie Mellon University and the Software
Engineering Institute is furnished on an "as is" basis. Carnegie Mellon
University makes no warranties of any kind, either expressed or implied as
to any matter including, but not limited to, warranty of fitness for a
particular purpose or merchantability, exclusivity or results obtained from
use of the material. Carnegie Mellon University does not make any warranty
of any kind with respect to freedom from patent, trademark, or copyright
infringement.
----------------------------------------------------------------------------
----
Conditions for use, disclaimers, and sponsorship information

Copyright 2001 Carnegie Mellon University.

Revision History

January 10, 2001: Initial release
January 11, 2001: Changed Borland's link to direct one for patches
January 11, 2001: Added vendor responses for IBM

-Daniel Do�ekal

kopirovani a nahrazeni oznaceneho textu v cizi apl

[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 15.1.2001 11:50:43

Ahoj
Chces zjistit handle okna (editu...), kde je kurzor, tedy focusnute
komponenty, tak pouzij funkci GetFocus();
Tady je maly priklad:

// Zjistim si, zda se prave edituje polozka v TreeView
if (TreeView.IsEditing) then begin
// Zjistim si Handle aktualniho okna, melo by to byt to editacni
policko
H := GetFocus;
if (H = NULL) then exit;
SetWindowText (H, PCHar
(FormatDateTime(frmDateTimeFormat.edDate.Text, Now)));
end else begin
// Je to v RichEditu
InsertText (FormatDateTime(frmDateTimeFormat.edDate.Text,
Now));
end;


P.

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


Dialog pro vyber adresare - umisteni na obrazovce

[*] Mion <mion(zv)quick(tec)cz> - 15.1.2001 11:55:07

Da se nejak tomuto dialogu volaneho pomoci "BrowseDirectory" snadno
naridit, na jakem miste na obrazovce se ma zobrazit (left, top) ? Vadi
mi, ze mam aplikaci treva v levem hornim rohu a dialog vyskakuje nekde
vpravo dole.
Michal Ondrej


----- Original Message -----
From: Hurricane <hurricane(zv)quick(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 13, 2001 12:19 AM
Subject: Re: Dialog pro vyber adresare (jako v instalacnich programech -
ne SelectDirectory)


Zdravim

Nejlepsi je pouzit API dialog.

BrowseDirectory je WinAPI dialog.
Je t�m jazykem, kter�m je OS.
Je nutn� pou��t prom�nnou, do kter� dialog cestu p�ed�.

uses FileUtil;

procedure TForm1.Button1Click(Sender: TObject);
var dir: string;
begin
BrowseDirectory(dir, 'Vyberte adres߰:',0);
Label1.Caption := dir;
end;

Hurricane

SMS Oskar

[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 15.1.2001 11:57:14

A proc delat vlastni program ? Perfektne (a zadara) to funguje pres
http://gate.mobil(tec)cz

Ale jinak staci posilat pres http protokol odkaz na stranku Oskarovych sms
http://www.oskarmobil(tec)cz/cz/sms/send.php3 metodou post s parametry:

ppp = 97663308118222:818b9146d9a8981491a63015add320d2
number = cislo mobilu
mynumber = cislo odesilatele
sender = jmeno odesilatele
message = zprava

Nevyhodou asi zustava, ze jakmile se zmeni php skript, meni se i kod ppp a
urcite se zmeni i struktura posilanych dat. Muze, ale taky nemusi :))

Hodne zdaru preje

Batex

Ahoj,
jak m��u ud�lat, aby m�j program pos�lal SMS na Oskara? Nem�te s t�m n�kdo
zku#enosti?

Data z netu na COM ?

[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 15.1.2001 12:07:57

Ahoj


> RTS, CTS, DSR RI, a spol nejsou nutne k vlastnimu rs232 prenosu..... Pokud
> je driver/zarizeni vyzaduje staci je vetsinou vhodnym zpusobem propojit na
> konektoru (kabelem dal pak vest nemusi).
>
> Samozrejme je mozne pouzit vystupy ze seriovky k napajeni zarizeni, _ALE_
> tyto vystupy jsou velice velice slabe (pokud se pamatuju tak max proud je
> cca radove 1mA). Neverim tomu, ze radiovy modem bude mit tak malou
> spotrebu...

No prave - ja to pro napajeni modemu pouzivam :( Mimochodem, max proud
budicu seriove linky je 10 mA - to jen pro info.

> PS - proc tu trasu nezrealizujes zase pomoci wireless LAN karty? Nemyslim,
> ze by radiovy modem byl vyrazne levnejsi nez napriklad WaveLan od
Lucentu...
> (nacic dosahnes rychlosti o ktere se radiovemu modemu ani nesni)

Duvod je jednoduchy: radiovy modem, ktery puzivam je slozen ze dvou casti:
vlastniho modemu - porizovaci cena okolo 50,- (neni to preklep) a jako vf
cast se da pouzit obycejna vysilacka na CB (obcanskem pasmu). Namitnes asi,
ze timto zarizenim (na 27 MHz) nejde dosahnout zadne rychlosti. Souhlasim,
ale me tech 1,2 k, co z toho dostanu, bohate pro prenos textu staci :)) A
navic je to ZADARMO - na rychlost mam modem pichly k telecomu nebo si data
prenesu na HDD :)) Neni to az takova dalka. Batex


LoadPackage nefunguje jak ma

[*] Ing. Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz> - 15.1.2001 12:10:46

Ahoj,
sveho casu jsem mel podobny problem.
Nakonec jsem to vyresil tak, ze jsem balicek
umistil do systemoveho adresare Windows
napr. c:\Windows\System a LoadPackage jsem
volal pouze s nazvem balicku bez udani cesty
LoadPackage('MyPackage.bpl').

Jaroslav Sipek
e-mail: jaroslav.sipek(zv)idea(tec)cz

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Slavek Rydval
> Sent: Monday, January 15, 2001 8:42 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: LoadPackage nefunguje jak ma
>
>
> Ahoj,
>
> jsem si tim 100% jisty. Prekladam tento balicek a nasledne projekt v
> jedinem ProjectGroup. Kdyz se podivam do toho adresare, je to
> tam, kdy
> zavolam predtim napriklad FileExists, je to ok. Zkousel jsem to volat
> nekolika zpusoby:
>
> * uvedenym, tj. absolutni cestou, balicek byl i v pozadavanych cestach
> * bez uvedeni cesty, soubor byl v adresari aplikace nebo v
> pozadovanych
> cestach (mezi nimi samozrejme byl aktualni adresar).
>
> Bohuzel bez uspechu. :-(
>
> Co se tyce uvedeni BPL adresare, jak rikas, predpokladam, ze
> je to pouze
> nejaka konvence, nikoliv vsak podminka. :-)
>
> Slavek

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

zrusit veskery tisk

[*] Stanislav Vitasek <vitasek(zv)nspuh(tec)cz> - 15.1.2001 12:45:24

Cau lidi,

prosim Vas, muzete mi nekdo poradit?
D4, ve Win NT maji uzivatele zakazane ovladaci panely kvuli bezpecnosti
(at nam nepridavaji praci). Jenom ze tim ztraci pristup k nastaveni
tiskarny. Zustane jim dialog pred tiskem (napr. ve Wordu - vyber
tiskarny, pocet stran, atd...), ale pres ikonu na plose tisk nepozastavi
ani nezrusi a ani se neobjevi ikona vedle hodin na hlavnim panelu v
prubehu tisku.
Muzete mi nekdo naznacit ( i primo alespon casti zdrojoveho kodu ) jak
udelat program, ktery si zjisti jesti se ve Win cokoli tiskne, pokud
ano, zepta se a umozni zrusit tisk.
Dik moc.

Stana Vitasek


server v sieti

[*] Martin <geoplan(zv)pp.sinet.sk> - 15.1.2001 12:51:57

Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
ako mozem v programe zistit ci je v sieti napr. server s menom serverpp.
V D5 pod Win 95, NT

Martin


Dalsi problem s JPEG

[*] Petr Hajny <hajny5(zv)eryx1.zcu(tec)cz> - 15.1.2001 13:04:25

Ahoj,

mam take problem s JPEG. Tentokrat mi to hlasi error #67. Podle
dokumentace to znamena : Unsupported marker type 0x%02x.
Obrazek se nejprve nezobrazi, ale po zakryti a odkryti okna je vse v
poradku. Ostatni graficke programy se stejnym souborem problemy nemaji.
Nevite co s tim? Nerad bych se vyhod JPEG vzdaval.


dik, Petr.

poskozene ikony na palete Delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.1.2001 13:08:41

From: "Erik Salaj" <winsoft(zv)napri.sk>
> Je to zaroven aj problem kazdej aplikacie, ktora to pouziva.

Ahoj,

Pokud ma v ImageListu nekolik set ikon pak to muze byt problem. Borland se to
snazil resit v D4, pocinaje Update Packem #2 (viz odkaz v minule zprave). Jak
to pomohlo lze tezko posoudit, protoze ty problemy pretrvavaji dodnes.

> Riesit tento problem, napriklad pouzit ine funkcie OS. Nemyslim, ze korektne
> zobrazenie ikon je zlozita zalezitost.

Pro 'vyrobce' jako S3 zda se ano ;-))) Jinak, s Delphi jsem kdysi pouzival asi
3 ruzne typy S3 karet a nikdy tyto problemy s ikonami nebyly. Samozrejme bylo
nutne vzdy pouzit aktualni verzi driveru (tedy ne ten z instalace Windows).

> som mal obycajnu S3 kartu, teraz mam GeForce 2 ale pri programovani
> v Delphi nevidim medzi nimi ziadny rozdiel (az na rozhadzane ikony ;-)).

Ja jsem presel z S3 na Matrox a uz jen v kvalite 2D obrazu je vcelku podstatny
rozdil.

Petr Vones, amatersky programator


tADODataSet

[*] zeman <zeman(zv)ulnet(tec)cz> - 15.1.2001 13:29:45

ahoj,

uz jsem na to prisel, je to chyba v adodb.pas, mozna uz je opravena,
(ale posledni patch mam stahnuty).

V adodb.pas jsem musel upravit tuto proceduru :

procedure TCustomADODataSet.InternalClose;
begin
BindFields(False);
if DefaultFields then DestroyFields;
FIndexFields.Clear;
DestroyLookupCursor;
if stOpen in RecordsetState then
begin

// puvodne
Recordset.CancelUpdate;

// uprava - test na prazdny recordset
if not IsEmpty then Recordset.CancelUpdate;

.... atd

Tabulky se to nijak netykalo, tataz chyba se mi objevila,
kdyz jsem v DataModule v ObjectInspector nastavil u tADOQuery
vlastnost Active na true (tedy otevreni dotazu) a potom na false
(tedy zavreni), SQL prazdne.

Martin Zeman

----- Original Message -----
From: JIM Design <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 11, 2001 9:24 PM
Subject: RE: tADODataSet


> ahoj,
>
> to je docela zajimave, nemohl bys o tom napsat vic (co je v tabulce, SQL
> ktere pises, atd.)?
> me a vetsine z nas to totiz normalne funguje.
> a ta chyba znamena ze nestojis na zadnem recordu - coz je logicke.
>
> M.Jirman
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
zeman
> Sent: Thursday, January 11, 2001 5:47 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: tADODataSet
>
>
> Ahoj vsichni,
>
> mel bych jeden problem, na ktery jsem kratky :
>
> kdyz pouzivam v Delphi objekt typu tADODataSet (nebo tADOQuery) pro
pristup
> to databaze MS Acces a ten po Open vrati prazdny RecordSet, nejde objekt
ani
> zavrit (Close), ani uvolnit (Free).
> Vzdy to ohlasi chybu : Operation requires current record.
>
> Je to normalni ? Prazdne dotazy naveky ?
>
> Zdvorile dekuji za pripadna reseni.
>
> Martin Zeman
>

Vyvolani nabidky praveho tlacitka na souboru

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

From: "Tom�#V�tek" <tvitek(zv)centrum(tec)cz>
> Potreboval bych vyvolat nabidku, ktera se normalne v Pruzkumniku
> zobrazi po stisku praveho tlacitka mysi na souboru. Podobne to

Ahoj,

v JCL (http://delphi-jedi.org/Jedi:JCLDOWNLOADS) je funkce DisplayContextMenu:

uses
JclShell;

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbRight then
DisplayContextMenu(Handle, Application.ExeName, Point(X, Y));
end;

Petr Vones, amatersky programator


Chyba v order by

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 15.1.2001 14:20:45

Ahoj,

narazil jsem u IB6 na problem, ktery povazuji za chybu.

mam tabulku T_LIDI se sloupci ID(integer) a JMENO(varchar(50))

a dalsi tabulku T_MIMO se sloupci ID(integer),
datum_od(TIMESTAMP), datum_do(TIMESTAMP).

Nyni si udelam ulozenou proceduru PS_VYBER, ktera vraci
parametr typu int a obsahuje toto:

FOR
SELECT ID from T_MIMO where datum_od > '1.1.2001' and
datum_do < '2.1.2001'
INTO :VYSLEDEK
DO
SUSPEND;

Az dosud neni zadny problem.

Nyni dam dotaz:

SELECT L.JMENO from T_MIMO R
RIGHT OUTER JOIN T_LIDI L on L.ID = R.VYSLEDEK
ORDER by L.JMENO

Pokud tam neni order by, funguje vse presne tak, jak ma. Jakmile
ale pridam order by vznikne chyba (pokazde jina, obcas nejaka
chyba pri konverzi, arithmetic exception apod.). Pritom za to
evidentne muze to order by. Tabulky jsou navrzeny spravne (z
hlediska charset a collate).

Zkuste si to prosim - dela to jen u me, nebo se to podari
nekomu vyvolat?

Dik.

David


kopirovani a nahrazeni oznaceneho textu v cizi apl

[*] Mion <mion(zv)quick(tec)cz> - 15.1.2001 14:23:05

Ano, k funkci GetFocus jsem take dosel, ale z mnoha pokusu a z ruznych
helpu jsem pochopil, ze jej lze patrne pouzit jen v ramci me vlastni
aplikace. Pokud se totiz snazim o GetFocus v okamziku, kdy je aktivni
jina aplikace (coz je to, co prave potrebuji), vraci to zasadne nulu.
Nebo neco delam spatne?

Michal Ondrej

----- Original Message -----
From: Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz>
Subject: Re: kopirovani a nahrazeni oznaceneho textu v cizi aplikaci


Ahoj
Chces zjistit handle okna (editu...), kde je kurzor, tedy focusnute
komponenty, tak pouzij funkci GetFocus();
Tady je maly priklad:

// Zjistim si, zda se prave edituje polozka v TreeView
if (TreeView.IsEditing) then begin
// Zjistim si Handle aktualniho okna, melo by to byt to editacni
policko
H := GetFocus;
if (H = NULL) then exit;
SetWindowText (H, PCHar
(FormatDateTime(frmDateTimeFormat.edDate.Text, Now)));
end else begin
// Je to v RichEditu
InsertText (FormatDateTime(frmDateTimeFormat.edDate.Text,
Now));
end;


P.

!!! Nutne - AVI blika !!!

[*] vegainfo(zv)post(tec)cz - 15.1.2001 14:40:15

Prosim, potrebuju velmi nutne pomoci, jinak mi hrozi velky prusvih ;-)

Pokousime se v DELPHI vyrobit multimedialni prezentaci. A mame jeden velky problem. Formular 640x480, jako podklad je bitmapa. Na ni jsou naskladane 1-3 komponenty TAnimate (pro priklad staci jedna). Problem je, ze nez se ta animace AVI natahne, tak okno komponenty TAnimate (pripadne i TPanel u media playeru) ma jednu barvu a zpusobi to jednobarevny ctverec na bitmape. Az se animace natahne (v mem pripade cca 1 sekunda), objevi se obraz animace, a vse do sebe uz zapada (v animaci je vyriznute pozadi, takze vse na sebe pasuje). Jde mi o to, jak odstranit ten pocatecni stav, aby se proste ta animace objevila az tam opravdu bude obraz a ne aby se pred tim objevila barevna plocha a teprve op chvili obraz z AVI. Strida se tam nekolik animaci a vypada to strasne.

Napadlo nas to rozrezat na nekolik ctvercu, ale vysledek je stejny, inicializuji se postupne a objevuje se to cik cak.

Jedine o cem jsem premyslel, ze by se vytvorila nejaka bitmapa, ktera by NEbyla zobrazena, do te by se vykreslilo pozadi a na nej aktualni snimek animace a cela takto hotova animace by se prekreslila jako jeden celek na plochu formulare. Proste ze by se ten obraz sestavoval nekde, kde by nebyl videt. SNAZNE MOC PROSIM VSECHNY, MUZE MI NEKDO PORADIT JAK NA TO NEBO PORADIT KOMPONENTU (FREE), KTERA BY TO UMOZNOVALA?

STRASNE MOC MI S TIM POMUZETE.
Predem moc diky

Martin Polanka

p.s. pouzivame DELPHI 4 standart, WIN 9x. Pouziti DIRECT X je vylouceno.

server v sieti

[*] Miroslav Barica <miroslav.barica(zv)matador.sk> - 15.1.2001 15:04:02

skus nan poslat ping ;o)

-----Original Message-----
From: Martin [mailto:geoplan(zv)pp.sinet.sk]
Sent: Monday, January 15, 2001 12:52 PM
To: delphi-l(zv)fwd(tec)cz
Subject: server v sieti


ako mozem v programe zistit ci je v sieti napr. server s menom serverpp.
V D5 pod Win 95, NT

Martin


kopirovani a nahrazeni oznaceneho textu v cizi apl

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.1.2001 15:45:46

From: "Mion" <mion(zv)quick(tec)cz>
> Ano, k funkci GetFocus jsem take dosel, ale z mnoha pokusu a z ruznych
> helpu jsem pochopil, ze jej lze patrne pouzit jen v ramci me vlastni
> aplikace. Pokud se totiz snazim o GetFocus v okamziku, kdy je aktivni
> jina aplikace (coz je to, co prave potrebuji), vraci to zasadne nulu.

Ahoj,

pokud ti nebude vadit, ze to nelze pouzit na Win95, tak to lze udelat takhle:

function GetSystemFocusWindow: HWND;
var
GuiThreadInfo: TGUIThreadInfo;
begin
GuiThreadInfo.cbSize := SizeOf(GuiThreadInfo);
if GetGUIThreadInfo(0, GuiThreadInfo) then
Result := GuiThreadInfo.hwndFocus
else
Result := 0;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
W: HWND;
C: array[0..100] of Char;
begin
W := GetSystemFocusWindow;
GetClassName(W, C, 100);
Memo1.Lines.Add(Format('%.8x %s', [W, C]));
end;

Petr Vones, amatersky programator


IB6 - dotazy p es v�ce datab�z�

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 15.1.2001 15:47:20

Haj hou!

On 15 Jan 2001,, Petr Palicka wrote:

> IB6 umoznuje zahajit jednu transakci nad vice databazemi a/nebo db
> servery. to umozni vykonat dotazy nad vice databazemi a zplatnit je
> jedinym commitem. ta metoda se jmenuje nejak jako two phaze commit.

Hmm, nevim nevim, ale dotaz nad vice databazemi je trochu neco
jineho nez transakce nad vice databazemi. Dotaz nad vice
databazemi je napr. SELECT s joinem dvou tabulek, pricemz
kazda je v jine databazi (umi napr. BDE).

Hodne zdaru


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

Dotaz na ukonceni procesu

[*] Tu�ek Roman (M� Praha 15) - 15.1.2001 16:03:14

Mam nasledujici problem

pouziji fci Windows.CopyFile ale chci pockat az do dokonceni operace
jak to mam otestovat ?

TRT


!!! Nutne - AVI blika !!!

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.1.2001 16:04:31

From: <vegainfo(zv)post(tec)cz>
> Pokousime se v DELPHI vyrobit multimedialni prezentaci. A mame jeden velky
problem. Formular 640x480, jako podklad je bitmapa. Na ni jsou naskladane 1-3
komponenty TAnimate (pro priklad staci jedna). Problem je, ze nez se ta
animace AVI natahne, tak okno komponenty TAnimate (pripadne i TPanel u media
playeru) ma jednu barvu a zpusobi to jednobarevny ctverec na bitmape. Az se

Ahoj,

co zkusit nastavit u TAnimate vlastnost Visible na False a pak v udalosti
OnOpen (pripadne OnStart) dat Visible na True.

Petr Vones, amatersky programator


Tuha Record Wav aplikacia

[*] #u�ka R�bert <spravca(zv)lumen.sk> - 15.1.2001 16:32:23

Pred casom som prosil o komponentu na zaznam audia do WAV suboru, uz to mam
naprogramovane ale teraz mam taky problem ze ked pustim recording tak je
cela aplikacia tuha co sa tyka manipulacie s komponentami na formulari alebo
pohybu formu po obrazovke. Ked som vytvoril dalsi thread tak ten ide mam tam
jednoduchy encoder na MP3 ale je to tuhe ako to mam urobit aby sa aj
nahravalo a aj dalo hybat s formularom po obrazovke. Je tam jeden flags
MCI_WAIT pri recordingu ale ten ked nepouzijem tak mi zase nic nenahra. Som
zufaly a sef ma ide pretrhnut prosim pomozte mi niekto. Dakujem

S pozdravom,

------------------------------------------------
R�bert �u#ka, spr�vca siete
R�dio Lumen, Bansk� Bystrica
Slovensk� republika
www.lumen.sk
spravca(zv)lumen.sk
088/41 25 739 kl.14
-----------------------------------------------


DAO

[*] JIM Design <jim.design(zv)iol(tec)cz> - 15.1.2001 16:43:24

ahoj,

musis nainstalovat Data Access Objects (DAO) nejlepe posledni verze - IE je
ma totiz v sobe.
stahni si je z www.microsoft.com sekce downloads

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin
Sent: Friday, January 12, 2001 9:52 AM
To: delphi-l(zv)fwd(tec)cz
Subject: DAO


MAm problem . Urobil som si programcek v D5 s komponentamy od Erika Salaje
DAO, ktorymi pristupujem na databazu Acces. Ak to spustam pod NT 4.00 tak to
ide dobre . Ale ak to spustim pod Win95 tak sa to ruca. Ale iba dovtedy kym
nenaistalujem Internet explorer. Potom to uz bezi v pohode. Pravdepodobne
zaktualizuje nejake DLL, nie ? V NT40 uz IE je standartne.
Musim instalovat IE ? Nestacilo by len nejake DLL ?

Martin


INDY Lib - Stream Read Error

[*] Adam Feistner <feistna(zv)volny(tec)cz> - 15.1.2001 17:51:34

Zdravim,

pri pokusu o ulozeni formu s komponentou idMessage z baliku Indy me to stale haze %subj%. Nevite prosim, co s tim? Pouzivam
D5Ent.

Dik,

Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm


tADODataSet

[*] zeman <zeman(zv)ulnet(tec)cz> - 15.1.2001 17:53:49

ahoj,

uz jsem na to prisel, je to chyba v adodb.pas, mozna uz je opravena,
(ale posledni patch mam stahnuty).

V adodb.pas jsem musel upravit tuto proceduru :

procedure TCustomADODataSet.InternalClose;
begin
BindFields(False);
if DefaultFields then DestroyFields;
FIndexFields.Clear;
DestroyLookupCursor;
if stOpen in RecordsetState then
begin

// puvodne
Recordset.CancelUpdate;

// uprava - test na prazdny recordset
if not IsEmpty then Recordset.CancelUpdate;

.... atd

Tabulky se to nijak netykalo, tataz chyba se mi objevila,
kdyz jsem v DataModule v ObjectInspector nastavil u tADOQuery
vlastnost Active na true (tedy otevreni dotazu) a potom na false
(tedy zavreni), SQL prazdne.

Martin Zeman

----- Original Message -----
From: JIM Design <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 11, 2001 9:24 PM
Subject: RE: tADODataSet


> ahoj,
>
> to je docela zajimave, nemohl bys o tom napsat vic (co je v tabulce, SQL
> ktere pises, atd.)?
> me a vetsine z nas to totiz normalne funguje.
> a ta chyba znamena ze nestojis na zadnem recordu - coz je logicke.
>
> M.Jirman
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
zeman
> Sent: Thursday, January 11, 2001 5:47 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: tADODataSet
>
>
> Ahoj vsichni,
>
> mel bych jeden problem, na ktery jsem kratky :
>
> kdyz pouzivam v Delphi objekt typu tADODataSet (nebo tADOQuery) pro
pristup
> to databaze MS Acces a ten po Open vrati prazdny RecordSet, nejde objekt
ani
> zavrit (Close), ani uvolnit (Free).
> Vzdy to ohlasi chybu : Operation requires current record.
>
> Je to normalni ? Prazdne dotazy naveky ?
>
> Zdvorile dekuji za pripadna reseni.
>
> Martin Zeman
>

Trapny dotaz k zavirani okna

[*] brant(zv)dcomm(tec)cz - 15.1.2001 18:06:22

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Ahoj vespolek,
patrne stale opakuji tutez chybu a prosim o nakopnuti spravnym smerem. Mam
MDI aplikaci a potrebuji zobrazit modalni dialog. V nem se maji pouzivat
udaje z nejake databaze. Chovat se to ma tak, ze v pripade problemu s
otevrenim databaze se zobrazi chybove hlaseni a dialog zmizi. Mam to napsane
takto:

procedure TInfoTracsMain.Skupinyuivatel1Click(Sender: TObject);
var UserGroupsWnd: TUserGroupsWnd;
begin
UserGroupsWnd:= TUserGroupsWnd.Create(nil);
UserGroupsWnd.ShowModal; ---> to je ten dialog
UserGroupsWnd.Free;
end;

A v tom dialogu:

procedure TUserGroupsWnd.FormActivate(Sender: TObject);
begin
if OpenTable(ErrMsgToScrFile, TableGroup) <> mrOK
then Close;
end;

V pripade neexistence tabulky se zobrazi dialog, skoci to na to Close, ale
dialog se presto nezavre. Co delam spatne? (Samozrejme to umim obejit, kdyz
se o existenci te tabulky presvedcim jeste pred vytvorenim toho dialogu, ale
zajima me, proc se to chova takhle).

Diky za vsechna nakopnuti

RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380

D&COMM s.r.o
Korunova�n� 6
Praha 7

IB6 - dotazy pres vice databazi

[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 15.1.2001 18:39:35

Dobry podvecer!
Predne se omlouvam za cestinu v subj. puvodni zpravy.
A ted : Znamena to tedy, ze mam-li napr.databazi "DB1" s tabulkou "CISELNIK"
o dvou polozkach : "ID" a "PopisPolozky" a mam-li druhou databazi "DB2"
(treti, ctvrtou,...) s tabulkou "TBL1" v niz mam mimo jine polozku "IDCis"
jejiz hodnoty koreponduji hodnotami "ID" tabulky "DB1"."CISELNIK" nedokazu
si pri SELECT FROM "TBL1" ... dotahnout hodnotu "PopisPolozky" z tabulky
"CISELNIK"?
Rozumim tomu dobre?
dik za odpoved (asi bude velice kratka)
PavelC
=====================================================
----- Original Message -----
From: Pavel Cisar <pcb(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 15, 2001 3:47 PM
Subject: RE: IB6 - dotazy p es v�ce datab z�


> Haj hou!
>
> On 15 Jan 2001,, Petr Palicka wrote:
>
> > IB6 umoznuje zahajit jednu transakci nad vice databazemi a/nebo db
> > servery. to umozni vykonat dotazy nad vice databazemi a zplatnit je
> > jedinym commitem. ta metoda se jmenuje nejak jako two phaze commit.
>
> Hmm, nevim nevim, ale dotaz nad vice databazemi je trochu neco
> jineho nez transakce nad vice databazemi. Dotaz nad vice
> databazemi je napr. SELECT s joinem dvou tabulek, pricemz
> kazda je v jine databazi (umi napr. BDE).
>
> Hodne zdaru
>
>
> Pavel Cisar <pcisar(zv)inprise(tec)cz>
> Borland s.r.o.

!!! Nutne - AVI blika !!!

[*] JIM Design <jim.design(zv)iol(tec)cz> - 15.1.2001 19:24:27

nebo zkus jeste taky http://www.ingjapan.ne.jp/hori/index-e.html komponenty
a z nich
TDXDraw pro video a TDXPaintbox pro obrazky, jestli bude nejake zrychleni.

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Delphi
Sent: Tuesday, January 16, 2001 12:03 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: !!! Nutne - AVI blika !!!


doublebuffered:=true;

ak nezabere, da sa to spravit v direct-x pekne fullscreen. Za pad bubakov
prerobim.

Werki
jendris(zv)minv.sk

----- Original Message -----
From: <vegainfo(zv)post(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 15, 2001 5:40 AM
Subject: !!! Nutne - AVI blika !!!> Prosim, potrebuju velmi nutne pomoci, jinak mi hrozi velky prusvih ;-)
>
> Pokousime se v DELPHI vyrobit multimedialni prezentaci. A mame jeden velky
problem. Formular 640x480, jako podklad je bitmapa. Na ni jsou naskladane
1-3 komponenty TAnimate (pro priklad staci jedna). Problem je, ze nez se ta
animace AVI natahne, tak okno komponenty TAnimate (pripadne i TPanel u media
playeru) ma jednu barvu a zpusobi to jednobarevny ctverec na bitmape. Az se
animace natahne (v mem pripade cca 1 sekunda), objevi se obraz animace, a
vse do sebe uz zapada (v animaci je vyriznute pozadi, takze vse na sebe
pasuje). Jde mi o to, jak odstranit ten pocatecni stav, aby se proste ta
animace objevila az tam opravdu bude obraz a ne aby se pred tim objevila
barevna plocha a teprve op chvili obraz z AVI. Strida se tam nekolik animaci
a vypada to strasne.
>
> Napadlo nas to rozrezat na nekolik ctvercu, ale vysledek je stejny,
inicializuji se postupne a objevuje se to cik cak.
>
> Jedine o cem jsem premyslel, ze by se vytvorila nejaka bitmapa, ktera by
NEbyla zobrazena, do te by se vykreslilo pozadi a na nej aktualni snimek
animace a cela takto hotova animace by se prekreslila jako jeden celek na
plochu formulare. Proste ze by se ten obraz sestavoval nekde, kde by nebyl
videt. SNAZNE MOC PROSIM VSECHNY, MUZE MI NEKDO PORADIT JAK NA TO NEBO
PORADIT KOMPONENTU (FREE), KTERA BY TO UMOZNOVALA?
>
> STRASNE MOC MI S TIM POMUZETE.
> Predem moc diky
>
> Martin Polanka
>
> p.s. pouzivame DELPHI 4 standart, WIN 9x. Pouziti DIRECT X je vylouceno.
>

SMS Oskar OPRAVA !!!

[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 15.1.2001 19:32:32

Ahoj


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

> Ale jinak staci posilat pres http protokol odkaz na stranku Oskarovych sms
> http://www.oskarmobil(tec)cz/cz/sms/send.php3 metodou post s parametry:
>
> ppp = 97663308118222:818b9146d9a8981491a63015add320d2
> number = cislo mobilu
> mynumber = cislo odesilatele
> sender = jmeno odesilatele
> message = zprava
>
> Nevyhodou asi zustava, ze jakmile se zmeni php skript, meni se i kod ppp a
> urcite se zmeni i struktura posilanych dat. Muze, ale taky nemusi :))

No, ja o vlku a ono se to stalo...
uprava je nasledujici:
ppp=9795736702872:17e38be77cb2b9e43967ecb48f7ea8df //nejaky CRC (to je to,
co se porad meni :(
part1= //jednotlive sms, muze jich byt az 5
part2=
part3=
part4=
part5=
number= // cislo mobilu
mynumber= // cislo odesilatele
sender= // to netusim - pri pokusech to neposilalo nic :)
message= // toto neni telicko zpravy !! o5 se mi nepodarilo zjistit, k cemu
to je

....... toto jsou vsechna data posilana scriptu. Staci ovsem poslat
ppp,nekolik partu (i jeden), number a bude to fungovat :))

SMS Oskar

[*] Ji�� H�sek - 15.1.2001 19:49:37

#ekal jsem, �e se sejde p�r odpov�d� s t�m, �e pos�l�n� na Oskara nejde. J�
m�l na mysli sp�# tuhle mo�nost. N�jak ze sv�ho programu vyu��t ten skript.
Tahle ot�zka m� napadla, kdy� jsem to uvid�l v programu SMS Sender 2
(http://www.sodev(tec)cz/show.php?page=SMS_Sender), tam to funguje n�jak p�es
skript um�st�n� na jejich serveru.> A proc delat vlastni program ? Perfektne (a zadara) to funguje
pres
> http://gate.mobil(tec)cz
>
> Ale jinak staci posilat pres http protokol odkaz na stranku Oskarovych sms
> http://www.oskarmobil(tec)cz/cz/sms/send.php3 metodou post s parametry:
>
> ppp = 97663308118222:818b9146d9a8981491a63015add320d2
> number = cislo mobilu
> mynumber = cislo odesilatele
> sender = jmeno odesilatele
> message = zprava
>
> Nevyhodou asi zustava, ze jakmile se zmeni php skript, meni se i kod ppp a
> urcite se zmeni i struktura posilanych dat. Muze, ale taky nemusi :))
>
> Hodne zdaru preje
>
> Batex
>
> Ahoj,
> jak m��u ud�lat, aby m�j program pos�lal SMS na Oskara? Nem�te s t�m n�kdo
> zku#enosti?
>
>

Trapny dotaz k zavirani okna

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 15.1.2001 20:32:31

Trapny dotaz k zavirani okna1) Pokud dojde k chybe, spust nejaky timer (staci 100ms), ktery zavola Close. Bude to bez problemu.

nebo

2) Proved test databaze pred otevrenim dialogu:

type
TPrikladForm = class(TForm)
...
public
class procedure SpustDialog(AOwner: TComponent);
...
end;

class procedure TPrikladForm.SpustDialog(AOwner: TComponent);
begin
if not TestDatabaze then UkazNejakouChybu else
with Create(AOwner) do
begin
ShowModal;
Free;
end;
end;

Tento priklad Ti umoznuje pred vytvorenim vlastni tridy pohodlne provest vselijake testy a teprve pote libovolne pokracovat.

Jan Skopovy

----- Original Message -----
From: brant(zv)dcomm(tec)cz

Ahoj vespolek,
patrne stale opakuji tutez chybu a prosim o nakopnuti spravnym smerem. Mam MDI aplikaci a potrebuji zobrazit modalni dialog. V nem se maji pouzivat udaje z nejake databaze. Chovat se to ma tak, ze v pripade problemu s otevrenim databaze se zobrazi chybove hlaseni a dialog zmizi.

V pripade neexistence tabulky se zobrazi dialog, skoci to na to Close, ale dialog se presto nezavre. Co delam spatne20


Tuha Record Wav aplikacia

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 15.1.2001 21:57:39

> Pred casom som prosil o komponentu na zaznam audia do WAV suboru, uz to mam
> naprogramovane ale teraz mam taky problem ze ked pustim recording tak je
> cela aplikacia tuha co sa tyka manipulacie s komponentami na formulari alebo
> pohybu formu po obrazovke. Ked som vytvoril dalsi thread tak ten ide mam tam
> jednoduchy encoder na MP3 ale je to tuhe ako to mam urobit aby sa aj
> nahravalo a aj dalo hybat s formularom po obrazovke. Je tam jeden flags
> MCI_WAIT pri recordingu ale ten ked nepouzijem tak mi zase nic nenahra. Som
> zufaly a sef ma ide pretrhnut prosim pomozte mi niekto. Dakujem

MCI_WAIT zpusobi, ze dokud se provadena akce neskonci, tak ji uzivatel nemuze
prerusit jinak, nez pres BREAK klavesu.

Myslim si, ze reseni via MCI neni moc sikovne... obavam se, ze wav se uklada do
pameti, jestli toho budes nahravat vic, tak lepsi je pouzit low level funkce,
data z bufferu postupne zapisovat na disk = HDR.
Mrkni se na UDDF, je tam zdrojak pro nahravani wav pomoci low level api funkci
/je to delsi, nechci zbytecne posilat do konference...muzu ti to poslat/.

Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO


Trapny dotaz k zavirani okna

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 15.1.2001 22:05:03

Trapny dotaz k zavirani okna>procedure TUserGroupsWnd.FormActivate(Sender:
TObject);
>begin
> if OpenTable(ErrMsgToScrFile, TableGroup) <> mrOK
> then Close;
>end;
>V pripade neexistence tabulky se zobrazi dialog, skoci to na to Close, ale
dialog se presto nezavre. Co delam spatne?
>(Samozrejme to umim obejit, kdyz se o existenci te tabulky presvedcim jeste
pred vytvorenim toho dialogu, ale zajima me, >proc se to chova takhle).

Nejsem si jisty, jestli to plati pro Delphi, ale v udalostech jako OnShow,
OnActivate nelze pouzit Close...

Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO


Tuha Record Wav aplikacia

[*] Petr <DelphiForum(zv)seznam(tec)cz> - 15.1.2001 22:16:58

Zkus ten k�d prolo�it p�rkr�t p��kazem Application->ProcessMessages.

----- Original Message -----
From: "�u#ka R�bert" <spravca(zv)lumen.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 15, 2001 4:32 PM
Subject: Tuha Record Wav aplikacia


> Pred casom som prosil o komponentu na zaznam audia do WAV suboru, uz to
mam
> naprogramovane ale teraz mam taky problem ze ked pustim recording tak je
> cela aplikacia tuha co sa tyka manipulacie s komponentami na formulari
alebo
> pohybu formu po obrazovke. Ked som vytvoril dalsi thread tak ten ide mam
tam
> jednoduchy encoder na MP3 ale je to tuhe ako to mam urobit aby sa aj
> nahravalo a aj dalo hybat s formularom po obrazovke. Je tam jeden flags
> MCI_WAIT pri recordingu ale ten ked nepouzijem tak mi zase nic nenahra.
Som
> zufaly a sef ma ide pretrhnut prosim pomozte mi niekto. Dakujem
>
> S pozdravom,
>
> ------------------------------------------------
> R�bert �u#ka, spr�vca siete
> R�dio Lumen, Bansk� Bystrica
> Slovensk� republika
> www.lumen.sk
> spravca(zv)lumen.sk
> 088/41 25 739 kl.14
> -----------------------------------------------
>
>

Trapny dotaz k zavirani okna

[*] Petr <DelphiForum(zv)seznam(tec)cz> - 15.1.2001 22:20:59

Trapny dotaz k zavirani oknaMod�ln� okno se nezav�r� pomoc� close ale do prom�nn� ModalResult se zad� hodnota, kterou to m� vr�tit. (nap�. mrOk ...).
Tak nap�. otev�eme okno :
NejakeOkno.ShowModal;

a takhle ho zav�eme :
NejakeOkno.ModalResult:=mrOK;

----- Original Message -----
From: brant(zv)dcomm(tec)cz
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, January 15, 2001 6:06 PM
Subject: Trapny dotaz k zavirani okna


Ahoj vespolek,
patrne stale opakuji tutez chybu a prosim o nakopnuti spravnym smerem. Mam MDI aplikaci a potrebuji zobrazit modalni dialog. V nem se maji pouzivat udaje z nejake databaze. Chovat se to ma tak, ze v pripade problemu s otevrenim databaze se zobrazi chybove hlaseni a dialog zmizi. Mam to napsane takto:

procedure TInfoTracsMain.Skupinyuivatel1Click(Sender: TObject);
var UserGroupsWnd: TUserGroupsWnd;
begin
UserGroupsWnd:= TUserGroupsWnd.Create(nil);
UserGroupsWnd.ShowModal; ---> to je ten dialog
UserGroupsWnd.Free;
end;

A v tom dialogu:

procedure TUserGroupsWnd.FormActivate(Sender: TObject);
begin
if OpenTable(ErrMsgToScrFile, TableGroup) <> mrOK
then Close;
end;

V pripade neexistence tabulky se zobrazi dialog, skoci to na to Close, ale dialog se presto nezavre. Co delam spatne? (Samozrejme to umim obejit, kdyz se o existenci te tabulky presvedcim jeste pred vytvorenim toho dialogu, ale zajima me, proc se to chova takhle).

Diky za vsechna nakopnuti

RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380

D&COMM s.r.o
Korunova�n� 6
Praha 7

IB6 - Pocet pripojenych uzivatelov na server.

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 15.1.2001 23:19:46

Zdravim.

Ako zistim pocet pripojenych uzivatelov na server, pripadne aj ich username.
Co sa tyka zoznamu pripojenych na databazu zvladam v pohode.

Dakujem.

Roland.

IB6 - create database...

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 16.1.2001 00:00:48

Zdravim.

1. Ako riesite vytvaranie databaz v aplikacii u uzivatela. Prestavte si ze
sa jedna o uctovnictvo multiverziu a zakaznik sa rozhodne vytvorit novu
firmu (databazu). Co je praktickejsie, vytvorit cez prikazy SQL, alebo
skopirovat template subor do datoveho adresara. Ale ci ak ide o klienta,
ktory nema pristup na urovni suborov na server, vtedy ide len o vytvorenie
na urovni SQL. Ale ako udrziavat template file(alter table, create, drop),
vid bod 2 Tak ako ?

2. Je dost pravdepodobne, ze budem menit strukturu tabuliek, pridavat
dalsie,... Zatial som to spravil nasledovne.
Subor klienta obsahuje FileVersion napr. 1.0.15.123 a tam 1.0 udava verziu
programu, 15 verziu podporovanej databazy, 123 build number of file. V
databaze mam generator DATABASE_VERSION, ktory si uchovava verziu databazy.
Ak sa program s nizsiou verziou podporovanej databazy spusti, tak vynadam
uzivatelovi ze nech si updatne exe a ked je mensi version databazy tak
zavolam update modul, ktory spravi potrebne upravy a updatne generator
DATABASE_VERSION.

Co vy na to?

Za kazdy navrh vopred dakujem.

Roland.

IB6 - spajanie viacerych zaznamov do jedneho

[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 16.1.2001 00:01:27

Zdravim.


Mam zaznamy:

Osoba - Vlastnost - Hodnota
------------------------------------------------------
1 - 1 - cierne
1 - 2 - biele
1 - 3 - cervene
1 - 4 - ruzove
1 - 5 - modre

ale kolko bude tych zaznamov este dopredu neviem ale potrebujem ich spojit
nejako takto

Osoba - Vlastnost1 - hodnota1 - vlastnost2 - hodnota2 - vlastnost3 -
hodnosta3 - vlastnost4 - hodnota4 - vlastnost5 - hodnota5, .....
----------------------------------------------------------------------------
----------------------------
1-1-cierne-2-biele-3-cervene-4-ruzove-5-modre,.....

Je to nejako mozne ?


Dakujem.

Roland.


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