Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
MemorySleuth
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 06.10.2002 16:32:13
Puvodni zprava, kterou napsal Dalibor Toman dne 6 Nov 2002:
> Zatim vsechno, co jsem videl modifikovalo zdrojaky (dopisovaly se
> instrukce k odecteni casu). Coz nemam rad. Pro ucely vlastnich potreb jsem
Memory Sleuth a Sleuth QA Suite vubec nepotrebuji zadne dopisovani neceho
do zdrojaku. Zdrojaky jsou samozrejme nutne pro to, aby to ukazalo presne
v kodu, kde co dlouho trva, kde presne jsou bugy, memory/resource leaky
apod. Ale nic se nekompiluje, pousti se to na EXE.
> Jestli existuje neco jako stary dobry skvely Trubo Profiler z dob DOSu
> netusim. Ale bylo by to fajn (kdyby to tak jeste bylo soucasti dodavky
> Delphi Pro...)
Existuje prave Memory Sleuth a Sleuth QA Suite a jeste pak dalsi produkty
od jinych firem...
S pozdravem
Petr Zahradnik, pocitacovy expert
=======================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 475 500 610, 475 501 627, 475 511 337
Mobilni telefon: 602 409 601, Fax: 475 511 338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
=======================================================MemorySleuth
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 06.10.2002 16:34:07
Puvodni zprava, kterou napsal Jakub Dusek dne 6 Nov 2002:
> slysel jsem o nejakem produktu MemorySleuth, zaujala me jeho cast Line
> Profiler (zjisti kolik casu trva kazda radka v rutine), na webu
> TurboPoweru jsem ale nenasel zadnou trial verzi kterou bych mohl
> vyzkouset. Mate s tim nekdo zkusenosti? Popripade doporucte nejaky jiny
> podobny program.
Nevim, kde jsi hledal, ale je tam:
http://www.turbopower.com/trialrun/
S pozdravem
Petr Zahradnik, pocitacovy expert
=======================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 475 500 610, 475 501 627, 475 511 337
Mobilni telefon: 602 409 601, Fax: 475 511 338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
=======================================================DELPHI6, DB a UNICODE
[*] Jan Grman <J.Grman(zv)kmer.elf.stuba.sk> - 6.10.2002 16:45:55
Ahojte,
ma niekto skusenosti s kombinaciou %subject% ?
Pokial ide o databazy ide mi hlavne o MS SQL a ORACLE !
Zaujima ma:
- cim pristupujete na DB
- pomocou coho editujete a zobrazujete DATA
- ako realizujete zapis hodnot
Pripadne mi poslite linky ktore by sa tejto temy mohli tykat.
Vdaka srdecna.
jg
DELPHI6, DB a UNICODE
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 06.10.2002 17:18:33
On 6 Nov 2002 at 16:45, Jan Grman wrote:
> Ahojte,
> ma niekto skusenosti s kombinaciou %subject% ?
> Pokial ide o databazy ide mi hlavne o MS SQL a ORACLE !
MS SQL v pohode, jinak nez unicode texty neukladam, pokud se tam muze
aspon potencialne vyskytnout diakritika.
> Zaujima ma:
> - cim pristupujete na DB
Pres OLE DB.
> - pomocou coho editujete a zobrazujete DATA
Specialnimi komponentami, ktere umi unicode.
> - ako realizujete zapis hodnot
Vezmu unicode, a takto ho soupnu databazi.
Jinak doporucuji .NET, tam jsou unicode nativne (no, s urcitymi
vyjimkami v resourcech). Doufam, ze to Borland zachova a nebude to
prevadet do Ansi.
S pozdravem
Zbysek Hlinka
DELPHI6, DB a UNICODE
[*] Jan Grman <J.Grman(zv)kmer.elf.stuba.sk> - 6.10.2002 17:46:27
> > - pomocou coho editujete a zobrazujete DATA
> Specialnimi komponentami, ktere umi unicode.
Rastu niekde alebo je to vlastna vyroba ?
Ved nemusis byt az tak velmi strucny v odpovedi.. :-)
> > - ako realizujete zapis hodnot
> Vezmu unicode, a takto ho soupnu databazi.
Takto? Hmm... a nejak inak by sa nedalo ?
Ale vazne. Myslim ze toto nebolo od Teba myslene ako rada.
To je akoby som ja povedal ze nesiel som dva kluce. "Jeden cerveny a jeden
takyto..." spoznal si ich?
jg
Odchyceni komunikace na COM portu
[*] Tom� Janta��������{����Y��̿ - 6.10.2002 17:50:17
jde pouze o monitorovani komunikace, nebo i o pripadnou filtraci prenasenych
informaci?
jde o hardwarove odposlouchavani/filtrovani linky, nebo tou cernou skrinkou
myslite PC a chcete odposlech/filtraci provozovat primo tam?
nase firma se komunikacemi zaobira jiz delsi dobu a mame vyvinuto mnoho
koncovych zarizeni, ktere jsou pro takoveto aplikace vhodne. Pokud nekdo ma
podobne problemy nebo dotazy, radi Vam poradime. Kontakt najdete na nasich
strankach.
Tomas Jantac
PaPouch elektronika
www.papouch.com
ps. omlouvam se za reklamu, ale vramci odpovedi na dotaz je tato informace
namiste
> potreboval bych monitorovat cinnost modemu, pripojenych na COM port.
> Jednotlive modemy ovlada aplikace typu cerna skrinka, ktera ovlada modem
> primo pomoci zasilani AT prikazu na dany com-port.
> Rad bych filtroval danou komunikaci transparentne danemu systemu.
> Predstavoval bych si to tak nejak, ze by mi system zasilal nejake zpravy o
> aktivite daneho COM portu.
> Pekne je to udelane napr. v teto aplikaci
> http://www.sysinternals.com/ntw2k/freeware/portmon.shtml
Declarace vs Definice metody v Delphi
[*] Jan K��ek - 6.10.2002 17:58:26
> From: "Michal" <delphi-konference(zv)bcpraha.com>
> > Chtel bych se zeptat, jestli byste mi mohl nekdo vysvetlit proc je
> > nasledujici priklad spravne (teda podle prekladace D3).
> Jedine vysvetleni by
> > bylo, ze v definici jiz nemusim psat parametry pokud
> nechci. Jak se ale bude
>
> Ano, ale neni dobre to pouzivat, prave uz jen z duvodu ktery
> si zminil dale.
>
> > chovat program kdyz ho zkusim prelozit v D5, kde je
> umozneno pretezovani?
>
> Nepujde prelozit a dostanes chybove hlaseni:
> [Error] Declaration of 'XY' differs from previous declaration
>
Ale pouze pokud pouzive overload directivu, jinak to jde i v D5.
Ja jsem pouzival definice bez uvadeni parametru. Ale pote co mi byla
prozrazena kombinace Ctrl+Shift+C, tak uz nepouzivam. Protoze napoprve
se mi parametry skopiruji sami a pri oprave se stejne musi dolu.
Honza +
DELPHI6, DB a UNICODE
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 06.10.2002 18:07:11
On 6 Nov 2002 at 17:46, Jan Grman wrote:
> > > - pomocou coho editujete a zobrazujete DATA
> > Specialnimi komponentami, ktere umi unicode.
>
> Rastu niekde alebo je to vlastna vyroba ?
> Ved nemusis byt az tak velmi strucny v odpovedi.. :-)
Castecne prevzate, castecne vlastni vyroba. Zatim to najdes na
http://www.hlinka(tec)cz/download/oledb1.zip
Ale bez dokumentace a prikladu. Ty uz nejspis delat nebudu. :-)
> > > - ako realizujete zapis hodnot
> > Vezmu unicode, a takto ho soupnu databazi.
>
> Takto? Hmm... a nejak inak by sa nedalo ?
A proc? Urcite by to slo sloziteji, ale nevidim pro to duvod.
:-)
> Ale vazne. Myslim ze toto nebolo od Teba myslene ako rada.
> To je akoby som ja povedal ze nesiel som dva kluce. "Jeden cerveny a
> jeden takyto..." spoznal si ich?
Posilam je napriklad pres ulozenou proceduru. Tedy aspon tam, kde na
datech zalezi.
S pozdravem
Zbysek Hlinka
DELPHI6, DB a UNICODE
[*] Jan Grman <J.Grman(zv)kmer.elf.stuba.sk> - 6.10.2002 18:44:01
> Castecne prevzate, castecne vlastni vyroba. Zatim to najdes na
> http://www.hlinka(tec)cz/download/oledb1.zip
Velmi, velmi zaujimave...
Je to tvrdo viazane len na MS SQL alebo by sa to podobne ako ADO dalo pouzit
aj na ORACLE 9i ?
(ADO tiez vlastne vnutorne pouziva OLEDB nie ?)
Pre mna je totiz dolezite aby to fungovalo na oboch platformach... inak sa
nepohnem!
jg
DELPHI6, DB a UNICODE
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 06.10.2002 19:45:08
On 6 Nov 2002 at 18:44, Jan Grman wrote:
> > Castecne prevzate, castecne vlastni vyroba. Zatim to najdes na
> > http://www.hlinka(tec)cz/download/oledb1.zip
>
> Velmi, velmi zaujimave...
> Je to tvrdo viazane len na MS SQL alebo by sa to podobne ako ADO dalo
> pouzit aj na ORACLE 9i ? (ADO tiez vlastne vnutorne pouziva OLEDB nie
> ?) Pre mna je totiz dolezite aby to fungovalo na oboch platformach...
> inak sa nepohnem!
Vyzkousene to mam proti MS SQL. Pro Oracle by to asi chtelo prelozit
prislusny hlavickovy soubor a zaclenit do kodu. Nevim, musel bys to
vyzkouset.
Je tam jedna otevrena zalezitost, a to posilani velkych blobu do
databaze. Nemam to moc vyzkousene, takze to mozna muze delat
problemy.
S pozdravem
Zbysek Hlinka
Odchyceni komunikace na COM portu
[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 6.10.2002 20:37:20
> Bez kernel driveru to neudelas, prave neco takoveho pouziva i ten Portmon.
Co je to ten kernel driver - je aspon nejaka realna moznost to napsat?
JK
Odchyceni komunikace na COM portu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 6.10.2002 20:46:42
Napsat se da, ale ne v Delphi. A typnul bych si, ze napsat jej zvladne
jen par lidi v republice.
Je to vlastne ovladac na urovni systemu.
--
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
6.11.2002 Jiri Kratochvil:
>> Bez kernel driveru to neudelas, prave neco takoveho pouziva i ten Portmon.
> Co je to ten kernel driver - je aspon nejaka realna moznost to napsat?
> JK
Jak simulovat stisk tlacitka
[*] Petr Varga <djvar(zv)post(tec)cz> - 06.10.2002 21:50:26
Ahoj
potreboval bych poradit jak simulovat stisk tlacitka.. Nemyslim tim
zavolat jeho udalost onclick, ale onu vizualni cast.. To znamena aby
to bylo presne jako kdyz na nem zmacnu mys a pak zase pustim...
Nekde jsem to kdysi videl a vim, ze mi to fungovalo, ale nejak ted
kdyz to potrebuji si nemohu vzpomenout
Diky Varga Petr
--
---
V�hodn� ceny letenek najdete v�dy na http://letenky.volny(tec)cz
VB - Delphi
[*] Jozef Baranec <joba(zv)digitaldocuments.org> - 6.10.2002 22:21:54
Dik pomohlo to ...
jozo
----
var
mEnum: IEnumVariant;
mVar: OleVariant
n: Integer;
begin
mEnum := obj._NewEnum as IEnumVariant;
OLECheck(mEnum.Next(1, mVar, n));
while (n > 0) do begin
//v mVar k dispozici IDispatch na objekt v kolekci
OLECheck(mEnum.Next(1, mVar, n));
end;
end;
Martin Schayna
Zakodovani dat v FB nebo IB
[*] Petr K. <xdelphi(zv)seznam(tec)cz> - 6.10.2002 22:23:36
Zdravim zacal jsem pouzivat Firebird DB a chci se zeptat jak maximalne
zabezpecit data v tabulkach.
Diky Petr
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.410 / Virov� b�ze: 231 - datum vyd�n�: 31.10.2002
Odchyceni komunikace na COM portu
[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 6.10.2002 22:42:49
> Napsat se da, ale ne v Delphi. A typnul bych si, ze napsat jej zvladne
> jen par lidi v republice.
> Je to vlastne ovladac na urovni systemu.
Aha - no ja mezi ne nepatrim .... ;-)
Btw: Vidite tedy jinou�moznost, jak softwarove sledovat stav COM portu?
Diky
JK
> 6.11.2002 Jiri Kratochvil:
> >> Bez kernel driveru to neudelas, prave neco takoveho pouziva i ten
Portmon.
> > Co je to ten kernel driver - je aspon nejaka realna moznost to napsat?
>
> > JK
>
Jak simulovat stisk tlacitka
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 6.10.2002 23:11:38
Ahoj
Toto simuluje stlacenie Enter na tlacitku btnOk
PostMessage(btnOk.Handle, WM_KeyDown, VK_RETURN, 0);
PostMessage(btnOk.Handle, WM_KeyUp, VK_RETURN, 0);
Vlado
> potreboval bych poradit jak simulovat stisk tlacitka.. Nemyslim tim
> zavolat jeho udalost onclick, ale onu vizualni cast.. To znamena aby
> to bylo presne jako kdyz na nem zmacnu mys a pak zase pustim...
> Nekde jsem to kdysi videl a vim, ze mi to fungovalo, ale nejak ted
> kdyz to potrebuji si nemohu vzpomenout Quick Report do jineho standart formatu
[*] Macecek Marcel <marcel.macecek(zv)siemens(tec)com> - 7.10.2002 09:02:44
Mam problem, potreboval bych dostat formular z Quick Reportu do nejakeho jineho standartniho el. formatu jako je napr. Word dokument, pdf, Excel nebo tak neco.
Neznate nekdo nejakou komponentu nebo zpusob, jak toho dosahnout v D6 ????
Dik
Marcel
DBF
[*] Dalibor <dalibor(zv)torola(tec)cz> - 07.10.2002 09:30:31
Zkouseli jste nekdo pres BDE otevrit DBF Dbase III, zda se mi, ze to
nezobrazuje korektne. Treba v sloupci, ktery je LOGICAL, je urcite
bud true nebo false, ale BDE zobrazuje celkem casto NULL a vubec
to vypada jako by to DBF melo poskozenou hlavicku. Nemate s tim
nekdo zkusesenosti. Zkousel jsem to i pres ODBC, ale taky nic moc..
Dik
DBF
[*] Rumcajs - konference <konrum(zv)seznam(tec)cz> - 7.10.2002 09:35:43
Muzes byt v klidu, ja pouzivam taky DBase a vim, ze kdyz vytvarim novou
tabulku a pole typu boolean nezadam default hodnotu, bude tam NULL ...
Rumcajs
> Zkouseli jste nekdo pres BDE otevrit DBF Dbase III, zda se mi, ze to
> nezobrazuje korektne. Treba v sloupci, ktery je LOGICAL, je urcite
> bud true nebo false, ale BDE zobrazuje celkem casto NULL a vubec
> to vypada jako by to DBF melo poskozenou hlavicku. Nemate s tim
> nekdo zkusesenosti. Zkousel jsem to i pres ODBC, ale taky nic moc..
>
> Dik
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.410 / Virov� b�ze: 231 - datum vyd�n�: 31.10.2002
Jak simulovat stisk tlacitka
[*] Tom� Janta��������{����Y��̿ - 7.10.2002 09:42:20
pokud chces opravdu simulovat stisk tlacitka mysi (melo by vsak bohate
stacit WM_KEYDOWN), pak se podivej do helpu na zpravu WM_LBUTTONDOWN
Tomas Jantac
PaPouch elektronika
www.papouch.com
> Toto simuluje stlacenie Enter na tlacitku btnOk
> PostMessage(btnOk.Handle, WM_KeyDown, VK_RETURN, 0);
> PostMessage(btnOk.Handle, WM_KeyUp, VK_RETURN, 0);
>> potreboval bych poradit jak simulovat stisk tlacitka.. Nemyslim tim
>> zavolat jeho udalost onclick, ale onu vizualni cast.. To znamena aby
>> to bylo presne jako kdyz na nem zmacnu mys a pak zase pustim...
>> Nekde jsem to kdysi videl a vim, ze mi to fungovalo, ale nejak ted
>> kdyz to potrebuji si nemohu vzpomenout
Odchyceni komunikace na COM portu
[*] Tom�s Jantac <tomasnusle(zv)volny(tec)cz> - 7.10.2002 09:52:22
Pokud jde o odposlouchavani serioveho portu, ktery ma jiz otevrena jina
aplikace, pak nejjednodussi zpusob bude odposlouchavat port hardwerove
pomoci druheho portu. Pak ovsem nastava dalsi problem v pripade ze jde o
plne duplexni komunikaci. V tom pripade se musime spokojit bud jen s jednim
kanalem, nebo pouzit dvou seriovych portu na odposlech. Zapojeni
odposlechoveho kabelu je velmi jednoduche na pozadani poslu. Pokud by vsak
melo byt vse podle norem, bylo by nutne udelat takovy maly rozbocovac s
aktivnimi prvky. Ale pokud nejde o nejake extremni podminky, staci jen dve
diody a odpor (overene v praxi).
Tomas Jantac
PaPouch elektronika
www.papouch.com
> Btw: Vidite tedy jinou�moznost, jak softwarove sledovat stav COM portu?Zakodovani dat v FB nebo IB
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 7.10.2002 09:53:37
> Zdravim zacal jsem pouzivat Firebird DB a chci se zeptat jak maximalne
> zabezpecit data v tabulkach.
Pokud je server v intranetu:
1. server na miste, kde k nemu ma pristup jen administratorem povereni lide
2. bezpecny operacni system - Linux nebo W2000
3. sitovy pristup jen pro pozadovane site (ipchains a spol.)
4. sledovani bezpecnostnich updatu OS a FB a jejich vcasna instalace
5. duveryhodny root/administrator a slozite, tajne heslo
6. dobre navrzena prava na databazi (GRANT, REVOKE)
7. donutit uzivatele pouzivat slozita hesla a menit je.
Toto podle mne na normalni firemni urovni plne postacuje.
Jeste existuje postup pro lepsi autentifikaci uzivatelu v IB nez je ta
standardni. Ja to ale nepouzivam, protoze pak nefunguji nektere komponenty s
pristupem k IB Services.
Leos
PS: pokud slo o kryptovani dat v ramci DB, tak asi jedine na klientu
kryptovat a ukladat "nesmysly". Ovsem za cenu podstatneho snizeni vykonu
aplikace.Zakodovani dat v FB nebo IB
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 7.10.2002 10:00:20
Jeste doplneno: W2000 jsou mineny i NT a XP, proste servery, ktere umi
zabezpecit adresare a jsou stabilni.
----- Original Message -----
From: "Leos Urban" <Leos.Urban(zv)iol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, November 07, 2002 9:53 AM
Subject: Re: Zakodovani dat v FB nebo IB
> > Zdravim zacal jsem pouzivat Firebird DB a chci se zeptat jak maximalne
> > zabezpecit data v tabulkach.
>
> Pokud je server v intranetu:
> 1. server na miste, kde k nemu ma pristup jen administratorem povereni
lide
> 2. bezpecny operacni system - Linux nebo W2000
> 3. sitovy pristup jen pro pozadovane site (ipchains a spol.)
> 4. sledovani bezpecnostnich updatu OS a FB a jejich vcasna instalace
> 5. duveryhodny root/administrator a slozite, tajne heslo
> 6. dobre navrzena prava na databazi (GRANT, REVOKE)
> 7. donutit uzivatele pouzivat slozita hesla a menit je.
>
> Toto podle mne na normalni firemni urovni plne postacuje.
>
> Jeste existuje postup pro lepsi autentifikaci uzivatelu v IB nez je ta
> standardni. Ja to ale nepouzivam, protoze pak nefunguji nektere komponenty
s
> pristupem k IB Services.
>
> Leos
>
> PS: pokud slo o kryptovani dat v ramci DB, tak asi jedine na klientu
> kryptovat a ukladat "nesmysly". Ovsem za cenu podstatneho snizeni vykonu
> aplikace.
>
>
>
Quick Report do jineho standart formatu
[*] Pavel Mattivi <pmattivi(zv)dezadata(tec)cz> - 7.10.2002 10:04:22
v D6 proffesionnal jsou jen komponenty QRTextFilter, QRCSVFilter a
QRHTMLFilter pro p�evody do p��slu�n�ch form�t�. Mo�n� nab�z� placen� verze
QReportu v�ce
P.
> Mam problem, potreboval bych dostat formular z Quick Reportu do nejakeho
jineho standartniho el. formatu jako je napr. Word dokument, pdf, Excel nebo
tak neco.
> Neznate nekdo nejakou komponentu nebo zpusob, jak toho dosahnout v D6 ????
Quick Report do jineho standart formatu
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 7.10.2002 10:30:09
----- Original Message -----
From: "Pavel Mattivi" <pmattivi(zv)dezadata(tec)cz>
> v D6 proffesionnal jsou jen komponenty QRTextFilter, QRCSVFilter a
> QRHTMLFilter pro p�evody do p��slu�n�ch form�t�. Mo�n� nab�z� placen� verze
> QReportu v�ce
> P.
>
> > Mam problem, potreboval bych dostat formular z Quick Reportu do nejakeho
> jineho standartniho el. formatu jako je napr. Word dokument, pdf, Excel nebo
> tak neco.
Ano, placena verze (v tuto chvili pouzivame QR 3.5) ma exporty do txt, csv,
rtf, xls, html, pdf. Do html je mozne exportovat dvema zpusoby, bud tak ze
se vyrabi tabulka (typicke pro sloupcove sestavy) nebo tak ze se pro kazdy
text vyrobi <div> element s presnym umistenim na strance, coz lepe odpovida
definici reportu, ale prakticky lze pouzivat pouze pod IE. Pdf export vypada
take dobre, bohuzel neumi exportovat cestinu.
Martin Schayna
Jak simulovat stisk tlacitka
[*] ViragI(zv)logica(tec)com - 7.10.2002 10:45:27
Pokud toto nadefinuju, jako udalost na stisknuti jineho tlacitka s tim aby
se mi pohnul i knoflik btnOk, tak mi aplikace totalne zmrzne. Jak je to
mozne?
Ivan Virag
-----Original Message-----
From: Ing. Keder Vladimir [mailto:vkeder(zv)iol.sk]
Sent: Wednesday, November 06, 2002 11:12 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak simulovat stisk tlacitka
Ahoj
Toto simuluje stlacenie Enter na tlacitku btnOk
PostMessage(btnOk.Handle, WM_KeyDown, VK_RETURN, 0);
PostMessage(btnOk.Handle, WM_KeyUp, VK_RETURN, 0);
Vlado
> potreboval bych poradit jak simulovat stisk tlacitka.. Nemyslim tim
> zavolat jeho udalost onclick, ale onu vizualni cast.. To znamena aby
> to bylo presne jako kdyz na nem zmacnu mys a pak zase pustim...
> Nekde jsem to kdysi videl a vim, ze mi to fungovalo, ale nejak ted
> kdyz to potrebuji si nemohu vzpomenout
This e-mail and any attachment is for authorised use by the intended recipient(s) only. It may contain proprietary material, confidential information and/or be subject to legal privilege. It should not be copied, disclosed to, retained or used by, any other party. If you are not an intended recipient then please promptly delete this e-mail and any attachment and all copies and inform the sender. Thank you.
Umisteni standardnich ikon na toolbar textoveho ed
[*] Petr Va�eka <pvareka(zv)mujmejl(tec)cz> - 7.10.2002 11:14:11
Zdravim konferu.
Chtel bych umistit napr. na button toolbaru majici funkci SAVE obrazek
diskety . Vim ze ktomu potrebuji komponentu IMAGELIST a vim jak ji mam
propojit s buttony komponenty TOOLBAR. Jedine o cem nemam poneti je umisteni
onech standardnich ikon, ktere jsou bezmala soucasti kazde aplikace
(OpenFile - otevrena knizka, SaveFile - disketa , atd.)
Poradi mi nekdo ?
Petr Vareka
Problem s rozlisenim
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 7.10.2002 11:19:44
Zdravim
mam ActiveX componentu pro resize obrazku. Tvz. thumbnailer a na
jednom serveru jsme prisly na zajimavy problem kdyz to zmensovalo
obrazek tak ho to sice zmensilo ale zmenilo to z 16bitovyho shematu
barev na 256 nebo 16 barevne schema. Takze ten obraze je dosti
hunsnej. Pouzivam jpeg, gifimage unity a potreboval bych poradit
kde to v kodu najit ten kousek kterej nacte tu barevnou hloubku 256 ?.
Diky moc Milan
Quick Report do jineho standart formatu
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 7.10.2002 12:18:42
> Mam problem, potreboval bych dostat formular z Quick Reportu do
> nejakeho jineho standartniho el. formatu jako je napr. Word dokument,
> pdf, Excel nebo tak neco. Neznate nekdo nejakou komponentu nebo zpusob,
> jak toho dosahnout v D6 ????
Ahoj,
pro export do PDF pouzivam momentalne trosku krkolomny zpusob, ale funguje a je levny:
nainstalovana tiskarna, ktera produkuje PDF (v nasem pripade z PPD995.com; sharware, zobrazuje
reklamu nebo stoji 10 dolaru), u te se da nastavit, aby vystup davala vzdy do jednoho souboru
(napr. c:\temp\output.pdf). Aplikace to posle na tuto tiskarnu, pocka, az je vytvoren soubor
(nenulova velikost, mozno otevrit ve vyhradnim rezimu). S tim souborem pak dal manipuluje (ulozi,
kam chtel uzivatel, nebo posle mailem...). PPD995 umi i cestinu.
Karel Rys
Odchyceni komunikace na COM portu
[*] David Kraina <DKx(zv)seznam(tec)cz> - 07.10.2002 13:47:08
Dne 6. listopad 2002, <delphi-l(zv)clexpert(tec)cz> napsal:
V pohode se to da udelat i bez kernelu pouzitim assemlberu,
ale pod jen pod Win9x - pod NT by to spadlo, jelikoz
na to musi byt prava.> Btw: Vidite tedy jinou�moznost, jak softwarove sledovat stav COM portu?
______________________________________________________________________
Reklama:
Obchodn� d�m(tec)cz - �irok� sortiment dom�c�ch spot�ebi�� a elektroniky, v�razn� slevy. Nav�tivte http://www.obchodni-dum(tec)cz/index.phtml?prov=59
Odchyceni komunikace na COM portu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.10.2002 13:56:24
From: "David Kraina" <DKx(zv)seznam(tec)cz>
> V pohode se to da udelat i bez kernelu pouzitim assemlberu,
Neni nad seriozni reseni, navic co kdyz to bude treba virtualni port na uplne
jinem hardwaru. Pro monitorovani lze prece pouzit i tu ukazkovou aplikaci na
sysinternals.
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
Odchyceni komunikace na COM portu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 7.10.2002 14:05:27
7.11.2002 David Kraina:
> Dne 6. listopad 2002, <delphi-l(zv)clexpert(tec)cz> napsal:
> V pohode se to da udelat i bez kernelu pouzitim assemlberu,
> ale pod jen pod Win9x - pod NT by to spadlo, jelikoz
> na to musi byt prava.
Nejde ani tak o prava, jako o to, ze te system na HW nepusti.
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Zakodovani dat v FB nebo IB
[*] Pavel Cisar <pcisar(zv)users.sourceforge(tec)net> - 7.10.2002 15:52:43
Haj hou!
On 6 Nov 2002 at 22:23, Petr K. wrote:
> Zdravim zacal jsem pouzivat Firebird DB a chci se zeptat jak maximalne
> zabezpecit data v tabulkach.
Mno, ale to jsi poskytl malo informaci :) Jaka data, pred kym a proti
jakemu "utoku" je chces chranit ? Bude mit uzivatel fyzicky pristup k db
nebo ne ? Na jake OS ?
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
FORMULAR & PARAMETRY
[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 7.10.2002 16:03:33
PROSIM, POMOOOOOOOCT
Prosim o radu, protoze jsem z toho uz na prasky.
Jde mi o vytvoreni formulare s parametry.
Napr. v UNIT_1 mam proceduru:
procedure TForm.VytvorForm(Titulek: string; Sirka, Vyska: integer);
begin
VytvorForm('Tohle je okno', 100, 100);
end;
rad bych po zavolani teto procedury programove vytvoril formular, treba MyForm,
kde Caption bude prvni parametr, Height druhy a Width treti.
Muzete mi prosim nekdo napsat maly priklad ?
Moc diky
V.
PS: A jeste nejlepe, kdyby to nebyla procedura, ale funkce a vracela mi, jak treba to vytvoreni dopadlo.
FORMULAR & PARAMETRY
[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 7.10.2002 16:06:25
fcia ti vrati pointer na formular alebo nil, ak sa ho nepodarilo vytvorit
function CreateMyForm(const isCaption: string; const inHeight, inWidth:
integer): TForm;
begin
Result := TMyForm.Create(Application);
if (Assigned(Result)) then
begin
Result.Caption := isCaption;
Result.Height := inHeight;
Result.Width := inWidth;
Result.Show;
end;
end;
alebo ak chces len dialog a chces jeho navratovu hodnotu
function CreateMyForm(const isCaption: string; const inHeight, inWidth:
integer): integer;
var
lrFrm: TMyForm;
begin
lrFrm := TMyForm.Create(Application);
try
lrFrm.Caption := isCaption;
lrFrm.Height := inHeight;
lrFrm.Width := inWidth;
Result := lrFrm.ShowModal;
finally
lrFrm.Release;
end;
end;
pisane z hlavy, takze maybe male chybky ;)
Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 241010111 (181)
fax: +420 241010165
icq: 38493645
-----P�vodn� zpr�va-----
Od: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
Odesl�no: 7. listopadu 2002 16:04
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: FORMULAR & PARAMETRY
PROSIM, POMOOOOOOOCT
Prosim o radu, protoze jsem z toho uz na prasky.
Jde mi o vytvoreni formulare s parametry.
Napr. v UNIT_1 mam proceduru:
procedure TForm.VytvorForm(Titulek: string; Sirka, Vyska: integer);
begin
VytvorForm('Tohle je okno', 100, 100);
end;
rad bych po zavolani teto procedury programove vytvoril formular, treba
MyForm,
kde Caption bude prvni parametr, Height druhy a Width treti.
Muzete mi prosim nekdo napsat maly priklad ?
Moc diky
V.
PS: A jeste nejlepe, kdyby to nebyla procedura, ale funkce a vracela mi, jak
treba to vytvoreni dopadlo.
Delphi a regularni vyrazy ...
[*] skalsky(zv)oksystem(tec)cz - 7.10.2002 16:07:19
Hi all,
Neracoval jste nekdo v Delphi s regularnimi vyrazy (je potreba
nejaka komponenta nebo knihovna)?
Diky moc za info.
Milan
FORMULAR & PARAMETRY
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 7.10.2002 16:09:12
function VytvorForm(const Titulek: string; const Sirka, Vyska: integer)
: TModalResult;
begin
MyForm := TMyForm.Create(nil);
try
MyForm.Caption := Titulek;
MyForm.Width := Sirka;
MyForm.Height := Vyska;
Result := MyForm.ShowModal;
finally
MyForm.Free;
end;
end;
A.
> -----Original Message-----
> From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
>
>
> Napr. v UNIT_1 mam proceduru:
>
> procedure TForm.VytvorForm(Titulek: string; Sirka, Vyska: integer);
> begin
> VytvorForm('Tohle je okno', 100, 100);
> end;
>
> rad bych po zavolani teto procedury programove vytvoril
> formular, treba MyForm,
> kde Caption bude prvni parametr, Height druhy a Width treti.
>
> Muzete mi prosim nekdo napsat maly priklad ?
FORMULAR & PARAMETRY
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.10.2002 16:12:14
From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
> rad bych po zavolani teto procedury programove vytvoril formular, treba
> MyForm, kde Caption bude prvni parametr, Height druhy a Width treti.
function CreateForm(FormClass: TFormClass; const Caption: string; Width,
Height: Integer): TForm;
begin
Result := FormClass.Create(Application);
Result.Caption := Caption;
Result.SetBounds(Result.Left, Result.Top, Width, Height);
Result.Show;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
CreateForm(TForm1, 'Titulek', 100, 100);
end;
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
FORMULAR & PARAMETRY
[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 7.10.2002 16:13:50
DIKY VSEM ZA POMOC A RADU.
V.
-----Original Message-----
From: Ales Vasicek [mailto:vasicek(zv)ecommerce(tec)cz]
Sent: Thursday, November 07, 2002 4:09 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: FORMULAR & PARAMETRY
function VytvorForm(const Titulek: string; const Sirka, Vyska: integer)
: TModalResult;
begin
MyForm := TMyForm.Create(nil);
try
MyForm.Caption := Titulek;
MyForm.Width := Sirka;
MyForm.Height := Vyska;
Result := MyForm.ShowModal;
finally
MyForm.Free;
end;
end;
A.
> -----Original Message-----
> From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
>
>
> Napr. v UNIT_1 mam proceduru:
>
> procedure TForm.VytvorForm(Titulek: string; Sirka, Vyska: integer);
> begin
> VytvorForm('Tohle je okno', 100, 100);
> end;
>
> rad bych po zavolani teto procedury programove vytvoril
> formular, treba MyForm,
> kde Caption bude prvni parametr, Height druhy a Width treti.
>
> Muzete mi prosim nekdo napsat maly priklad ?
ComboBox nespusti event
[*] ViragI(zv)logica(tec)com - 7.10.2002 16:20:01
Zdravim
Menim programove polozku v ComboBoxu (ComboBox1.ItemIndex := ...). Nespusti
mi to ale naprogramovany event OnChange ani OnClick - nic. Vedel byste nekdo
neco? Dekuji.
D7Arch, Win2000 (SP3)
Ivan Virag
This e-mail and any attachment is for authorised use by the intended recipient(s) only. It may contain proprietary material, confidential information and/or be subject to legal privilege. It should not be copied, disclosed to, retained or used by, any other party. If you are not an intended recipient then please promptly delete this e-mail and any attachment and all copies and inform the sender. Thank you.
FORMULAR & PARAMETRY
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.10.2002 16:29:15
From: "�tevl�k Mari�n" <Marian.Stevlik(zv)merlin(tec)cz>
> function CreateMyForm(const isCaption: string; const inHeight, inWidth:
Netusil jsem ze i do pascalu bude nekdo zavadet hungarian notation :-) Viz
pravidlo 30 "How To Write Unmaintainable Code Naming":
http://mindprod.com/unmainnaming.html
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
ComboBox nespusti event
[*] David Michal <david.michal(zv)www-bv(tec)com> - 7.10.2002 16:41:30
Zdravim,
Z helpu:
OnChange only occurs in response to user actions. Changing the Text property
programmatically does not trigger an OnChange event.
Takze ti asi nezbyde, nezli si po programove zmene ItemIndex take spustit
pozadovanou udalost.
Tzn.
ComboBox1.ItemIndex := NewValue;
ComboBox1Change(ComboBox1);
David Michal
Menim programove polozku v ComboBoxu (ComboBox1.ItemIndex := ...). Nespusti
mi to ale naprogramovany event OnChange ani OnClick - nic. Vedel byste nekdo
neco? Dekuji.
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.408 / Virus Database: 230 - Release Date: 24/10/2002
Jak na velke Databaze?
[*] j?n harman - 07.10.2002 17:06:48
ahoj, potrebuji predelat databazi z Paradoxu. Problem je v tom ze v te databazi je zakladana kazdy mesic nova tabulka, kvuli tomu ze tam dost rychle pribyvaji data a po roce by mohl mit soubor mozna i GB. Je rozumne to resit v jednosouborove databazi FB? Rok jeste neni tak kriticky, ale program muze bezet treba i deset let, potom bych nechtel videt ted soubor:-O
diky Honza.
Problem s rozlisenim
[*] Peter Surovy <psurovy(zv)uevora.pt> - 7.10.2002 16:26:03 -0000
no ak by Ti nikto neodpovedal tak ja mam nejake doplnujuce
otazky:
----- Original Message -----
From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
Sent: Thursday, November 07, 2002 10:19 AM
> mam ActiveX componentu pro resize obrazku. Tvz. thumbnailer a na
--- nerozumiem je to Tvoja ActiveX - Tebou napisana
alebo si to zniekade nahral a pozivas a nemas dokumentaciu?
> jednom serveru jsme prisly na zajimavy problem kdyz to zmensovalo
> obrazek tak ho to sice zmensilo ale zmenilo to z 16bitovyho shematu
> barev na 256 nebo 16 barevne schema.
---- jak to vies?
>Takze ten obraze je dosti
> hunsnej. Pouzivam jpeg, gifimage unity a potreboval bych poradit
> kde to v kodu najit ten kousek kterej nacte tu barevnou hloubku 256 ?.
--- hm no ta barevna hloubka je vacsinou v hlavicke toho
obrazoveho suboru. Gifimage unitu mas odkial?
co sa tyka JPEG v kode sa to nastavuje (vid Examples) :
wtih TJPEGImage(..) do
begin
PixelFormat := TJPEGPixelFormat(jf24Bit alebo jf8Bit);
Performance := TJPEGPerformance(jpBestQuality alebo jpBestSpeed);
end;
kde PixelFormat je 8 alebo 24 bitov na px
a Performance nastavuje intenzitu kompresie co ma dost markantny vplyv
na kvalitu..
PS
Delphi a regularni vyrazy ...
[*] Martin Falta <martin(zv)aprog(tec)cz> - 7.10.2002 17:40:11
Na soukromou adresu ti posilam knihovnu pro praci s regularnimi
vyrazy.
soc> Hi all,
soc> Neracoval jste nekdo v Delphi s regularnimi vyrazy (je potreba
soc> nejaka komponenta nebo knihovna)?
soc> Diky moc za info.
soc> Milan
--
Best regards,
Martin mailto:martin(zv)aprog(tec)cz
Re[2]: Problem s rozlisenim
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 7.10.2002 18:00:17
Hello Peter,
Thursday, November 7, 2002, 5:26:03 PM, you wrote:
PS> no ak by Ti nikto neodpovedal tak ja mam nejake doplnujuce
PS> otazky:
PS> ----- Original Message -----
PS> From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
PS> Sent: Thursday, November 07, 2002 10:19 AM
>> mam ActiveX componentu pro resize obrazku. Tvz. thumbnailer a na
PS> --- nerozumiem je to Tvoja ActiveX - Tebou napisana
PS> alebo si to zniekade nahral a pozivas a nemas dokumentaciu?
mno zbylo to tu po jednom programatorovi
>> jednom serveru jsme prisly na zajimavy problem kdyz to zmensovalo
>> obrazek tak ho to sice zmensilo ale zmenilo to z 16bitovyho shematu
>> barev na 256 nebo 16 barevne schema.
PS> ---- jak to vies?
No kdyz se tam nastavilo rucne barva v nastaveni monitoru tak delalo
krasne obrazky.
>>Takze ten obraze je dosti
>> hunsnej. Pouzivam jpeg, gifimage unity a potreboval bych poradit
>> kde to v kodu najit ten kousek kterej nacte tu barevnou hloubku 256 ?.
PS> --- hm no ta barevna hloubka je vacsinou v hlavicke toho
PS> obrazoveho suboru. Gifimage unitu mas odkial?
gifimage mam od tud z konference nejaka dobra duse mi to poslala
PS> co sa tyka JPEG v kode sa to nastavuje (vid Examples) :
PS> wtih TJPEGImage(..) do
PS> begin
PS> PixelFormat := TJPEGPixelFormat(jf24Bit alebo jf8Bit);
PS> Performance := TJPEGPerformance(jpBestQuality alebo jpBestSpeed);
PS> end;
hmm skusim diky.
PS> kde PixelFormat je 8 alebo 24 bitov na px
PS> a Performance nastavuje intenzitu kompresie co ma dost markantny vplyv
PS> na kvalitu..
tam nejde intenzitu komprese tam jde urcite o tu barevnou hloubku. je
mozne ze tech 8bit je tam nastaveno defaultne ?
PS> PS
--
Best regards,
Vymazal mailto:vymazal.milan(zv)seznam(tec)cz
Jak na velke Databaze?
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 7.10.2002 18:06:30
> Odes�latel: j?n harman <harman(zv)atlas(tec)cz>
> ahoj, potrebuji predelat databazi z Paradoxu. Problem je v tom ze v te databazi je zakladana kazdy mesic nova tabulka, kvuli tomu ze tam dost rychle pribyvaji data a po roce by mohl mit soubor mozna i GB. Je rozumne to resit v jednosouborove databazi FB? Rok jeste neni tak kriticky, ale program muze bezet treba i deset let, potom bych nechtel videt ted soubor:-O
No, zn�m firmu, ktera pocita s t�m, ze jejich databaze (FB) dosahne 300GB.
Nevim, jak jsou v tomto okamziku daleko.
Jeste jedna zkusenost:
Nahradil jsem cizi aplikaci nad .db, ktera padala na velikost dat po 3 mes. provozu (bylo to dost spatne navrzeno a zprogramovano) svoji aplikaci nad IB6. Od instalace v dubnu 2001 to jede nejen bez jedineho problemu, ale i prijemne rychle.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
rotace pisma na tiskarne tisk
[*] Zdenek Navratil <zdnav(zv)monoceros.physics.muni(tec)cz> - 7.10.2002 18:12:01
Preji pekny den,
potrebuji rotovat pismo na tiskarne. Pouzivam
strukturu LogFont s nastavenim:
lfFaceName:= 'Arial';
lfEscapement:= 0;
lfOrientation:= 0;
lfWeight:= FW_BOLD;
lfHeight:= 30 * Font.PixelsPerInch div 72;
lfQuality:= PROOF_QUALITY;
lfOutPrecision:= OUT_TT_ONLY_PRECIS;
a potom provedu
Font.Handle:= CreateFontIndirect(LogFont);
a priradim k Canvas.Font.
Pokud to provedu u formulare, rotuje to pekne. Ale pro Printer.Canvas
to nefunguje. (Mam orientaci landscape, zkousel jsem laserove tiskarny,
poscript , TrueType font apod.).
V cem muze byt problem?
Diky
Zdenek Navratil.
rotace pisma na tiskarne podruhe
[*] Zdenek Navratil <zdnav(zv)monoceros.physics.muni(tec)cz> - 7.10.2002 18:15:57
Omlouvam se za nedopatreni, naastavuji samozrejme napr.
lfEscapement:= 900;
lfOrientation:= 900;
Zdenek Navratil.
Re[2]: Problem s rozlisenim
[*] Peter Surovy <psurovy(zv)uevora.pt> - 7.10.2002 17:45:22 -0000
Ahoj
----- Original Message -----
From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
Sent: Thursday, November 07, 2002 5:00 PM
> mno zbylo to tu po jednom programatorovi
-- ja len ze ci mas k tomu zdrojaky aby sa z toho dalo
nieco vycitat ...
> PS> ---- jak to vies?
>
> No kdyz se tam nastavilo rucne barva v nastaveni monitoru tak delalo
> krasne obrazky.
--- hmhm uz som to precital asi 10x ale nejak to nechapem ...
nevadi, chcel som vediet ci tie vystupne obrazky zobrazujes
v nejakom prehliadaci a on Ti oznami ze tento obrazok je
256 farebny alebo 24bitovy alebo to priamo vies vycitat
z toho suboru. Totiz napr. kazdy JPEG ktory otvoris vo Photoshope
sa javi ako 24 bitovy ale nie je to celkom tak..> PS> --- hm no ta barevna hloubka je vacsinou v hlavicke toho
> PS> obrazoveho suboru. Gifimage unitu mas odkial?
>
> gifimage mam od tud z konference nejaka dobra duse mi to poslala
--- hehe no ma to zaujimalo kvoli kodu ci je to len
dcu s vypisom prikazov alebo aj vidis v .pas co sa vlastne deje
Inak GIF pokial sa nemylim pracuje prave s 8 bitmi na
pixel ktore potom indexuje atd...
8 bitov na pixel je 256 farieb cize ak sa ten thumb vyraba pomocou
gif kompresie tak sa skrese len na 8 bitovy obraz .> tam nejde intenzitu komprese tam jde urcite o tu barevnou hloubku. je
> mozne ze tech 8bit je tam nastaveno defaultne ?
---no to musis vycitat u Teba myslim ze Delphi tam ma
defaultne 24 bitov. > >>Takze ten obraze je dosti
> >> hunsnej. Pouzivam jpeg, gifimage unity a potreboval bych poradit
> >> kde to v kodu najit ten kousek kterej nacte tu barevnou hloubku 256 ?.
--- tak ma napadlo: JPEG sa pouziva hlavne kvoli moznosti
pracovat s velkym mnozstvom farieb tak skus zistit ci Ti tie
thumby vyraba pomocou GIF a ak ano tak je problem tam
ak pomocou JPEG tak prezri to nastavenie pixelformat ...
Inak ten TJPEG ma este Scale property, ktoru mozes nastavit:
TJPEGScale(jsFullSize, jsHalf, jsQuarter, jsEighth);
mozno by Ti to stacilo.
PS
Instalace MSDE a attach na existujici databazi (W
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 7.10.2002 19:04:36
Hi all,
potreboval bych pomoc s instalaci MSDE.
Abych se vyhnul pripadnym potizim s existujici instanci MSSQL, tak jsem
zkusil instalovat rovnou svoji vlastni instanci.
Vypada to, ze se nainstaluje a pokud existuje na
stroji i default instance, tak umim pomoci utility
OSQL a scriptu, ktery ma u CREATE DATABASE klauzuli
FOR ATTACH, pripojit existujici databazi v souborech *.MDF a *.LDF.
Na takovou databazi se umim i connectnout napr. pres ODBC.
***
Potiz nastane, kdyz na stroji neni default instance MSSQL - pak mi ten
script zbuchne na chybu 5105 tj.
Device activation error. The physical file name ....
may be incorrect.
Takze mam nekolik otazek:
1. To na stroji musi byt vzdy default instalace
MSSQL?
2. Existuje nejaky zpusob, jak pripojit databazi
bez utility OSQL.EXE z kodu v Delphi (pres ADO)?
3. Da se nejak spustit nainstalovany MSDE, aniz
by se restartoval stroj? (pomozi utility SCM se mi
to nedari.
Thx, pf
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.408 / Virus Database: 230 - Release Date: 24.10.2002
Umisteni standardnich ikon na toolbar textoveho ed
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 7.10.2002 20:01:12
VG9vbEJhcnUgcHJpcmFkaXMgSW1hZ2VMaXN0DQpUb29sQnV0dG9udSBwYWsgcHJpcmFkaXMgSW1h
Z2VJbmRleA0KDQotLSANCkphbiBGaWFsYQ0KbWFpbHRvOmphbi5maWFsYUBpb2wuY3oNCg0KNy4x
MS4yMDAyIFBldHIgVmH4ZWthOg0KPiBaZHJhdmltIGtvbmZlcnUuDQo+IENodGVsIGJ5Y2ggdW1p
c3RpdCBuYXByLiBuYSBidXR0b24gdG9vbGJhcnUgbWFqaWNpIGZ1bmtjaSBTQVZFIG9icmF6ZWsN
Cj4gZGlza2V0eSAuIFZpbSB6ZSBrdG9tdSBwb3RyZWJ1amkga29tcG9uZW50dSBJTUFHRUxJU1Qg
YSB2aW0gamFrIGppIG1hbQ0KPiBwcm9wb2ppdCBzIGJ1dHRvbnkga29tcG9uZW50eSBUT09MQkFS
LiBKZWRpbmUgbyBjZW0gbmVtYW0gcG9uZXRpIGplIHVtaXN0ZW5pDQo+IG9uZWNoIHN0YW5kYXJk
bmljaCBpa29uLCBrdGVyZSBqc291IGJlem1hbGEgc291Y2FzdGkga2F6ZGUgYXBsaWthY2UNCj4g
KE9wZW5GaWxlIC0gb3RldnJlbmEga25pemthLCBTYXZlRmlsZSAtIGRpc2tldGEgLCBhdGQuKQ0K
PiBQb3JhZGkgbWkgbmVrZG8gPw==
Umisteni standardnich ikon na toolbar textoveho ed
[*] <lukasst(zv)cbox(tec)cz> - 08.10.2002 02:06:14
C:\Program Files\Common Files\Borland Shared\Images\Buttons
LukaS (BD6 Personal Edition)
PV> Zdravim konferu.
PV> Chtel bych umistit napr. na button toolbaru majici funkci SAVE obrazek
PV> diskety . Vim ze ktomu potrebuji komponentu IMAGELIST a vim jak ji mam
PV> propojit s buttony komponenty TOOLBAR. Jedine o cem nemam poneti je umisteni
PV> onech standardnich ikon, ktere jsou bezmala soucasti kazde aplikace
PV> (OpenFile - otevrena knizka, SaveFile - disketa , atd.)
PV> Poradi mi nekdo ?
PV> Petr Vareka
-----
www.redbox(tec)cz - v�echno co pot�ebujete
sledovani objemu dat
[*] <lukasst(zv)cbox(tec)cz> - 08.10.2002 02:12:17
Jsem VELMI:-) amatersky programator a mel bych nasledujici dotaz:
Jsem pripojen na internet bezdratove (pres www.unet(tec)cz, prijimac pripojeny pres USB) a chtel bych se zeptat, jak lze sledovat prijaty objem dat.
Diky za kazdou odpoved ( i typu, ze jsem idiot a nemam sanci neco takoveho stvorit....:-))
LukaS
-----
www.redbox(tec)cz - v�echno co pot�ebujete
sledovani objemu dat
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 8.10.2002 02:49:28
From: <lukasst(zv)cbox(tec)cz>
> Jsem pripojen na internet bezdratove (pres www.unet(tec)cz, prijimac pripojeny
> pres USB) a chtel bych se zeptat, jak lze sledovat prijaty objem dat.
Napriklad prikazem: NETSTAT -E
Priklad v Delphi najdes v IpHlpApi.zip: http://delphi-jedi.org/APILIBRARY
Popripade nainstalovat Kerio Personal Firewall nebo podobny produkt. Pokud jde
o to, ze provider provadi zvrhlosti typu omezeni velikosti prenasenych dat,
tak by mel i prubezne tento stav byt schopen poskytovat.
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
POLE ZNAKU 548 v DBF
[*] Dalibor <dalibor(zv)torola(tec)cz> - 08.10.2002 06:51:56
Tak jsem asi prisel proc BDE, ODBC nenacte korektne jedno DBF.
Jedno z poli je nadefinovana jako POZNAMKA CHAR 548. Ve strukture DBExploreru
je 36.
Pokud toto pole zrusim, tak to vse funguje OK.
Nevite jak by se to dalo nacist bez nejake upravy?
POLE ZNAKU 548 v DBF
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 8.10.2002 06:55:47
V tom pripade je chyba ve strkture.
V tabulce DBF muze byt max. velikost pole 255 a cela struktura
tusim nemuze prekrocit delku 1024.
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
8.11.2002 Dalibor:
> Tak jsem asi prisel proc BDE, ODBC nenacte korektne jedno DBF.
> Jedno z poli je nadefinovana jako POZNAMKA CHAR 548. Ve strukture DBExploreru
> je 36.
> Pokud toto pole zrusim, tak to vse funguje OK.
> Nevite jak by se to dalo nacist bez nejake upravy?
POLE ZNAKU 548 v DBF
[*] Dalibor <dalibor(zv)torola(tec)cz> - 08.10.2002 07:09:12
> V tom pripade je chyba ve strkture.
> V tabulce DBF muze byt max. velikost pole 255 a cela struktura
> tusim nemuze prekrocit delku 1024.
>
No to je ten problem. Tuhle DBF vyuziva jeden DOSovskej
program (UCTO) a tam to maji asi schvalne prispusobeno k
obrazu svemu. Tam se tech 548 znaku opravdu muze zadat.
Kdyz to pole zkratim na tech 255, nebo ho uplne odstranim, tak
pak funguje vse dobre.POLE ZNAKU 548 v DBF
[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 8.10.2002 07:18:08
A kebyze to pole zmenis na Memo?
Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 241010111 (181)
fax: +420 241010165
icq: 38493645
-----P�vodn� zpr�va-----
Od: Dalibor [mailto:dalibor(zv)torola(tec)cz]
Odesl�no: 8. listopadu 2002 6:52
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: POLE ZNAKU 548 v DBF
Tak jsem asi prisel proc BDE, ODBC nenacte korektne jedno DBF.
Jedno z poli je nadefinovana jako POZNAMKA CHAR 548. Ve strukture
DBExploreru
je 36.
Pokud toto pole zrusim, tak to vse funguje OK.
Nevite jak by se to dalo nacist bez nejake upravy?
read/write to LPT
[*] Peter Sulek <psulek(zv)centrum.sk> - 8.10.2002 07:29:41
Ako prosim Vas viem zapisovat a citat z adries napt $378 /LPT/. v delphi 50
Windows XP nedovoli pristup cez assembler!?
Peter Sulek
psulek(zv)centrum.sk
OT: Distributor Delphi
[*] Valenta P <valentapat(zv)volny(tec)cz> - 8.10.2002 07:38:22
Zdravim ve spolek, potrebuji koupit levneji starsi verse delphi - nejlepe
D5. Spravce site tvrdi ze Borland ma pouze D7 za velke penize. Nevite nekdo
o nejake jine distribuci ?
valik
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.404 / Virov� b�ze: 228 - datum vyd�n�: 15.10.2002
Distributor Delphi
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 8.10.2002 07:48:40
Zkus SWS Slusovice, ukoncili distribuci a neco jim mozna zustalo na sklade??
S pozdravem Vaclav Riha
-----P�vodn� zpr�va-----
Od: Valenta P [SMTP:valentapat(zv)volny(tec)cz]
Odesl�no: 8. listopadu 2002 7:38
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: OT: Distributor Delphi
Zdravim ve spolek, potrebuji koupit levneji starsi verse delphi - nejlepe
D5. Spravce site tvrdi ze Borland ma pouze D7 za velke penize. Nevite nekdo
o nejake jine distribuci ?
valik
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.404 / Virov� b�ze: 228 - datum vyd�n�: 15.10.2002
POLE ZNAKU 548 v DBF
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 08:22:25
> Odes�latel: ing. Jan Fiala <jan.fiala(zv)iol(tec)cz>
> V tabulce DBF muze byt max. velikost pole 255 a cela struktura
> tusim nemuze prekrocit delku 1024.
Nechci polemizovat, protoze o tom nic nevim.
Maximalni pocet polozek je 255.
Predelavam jeden dost strasny system, kde jsem na takovou tabulku narazil (ja jsem to nenavrhoval, proboha), tam je asi urcite celkova delka 1024 prekrocena.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Odchyceni komunikace na COM portu
[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 8.10.2002 08:23:12
> Pro monitorovani lze prece pouzit i tu ukazkovou aplikaci na
> sysinternals.
No kdybych z ty aplikace umel nejak dostat stavy jednotlivych portu,
klidne bych ji pouzil, ale aplikace, ktera ma sledovat jednotlive stavy tech
portu ma fungovat jako automat, ktery bude fungovat bez zasahu cloveka
a pouze pokud by se stalo neco, s cim si nebude umet poradit, zavola
obsluhu.
JK
Distributor Delphi
[*] Marek Dost�l <marek.dostal(zv)mujweb(tec)cz> - 8.10.2002 08:29:00
Ale byl bych opatrn�, aby to potom Borland uznal jako leg�ln� licenci, rad�ji bych se dop�edu u Borlandu informoval.
Marek D.
----- Original Message -----
From: "Vaclav Riha - Soft Consult" <vaclav_riha(zv)softconsult(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, November 08, 2002 7:48 AM
Subject: RE: Distributor Delphi
Zkus SWS Slusovice, ukoncili distribuci a neco jim mozna zustalo na sklade??
S pozdravem Vaclav Riha
-----P�vodn� zpr�va-----
Od: Valenta P [SMTP:valentapat(zv)volny(tec)cz]
Odesl�no: 8. listopadu 2002 7:38
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: OT: Distributor Delphi
Zdravim ve spolek, potrebuji koupit levneji starsi verse delphi - nejlepe
D5. Spravce site tvrdi ze Borland ma pouze D7 za velke penize. Nevite nekdo
o nejake jine distribuci ?
valik
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.404 / Virov� b�ze: 228 - datum vyd�n�: 15.10.2002
OT: \Device\Ide\IdeDeviceP0T0L0 - Error
[*] Robert Suska <delphi(zv)korak.sk> - 8.10.2002 09:03:53
Ahojte!
Ospravedlnujem sa za OT: ale mam problem so svojim PC zacalo od vcera jedna
sa o chybu ktora sa zacala objavovat pravidelne po starte pocitaca a je to:
The device, \Device\Ide\IdeDeviceP0T0L0, did not respond within the timeout
period.
a nasiel som aj nejake linky ale neviem to prelozit je to v nejakom divnom
jazyku :)
http://www.tweakers.net/meuktracker/2029
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ddtools/hh/
ddtools/devctl_3ucz.asp
prosim kto bude vediet o co ide a ako sa to da opravit napiste mi, dakujem
pekne. A este jedna vec ked dam nastartovat Linux Mandrake 9.1 a necham
pripojenu floppy mechaniku tak mi to startovani konkretne pri Mounting Local
File System hodi FAILED ak teda stihne hodit FAILED a ked nestihne tak uz
cvakaju hlavicky v disku. Ale ked mechaniku odpojim tak vsetko ide ako ma
len vo Windows XP mam v Eventoch tu hlasku ktoru som popisal hore^.
Dakujem este raz.
S pozdravom,
************************************
Robert Suska
KORAK SLOVAKIA s.r.o.
Horna 52
974 01 Banska Bystrica
www.korak.sk robert(zv)korak.sk
Network administrator, Delphi programmer
************************************
Delegace u COM
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 8.10.2002 09:28:08
Ahoj,
vyvolavam z klienta DCOM server, ktery opet vola dalsi DCOM server.
Oba servery bezi pod identitou spousteciho uzivatele.
Potreboval bych delegovat ucet klienta na prvni server, aby pak vystupoval
pred druhym serverem s identitou klienta.
Myslel jsem, ze jen zatrhnu u pocitace, kde bezi server 1 volbu v dcomcnfg,
zalozka vychozi vlastnosti, volba Vychozi uroven zosobneni na Delegat, ale
porad mi to hlasi, ze nemam opravneni na 2. server.
Delam neco spatne, nebo je problem nekde jinde ? OS W2000
S pozdravem
ing. Richard Kejval
IC Software s.r.o
Mobil: +420602477679
Stream.Size ve watch
[*] �ejka Pavel <cejka(zv)proteco(tec)cz> - 8.10.2002 09:34:51
Ahoj,
netusite nekdo proc se v D6 ve watch listu spatne zobrazuji Stream.Size,
Stream.Position ( TFileStream, TMemoryStream ) - jsou stale nula.
Dik Pavel
Kopie struktury DBF
[*] Dalibor <dalibor(zv)torola(tec)cz> - 08.10.2002 09:49:24
Poradite mi nekdo jak presne zkopirovat strukturu DBF do nove DBF.
Zkousim to treba pres
Table1.FieldDefs:=Table2.FieldDefs
Table1.CreateTable
Ale u nekterych polozek typu float si to zmeni definici.
Napr.
Puvodni Float(12,2), nova Float(19, 4).
Pekne me to stve..
D5 Prof, Win2000
\Device\Ide\IdeDeviceP0T0L0 - Error
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 8.10.2002 09:53:00
podla toho co pises by som skusil vypnut ovladac v XP pre mechaniku,
potom by to nemalo robit, asi predpoklada ze bude vzdy zapnuta, hladaj v
device manageri, mala by tam byt Flopy aj radic... musis vyskusat vynut
jedno alebo druhe... inak neviem
joka
------------------------------------------------------------------------
Ing. Jozef Kalus
SOVA
�. �t�ra 17/28
018 61 BELU�A
Mob.: +421 905 459156
e-mail: equipment(zv)equipment.sk
jozef.kalus(zv)spordat.sk
www: http://www.equipment.sk
-----Original Message-----
From: Robert Suska [mailto:delphi(zv)korak.sk]
Sent: Friday, November 08, 2002 9:04 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: OT: \Device\Ide\IdeDeviceP0T0L0 - Error
Ahojte!
Ospravedlnujem sa za OT: ale mam problem so svojim PC zacalo od vcera
jedna
sa o chybu ktora sa zacala objavovat pravidelne po starte pocitaca a je
to:
The device, \Device\Ide\IdeDeviceP0T0L0, did not respond within the
timeout
period.
Univerzalni DB komponenty pro D4
[*] <little_bobes(zv)centrum(tec)cz> - 8.10.2002 10:02:26
Zdravim,
mam v D4 vytvorenou DB aplikaci pro IB pomoci komponent ZEOS.
Nyni vyvstal pozadavek tuto aplikaci upravit tak, aby mohla pracovat i s
jinymi databazemi (MySQL, ORACLE, Progress, ...) pomoci ODBC ovladacu.
Zna nekdo nejake univerzalni komponenty pro D4 (samozrejme bez pouziti BDE)?
Diky Bob
Tisk souboru RTF
[*] Lenka Don�tov� - 8.10.2002 10:10:28
Potrebuji vytisknout soubor formatu rtf. Nemate nekdo zkusenosti s
komponetami QuickReport a QRRichText. Zkousela jsem to pomoci tecto dvou
komponent ale v preview se mi zobrazi pouze 1.stranka. Nevite nekdo jestli
lze vytisknout rtf soubor pomoci techto komponent popripade uvitam namety na
jiny zpusob tisku rtf souboru.
Diky za odpovedi
Lenka Donatova
\Device\Ide\IdeDeviceP0T0L0 - Error
[*] Robert Suska <delphi(zv)korak.sk> - 8.10.2002 10:12:32
Ahoj
teraz som odpojil zo sekundarneho radica CD-ROM a CD-RW a boot disk som dal
na tento radic a teraz uz nehlasi nic pri IdePort0 ale uz pri IdePort1 cize
pravdepodobne bude vadny disk ?? a mal som aj floppy odpojenu a nic...
Robo
>podla toho co pises by som skusil vypnut ovladac v XP pre mechaniku,
>potom by to nemalo robit, asi predpoklada ze bude vzdy zapnuta, hladaj v
>device manageri, mala by tam byt Flopy aj radic... musis vyskusat vynut
>jedno alebo druhe... inak neviem
>joka
Tisk souboru RTF
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 8.10.2002 10:40:27
No, tisk do RTF je nekdy problem.
V QR byly vzdy problemy s tiskem rtf z qrricheditu pres vice stranek (i spatne to zarovnavalo, orezavalo atp.) a ja to uz nepouzil.
Je to mozne primo pres klasicky richedit.print nebo RxRichedit (umi i obrazky a v nektere verzi ma i preview).
Taky je to mozne udelat technologii pure-code pres matrici rtf (kterou plni tvoje aplikace, a muze mit i "prave" tabulky :-) ) a o tisk se pak postara microsoft (pres Wordview, je zadarmo) nebo pres aplikaci office (placena licence, treba pres OLE).
Jaro B.
-----Original Message-----
From: Lenka Don�tov� [mailto:lenkad(zv)nemocnice-vs(tec)cz]
Potrebuji vytisknout soubor formatu rtf. Nemate nekdo zkusenosti s
komponetami QuickReport a QRRichText. Zkousela jsem to pomoci tecto dvou
komponent ale v preview se mi zobrazi pouze 1.stranka. Nevite nekdo jestli
lze vytisknout rtf soubor pomoci techto komponent popripade uvitam namety na
jiny zpusob tisku rtf souboru.
Diky za odpovedi
Lenka Donatova
Hint nad Disabled editem
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 8.10.2002 10:43:15
Ahoj vsichni
Mam takovyto problem. Mam na formulari editacni policka. Vsechna maji
nastaveny Hint. Hint ma i panel, na kterem lezi. Kdyz u policka nastavim
Enabled na false, zobrazi se mi nad nim Hint panelu. Neda se nejak zajistit,
aby policko bylo nepristupne a pritom zobrazovalo spravny (tj. svuj Hint,
ktery se lisi od Hintu panelu)? Dekuji predem za radu.
Jaromir Cermak
Seminar "Delphi 2003"
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 10:48:15
Vazeni pratele,
dovolte mi, abych vas informoval,
ze 5.rocnik tradicniho dvoudenniho seminare Delphi 2003
se uskutecni ve dnech 19.-20.2.2003
v Laznich Belohrade.
I pro tento rocnik prislibili svoji ucast nejznamejsi "guru" z konference Delphi
(Petr Vones, Pavel Cisar, Zbysek Hlinka, snad prijedou tradicne i dalsi).
Podrobnejsi informace i odkazy na predchazejici rocniky seminare naleznete na mem webu.
Tesim se na vasi ucast.
Jan Sebelik
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Distributor Delphi
[*] Ludo Fulop <kexo(zv)ynet.sk> - 8.10.2002 10:52:59
uz tu o tom bola diskusia, nemal by to byt problem (na zaklade vyjadrenia
Borlandu)
btw vie niekto o nejakom podobnom distributorovi na slovensku?
Ludo Fulop
----- Original Message -----
From: "Marek Dost�l" <marek.dostal(zv)mujweb(tec)cz>
Ale byl bych opatrn�, aby to potom Borland uznal jako leg�ln� licenci,
rad�ji bych se dop�edu u Borlandu informoval.
Tisk souboru RTF
[*] Petr Hlo�ek <petr h(zv)mrp(tec)cz> - 8.10.2002 10:56:45
Podivejte se na komponenty GMPrintSuite na www.murtsoft.co.uk
Petr
----- Original Message -----
From: "Lenka Don�tov�" <lenkad(zv)nemocnice-vs(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, November 08, 2002 10:10 AM
Subject: Tisk souboru RTF
> Potrebuji vytisknout soubor formatu rtf. Nemate nekdo zkusenosti s
> komponetami QuickReport a QRRichText. Zkousela jsem to pomoci tecto dvou
> komponent ale v preview se mi zobrazi pouze 1.stranka. Nevite nekdo
jestli
> lze vytisknout rtf soubor pomoci techto komponent popripade uvitam namety
na
> jiny zpusob tisku rtf souboru.
>
> Diky za odpovedi
> Lenka Donatova
lock manager out of room
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 08.10.2002 10:59:47
Ahoj,
co muzu pro to, aby me porad FB 1.0 neobtezoval nefunkcnosti z
duvodu %subj%?
Jediny navod, na ktery jsem narazil, je zvysit v souboru ibconfig
hodnotu parametru V4_LOCK_MEM_SIZE z implicitni hodnoty
98304 na 198304. To jsme udelali a hlaska se stale objevuje. Co to
vubec znamena a co ji hlavne zpusobuje? Je to kvuli spatne praci
se serverem nebo jde o externe neresitelnou chybu FB?
Uz opravdu zurim, protoze server FB se mi jevi jako dost nestabilni.
Pred 2 dny, po pouhem spusteni aplikace, na serveru vzniklo pres
150 procesu a neustale pribyvaly dalsi, az do totalniho zahlceni. Po
delsim patrani, co se deje, se ukazalo, ze za to muze z nejakeho
duvodu naboreny GDB soubor. OK, gfix opravil nejake chyby v
indexech stranek, udelala se zaloha a pri pokusu o obnovu to
vyhucelo s tim, ze "validation error on column B_RIZENY". Prislusny
sloupec je definovan jako NOT NULL, presto v nem byly 3 radky s
hodnotou NULL. Prusery to jsou 2:
1) To uz se opravdu nemohu spolehnout ani na bezchybnost v
techto zakladnich zalezitostech?
2) Ale hlavne - zakaznik si zalohuje, zalohuje, pak vyhori a co se
ukaze? Vsechny zalohy mu jsou na nic, protoze zaloha sla provest
bez problemu, zatimco obnova kvuli takoveto kravine neprojde.
Ale zpet k problemu viz %subj%. Vite nekdo neco?
Dik
David Lebeda
SQL - Vymazani vet, ktere jsou v druhe tabulce
[*] Dalibor <dalibor(zv)torola(tec)cz> - 08.10.2002 10:59:27
Mam dve DBF tabulky. Jde nejak pres SQL vymazat vety, ktere jsou obsazeny v te
druhe tabulce?
Dekuji
D5 Prof, BDE, W2000
read/write to LPT
[*] Delphin <delphin(zv)post(tec)cz> - 8.10.2002 11:02:39
kernel driver nebo http://www.hw(tec)cz/software/userport/userport.html
----- Original Message -----
From: "Peter Sulek" <psulek(zv)centrum.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, November 08, 2002 7:29 AM
Subject: read/write to LPT
> Ako prosim Vas viem zapisovat a citat z adries napt $378 /LPT/. v delphi
50
> Windows XP nedovoli pristup cez assembler!?
>
> Peter Sulek
> psulek(zv)centrum.sk
>
>
SQL - Vymazani vet, ktere jsou v druhe tabulce
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 8.10.2002 11:11:56
Pokud mas primarni klic tak snadno:
DELETE FROM Table1
WHERE klic IN (SELECT Klic FROM Table2)
Pavel
From: Dalibor [mailto:dalibor(zv)torola(tec)cz]
Mam dve DBF tabulky. Jde nejak pres SQL vymazat vety, ktere jsou obsazeny v
te
druhe tabulce?
Tisk souboru RTF
[*] Ludo Fulop <kexo(zv)ynet.sk> - 8.10.2002 11:18:16
napr cez ShellExecute, co nie je velmi efektne, ale je to funkcne a lacne
riesenie:
uses ShellAPI;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, 'print', 'subor.rtf', '', nil, SW_HIDE);
end;
Ludo Fulop
----- Original Message -----
From: "Lenka Don�tov�" <lenkad(zv)nemocnice-vs(tec)cz>> komponent ale v preview se mi zobrazi pouze 1.stranka. Nevite nekdo
jestli
> lze vytisknout rtf soubor pomoci techto komponent popripade uvitam namety
na
> jiny zpusob tisku rtf souboru.
Instalace MSDE a attach na existujici databazi (W
[*] Pavel Mattivi <pmattivi(zv)dezadata(tec)cz> - 8.10.2002 11:22:19
mysl�m �e to m��e b�t nap�. toto (z dokumentace SQL Serveru):
******
Permission problems
Permission problems can occur if the device is on an NTFS partition.
In this example, the permissions on C:\Mssql7\Data\ Mydb_DATA.Mdf were
incorrect, so SQL Server could not access it:
kernel udopen: Operating system error 2(The system cannot find the file
specified.) during the creation/opening of physical device
C:\MSSQL7\data\mydb_Data.MDF.
kernel: dopen: open "c:\mssql7\data\mydb_data.mdf", Permission denied
kernel FCB::Open failed: Could not open device
C:\MSSQL7\data\mydb_Data.MDF for virtual device number (VDN) 1.
spid9 Device activation error. The physical file name
'C:\MSSQL7\data\mydb_Data.MDF' may be incorrect.
To correct an error like this, change the object ownership for the device to
Administrator, and be sure that the account that SQL Server was started
under has read and write permissions on the object.
*******
Zkusil bych si pohr�t s pr�vy na t� instanci serveru, nap�. nepou��v� se tam
NT autentifikace, p�ihl�en� admin apod.?
Pavel
> Vypada to, ze se nainstaluje a pokud existuje na
> stroji i default instance, tak umim pomoci utility
> OSQL a scriptu, ktery ma u CREATE DATABASE klauzuli
> FOR ATTACH, pripojit existujici databazi v souborech *.MDF a *.LDF.
�
> 1. To na stroji musi byt vzdy default instalace
> MSSQL?
> 2. Existuje nejaky zpusob, jak pripojit databazi
> bez utility OSQL.EXE z kodu v Delphi (pres ADO)?
> 3. Da se nejak spustit nainstalovany MSDE, aniz
> by se restartoval stroj? (pomozi utility SCM se mi
> to nedari.
POLE ZNAKU 548 v DBF
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 8.10.2002 11:25:06
OC4xMS4yMDAyIKl0ZXZs7WsgTWFyaeFuOg0KDQo+PiBUYWsganNlbSBhc2kgcHJpc2VsIHByb2Mg
QkRFLCBPREJDIG5lbmFjdGUga29yZWt0bmUgamVkbm8gREJGLg0KPj4gSmVkbm8geiBwb2xpIGpl
IG5hZGVmaW5vdmFuYSBqYWtvIFBPWk5BTUtBIENIQVIgNTQ4LiBWZSBzdHJ1a3R1cmUNCj4+IERC
RXhwbG9yZXJ1IA0KPj4gamUgMzYuDQo+PiBQb2t1ZCB0b3RvIHBvbGUgenJ1c2ltLCB0YWsgdG8g
dnNlIGZ1bmd1amUgT0suDQo+PiBOZXZpdGUgamFrIGJ5IHNlIHRvIGRhbG8gbmFjaXN0IGJleiBu
ZWpha2UgdXByYXZ5Pw0KDQo+IEEga2VieXplIHRvIHBvbGUgem1lbmlzIG5hIE1lbW8/DQoNClBv
a3VkIGplIHRhIHRhYnVsa2Egdnl0dmFyZW5hIG5lamFreW0gY2l6aW0gdWNldG5pbSBwcm9ncmFt
ZW0sIHRlemtvDQp0byB6bWVuaXMgbmEgbWVtby4gQSBwcmVwc2FuaSBuYSBtZW1vIHZlIHN0cnVr
dHVyZSB2dWJlYyBuaWMgbmVyZXNpLA0KcHJvdG96ZSBtZW1vIGplIDEwIHpuYWt1IGRsb3VoZSBh
IHRvIGJ5IHNlIHRpIHJvemhvZGlseSB2ZXR5IHYNCnRhYnVsY2UsIG5laGxlZGUgayB0b211LCB6
ZSBtZW1vIHBvdHJlYnVqZSBkYWxzaSBzb3Vib3IsIHZlIGt0ZXJlbQ0KanNvdSB0eSBpbmZvcm1h
Y2UgdWxvemVueQ0KDQotLSANCmluZy4gSmFuIEZpYWxhDQptYWlsdG86amFuLmZpYWxhQGlvbC5j
eg==
Tisk souboru RTF
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 8.10.2002 11:35:16
Zkousel jsem to a pri vlozeni komponenty TQRRichText do ColumnHeader to
tiskne tolik stranek jak je treba (nastaveno PrintIfEmpty=true). Vetsi
potize mi dela jak do TQRRichText dostat obsah a neztratit formatovani.
Jedine co mi pracuje je ParentRitchEdit, pri prirazeni Lines := Lines je
vysledkem plain text.
Pavel
From: Lenka Don�tov� [mailto:lenkad(zv)nemocnice-vs(tec)cz]
Potrebuji vytisknout soubor formatu rtf. Nemate nekdo zkusenosti s
komponetami QuickReport a QRRichText. Zkousela jsem to pomoci tecto dvou
komponent ale v preview se mi zobrazi pouze 1.stranka. Nevite nekdo jestli
lze vytisknout rtf soubor pomoci techto komponent popripade uvitam namety na
jiny zpusob tisku rtf souboru.
SQL - Vymazani vet, ktere jsou v druhe tabulce
[*] Ludo Fulop <kexo(zv)ynet.sk> - 8.10.2002 11:45:02
mozes to plz blizsie specifikovat?
pretoze podla tej otazky v tom nevidim problem, proste das DELETE * FROM
nazov_tabulky WHERE podmienka meno tej tabulky z ktorej chces mazat...
Ludo Fulop
----- Original Message -----
From: "Dalibor" <dalibor(zv)torola(tec)cz>> Mam dve DBF tabulky. Jde nejak pres SQL vymazat vety, ktere jsou obsazeny
v te
> druhe tabulce?
Distributor Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 08.10.2002 11:50:43
Puvodni zprava, kterou napsal Marek Dost�l dne 8 Nov 2002:
> Ale byl bych opatrn�, aby to potom Borland uznal jako leg�ln� licenci,
> rad�ji bych se dop�edu u Borlandu informoval.
Cesky Borland nema co uznavat, viz mnohe drivejsi diskuse na toto tema.
S pozdravem
Petr Zahradnik, pocitacovy expert
=======================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 475 500 610, 475 501 627, 475 511 337
Mobilni telefon: 602 409 601, Fax: 475 511 338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
=======================================================OT: Seminar "Delphi 2003"
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 12:20:07
> Odes�latel: Roland Turcan <rolo(zv)sedas.sk>
> Oooo super, chcem byt prihlaseny ako prvy ucastnik.
> Best regards, TRoland
Sorry za OT, ale reakce Rolanda me opravdu potesila.
Je prihlaseny ako prvy.
Prihlasil se do 1 minuty po ohlaseni seminare :-)
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Univerzalni DB komponenty pro D4
[*] Danik Frantik <frantik(zv)telpro(tec)cz> - 8.10.2002 12:24:00
Bez ODBC a BDE:
SqlDirect (http://www.sqldirect-soft.com). Ja s nimi ale nepracuji (nemohu
rict, jak se chovaji ...)
Nejsou free :-(
Viz. dokumentace:
+ use 32-bit native API of the supported SQL servers: Centura SQLBase Server
6(+),Oracle Server 7.2(+) with SQL*Net 2.2(+), IBM DB2 Database, Interbase
Server, Microsoft SQL Server 6.5, MySQL 3.23, PostgreSQL 7.1, Sybase ASE and
ASA, Informix and ODBC datasources;
+ no distributing, installing and configuring the BDE and ODBC;
+ give to you simultaneous access to any supported servers;
+ You can use any Delphi 3, 4, 5, 6 or C++ Builder 3, 4, 5 version (Pro or
above) to develop Client/Server applications;
Danik
-----Original Message-----
Behalf Of little_bobes(zv)centrum(tec)cz
mam v D4 vytvorenou DB aplikaci pro IB pomoci komponent ZEOS.
Nyni vyvstal pozadavek tuto aplikaci upravit tak, aby mohla pracovat i s
jinymi databazemi (MySQL, ORACLE, Progress, ...) pomoci ODBC ovladacu.
Zna nekdo nejake univerzalni komponenty pro D4 (samozrejme bez pouziti BDE)?
Diky Bob
Univerzalni DB komponenty pro D4
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 12:26:50
> Odes�latel: little_bobes(zv)centrum(tec)cz
> mam v D4 vytvorenou DB aplikaci pro IB pomoci komponent ZEOS.
> Nyni vyvstal pozadavek tuto aplikaci upravit tak, aby mohla pracovat i s
> jinymi databazemi (MySQL, ORACLE, Progress, ...) pomoci ODBC ovladacu.
> Zna nekdo nejake univerzalni komponenty pro D4 (samozrejme bez pouziti BDE)?
Ne, nic takoveho pokud vim neni.
Za nejschudnejsi cestu povazuji nasledujici:
Prepsat aplikaci na TClientDataSet + TDataSetProvider.
Pod TDataSetProvider muzes podlozit jakykoli dataset.
Uprava pro jinou databazi = 0.1%.
A pokud by to bylo doopravdy "multi-tier", mohl by ses na jedinem miste (aplikacni server) smirit dokonce i s BDE. To neni doporuceni, to je kompromis, ktery otevira siroke spektrum databazi.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Univerzalni DB komponenty pro D4
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 8.10.2002 13:09:13
> mam v D4 vytvorenou DB aplikaci pro IB pomoci komponent ZEOS.
> Nyni vyvstal pozadavek tuto aplikaci upravit tak, aby mohla pracovat i s
> jinymi databazemi (MySQL, ORACLE, Progress, ...) pomoci ODBC ovladacu.
> Zna nekdo nejake univerzalni komponenty pro D4 (samozrejme bez pouziti
BDE)?
Copak komponenty, ja vidim daleko vetsi problem s ruznymi dialekty SQL
jazyka, jiny zpusob prace s ulozenymi procedurami (ci vubec jejich
neexistence) apod. Takze pro prevod pod jinou databazi by se asi musela
prepsat pulka programu. Docela by me zajimalo, zda vubec jde napsat
apolikaci tak, aby sla jednoduse prenest pod ruzne databaze.
Jaroslav Nadhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel.: 224 312 344-5
fax: 235 522 892
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
pobocka Ostrava:
Nedbalova 14, 701 00 Ostrava
tel: 596 635 687
Vytvoreni ActionListu programove
[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 8.10.2002 13:16:35
Ahoj,
muzete mi prosim nekdo poradit, jak programove vytvorit ActionList a jak ho pouzit ?
Diky
V.
lock manager out of room
[*] Konference Delphi <delphi(zv)hon(tec)cz> - 8.10.2002 13:21:23
Ahoj,
jak to tak vidim, vychazim mi z toho jedine:
* je narusena databaze. Jedine vypustit a zase nafoukat.. :-)
k poruseni uplne staci, napriklad zipuje-li se primo GDB soubor. Pak po
obnove uz
je databaze casto narusena. Vzdy backupovat a pak zipovat.
* jake jsou hodnoty OIT OAT? Je-li mezi nimi velky rozdil tyto rozvirajici
se nuzky zpusobi ono zpomaleni serveru.
Rozdil mezi OIT a OAT muze byt zpusoben napr. neustale pripojenym
"hlidacem", ktery v jedne a te same transakci porad prochazi tabulku/y.
Pravidelny commit je zdravy.
Martin
----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, November 08, 2002 10:59 AM
Subject: lock manager out of room
> Ahoj,
>
> co muzu pro to, aby me porad FB 1.0 neobtezoval nefunkcnosti z
> duvodu %subj%?
>
> Jediny navod, na ktery jsem narazil, je zvysit v souboru ibconfig
> hodnotu parametru V4_LOCK_MEM_SIZE z implicitni hodnoty
> 98304 na 198304. To jsme udelali a hlaska se stale objevuje. Co to
> vubec znamena a co ji hlavne zpusobuje? Je to kvuli spatne praci
> se serverem nebo jde o externe neresitelnou chybu FB?
>
> Uz opravdu zurim, protoze server FB se mi jevi jako dost nestabilni.
> Pred 2 dny, po pouhem spusteni aplikace, na serveru vzniklo pres
> 150 procesu a neustale pribyvaly dalsi, az do totalniho zahlceni. Po
> delsim patrani, co se deje, se ukazalo, ze za to muze z nejakeho
> duvodu naboreny GDB soubor. OK, gfix opravil nejake chyby v
> indexech stranek, udelala se zaloha a pri pokusu o obnovu to
> vyhucelo s tim, ze "validation error on column B_RIZENY". Prislusny
> sloupec je definovan jako NOT NULL, presto v nem byly 3 radky s
> hodnotou NULL. Prusery to jsou 2:
>
> 1) To uz se opravdu nemohu spolehnout ani na bezchybnost v
> techto zakladnich zalezitostech?
>
> 2) Ale hlavne - zakaznik si zalohuje, zalohuje, pak vyhori a co se
> ukaze? Vsechny zalohy mu jsou na nic, protoze zaloha sla provest
> bez problemu, zatimco obnova kvuli takoveto kravine neprojde.
>
> Ale zpet k problemu viz %subj%. Vite nekdo neco?
>
> Dik
>
> David Lebeda
Univerzalni DB komponenty pro D4
[*] <little_bobes(zv)centrum(tec)cz> - 8.10.2002 13:39:23
> Copak komponenty, ja vidim daleko vetsi problem s ruznymi dialekty SQL
> jazyka, jiny zpusob prace s ulozenymi procedurami (ci vubec jejich
> neexistence) apod. Takze pro prevod pod jinou databazi by se asi musela
> prepsat pulka programu. Docela by me zajimalo, zda vubec jde napsat
> apolikaci tak, aby sla jednoduse prenest pod ruzne databaze.
Rekneme, ze ten program je vytvoren hlavne a pouze k cteni tech tabulek (na
editaci uz existuji jine programy).
To znamena, ze by me momentalne zajimalo pouze:
- pripojit se k databazi
- otevrit tabulku
- vytahnout z ni data na zaklade nejakych podminek
- uzavrit tabulku
Bob
Univerzalni DB komponenty pro D4
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 08.10.2002 13:45:57
On 8 Nov 2002 at 13:09, Jaroslav Nadhera wrote:
> Copak komponenty, ja vidim daleko vetsi problem s ruznymi dialekty SQL
> jazyka, jiny zpusob prace s ulozenymi procedurami (ci vubec jejich
> neexistence) apod. Takze pro prevod pod jinou databazi by se asi
> musela prepsat pulka programu. Docela by me zajimalo, zda vubec jde
> napsat apolikaci tak, aby sla jednoduse prenest pod ruzne databaze.
Jde, ale musi se psat uplne jinak, nez jak k tomu vedou Delphi
komponenty.
1. Aplikace vubec nezna pripojeni k databazi. Ta pouze odebere z
externiho modulu (napriklad COM) data v nejakem dohodnutem formatu
(treba XML). Tato data si prevezme, a nasype do vizualnich komponent
tak, jak je zvykem.
2. Pokud ma aplikace data ukladat, opet posle modulu data v
definovane strukture (nejlepe zase XML) s informaci, co se s daty ma
delat (napriklad insert, pod jmenem vloz_moje_skvela_data).
3. Externi modul zna tu "svou" databazi, a vycucnuta data zformatuje
do XML, a posle programu, prijata data prekoduje do formatu databaze
a posle ji to. Pak pripadne vrati programu hlasku o problemech, ke
kterym doslo.
Dodatek: VCL Delphi nic takoveho primo neumoznuje. COM na to take
neni moc vhodne, takze je to vsechno rucni drina. Az .NET je pro
takovy system slusne pripraven. Takze doufam, ze to Borlandi nezprasi
a pujde to i v Delphi.
S pozdravem
Zbysek Hlinka
ADO: Jak ziskat result ze StoredProc
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 08.10.2002 13:45:58
Prosim o pomoc (D7 Pro):
Jak ziskat navratovou hodnotu ze StoredProc (MSSQL2000), ktera se v ni
nastavuje pomoci Return(5001)?
Trapim se s tim cely den a zatim bez vysledku.
Zkousim to pomoci parametru pdReturnValue (to hlasi nespravny pocet
parametru), hledam ve zdrojakach po properties TADOCommand, zatim
bezvysledne.
Zde je StoredProc:
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
/*************************************************************
testovaci procedura - vraci jen chyby
*************************************************************/
ALTER procedure [TestErr] (
(zv)MessageText varchar (256) OUT,
(zv)RaiseError bit
)
as
select (zv)MessageText = 'OK'
if (zv)RaiseError = 1
begin
select (zv)MessageText = 'Chyba'
-- raiserror(50001, 16, 1, 'Parametr (zv)RaiseError nastaven na 1')
return(50001)
end
else
return(0)
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
Zde je procedura:
// volano pred exportem, zalozi prechodnou tabulku
procedure TAbSqlCisExport.Open;
var
S: string;
Param: TParameter;
i: Integer;
Cmd: TADOCommand;
begin
S := 'Output parameters: '#13;
Cmd := TADOCommand.Create(nil);
with Cmd do
try
Connection := dmMain.connMain;
CommandType := cmdStoredProc;
CommandText := 'TestErr';
ExecuteOptions := ExecuteOptions + [eoExecuteNoRecords];
// napln parametry
with Parameters do
begin
CreateParameter('(zv)MessageText', ftString, pdInputOutput, 25, 'Moje
hl�en�');
CreateParameter('(zv)RaiseError', ftBoolean, pdInput, 0, true);
// CreateParameter('Return', ftInteger, pdReturnValue, 0, 0);
end; // with
Execute;
with Parameters do
for i := 0 to Count - 1 do
begin
Param := Items[i];
S := S + Format('%s: %s', [Param.Name, VarToStr(Param.Value)]) +
#13;
end; // for
ShowMessage(S);
finally
Free;
end; // try/finally
end; // proc
--
______________________________________________________
Karel Kral, vedouci odd. IT / IT dep. manager
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 547 235 000, 602 552 432, Fax: 547 231 203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
ADO: Jak ziskat result ze StoredProc
[*] Tom xXx <assas(zv)bonbon(tec)net> - 8.10.2002 14:15:43
No, zkus to treba takto: with Parameters do
begin
Refresh;
ParamValues['(zv)MessageText'] := 'Moje hl�en�';
ParamValues['(zv)RaiseError'] := True;
end; // with
Execute;
TenBlbejReturn := Parameters[0].Value;
T.
Univerzalni DB komponenty pro D4
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 8.10.2002 14:17:28
> > Copak komponenty, ja vidim daleko vetsi problem s ruznymi dialekty SQL
> > jazyka, jiny zpusob prace s ulozenymi procedurami (ci vubec jejich
> > neexistence) apod. Takze pro prevod pod jinou databazi by se asi musela
> > prepsat pulka programu. Docela by me zajimalo, zda vubec jde napsat
> > apolikaci tak, aby sla jednoduse prenest pod ruzne databaze.
>
> Rekneme, ze ten program je vytvoren hlavne a pouze k cteni tech tabulek
(na
> editaci uz existuji jine programy).
> To znamena, ze by me momentalne zajimalo pouze:
> - pripojit se k databazi
> - otevrit tabulku
> - vytahnout z ni data na zaklade nejakych podminek
> - uzavrit tabulku
Zkus ODBCe. Jednoduche dotazy ti pujdou snad vsude, slozitejsi (vnorene,
ruzne union group atd.) bych na konretnich serverech raci zkusil.
Roman
==============================
http://kouzelne.misto(tec)cz
Univerzalni DB komponenty pro D4
[*] <little_bobes(zv)centrum(tec)cz> - 8.10.2002 14:54:25
> Zkus ODBCe. Jednoduche dotazy ti pujdou snad vsude, slozitejsi (vnorene,
> ruzne union group atd.) bych na konretnich serverech raci zkusil.
To ja vim, ale ja resim mechanismus pristupu k ODBC.
Bob
Jak na servisni app
[*] Zdenek Brejsa <prog(zv)hjsoft(tec)cz> - 8.10.2002 15:03:12
Ahoj,
dostal jsem ukol udelat aplikaci, ktera na pozadi (bez obslohy uzivatelem)
bude provadet v zadanem obdobi (napr: pondeli, streda, patek od 22:00 do
01:00) v zadanem intervalu (co pul hodiny) nejakou cinnost. Vim ze existuji
servisni aplikace a pripada mi, ze je to to prave orechove na muj problem.
ALE nikdy jsem nic podobneho nedelal a tak chci pozadat chytrejsi kolegi o
rady jak na to.
tedy: jak zacit, jak zajistit konfigurovatelnost, jak to udelat aby to
zbytecne nezatezovalo PC ... a nevim jake muzou jeste byt problemy
predem diky za jakekoli rady
Zdenek Brejsa - programator HJ-SOFT s.r.o.
Hradebni 3
56301 Lanskroun
Tel: 511096, 522889, 524795
Mob: 0602592948, 0603833124
ICQ: 47636291
Jak ziskat result ze StoredProc
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 8.10.2002 15:37:34
Ahoj,
navratova hodnota sp se jmenuje (zv)RETURN_VALUE.
Pred jejim pouzitim doporucuji prostudovat BOL. Nektere hodnoty
jsou pouzivany SQL serverem jako indikace chyb.
Pozor take na raiserror, chyby s urcitou severity
zpusobi okamzite ukonceni procedury
(nenasadi se ani vystupni parametry !), neuzavrou se transakce .....
Pavel
----------------------------------------------------------------------------
---
From: Karel Kral [mailto:kralkonf(zv)purus(tec)cz]
Prosim o pomoc (D7 Pro):
Jak ziskat navratovou hodnotu ze StoredProc (MSSQL2000), ktera se v ni
nastavuje pomoci Return(5001)?
Trapim se s tim cely den a zatim bez vysledku.
Zkousim to pomoci parametru pdReturnValue (to hlasi nespravny pocet
parametru), hledam ve zdrojakach po properties TADOCommand, zatim
bezvysledne.
Univerzalni DB komponenty pro D4
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 8.10.2002 16:02:53
> To ja vim, ale ja resim mechanismus pristupu k ODBC.
No dyt sem psal: komponenty ODBCe.
Roman
==============================
http://kouzelne.misto(tec)cz
rekurzivna funkcia
[*] Peter Surovy <psurovy(zv)uevora.pt> - 8.10.2002 16:39:40 -0000
Ahoj
napisal som si funkciu ktora vracia record
a co vola samu seba cca takto:
function najdi_mensibod(x,y:word):TPos;
...
if najmensi=g then begin
result.x:=x;
result.y:=y;
end;
if najmensi=ghl then najdi_mensibod(x-6,y-6); //riadok1
if najmensi=ghh then najdi_mensibod(x, y-6); //riadok2
if najmensi=ghp then najdi_mensibod(x+6,y-6); //riadok3
if najmensi=gll then najdi_mensibod(x-6,y);
problem je ked napr. plati riadok cislo 2
zavola sa funkcia s novymi parametrami spravne
ale potom ked uz obsahuje result spravne vysledky
pokracuje to tu zase riadkom 3 a tam uz robi blbosti
pretoze sa pri rekurzivnom volani prepisali premenne ghl,ghh. ...
skusal som tam dat exit ale to mi jaksi nepomohlo
Skratka chcel by som nejako napisat ze ked uz vojde do tej podmienky
kde sa naplna result uz nech to vsetko skonci ale neviem ako.
PS
lock manager out of room
[*] Pavel Cisar <pcisar(zv)users.sourceforge(tec)net> - 8.10.2002 17:41:33
Haj hou!
On 8 Nov 2002 at 10:59, Lebeda David wrote:
> Jediny navod, na ktery jsem narazil, je zvysit v souboru ibconfig
> hodnotu parametru V4_LOCK_MEM_SIZE z implicitni hodnoty
> 98304 na 198304. To jsme udelali a hlaska se stale objevuje.
A odstranili jste znak # (komentar) ze zacatku radku a restartovali
server ?
> Co to vubec znamena a co ji hlavne zpusobuje? Je to kvuli spatne praci
> se serverem nebo jde o externe neresitelnou chybu FB?
Externe je to resitelne zvysenim limitu v konfiguraci. Ne kazdy vyssi
limit potrebuje a IB pochazi z dob, kdy setrit pameti bylo treba, tolik k
duvodum proc je default tak maly. V ramci projektu Firebird se mluvilo o
zvyseni defaultni hodnoty nebo jeste lepe o dynamickem rozsirovani
tabulky. Dokud ovsem nebude nova varze, musite se smirit s konfiguracnim
souborem.
> Uz opravdu zurim, protoze server FB se mi jevi jako dost nestabilni.
Co to znamena nestabilni. Jake problemy mate. Mohu ze skusenosti rici, ze
vetsina uzivatelu si na zadnou nestabilitu nestezuje (i kdyz samozrejme
IB/FB neni bez chyb), takze i vase problemy by se zaiste daly odstranit
nebo alespon zmirnit.
> Pred 2 dny, po pouhem spusteni aplikace, na serveru vzniklo pres
> 150 procesu a neustale pribyvaly dalsi, az do totalniho zahlceni. Po
> delsim patrani, co se deje, se ukazalo, ze za to muze z nejakeho
> duvodu naboreny GDB soubor. OK, gfix opravil nejake chyby v
> indexech stranek, udelala se zaloha a pri pokusu o obnovu to
> vyhucelo s tim, ze "validation error on column B_RIZENY". Prislusny
> sloupec je definovan jako NOT NULL, presto v nem byly 3 radky s
> hodnotou NULL. Prusery to jsou 2:
>
> 1) To uz se opravdu nemohu spolehnout ani na bezchybnost v
> techto zakladnich zalezitostech?
Kdyby jste znal dokumentaci, tak by jste o tomto omezeni/problemu vedel.
Tento problem se nevyskytuje bezne, ale jsou presne zname a
zdokumentovane situace, kdy _muze_ vzniknout (a jak to resit).
> 2) Ale hlavne - zakaznik si zalohuje, zalohuje, pak vyhori a co se
> ukaze? Vsechny zalohy mu jsou na nic, protoze zaloha sla provest
> bez problemu, zatimco obnova kvuli takoveto kravine neprojde.
Z toho duvodu je nutne:
1) vedet kdy k tomuto muze dojit (v podstate jen pri zmene struktury jiz
naplnene databaze nebo poskozenim databaze).
2) Prijmout odpovidajici opatreni, tzn. obnovit cas od casu ze zalohy. To
je konec koncu doporuceny postup z mnoha duvodu. Pak se vam nestane, ze
vas tento problem zastihne v nepravy okamzik.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Univerzalni DB komponenty pro D4
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 17:58:02
> Odes�latel: Zbysek Hlinka <hlinka(zv)hlinka(tec)cz>
> Dodatek: VCL Delphi nic takoveho primo neumoznuje. COM na to take
> neni moc vhodne, takze je to vsechno rucni drina. Az .NET je pro
> takovy system slusne pripraven. Takze doufam, ze to Borlandi nezprasi
> a pujde to i v Delphi.
Jo, Zbysku, uz se na tebe tesim na seminari "Delphi 2003".
Budes mit spoustu prilezitosti :-)
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Jak na servisni app
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 8.10.2002 18:08:14
> Odes�latel: Zdenek Brejsa <prog(zv)hjsoft(tec)cz>
> ALE nikdy jsem nic podobneho nedelal a tak chci pozadat chytrejsi kolegi o
> rady jak na to.
Sorry, ale je toho hodne: NT services, NT security, multithreading, COM, DCOM, ...
Kurzy
"Serverove aplikace na Win NT/2000"
nebo mozna
"COM/DCOM"
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
rekurzivna funkcia
[*] Peter Surovy <psurovy(zv)uevora.pt> - 8.10.2002 17:52:34 -0000
No odpoviem si zase sam :-)
----- Original Message -----
From: "Peter Surovy" <psurovy(zv)uevora.pt>
Sent: Friday, November 08, 2002 4:39 PM
> function najdi_mensibod(x,y:word):TPos;
> ...
> if najmensi=g then begin
> result.x:=x;
> result.y:=y;
> end;
> if najmensi=ghl then najdi_mensibod(x-6,y-6); //riadok1
> if najmensi=ghh then najdi_mensibod(x, y-6); //riadok2
> if najmensi=ghp then najdi_mensibod(x+6,y-6); //riadok3
> if najmensi=gll then najdi_mensibod(x-6,y);
ked funkcia zavola samu seba a naplni sa result je to len
ciastocny result a najvyssia uroven funkcie ho nema skade vidiet
preto treba tie riadky upravit takto:
if najmensi=ghl then RESULT:=najdi_mensibod(x-6,y-6);
....
PS
Scrollbar a DBGrid
[*] bleak <bleak(zv)mvesely(tec)com> - 8.10.2002 20:51:30
zdravim,
potrebuji skryt scrollbar ud DBGrid pokud je pocet radku mensi nez je vyska
DBGrid.
Mam napr. 10 radku a do DBGrid se jich vejde 15, presto je scroolbar videt.
Jak na to?
bleak
Dedeni formulare s frame
[*] Ing. Pavel �ilinec����)b���zf���3 - 9.10.2002 13:01:51
Mel jsem tento problem take a spocivalo to v tom, kdyz jsem mel dany
frame v jinem balicku, nez kde jsem ho chtel pouzit. Stacilo do
projektu s novym balickem pridat jeste i ten balicek s tim framem a uz
je to v pohode.
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
D> Jiz jsem jednou ptal, ale asi to zapadlo.
D> Vytvoril jsem si novy frame, ktery obsahuje jenom PopupMenu.
D> Tento frame jsem dal na novy formular a na formular pridal ActionList.
D> V actionlistu jsem vytvoril jednu akci a priradil ji do PopupMenu, (tim
D> vznikla v PopupMenu jedna polozka).
D> Az sem to funguje OK.
D> Nyni kdyz vytvorim potomka tohoto formulare, tak aplikace nejde spustit s
D> chybou 'Ancesor for <nova polozka v popupmenu> not found'. I primo v Delphi
D> to hlasi obdobnou chybu.
D> Da se to nejak vyresit ?
D> Diky Delphin
D> D6
SQL - Vymazani vet, ktere jsou v druhe tabulce
[*] Ing. Pavel �ilinec����)b���zf���3 - 9.10.2002 13:05:58
delete PrvniTabulka
from DruhaTabulka
where PrvniTabulka.ID = DruhaTabulka.ID
Pokud nejde toto, muzes jeste udelat podselect:
delete PrvniTabulka
where 0 < (select count(T2.ID)
from DruhaTabulka T2
where T2.ID = PrvniTabulka.ID)
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
D> Mam dve DBF tabulky. Jde nejak pres SQL vymazat vety, ktere jsou obsazeny v te
D> druhe tabulce?
D> Dekuji
D> D5 Prof, BDE, W2000
cislovanie riadkov
[*] Slafco <skippo(zv)post.sk> - 9.10.2002 13:53:12
caf konfera
nerobili ste niekto niekedy nieco taketo : vedla riadkov richeditu by bolo ich cislovanie..
resp ako zistit ak som niekde nascrollovany v richedite, ako zistim ktory riadok je prvy zobrazeny?
dufam ze som to velmi neskomolil ;)
thanx za nejaky napad
Slafco
________
Pocitacove hry? http://hry.sme.sk
Viac SQL prikazov naraz
[*] Ludo Fulop <kexo(zv)ynet.sk> - 9.10.2002 19:07:40
zdravim, ako do ADOQuery.SQL vlozit viac SQL prikazov?
skusal som dat do kazdeho riadku jeden, oddelovat medzerou, bodkociarkou,
ale nic nefungovalo :(
dik
Ludo Fulop
Jak zablokovat-zakazat mys ve Win95 ??
[*] mp <pavlik(zv)celebris(tec)cz> - 9.10.2002 19:34:55
Zdravim. Nevite nekdo jak na to?
D6, win95,
- userdll32.exe mouse, disable,"sw_normal" vypne
enable nazapne.
Prosim o trknuti.Dik.
Jak zablokovat-zakazat mys ve Win95 ??
[*] J�n Harman <harman(zv)atlas(tec)cz> - 9.10.2002 20:37:59
Mozna by bylo jednou z moznosti odchytavat zpravu Wm_NCHITTEST a jako Result
vracet HTNOWHERE pokud nechces aby nic neobsluhovala.
Zdravi Honza.
> Zdravim. Nevite nekdo jak na to?
> D6, win95,
> - userdll32.exe mouse, disable,"sw_normal" vypne
> enable nazapne.
>
> Prosim o trknuti.Dik.
>
>
>
>
Jak zablokovat-zakazat mys ve Win95 ??
[*] Ludo Fulop <kexo(zv)ynet.sk> - 9.10.2002 20:50:14
ak ti staci vypnut/zapnut kurzor, tak exituje api funkcia ShowCursor
Ludo Fulop
----- Original Message -----
From: "mp" <pavlik(zv)celebris(tec)cz>
Subject: Jak zablokovat-zakazat mys ve Win95 ??
Jak zablokovat-zakazat mys ve Win95 ??
[*] mp <pavlik(zv)celebris(tec)cz> - 9.10.2002 21:21:38
showcursor(false} sice skryje kursor,
ale aplikace na wheel buttonu bezi vesele
dale. Jak odbourat firm aplikaci
na wheelbuttonu - to nevim.
Milous.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Ludo Fulop
Sent: Saturday, November 09, 2002 8:50 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak zablokovat-zakazat mys ve Win95 ??
ak ti staci vypnut/zapnut kurzor, tak exituje api funkcia ShowCursor
Ludo Fulop
----- Original Message -----
From: "mp" <pavlik(zv)celebris(tec)cz>
Subject: Jak zablokovat-zakazat mys ve Win95 ??
Tlac z RichEditu
[*] Martin Kasman <martinkasman(zv)centrum.sk> - 09.10.2002 22:32:19
Potrebujem zobrazit na obrazovke par riadkov vygenerovaneho textu a potom ho
vytlacit. Riesim to tak, ze do RichEdit hodim text a potom dam
RichEdit.Print. Problem je v tom, ze akonahle sa vyskytuju v texte niektore
znaky (napr. n s makcenom / n s hackem), tak sa za tymto znakom zmeni font,
aj ked je "natvrdo" zadefinovany. Ako by ste to riesili vy? Pouzit radsej
inu komponentu pre tlac?
Vdaka za kazdu radu.
---------------------
stiahnite si zalohovaci program zdarma pre Vase citlive udaje z adresy
www.martinkasman.host.sk/kom/download/trap.htm
OT: NEW C# LANGUAGE FEATURES
[*] Erik Salaj <winsoft(zv)stonline.sk> - 10.10.2002 00:31:38
http://www.gotdotnet.com/team/csharp/
Erik
OT NEW C# LANGUAGE FEATURES
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2002 02:25:48
From: "Erik Salaj" <winsoft(zv)stonline.sk>
> http://www.gotdotnet.com/team/csharp/
Skoda ze nefunguje ten 'Demo Files' link.
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
Viac SQL prikazov naraz
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 10.10.2002 11:44:40
> Odes�latel: Ludo Fulop <kexo(zv)ynet.sk>
> zdravim, ako do ADOQuery.SQL vlozit viac SQL prikazov?
> skusal som dat do kazdeho riadku jeden, oddelovat medzerou, bodkociarkou,
> ale nic nefungovalo :(
Vsechny komponenty tohoto typu (TQuery, TADOQuery, TADODataSet, TIBQuery, TIBDataSet, TSQLQuery, TSQLDataSet) jsou konstruovany pro jeden prikaz.
Pokud chces vice prikazu, musis si to nejak zprogramovat sam - nic tezkeho:
procedure ExecSQLScript(SQL:TStrings)
a tady z SQL.Text vyseparujes jednotlive prikazy treba tak, ze najdes priskusny separator, treba ";", jednotlivy prikaz nacpes do ADOQuery.SQL a provedes ADOQuery.ExecSQL.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347735)
=========================================
Viac SQL prikazov naraz
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 10.10.2002 16:26:53
Ahoj,
> honza(zv)haes(tec)cz 10.11.02 11:44 >>>
> Odes�latel: Ludo Fulop <kexo(zv)ynet.sk>
> zdravim, ako do ADOQuery.SQL vlozit viac SQL prikazov?
> skusal som dat do kazdeho riadku jeden, oddelovat medzerou, bodkociarkou,
> ale nic nefungovalo :(
>Vsechny komponenty tohoto typu (TQuery, TADOQuery, TADODataSet, TIBQuery, TIBDataSet, TSQLQuery, TSQLDataSet) jsou konstruovany pro jeden prikaz.
tak to neni pravda
ja bezne pouzivam ADOQuery nad MSSQL, kde mam vice selectu, insertu nebo update....jen se musi spravne skombinovat
ty co vraci DataSet musi byt jen s temi co vraci DataSet a naopak
a je to daleko rychlejsi, kdyz to poslu vsechno naraz nez to delat v nejakem cyklu
takze v klidu muzu pouzit
ADOQuery.Close();
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add('SELECT * FROM Tabulka1');
ADOQuery.SQL.Add('SELECT * FROM Tabulka2');
ADOQuery.SQL.Add('SELECT * FROM Tabulka3');
ADOQuery.Open();
prvni SELECT mas normalne v DataSource.DataSet a ostatni dostanes pomoci metody NextRecordset()
nebo treba
ADOQuery.Close();
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add(Format('INSERT INTO Tabulka1 (Col1, Col2) VALUES %d, ''%s'')', [10, 'Nejaky text']));
ADOQuery.SQL.Add(Format('UPDATE Tabulka2 SET Col1 = %d WHERE IdTabulka2 = %d', [10000, 123]));
ADOQuery.ExecSQL();
S pozdravem
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
mailto:jaroslav.blazek(zv)access-it(tec)cz
http://www.access-it(tec)cz
ICQ# : 133673990
+420605/813644
Jak na servisni app
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 10.10.2002 16:32:51
----- Original Message -----
From: "Zdenek Brejsa" <prog(zv)hjsoft(tec)cz>> Ahoj,
> dostal jsem ukol udelat aplikaci, ktera na pozadi (bez obslohy uzivatelem)
> bude provadet v zadanem obdobi (napr: pondeli, streda, patek od 22:00 do
> 01:00) v zadanem intervalu (co pul hodiny) nejakou cinnost. Vim ze
existuji
> servisni aplikace a pripada mi, ze je to to prave orechove na muj problem.
> ALE nikdy jsem nic podobneho nedelal a tak chci pozadat chytrejsi kolegi o
> rady jak na to.
> tedy: jak zacit, jak zajistit konfigurovatelnost, jak to udelat aby to
> zbytecne nezatezovalo PC ... a nevim jake muzou jeste byt problemy
Ahoj.
Pokud se jedna opravdu o talovouhle davkovou cinnost je na to IMHO vhodnejsi
pouzit "Naplanovane ulohy".
Postup.
1) Napises v Delphi aplikaci ktera pri spusteni provede pozadovane ukoly a
skonci. Muzes ji psat jako konzolovou bez formu, ale neni to nutne.
2) Zalozis uzivatelsky ucet s potrebnymi pravy tak aby aplikace mohla pod
nim fungovat.
3) V Start>Ovladaci panely>Naplanovane ulohy>Pridat novou ulohu pridas svoji
aplikaci a nastavis spousteni pod prislusnym uctem a prislusne casy pro
spusteni.
(Tydne ve 22:00 a zaskrtnes Pondeli, Streda,Patek) zalozis ulohu a das
upresnit pak jeste tlacitko upresni a nastavis opakovat ulohu kazdych 30 min
az do 23:59
Pak jeste musis zalozit ulohu pro Utery,Ctvrtek a Sobotu od 00:00 hod do
01:00 hod
Mozna by frcelo i nastavit jen dobu po kterou se to ma opavkovat a slo by to
pres pulnoc.
Je to 100% funkcni.(Mnohokrat vyzkouseno v praxi) a predevsim pokud na
stroji ma bezet vice takovyhle pravidelnych davek pak je skoda playtvat
pameti a prostredky k tomu, aby 10 services vicmene jen kontrolovalo cas,
jestli uz se ma vzbudit a neco udelat.
V neposledni rade je to i mnohem jednodussi napsat, nez se trapit s psani
services.
Ludek
Pouziti RegNotifyChangeKeyValue
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 10.10.2002 20:23:27
Ahoj,
nemate nekdo maly priklad pouziti API fce RegNotifyChangeKeyValue v Delphi ?
(Tedy kousek zdrojaku nebo odkaz...).
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Pouziti RegNotifyChangeKeyValue
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2002 20:49:48
From: "Jiri Foldyna" <jiri.f(zv)avizo(tec)cz>
> nemate nekdo maly priklad pouziti API fce RegNotifyChangeKeyValue v Delphi ?
> (Tedy kousek zdrojaku nebo odkaz...).
http://groups.google.com/groups?&selm=891rp0%248355%40bornews.borland.com
Petr Vones
______________________________________________________
Zachrante kolacky a koblihy: http://www.kobliha.4ip(tec)cz
lock manager out of room
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 11.10.2002 07:56:49
> > Jediny navod, na ktery jsem narazil, je zvysit v souboru ibconfig
> > hodnotu parametru V4_LOCK_MEM_SIZE z implicitni hodnoty 98304 na
> > 198304. To jsme udelali a hlaska se stale objevuje.
>
> A odstranili jste znak # (komentar) ze zacatku radku a restartovali
> server ?
Jiste, uz jednou jsem se takhle spalil, takze uz to vim.
>
> > Co to vubec znamena a co ji hlavne zpusobuje? Je to kvuli spatne
> > praci se serverem nebo jde o externe neresitelnou chybu FB?
>
> Externe je to resitelne zvysenim limitu v konfiguraci.
Dokud ovsem nebude nova varze, musite se smirit s
> konfiguracnim souborem.
Mne konfiguracni soubor nevadi. Prosim vsak i info:
1) Hodnota 198 304 je maximalni, nebo mohu jeste pridat? Pokud neni maximalni,
kam az muzu zvysovat?
2) Da se nejak strucne a velmi principialne vysvetlit, o co jde? Pod pojmem lock
manager bych ocekaval spravce uzamceni zaznamu, a v takovem pripade by k
uvolneni treba mohlo stacit to, ze se vsichni od serveru odhlasi. Na druhou stanu -
pocet uzivatelu je jednociferny, nevim, proc by meli lock manager zahltit, ale budiz.
Chtel bych se aspon castecne dostat do obrazu, ceho se vlastne ten problem tyka.
>
> Co to znamena nestabilni. Jake problemy mate.
Prave ze to se tezko popisuje. Je nas tady v tymu 6 a ladime aplikace nad vetsi
databazi (nekolik set tabulek, pres 1000 triggeru). Na jednom FB serveru jsou tri
databaze (stejna struktura, ruzna data).
1) Stava se casteji nez vyjimecne, ze pri pokusu o prihlaseni k jedne databazi
vyskoci lock manager out of room, zatimco s jinou se da pracovat v pohode. Pritom
s databazi, na ktere hlaska vyskakuje, v dane chvili nikdo nepracuje, nebo max. 5
lidi.
2) Hodne casto musim pozadat spravce serveru, aby FB utal a restartoval, nekdy je
treba restart celeho stroje. Bud na serveru vyskoci pres 100 procesu IBSERVER a
tim ho zahlti, nebo tech vlaken je par, ale jedno jede ne 98% a cele je to tim vytuhle.
Vlakno pritom nezmizi ani pote, co se vsichni odhlasi. K tomu nekdy staci treba z
IBConsole zadat nejaky select (to jiste neni spousteci mechanismus, ale jen nejaka
zaminka).
Nad databazi se pritom nedelaji zadne nezvyklosti, proste bezny provoz pomoci SQL
jazyka.
3) Cas od casu se ukaze, ze je naboreny gdb soubor. Pritom vsude zastanci SQL
serveru tvrdi, ze "se to (skoro) nemuze stat". Kdyby to bylo vyjimecne, nevadilo by
to. Ale tady se to stava sice ne zcela bezne, ale pritom dostatecne casto na to,
abychom si toho vsimli. Pokud by se to takhle melo chovat u zakaznika, tak nas
vypiska.
Nevim, kde je problem, ale nezpusobuji ho vypadky proudu. Proste jen bezny
provoz. Je pravda, ze se prubezne doplnuje struktura databaze (SQL skriptem). To
by snad nemelo gdb soubor rozhodit.> Kdyby jste znal dokumentaci
Mam k dispozici pouze dokumentaci k IB6. Samozrejme ji neumim zpameti, takze je
mozne, ze se tam o resenem problemu neco pise, ale uznavam, ze bych mel o
dokumentaci mit lepsi prehled, nez mam nyni. Existuje uz dokumentace primo k FB
nebo treba nejaky plan, kdy bude?
Jinak diky za reakci, jsem rad, ze ten dotaz nezmizel do ztracena, a kdyz se ukaze,
ze chyba je na me strane a ze ji tudiz muzu odstranit, bude to jen dobre. Ale zatim o
takove chybe nevim.
V tuto chvili ale prosim neresme ten pomerne vagne popsany a zmapovany problem,
ktery jsem oznacil jako nestabilita. To by asi chtelo hlubsi pozorovani a rozbor.
Ale jestli muzu poprosit o povidani k lock manager out of room, jak pisu vyse, to
bych opravdu rad. Diky.
David Lebeda
FB/IB - cestina - CHARACTER SET WIN1250
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 11.10.2002 07:56:55
Ahoj,
potrebuju vyresit jeden problem, se kterym si nevim rady.
Vytvoril jsem pomoci IBConsole novou databazi ve FB. Zapomnel jsem zadat char set a pri "ORDER BY
prijmeni" mi to neseradilo ceske znaky.
OK, databazi jsem vytvoril znovu, a priradil jsem ji default char set WIN1250. Zmena se projevila u
vsech tabulek, kde u kazdeho sloupce (ktery ma neco spolecneho se znakama) se automaticky doplnilo
CHARACTER SET WIN1250.
Co nechapu je to, ze ani po teto zmene se na vysledku setrideni nic neprojevilo. PROC???
Jedinou zmenou je to, ze pomoci IBConsole uz do takoveto databaze nezapisu ani jeden cesky znak.
Vzdy to ohlasi chybove hlaseni - neco jako ze nemuze prevest znaky mezi ruznymi character sety.
Vytvoril jsem novy projekt v delphi, kde jsem pouzil komponentu IBDatabase, kde jsem nastavil opet
WIN1250, ceske zanky jsem zapsal, ale vysledek opet stejny. Neseradi tabulku vcetne ceskych znaku.
Kde je problem???
Dost to specha a tak dekuji za rychle odpovedi.
Mej te se fajn. Jirka
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
Kliknete, hlasujte a vyhrajte v ankete Nejoblibenej�i automobil roku 2003 v Ceske republice ceny za milion!! http://www.autoroku(tec)cz
Tlac z RichEditu
[*] bardon <bardon(zv)akord-soft(tec)cz> - 11.10.2002 07:58:35
Neverim, ze je to problem RichEditu, mi to nikdy nedelal. Podobne kousky umi
napriklad vadny ovladac tiskarny, skus to na jine tiskarne.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Martin Kasman
Problem je v tom, ze akonahle sa vyskytuju v texte niektore
znaky (napr. n s makcenom / n s hackem), tak sa za tymto znakom zmeni font,
aj ked je "natvrdo" zadefinovany. Ako by ste to riesili vy? Pouzit radsej
inu komponentu pre tlac?FB/IB - cestina - CHARACTER SET WIN1250
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 11.10.2002 08:00:39
> Co nechapu je to, ze ani po teto zmene se na vysledku setrideni nic
> neprojevilo. PROC???
Trideni urcuje collate. Musis u prislusnych sloupcu nebo u domen doplnit collate
PXW_CSY.
> Jedinou zmenou je to, ze pomoci IBConsole uz do takoveto databaze
> nezapisu ani jeden cesky znak. Vzdy to ohlasi chybove hlaseni - neco
> jako ze nemuze prevest znaky mezi ruznymi character sety.
Asi nemas nastaveny charset na connection. Musis mit nejaky na databazi a nejaky
na connection. Zkus Connect as... a tam ho rovnez nastavit.
David Lebeda
FB/IB - cestina - CHARACTER SET WIN1250
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 11.10.2002 08:10:30
On 11 Nov 2002 at 7:56, Ing. Jiri SOKOL wrote:
To je zde jiz evergreen. Pro spravne trideni je treba definovat
sloupce s COLLATE PXW_CSY (treba), klient musi mit nastaven
charset databaze - z IBConsole Connect as ..., iSQL set names.
> zadat char set a pri "ORDER BY prijmeni" mi to neseradilo ceske znaky.
> OK, databazi jsem vytvoril znovu, a priradil jsem ji default char set
> WIN1250. Zmena se projevila u vsech tabulek, kde u kazdeho sloupce
> Co nechapu je to, ze ani po teto zmene se na vysledku setrideni nic
> neprojevilo. PROC???
FB/IB - cestina - CHARACTER SET WIN1250
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 11.10.2002 08:19:55
OK,
dekuju za rychlou odpoved, ale neslo by to trochu vic rozvest. S FB/IB zacinam a tak se chytam jen
okrajove. Mam teda nastavovat tu databazi pri create na WIN1250 nebo ne? Jak nastavim COLLATE
PXW_CSY? Na co musi mit nastaveno clienti charset databaze?
co je to iSQL set names?
Diky a omlouvam se, ze jsem jeste mimo. Priste uz bude lepsi.
Moc diky
Jirka
> On 11 Nov 2002 at 7:56, Ing. Jiri SOKOL wrote:
>
> To je zde jiz evergreen. Pro spravne trideni je treba definovat
> sloupce s COLLATE PXW_CSY (treba), klient musi mit nastaven
> charset databaze - z IBConsole Connect as ..., iSQL set names.
>
> > zadat char set a pri "ORDER BY prijmeni" mi to neseradilo ceske znaky.
> > OK, databazi jsem vytvoril znovu, a priradil jsem ji default char set
> > WIN1250. Zmena se projevila u vsech tabulek, kde u kazdeho sloupce
> > Co nechapu je to, ze ani po teto zmene se na vysledku setrideni nic
> > neprojevilo. PROC???
>
>
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky
programator
______________________________________________________________________
Reklama:
Nenechte si ujit novy film Woodyho Allena "Hollywood Ending" - blaznivou
komedii o tom, jak se ve tme strefit do cerneho. V kinech od 3.9.2002.
Sledujte http://www.hce(tec)cz
TWebBrowser a nove okno v MDI apl.
[*] Da�a Petr <Petr.Dana(zv)pvt(tec)cz> - 11.10.2002 08:52:50
Zdravim,
mam MDI aplikaci, kde jsou child okna s komponentou TWebBrowser. Pokud se ma otevrit nove okno IE (treba pri shift-click na odkaz), jsem schopen to poznat v udalosti NewWindow2. Pak mohu otevrit nove child okno misto toho, aby se pustilo samotne IE. Problem je v tom, jak tomu novemu oknu dat vedet, co ma vlastne otevrit. NewWindow2 ma v podstate akorat parametr "var ppDisp: IDispatch". Predpokladam, ze v tom novem okne bude nejlepsi zavolat funkci Navigate, ale jak uz jsem psal, nemam data pro jeji parametry.
Muzete mi nekdo poradit, jak to tedy udelat?
Diky
Peca
lock manager out of room
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2002 09:04:31
Lebeda David dne 11 Nov 2002 v 7:56:
> 3) Cas od casu se ukaze, ze je naboreny gdb soubor. Pritom vsude
> zastanci SQL serveru tvrdi, ze "se to (skoro) nemuze stat". Kdyby to
> bylo vyjimecne, nevadilo by to. Ale tady se to stava sice ne zcela
> bezne, ale pritom dostatecne casto na to, abychom si toho vsimli.
> Pokud by se to takhle melo chovat u zakaznika, tak nas vypiska.
>
> Nevim, kde je problem, ale nezpusobuji ho vypadky proudu. Proste jen
> bezny provoz. Je pravda, ze se prubezne doplnuje struktura databaze
> (SQL skriptem). To by snad nemelo gdb soubor rozhodit.
Ahoj,
u IB serveru se mi tohle taky zpocatku stavalo (server byl na UPS, Win 2000). Zda se, ze to bylo
bud proto, ze jsem (hloupe) nastavil v konfiguracnim souboru DATABASE_CACHE_PAGES na cislo vetsi
nez 10000 (coz se, jak jsem se pak nekde docetl, nema - pry kvuli vykonu, ale kdo vi...), nebo
proto, ze jsem u databaze nemel nastaveno Forced Writes na true. Kdyz jsem tohle (oboje najednou)
zmenil, problemy naruseneho .gdb souboru prestaly.
Karel Rys
TWebBrowser a nove okno v MDI apl.
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.10.2002 09:16:10
QSBuZXN0YWNpIHVkYWxvc3QgT25OYXZpZ2F0ZSA/DQoNCi0tIA0KaW5nLiBKYW4gRmlhbGENCm1h
aWx0bzpqYW4uZmlhbGFAaW9sLmN6DQoNCjExLjExLjIwMDIgRGHyYSBQZXRyOg0KPiBaZHJhdmlt
LA0KPiBtYW0gTURJIGFwbGlrYWNpLCBrZGUganNvdSBjaGlsZCBva25hIHMga29tcG9uZW50b3Ug
VFdlYkJyb3dzZXIuIFBva3VkIHNlIG1hIG90ZXZyaXQgbm92ZSBva25vIElFICh0cmViYSBwcmkg
c2hpZnQtY2xpY2sgbmEgb2RrYXopLCBqc2VtIHNjaG9wZW4gdG8gcG96bmF0IHYgdWRhbG9zdGkg
TmV3V2luZG93Mi4gUGFrIG1vaHUgb3RldnJpdA0KPiBub3ZlIGNoaWxkIG9rbm8gbWlzdG8gdG9o
bywgYWJ5IHNlIHB1c3RpbG8gc2Ftb3RuZSBJRS4gUHJvYmxlbSBqZSB2IHRvbSwgamFrIHRvbXUg
bm92ZW11IG9rbnUgZGF0IHZlZGV0LCBjbyBtYSB2bGFzdG5lIG90ZXZyaXQuIE5ld1dpbmRvdzIg
bWEgdiBwb2RzdGF0ZSBha29yYXQgcGFyYW1ldHIgInZhciBwcERpc3A6IElEaXNwYXRjaCIuDQo+
IFByZWRwb2tsYWRhbSwgemUgdiB0b20gbm92ZW0gb2tuZSBidWRlIG5lamxlcHNpIHphdm9sYXQg
ZnVua2NpIE5hdmlnYXRlLCBhbGUgamFrIHV6IGpzZW0gcHNhbCwgbmVtYW0gZGF0YSBwcm8gamVq
aSBwYXJhbWV0cnkuDQo+IE11emV0ZSBtaSBuZWtkbyBwb3JhZGl0LCBqYWsgdG8gdGVkeSB1ZGVs
YXQ/
FB/IB - cestina - CHARACTER SET WIN1250
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 11.10.2002 09:29:21
> Mam teda nastavovat tu databazi
> pri create na WIN1250 nebo ne?
Ano
> Jak nastavim COLLATE PXW_CSY?
V definici domeny nebo sloupce.
> Na co
> musi mit nastaveno clienti charset databaze?
Na totez, co bylo v definici databaze. Tedy v tomto pripade na
WIN1250.
> co je to iSQL set names?
SQL prikaz:
Specifies an active character set to use for subsequent database
attachments. Available in SQL and isql.
SET NAMES [charset|:var]
> Diky a omlouvam se, ze jsem jeste mimo. Priste uz bude lepsi.
> Moc diky
> Jirka
>
> > On 11 Nov 2002 at 7:56, Ing. Jiri SOKOL wrote:
> >
> > To je zde jiz evergreen. Pro spravne trideni je treba definovat
> > sloupce s COLLATE PXW_CSY (treba), klient musi mit nastaven charset
> > databaze - z IBConsole Connect as ..., iSQL set names.
> >
> > > zadat char set a pri "ORDER BY prijmeni" mi to neseradilo ceske
> > > znaky. OK, databazi jsem vytvoril znovu, a priradil jsem ji
> > > default char set WIN1250. Zmena se projevila u vsech tabulek, kde
> > > u kazdeho sloupce Co nechapu je to, ze ani po teto zmene se na
> > > vysledku setrideni nic neprojevilo. PROC???
> >
> >
>
> Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
> D6ProfSP2,WinNT
> amatersky
> programator
>
> ______________________________________________________________________
> Reklama: Nenechte si ujit novy film Woodyho Allena "Hollywood Ending"
> - blaznivou komedii o tom, jak se ve tme strefit do cerneho. V kinech
> od 3.9.2002. Sledujte http://www.hce(tec)cz
Viac SQL prikazov naraz
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 11.10.2002 09:31:11
Pozor,
TADO..., nevykonna "jeden prikaz po druhem", ale vytvori si docasnou
ulozenou proceduru a tu spusti (podobne to funguje kdyz tam das parametry),
coz zejmena pri vytvareni objektu muze celkem dost zmenit vysledek.
Pribyde totiz jeste jedna vrstva tzv. implicitnich transakci a nektere
objekty ji nemusi prezit.
Pavel
From: Blazek Jaroslav [mailto:Jaroslav.Blazek(zv)access-it(tec)cz]
> honza(zv)haes(tec)cz 10.11.02 11:44 >>>
> Odes�latel: Ludo Fulop <kexo(zv)ynet.sk>
> zdravim, ako do ADOQuery.SQL vlozit viac SQL prikazov?
> skusal som dat do kazdeho riadku jeden, oddelovat medzerou, bodkociarkou,
> ale nic nefungovalo :(
>Vsechny komponenty tohoto typu (TQuery, TADOQuery, TADODataSet, TIBQuery,
TIBDataSet, TSQLQuery, TSQLDataSet) jsou konstruovany pro jeden prikaz.
tak to neni pravda
ja bezne pouzivam ADOQuery nad MSSQL, kde mam vice selectu, insertu nebo
update....jen se musi spravne skombinovat
ty co vraci DataSet musi byt jen s temi co vraci DataSet a naopak
a je to daleko rychlejsi, kdyz to poslu vsechno naraz nez to delat v nejakem
cyklu
takze v klidu muzu pouzit
ADOQuery.Close();
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add('SELECT * FROM Tabulka1');
ADOQuery.SQL.Add('SELECT * FROM Tabulka2');
ADOQuery.SQL.Add('SELECT * FROM Tabulka3');
ADOQuery.Open();
prvni SELECT mas normalne v DataSource.DataSet a ostatni dostanes pomoci
metody NextRecordset()
nebo treba
ADOQuery.Close();
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add(Format('INSERT INTO Tabulka1 (Col1, Col2) VALUES %d,
''%s'')', [10, 'Nejaky text']));
ADOQuery.SQL.Add(Format('UPDATE Tabulka2 SET Col1 = %d WHERE IdTabulka2 =
%d', [10000, 123]));
ADOQuery.ExecSQL();
ACTION LIST
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.10.2002 09:49:06
Rm9ybXVsYXIsIG5hIG5laiBkZWogMyB0bGFjaXRrYSBhIGRvIG9ic2x1aHkgcHJ2bmlobyBwcmly
YWQNClRGb3JtMS5CdXR0b24xQ2xpY2s7DQpEbyB1c2VzIGplIHRyZWJhIHByaWRhdCAiQWN0bkxp
c3QiDQoNCnByb2NlZHVyZSBURm9ybTEuQWN0aW9uMUV4ZWN1dGUoU2VuZGVyOiBUT2JqZWN0KTsN
CmJlZ2luDQogIFNob3dNZXNzYWdlKCdBa2NlMScpOw0KZW5kOw0KDQpwcm9jZWR1cmUgVEZvcm0x
LkFjdGlvbjJFeGVjdXRlKFNlbmRlcjogVE9iamVjdCk7DQpiZWdpbg0KICBTaG93TWVzc2FnZSgn
QWtjZTInKTsNCmVuZDsNCg0KcHJvY2VkdXJlIFRGb3JtMS5CdXR0b24xQ2xpY2soU2VuZGVyOiBU
T2JqZWN0KTsNCnZhcg0KICBhbDogVEFjdGlvbkxpc3Q7DQogIEFjdGlvbjEsIEFjdGlvbjI6IFRB
Y3Rpb247DQpiZWdpbg0KICBhbCA6PSBUQWN0aW9uTGlzdC5DcmVhdGUoU2VsZik7DQogIEFjdGlv
bjEgOj0gVEFjdGlvbi5DcmVhdGUoYWwpOw0KICBBY3Rpb24xLkFjdGlvbkxpc3QgOj0gYWw7DQog
IEFjdGlvbjEuQ2FwdGlvbiA6PSAnQWtjZSAxJzsNCiAgQWN0aW9uMS5PbkV4ZWN1dGUgOj0gQWN0
aW9uMUV4ZWN1dGU7DQogIEFjdGlvbjIgOj0gVEFjdGlvbi5DcmVhdGUoYWwpOw0KICBBY3Rpb24y
LkNhcHRpb24gOj0gJ0FrY2UgMic7DQogIEFjdGlvbjIuQWN0aW9uTGlzdCA6PSBhbDsNCiAgQWN0
aW9uMi5PbkV4ZWN1dGUgOj0gQWN0aW9uMkV4ZWN1dGU7DQogIHsgdGVkIGplc3RlIHZ5emtvdXNp
bWUgfQ0KICBCdXR0b24yLkFjdGlvbiA6PSBBY3Rpb24xOw0KICBCdXR0b24zLkFjdGlvbiA6PSBB
Y3Rpb24yOw0KZW5kOw0KDQotLSANCmluZy4gSmFuIEZpYWxhDQptYWlsdG86amFuLmZpYWxhQGlv
bC5jeg0KDQoxMS4xMS4yMDAyIExVS0VTIFbhY2xhdjoNCj4gQWhvaiwNCg0KPiBwcm9zaW0gbyBy
YWR1LiBQb3RyZWJvdmFsIGJ5Y2ggUFJPR1JBTU9WRSB2eXR2b3JpdCBBY3Rpb25MaXN0IHNlIGR2
ZW1hIEFjdGlvbi4NCg0KPiBEaWt5IG1vYw0KDQo+IFYuDQog
TWebBrowser a nove okno v MDI apl.
[*] Da�a Petr <Petr.Dana(zv)pvt(tec)cz> - 11.10.2002 10:03:44
Je tam jen OnNavigateComplete, ale to mi nepomuze. Prvni se zavola ta udalost OnNewWindow, ve ktere musim zakazat otevreni samostatneho okna IE a vytvorit vlastni child okno, ale pak uz se dal nehnu ...
>
> A nestaci udalost OnNavigate ?
>
> > Zdravim,
> > mam MDI aplikaci, kde jsou child okna s komponentou
> TWebBrowser. Pokud se ma otevrit nove okno IE (treba pri
> shift-click na odkaz), jsem schopen to poznat v udalosti
> NewWindow2. Pak mohu otevrit
> > nove child okno misto toho, aby se pustilo samotne IE.
> Problem je v tom, jak tomu novemu oknu dat vedet, co ma
> vlastne otevrit. NewWindow2 ma v podstate akorat parametr
> "var ppDisp: IDispatch".
> > Predpokladam, ze v tom novem okne bude nejlepsi zavolat
> funkci Navigate, ale jak uz jsem psal, nemam data pro jeji parametry.
> > Muzete mi nekdo poradit, jak to tedy udelat?
>
IB/FB - instalace knihovny s UDF pomoci InnoSetup
[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2002 10:09:47
ahoj,
potreboval bych udelat instalacku aplikace,
ktera musi k FireBirdu doinstalovat knihovnu dll
s nejakymi UDF po instalovanou aplikaci.
mate to nekdo vyreseny, nebo nejaky rady nez
to zacnu zkouset? treba jak v InnoSetupu zjistit
cestu k FB 1.0
dekuji
peca
TWebBrowser a nove okno v MDI apl.
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 11.10.2002 10:14:25
Ahoj,
pouzij udalost BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
v te si schovej do nejake promenne URL a v nove vytvorenem okne pomoci
Navigate zase prirad.
A.
> -----Original Message-----
> From: Da�a Petr [mailto:Petr.Dana(zv)pvt(tec)cz]
>
> Je tam jen OnNavigateComplete, ale to mi nepomuze. Prvni se
> zavola ta udalost OnNewWindow, ve ktere musim zakazat
> otevreni samostatneho okna IE a vytvorit vlastni child okno,
> ale pak uz se dal nehnu ...
Odchyceni komunikace na COM portu
[*] Jaroslav Koh�k <jaroslav.kohak(zv)dites(tec)cz> - 11.10.2002 10:15:33
Jasne,
podivej se normalne do helpu.
S COMem se pracuje jako se strandardnim streamem "WriteFile(hCom, pBuffer, Length, &ul, &o)". Kde hCom je typu handle a nadefinujes mu vse potrebne.Jestli to v helpari neobjevis a je Ti neco platny kod z
C++Builderu, tak Ti neco nacrtnu.
Cus Tymi
-----Original Message-----
From: David Kraina [mailto:DKx(zv)seznam(tec)cz]
Sent: Thursday, November 07, 2002 1:47 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Odchyceni komunikace na COM portu
Dne 6. listopad 2002, <delphi-l(zv)clexpert(tec)cz> napsal:
V pohode se to da udelat i bez kernelu pouzitim assemlberu,
ale pod jen pod Win9x - pod NT by to spadlo, jelikoz
na to musi byt prava.> Btw: Vidite tedy jinou�moznost, jak softwarove sledovat stav COM portu?
TWebBrowser a nove okno v MDI apl.
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 11.10.2002 10:33:14
>>> mam MDI aplikaci, kde jsou child okna s komponentou
>>> TWebBrowser. Pokud se ma otevrit nove okno IE (treba pri
>>> shift-click na odkaz), jsem schopen to poznat v udalosti
>>> NewWindow2. Pak mohu otevrit
>>> nove child okno misto toho, aby se pustilo samotne IE.
>>> Problem je v tom, jak tomu novemu oknu dat vedet, co ma
>>> vlastne otevrit. NewWindow2 ma v podstate akorat parametr
>>> "var ppDisp: IDispatch".
>> A nestaci udalost OnNavigate ?
> Je tam jen OnNavigateComplete, ale to mi nepomuze. Prvni se
> zavola ta udalost OnNewWindow, ve ktere musim zakazat
> otevreni samostatneho okna IE a vytvorit vlastni child okno,
> ale pak uz se dal nehnu ...
V evente OnNewWindow2 si vytvor novy MDI child form a do var ppDisp vrat
jeho web browser:
procedure TMainForm.WebBrowser1NewWindow2(Sender: TObject; var ppDisp:
IDispatch; var Cancel: WordBool);
var
NewChild: TChildForm;
begin
Cancel := False;
NewChild := CreateNewChild; // funkcia, ktora vrati novu instanciu MDI
child formulara
try
ppDisp := NewChild.WebBrowser1.DefaultInterface as IDispatch;
except
NewChild.Free;
Cancel := True;
raise;
end;
end;
Ak mas vo vytvoreni toho child formu priradeny event handler na
OnBeforeNavigate2 tak ten by sa mal v novom okne zavolat automaticky.
HTH
TOndrej
ADO+MDB, zamykanie zaznamov
[*] Robert Fujak <robof(zv)inmail.sk> - 11.10.2002 11:29:52
Zdravim,
viete mi prosim poradit ako mam zabezpecit zamok zaznamov nad MDB suborom?
Chcel som pouzit vlastny zamok nieco ako textove pole v tabulke LOCK, kde
zapisujem meno uzivatelea ktory edituje zaznam, ale neviem ako mam to pole
vyprazdnit ked mi napriklad spadne spojenie na sieti.
mam ADOConnection
a ostatne robim za behu.
Potrebujem:
1.otvorit zaznam na editovanie
-cez SELECT ho ziskam a naplinim TEdit(y)
-druhy uzivatel nesmie editovat // neviem ako
2.potvrdit a ulozit zaznam
-cez UPDATE
-uvolnim zaznam pre ostatnych uzivatelov
Dakujem Robo.
D6prof.
----------
Teraz si uz KAZDY moze registrovat svoju domenu .SK
Viac info na: http://www.SlovakNET.sk/predregistracia.asp
Default SMTP - jak zjistit? (staci omezeni na inst
[*] Danik Frantik <frantik(zv)telpro(tec)cz> - 11.10.2002 11:31:55
Dobry den,
pokousim se pomoci synapse pracovat se SMTP. Potreboval bych nejak zjistit
default SMTP server (+ popr. i dalsi nastaveni). V historii konference jsem
se docetl, ze toto nejde, jelikoz si to kazdy email-client uklada kam chce.
Nemate nekdo nejaky postup, jak toto zjistit pro bezne klienty? (mam dojem,
ze vsude bude outlook a WinNt/2000).
Staci pouzit klic HKEY_CURRENT_USER\Software\Microsoft\Office\Outlook\OMI
Account Manager\Accounts\00000001 ???? Nebo se to da zjistit nejak jinak
... - lepe?
Je tento klic alespon stabilni vyhledem k verzim outlooku?
Diky,
Danik
OT: Nevite nekdo prosim jak naimportuju soubor *.d
[*] Tom� Fajman��������ڎf����{� - 11.10.2002 11:49:06
Nevite nekdo prosim jak naimportuju soubor *.dmp v Oracle? Za odpovedi
predem mooooc dik :O)
Default SMTP - jak zjistit? (staci omezeni na inst
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2002 11:51:35
Danik Frantik dne 11 Nov 2002 v 11:31:
> Dobry den,
> pokousim se pomoci synapse pracovat se SMTP. Potreboval bych nejak
> zjistit default SMTP server (+ popr. i dalsi nastaveni). V historii
> konference jsem se docetl, ze toto nejde, jelikoz si to kazdy
> email-client uklada kam chce.
>
> Nemate nekdo nejaky postup, jak toto zjistit pro bezne klienty? (mam
> dojem, ze vsude bude outlook a WinNt/2000).
Ahoj,
nevyplatilo by se Ti v tom pripade spise pouzit MAPI? Nepotreboval bys nic nastavovat, uzivatel by
nad tim mel vetsi kontrolu, maily by mu zustavaly v odeslane poste... Jinak asi dobre znas sve
zakazniky, protoze napr. my ve skole pouzivame Pegasus Mail a ve firme GroupWise...
Karel Rys
Default SMTP - jak zjistit? (staci omezeni na inst
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.10.2002 11:54:55
Ale pomoci MAPi neposles postu pouze pres klienty, kteri poskytuji
SimpleMapi rzhranio a to Outlook urcite neni a o GroupWisech by to
taky nerekl.
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
11.11.2002 Karel Rys:
>> Nemate nekdo nejaky postup, jak toto zjistit pro bezne klienty? (mam
>> dojem, ze vsude bude outlook a WinNt/2000).
> nevyplatilo by se Ti v tom pripade spise pouzit MAPI? Nepotreboval bys nic nastavovat, uzivatel by
> nad tim mel vetsi kontrolu, maily by mu zustavaly v odeslane poste... Jinak asi dobre znas sve
> zakazniky, protoze napr. my ve skole pouzivame Pegasus Mail a ve firme GroupWise...
Default SMTP - jak zjistit? (staci omezeni na inst
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2002 11:59:34
Moc nerozumim - pouzivam
MapiSendMail(h, 0,m, MAPI_DIALOG or MAPI_LOGON_UI, 0);
S GroupWise to funguje - testovano, v provozu.
(Plny) Outlook s tim funguje zrejme take (testovano do faze, kdy mail skonci ve slozce k odeslani).
S Outlook Expressem to nejspis nefunguje, ten to rozhrani asi nepodporuje, ne?
Karel Rys
ing. Jan Fiala dne 11 Nov 2002 v 11:54:
> Ale pomoci MAPi neposles postu pouze pres klienty, kteri poskytuji
> SimpleMapi rzhranio a to Outlook urcite neni a o GroupWisech by to
> taky nerekl.
>
> --
> ing. Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz
>
> 11.11.2002 Karel Rys:
> >> Nemate nekdo nejaky postup, jak toto zjistit pro bezne klienty?
> >> (mam dojem, ze vsude bude outlook a WinNt/2000).
>
> > nevyplatilo by se Ti v tom pripade spise pouzit MAPI? Nepotreboval
> > bys nic nastavovat, uzivatel by nad tim mel vetsi kontrolu, maily by
> > mu zustavaly v odeslane poste... Jinak asi dobre znas sve zakazniky,
> > protoze napr. my ve skole pouzivame Pegasus Mail a ve firme
> > GroupWise...
>
>
>
> FB/IB - cestina - CHARACTER SET WIN1250
[*] Pavel Cisar <pcisar(zv)users.sourceforge(tec)net> - 11.10.2002 12:10:20
Haj hou!
On 11 Nov 2002 at 8:19, Ing. Jiri SOKOL wrote:
> dekuju za rychlou odpoved, ale neslo by to trochu vic rozvest. S FB/IB zacinam a tak se chytam jen
> okrajove. Mam teda nastavovat tu databazi pri create na WIN1250 nebo ne? Jak nastavim COLLATE
> PXW_CSY? Na co musi mit nastaveno clienti charset databaze?
> co je to iSQL set names?
1) Znakova sada sama o sobe na urceni poradi pro trideni nestaci, protoze
jednu sadu sdili vice jazyku.
2) Znakova sada je definovana pro data v databazi a pro klienta (kvuli
zobrazovani). Pokud se tyto dve lisi, provadi Firebird automatickou
konverzi pokud se tyto dve lisi (pokud je definovana). Vzlastni pozici ma
znakova sada NONE (nedefinovano). Jakmile se do hry dostane NONE na
jakekoliv strane, nelze provest konverzi a FB hlasi chybu.
3) Na obou stranach tedy potrebujete WIN1250 (pokud se budete pohybovat
na Windows). Pokud budete mit nejakeho klienta na Linuxu, musi si
nastavit znakovou sadu (ten klient) ISO8859-2.
4) COLLATE se nastavi nejlepe pri definici struktury tabulky. Napr.:
CREATE TABLE mytable (NAME VARCHAR(25) CHARACTER SET WIN1250 COLLATE
PXW_CSY);
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase