Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
ADO a Accesovska databaze na CDcku
[*] garalda <garalda(zv)mail(tec)cz> - 11.10.2000 14:47:09
Zdravim vespolek.
Potreboval bych poradit v nasledujici zalezitosti:
Mam Accesovskou databazi na CDcku (600 MB) a udelal jsem si v D5 Enterprise
program, ktery ji cte. Zadny problem. Jenom mi vadilo, ze pokud to chce
nekdo pouzit, musi si nainstalovat BDE. Rozhodl jsem se zkusit ADO.
Konfigurace se po malych peripetiich zadarila. Kdyz ale spustim program, tak
v okamziku kdy to zkusi pripojit databazi, to spadne s chybou, ze se soubor
neda ulozit. Pritom s BDE to chodi bez problemu. Zkousel jsem nastavit
opravneni jen pro cteni, ale bez vysledku. Nesetkal jste se s tim prosim
nekdo? Budu muset ADO zrusit a vratit se k BDE, nebo je problem nekde jinde?
Diky
ADOExpres, problemy pri odpojovani Connection
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 11.10.2000 14:51:22
Ahoj vsichni.
Jeste jednou prosim o radu.
Potreboval bych poradit s nasledujicim problemem. V D5 Ent. SP1 pouzivame
pro pristup k MSSQL 7.0 komponenty ADOExpres. Kdyz nastavim vlastnost
Connected komponenty TADOConnection na False, projevi se mi to ve vypisu
procedury sp_who az po delsi chvili. Navic se stane, ze nekdy pripojeni
nezmizi vubec (zustane viset a blokuje tabulky na serveru). Nevite nekdo cim
to muze byt, a co bych mel udelat pro to aby se server o odpojeni dane
connection dozvedel co nejdrive.
Podle Erika Salaje je to chyba ADOExpresu, ADOnis se chova korektne.
Me ale zajima, zda by se dal prinutit i ADOExpres, nejakou akci pred, nebo
po close, resp predefinovanim metody Close. Jen me prosim nepresvecujte,
abych predelal cely program na adonis (uz jsem jednou prehazoval z BDE na
ADOExpres a znovu to absolvovat nechci :-) ). Pripadne by mi pomohl
jakykoliv priklad, ktery pouziva primo ADO a chova se v tomto pripade
korektne.
Diky za kazdy tip
Jaromir Cermak
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.189 / Virov� b�ze: 90 - datum vyd�n�: 1.9.2000
Problemy s rychlostou BDE - neviem ako dalej, ma
[*] Jaroslav Popluh�r <popluhar(zv)acc.sk> - 11.10.2000 15:01:33
Ahoje vsici,
toto je moj prvy dotaz v akejkolvek konferencii,
takze ak porusim nejake nepisane (necitnane :-) pravidla
prepacte a samozrejme dajte vediet.
Problem:
---------
Cim vyssia verzia BDE tym (drasticky!) pomalsie vyhodnocovanie dotazu.
Skusal som vsetky kombinacie lokalny pgm, lokalna db, vzdialeny pgm,
vzdialena db,
vybrane udaje uvadzam.
Vdacny budem za vsetky namety, napady prip. priamu pomoc.
Remote bol na 10Mbit LAN.
Local P200/64MB RAM, W98
Remote C566/128MB RAM, WME
Verzia BDE = cas vyhodnotenia v sekundach
LocalDB RemoteDB
LoacalPGM LocalPGM
BDE2 = 0,63 2,80
BDE3 = 1,87 4,10
BDE5 = 11,34 13,27
Tabulka Pocet zazn. Velkost tbl.db/tbl.*
Auto 401 270/ 396kB
Ukoncene 4919 1644/2630kB
Ukoncen2 3842 228/ 432kB
V jednoduchej DB aplikacii napisanej v D2 pouzivam databazove tabulky
Paradox.
Nefungoval mi parametricky dotaz, tak som ho tvoril progamovo ak niekto
tusite preco poradte,
to vsak nie je to hlavne.
HLAVNY PROBLEM je VYRAZNE SPOMALOVANIE vyhodnocovania dotazu pre prechode na
vyssiu verziu BDE.
Chcel by som prejst na D5 Pro, ktoru som kupil ale zatial lezi ladom...
Rekompilacia pod vyssimi verziami Delphi nepomaha. Co robim zle ?
Tu je kod dotazu:
-----------------
procedure TfrmAutoSelect2.FormActivate(Sender: TObject);
var {wi, code: Integer;}
st, et: TDateTime;
ss: string;
begin
{ >>> Parametricky dotaz mi nefungoval <<<
ShowMessage (EditCis_strediska.Text+' FA '+EditObdobie.Text);
Val (EditCis_strediska.Text, wi, code);
qryUkonAuto.ParamByName('ParCis_strediska').AsSmallint := wi;
qryUkonAuto.ParamByName('ParObdobie').AsString:= EditObdobie.Text;
}
{ qryUkonAuto.Active:= False; }
qryUkonAuto.Sql.Clear;
qryUkonAuto.Sql.Add ('SELECT U2.ExistRec, A.Aktualna_SPZ, A.Popis_auta, '+
'U.CP, U.Cis_strediska, U.Obdobie, U.Cis_auta');
qryUkonAuto.Sql.Add (' FROM Ukoncene U LEFT JOIN Ukoncen2 U2');
qryUkonAuto.Sql.Add (' ON (U.CP = U2.CP AND '+
'U.Cis_strediska = U2.Cis_strediska AND '+
'U.Obdobie = U2.Obdobie AND '+
'U.Cis_auta = U2.Cis_auta)');
qryUkonAuto.Sql.Add (' JOIN "Auto" A');
qryUkonAuto.Sql.Add (' ON (U.CP = A.CP AND '+
'U.Cis_auta = A.Cis AND ');
qryUkonAuto.Sql.Add ( 'U.CP = '+EditCP.Text+' AND ');
qryUkonAuto.Sql.Add ( 'U.Cis_strediska = '+EditCis_strediska.Text+'
AND ');
qryUkonAuto.Sql.Add ( 'U.Obdobie = '''+EditObdobie.Text+''')');
qryUkonAuto.Sql.Add (' ORDER BY A.Aktualna_SPZ');
{ qryUkonAuto.Active:= True; }
{ Meranie horeuvedeneho casu }
st:= Time;
qryUkonAuto.Open;
et:= Time;
. . .
end;
J. Popluhar, popluhar(zv)acc.sk
HTML +Delphi5
[*] filas(zv)post.sk - 11.10.2000 15:32:48
> Mam problem s vytlacenim Html dokumentu v Delphi5 a tiez s hladanim textu v takomto dokumente. Po kliknuti na obrazkok(ktore predstavuje video a je sucastou Html dokumentu) sa ma otvorit nove okno a v nom video spustit.
> Moj program nema byt internetovy prehliadac, ale ucebna pomocka. Vsetok text ma byt v Html formate napaleny na CD.
> Proste napr. vo FrontPage vytvorim stranku a moj program ju musi vediet obsluhovat.
> Komponenta WebBrowser to nepodporuje a tie ostatne som nevylustila.
> DAKUJEM ZA POMOC
MSSQL7->IB6
[*] Campulka Jiri <campulka(zv)czas(tec)cz> - 11.10.2000 15:41:47
pred pripojenim na databazi zadej:
SET NAMES TO WIN1250
(popr. se mrkni do helpu k IB na vyse uvedeny prikaz)
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, October 11, 2000 12:40 PM
Subject: RE: MSSQL7->IB6
> > http://www.ibphoenix.com/sql2gdb.html
>
> Ahoj,
>
> dik za odkaz - je to opravdu ono, ale presto me to vypiska pri
> pokusu o preneseni dat s hacky a carkami:
>
> Cannot transliterate character between character sets.
>
> Jaky charset se tedy pouziva na MSSQL7? V IB6 jsem tabulku
> zalozil s WIN1250, collate je PXW_CSY.
> Co je tedy spatne?
>
> David
TreeView
[*] Ale� Va���ek�����"q��y�&���w�3 - 11.10.2000 16:34:22
Jak hledam tak hledam, ale nic... Je tam sice funkce EditText, ale ta vraci
True/False jestli se uz edituje.
A proto se ptam znovu: Nevite nekdo jak prepnout TreeView na urcite polozce
do editacniho modu?
Ales
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Martin Pe�ava
> Sent: Tuesday, October 10, 2000 10:29 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: TreeView
>
>
> Nejsem si 100% jist, ale mam pocit, ze existuje neco jako metoda Edit,
> nebo tak nejak, zkus se po tom kouknout...
>
> Ale� Va���ek wrote:
> >
> > Ahoj,
> >
> > mam TreeView a potreboval bych ho nejak programove prepnout na urcite
> > polozce do editacniho modu. Stejne jak to dela pruzkumnik pri
> vytvareni nove
> > slozky. Vytvori polozku s nazvem Nova slozka, ale uz na ni
> blika kurzor a
> > lze ji editovat.
> >
> > Ales
>
> --
> Martin Pe�ava
>
> /--------------------------------------------------------------\
> | E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
> | WebMaster of |
> | http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
> \--------------------------------------------------------------/
>Pripojeni k MSSQL (pres ADONIS - OLE DB)
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 16:56:28
> service pack k ceskym Windows 2000 a nainstaloval jej.
Win2k Service Pack tusim instaluje ADO 2.6.
> A pote nastal problem:
> nefunguje mi pripojeni z meho programu k MS SQL serveru (verze 2000 bera
2).
> Pro komunikaci se servrem pouzivam ADONISove komponenty.
> Pripojuji se takto:
> Data Source=KAM_NT\SQL2000 (na serveru mi bezi dve instance SQL serveru,
> proto to jmeno s lomitkem)
> Provider=SQLOLEDB.1
> UseNTIntegratedSecurity=1
>
> Drive mi vse chodilo jako hodinky a ted nic !
SQL Server 2000 beta pouziva ADO 2.5.
> Pritom ostatni druhy pripojeni (MMC konzole ci Query Analyzer) jsu v
pohode.
> Proto se ptam: je chyba v OLE DB providerovi ci je mozne, ze je nejaka
> nesrovnalost i v ADONISu
> nebo jsem neco udelal spatne ja (asi nejpravdepodobnejsi varianta) ?
Vecsina softwaru dodavana s MSSQL pouziva ODBC, zrejme z toho dovodu,
ze v case ked vznikali, OLEDB nebolo.
Vyskusaj konekt na MS SQL 2k pomocou ODBC, potom skus ADO komponenty.
Mozno by problem vyriesila ostra verzia MS SQL servera, ktora pouziva ADO
2.6.
Erik Salaj, WINSOFT
HTML +Delphi5
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 11.10.2000 16:58:36
> > Mam problem s vytlacenim Html dokumentu v Delphi5 a tiez s
> hladanim textu v takomto dokumente. Po kliknuti na
> obrazkok(ktore predstavuje video a je sucastou Html
> dokumentu) sa ma otvorit nove okno a v nom video spustit.
> > Moj program nema byt internetovy prehliadac, ale ucebna
> pomocka. Vsetok text ma byt v Html formate napaleny na CD.
> > Proste napr. vo FrontPage vytvorim stranku a moj program ju
> musi vediet obsluhovat.
> > Komponenta WebBrowser to nepodporuje a tie ostatne som nevylustila.
> > DAKUJEM ZA POMOC
Ahoj.
Celkom som ta nepochopil.
Chces urobit aplikaciu ktora sa spusti z CD a zobrazi HTML
subory ktore su tiez na tomto CD ?
Ak ano tak v podstate musis urobit nieco ako HTML browser.
/LH
Jak odchytit WM_Syskeydown
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 11.10.2000 17:10:11
Ahoj !
Hladaj v konferencii klucove slovo "hook".
/LH
> Message jako takovy chytnu, jenze usi mit formular fokus, aby
> to behalo. A
> to je nemozne, protoze ho vytvarim takhle
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Application.ShowMainForm:=False;
>
> end;
> A jak jiste uznate kde nic neni ani smrt nebere. Jde mi o to, aby tato
> aplikace chytla klavesu a po ni provedla urcitou akci. Musi
> to bezet skryte
> a nezavisle na tom co je pustene. Poradi Nekdo?
> Nejsem si jist, jestli by pomohlo zaregistrovat to jako sluzbu.
> Diky za kazdy navrh a prosim nevybodnete se na mne :-)
> J. Voj.
> HTML +Delphi5
[*] -=Ivomir=- <Ivomir(zv)seznam(tec)cz> - 11.10.2000 17:26:26
> > > Mam problem s vytlacenim Html dokumentu v Delphi5 a tiez s
> > hladanim textu v takomto dokumente. Po kliknuti na
> > obrazkok(ktore predstavuje video a je sucastou Html
> > dokumentu) sa ma otvorit nove okno a v nom video spustit.
> > > Moj program nema byt internetovy prehliadac, ale ucebna
> > pomocka. Vsetok text ma byt v Html formate napaleny na CD.
> Ahoj.
> Celkom som ta nepochopil.
> Chces urobit aplikaciu ktora sa spusti z CD a zobrazi HTML
> subory ktore su tiez na tomto CD ?
> Ak ano tak v podstate musis urobit nieco ako HTML browser.
No ja sem to taky moc dobre nepochopil, ale jestli chces to, co ti radi
Lubos, tak nemusis delat zadnej browser, ale staci kratkej programek,
kterej ti spusti trebas MSexplorer (ten muze byt klidne vypalenej i na tom cd
aby se zarucilo, ze ho kazdej bude mit) a v ty aplikaci otevres uvodni
html soubor pocitam index.htm a udelas to asi takhle.
var params : string;
Params := 'file://cd-rom:\index.htm'; /./ proste cesta k tomu prvnimu htmlku
ShellExecute(Self.Handle, 'open', PChar(Params), nil, nil, SW_SHOWNORMAL);
Close;
TreeView
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 11.10.2000 17:35:09
> Jak hledam tak hledam, ale nic... Je tam sice funkce EditText, ale ta
> vraci True/False jestli se uz edituje.
>
> A proto se ptam znovu: Nevite nekdo jak prepnout TreeView na urcite
> polozce do editacniho modu?
>
Ne, EditText zapne editacni rezim nodu a vrati, jestli to do
editacniho modu opravdu vlezlo nebo ne. Editace nodu se da zakazat v
Eventu OnEditing, totiz...
Napr.:
if TreeView.Selected <> nil then TreeView.Selected.EditText;
Petr Fischer
Microsoft OLAP a Delphi
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 11.10.2000 18:26:12
Zdravim,
nezkousel ste nekdo naimportovat Type Library Microsoft OLAP Sevices
do Delphi 5??? Me to nejde... :(
Petr Fischer
Otevreni jiz pouzivane databaze
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 11.10.2000 18:36:31
Na viacnasobne otvorenie databaz musis pouzit TSession.
Roland.
----- Original Message -----
From: "Zapl�k" <zaplik(zv)volny(tec)cz>
To: "Delphi Konference" <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, October 10, 2000 3:20 PM
Subject: Otevreni jiz pouzivane databaze
> D5 Profi, W98
>
> Mam jeden malej dotaz. Da se nejakym zpusobem otevrit databaze (napr.
*.dbf)
> ktera je jiz otevrena jinou aplikaci? Nebo alespon vytvorit jeji kopii .
Ani
> jedno, ani druhe system nedovoli. Uplne by mi stacilo otevrit ji jen pro
> cteni, ale bojim se, ze to asi nepujde. Budu vdecny za jakoukoliv radu.
>
> zaplik(zv)volny(tec)cz
>
>
>Sinea BarCode hodnota
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 11.10.2000 18:40:57
Zdravim.
Ako je mozne menit hodnotu ciaroveho kodu za jazdy ?
Mam Sinea 3.39x D5 Demo.
PS2: Vaclave, je k dispozicii plna slovenska verzia so vsetkymi upgrade
ktore vykonavas v priebehu roka, alebo riesis formou dodavky mailom od Teba
?
Dakujem.
roland.Jak odchytit WM_Syskeydown
[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 11.10.2000 19:24:00
Poslu ti na tvuj mail komponentu.
Mirek Drancak
> Message jako takovy chytnu, jenze usi mit formular fokus, aby to behalo. A
> to je nemozne, protoze ho vytvarim takhle
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Application.ShowMainForm:=False;
>
> end;
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
ADOExpres, problemy pri odpojovani Connection
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 20:56:43
> Podle Erika Salaje je to chyba ADOExpresu, ADOnis se chova korektne.
> Me ale zajima, zda by se dal prinutit i ADOExpres, nejakou akci pred, nebo
> po close, resp predefinovanim metody Close. Jen me prosim nepresvecujte,
> abych predelal cely program na adonis (uz jsem jednou prehazoval z BDE na
> ADOExpres a znovu to absolvovat nechci :-) ). Pripadne by mi pomohl
> jakykoliv priklad, ktery pouziva primo ADO a chova se v tomto pripade
> korektne.
Potrebujes zrusit ADO.Connection objekt (ADO.Connection := nil)
a potom vytvorit novy tam, kde sa connection zatvara (t.j. kde sa vola
ADO.Connection.State := adStateClosed). Mozes si to jednoducho
a bez programovania vyskusat na ADOCS komponentoch (su
sucastou Adonisu ;-) ).
Erik Salaj, WINSOFT
Microsoft OLAP a Delphi
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 21:00:15
> nezkousel ste nekdo naimportovat Type Library Microsoft OLAP Sevices
> do Delphi 5??? Me to nejde... :(
Pre OLAP existuje ADO MD (ADO multi dimensional) rozhranie,
ktore sa da importovat z type library.
Erik Salaj, WINSOFT
ADO a Accesovska databaze na CDcku
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 21:10:17
> Mam Accesovskou databazi na CDcku (600 MB) a udelal jsem si v D5
Enterprise
> program, ktery ji cte. Zadny problem. Jenom mi vadilo, ze pokud to chce
> nekdo pouzit, musi si nainstalovat BDE. Rozhodl jsem se zkusit ADO.
> Konfigurace se po malych peripetiich zadarila. Kdyz ale spustim program,
tak
> v okamziku kdy to zkusi pripojit databazi, to spadne s chybou, ze se
soubor
> neda ulozit.
Musis mat vyhradny pristup k databaze (aby sa nevytvaral ldb subor), t.j. v
ADO:
ADO.Connection.Mode := adModeShareExclusive
Je to uvedene aj v Adonis FAQ na
http://www.cybermagic.co.nz/winsoft/adofaq.htm#Q30
Erik Salaj, WINSOFT
Pripojeni k MSSQL (pres ADONIS - OLE DB)
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 11.10.2000 21:50:40
Vyzkousel jsem odinstalaci a naslednou instalaci SQL serveru, samostatnou
instalaci ADO 2.6 - nic nepomohlo.
Reseni jsem nakonec nasel - opravna instalace windowsu ...
Byl jsem prekvapen jak to vse pekne probehlo, bal jsem se, ze po te
instalaci
budu muset vse predelavat, nicmene vse zustalo jako driv (instalovane
programy, nastaveni, ...) !
A ten slavny service pack okamzite mazu !
Konektovat pres ODBC jsem zkousel, ale nepocholdil jsem,
protoze v programu pouzivam sql_variant a ODBC to nerozchodilo.
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Erik Salaj
> Sent: Wednesday, October 11, 2000 4:56 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Pripojeni k MSSQL (pres ADONIS - OLE DB)
>
> > service pack k ceskym Windows 2000 a nainstaloval jej.
>
> Win2k Service Pack tusim instaluje ADO 2.6.
>
> > A pote nastal problem:
> > nefunguje mi pripojeni z meho programu k MS SQL serveru (verze 2000 bera
> 2).
> > Pro komunikaci se servrem pouzivam ADONISove komponenty.
> > Pripojuji se takto:
> > Data Source=KAM_NT\SQL2000 (na serveru mi bezi dve instance SQL serveru,
> > proto to jmeno s lomitkem)
> > Provider=SQLOLEDB.1
> > UseNTIntegratedSecurity=1
> >
> > Drive mi vse chodilo jako hodinky a ted nic !
>
> SQL Server 2000 beta pouziva ADO 2.5.
>
> > Pritom ostatni druhy pripojeni (MMC konzole ci Query Analyzer) jsu v
> pohode.
> > Proto se ptam: je chyba v OLE DB providerovi ci je mozne, ze je nejaka
> > nesrovnalost i v ADONISu
> > nebo jsem neco udelal spatne ja (asi nejpravdepodobnejsi varianta) ?
>
> Vecsina softwaru dodavana s MSSQL pouziva ODBC, zrejme z toho dovodu,
> ze v case ked vznikali, OLEDB nebolo.
>
> Vyskusaj konekt na MS SQL 2k pomocou ODBC, potom skus ADO komponenty.
> Mozno by problem vyriesila ostra verzia MS SQL servera, ktora pouziva ADO
> 2.6.
>
> Erik Salaj, WINSOFT
>Sinea BarCode hodnota
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 11.10.2000 22:45:19
From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> Ako je mozne menit hodnotu ciaroveho kodu za jazdy ?
Polozkou pro carovy kod je funkcni vyraz.
Je tedy mozne pouzit nejenom textovou konstantu,
ale i odkaz na polozku databaze, parametr, uzivatelskou
funkci, nebo i libovolny funkcni vyraz pouzivajici
tyto polozky.
Priklady:
12345 cislo
'1234' textova konstanta
#5 odkaz na polozku DB cislem
#Kod odkaz na polozku nazvem
&2 parametr
(zv)3 uzivatelska funkce
'000'+#5 funkcni vyraz
>
> PS2: Vaclave, je k dispozicii plna slovenska verzia so vsetkymi upgrade
> ktore vykonavas v priebehu roka, alebo riesis formou dodavky mailom od
Teba
> ?
Slovenskou verzi prekladame cas od casu, podle toho,
jak si kdo pozada o reseni nejake chyby nebo o novou funkci.
Verze pro D5 ma prednost pred starsimi verzemi D.
Vaclav Krmela
TreeView
[*] Krska Vit <v_krska(zv)del(tec)cz> - 12.10.2000 07:33:09
TreeView ma propetry ReadOnly. to by mohlo byt to co chces. skusil jsem to a
nazvy polozek jsem normalne editoval.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ale� Va���ek
Sent: Wednesday, October 11, 2000 4:34 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: TreeView
Jak hledam tak hledam, ale nic... Je tam sice funkce EditText, ale ta vraci
True/False jestli se uz edituje.
A proto se ptam znovu: Nevite nekdo jak prepnout TreeView na urcite polozce
do editacniho modu?
Ales
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Martin Pe�ava
> Sent: Tuesday, October 10, 2000 10:29 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: TreeView
>
>
> Nejsem si 100% jist, ale mam pocit, ze existuje neco jako metoda Edit,
> nebo tak nejak, zkus se po tom kouknout...
>
> Ale� Va���ek wrote:
> >
> > Ahoj,
> >
> > mam TreeView a potreboval bych ho nejak programove prepnout na urcite
> > polozce do editacniho modu. Stejne jak to dela pruzkumnik pri
> vytvareni nove
> > slozky. Vytvori polozku s nazvem Nova slozka, ale uz na ni
> blika kurzor a
> > lze ji editovat.
> >
> > Ales
>
> --
> Martin Pe�ava
>
> /--------------------------------------------------------------\
> | E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
> | WebMaster of |
> | http://www.volny(tec)cz/jimx - Neofici�ln� str�nka MISS |
> \--------------------------------------------------------------/
>struktura databaze programove
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 12.10.2000 08:16:10
Ahoj,
spravne ma byt Set Term <novy_oddelovac><stary_oddelovac>,
ale chyba je, ze Set Term je prikaz IBConsoly, a nie SQL. To musis osetrit
rucne. Priklad ako to robit je napriklad vo FreeIBComponents (najdes niekde
na www.interbase.com), komponenta FIBScript.
Strucne:
1. ak precitas prikaz set term nastavis si parser na definovany oddelovac
prikazov
2. nacitas jednotlivy prikaz po aktualny oddelovac
3. vykonas SQL-prikaz pomocou IBQuery (resp. FIBQuery)
4. pokracujes bodom 1 az do konca skriptu - pozor na spracovanie komentarov
a inych prikazov IBConsoly (Commit, Create Database, Exit, ...)
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Ota Maly <maly(zv)space(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, October 11, 2000 1:01 PM
Subject: RE: struktura databaze programove
> Ahoj,
> kdyz tam poslu tohle
>
> >SET TERM !
> >
> >CREATE TRIGGER SET_Neco
> >FOR Neco BEFORE INSERT POSITION 0 AS
> >BEGIN
> > new.Uniq = gen_id(Neco_GEN, 1);
> >END !
>
> tak mi to vyhodi hned ten SET TERM, pritom tohle treba v IBConsoli projde
v
> pohode.
> Jeste je predtim definovan generator Neco_GEN.
>
> S pozdravem
> Ota Maly
>
> PaPouch elektronika
> http://www.pap-el(tec)cz
>
>
> >
> > Ahoj,
> >
> > aku chybu Ti vracia?
> >
> > Moze sa stat, ze ak pouzijes v skripte premenne uvedene
> > dvojbodkou je nutne
> > nastavit property ParamCheck := false; (default je true).
> >
> > Pavol Stolc
> > pstolc(zv)sc.sknet.sk
> > ----- Original Message -----
> > From: Ota Maly <maly(zv)space(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Monday, October 09, 2000 1:25 PM
> > Subject: IB6: struktura databaze programove
> >
> >
> > > Ahoj,
> > > snazim se programove vytvorit DB (ze skriptu), ale nedari se mi.
> > > Pokud mam IBDatabase, IBTransaction a IBSQL tak vytvorim
> > databazi, tabulky
> > i
> > > generatory, ale nedari se mi poslat tam trigger.
> > > Take me napadlo volat externe isql.exe, na tom ted pracuju, uvidime..
> > >
> > > Jak to resite vy?
> > >
> > > S pozdravem
> > > Ota Maly
> > >
> > > PaPouch elektronika
> > > http://www.pap-el(tec)cz
> > >
> >
>Ako zistim meno nalogovaneho uzivatela na pocitaci
[*] Jano <jj_delphi(zv)ke.ubp.sk> - 12.10.2000 09:11:57
Ahojte vsetci,
mam takyto problem, chcem poslat spravu po sieti trebars pre Administratora.
Moze
byt s tymto menom "Administrator" nalogovany na ktoromkolvek pocitaci na
sieti.
Viem si vycucnut zoznam vsetkych dostupnych zdrojov na sieti, ale meno
prihlaseneho uzivatela si z nich uz zistit nedokazem, jednoducho v nich
tento "udaj" chyba. Skusil som na to pouzit aj API funkciu WNetGetUser, ale
furt mi vypluvne iba nazov uzivatela prihlaseho na masine, z ktorej spustim
program. Mna napadlo zatial iba toto riesenie - poslat "klientovi" spravu na
kazdom pocitaci po sieti, "klient" zisti ake je meno prihlaseneho uzivatela
a ak sa prihlaseny uzivatel zhoduje, sprava sa mu zobrazi. Alebo vyuzit
finger service,
Nenapada niekoho z Vas nieco lepsie? Za kazdy napad vrele diky.
D4C/S, W98US SE
Jano
Cislo chyby
[*] Branislav Zaujec <zaujec(zv)nrsys.sk> - 12.10.2000 09:23:38
Zdravim,
neviem prist na to, ako sa da dostat do Delphi cislo chyby po spadnuti
SQL prikazu. Standardne to vracia iba text.
Neviete mi s tym niekto pomoct ?
Diky
S pozdravom
Zaujec
MSSQL7->IB6
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 12.10.2000 09:40:15
> David Lebeda wrote:
> >
> > > http://www.ibphoenix.com/sql2gdb.html
> >
> > Ahoj,
> >
> > dik za odkaz - je to opravdu ono, ale presto me to vypiska pri
> > pokusu o preneseni dat s hacky a carkami:
> >
> > Cannot transliterate character between character sets.
> >
> > Jaky charset se tedy pouziva na MSSQL7? V IB6 jsem tabulku
> > zalozil s WIN1250, collate je PXW_CSY.
> > Co je tedy spatne?
>
> Ja jsem to ani nevidel, ale obecne plati, ze "win1250" musi byt
> nastaveno nejen v databazi, ale i pri pripojeni k databazi (v
> IBObjects to je TIB_Connection, v IBX to bude neco jineho - a ja ani
> nevim, pomoci ceho je ten wizard udelany ...)
>
Vypada to, ze mas zase pravdu (coz je jen dobre) - pozadal jsem
autora, aby tam doplnil moznost volby charsetu, protoze ta tam
evidentne chybi. Takze uvidime - treba bude brzy k dispozici nova
verze. V kazdem pripade dik.
David
CZ svatky
[*] Jiri Kral <admin(zv)printo(tec)cz> - 12.10.2000 09:55:50
Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
diky
JK
Problemy s rychlostou BDE - neviem ako dalej, ma
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 12.10.2000 10:04:12
Jaroslav Popluh�r dne 11 Oct 2000, v 15:01:
> Chcel by som prejst na D5 Pro, ktoru som kupil ale zatial lezi
> ladom...
Pri prechodu na D5 a zaroven prechodu na novejsi verzi BDE jsme take
zaznamenali zpomaleni nekterych dotazu. Nebylo to ale tak drasticke,
takze jsme se s tim zatim smirili.
Nevim, jestli ve Vasem pripade nemuze byt pricinou pouziti JOIN v SQL
dotazu. Predne bych zkontroloval, zdali jednomu zaznamu z tabulky
uvedene v klauzuli FROM odpovida vzdy _max. jeden_ zaznam v tabulkach
pripojenych pres JOIN (tj. zda jsou v casti ON... uvedena vsechna
potrebna pole). V opacnem pripade by to generovalo spoustu radku.
Mozna by pomohlo, pokud to tak muze byt, pouziti LEFT OUTER JOIN
namisto samotneho JOIN.
Parametricky dotaz: v Delphi 5 to take funguje nejak zvlastne; pokud
mam v dotazu parametr se stejnym nazvem vicekrat a za parametr
dosadim hodnotu, rekl bych, ze se v dotazu objevi jen na prvnim
miste. Celkem mi trvalo, nez jsem prisel na to, proc najednou nektere
dotazy nefunguji...
Karel Rys
______ _ ___ Vyssi odborna skola zahradnicka
\ \/ \_ --- | Stredni zahradnicka skola
/ | | Melnik
( | |
\_ ___/ | e-mail: rys(zv)zas-me(tec)cz
_/ \\ ______| web: www.zas-me(tec)cz
\_ / \_/ tel. 0206/623023-5, 0604/846436
\____/ fax 0206/623009
Interbase
[*] Libor Thiel <thiel(zv)elapsh(tec)cz> - 12.10.2000 11:17:45
Prvne pouzivam databasi a uz jsem z toho jelen:
Potrebuji vytvori dtb a tabulky za chodu - vytvoreni filu probehne OK, ale
pri otevirani dtb mi vraci hlasku "DBP KONSTANT(0) IS UNKNOW" - co to
znamena?
...
begin
if not FileExists(dbPrvni.DatabaseName) then
dbPrvni.CreateDatabase;
with dbCorsa do
begin
Params.Values['USER NAME'] := 'SYSDBA';
Params.Values['PASSWORD'] := 'masterkey';
LoginPrompt := False;
Connected := True;
end;
...
end;
L.
CZ svatky
[*] Ko��tkov� Jolana <kotatko(zv)nym.pvt(tec)cz> - 12.10.2000 11:18:29
Kdysi jsem takovou databazi mela pod FoxPro 2.0 v PCLatin2. Kdyz prohrabnu
archiv, mozna to najdu. Mate-li zajem, napiste na moji adresu.
Kotatkova
-----P�vodn� zpr�va-----
Od: Jiri Kral [mailto:admin(zv)printo(tec)cz]
Odesl�no: 12. ��jna 2000 9:56
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: CZ svatky
Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
diky
JK
Ako zistim meno nalogovaneho uzivatela na pocitaci
[*] Ondrej Krajicek <xkrajic(zv)ics.muni(tec)cz> - 12.10.2000 11:25:43
Nazdar,
resil sem tedka neco podobneho. Finger service jako takovy
je neco trochu jineho, nicmene nenasel jsem zadny
fungujici finger (tj. aby nepadal).
WNetGetUser ti nepomuze:
The WNetGetUser function retrieves the current default user name,
or the user name used to establish a network connection.
Pouzij NetSessionEnum (mam dojem ze unity jsou
na delphi-jedi). Podle helpu by NetSessionEnum
melo fungovat i na W9x.
s pozdravem,
Ondrej Krajicek
Jano wrote:
>
> Ahojte vsetci,
>
> mam takyto problem, chcem poslat spravu po sieti trebars pre Administratora.
> Moze
> byt s tymto menom "Administrator" nalogovany na ktoromkolvek pocitaci na
> sieti.
> Viem si vycucnut zoznam vsetkych dostupnych zdrojov na sieti, ale meno
> prihlaseneho uzivatela si z nich uz zistit nedokazem, jednoducho v nich
> tento "udaj" chyba. Skusil som na to pouzit aj API funkciu WNetGetUser, ale
> furt mi vypluvne iba nazov uzivatela prihlaseho na masine, z ktorej spustim
> program. Mna napadlo zatial iba toto riesenie - poslat "klientovi" spravu na
> kazdom pocitaci po sieti, "klient" zisti ake je meno prihlaseneho uzivatela
> a ak sa prihlaseny uzivatel zhoduje, sprava sa mu zobrazi. Alebo vyuzit
> finger service,
> Nenapada niekoho z Vas nieco lepsie? Za kazdy napad vrele diky.
>
> D4C/S, W98US SE
>
> Jano
--
OK-)TreeView
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 12.10.2000 12:05:02
Musis ReadOnly nastavit na False, a potom muzes polozku pomoci F2
editovat.
______________________________________________________________
> Od: "Krska Vit" <v_krska(zv)del(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Thu, 12 Oct 2000 07:33:09 +0200
> P�edm�t: RE: TreeView
>
> TreeView ma propetry ReadOnly. to by mohlo byt to co chces.
skusil jsem to a
> nazvy polozek jsem normalne editoval.
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
Behalf Of
> Ale� Va���ek
> Sent: Wednesday, October 11, 2000 4:34 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: TreeView
>
>
> Jak hledam tak hledam, ale nic... Je tam sice funkce EditText,
ale ta vraci
> True/False jestli se uz edituje.
>
> A proto se ptam znovu: Nevite nekdo jak prepnout TreeView na
urcite polozce
> do editacniho modu?
>
> Ales
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
Behalf Of
> > Martin Pe�ava
> > Sent: Tuesday, October 10, 2000 10:29 PM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: TreeView
> >
> >
> > Nejsem si 100% jist, ale mam pocit, ze existuje neco jako
metoda Edit,
> > nebo tak nejak, zkus se po tom kouknout...
> >
> > Ale� Va���ek wrote:
> > >
> > > Ahoj,
> > >
> > > mam TreeView a potreboval bych ho nejak programove prepnout
na urcite
> > > polozce do editacniho modu. Stejne jak to dela pruzkumnik
pri
> > vytvareni nove
> > > slozky. Vytvori polozku s nazvem Nova slozka, ale uz na ni
> > blika kurzor a
> > > lze ji editovat.
> > >
> > > Ales
> >
> > --
> > Martin Pe�ava
> >
> > /-------------------------------------------------------------
-\
> > | E-Mail: mailto:jimx(zv)volny(tec)cz ICQ#
18148896 |
> > | WebMaster
of |
> > | http://www.volny(tec)cz/jimx - Neofici�ln� str�nka
MISS |
> > \-------------------------------------------------------------
-/
> >
>
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
CZ svatky
[*] L.Svoboda <svoboda(zv)fdsystem(tec)cz> - 12.10.2000 12:16:57
Zdravim
Mam to komplet.
V jakem formatu to chcete poslat?
Momentalne to je v MS-Access 2000.
Preji hezky den
Ing. Ludek Svoboda
svoboda(zv)fdsystem(tec)cz
webmaster(zv)e-region(tec)cz
> Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
> dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
>
> diky
>
> JK
Ako zistim meno nalogovaneho uzivatela na pocitaci
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 12.10.2000 12:23:02
Jmeno uzivatele se da vytahnout z registru ve
vetvi "HKEY_LOCAL_MACHINE\Network\Logon" a polozce "username".
Ale pozor, pokud uzivatel (pouze pod Win9x) se neprihlasi
(stornuje prihlasovaci dialog), v registru zustane stara polozka.
Na spolehlivejsi metodu se musim kouknout do dokumentace k Win32
API, az to najdu, tak vam to poslu.
______________________________________________________________
> Od: "Jano" <jj_delphi(zv)ke.ubp.sk>
> Komu: "DELPHI Konferencia" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Thu, 12 Oct 2000 09:11:57 +0200
> P�edm�t: Ako zistim meno nalogovaneho uzivatela na pocitaci na
sieti.?
>
> Ahojte vsetci,
>
> mam takyto problem, chcem poslat spravu po sieti trebars pre
Administratora.
> Moze
> byt s tymto menom "Administrator" nalogovany na ktoromkolvek
pocitaci na
> sieti.
> Viem si vycucnut zoznam vsetkych dostupnych zdrojov na sieti,
ale meno
> prihlaseneho uzivatela si z nich uz zistit nedokazem,
jednoducho v nich
> tento "udaj" chyba. Skusil som na to pouzit aj API funkciu
WNetGetUser, ale
> furt mi vypluvne iba nazov uzivatela prihlaseho na masine, z
ktorej spustim
> program. Mna napadlo zatial iba toto riesenie -
poslat "klientovi" spravu na
> kazdom pocitaci po sieti, "klient" zisti ake je meno
prihlaseneho uzivatela
> a ak sa prihlaseny uzivatel zhoduje, sprava sa mu zobrazi.
Alebo vyuzit
> finger service,
> Nenapada niekoho z Vas nieco lepsie? Za kazdy napad vrele diky.
>
> D4C/S, W98US SE
>
> Jano
>
>
>
>
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
CZ svatky
[*] Raul Endymion <Raul.Endymion(zv)ns1.infima(tec)cz> - 12.10.2000 12:33:35
Take jsem kdysi shanel a pote opsal, muzu zaslat..
Je to pouze po sobe jdouci txt se jmeny. Pokud chces rekni si..
JK> Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
JK> dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
JK> diky
JK> JK
Raul mailto:Raul.Endymion(zv)ns1.infima(tec)cz
MS SQL 7 - chyba Access Violation occurred reading
[*] Tom� Vlad�k������V��?���o�� - 12.10.2000 12:58:49
> -----Original Message-----
>
> mozna, ze to nepomuze, ale zkus si to nakonfigurovat pres TCP/IP
> a vykaslat
> se na ty NamedPipes (ty dat uplne pryc). Ja jedu pres TCP/IP a tyhle chyby
> nemam.
>
> Nevim, jestli prvotni pricina byla v tom Communication link failure nebo
> fatal exception c0000005, proto taky zkus nejak "zkontrolovat" pripojeni k
> serveru (HW i konfigurace), nekdy nastve i spatne nalisovany sitovy kabel.
>
>
No, to nepomohlo. Vsecko mi tam slape, jetom to DELETE pres celou tabulku
... v komunikaci by to byt nemelo, kdyz se to spusti jako ulozena procedura,
tak to skrachne taky. Zkousel jsem to i na lokalnim pocitaci (W2k CZ + MSSQL
7 SP2), jo a ten server prve byl WINNT 4 SP6 + MSSQL 7 SP2.
Kdyz uz se o tom bavime, taky vam pred instalaci SP2 do MSSQL 7 neslo
vytvorit z jineho pocitace nez primo tam, kde bezel MSSQL, balicek pro Data
Transformation Services????
Tom
IBTransaction
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 12.10.2000 13:02:04
Ahoj,
muzete mi prosim nekdo velmi strucne naznacit filosofii transakci v
IBExpress? Jde mi zejmena o rozdily v "dosavadnim" pristupu
(Database.StartTransaction, Database.Commit) a "novem" pristupu
- pouziti komponenty. Celkem me prekvapilo, ze transakci je treba
aktivovat i na select, kde mi to prijde zbytecne.
Dik.
David
Interbase
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 12.10.2000 13:03:33
Ahoj
zrejme treba USER_NAME
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Libor Thiel <thiel(zv)elapsh(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 12, 2000 11:17 AM
Subject: Interbase
> Prvne pouzivam databasi a uz jsem z toho jelen:
>
> Potrebuji vytvori dtb a tabulky za chodu - vytvoreni filu probehne OK, ale
> pri otevirani dtb mi vraci hlasku "DBP KONSTANT(0) IS UNKNOW" - co to
> znamena?
>
> ...
> begin
> if not FileExists(dbPrvni.DatabaseName) then
> dbPrvni.CreateDatabase;
>
> with dbCorsa do
> begin
> Params.Values['USER NAME'] := 'SYSDBA';
> Params.Values['PASSWORD'] := 'masterkey';
> LoginPrompt := False;
> Connected := True;
> end;
>
> ...
> end;
>
> L.
>CZ svatky
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 12.10.2000 13:43:12
Jeden seznam obsahovala i stara dosova M602 v. 3.0. Soubor se jmenoval
M602.ddt a mel nasledujici strukturu:
;Tento soubor obsahuje seznam pevnych svatku
;
; Copyright (c) 1995 Software602
;
; Format:
; MesicDen=Jmeno,Jmeno,...Jmeno$Cirkevni,Cirkevni,...,Cirkevni$Hlaseni
;
; Radky zacinajici ';' jsou komentare
; Max delka cele radky je 255 znaku
;
0101=Mecislav, Mecislava$$Novy rok
0102=Karina, Abel, Detmar
0103=Radmila, Benjamin, Danuta, Jenovefa
0104=Diana, Blahomila, Blahomira, Blahoslava
0105=Dalimil, Dalimir, Teofan, Amata, Dalimila, Dalimira
...
...
Samozrejme je to s diakritikou. Pokud budes mit zajem, napis mi na moji
adresu.
S pozdravem Pavel Koukal
> Od: Jiri Kral [SMTP:admin(zv)printo(tec)cz]
>
> Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
> dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
>
> diky
>
> JK
> CZ svatky
[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 12.10.2000 13:49:48
Na nejakem CD z Chipu (tipuju to tak na prosinec minuleho roku) byl free
program "Svatky a vyroci" a mam pocit, ze ty svatky tam byly rovnou v DBF.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7
tel. +420-2-3337 3855
+420-2-2431 4538
*************************************
-----Original Message-----
From: Jiri Kral [mailto:admin(zv)printo(tec)cz]
Sent: Thursday, October 12, 2000 9:56 AM
To: delphi-l(zv)fwd(tec)cz
Subject: CZ svatky
Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
diky
JK
Ako zistim meno nalogovaneho uzivatela na pocitaci
[*] Brant Petr <Brant(zv)dcomm(tec)cz> - 12.10.2000 13:53:02
Resil jsem podobny problem, ale bylo to vazane na aplikaci, tj. zprava se da
poslat jen tomu, kdo ma tu aplikaci spustenou. Beha to tak, ze kazda
spustena aplikace si kazdych nekolik sekund osahava databazi se zpravama a
pokud najde zpravu pro sebe, provede prislusnou akci a radek z databaze zase
smaze. Kdyz tak napis na soukromy mail.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
program�tor
**************************************
D & COMM s.r.o.
Korunova�n� 6, Praha 7
tel. +420-2-3337 3855
+420-2-2431 4538
*************************************
-----Original Message-----
From: Jano [mailto:jj_delphi(zv)ke.ubp.sk]
Sent: Thursday, October 12, 2000 9:12 AM
To: DELPHI Konferencia
Subject: Ako zistim meno nalogovaneho uzivatela na pocitaci na sieti.?
Ahojte vsetci,
mam takyto problem, chcem poslat spravu po sieti trebars pre Administratora.
Moze
byt s tymto menom "Administrator" nalogovany na ktoromkolvek pocitaci na
sieti.
Viem si vycucnut zoznam vsetkych dostupnych zdrojov na sieti, ale meno
prihlaseneho uzivatela si z nich uz zistit nedokazem, jednoducho v nich
tento "udaj" chyba. Skusil som na to pouzit aj API funkciu WNetGetUser, ale
furt mi vypluvne iba nazov uzivatela prihlaseho na masine, z ktorej spustim
program. Mna napadlo zatial iba toto riesenie - poslat "klientovi" spravu na
kazdom pocitaci po sieti, "klient" zisti ake je meno prihlaseneho uzivatela
a ak sa prihlaseny uzivatel zhoduje, sprava sa mu zobrazi. Alebo vyuzit
finger service,
Nenapada niekoho z Vas nieco lepsie? Za kazdy napad vrele diky.
D4C/S, W98US SE
Jano
IBTransaction
[*] Karol Zaic <zaic_karol(zv)novitech.sk> - 12.10.2000 13:54:12
Zdravim!
Zbytocnost transakcie pri SELECT -e jasne dokazuje neznalost funkcie SQL
serverov s databazou s logovanim,
t.j. s transakciami. SQL server v pripade pouzitia klauzule GROUP BY
automaticky vytvara transakciu aby mal vyber
s grupovanim vobec nejaky zmysel(musi dobehnut cely vyber aby mohol
grupovat).
Inac filozofia samostatnej komponenty IBTransaction je hlavne kvoli zapisom
do 2 a viac databaz:
BEGIN WORK
INSERT INTO databaza1(zv)server1:tabulka1 VALUES(...
INSERT INTO databaza2(zv)server2:tabulka2 VALUES(...
COMMIT WORK
kde server Interbase podporuje tzv. dualny commit. Pri pouziti BDE a
objektu TDatabase toto nikdy nebolo
mozne vyuzit a aj preto som vzdy client server verziu Delphi povazoval za
nepouzitelnu v pripade aplikacie beziacej
nad viacerymi databazami(nemusia byt nevyhnutne na 2 SQL serveroch). Takto
staci do TIBDataset nasekat
potrebnu postupnost SQL prikazov a naviazat na neho TIBTransaction a frci to
cez 2 servery ako hodinky.
Karol
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of David
Lebeda
Sent: Thursday, October 12, 2000 1:02 PM
To: delphi-l(zv)fwd(tec)cz
Subject: IBTransaction
Ahoj,
muzete mi prosim nekdo velmi strucne naznacit filosofii transakci v
IBExpress? Jde mi zejmena o rozdily v "dosavadnim" pristupu
(Database.StartTransaction, Database.Commit) a "novem" pristupu
- pouziti komponenty. Celkem me prekvapilo, ze transakci je treba
aktivovat i na select, kde mi to prijde zbytecne.
Dik.
David
Interbase
[*] Slavomir Tomascik <tomascik_slavomir(zv)vse.sk> - 12.10.2000 13:04:09
Zdar.
Skus value: USER_NAME - musi tam byt podtrzitko.
Slavo Tomascik
tomascik(zv)vse.sk
----- Original Message -----
From: "Libor Thiel" <thiel(zv)elapsh(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 12, 2000 10:17 AM
Subject: Interbase
> Prvne pouzivam databasi a uz jsem z toho jelen:
>
> Potrebuji vytvori dtb a tabulky za chodu - vytvoreni filu probehne OK, ale
> pri otevirani dtb mi vraci hlasku "DBP KONSTANT(0) IS UNKNOW" - co to
> znamena?
>
> ...
> begin
> if not FileExists(dbPrvni.DatabaseName) then
> dbPrvni.CreateDatabase;
>
> with dbCorsa do
> begin
> Params.Values['USER NAME'] := 'SYSDBA';
> Params.Values['PASSWORD'] := 'masterkey';
> LoginPrompt := False;
> Connected := True;
> end;
>
> ...
> end;
>
> L.
>
>Microsoft OLAP a Delphi
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 12.10.2000 14:15:58
> > nezkousel ste nekdo naimportovat Type Library Microsoft OLAP Sevices
> > do Delphi 5??? Me to nejde... :(
>
> Pre OLAP existuje ADO MD (ADO multi dimensional) rozhranie,
> ktore sa da importovat z type library.
>
> Erik Salaj, WINSOFT
Hmmm, pres tohle ale muzu posilat jen dotazy na kostky (aspon si to
myslim), ale ja potrebuju napred stahnout i definice dimenzi (jejich
elementy apod.) a kostek a na to potrebuju naimportovat "Microsoft
Decision Support Objects" (a to mi prave nejde), nebo ne?
Diky, Petr Fischer
CZ svatky
[*] Ladislav B�RTA <bartal(zv)vfu(tec)cz> - 12.10.2000 14:32:22
Nasel jsem soubor se seznamem svatku a dnu. Mate-li nekdo zajem .... (bud
cele v text. podobe, nebo je datum jako cislo - tedy mam 2 ruzne soubory)
LADIS
----- Original Message -----
From: "Ko��tkov� Jolana" <kotatko(zv)nym.pvt(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 12, 2000 11:18 AM
Subject: RE: CZ svatky
Kdysi jsem takovou databazi mela pod FoxPro 2.0 v PCLatin2. Kdyz prohrabnu
archiv, mozna to najdu. Mate-li zajem, napiste na moji adresu.
Kotatkova
-----P�vodn� zpr�va-----
Od: Jiri Kral [mailto:admin(zv)printo(tec)cz]
Odesl�no: 12. ��jna 2000 9:56
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: CZ svatky
Vazeni kolegove, nevite nekdo kde by se dal stahnout (nejaky
dBovatelny)seznam ceskych svatku (krestni jmeno + datum) ?
diky
JK
Cislo chyby
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 12.10.2000 14:40:44
On 12 Oct 2000, at 9:23, Branislav Zaujec wrote:
> neviem prist na to, ako sa da dostat do Delphi cislo chyby po spadnuti
> SQL prikazu. Standardne to vracia iba text. Neviete mi s tym niekto
> pomoct ?
To je docela problem, kdyz ani neuvadis, k jake databazi a pres
pres jaky stroj k ni pristupujes.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
HTML +Delphi5
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 12.10.2000 15:53:43
> No ja sem to taky moc dobre nepochopil, ale jestli chces to,
> co ti radi
> Lubos, tak nemusis delat zadnej browser, ale staci kratkej programek,
> kterej ti spusti trebas MSexplorer (ten muze byt klidne
> vypalenej i na tom cd
> aby se zarucilo, ze ho kazdej bude mit) a v ty aplikaci otevres uvodni
> html soubor pocitam index.htm a udelas to asi takhle.
>
no, ale to by si najprv kazdy musel ten Explorer nainstalovat
(ak ho nema).
/LH
HTML +Delphi5
[*] -=Ivomir=- <Ivomir(zv)seznam(tec)cz> - 12.10.2000 15:59:37
> > No ja sem to taky moc dobre nepochopil, ale jestli chces to,
> > co ti radi
> > Lubos, tak nemusis delat zadnej browser, ale staci kratkej programek,
> > kterej ti spusti trebas MSexplorer (ten muze byt klidne
> > vypalenej i na tom cd
> > aby se zarucilo, ze ho kazdej bude mit) a v ty aplikaci otevres uvodni
> > html soubor pocitam index.htm a udelas to asi takhle.
> >
> no, ale to by si najprv kazdy musel ten Explorer nainstalovat
> (ak ho nema).
Vlastne mas pravdu, ale kdyz uz delas soft pod winy, tak mi rekni, kdo dneska
tam nema nainstalovanej Explorer. :o)
....... s pozdravem Ivomir
--------------------------------------------------
EMAIL: Ivomir(zv)seznam(tec)cz MOBIL: 0602/831270
WWW: http://iwebs.upol(tec)cz ICQ: 28872917
Jak zjistit seriove cislo disku ?
[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 12.10.2000 16:55:26
Zdravim delphini. Nevite nekdo, jak zjistit seriove cislo disku? Konkretne se mi jedna o s.c. diskety.Chci jej precist pri instalaci, abych zabranil kopirovani orog. disket. Kdyz to bude fungovat i pro CD, nebudu se zlobit. Jestli nekdo mate dalsi zajimave napady, jak zabranit "nelegalnimu sireni vlastniho software", tak je s radosti uvitam. (Kolega zacina programovat a zacina jako kazdy mladoch s hesly a kody a tak pod... :-))
Diky z apomoc...
Peta
HTML +Delphi5
[*] �ejka Jan <Jan.Cejka(zv)merlin(tec)cz> - 12.10.2000 16:58:56
> -----P�vodn� zpr�va-----
> Od: -=Ivomir=- [mailto:Ivomir(zv)seznam(tec)cz]
> Odesl�no: 12. ��jna 2000 16:00
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: HTML +Delphi5
>
> Vlastne mas pravdu, ale kdyz uz delas soft pod winy, tak mi
> rekni, kdo dneska
> tam nema nainstalovanej Explorer. :o)
>
> ....... s pozdravem Ivomir
> --------------------------------------------------
> EMAIL: Ivomir(zv)seznam(tec)cz MOBIL: 0602/831270
> WWW: http://iwebs.upol(tec)cz ICQ: 28872917
Najdou se i takovi zvrhlici :-)
Ale ti tam maj zase treba netskejpa ... nebo co
Ekvalizer
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 12.10.2000 17:22:26
>> Nevedel by nekdo, jak udelat jednoduchej ekvalizer (nebo jak se tomu
nadava)
>> ve Windows?
> Muzes pouzit hodnoty, ktere ti poskytuje mixer tve zvukovky
> Obavam se, ze nemuzes zobrazovat signal, ktery sam neprehravas, pokud si
nenapises
> prostrednika mezi aplikacema a hardwarem... to plati pro vystup, pro vstup
to
> samozrejme mozne je.
To bych zase presne potreboval ja. Zjistovat intenzitu zvuku "kominek" pro
wav, ktery si sam z aplikace spustim a rovnez "kominek" urovne zvuku
nahravaneho uzivatelem v me aplikaci pomoci TMediaPlayer. Nechci pouzivat
komponenty tretich stran. Nevite nekdo jak na to?
Diky.Microsoft OLAP a Delphi
[*] Erik Salaj <winsoft(zv)napri.sk> - 12.10.2000 17:47:58
> > Pre OLAP existuje ADO MD (ADO multi dimensional) rozhranie,
> > ktore sa da importovat z type library.
>
> Hmmm, pres tohle ale muzu posilat jen dotazy na kostky (aspon si to
> myslim), ale ja potrebuju napred stahnout i definice dimenzi (jejich
> elementy apod.) a kostek a na to potrebuju naimportovat "Microsoft
> Decision Support Objects" (a to mi prave nejde), nebo ne?
ADO MD obsahuje objekty Dimension, Hierarchy, Level, Axis, atd.
takze by nemal byt problem.
Erik Salaj, WINSOFT
Ikony aplikac� v RxMenu
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 12.10.2000 18:11:13
Cauec,
V menu, kde pouzivam Rx komponentu TRxPopupMenu, nacitam nazev souboru a
chci vedle nej zobrazit ikonu. Viz demo k Rx.
sice jsem se tu v historii docetl, ze se vytahuji male ikony 16x16, ale
nektere (nebo spis vetsina) aplikaci, ktere se mi zobrazuji v menu, ma vsak
jen ikony 32x32. Potreboval bych ji zmensit na 16x16. Kdyz to vsak provedu
viz nize, pise mi to, ze nemohu menit velikost ikony (Cannot change the size
of an icon). Muze mi nekdo poradit, jak je zmensit ?
Dik Bye Ludan
procedure TForm1.mmGetItemParams(Sender: TMenu; Item: TMenuItem;
State: TMenuOwnerDrawState; AFont: TFont; var Color: TColor;
var Graphic: TGraphic; var NumGlyphs: Integer);
begin
Image1.Picture.Icon.Handle:=ExtractIcon(HInstance,PChar(Item.Hint), 0);
// Item.Hint = soubor s cestou
Graphic := Image1.Picture.Icon;
Graphic.Width := 16;
Graphic.Height := 16;
end;
Ekvalizer
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 12.10.2000 19:38:10
> To bych zase presne potreboval ja. Zjistovat intenzitu zvuku "kominek" pro
> wav, ktery si sam z aplikace spustim a rovnez "kominek" urovne zvuku
> nahravaneho uzivatelem v me aplikaci pomoci TMediaPlayer. Nechci pouzivat
> komponenty tretich stran. Nevite nekdo jak na to?
Myslim, ze tady z TMediaPlayer asi neuspejes, nejlepsi bude pouzit low level API
funkce pro WaveOut/In /v MS MM Helpu najdes popis, priklad najdes na Torry, nebo
muzu poslat kousek kodu pro prehravani/.
Roman
Podrobnejsi mapa CR
[*] Jirka Virt <virt(zv)volny(tec)cz> - 12.10.2000 19:58:58
Ahoj vsem,
nemel by nekdo po ruce mapu CR, ale podrobnejsi nez je v Excelu.Tam jeden bod
je okres.Jde mi alespon o mapu vychodnich Cech.
Diky i za odkazy
Jirka Virt
email: virt(zv)volny(tec)cz
BDEInst.DLL
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 12.10.2000 20:23:32
Ahoj
existuje nejaka moznost jak provest tichou instalaci BDE pomoci BDEInst.DLL
bez potvrzovacich
dialogu ?
S pozdravem Heinisch Jiri
Problem s TTimerem
[*] Jan Najv�rek <najvarek(zv)seznam(tec)cz> - 12.10.2000 20:24:29
Mam takovy problem:
Aplikace ma TTimer na 1s coz spousti nejake podpurne funkce jako napr. zapis udalosti "Novy den" do historie.
Aplikaca ma take druhe vlakno(thread) cile komunikujici s COM portem, ale zase ne tak, aby byla aplikace zahlcena.
Co se obcas u zakaznika stava, ze nas timer najednou prestane fungovat na par hodin a pak se znovu rozjede. Vi nekdo, proc??
Diky
Honza Najvarek
ADONIS
[*] Delphi Newsgroup <DELPHI(zv)wsc(tec)cz> - 12.10.2000 21:26:27
Cht�l jsem se zeptat, jestli existuje n�jak� trial verze ADONIS komponent,
pop�. jak� jsou licen�n� a cenov� podm�nky. (D5)
Michal HAMPL
Datab�ze Accessu
[*] delphi <korindelphi(zv)atlas(tec)cz> - 12.10.2000 22:23:25
Po��d to nejde... vyzkou�el jsem v�echno, co jste mi poradily, ale po��d se
nem��u p�ipojit na accessovskou datab�zi *.mdb... m��ete to n�kdo pls. po��d
n� vyzkou�et a poslat mi ��st progr�mku??? d�ky
Ivan �varc
>
>
> >to po m� cht�lo login do datab�ze.... jm�no a heslo.... ale j�
> >u t� datab�ze ��dn� jm�no ani heslo nem�m.... v accessu jde otev��t v
> pohod�.... zkou�el jsem snad >v�echny jm�na a hesla, co m� napadly, ale ne
usp�l
> jsem.
> >Mo�n� exisuje n�jak� standartn� heslo a jm�no.
>
> Kdyz jsem lezl do accessovskych databazi pres DB Explorer, delalo mi to to
> same...
> Proste jsem nechal obe polozky prazdne a dal OK ;)
>
> -------------------------------
> Pavel Stingl
> mailto: stingp1.eti(zv)mail.cez(tec)cz
> -------------------------------
CZ svatky
[*] L.Svoboda <svoboda(zv)fdsystem(tec)cz> - 12.10.2000 23:29:18
Posilam v CSV
L.S.
----- Original Message -----
From: Tom� Vlad�k <tom.vladik(zv)swadvice(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, October 12, 2000 2:20 PM
Subject: RE: CZ svatky
> Mam zajem, prosim pekne.
>
> Dik
>
> Tom
>
>
>
1;1;1;"Nov� rok"
2;2;1;"Karina"
3;3;1;"Radmila"
4;4;1;"Diana"
5;5;1;"Dalimil"
6;6;1;"T�i kr�lov�"
7;7;1;"Vilma"
8;8;1;"�estm�r"
9;9;1;"Vladan"
10;10;1;"B�etislav"
11;11;1;"Bohdana"
12;12;1;"Pravoslav"
13;13;1;"Edita"
14;14;1;"Radovan"
15;15;1;"Alice"
16;16;1;"Ctirad"
17;17;1;"Drahoslav"
18;18;1;"Vladislav"
19;19;1;"Doubravka"
20;20;1;"Ilona"
21;21;1;"B�la"
22;22;1;"Slavom�r"
23;23;1;"Zden�k"
24;24;1;"Milena"
25;25;1;"Milo�"
26;26;1;"Zora"
27;27;1;"Ingrid"
28;28;1;"Ot�lie"
29;29;1;"Zdislava"
30;30;1;"Robin"
31;31;1;"Marika"
32;1;2;"Hynek"
33;2;2;"Nela"
34;3;2;"Bla�ej"
35;4;2;"Jarmila"
36;5;2;"Dobromila"
37;6;2;"Vanda"
38;7;2;"Veronika"
39;8;2;"Milada"
40;9;2;"Apolena"
41;10;2;"Mojm�r"
42;11;2;"Bo�ena"
43;12;2;"Slav�na"
44;13;2;"V�nceslav"
45;14;2;"Valent�n"
46;15;2;"Ji�ina"
47;16;2;"Ljuba"
48;17;2;"Miloslav"
49;18;2;"Gizela"
50;19;2;"Patrik"
51;20;2;"Old�ich"
52;21;2;"Lenka"
53;22;2;"Petr"
54;23;2;"Svatopluk"
55;24;2;"Mat�j"
56;25;2;"Liliana"
57;26;2;"Dorota"
58;27;2;"Alexandr"
59;28;2;"Lum�r"
60;1;3;"Bed�ich"
61;2;3;"Ane�ka"
62;3;3;"Kamil"
63;4;3;"Stela"
64;5;3;"Kazim�r"
65;6;3;"Miroslav"
66;7;3;"Tom�"
67;8;3;"Gabriela"
68;9;3;"Franti�ka"
69;10;3;"Viktorie"
70;11;3;"And�la"
71;12;3;"�eho�"
72;13;3;"R��ena"
73;14;3;"R�t/Matylda"
74;15;3;"Ida"
75;16;3;"Elena/Herbert"
76;17;3;"Vlastimil"
77;18;3;"Eduard"
78;19;3;"Josef"
79;20;3;"Sv�tlana"
80;21;3;"Radek"
81;22;3;"Leona"
82;23;3;"Ivona"
83;24;3;"Gabriel"
84;25;3;"Mari�n"
85;26;3;"Emanuel"
86;27;3;"Dita"
87;28;3;"So�a"
88;29;3;"Ta��na"
89;30;3;"Arno�t"
90;31;3;"Kvido"
91;1;4;"Hugo"
92;2;4;"Erika"
93;3;4;"Richard"
94;4;4;"Ivana"
95;5;4;"Miroslava"
96;6;4;"Vendula"
97;7;4;"He�man/Herm�na"
98;8;4;"Ema"
99;9;4;"Du�an"
100;10;4;"Darja"
101;11;4;"Izabela"
102;12;4;"Julius"
103;13;4;"Ale�"
104;14;4;"Vincenc"
105;15;4;"Anast�zie"
106;16;4;"Irena"
107;17;4;"Rudolf"
108;18;4;"Val�rie"
109;19;4;"Rostislav"
110;20;4;"Marcela"
111;21;4;"Alexandra"
112;22;4;"Ev�enie"
113;23;4;"Vojt�ch"
114;24;4;"Ji��"
115;25;4;"Marek"
116;26;4;"Oto"
117;27;4;"Jaroslav"
118;28;4;"Vlastislav"
119;29;4;"Robert"
120;30;4;"Blahoslav"
121;1;5;"Sv�tek pr�ce"
122;2;5;"Zikmund"
123;3;5;"Alexej"
124;4;5;"Kv�toslav"
125;5;5;"Klaudie"
126;6;5;"Radoslav"
127;7;5;"Stanislav"
128;8;5;"St�tn� sv�tek"
129;9;5;"Ctibor"
130;10;5;"Bla�ena"
131;11;5;"Svatava"
132;12;5;"Pankr�c"
133;13;5;"Serv�c"
134;14;5;"Bonif�c"
135;15;5;"�ofie"
136;16;5;"P�emysl"
137;17;5;"Aneta"
138;18;5;"Nata�a"
139;19;5;"Ivo"
140;20;5;"Zby�ek"
141;21;5;"Monika"
142;22;5;"Emil"
143;23;5;"Vladim�r"
144;24;5;"Jana"
145;25;5;"Viola"
146;26;5;"Filip"
147;27;5;"Valdemar"
148;28;5;"Vil�m"
149;29;5;"Maxmili�n"
150;30;5;"Ferdinand"
151;31;5;"Kamila"
152;1;6;"Laura"
153;2;6;"Jarmil"
154;3;6;"Tamara"
155;4;6;"Dalibor"
156;5;6;"Dobroslav"
157;6;6;"Norbert"
158;7;6;"Iveta"
159;8;6;"Medard"
160;9;6;"Stanislava"
161;10;6;"Gita"
162;11;6;"Bruno"
163;12;6;"Antonie"
164;13;6;"Anton�n"
165;14;6;"Roland"
166;15;6;"V�t"
167;16;6;"Zbyn�k"
168;17;6;"Adolf"
169;18;6;"Milan"
170;19;6;"Leo�"
171;20;6;"Kv�ta"
172;21;6;"Alois"
173;22;6;"Pavla"
174;23;6;"Zde�ka"
175;24;6;"Jan"
176;25;6;"Ivan"
177;26;6;"Adriana"
178;27;6;"Ladislav"
179;28;6;"Lubom�r"
180;29;6;"Petr a Pavel"
181;30;6;"��rka"
182;1;7;"Jaroslava"
183;2;7;"Patricie"
184;3;7;"Radom�r"
185;4;7;"Prokop"
186;5;7;"St�tn� sv�tek"
187;6;7;"St�tn� sv�tek"
188;7;7;"Bohuslava"
189;8;7;"Nora"
190;9;7;"Drahoslava"
191;10;7;"Libu�e/Am�lie"
192;11;7;"Olga"
193;12;7;"Bo�ek"
194;13;7;"Mark�ta"
195;14;7;"Karol�na"
196;15;7;"Jind�ich"
197;16;7;"Lubo�"
198;17;7;"Martina"
199;18;7;"Drahom�ra"
200;19;7;"�en�k"
201;20;7;"Ilja"
202;21;7;"V�t�zslav"
203;22;7;"Magdal�na"
204;23;7;"Libor"
205;24;7;"Krist�na"
206;25;7;"Jakub"
207;26;7;"Anna"
208;27;7;"V�roslav"
209;28;7;"Viktor"
210;29;7;"Marta"
211;30;7;"Bo�ivoj"
212;31;7;"Ign�c"
213;1;8;"Oskar"
214;2;8;"Gustav"
215;3;8;"Milu�e"
216;4;8;"Dominik"
217;5;8;"Kristi�n"
218;6;8;"Old�i�ka"
219;7;8;"Lada"
220;8;8;"Sob�slav"
221;9;8;"Roman"
222;10;8;"Vav�inec"
223;11;8;"Zuzana"
224;12;8;"Kl�ra"
225;13;8;"Alena"
226;14;8;"Alan"
227;15;8;"Hana"
228;16;8;"J�chym"
229;17;8;"Petra"
230;18;8;"Helena"
231;19;8;"Ludv�k"
232;20;8;"Bernard"
233;21;8;"Johana"
234;22;8;"Bohuslav"
235;23;8;"Sandra"
236;24;8;"Bartolom�j"
237;25;8;"Radim"
238;26;8;"Lud�k"
239;27;8;"Otakar"
240;28;8;"August�n"
241;29;8;"Evel�na"
242;30;8;"Vlad�na"
243;31;8;"Pavl�na"
244;1;9;"Linda/Samuel"
245;2;9;"Ad�la"
246;3;9;"Bronislav"
247;4;9;"Jind�i�ka"
248;5;9;"Boris"
249;6;9;"Boleslav"
250;7;9;"Regina"
251;8;9;"Mariana"
252;9;9;"Daniela"
253;10;9;"Irma"
254;11;9;"Denisa"
255;12;9;"Marie"
256;13;9;"Lubor"
257;14;9;"Radka"
258;15;9;"Jolana"
259;16;9;"Ludmila"
260;17;9;"Nad�da"
261;18;9;"Kry�tof"
262;19;9;"Zita"
263;20;9;"Oleg"
264;21;9;"Matou�"
265;22;9;"Darina"
266;23;9;"Berta"
267;24;9;"Jarom�r"
268;25;9;"Zlata"
269;26;9;"Andrea"
270;27;9;"Jon�"
271;28;9;"V�clav"
272;29;9;"Michal"
273;30;9;"Jeron�m"
274;1;10;"Igor"
275;2;10;"Ol�vie"
276;3;10;"Bohumil"
277;4;10;"Franti�ek"
278;5;10;"Eli�ka"
279;6;10;"Hanu�"
280;7;10;"Just�na"
281;8;10;"V�ra"
282;9;10;"�tefan"
283;10;10;"Marina"
284;11;10;"Andrej"
285;12;10;"Marcel"
286;13;10;"Ren�ta"
287;14;10;"Ag�ta"
288;15;10;"Tereza"
289;16;10;"Havel"
290;17;10;"Hedvika"
291;18;10;"Luk�"
292;19;10;"Michaela"
293;20;10;"Vendel�n"
294;21;10;"Brigita"
295;22;10;"Sabina"
296;23;10;"Teodor"
297;24;10;"Nina"
298;25;10;"Be�ta"
299;26;10;"Erika"
300;27;10;"�arlota/Zoe"
301;28;10;"St�tn� sv�tek"
302;29;10;"Silvie"
303;30;10;"Tade�"
304;31;10;"�t�p�nka"
305;1;11;"Felix"
306;2;11;"Pam�tka zesnul�ch"
307;3;11;"Hubert"
308;4;11;"Karel"
309;5;11;"Miriam"
310;6;11;"Lib�na"
311;7;11;"Saskie"
312;8;11;"Bohum�r"
313;9;11;"Bohdan"
314;10;11;"Ev�en"
315;11;11;"Martin"
316;12;11;"Benedikt"
317;13;11;"Tibor"
318;14;11;"S�va"
319;15;11;"Leopold"
320;16;11;"Otmar"
321;17;11;"Mahulena"
322;18;11;"Romana"
323;19;11;"Al�b�ta"
324;20;11;"Nikola"
325;21;11;"Albert"
326;22;11;"Cec�lie"
327;23;11;"Klement"
328;24;11;"Em�lie"
329;25;11;"Kate�ina"
330;26;11;"Artur"
331;27;11;"Xenie"
332;28;11;"Ren�"
333;29;11;"Zina"
334;30;11;"Ond�ej"
335;1;12;"Iva"
336;2;12;"Blanka"
337;3;12;"Svatoslav"
338;4;12;"Barbora"
339;5;12;"Jitka"
340;6;12;"Mikul�"
341;7;12;"Ambro�"
342;8;12;"Kv�toslava"
343;9;12;"Vratislav"
344;10;12;"Julie"
345;11;12;"Dana"
346;12;12;"Simona"
347;13;12;"Lucie"
348;14;12;"L�die"
349;15;12;"Radana"
350;16;12;"Alb�na"
351;17;12;"Daniel"
352;18;12;"Miloslav"
353;19;12;"Ester"
354;20;12;"Dagmar"
355;21;12;"Nat�lie"
356;22;12;"�imon"
357;23;12;"Vlasta"
358;24;12;"Adam a Eva"
359;25;12;"Bo�� hod v�no�n�"
360;26;12;"�t�p�n"
361;27;12;"�aneta"
362;28;12;"Bohumila"
363;29;12;"Judita"
364;30;12;"David"
365;31;12;"Silvestr"D5 a Oracle 8
[*] Tomas Kucera <Tomas.Kucera(zv)matsushita(tec)cz> - 13.10.2000 06:58:34
Zdravim vsechny " Delfiny " !!!
Nenasel by se nekdo, kdo by mi dokazal popsat jak co nejlepe pretahovat
data z tabulky nebo libovolneho Gridu v D5 Prof. do tabulky v Oracle 8 ?
Velmi by mne pomohlo trochu podrobnejsi vysvetleni, nebot v teto oblasti
nemam zadnou zkusenost.
Predem dekuji za vsechny reakce tykajici se me prosby.
Tomas
Tomas Kucera
tomas.kucera(zv)matsushita(tec)cz
Matsushita Television Central Europe
Information Technology Department
+420 19 7415260
Cislo chyby
[*] Ren� Otisk - 13.10.2000 07:41:50
Hi,
Ja to resim jen u stored procedure. V nich mam za kazdou akci:
IF (zv)ERROR <> 0
BEGIN
ROLLBACK
RETURN((zv)ERROR)
END
A v navratove hodnote pak jest ona ciselna reprezentace chyby
Sroub
> Zdravim,
> neviem prist na to, ako sa da dostat do Delphi cislo chyby po spadnuti
> SQL prikazu. Standardne to vracia iba text.
> Neviete mi s tym niekto pomoct ?
>
> Diky
>
>
>
> S pozdravom
> Zaujec
OT:Kotouce v krabici
[*] Delphi <delphi(zv)aitix(tec)cz> - 13.10.2000 08:03:52
Ahoj,
lehce off-topic,
prosim nezna nekdo metodu pro vypocet optimalniho (maximalniho) poctu valcu
v definovane krabici?
Proste mam valec znamych rozmeru a potrebuju spocitat, kolik se jich vejde
do krabice (kvadr) urcenych rozmeru.
Nejaka metoda, algoritmus, odkaz na vedeckou praci "Kotouce v krabici" ?
Diky.
L
PS: jestli to prislo dvakrat, tak se omlouvam
Problem s TTimerem
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 13.10.2000 09:06:04
Timer nekdy prestava chodit (napriklad kdyz chytnes okno za horni listu), tak jsem to vyresil
pomocnym threadem, ktery ma v execute sleep a synchronize.
while not terninated do begin
sleep(1000);
synchronize(Form452.DoTimer);
end;
Toto mi funguje celkem spolehlive.
Na thread timer mam komponentu, pokud mas zajem, tak se ozvi.
Slavek
>
> Mam takovy problem:
>
> Aplikace ma TTimer na 1s coz spousti nejake podpurne funkce jako napr. zapis udalosti "Novy den" do historie.
> Aplikaca ma take druhe vlakno(thread) cile komunikujici s COM portem, ale zase ne tak, aby byla aplikace zahlcena.
>
> Co se obcas u zakaznika stava, ze nas timer najednou prestane fungovat na par hodin a pak se znovu rozjede. Vi nekdo, proc??
>
> Diky
>
> Honza Najvarek
IB6: Jak spustit server po instalaci?
[*] Ota Maly <maly(zv)space(tec)cz> - 13.10.2000 09:10:27
Ahoj,
Po instalaci InterBase pomoci TIBInstall se mi ten server nespusti. Muzu ho
spustit pomoci ibguard.exe, ale to mi nejak nefunguje na WinNT,
server se proste nespusti.
Jedna se o to, ze na WinNT to chci spustit jako service, a na Win9x jako
aplikaci.
Nevite nekdo, jak spustit ten server po instalaci?
Samozrejme programove..
Zjistil jsem nasledujici:
- IB manager (ktery dela presne to co chci) je ibmgr.cpl soubor, ten lze v
pohode spustit (pravdepodobne se jedna jen o prejmenovany exe, ale to je jen
moje domnenka - cpl jsou vsechny spustitelne ikony v Ovladacich panelech).
Tohle by sice bylo dobre reseni, ale jak mam zjistit, kde se ty soubory
nachazeji, ve WinNT to je <WINDIR>\system32\ibmgr.cpl, ale kde to je ve
Win9x?
- V IBExpress komponentach se mi to take nepodarilo rozchodit, je tam sice
ServiceStart (myslim, ze u IBConfigService), ale ten se mi nepodarilo
smysluplne rozchodit.
Predem diky
Ota Maly
PaPouch elektronika
http://www.pap-el(tec)cz
Prehravani WAV souboru
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 13.10.2000 09:20:39
Ahoj,
narazil jsem na problem (nehraje to) pri prehravani WAV souboru jineho typu
nez WAVE_FORMAT_PCM (neboli wFormatTag <> WAVE_FORMAT_PCM). Prehravam je
pomoci waveOut kvuli moznosti rizeni rychlosti prehravani. MediaPlayer z
Woken je schopen tento format prehrat. Mate s tim nekdo nejake zkusenosti ?
Jde o WAVy nahrane digitalnim zaznamnikem dodavanym s ISDN linkou...
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Trideni CH v Interbase
[*] Karel B�ich��� - 13.10.2000 09:24:00
> > z vlastnich testu i prispevku v archivu jsem overil, ze IB 6 netridi
> > korektne cesky, presneji ze nezatridi CH mezi H a I.
> > Je to dost problem pri nasazeni v IS, jak to resite vy?
>
> http://web.redbox(tec)cz/brichna/ib_trid_ch.html . Pod Windows mi to zatim
> funguje. Pro Linux jsem to zatim nekompiloval.
Tak jsem se pokusil tu knihovnu zkompilovat i pro Linux. Vysledek jsem
ulozil na vyse uvedenou adresu. Nemel jsem moc casu to zkouset, ale na prvni
pohled to vypada, ze to funguje. Jestli to nekdo budete zkouset, dejte mi
vedet, jak to dopadlo.
Brichna
P.S. opet se jedna pouze o zmenu trideni CH na WIN1250/PXW_CSY. Trideni
pismen s hackem a carkou jsem ponechal beze zmeny.Problemy s IBSecurityService na lokalni server
[*] Pavel Bare� <bares(zv)atoll(tec)cz> - 13.10.2000 10:17:13
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
Mam nasledujici broblem:
Pri pripojeni pomoci IBSecurityService k lokalnimu serveru (protokol Local) dostanu chybovou hlasku "Server name mising"
pokud to dobre chapu pokud se pripojuji lokalne tak neni potreba zadavat jmeno serveru, coz potvrzuje i to, ze v rezimu navrhu se to normalne pripoji
Zreje jde tedy o chybu komponenty IBSecurityService.
Nevite nekdo jak to vyresit.
Jmeno serveru zadat nelze proto, ze je kvuli tomu nutny zapis do SERVICES, ktery je v ruznych Win na ruznem miste a nevi jak to misto zjistit.
dekuji za radu moc to specha
Pavel Bares
Prehravani WAV souboru
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 13.10.2000 10:26:20
> narazil jsem na problem (nehraje to) pri prehravani WAV souboru
> jineho typu nez WAVE_FORMAT_PCM (neboli wFormatTag <>
> WAVE_FORMAT_PCM). Prehravam je pomoci waveOut kvuli
> moznosti rizeni rychlosti prehravani. MediaPlayer z Woken je
> schopen tento format prehrat. Mate s tim nekdo nejake zkusenosti ?
> Jde o WAVy nahrane digitalnim zaznamnikem dodavanym s ISDN
> linkou...
Musim pouzit MSACM, neboli audio codec manager. Prilozeny
kod je vystrizen z aplikace, ktera presne toto dela. Pozor vsak,
je to delano pro male soubory, ktere lze umistit do pameti !
Velke soubory se musi konvertovat po castech, viz dokumentace
MSACM.
Ahoj
Daniel
if acmStreamOpen(
has, // new stream handle
0, // handle of an ACM driver
FileFormat, // source format
(zv)FFormat, // destination format
Nil, // filtering operation
0, // callback
0, // user-instance data
0 // flags for opening
)<>MMSYSERR_NOERROR then Exit;
try
if acmStreamSize(
has, // handle of the conversion stream
FileDataSize, // size of the source buffer
ash.cbDstLength, // size of the destination buffer
ACM_STREAMSIZEF_SOURCE // flags
)<>MMSYSERR_NOERROR then Exit;
ash.cbStruct:=SizeOf(ash);
ash.fdwStatus:=0;
ash.pbSrc:=FileData;
ash.cbSrcLength:=FileDataSize;
GetMem(ash.pbDst,ash.cbDstLength);
try
ash.cbSrcLengthUsed:=FileDataSize;
ash.cbDstLengthUsed:=0;
if acmStreamPrepareHeader(
has, // handle of the conversion steam.
ash, // source and destination buffers
0 // reserved; must be zero
)<>MMSYSERR_NOERROR then Exit;
if acmStreamConvert(
has, // handle of the conversion steam.
ash, // source and destination buffers
0 // flags for doing the conversion
)<>MMSYSERR_NOERROR then Exit;
if acmStreamUnprepareHeader(
has, // handle of the conversion steam.
ash, // source and destination buffers
0 // reserved; must be zero
)<>MMSYSERR_NOERROR then Exit;
repeat
ReallocMem(FBuffer,FBufferSize+Integer(ash.cbDstLengthUsed));
buf:=Pointer(Integer(FBuffer)+FBufferSize);
Inc(FBufferSize,ash.cbDstLengthUsed);
Move(ash.pbDst^,buf^,ash.cbDstLengthUsed);
Dec(count);
until count<=0;
finally
FreeMem(ash.pbDst);
end;
finally
acmStreamClose(has,0);
end;
------------------------------------------------------
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added
Komunikace ActiveX komponenty s app. na web server
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 13.10.2000 10:43:13
Je nejak mozno z ActiveX komponenty, ktera "bezi" ve web browseru
komunikovat s aplikaci, ktera bezi na web serveru ? Nejvice by mi vyhovoval
DCOM. Jak se mam ale pripojit k te app na web serveru ? Za pripadne odpovedi
dekuji, pripadne by stacil i nejaky zajimavy link. Diky.
Ondrej Malecek
Prehravani WAV souboru
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 13.10.2000 10:49:07
Diky,
tohle me nenapadlo. Vyzkousim to.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> -----P�vodn� zpr�va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
> Daniel Rott
> Odesl�no: 13. ��jna 2000 10:26
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Prehravani WAV souboru
>
>
> > narazil jsem na problem (nehraje to) pri prehravani WAV souboru
> > jineho typu nez WAVE_FORMAT_PCM (neboli wFormatTag <>
> > WAVE_FORMAT_PCM). Prehravam je pomoci waveOut kvuli
> > moznosti rizeni rychlosti prehravani. MediaPlayer z Woken je
> > schopen tento format prehrat. Mate s tim nekdo nejake zkusenosti ?
> > Jde o WAVy nahrane digitalnim zaznamnikem dodavanym s ISDN
> > linkou...
>
> Musim pouzit MSACM, neboli audio codec manager. Prilozeny
> kod je vystrizen z aplikace, ktera presne toto dela. Pozor vsak,
> je to delano pro male soubory, ktere lze umistit do pameti !
> Velke soubory se musi konvertovat po castech, viz dokumentace
> MSACM.
>
> Ahoj
> Daniel
>
> if acmStreamOpen(
> has, // new stream handle
> 0, // handle of an ACM driver
> FileFormat, // source format
> (zv)FFormat, // destination format
> Nil, // filtering operation
> 0, // callback
> 0, // user-instance data
> 0 // flags for opening
> )<>MMSYSERR_NOERROR then Exit;
> try
> if acmStreamSize(
> has, // handle of the conversion stream
> FileDataSize, // size of the source buffer
> ash.cbDstLength, // size of the destination buffer
> ACM_STREAMSIZEF_SOURCE // flags
> )<>MMSYSERR_NOERROR then Exit;
> ash.cbStruct:=SizeOf(ash);
> ash.fdwStatus:=0;
> ash.pbSrc:=FileData;
> ash.cbSrcLength:=FileDataSize;
> GetMem(ash.pbDst,ash.cbDstLength);
> try
> ash.cbSrcLengthUsed:=FileDataSize;
> ash.cbDstLengthUsed:=0;
> if acmStreamPrepareHeader(
> has, // handle of the conversion steam.
> ash, // source and destination buffers
> 0 // reserved; must be zero
> )<>MMSYSERR_NOERROR then Exit;
> if acmStreamConvert(
> has, // handle of the conversion steam.
> ash, // source and destination buffers
> 0 // flags for doing the conversion
> )<>MMSYSERR_NOERROR then Exit;
> if acmStreamUnprepareHeader(
> has, // handle of the conversion steam.
> ash, // source and destination buffers
> 0 // reserved; must be zero
> )<>MMSYSERR_NOERROR then Exit;
> repeat
>
> ReallocMem(FBuffer,FBufferSize+Integer(ash.cbDstLengthUsed));
> buf:=Pointer(Integer(FBuffer)+FBufferSize);
> Inc(FBufferSize,ash.cbDstLengthUsed);
> Move(ash.pbDst^,buf^,ash.cbDstLengthUsed);
> Dec(count);
> until count<=0;
> finally
> FreeMem(ash.pbDst);
> end;
> finally
> acmStreamClose(has,0);
> end;
>
> ------------------------------------------------------
> Daniel Rott - roxton(zv)volny(tec)cz
> http://www.volny(tec)cz/roxton
> Some minor bugs/features fixed/added
>
>
Problemy s IBSecurityService na lokalni server
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 13.10.2000 11:32:28
Ahoj,
> Pavel Bare� wrote:
>
> Mam nasledujici broblem:
>
> Pri pripojeni pomoci IBSecurityService k lokalnimu serveru (protokol
> Local) dostanu chybovou hlasku "Server name mising"
> pokud to dobre chapu pokud se pripojuji lokalne tak neni potreba
> zadavat jmeno serveru, coz potvrzuje i to, ze v rezimu navrhu se to
> normalne pripoji
> Zreje jde tedy o chybu komponenty IBSecurityService.
>
> Nevite nekdo jak to vyresit.
> Jmeno serveru zadat nelze proto, ze je kvuli tomu nutny zapis do
> SERVICES, ktery je v ruznych Win na ruznem miste a nevi jak to misto
> zjistit.
>
> dekuji za radu moc to specha
zkus pouzit protokol TCP-IP a jmeno serveru "localhost"
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Frame
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 13.10.2000 11:36:41
Cau.
Stava sa vam tiez ze v D5, W98, W2000 pri praci s frame-ami ;-) sa chovaju
divne?:
- Ked urobim frame velky (800x600), ulozim, zavriem, tak pri znovuotvoreni
za jeho velkost zmeni na nejaku vychodziu???
- To iste urobi aj pozicia.
Nevie niekdo co s tym?
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
OT:Kotouce v krabici
[*] Miloslav Sk�cel <delphicz(zv)stereo(tec)cz> - 13.10.2000 11:56:52
Ahoj,
kdysi jsem to taky resil
1. valce se nahradi kvadry
2. nejmensi kvadr (valec) urcuje modul
(idealni je pokud ostatni valce jsou nasobky modulu)
3. prostor v krabici se rozdeli na moduly
4. metodou prohledavani stavoveho prostoru zkousis
do krabice strkat valce, obsazene moduly si poznacis
5. az vyzkousis vsechny moznosti muzes vybrat
tu optimalni
Je dobre udelat si funkci na vypocet casove narocnosti.
Nekdy neni treba probrat vsechny moznosti, staci
najit uspokojive usporadani valcu v krabici.
S pozdravem
Miloslav Skacel
skacel(zv)stereo(tec)cz
----- Original Message -----
From: "Delphi" <delphi(zv)aitix(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, October 13, 2000 8:03 AM
Subject: OT:Kotouce v krabici
> Ahoj,
> lehce off-topic,
> prosim nezna nekdo metodu pro vypocet optimalniho (maximalniho) poctu
valcu
> v definovane krabici?
> Proste mam valec znamych rozmeru a potrebuju spocitat, kolik se jich vejde
> do krabice (kvadr) urcenych rozmeru.
> Nejaka metoda, algoritmus, odkaz na vedeckou praci "Kotouce v krabici" ?
>
> Diky.
> L
> PS: jestli to prislo dvakrat, tak se omlouvam
>
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Prehravani WAV souboru
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 13.10.2000 12:04:14
No pokud se nejedna ciste o wave tak musite nastavit patricne parametry z
hlavicky toho souboru (musite si zjistit kodek kterym je ten dany soubor
zkomprimovan a precist a nastavit vsechny parametry pro waveformatex
strukturu - tato struktura vsak muze byt delsi nez je standartne definovana
a obsahovat dalsi informace potrebne pro dekomprimaci, ktere musite vlozit
na konec teto struktury).
tady je kousek meho kodu ke komponentam ktere jsem kdysi napsal.
fc.pwfx^.wFormatTag :=WAVE_FORMAT_PCM; //set the default format to PCM
tady si nastavis typ kodeku napr GSM nebo Fraunhofer atd..
fc.pwfx^.nChannels := 2; //stereo
fc.pwfx^.nSamplesPerSec := 22050;
fc.pwfx^.nAvgBytesPerSec:= 88200; { for buffer estimation
2(stereo)x22050x2(2bytes=16bit) }
fc.pwfx^.nBlockAlign:=4; { block size of data }
fc.pwfx^.wbitspersample := 16;
//extended header
fc.pwfx^.cbSize:=0; //the size of extra information after basic
header(wfx structure)
-----Original Message-----
From: Ji�� Foldyna [mailto:jiri.f(zv)avizo(tec)cz]
Sent: Friday, October 13, 2000 9:21 AM
To: 'Delphi konference'
Subject: Prehravani WAV souboru
Ahoj,
narazil jsem na problem (nehraje to) pri prehravani WAV souboru jineho typu
nez WAVE_FORMAT_PCM (neboli wFormatTag <> WAVE_FORMAT_PCM). Prehravam je
pomoci waveOut kvuli moznosti rizeni rychlosti prehravani. MediaPlayer z
Woken je schopen tento format prehrat. Mate s tim nekdo nejake zkusenosti ?
Jde o WAVy nahrane digitalnim zaznamnikem dodavanym s ISDN linkou...
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
CZ svatky - L. Svoboda
[*] Tom� Vlad�k������V��?���o�� - 13.10.2000 12:53:35
> -----Original Message-----
> L.Svoboda
> Sent: Thursday, October 12, 2000 11:29 PM
> Subject: Re: CZ svatky
>
>
> Posilam v CSV
> L.S.
A co chudak Horymir ? :-))
Komunikace ActiveX komponenty s app. na web server
[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 13.10.2000 13:31:03
Urcite by to slo pomoci http - napr. vlozit do activex komponenty komponentu NMHTTP (nebo jinou obdobnou) a komunikovat pres http. Ale patrne to pujde i nejak jinak.
-----P�vodn� zpr�va-----
Od: Ond�ej Male�ek [SMTP:ondrej.malecek(zv)radom-cz(tec)cz]
Odesl�no: 13. ��jna 2000 10:43
Komu: Delphi konference
P�edm�t: Komunikace ActiveX komponenty s app. na web serveru
Je nejak mozno z ActiveX komponenty, ktera "bezi" ve web browseru
komunikovat s aplikaci, ktera bezi na web serveru ? Nejvice by mi vyhovoval
DCOM. Jak se mam ale pripojit k te app na web serveru ? Za pripadne odpovedi
dekuji, pripadne by stacil i nejaky zajimavy link. Diky.
Ondrej Malecek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
IB6: Jak spustit server - upresneni
[*] Ota Maly <maly(zv)space(tec)cz> - 13.10.2000 13:56:09
Ahoj,
jeste jsem vystopoval jednu zajimavou vec.
Kdyz spustim ibguard.exe, tak chvili bezi (dle Task Manageru ve WinNT) a pak
se jednoduse ukonci. ibserver nenahodi a nic nezahlasi.
Pokud ho spustim s parametrem -a, tak se spusti v pohode jako aplikace.
Rozumite tomu nekdo? uz jsem z toho fousatej.. :(
Je tu nekdo, kdo uz se instalaci a spoustenim serveru IB zabyval?
WinNTSP5;IB6Ostra
S pozdravem
Ota Maly
PaPouch elektronika
http://www.pap-el(tec)cz
predchozi mail prikladam..
>
> Ahoj,
> Po instalaci InterBase pomoci TIBInstall se mi ten server
> nespusti. Muzu ho
> spustit pomoci ibguard.exe, ale to mi nejak nefunguje na WinNT,
> server se proste nespusti.
> Jedna se o to, ze na WinNT to chci spustit jako service, a na Win9x jako
> aplikaci.
> Nevite nekdo, jak spustit ten server po instalaci?
>
> Samozrejme programove..
> Zjistil jsem nasledujici:
>
> - IB manager (ktery dela presne to co chci) je ibmgr.cpl soubor,
> ten lze v
> pohode spustit (pravdepodobne se jedna jen o prejmenovany exe,
> ale to je jen
> moje domnenka - cpl jsou vsechny spustitelne ikony v Ovladacich panelech).
> Tohle by sice bylo dobre reseni, ale jak mam zjistit, kde se ty soubory
> nachazeji, ve WinNT to je <WINDIR>\system32\ibmgr.cpl, ale kde to je ve
> Win9x?
> - V IBExpress komponentach se mi to take nepodarilo rozchodit,
> je tam sice
> ServiceStart (myslim, ze u IBConfigService), ale ten se mi nepodarilo
> smysluplne rozchodit.
>
MS Code Page Translator
[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 13.10.2000 13:04:21
Zdravim
a mam dotaz. Pokousim se pristupovat k Paradoxu pres ODBC. Sehnal
jsem si ho sice, ale pokud pristupuji k tabulkam drive vytvorenym s
kodovanim CS Kamen, mam problemy s cestinou - nektere znaky jsou
spatne. V nastaveni ODBC se nabizi dva zpusoby odstranei meho
problemu:
prvni pomoci translace OEM to ANSi - to nepomuze (ale trochu to
situaci zlepsi)
druhy pomoci MS Code Translatoru. Zjistil jsem, ze se za tim schovava
knihovna MSCPXLT.DLL. Tu ale nemohu nikde sehnat! Nemate ji nekdo
resp. nevite o zdroji?
Dekuji
Milan Dvorak
dvorak(zv)gymzn(tec)cz
OT:Kotouce v krabici
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 13.10.2000 14:11:25
ahoj,
tak me napada, ze valce jze pokladat i do mezirady, coz u krabic nelze.
umoznito udelat vice vrstev (pokud je dost mista), coz dost rozsiri
kapacitu.
_ _
/ \ / \
_\_/_\_/_
/ \ / \ / \
\_/ \_/ \_/
doufam, ze to je jasne a ze se to nerozsypalo (kdyztak nejakej fixed
font...
dekuji
peca
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[ firemni mail smtp: palicka(zv)aginfo(tec)cz]
[pro konference: petr.palicka(zv)atlas(tec)cz]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
ZEMEDELSKA INZERCE ZDARMA www.aginfo(tec)cz
inzeraty zasilejte pisemne nebo e-mailem: inzerce(zv)aginfo(tec)cz
> -----Original Message-----
> From: Miloslav Sk�cel [mailto:delphicz(zv)stereo(tec)cz]
> Sent: Friday, October 13, 2000 11:57 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: OT:Kotouce v krabici
>
>
> Ahoj,
>
> kdysi jsem to taky resil
>
> 1. valce se nahradi kvadry
> 2. nejmensi kvadr (valec) urcuje modul
> (idealni je pokud ostatni valce jsou nasobky modulu)
> 3. prostor v krabici se rozdeli na moduly
> 4. metodou prohledavani stavoveho prostoru zkousis
> do krabice strkat valce, obsazene moduly si poznacis
> 5. az vyzkousis vsechny moznosti muzes vybrat
> tu optimalni
>
> Je dobre udelat si funkci na vypocet casove narocnosti.
> Nekdy neni treba probrat vsechny moznosti, staci
> najit uspokojive usporadani valcu v krabici.
>
> S pozdravem
> Miloslav Skacel
> skacel(zv)stereo(tec)cz
>
>
>
> ----- Original Message -----
> From: "Delphi" <delphi(zv)aitix(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Friday, October 13, 2000 8:03 AM
> Subject: OT:Kotouce v krabici
>
>
> > Ahoj,
> > lehce off-topic,
> > prosim nezna nekdo metodu pro vypocet optimalniho
> (maximalniho) poctu
> valcu
> > v definovane krabici?
> > Proste mam valec znamych rozmeru a potrebuju spocitat,
> kolik se jich vejde
> > do krabice (kvadr) urcenych rozmeru.
> > Nejaka metoda, algoritmus, odkaz na vedeckou praci "Kotouce
> v krabici" ?
> >
> > Diky.
> > L
> > PS: jestli to prislo dvakrat, tak se omlouvam
> >
> >
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
>
> InstallShield+BDE
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 13.10.2000 14:34:53
Zdravim vsechny,
pouzivam Delphi 3 prof. a k tomu InstallShieldExpress ver 1.11. Tedy verze, ktera je soucasti baliku Delphi. K behu programu potrebuji BDE. Vytvoreni instalace je OK. I instalace samotna je vetsinou vporadku. Ale jsou bohuzel i vyjimky. Tu prvni bych jeste pochopil. Na pocitaci je nainstalovany jiz jiny program, ktery pouziva BDE. A toto BDE je novejsi, nez to z me instalace. Druha vec je pro mne uz trochu mene pochopitelna. Instalace probehne cela vporadku, ale na konci se objevi hlaseni, ze neni neco v poradku se souborem idapi32.cnf.
Neporadil by mi nekdo, co s temito problemy?
Predem dekuji za vesechny odpovedi.
Mirek Drejcek.
TAction
[*] Bab�k Martin (+42035620,MUS a.s. M.Babik) <M.Babik(zv)mus(tec)cz> - ct 2000 13:53:45
Zdravim programatory a programatorky zvlast!
Nevite jak zajistit aby v okenku se seznamem akci (Edit ActionL), byly videt c
ele nazvy akce a ne jen asi 8 znaku a tri tecky? Mam jich vic co se jmenuji ob
dobne a je to trosku neprehledne. :-( Diky
M&B
Ekvalizer
[*] Hurricane <hurricane(zv)email(tec)cz> - 13.10.2000 15:35:40
Zdravim
V knizce Vyuziti rozhranni PC pod Windows je m.j. osciloskop, kterej snima
vstup do zvukovky. Pokud se trochu zaobirate programovanim okolo portu,
doporucuji koupit (vydavatelstvi HEL, 198Kc). Nebo muzu poslat ten
osciloskop i se zdrojaky (D3).
Hurricane
ComboBox
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 13.10.2000 15:48:37
Zdravim,
uplne se za tuto otazku stydim, ale opravdu nevim co s tim. Predpokladam, ze reseni bude jednoduche (ale prijit na odpoved, porad nemuzu)
Style ComboBoxu mam nastaven na csDropDownList. Potreboval bych ovsem nastavit hodnotu text programove. Jednoduche prirazeni text:='abc' totiz nefunguje.
Nevite co s tim?
Predem diky za odpoved.
Mirek Drejcek.
Problemy s DBGridem (asi)
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 13.10.2000 16:29:49
Ahoj, pouzivam D5, IB6, TIBQuery.TDBGrid
Pokud se zobrazi napr. 100 zaznamu a uzivatel zmackne tlacitko
refresh, ktere dela
1.getbookmark
2.close;
3.open
4.gotobookmark
5.freebookmark
tak ve funguje jak ma az do okamziku nez stoji uzivatel pred
stiskem tlacitka na rekordu ktery je jiz dal, takze se prvnich par
rekordu uz nezobrazuje. Napr. v gridu je zorazeno 20rekordu a
uzivatel je na rekordu 45. V tomto pripade se stane naprosto
systematicky to, ze record c. 46 zmizne. ( pokud ze sekvence
prikazu odstranim bod 4. gotobookmark tak vse funguje, ale musi
si uzivatel najit kde byl sam.
Netusite nekdo prosim co s tim.
2. Pripominam jeste problem s pouzitim kolecka na mysi, zkuste
si to a to v DBGridu dela primo psi kusy,
Dekuji za brzke reseni.
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
InstallShield+BDE
[*] MUDr.Neuzil <drneuzil(zv)razdva(tec)cz> - 13.10.2000 16:46:48
Jo rad, napis na soukr.mail, jakmile ho dostanu, rad poradim.
S pozdravem
MUDr. Miloslav Neuzil
----- Original Message -----
From: Mirek Drej�ek
To: Konference Delphi
Sent: Friday, October 13, 2000 2:34 PM
Subject: InstallShield+BDE
Zdravim vsechny,
pouzivam Delphi 3 prof. a k tomu InstallShieldExpress ver 1.11. Tedy verze, ktera je soucasti baliku Delphi. K behu programu potrebuji BDE. Vytvoreni instalace je OK. I instalace samotna je vetsinou vporadku. Ale jsou bohuzel i vyjimky. Tu prvni bych jeste pochopil. Na pocitaci je nainstalovany jiz jiny program, ktery pouziva BDE. A toto BDE je novejsi, nez to z me instalace. Druha vec je pro mne uz trochu mene pochopitelna. Instalace probehne cela vporadku, ale na konci se objevi hlaseni, ze neni neco v poradku se souborem idapi32.cnf.
Neporadil by mi nekdo, co s temito problemy?
Predem dekuji za vesechny odpovedi.
Mirek Drejcek. ---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
OT:Kotouce v krabici
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 13.10.2000 16:53:01
> 1. valce se nahradi kvadry
> 2. nejmensi kvadr (valec) urcuje modul
> (idealni je pokud ostatni valce jsou nasobky modulu)
> 3. prostor v krabici se rozdeli na moduly
> 4. metodou prohledavani stavoveho prostoru zkousis
> do krabice strkat valce, obsazene moduly si poznacis
> 5. az vyzkousis vsechny moznosti muzes vybrat
> tu optimalni
Jenze valce jsou rovnat do krabice posunute, takze do sebe jaksi zaopadaji.
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
OT:Kotouce v krabici
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.10.2000 17:11:16
On 13 Oct 2000, at 11:56, Miloslav Sk�cel wrote:
> kdysi jsem to taky resil
>
> 1. valce se nahradi kvadry
> 2. nejmensi kvadr (valec) urcuje modul
> (idealni je pokud ostatni valce jsou nasobky modulu)
> 3. prostor v krabici se rozdeli na moduly
> 4. metodou prohledavani stavoveho prostoru zkousis
> do krabice strkat valce, obsazene moduly si poznacis
> 5. az vyzkousis vsechny moznosti muzes vybrat
> tu optimalni
>
> Je dobre udelat si funkci na vypocet casove narocnosti.
> Nekdy neni treba probrat vsechny moznosti, staci
> najit uspokojive usporadani valcu v krabici.
A co kdyz by se valce vesly do krabice tak, ze by byly ve 3
sloupcich (tedy v trojuhelniku), kdezto kvadry se tak uz nesmisti?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
ComboBox
[*] Karel Kral <kral(zv)purus(tec)cz> - 13.10.2000 17:31:52
Pokud mas Style = csDropDownList, nemas k polozce Text pristup. Musis si
vyhledat zadany text v ComboBox.Items (nebo jinym zpusobem zjistit
ItemIndex) a potom nastavit ComboBox.ItemIndex na prislusnou hodnotu.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Problem s TTimerem
[*] Jan Najv�rek <najvarek(zv)seznam(tec)cz> - 13.10.2000 17:33:41
Diky za radu, do noveho threadu se mi moc nechtelo, ale asi to bude jedina jista cesta ...
Zajimalo by mne, jak ale je mozno zastavit ten timer na nekolik hodin ... pochybuji, ze by usivatel vydrzel drzet okno tak dlouho a na zadnem okne nemam systemove menu, takze nemuze zvolit moznost Move. Pokud vim, tak behem te nefunkce TTimeru program normalne funguje, zpravy z COM portu jsou zpracovany.... Mohl by to byt screen saver??
Jestli nekdo ma tuseni proc, sem s nim..
Honza Najvarek
Dne 13.���jen�2000, <delphi-l(zv)fwd(tec)cz> napsal:
> Timer nekdy prestava chodit (napriklad kdyz chytnes okno za horni
> listu), tak jsem to vyresil pomocnym threadem, ktery ma v execute
> sleep a synchronize.
> while not terninated do begin
> sleep(1000);
> synchronize(Form452.DoTimer);
> end;
>
> > Co se obcas u zakaznika stava, ze nas timer najednou prestane
> > fungovat na par hodin a pak se znovu rozjede. Vi nekdo, proc??ComboBox
[*] MUDr.Neuzil <drneuzil(zv)razdva(tec)cz> - 13.10.2000 18:48:51
Kazdy nekdy zacinal, nestyd se.
procedure TForm1.Button1Click(Sender: TObject);
begin
with combobox1 do
text:='abc' ;
end;
nebo
procedure TForm1.Button1Click(Sender: TObject);
begin
combobox1. text:='abc' ;
end;
S pozdravem
MUDr. Miloslav Neuzil
----- Original Message -----
From: Mirek Drej�ek
To: Konference Delphi
Sent: Friday, October 13, 2000 3:48 PM
Subject: ComboBox
Zdravim,
uplne se za tuto otazku stydim, ale opravdu nevim co s tim. Predpokladam, ze reseni bude jednoduche (ale prijit na odpoved, porad nemuzu)
Style ComboBoxu mam nastaven na csDropDownList. Potreboval bych ovsem nastavit hodnotu text programove. Jednoduche prirazeni text:='abc' totiz nefunguje.
Nevite co s tim?
Predem diky za odpoved.
Mirek Drejcek. ---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
ComboBox
[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 13.10.2000 19:46:56
Combobox.ItemIndex:=Combobox.Items.IndexOf('TEXT');
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Mirek Drej�ek
Sent: Friday, October 13, 2000 3:49 PM
To: Konference Delphi
Subject: ComboBox
Zdravim,
uplne se za tuto otazku stydim, ale opravdu nevim co s tim. Predpokladam,
ze reseni bude jednoduche (ale prijit na odpoved, porad nemuzu)
Style ComboBoxu mam nastaven na csDropDownList. Potreboval bych ovsem
nastavit hodnotu text programove. Jednoduche prirazeni text:='abc' totiz
nefunguje.
Nevite co s tim?
Predem diky za odpoved.
Mirek Drejcek.Grafika
[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 13.10.2000 22:04:27
Caute
Chcel by som riesit takyto problem:
1.) Potreboval by som nejaku dokumentaciu/komponentu na rotaciu
bitmapy v priestore: Pohlad na plochu mapu v urcitom uhle (izometrii a pod)
2.) Trojrozmerny graf typu (nevrazdite ma, ze to znie ludovo) vrstevnicami v
priestore
nakresleny kopec...
Viem, ze to znie divoko, ale potreboval by som to kreslit v Delphi, resp. ak
to ma byt moc pomale, urobim to vo VC++...
Dik za akukolvek radu...Hotkeys
[*] -=Ivomir=- <Ivomir(zv)seznam(tec)cz> - 13.10.2000 23:21:22
Potreboval bych si udelat uplne maly program (nejlepe bez form aby zabiral v pam. co nejmene),
ktery by mi po stisku nejake kombinace klaves priplacnul nekam text. Techto programu je spousta,
ale nenasel jsem zadny funknci pod w2000. Ale kdybyste nekdo o nejakem vedel, tak bych vam byl
vdecen, abych to nemusel programovat.
K tomu jsou potreba asi dve zakladni veci, ktery bych potreboval vedet.
1) Odchyceni message keypress to vim, ale jak to odchytavat v celych winech a ne jen v me
app. a ne jen jednu klavesu ale kombinaci klaves trebas CTRL+neco (a taky jak udelat podminku
jako if key = (ctrl+neco) nevim.)
2) Poslat na vystup dany text ale do jakeho okna - jak zjistit kde mam aktivni kurzor? Nebo
to ten text vlozi automaticky tam kde mam kurzor?
....... s pozdravem Ivomir
--------------------------------------------------
EMAIL: Ivomir(zv)seznam(tec)cz MOBIL: 0602/831270
WWW: http://iwebs.upol(tec)cz ICQ: 28872917
Hloubeji do systemu
[*] -=Ivomir=- <Ivomir(zv)seznam(tec)cz> - 14.10.2000 01:07:43
Vim ze problem automatickeho mackani klaves tu uz byl mnohokrate rozebran, ale
ja mam takovyto problem. Snazim se oblafnout aplikaci, co si hlida, jestli uzivatel zmackl
at jakoukoliv klavesu, ale zmackl. Skousel jsem posilat
PostMessage(Wnd,WM_KEYDOWN ,VK_TAB,1); trebas takhle, at do moji, ci jiny aplikace,
treba do explorelu, to fungovalo, ale program to nevzal. Asi si to hlida na hlubsi urovni.
Neodchytava to ta aplikace napr. na urovni vstupu na klavesnicovej port? Neda se to taky
nejak simulovat?
Nemate s tim nekdo skusenosti?
....... s pozdravem Ivomir
--------------------------------------------------
EMAIL: Ivomir(zv)seznam(tec)cz MOBIL: 0602/831270
WWW: http://iwebs.upol(tec)cz ICQ: 28872917
ComboBox
[*] Karol V�clav�k - 13.10.2000 19:33:38 -0700
Jedine co ma momentalne napada je, aby si pridal do comboboxu item a nastavil itemindex, aby ukazoval na dany item. Ked budes xet text zmenit, musis jedine ubrat item a dat tam iny. Tento problem som riesil dost dlho (nebol som sam) a na ine riesenie som neprisiel. Skus toto, alebo zmen style
Karol V�clav�k
----- Original Message -----
From: Mirek Drej�ek
To: Konference Delphi
Sent: Friday, October 13, 2000 6:48 AM
Subject: ComboBox
Zdravim,
uplne se za tuto otazku stydim, ale opravdu nevim co s tim. Predpokladam, ze reseni bude jednoduche (ale prijit na odpoved, porad nemuzu)
Style ComboBoxu mam nastaven na csDropDownList. Potreboval bych ovsem nastavit hodnotu text programove. Jednoduche prirazeni text:='abc' totiz nefunguje.
Nevite co s tim?
Predem diky za odpoved.
Mirek Drejcek.ComboBox
[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 14.10.2000 11:45:48
Ahoj,
Friday, October 13, 2000, 3:48:37 PM, you wrote:
MD> Zdravim,
MD> uplne se za tuto otazku stydim, ale opravdu nevim co s tim. Predpokladam, ze reseni bude jednoduche (ale prijit na odpoved, porad nemuzu)
MD> Style ComboBoxu mam nastaven na csDropDownList. Potreboval bych ovsem nastavit hodnotu text programove. Jednoduche prirazeni text:='abc' totiz nefunguje.
MD> Nevite co s tim?
MD> Predem diky za odpoved.
MD> Mirek Drejcek.
Ja tento problem resim pres IndexOf protoze pokud pouzijes
csDropDownList pak nemuzes do .text psat, tedy :
ComboBox.ItemIndex:=ComboBox.Items.IndexOF('abc');
--
S pozdravem
Jir� Kubelka ��� kubelka(zv)fofrs-it(tec)cz ���
ICQ : 91337927
TButton
[*] Martin =?iso-8859-2?Q?Pe=B9ava?= <jimx(zv)volny(tec)cz> - 14.10.2000 11:57:46
Ahoj lidicky, uz jsem tu zase a zase s problemem. Chtel bych si udelat
komponenty pro praci se Skiny (jako WinAmp). Zacal jsem vlastnim
potomkem TButtonu:
type
TSkinButton = class(TButton)
private
FSkin : TBitmap;
procedure SetSkin(PSkin:TBitmap);
public
procedure Repaint; override;
published
property Skin : TBitmap read FSkin write SetSkin;
end;
procedure TSkinButton.SetSkin;
begin
FSkin:=PSkin; Repaint;
end;
procedure TSkinButton.Repaint;
begin
if FSkin = nil then
inherited Repaint
else
if Parent is TForm then
BitBlt(TForm(Parent).Canvas.Handle,Left,Top,Width,Height,
FSkin.Canvas.Handle,0,0,SRCCOPY);
end;
Ale nefunguje. Nevykresluje tu bitmapu. Kdyz zmenim radek s BitBlt na
BitBlt(TForm(Parent).Canvas.Handle,Left,Top+Height,Width,Height,
FSkin.Canvas.Handle,0,0,SRCCOPY);
tak se ta bitmapa vykresli pod to tlacitko, coz je v poradku. Ale kdyz
se ma kreslit misto toho tlacitka, tak se nekresli. Proc? Videl bych to
tak, ze se tam sice nakresli, ale ten TButton ji zase prekresli. Jak to
obejit???
A dalsi dotaz by byl: Potreboval bych kreslit jinou bitmapu pokud se na
to tlacitko clickne. Jediny, co me napadlo bylo dat do OnMouseDown
preklesleni, Sleep, preklesleni, ale to je dost hnusny reseni (Hlavne
ten Sleep). Co s tim?
Tohle vsechno se deje pokud to pouzivam jako unitu v nejakym programu.
Pokud z toho ale udelam balicek a udelam z toho componentu, tak pri
prirazeni bitmapy do skinu (v design timu) mi to zarve nejakou Access
Violation v nejakym .BPLku...
Napadlo me jeste jedno reseni (tak je udelanej BitBtn), ale je "dost"
slozity. De o to, ze se odchytava se message CN_DRAWITEM, po kterem se
cele tlacitko nakresli. Zkusil jsem to, ale nevim proc se tomu talcitku
ten message vubec neposila (nezavola se procedure zavesena na
CN_DRAWITEM). Mozna je to protoze BitBtn je odvozeno z GraphicsControl.
Ja to ale potrebuju z toho TButtonu, abych moh kreslit std tlacitko
pokud nejni prirazena Bitmapa.
Sorry za takovou dylku, ale nevim jak to napsat kratsejc...
Predem dik za kazdy nakopnuti a radu...
--
Martin Pe�ava
/--------------------------------------------------------------\
| E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
| WebMaster of |
|http://miss.jimx.net - Neofici�ln� str�nka MISS �R a CyberMiss|
\--------------------------------------------------------------/komponenta keyspy
[*] <bejcek(zv)centrum(tec)cz> - 14.10.2000 12:05:37
Nejak jsem nepochopil fci komponenty keyspy, nevim jak provedu
nejakou operaci pri stisku kombinace klaves. Nejak mi to tu
nejde, nakopnete me nekdo, moc diky
Aldik(amater vsech amateru)
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
OT:Prace
[*] <bejcek(zv)centrum(tec)cz> - 14.10.2000 12:09:17
Prominte ze Vas otravuji OT: ale nevedeli by jste o nejake
sikovne firme ktera by me zamestnala a vyskolila? Neco jiz z
Delphi znam ale jeste se furt necitim silnej v kramflecich. Je to
taky jedina prace kterou jsem schopen delat nic jineho me nebavi,
praxi v programovani ale uz mam. Jen potrebuji nekde zacit, kdyby
jste nekdo vedel dejte mi vedet.
Jeste jednou se omlouvam, ale potreboval jsem si vylejt srdicko
Ales Pavel amater vsech amateru
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Ruzne verze BDE
[*] Marek Soukup <marek(zv)comberg(tec)cz> - 14.10.2000 14:15:43
Helou,
mam problem s navazanim na jednu svoji starou app. Je psana jeste v Delphi1
s 16bitovym BDE. Ted potrebuju udelat takovej malinkej programek, kterej
bude napsanej v Delphi5 a bude koukat na ty data z ty 16bitovy aplikace.
Jenze jak zjistit aliasy ? Nejak se mi nepodarilo zjistit jak presvedcit
Delphi, aby brali v uvahu take stare BDE.
Jde to vubec ?
Hrabu se v tom, ale potrebuju to dost surne, takze se ptam i tady.
S pozdravem
Marek Soukup
DBExpress, Kylix a edice
[*] Delphi <delphi(zv)aitix(tec)cz> - 14.10.2000 17:42:38
Ahoj,
vi se uz, jak budou rozdeleny edice v Kylixu?
Konkretne jde o pritomnost databazovych komponent tj. DBExpressu
a to presneji pro komunikaci s Interbase.
Predpokladam (bohuzel pro mne :-)), ze Standard se bude lisit od
Professional
mimo jine absenci DBExpressu.
Mate k tomu nekdo informace?
Leos
Problemy s IBSecurityService na lokalni server
[*] Pavel Bare� <bares(zv)atoll(tec)cz> - 14.10.2000 17:43:08
Vzdyt tam pisu ze to nejde.
Jmeno serveru zadat nelze proto, ze je kvuli tomu nutny zapis do
SERVICES, ktery je v ruznych Win na ruznem miste a nevi jak to misto
zjistit.
Pavel Bares
----- Original Message -----
From: "Tomas Michal�k" <michalik(zv)proca(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, October 13, 2000 11:32 AM
Subject: Re: Problemy s IBSecurityService na lokalni server
> Ahoj,
>
> > Pavel Bare� wrote:
> >
> > Mam nasledujici broblem:
> >
> > Pri pripojeni pomoci IBSecurityService k lokalnimu serveru (protokol
> > Local) dostanu chybovou hlasku "Server name mising"
> > pokud to dobre chapu pokud se pripojuji lokalne tak neni potreba
> > zadavat jmeno serveru, coz potvrzuje i to, ze v rezimu navrhu se to
> > normalne pripoji
> > Zreje jde tedy o chybu komponenty IBSecurityService.
> >
> > Nevite nekdo jak to vyresit.
> > Jmeno serveru zadat nelze proto, ze je kvuli tomu nutny zapis do
> > SERVICES, ktery je v ruznych Win na ruznem miste a nevi jak to misto
> > zjistit.
> >
> > dekuji za radu moc to specha
>
> zkus pouzit protokol TCP-IP a jmeno serveru "localhost"
>
> Tom
>
> =================================
>
> Tomas Michalik
> ProCA, s. r. o.
> V Luzich 818, Praha 4
> Czech Republic
>
> e-mail: michalik(zv)proca(tec)cz
> tel: +420 2 67283446
TButton
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.10.2000 18:27:24
On 14 Oct 2000, at 11:57, Martin Pe�ava wrote:
> Ahoj lidicky, uz jsem tu zase a zase s problemem. Chtel bych si udelat
> komponenty pro praci se Skiny (jako WinAmp). Zacal jsem vlastnim
> potomkem TButtonu:
> [...]
>
> Ale nefunguje. Nevykresluje tu bitmapu. Kdyz zmenim radek s BitBlt na
> BitBlt(TForm(Parent).Canvas.Handle,Left,Top+Height,Width,Height,
> FSkin.Canvas.Handle,0,0,SRCCOPY);
> [...]
> nejakym .BPLku... Napadlo me jeste jedno reseni (tak je udelanej
> BitBtn), ale je "dost" slozity.
TButton nechava sve vykresleni na Woknech. Pokud chces kreslit
sam, musis to komponente vyslovne rict. Jak se to dela, najdes
prave v TBitBtn.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
komponenta XYGraph
[*] Petr Ma��k <rtepema(zv)mbox.vol(tec)cz> - 14.10.2000 21:20:17
Zdravim vsechny delfiny,
a hned davam k uvaze jeden problem. Pouzivam komponentu XYGraph 3.2beta od
Kestral Computing. Ke komponente jsou i zdrojaky. Chtel jsem lokalizovat
jeden program s ni a narazil jsem na tento problem. Pri prevodu formu s
komponentou XYGraph do textove formy dojde k chybe (Delphi nehlasi nic) v
XYGraph. Pri pokusu o konverzi zpet do frm uz Delphi chybu ohlasi. Jinak pri
pouziti komponenty nejsou hlaseny chyby ani pri instalaci komponenty. Pokud
d�m na cisty form jen komponentu XYGraph a vsechny hodnoty necham default,
pri prevodu do txt hlasi Delphi chybu Stream Read Error. Nevim, jak tyhle
chyby najit a pripadne opravit. Nemate nekdo podobnou zkusenost, nebo
alespon radu, jak takoveto chyby hledat ?
Prikladam cast formu v textove podobe, kde je prvni chyba.
ParentFont = False
PopupMenu = PopupMenu1
Plotting = True
OnMouseDown = ZGraphMouseDown
SeriesCount = 'S'
0 Mar =
CountS0AnnotationCountS0
(Pritom SeriesCount neni primo definovano, jen FFilingSeriesCount je typu
word).
D3Std, W98SE
RT electronic
komponenta keyspy
[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 14.10.2000 22:40:01
Musis si hlidat ktera z kontrolovanych klaves je prave stisknuta (tzn. ze
jeste neprobehlo KeyUp).
Takze: pri KeyDown zjistis, ze byla stlacena kl. Ctrl, tak si nekam das ze
napr. KeyCtrl:=true a pri KeyUp tam das false. No takhle zkontrolujes celou
tvoji kombinaci. A kdyz vsechny promenne z tve kombinace budou true, tak je
to ten spravny okamzik.
Mirek Drancak
>Subject: komponenta keyspy
> Nejak jsem nepochopil fci komponenty keyspy, nevim jak provedu
> nejakou operaci pri stisku kombinace klaves. Nejak mi to tu
> nejde, nakopnete me nekdo, moc diky
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
ISS
[*] MUDr.Neu�il <drneuzil(zv)razdva(tec)cz> - 14.10.2000 22:52:45
Na radu jednoho z vas jsem poridil IS Setup se vsemi doplnky pro instalaci
BDE. Nemam moznost vyzkouset, co to udela, kdyz bude mit nekdo na PC uz BDE,
ale starsi verzi (z D3). Zmizi mu stare aliasy? Kam se nainstaluje nove BDE?
Mam strach, ze nekomu zpusobim problemy. Miloslav Neuzil
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Tisk RTF v Delphi5
[*] Lukas Strmiska <strma(zv)volny(tec)cz> - 15.10.2000 12:26:05
Jsem zacatecnik a potreboval bych vytisknout Soubor ve formatu RTF a nevim
jak to mam udelat. Z Delphi helpu jsem to nejak nepochopil. Diky za odpovedi
Bye, Lucas.komponenta XYGraph
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.10.2000 12:35:19
On 14 Oct 2000, at 21:20, Petr MaXXk wrote:
Komponentu neznam, proto budu jen odhadovat. SeriesCount bude
patrne neohlasena vlastnost, ktera se osetruje pres
DefineProperties. Podivej se, zda je to tak. Pokud ano, pak zkus
osetrit ukladani a cteni teto vlastnosti.
> Zdravim vsechny delfiny,
> a hned davam k uvaze jeden problem. Pouzivam komponentu XYGraph
> 3.2beta od Kestral Computing. Ke komponente jsou i zdrojaky. Chtel
> jsem lokalizovat jeden program s ni a narazil jsem na tento problem.
> Pri prevodu formu s komponentou XYGraph do textove formy dojde k chybe
> (Delphi nehlasi nic) v XYGraph. Pri pokusu o konverzi zpet do frm uz
> Delphi chybu ohlasi. Jinak pri pouziti komponenty nejsou hlaseny chyby
> ani pri instalaci komponenty. Pokud d�m na cisty form jen komponentu
> XYGraph a vsechny hodnoty necham default, pri prevodu do txt hlasi
> Delphi chybu Stream Read Error. Nevim, jak tyhle chyby najit a
> pripadne opravit. Nemate nekdo podobnou zkusenost, nebo alespon radu,
> jak takoveto chyby hledat ?
>
> Prikladam cast formu v textove podobe, kde je prvni chyba.
>
> ParentFont = False
> PopupMenu = PopupMenu1
> Plotting = True
> OnMouseDown = ZGraphMouseDown
> SeriesCount = 'S'
> 0 Mar =
> CountS0
AnnotationCountS0
>
> (Pritom SeriesCount neni primo definovano, jen FFilingSeriesCount je
> typu word).
>
> D3Std, W98SE
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
SQL (IB6) jak predat procedure jmeno objektu
[*] L. ZITA <konference(zv)sales(tec)cz> - 15.10.2000 17:30:49
Zdravim.
Je mozne nejakym zpusobem napsat proceduru nebo View, ktera bude pokazde
pracovat s jinym objektem (tabulkou)
podle predaneho parametru ?
Neco jako :
=================================
CREATE PROCEDURE VLOZ_ZAZNAM (
!!XTABLENAME!! ?????,
XID CHAR(32),
XHODNOTA1 SMALLINT,
XHODNOTA2 CHAR(32)
RETURNS (XOK SMALLINT)
AS
begin
XOK=0;
INSERT INTO !!XTABLENAME!! (ID,POLOZKA1,POLOZKA2)
VALUES (:XID,:XPOLOZKA1,:XPOLOZKA2);
XOK=1;
suspend;
end
=================================
Jde mi o to aby procedura(pohled) byla jen jedna pro celou skupinu tabulek
se stejnou strukturou.
Neprisel jsem na zpusob jak to udelat (mozna to vubec nejde).
Jak tedy resite pripady, kdy je potreba zalozit treba kazdy mesic novou
prazdnou evidenci
a navazat na ni vsechny procedury a pohledny vcetne dzungle grantu k rolim a
tabulkam.
Mozna na to koukam z uplne spatne strany.
Dik za kazde nakopnuti.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
OpenGL
[*] lio(zv)email(tec)cz - 15.10.2000 18:12:16
Me znalosti OpenGL jsou takrka nulove a proto bych potreboval jestli by mi
nekdo nenapsal:
1)co to vlastne OpenGL je?
2)na co se to da s uspechem pouzit?
3)jak zacit?
Popripade odkazy na stranky kde se o OpenGL neco dozvim, nebo stahnu nejake
ty udelatka.
Diky moc
Standa, Brno
EMAIL.CZ - Va�e po�ta je v�dy s V�mi
http://www.email(tec)cz
OpenGL
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 15.10.2000 20:15:59
Taktez nemam velke znalosti, reknu co vim :-)
OpenGL je standard rozhrani mezi hardware gr. karty a tvym software. Vyvinula jej spolecnost Silicon Greaphics (nyni SGI),
ktera jej nasledne uvolnila jako free reseni. Je to dobre predevsim pro zobrazovani rychle 3D grafiky, vyuziva to vetsina
"lepsich" karet (ta moje ne :-( ) a spousta softu - namatkou Quake3 nebo ruzne prohlizece CAD obrazku.
Kdybych ja chtel vyuzivat OpenGL, bylo by to napr. pro rychle zobrazeni 3D grafu, pro hru, apod. Predevsim bych k tomu ale dal
i podporu neceho jineho (napr. DirectX), protoze jak jsem se jiz zminil, nekteri to OpenGL na katrach mit nemusi...
http://www.sgi.com/software/opengl/
- na techto strankach se toho dozvis o dost vic, pouze musis umet anglicky. S pozdravem,
Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
----- Original Message -----
From: <lio(zv)email(tec)cz>
Subject: OpenGL
> Me znalosti OpenGL jsou takrka nulove a proto bych potreboval jestli by mi
> nekdo nenapsal:
> 1)co to vlastne OpenGL je?
> 2)na co se to da s uspechem pouzit?
> 3)jak zacit?
SQL (IB6) jak predat procedure jmeno objektu
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 15.10.2000 20:22:01
A nebylo by tedy lepsi na vsechno pouzit jen jedinou tabulku,
ktera by obsahovala polozku, udavajici typ entity v radku (napr. EntityType
int):
create table Nejaka_data (ID CHAR(32), TypEntity smallint, Polozka1
SMALLINT, polozka2 CHAR(32))
Pro kazdy typ entity, co by te kdy napadl si urcis jednoznacnou konstantu a
mas to.
Muzes pouzit vsechny stavajici procedury (jako parametr predas identifikator
entity):
=================================
CREATE PROCEDURE VLOZ_ZAZNAM (
TypEntity int, -- timto rozlisit typ ukladanych dat
XID CHAR(32),
XHODNOTA1 SMALLINT,
XHODNOTA2 CHAR(32)
RETURNS (XOK SMALLINT)
AS
begin
XOK=0;
INSERT INTO Nejaka_data (ID,TypEntity, POLOZKA1,POLOZKA2)
VALUES (:XID,:TypEntity, :XPOLOZKA1,:XPOLOZKA2);
XOK=1;
suspend;
end
=================================
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> L. ZITA
> Sent: Sunday, October 15, 2000 5:31 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: SQL (IB6) jak predat procedure jmeno objektu
>
>
> Zdravim.
>
> Je mozne nejakym zpusobem napsat proceduru nebo View, ktera bude pokazde
> pracovat s jinym objektem (tabulkou)
> podle predaneho parametru ?
> Neco jako :
> =================================
> CREATE PROCEDURE VLOZ_ZAZNAM (
> !!XTABLENAME!! ?????,
> XID CHAR(32),
> XHODNOTA1 SMALLINT,
> XHODNOTA2 CHAR(32)
> RETURNS (XOK SMALLINT)
> AS
> begin
> XOK=0;
> INSERT INTO !!XTABLENAME!! (ID,POLOZKA1,POLOZKA2)
> VALUES (:XID,:XPOLOZKA1,:XPOLOZKA2);
> XOK=1;
> suspend;
> end
> =================================
>
> Jde mi o to aby procedura(pohled) byla jen jedna pro celou skupinu tabulek
> se stejnou strukturou.
> Neprisel jsem na zpusob jak to udelat (mozna to vubec nejde).
> Jak tedy resite pripady, kdy je potreba zalozit treba kazdy mesic novou
> prazdnou evidenci
> a navazat na ni vsechny procedury a pohledny vcetne dzungle
> grantu k rolim a
> tabulkam.
> Mozna na to koukam z uplne spatne strany.
>
> Dik za kazde nakopnuti.
>
> Ludek
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
>Problemy s IBSecurityService na lokalni server
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 15.10.2000 20:56:46
Pridaj si TIBDatabaseInfo a on Ti prezradi nazov servera,...
Roland.
----- Original Message -----
From: "Tomas Michal�k" <michalik(zv)proca(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, October 13, 2000 11:32 AM
Subject: Re: Problemy s IBSecurityService na lokalni server
> Ahoj,
>
> > Pavel Bare� wrote:
> >
> > Mam nasledujici broblem:
> >
> > Pri pripojeni pomoci IBSecurityService k lokalnimu serveru (protokol
> > Local) dostanu chybovou hlasku "Server name mising"
> > pokud to dobre chapu pokud se pripojuji lokalne tak neni potreba
> > zadavat jmeno serveru, coz potvrzuje i to, ze v rezimu navrhu se to
> > normalne pripoji
> > Zreje jde tedy o chybu komponenty IBSecurityService.
> >
> > Nevite nekdo jak to vyresit.
> > Jmeno serveru zadat nelze proto, ze je kvuli tomu nutny zapis do
> > SERVICES, ktery je v ruznych Win na ruznem miste a nevi jak to misto
> > zjistit.
> >
> > dekuji za radu moc to specha
>
> zkus pouzit protokol TCP-IP a jmeno serveru "localhost"
>
> Tom
>
> =================================
>
> Tomas Michalik
> ProCA, s. r. o.
> V Luzich 818, Praha 4
> Czech Republic
>
> e-mail: michalik(zv)proca(tec)cz
> tel: +420 2 67283446
>ISS
[*] Ji�� Kr�l���i٢��k�{h�̿ - 15.10.2000 21:07:37
Moje troska do BDE mlyna: zazil jsem situaci opacnou: instalaci STARSIHO BDE
pres novejsi:
vysledek : aliasy zustaly, novejsi BDE zustalo, jen se pridaly ty aliasy.
Vcelku inteligentni. Prijemne preqapeni, ze?
J.>>Na radu jednoho z vas jsem poridil IS Setup se vsemi doplnky pro instalaci
>>BDE. Nemam moznost vyzkouset, co to udela, kdyz bude mit nekdo na PC uz
BDE,
>>ale starsi verzi (z D3). Zmizi mu stare aliasy? Kam se nainstaluje nove
BDE?
>>Mam strach, ze nekomu zpusobim problemy. Miloslav Neuzil
komponenta XYGraph
[*] Petr Ma��k <rtepema(zv)mbox.vol(tec)cz> - 15.10.2000 22:28:35
From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
Subject: Re: komponenta XYGraph
> On 14 Oct 2000, at 21:20, Petr MaXXk wrote:
>
> Komponentu neznam, proto budu jen odhadovat. SeriesCount bude
> patrne neohlasena vlastnost, ktera se osetruje pres
> DefineProperties. Podivej se, zda je to tak. Pokud ano, pak zkus
> osetrit ukladani a cteni teto vlastnosti.
>
Diky za nasmerovani, SeriesCount je opravdu definovan v procedure
Defineproperties,
cast kodu je
procedure TxyGraph.DefineProperties;
begin
inherited defineproperties(filer);
Filer.DefineProperty('SeriesCount', ReadSeriesCount, WriteSeriesCount,
true);
.....
end;
procedure TxyGraph.ReadSeriesCount(reader:Treader);
begin
if reader.readstring = ktInteger then
FFilingSeriesCount := reader.readinteger
else
FFilingSeriesCount := strtoint(reader.readstring);
end;
Chyba je pri provadeni procedury ReadSeriesCount. Pri krokovani mi Delphi na
prvnim radku hlasi pro
reader.readstring Access Violation. Zrejme neni vytvoren globalni objekt
reader (ktery podle helpu se nemusi vytvaret programove), nebo jej nezna jen
tato procedura. Dal uz moje znalosti nedovoluji urcit, kde je chyba.
Petr Marik
RT electronic
SQL (IB6) jak predat procedure jmeno objektu
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 15.10.2000 23:13:02
Ahoj,
v Tvojom pripade by som si tu tabulku rozsiril o pole "MESIAC".
Pavol Stolc
pstolc(zv)sc.sknet.sk
Objekty, ukazatele...
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 15.10.2000 23:59:09
Zdravim,
prosim, nevite jak se jednoduse dostat k vlastnostem odesilatele udalosti? Napr.: mam 10 labelu na formu a kazdy ma
prirazenou obsluhu udalosti OnMouseMove:
procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
Caption:='Jsem aktivn�...'; // aktivizuju soucasnou polozku
if Last<>nil then Last^.Caption:='Jsem neaktivn�...'; // deaktivizuju polozku z promenne Last
Last:=(zv)sender; // nastavim soucasnou polozku do Last
end;
Last = ^TLabel; inicializuji jako Last:=nil;
Problem je, ze tento zapis vubec nefunguje - nadpis 'Jsem aktivni...' se nastavi u formu, protoze self = form, nadpis 'Jsem
neaktivni...' se pro zmenu neobjevi nikde, at prejizdim pres labely jak chci. Jednou otazkou je, jak se mam dostat k vlastnosti
Caption pres Sender, druhou je, proc mi nefunguje ten ukazatel? Uz v tom mam vazne zmatek, nemohl by mi to nekdo vysvetlit?
Jedna se o techniku urychleni prace s rolezhlejsimi seznamy prvku, z nichz pouze jeden muze byt aktivni. Dik,
Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
SQL (IB6) jak predat procedure jmeno objektu
[*] L. ZITA <konference(zv)sales(tec)cz> - 16.10.2000 01:40:42
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> L. ZITA
> Sent: Sunday, October 15, 2000 5:31 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: SQL (IB6) jak predat procedure jmeno objektu
>
>
> Zdravim.
>
> Je mozne nejakym zpusobem napsat proceduru nebo View, ktera bude pokazde
> pracovat s jinym objektem (tabulkou)
> podle predaneho parametru ?
> Neco jako :
> =================================
> CREATE PROCEDURE VLOZ_ZAZNAM (
> !!XTABLENAME!! ?????,
> XID CHAR(32),
> XHODNOTA1 SMALLINT,
> XHODNOTA2 CHAR(32)
> RETURNS (XOK SMALLINT)
> AS
> begin
> XOK=0;
> INSERT INTO !!XTABLENAME!! (ID,POLOZKA1,POLOZKA2)
> VALUES (:XID,:XPOLOZKA1,:XPOLOZKA2);
> XOK=1;
> suspend;
> end
> =================================
>
> Jde mi o to aby procedura(pohled) byla jen jedna pro celou skupinu tabulek
> se stejnou strukturou.
> Neprisel jsem na zpusob jak to udelat (mozna to vubec nejde).
> Jak tedy resite pripady, kdy je potreba zalozit treba kazdy mesic novou
> prazdnou evidenci
> a navazat na ni vsechny procedury a pohledny vcetne dzungle
> grantu k rolim a
> tabulkam.
> Mozna na to koukam z uplne spatne strany.
>
> Dik za kazde nakopnuti.
>
> Ludek
****
>
> A nebylo by tedy lepsi na vsechno pouzit jen jedinou tabulku,
> ktera by obsahovala polozku, udavajici typ entity v radku (napr.
> EntityType
> int):
****
>v Tvojom pripade by som si tu tabulku rozsiril o pole "MESIAC".
Ahoj.
Prave tomu jsem se chtel z urcitych (rychlost versus velikost tabulky)
duvodu vyhnout a
zalozit si tabulku vzdy pro kazde obdobi novou.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Podrobnejsi mapa CR
[*] Ren� Otisk - 16.10.2000 05:36:09
zkus mapy.atlas(tec)cz
Sroub
----- Original Message -----
From: Jirka Virt
To: Konference Delphi
Sent: Thursday, October 12, 2000 7:58 PM
Subject: Podrobnejsi mapa CR
Ahoj vsem,
nemel by nekdo po ruce mapu CR, ale podrobnejsi nez je v Excelu.Tam jeden bod
je okres.Jde mi alespon o mapu vychodnich Cech.
Diky i za odkazy
Jirka Virt
email: virt(zv)volny(tec)cz
Objekty, ukazatele...
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.10.2000 06:38:00
Adam Feistner <feistna(zv)volny(tec)cz> wrote:
> Last:=(zv)sender;
// nastavim soucasnou polozku do Last
To prave nenastavis. Ty tam nastavis adresu na promennou, ktera obsahuje
soucasnou polozku.
Podivej se do Helpu na heslo "Using the Object Model"
Bye, pf
Objekty, ukazatele...
[*] Krska Vit <v_krska(zv)del(tec)cz> - 16.10.2000 07:16:05
da se to udelat nasledujicim zpusobem
if Sender is TEdit then
TEdit(Sender).Color:=clRed;
tento kod vlozis do udalosti OnMouseMove a je to. ja akorad menim barvu
editu, ale nevracim ji na puvodni, ale myslim, ze jsem na tvou otazku
odpovedel.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Adam Feistner
Sent: Sunday, October 15, 2000 11:59 PM
To: Delphi konference
Subject: Objekty, ukazatele...
Zdravim,
prosim, nevite jak se jednoduse dostat k vlastnostem odesilatele
udalosti? Napr.: mam 10 labelu na formu a kazdy ma
prirazenou obsluhu udalosti OnMouseMove:
procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X, Y:
Integer);
begin
Caption:='Jsem aktivn�...';
// aktivizuju soucasnou polozku
if Last<>nil then Last^.Caption:='Jsem neaktivn�...'; //
deaktivizuju polozku z promenne Last
Last:=(zv)sender;
// nastavim soucasnou polozku do Last
end;
Last = ^TLabel; inicializuji jako Last:=nil;
Problem je, ze tento zapis vubec nefunguje - nadpis 'Jsem aktivni...' se
nastavi u formu, protoze self = form, nadpis 'Jsem
neaktivni...' se pro zmenu neobjevi nikde, at prejizdim pres labely jak
chci. Jednou otazkou je, jak se mam dostat k vlastnosti
Caption pres Sender, druhou je, proc mi nefunguje ten ukazatel? Uz v tom mam
vazne zmatek, nemohl by mi to nekdo vysvetlit?
Jedna se o techniku urychleni prace s rolezhlejsimi seznamy prvku, z nichz
pouze jeden muze byt aktivni. Dik,
Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
Ulozeni dat do tabulky.
[*] Libor Thiel <thiel(zv)elapsh(tec)cz> - 16.10.2000 07:19:11
D5 Prof, IB 5.5
Muj problem:
Kdyz pridam radek do tabulky, tak se mi toto projevi i vypisem v DBGridu. Po
ukonceni programu se ale data ztrati - jako by nedoslo k fyzickemu ulozeni.
Pridani jsem zkousel dvema zpusoby:
1)
ibTable.Append;
ibTable.FieldByName('BarCode').AsString := EAN;
...
ibTable.Post;
2)
ibTable.AppendRecord([EAN, Now, Data[2], Data[3], Data[4], Data[5],
Data[6], Data[7], Data[8], Data[9], Null, #0,Null, #0, Null]);
ibTransac.Commit;
Po Comit mi to nahlasi, ze dataset neni v modu editace.
P�edem dik
Libor Thiel
Hotkeys
[*] Krska Vit <v_krska(zv)del(tec)cz> - 16.10.2000 07:46:06
mam komponentu, ktera odchytne stisk klaves z celych windows. jestli chces,
tak ti ji poslu. vit.krska(zv)del(tec)cz
ps: narazil jsem u te komponenty, ze nektere klvesy neodchytne napr:
shift+F12;
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
-=Ivomir=-
Sent: Friday, October 13, 2000 11:21 PM
To: Delphi Konference
Subject: Hotkeys
Potreboval bych si udelat uplne maly program (nejlepe bez form aby
zabiral v pam. co nejmene),
ktery by mi po stisku nejake kombinace klaves priplacnul nekam text. Techto
programu je spousta,
ale nenasel jsem zadny funknci pod w2000. Ale kdybyste nekdo o nejakem
vedel, tak bych vam byl
vdecen, abych to nemusel programovat.
K tomu jsou potreba asi dve zakladni veci, ktery bych potreboval vedet.
1) Odchyceni message keypress to vim, ale jak to odchytavat v celych winech
a ne jen v me
app. a ne jen jednu klavesu ale kombinaci klaves trebas CTRL+neco (a
taky jak udelat podminku
jako if key = (ctrl+neco) nevim.)
2) Poslat na vystup dany text ale do jakeho okna - jak zjistit kde mam
aktivni kurzor? Nebo
to ten text vlozi automaticky tam kde mam kurzor?
....... s pozdravem Ivomir
--------------------------------------------------
EMAIL: Ivomir(zv)seznam(tec)cz MOBIL: 0602/831270
WWW: http://iwebs.upol(tec)cz ICQ: 28872917
Objekty, ukazatele...
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 16.10.2000 07:46:00
> prosim, nevite jak se jednoduse dostat k vlastnostem odesilatele
> udalosti? Napr.: mam 10 labelu na formu a kazdy ma
> prirazenou obsluhu udalosti OnMouseMove:
>
> procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState;
> X, Y: Integer); begin
> Caption:='Jsem aktivn�...'; //
> aktivizuju soucasnou polozku if Last<>nil then
> Last^.Caption:='Jsem neaktivn�...'; // deaktivizuju
> polozku z promenne Last Last:=(zv)sender;
> // nastavim soucasnou polozku do Last
> end;
>
> Last = ^TLabel; inicializuji jako Last:=nil;
>
> Problem je, ze tento zapis vubec nefunguje - nadpis 'Jsem aktivni...'
> se nastavi u formu, protoze self = form, nadpis 'Jsem neaktivni...' se
> pro zmenu neobjevi nikde, at prejizdim pres labely jak chci. Jednou
> otazkou je, jak se mam dostat k vlastnosti Caption pres Sender, druhou
> je, proc mi nefunguje ten ukazatel? Uz v tom mam vazne zmatek, nemohl
> by mi to nekdo vysvetlit?
Ahoj,
to hlavni je nepouzivat strisku ^, TLabel je uz sam o sobe interne
interpretovan jako ukazatel, i kdyz se s nim tak formalne nepracuje.
To, ze nekde v programu deklarujes promennou typu TLabel, tedy
neznamena, ze se vytvori nejaky novy label. Ten by vznikl, az
kdybys zavolal konstruktor Create.
Last ma tedy byt typu TLabel a kod vypadat treba takto:
procedure TForm1.Label1MouseMove(Sender: TObject; Shift:
TShiftState; X, Y: Integer);
begin
if Last<>nil then
Last^.Caption:='Jsem neaktivn�...';
Last:=Sender as TLabel;
Last.Caption:='Jsem aktivn�...';
end;
David
SQL (IB6) jak predat procedure jmeno objektu
[*] Delphi <delphi(zv)aitix(tec)cz> - 16.10.2000 07:54:17
> Prave tomu jsem se chtel z urcitych (rychlost versus velikost tabulky)
> duvodu vyhnout a
> zalozit si tabulku vzdy pro kazde obdobi novou.
Podle mne by v spravne navrzene databazi (indexy, model)
nemel pocet vet v tabulce hrat velkou roli.
Leos
OT:Kotouce v krabici
[*] Krska Vit <v_krska(zv)del(tec)cz> - 16.10.2000 07:56:07
kvadry se pouziji, kdyz jsou valce presne nad sebou. to ale malo vyuziva
prostor. normalne by se valec zkutalel do prohlubne od dvou valcu co jsou
pod nim. dak by se misto kvadru pouzil sestihran. kdysy jsme se to ucili.
maximalni vyuziti prostoru pri navijeni dratu na civku. kdyz si predstavim
drat jako valec tak to jde ne? mozna bych nasel i nejake priklady vypocktu.
vit.krska(zv)del(tec)cz
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Zbysek Hlinka
Sent: Friday, October 13, 2000 5:11 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: OT:Kotouce v krabici
On 13 Oct 2000, at 11:56, Miloslav Sk�cel wrote:
> kdysi jsem to taky resil
>
> 1. valce se nahradi kvadry
> 2. nejmensi kvadr (valec) urcuje modul
> (idealni je pokud ostatni valce jsou nasobky modulu)
> 3. prostor v krabici se rozdeli na moduly
> 4. metodou prohledavani stavoveho prostoru zkousis
> do krabice strkat valce, obsazene moduly si poznacis
> 5. az vyzkousis vsechny moznosti muzes vybrat
> tu optimalni
>
> Je dobre udelat si funkci na vypocet casove narocnosti.
> Nekdy neni treba probrat vsechny moznosti, staci
> najit uspokojive usporadani valcu v krabici.
A co kdyz by se valce vesly do krabice tak, ze by byly ve 3
sloupcich (tedy v trojuhelniku), kdezto kvadry se tak uz nesmisti?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Stay on top v DLL
[*] Patrik Legath <pato(zv)baris.sk> - 16.10.2000 08:01:51
Mam takyto problem. V Dllke vytvaram Nemodalny formular s vlasnostou StayOnTop.
procedure ShowOkno(AHwnd : HWND; AOwner : TControl);
begin
Application.Handle := AHwnd ;
Form2 := TForm2.Create(AOwner);
Form2.Show;
end;
AHwnd je vlastnik okna vo Windows. Ked to volam z inej delphi Aplikacie tak je to Application.
AOwner je objekt, ktory je zodpovedny sa zrusenie okna.
Vsetko funguje Ok ked to volam z ineho Delphi Exe programu. Ked to volam z Century, a prekliknem na Inu Aplikaciu !!!.
Tak okno zostane StayOnTop aj nad touto aplikaciou, co je sice zaujimavy efekt, ale nie je to, co bi som chcel.
Nestretli ste sa z niecim takym. Neviete ako by sa to dalo obist. alebo aspon ake metody zavolat z TApplication, aby sa pri DeAktivacii zmazal priznak StayOnTop, a pri aktivacii znova nastavil ?SQL (IB6) jak predat procedure jmeno objektu
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 16.10.2000 08:11:32
A kolik by ba tabulka mela mit zaznamu ? Kdyz spravne nastavis indexy,
sestavis optimalne dotazy, tak si myslim, ze by nemel byt problem,
od toho jsou to db stroje, aby zvladaly velke objemy dat.
Ja jsem kdysi resil podobny problem. Vyvoril jsem si testovaci
tabulku s cca 2 mil. (neni to moc ale ani malo) zaznamu
a provadel nad ni dotazy - vysledky mi to vracelo za cca 0.00 s (na MS SQL
7.0).
Nebal bych se toho, jen je potreba, jak jiz jsem uvedl, si pohrat s dotazama
a indexama.
Keep mailing :-)
=======================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> L. ZITA
> Sent: Monday, October 16, 2000 1:41 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: SQL (IB6) jak predat procedure jmeno objektu
>
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > L. ZITA
> > Sent: Sunday, October 15, 2000 5:31 PM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: SQL (IB6) jak predat procedure jmeno objektu
> >
> >
> > Zdravim.
> >
> > Je mozne nejakym zpusobem napsat proceduru nebo View, ktera bude pokazde
> > pracovat s jinym objektem (tabulkou)
> > podle predaneho parametru ?
> > Neco jako :
> > =================================
> > CREATE PROCEDURE VLOZ_ZAZNAM (
> > !!XTABLENAME!! ?????,
> > XID CHAR(32),
> > XHODNOTA1 SMALLINT,
> > XHODNOTA2 CHAR(32)
> > RETURNS (XOK SMALLINT)
> > AS
> > begin
> > XOK=0;
> > INSERT INTO !!XTABLENAME!! (ID,POLOZKA1,POLOZKA2)
> > VALUES (:XID,:XPOLOZKA1,:XPOLOZKA2);
> > XOK=1;
> > suspend;
> > end
> > =================================
> >
> > Jde mi o to aby procedura(pohled) byla jen jedna pro celou
> skupinu tabulek
> > se stejnou strukturou.
> > Neprisel jsem na zpusob jak to udelat (mozna to vubec nejde).
> > Jak tedy resite pripady, kdy je potreba zalozit treba kazdy mesic novou
> > prazdnou evidenci
> > a navazat na ni vsechny procedury a pohledny vcetne dzungle
> > grantu k rolim a
> > tabulkam.
> > Mozna na to koukam z uplne spatne strany.
> >
> > Dik za kazde nakopnuti.
> >
> > Ludek
>
>
> ****
> >
> > A nebylo by tedy lepsi na vsechno pouzit jen jedinou tabulku,
> > ktera by obsahovala polozku, udavajici typ entity v radku (napr.
> > EntityType
> > int):
>
> ****
> >v Tvojom pripade by som si tu tabulku rozsiril o pole "MESIAC".
>
> Ahoj.
>
> Prave tomu jsem se chtel z urcitych (rychlost versus velikost tabulky)
> duvodu vyhnout a
> zalozit si tabulku vzdy pro kazde obdobi novou.
>
> Ludek
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
>Editor Hi-Color ICO
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 16.10.2000 08:26:57
Dobry den,
nemate nekdo URL nebo nekde na disku editor (free), ktery umi i hi-color ico
ny a ukladat tyto ikony do resourcu ???
Dekuji
Milan Tomes
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Grafika
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 16.10.2000 08:33:30
Ahoj,
mam komponet, ktery umi otacet s 3D grafy; Chces ho?
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Ing. Patrik Tesar [SMTP:tesar(zv)rainside.sk]
> Odesl�no: 13. X 2000 22:04
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Grafika
>
> Caute
>
> Chcel by som riesit takyto problem:
>
> 1.) Potreboval by som nejaku dokumentaciu/komponentu na rotaciu
> bitmapy v priestore: Pohlad na plochu mapu v urcitom uhle (izometrii a
> pod)
>
> 2.) Trojrozmerny graf typu (nevrazdite ma, ze to znie ludovo) vrstevnicami
> v
> priestore
> nakresleny kopec...
>
> Viem, ze to znie divoko, ale potreboval by som to kreslit v Delphi, resp.
> ak
> to ma byt moc pomale, urobim to vo VC++...
>
> Dik za akukolvek radu...Editor Hi-Color ICO
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 16.10.2000 08:54:39
Ahoj,
zkus Microangelo http:\www.impactsoft.com
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Milan Tome� [SMTP:Milan.Tomes(zv)haida(tec)cz]
> Odesl�no: 16. X 2000 8:27
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Editor Hi-Color ICO
>
> Dobry den,
>
> nemate nekdo URL nebo nekde na disku editor (free), ktery umi i hi-color
> ico
> ny a ukladat tyto ikony do resourcu ???
>
> Dekuji
>
> Milan Tomes
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Ruzne verze BDE
[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 16.10.2000 08:58:23
Mozna by slo ten alias obejit tak ze do TableName nastavis i cestu k tabulce, nejen jeji jmeno a DatabaseName (alias) nechas prazdne. Ale nejsem si jistej jestli to Delphi1 umoznuji.
Jirka Matejka
-----P�vodn� zpr�va-----
Od: Marek Soukup [SMTP:marek(zv)comberg(tec)cz]
Odesl�no: 14. ��jna 2000 14:16
Komu: Konference Delphi
P�edm�t: Ruzne verze BDE
Helou,
mam problem s navazanim na jednu svoji starou app. Je psana jeste v Delphi1
s 16bitovym BDE. Ted potrebuju udelat takovej malinkej programek, kterej
bude napsanej v Delphi5 a bude koukat na ty data z ty 16bitovy aplikace.
Jenze jak zjistit aliasy ? Nejak se mi nepodarilo zjistit jak presvedcit
Delphi, aby brali v uvahu take stare BDE.
Jde to vubec ?
Hrabu se v tom, ale potrebuju to dost surne, takze se ptam i tady.
S pozdravem
Marek Soukup
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Ulozeni dat do tabulky.
[*] Frantisek Sevcik <sevcik(zv)anexis(tec)cz> - 16.10.2000 09:05:46
> Muj problem:
> Kdyz pridam radek do tabulky, tak se mi toto projevi i vypisem v DBGridu.
Po
> ukonceni programu se ale data ztrati - jako by nedoslo k fyzickemu
ulozeni.
>
> Pridani jsem zkousel dvema zpusoby:
> 1)
> ibTable.Append;
> ibTable.FieldByName('BarCode').AsString := EAN;
> ...
> ibTable.Post;
>
> 2)
> ibTable.AppendRecord([EAN, Now, Data[2], Data[3], Data[4], Data[5],
> Data[6], Data[7], Data[8], Data[9], Null, #0,Null, #0, Null]);
> ibTransac.Commit;
>
> Po Comit mi to nahlasi, ze dataset neni v modu editace.
>
ibTable se vubec obcas chova podivne. Kazdopadne prestoze nema vubec cenu
ibtable pro SQL server pouzivat take by me zajimalo, proc ibtable pres
dbgrid data ukazuje a pak je obcas nezapise. Zjistil jsem nasledujici:
posloupnost
transaction.start;
insert;
post;
transaction.commit;
funguje dobre. Stejne funguje pro jiz jednou commitovane radky, ktere se
uvedou do stavu edit a pote zapisi.
Zajimave chovani nastane ve chvili, kdy posloupnost neskonci jeste
transaction.commit a je pozadavek na zmenu vlozeneho radku. Prestoze dbgrid
(po edit a post) ukazuje posledni zmenu a je proveden commit, pri
znovuotevreni ibtable je videt radek s puvodnimi daty.
Po nekolika pokusech jsem zjistil, ze data se korektne ulozi pouze pokud
behem posloupnosti nedojde ke zmene insertu na stav edit.
Takoveto chovani jsem vypozoroval zatim jenom v tabulce, ktera je nastaven
jako detail.
Asi to moc nepomuze, ze ?
Dnes radeji pouzivam pro editaci IBDataset a nebo Ulozene procedury.
Zdravi Frantisek Sevcik
Objekty, ukazatele...
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 16.10.2000 09:28:17
> procedure TForm1.Label1MouseMove(Sender: TObject; Shift:
> TShiftState; X, Y: Integer);
> begin
> if Last<>nil then
> Last^.Caption:='Jsem neaktivn�...';
> Last:=Sender as TLabel;
> Last.Caption:='Jsem aktivn�...';
> end;
>
> David
Sorry, ta striska tam samozrejme nepatri (u Jsem neaktivni).
David
OT: PC jako dalkovy ovladac
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 16.10.2000 09:30:25
Dobry dne,
omlouvam se za OT
chtel jsem se vas odborniku zeptat, zda-li jde nejakym zpusobem udelat
nejake pridavne zarizeni k pocitaci,
ktere by fungovalo jako dalkovy ovladac, kterym bych mohl treba ovladat
video...
V teto oblasti se nepohybuji, takze tomu vubec nerozumim.
Uvitam proto, jakoekoliv pripominky...(clanky, URL, atd.)
Predem moc dekuji
Propojeni Delphi a Cache?
[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 16.10.2000 09:59:48
Zdravim,
najde se nekdo, kdo v Delphi umi pracovat s databazi Cache (InterSystems)? Pry to ma jit bud pres ODBC nebo objektove, ale nedari se mi ...
Diky za radu
Petr Mohapl
Synapse rel.12
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 16.10.2000 10:15:29
Dovoluji si upozornit na novy release me Synapse...
Novinkou je totiz podpora vytvareni i rozebirani MIME e-mail zprav.
Pro nase kraje je ojedinela podpora kodovani narodnich znakovych
sad.
Napriklad mame text v kodovani windows (CP1250), jednoduse jej
hodime jako text zpravy, a vse ostatni se provede za vas. Samo se
to prekoduje do spravneho ISO kodovani, samo se to zakoduje do
QuotedPritable kodu, atd... pri prijimani se zase vse samo
prekoduje do CP1250, takze ve vysledku se o kodovani cestiny
vubec nemusi programator starat...
Upozornuji na to proto, ze je to pravdepodobne prvni takovato
FREE knihovna, ktera neco takoveho vubec nabizi. (viz nedavna
debata zde...)
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
Stay on top v DLL
[*] Krska Vit <v_krska(zv)del(tec)cz> - 16.10.2000 10:16:18
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
to je zname u StayOnTop, kdyz jina aplikace vypise nejakou dulezitou hlasku,
tak ji nemuzes odkliknout, protoze ji pres to okno ve StayOnTop nevidis.
misto stay on top bych pouzil modalni zobrazeni okna v aplikaci.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Patrik Legath
Sent: Monday, October 16, 2000 8:02 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Stay on top v DLL
Mam takyto problem. V Dllke vytvaram Nemodalny formular s vlasnostou
StayOnTop.
procedure ShowOkno(AHwnd : HWND; AOwner : TControl);
begin
Application.Handle := AHwnd ;
Form2 := TForm2.Create(AOwner);
Form2.Show;
end;
AHwnd je vlastnik okna vo Windows. Ked to volam z inej delphi Aplikacie
tak je to Application.
AOwner je objekt, ktory je zodpovedny sa zrusenie okna.
Vsetko funguje Ok ked to volam z ineho Delphi Exe programu. Ked to volam z
Century, a prekliknem na Inu Aplikaciu !!!.
Tak okno zostane StayOnTop aj nad touto aplikaciou, co je sice zaujimavy
efekt, ale nie je to, co bi som chcel.
Nestretli ste sa z niecim takym. Neviete ako by sa to dalo obist. alebo
aspon ake metody zavolat z TApplication, aby sa pri DeAktivacii zmazal
priznak StayOnTop, a pri aktivacii znova nastavil ?TButton
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 16.10.2000 10:21:27
Myslim, ze nejjednodussi by bylo to tlacitko vytvorit jako
potomka TWinControl, nebo TCustomControl (zalezi, jestli chcete,
aby objekt mohl dostat zam��en�). Tu bitmapu bych tam potom
kreslil prez Canvas.
______________________________________________________________
> Od: Martin Pe�ava <jimx(zv)volny(tec)cz>
> Komu: "delphi-l(zv)fwd(tec)cz" <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Sat, 14 Oct 2000 11:57:46 +0200
> P�edm�t: TButton
>
> Ahoj lidicky, uz jsem tu zase a zase s problemem. Chtel bych si
udelat
> komponenty pro praci se Skiny (jako WinAmp). Zacal jsem vlastnim
> potomkem TButtonu:
>
> type
> TSkinButton = class(TButton)
> private
> FSkin : TBitmap;
> procedure SetSkin(PSkin:TBitmap);
> public
> procedure Repaint; override;
> published
> property Skin : TBitmap read FSkin write SetSkin;
> end;
>
> procedure TSkinButton.SetSkin;
> begin
> FSkin:=PSkin; Repaint;
> end;
>
> procedure TSkinButton.Repaint;
> begin
> if FSkin = nil then
> inherited Repaint
> else
> if Parent is TForm then
> BitBlt(TForm(Parent).Canvas.Handle,Left,Top,Width,Height,
> FSkin.Canvas.Handle,0,0,SRCCOPY);
> end;
>
> Ale nefunguje. Nevykresluje tu bitmapu. Kdyz zmenim radek s
BitBlt na
> BitBlt(TForm
(Parent).Canvas.Handle,Left,Top+Height,Width,Height,
> FSkin.Canvas.Handle,0,0,SRCCOPY);
> tak se ta bitmapa vykresli pod to tlacitko, coz je v poradku.
Ale kdyz
> se ma kreslit misto toho tlacitka, tak se nekresli. Proc? Videl
bych to
> tak, ze se tam sice nakresli, ale ten TButton ji zase
prekresli. Jak to
> obejit???
> A dalsi dotaz by byl: Potreboval bych kreslit jinou bitmapu
pokud se na
> to tlacitko clickne. Jediny, co me napadlo bylo dat do
OnMouseDown
> preklesleni, Sleep, preklesleni, ale to je dost hnusny reseni
(Hlavne
> ten Sleep). Co s tim?
> Tohle vsechno se deje pokud to pouzivam jako unitu v nejakym
programu.
> Pokud z toho ale udelam balicek a udelam z toho componentu, tak
pri
> prirazeni bitmapy do skinu (v design timu) mi to zarve nejakou
Access
> Violation v nejakym .BPLku...
> Napadlo me jeste jedno reseni (tak je udelanej BitBtn), ale
je "dost"
> slozity. De o to, ze se odchytava se message CN_DRAWITEM, po
kterem se
> cele tlacitko nakresli. Zkusil jsem to, ale nevim proc se tomu
talcitku
> ten message vubec neposila (nezavola se procedure zavesena na
> CN_DRAWITEM). Mozna je to protoze BitBtn je odvozeno z
GraphicsControl.
> Ja to ale potrebuju z toho TButtonu, abych moh kreslit std
tlacitko
> pokud nejni prirazena Bitmapa.
> Sorry za takovou dylku, ale nevim jak to napsat kratsejc...
> Predem dik za kazdy nakopnuti a radu...
> --
> Martin Pe�ava
>
> /--------------------------------------------------------------\
> | E-Mail: mailto:jimx(zv)volny(tec)cz ICQ# 18148896 |
> | WebMaster of |
> |http://miss.jimx.net - Neofici�ln� str�nka MISS �R a CyberMiss|
> \--------------------------------------------------------------/
>
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
SQL (IB6) jak predat procedure jmeno objektu
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 16.10.2000 10:24:47
> A kolik by ba tabulka mela mit zaznamu ? Kdyz spravne nastavis indexy,
> sestavis optimalne dotazy, tak si myslim, ze by nemel byt problem, od
> toho jsou to db stroje, aby zvladaly velke objemy dat.
>
> Ja jsem kdysi resil podobny problem. Vyvoril jsem si testovaci
> tabulku s cca 2 mil. (neni to moc ale ani malo) zaznamu
> a provadel nad ni dotazy - vysledky mi to vracelo za cca 0.00 s (na MS
> SQL 7.0).
>
> Nebal bych se toho, jen je potreba, jak jiz jsem uvedl, si pohrat s
> dotazama a indexama.
Ahoj,
vezmeme si pro priklad treba ucetnictvi nejake stredne velke firmy.
Kdyz budu chtit mit tabulku ucetnich zapisu a uctovat pro kazdy
rok samostatne. Necht ucetnictvi kazdeho roku znamena radove
nekolik set tisic zapisu. Za par let by ta tabulka mela nekolik
milionu ci desitek milionu radku, z nichz vetsina je v danem roce
vetsinu casu nezajimava. Takove mnozstvi dat ve mne vzbuzuje
obavu. Nebo myslite, ze by nemelo?
David
Ekvalizer
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 16.10.2000 10:25:51
To je sice hezky, ale stale neodpada problem spektralni analyzy.
Pokud bych chtel udelat grafickej ekvalizer, musim si zvuk
rozlozit na jednotliva frekvencni pasma, nektera zesilit, jina
zeslabit, podle nastaveni ekvalizeru a potom to znova slozit.
______________________________________________________________
> Od: "Hurricane" <hurricane(zv)email(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Fri, 13 Oct 2000 15:35:40 +0200
> P�edm�t: Re: Ekvalizer
>
> Zdravim
>
> V knizce Vyuziti rozhranni PC pod Windows je m.j. osciloskop,
kterej snima
> vstup do zvukovky. Pokud se trochu zaobirate programovanim
okolo portu,
> doporucuji koupit (vydavatelstvi HEL, 198Kc). Nebo muzu poslat
ten
> osciloskop i se zdrojaky (D3).
>
> Hurricane
>
>
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
SQL (IB6) jak predat procedure jmeno objektu
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 16.10.2000 10:37:43
Pokud pouzijes indexy, tak rychlost neobstoji, spis by mela jit dolu,
jinak SP triggry,view neumi DSQL, takze je nelze napojit na dynamicky
vytvoreny objekt, ony se totiz kompiluji pri vkladani do DB, ne
pri kazdem prepare, nebo execute.
Slavek
PS: DB jsi podle vseho asi nenavrhoval v CASE :(
> ****
> >
> > A nebylo by tedy lepsi na vsechno pouzit jen jedinou tabulku,
> > ktera by obsahovala polozku, udavajici typ entity v radku (napr.
> > EntityType
> > int):
>
> ****
> >v Tvojom pripade by som si tu tabulku rozsiril o pole "MESIAC".
>
> Ahoj.
>
> Prave tomu jsem se chtel z urcitych (rychlost versus velikost tabulky)
> duvodu vyhnout a
> zalozit si tabulku vzdy pro kazde obdobi novou.
>
> Ludek
> SQL (IB6) jak predat procedure jmeno objektu
[*] L. ZITA <konference(zv)sales(tec)cz> - 16.10.2000 10:48:27
> >
> > Zdravim.
> >
> > Je mozne nejakym zpusobem napsat proceduru nebo View, ktera bude pokazde
> > pracovat s jinym objektem (tabulkou)
> > podle predaneho parametru ?
> > Neco jako :
> > =================================
> > CREATE PROCEDURE VLOZ_ZAZNAM (
> > !!XTABLENAME!! ?????,
> > XID CHAR(32),
> > XHODNOTA1 SMALLINT,
> > XHODNOTA2 CHAR(32)
> > RETURNS (XOK SMALLINT)
> > AS
> > begin
> > XOK=0;
> > INSERT INTO !!XTABLENAME!! (ID,POLOZKA1,POLOZKA2)
> > VALUES (:XID,:XPOLOZKA1,:XPOLOZKA2);
> > XOK=1;
> > suspend;
> > end
> > =================================
> >
> > Jde mi o to aby procedura(pohled) byla jen jedna pro celou
> skupinu tabulek
> > se stejnou strukturou.
> > Neprisel jsem na zpusob jak to udelat (mozna to vubec nejde).
> > Jak tedy resite pripady, kdy je potreba zalozit treba kazdy mesic novou
> > prazdnou evidenci
> > a navazat na ni vsechny procedury a pohledny vcetne dzungle
> > grantu k rolim a
> > tabulkam.
> > Mozna na to koukam z uplne spatne strany.
> >
> > Dik za kazde nakopnuti.
> >
> > Ludek
***
> A kolik by ba tabulka mela mit zaznamu ? Kdyz spravne nastavis indexy,
> sestavis optimalne dotazy, tak si myslim, ze by nemel byt problem,
> od toho jsou to db stroje, aby zvladaly velke objemy dat.
>
> Ja jsem kdysi resil podobny problem. Vyvoril jsem si testovaci
> tabulku s cca 2 mil. (neni to moc ale ani malo) zaznamu
> a provadel nad ni dotazy - vysledky mi to vracelo za cca 0.00 s (na MS SQL
> 7.0).
>
> Nebal bych se toho, jen je potreba, jak jiz jsem uvedl, si pohrat
> s dotazama
> a indexama.
>
Ahoj.
Nakonec jsem to tak udelal a mas pravdu.
Asi jsem preci jen jeste zatizen "souborovym" pristupem k datum.
Stejne by mne ale zajimalo, zda se to da nejak udelat.
Dovedu si predstavit i jine duvody a situace kdy by se to dalo uzit.
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Propojeni Delphi a Cache?
[*] �ejka Jan <Jan.Cejka(zv)merlin(tec)cz> - 16.10.2000 10:53:04
Soucasti instalace free verze Cache jsou i nejake priklady pro Visual
Basicu. Z toho se to nepozna?
-----P�vodn� zpr�va-----
Od: Petr Mohapl [mailto:p.mohapl(zv)nemstbk(tec)cz]
Odesl�no: 16. ��jna 2000 10:00
Komu: Delphi konference
P�edm�t: Propojeni Delphi a Cache?
Zdravim,
najde se nekdo, kdo v Delphi umi pracovat s databazi Cache (InterSystems)?
Pry to ma jit bud pres ODBC nebo objektove, ale nedari se mi ...
Diky za radu
Petr Mohapl
Ekvalizer
[*] Stanislav PETR <glux(zv)centrum(tec)cz> - 16.10.2000 10:54:01
Jeste jedna vec, pokud chcete z toho osciloskopu udelat
ekvalizer, doporucuji jako metodu ahrmonicke analyzy metodu
Diskretni Fournierovy Transformace (DFT filtr), nebo pokud vam
jde jenom o graficke znazorneni staci pouzit Rychlou Fournierovu
Transformaci (FFT filtr), ktery je vpodstate zjednodusenim
Fournierova integralu.
Dalsi informace jsou napr. na :
http://laboro.sh.cvut(tec)cz/~blaska/ - Modern� metody anal�zy
sign�lu.
______________________________________________________________
> Od: "Lukas Strmiska" <strma(zv)volny(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> CC:
> Datum: Sat, 14 Oct 2000 23:40:13 +0200
> P�edm�t: Re: Ekvalizer
>
> plz, carbon copy to strma(zv)volny(tec)cz
> Thanx, Lucas.
>
>
> ----- Original Message -----
> From: "Spider" <spider_x(zv)sendme(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Saturday, October 14, 2000 6:25 PM
> Subject: Re: Ekvalizer
>
>
> > M� pl�z taky, d�k (spider_x(zv)sendme(tec)cz)
> >
> > Spider
> > ----- Original Message -----
> > From: "Petr Ha�lar" <rincewind(zv)volny(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Saturday, October 14, 2000 4:10 PM
> > Subject: Re: Ekvalizer
> >
> >
> > > Moh bys mi taky poslat ty zdrojaky s osciloskopem ? Prosim
prosim.
> > >
> > > Diky.
> > >
> > > Rincewind
> > >
> > > ----- Original Message -----
> > > From: Hurricane <hurricane(zv)email(tec)cz>
> > > To: <delphi-l(zv)fwd(tec)cz>
> > > Sent: Friday, October 13, 2000 3:35 PM
> > > Subject: Re: Ekvalizer
> > >
> > >
> > > > Zdravim
> > > >
> > > > V knizce Vyuziti rozhranni PC pod Windows je m.j.
osciloskop, kterej
> > snima
> > > > vstup do zvukovky. Pokud se trochu zaobirate
programovanim okolo
> portu,
> > > > doporucuji koupit (vydavatelstvi HEL, 198Kc). Nebo muzu
poslat ten
> > > > osciloskop i se zdrojaky (D3).
> > > >
> > > > Hurricane
> > > >
> > > >
> > > >
> > > >
> > >
> >
> >
> >
>
---------------------------------------------
Stanislav PETR
E-Mail: glux(zv)centrum(tec)cz
CB: Standa Karl�n, ch.: 11
27,085 MHz FM, sel.: 0879 DTMF
WWW: cbradio.baf(tec)cz, cgiknihovna.kgb(tec)cz
---------------------------------------------
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
OT: PC jako dalkovy ovladac
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 16.10.2000 10:56:20
Ahoj,
jde to dokonce temer bez pridavneho zarizeni (pouze pripojis IR LED).
Delal jsem to kdysi pod DOSem, pod Woknous by to tak jednoduse neslo,
neb jsem na to pouzil dva timery (ty HW na MB). Princip rizeni je :
nosny kmitocet (byva kolem 40 KHz) ktery se prerusuje. Pokud by sis
chtel neco takoveho udelat, musis zjistit pro konkretni video:
1. nosny kmitocet
2. bitovou rychlost
3. nascanovat prikazy z normalniho dalkoveho ovladani.
Pak postavit generator nosneho kmitoctu a pokud bude bitova rychlost
souhlasit s rychlostmi RS 232, muzes seriovou linku pouzit pro jeho
rizeni.
Vaclav Sazima
Bednar��k Dalibor wrote:
>
> Dobry dne,
>
> omlouvam se za OT
>
> chtel jsem se vas odborniku zeptat, zda-li jde nejakym zpusobem udelat
> nejake pridavne zarizeni k pocitaci,
> ktere by fungovalo jako dalkovy ovladac, kterym bych mohl treba ovladat
> video...
>
> V teto oblasti se nepohybuji, takze tomu vubec nerozumim.
> Uvitam proto, jakoekoliv pripominky...(clanky, URL, atd.)
>
> Predem moc dekuji
komponenta XYGraph
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 16.10.2000 11:12:17
On 15 Oct 2000, at 22:28, Petr MaXXk wrote:
> Diky za nasmerovani, SeriesCount je opravdu definovan v procedure
> Defineproperties,
>
> Chyba je pri provadeni procedury ReadSeriesCount. Pri krokovani mi
> Delphi na prvnim radku hlasi pro reader.readstring Access Violation.
> Zrejme neni vytvoren globalni objekt reader (ktery podle helpu se
> nemusi vytvaret programove), nebo jej nezna jen tato procedura. Dal uz
> moje znalosti nedovoluji urcit, kde je chyba.
Jeste je treba zkontrolovat zapis property, zda je shodny se
ctenim. Chyba muze byt v tom, ze se zapisuje jinak nez cte.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Small x Large Fonts
[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 16.10.2000 09:33:55 met-1
Ahoj!
Mam jeden takovy problem, se kterym si nevim rady. Potrebuju, aby muj
program, ktery vytvarim na PC, kde pouzivam small fonts (tj. 96
dpi) vizualne vypadal uplne stejne i na pocitacich s jinym nastavenim
fontu (treba Large fonts). Zmenu velikosti formulare zakazu jednoduse
pres Scaled := false, ale nevim, jak dosahnout toho, aby se mi
nezmenila i "velikost" fontu, resp. jak ji prepocitat tak, aby to
opticky vypadalo stejne. Navic problem je jeste v tom, ze pouzivam
standardni font MS Sans Serif, ktery IMHO neni true type, ze ano.
Dokaze nekdo poradit nebo aspon postrcit spravnym smerem? Dival jsem
se do archivu konfery, ale nijak uspesne.
Jirka.Kodovani cestiny
[*] Petr J�nsk� - 16.10.2000 11:56:47
Tak trochu OT.
Napadlo me, ze by mohl existovat nejaky programek, ktery pozna v jake
cestine je text napsan.
Nejspise podle pismen, jejichz kod je pouze v jedne kodove sade.
Priklad (nezkoumal jsem): � je 253 - Latin2 to znamena, ze cely text je v
Latin2.
Asi by to nefungovalo na 100%, ale u dostatecne dlouheho textu by to mohlo
vyjit.
Nezamyslel se nekdo nad tim?
Zdar Buh
Petr J�nsk�
Problem s IBUpdateSQL
[*] L. ZITA <konference(zv)sales(tec)cz> - 16.10.2000 11:58:48
Zdravim.
Mam nasledujici problemy s IBUpdateSQL potazmo IBQuery:
1) Pokud v ModifySQL pouziji volani vlozene procedury tak se sice vse
provede, ale vyvola se vyjimka
"Update Failed"
2) Potreboval bych v IBQuery.OnUpdateRecord zkontrolovat navratovou hodnotu
procedury a odchytit chyby.
Ovsem daleko jsem se nedostal.
Nemuzu to totiz ani prelozit protoze na nasledujici kod mi prekladac zarve
na kompatibilitu
TIBUpdateAction a TUpdateAction.
procedure TForm1.IBQuery1UpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TIBUpdateAction);
begin
...
UpdateAction := uaApplied;
...
end;
Pritom v TIBCustomDataset.pas je definovano
TIBUpdateAction = (uaFail, uaAbort, uaSkip, uaRetry, uaApply, uaApplied);
a bohuzel v unite DB.pas (na formu mam TDataset) je
TUpdateAction = (uaFail, uaAbort, uaSkip, uaRetry, uaApplied);
Proboha co delam blbe ?
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000