Archív konference Delphi

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

Firebird nenastartuje na Linuxe

[*] miromr <preas_w(zv)stonline.sk> - 8.7.2002 12:06:00

Ahoj,

> > Co to je, ze nenastartuje ? Nespusti se pri bootu, nebo kdyz zavolas
> > /etc/init.d/firebird start ? Mas to overeno (podle logu se nastartuje)
*** ano, nastartuje, ale ihned skonci
> > pres ps -A | grep ib ?
*** Nebezi - overene.
> > Nebo se proste nemuzes pripojit ? Pokud se nemuzes pripojit, ale
> > server bezi, pak nemas spravne nastavene /etc/host.equiv.
*** toto som skusal, nepomohlo (podla doporuceni na linux(zv)linux(tec)cz)

*** Kde sa da nastavit firebird, aby pisal do logu podrobnejsie informacie?
*** alebo ako ho spustit v nejakom debug rezime?

miro

Re[2]: XP nebo W2000?

[*] Kr�l Jirka <admin(zv)printo(tec)cz> - 8.7.2002 12:25:20

>>winxp padaji tak 2x i vicekrat denne (chyba v services.exe a automaticky odpocet do restartu). W2K jsou bez problemu. Mame samozrejme vsechny posledni patche.

Zrejme bych hledal zadrhel v hardware (potazmo v driverech neceho specifickeho). Zadne Win XP co tu mame jsem jindy nez po instalaci neceho bootovat nemusel. Jsem s XP maximalne spokojen.

J.

Doubleboot W2000 a WXP

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 8.7.2002 12:26:50

Mam doma partition 10 GB s WinXP a zadny problem nepozoruji. Filesystem je
NTFS.

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> rozdeleny disk na dve particie a max velkost particie pre Win2000
> a WinXP je
> cca. 7GB obmedzenie M$. a nejaku tretiu datovu particiu.
> Robo

Re[2]: XP nebo W2000?

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 8.7.2002 12:34:23

From: "Sula Milos" <milos.sula(zv)oku-su(tec)cz>

> W2K jsou bez problemu. Mame samozrejme vsechny posledni patche.

Ja mam podobnou zkusenost s FreeVCS serverem bezicim jako service.

Na XP to spolu s IB6 samo nikdy nenastartovalo ve spravnem poradi a kdyz
jsem nasledne rucne zrestartoval service, tak to sice nejak bezelo, ale
nejmene 1x tydne se to stejne kouslo :-((

W2K na stejnem stroji jedou cele mesice s kazdodennim automatickym backupem
DB bez problemu.


HTH, pf

MSSQL a trigger

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 8.7.2002 12:44:00

> From: Erik Salaj [mailto:winsoft(zv)stonline.sk]
> Sent: Friday, July 05, 2002 12:45 PM
> Subject: Re: MSSQL a trigger
>
> myslim, ze tato debata smeruje od extremu do extremu. Na jednej strane
> zabezpecenie databazy pomocou jedineho hesla, na druhej strane nejake
> superbezpecne systemy s certifikaciou. Som presvedceny, ze pre drvivu
> vecsinu databazovych programov (i v enterprise oblasti) taketo extremy
> vobec nie su potrebne. Zabezpecenie, ktore poskytuje NT-cko a MS SQL
> server tu plne postacuje. Je to skor otazka spravneho pouzitia tychto
> prostriedkov, ktore su k dispozicii.
>
> Erik
>
Chtel jsem rici neco podobneho a myslim ze nejsme v zasadnim rozporu, asi
jsem nenapsal prave srozumitelne:

1. Pokud se jedna o technicke zabezpeceni dat jsou soucasne bezne dostupne
prostredky dostatecne a je jich treba vzdy pouzivat, v mire odpovidajici
ucelu a cene dat !

2. Pokud se jedna o nejake dalsi zabezpeceni "prokazatelnost, pravo, ..."
nema cenu provadet nejaka harakiri s databazi, pristupovymi pravy a logy.
Bezne dostupne prostredky jsou nedostatecne a nema cenu neco takoveho
vytvaret "na kolene", protoze v dobe vyuziti bude nutno o bezpecnosti
presvedcit nikoliv s odborniky na SW (a bezpecnost), ale soudce (pravniky),
statni uredniky, ...

Nenabadal jsem k maximalizmu, ale k vybudovani bezpecnosti odpovidajici
ucelu aplikace, tj. nikoliv vse pod jednim heslem (i kdyz evidence CD by to
asi vydrzela) ani komplikovany system pridelovani opravni kazdemu na miru.

Sam jsem zazil provoz systemu s pridelovanim opravneni na uroven sloupce v
prehledech a prav na update kazdeho objektu v DB. Po ctrictvrte roce
existovaly pouze dve opravneni:
1. vse-vse (vse videt, vse menit),
2. vse-nic (vse videt-nic menit).
Uzivatele proste zvolna presvedcily vedeni, ze ta prava takto potrebuji, po
dalsim roce se vyclenily slovy "tri" formulare, kde kazdy smel updateovat
pouze vybrany uzivatel (skutecne vzdy prave jeden). Celkovy pocet formularu
byl temer 100 !

Pavel

Pavel Lstiburek

Psani DLL ve VB

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 8.7.2002 12:44:22

V tom ti neporadim, mam VB jen kvuli studiu zdrojaku puvodni aplikace.
Zkus se zeptat na http://forum.builder(tec)cz/list.php?f=19

Martin Ben


> -----Original Message-----
> From: "Jon� Mari�n, Ing." [mailto:Jonas(zv)komercpoj(tec)cz]
>
>
> Mne hlavne zajimaji bezne DLL ktere exportuji funkce, ktere
> mohu spoustet pres LoadLibrary a GetProcAddress.
>
> Marian
>
> > -----Original Message-----
> > From: Ben, Martin (CAP, GCF) [mailto:Martin.Ben(zv)gecapital.com]
> >
> > Ve VB6.0 lze psat ActiveX DLL
> >
> > Martin Ben
> >
> >
> > > -----Original Message-----
> > > From: "Jon� Mari�n, Ing." [mailto:Jonas(zv)komercpoj(tec)cz]
> > >
> > > Omlouvam se za OT. Potreboval bych vedet, jestli lze ve
> > > Visual Basicu psat DLL knihovny.
> >
>

TExcelApplication.Range.Sort(?,?,...

[*] Marek Repisky <marek.repisky(zv)foundry.sk> - 8.7.2002 13:03:31

Ahoj!

V D3 som pouzival nieco taketo:
OleExcel.Range['A4:K120'].Sort(OleExcel.Cells[3,8],1);

Presiel som na D6 a pokusal som sa to prepisat s pouzitim TExcelApplication
takto:
ExcelApp.Range['A4','K120'].Sort(ExcelApp.Cells.Item[3,8].Value,1,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);

Lenze pri vykonavani tohto prikazu, to vyhodi chybu: "Invalid variant type
conversion" a ja neviem prist na to, co sa mu nepaci. Uz som tam vyskusal
zadat vselijake kombinacie parametrov, hladal som v hlp, na inete, ale
nedokazem sa pohnut ani o krocik. Moze ma, prosim, niekto postrcit.
Potesil by funkcni prikladik.

Vdaka.

M

TExcelApplication.Range.Sort(?,?,...

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 8.7.2002 13:11:40

Zkus misto EmptyParam pouzit promennou, kterou nebudes nijak pouzivat. Ja
jsem s tim mel tytez problemy.

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> ExcelApp.Range['A4','K120'].Sort(ExcelApp.Cells.Item[3,8].Value,1,
> EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
> EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
>
> Lenze pri vykonavani tohto prikazu, to vyhodi chybu: "Invalid variant type
> conversion" a ja neviem prist na to, co sa mu nepaci. Uz som tam vyskusal

Co je treba k instalaci BDE

[*] David Michal <david.michal(zv)czechwireless(tec)cz> - 8.7.2002 13:13:40

Zdravim,
Ja mam D5, ale snad to bude stejne i pro D6. V c:\program files\common
files\borland shared\bde by mel byt soubor bdeinst.cab . Tento si rozbal a z
prikazoveho radku spust regsvr32 bdeinst.dll . Toto by melo provest
instalaci BDE vcetne BDEAdmin.
David

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Netu�il, Roman, Ing.
Sent: 8. �ervence 2002 7:15
To: DELPHI-Konference (el. adresa)
Subject: Co je treba k instalaci BDE


Panove,
chci se zeptat, co je treba udelat k instalaci BDE pro D6 bez pouziti
InstallShieldu. A dale jaky je v tomto rozdil mezi BDE pro D6 a D3.

Diky, Roman.
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.373 / Virus Database: 208 - Release Date: 1.7.2002

Re[2]: XP nebo W2000?

[*] Robert Suska <delphi(zv)korak.sk> - 8.7.2002 13:22:27

Ahoj!

Chcem sa opytat aky hardware pouzivate?

Robo


Win XP 15-20 dni ? hmm No co mame tady u nas tak vsechny winxp padaji tak 2x
i vicekrat denne (chyba v services.exe a automaticky odpocet do restartu).
W2K jsou bez problemu. Mame samozrejme vsechny posledni patche.


Milos

-----Original Message-----
From: Roland Turcan [mailto:rolo(zv)sedas.sk]
Sent: Monday, July 08, 2002 11:47 AM
To: Michal Bilcik
Subject: Re[2]: XP nebo W2000?
Moja skusenost je ze na Windows Playstation sa dalo pracovat pre
modrej obrazovky tak cca. 4hodiny na Win2000, WinXP ide PC bez
vypnutia cca. 15-20 dni potom ho restartnem (zvycajne po intalacii
nejakeho patchu od MS), zvykne Delphi 5 Pro SP#1 zosypat, ale dam ukoncit
proces a spustim znova a ide ako
jedna basen. Na WindowsXP som zistil akurat jednu chybu krasy a to ze
niekedy spravi, ze okienko zo zdrojovym kodom sa objavi ako spustena
aplikacia v taskbare. Teraz som menil PC a na novom z nVidiou Ge400 mi
to zatial nespravil. Mozno to bude tym ze tam bola ATI Rage IIC.


--
Best regards, TRoland

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] David Michal <david.michal(zv)czechwireless(tec)cz> - 8.7.2002 13:22:51

Zdravim,
Omlouvam se za dotaz zacatecnika. DLL jsem jeste nevytvarel. Mam v aplikaci nekolik QReportu. Tyto bych rad presunul do DLL a toto DLL chci nacist do pameti az bude potreba tisknout. Problem je, ze nevim jak to udelat. :)

Tedy mam dve otazky, jak vytvorim DLL s QReportem? A jak jej pote vyvolam z Aplikace?

Diky za cas,
David Michal

TExcelApplication.Range.Sort(?,?,...

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 08.7.2002 13:25:48

Mel jsem ten samy problem. Chyba vznika pri pouziti EmptyParam misto
promenne typu TOleEnum. Najdi si, ktere parametry jsou TOleEnum a nahrad
je za konstanty typu TOleEnum, treba xlAscending.

Marek Repisky wrote:
>
> Ahoj!
>
> V D3 som pouzival nieco taketo:
> OleExcel.Range['A4:K120'].Sort(OleExcel.Cells[3,8],1);
>
> Presiel som na D6 a pokusal som sa to prepisat s pouzitim TExcelApplication
> takto:
> ExcelApp.Range['A4','K120'].Sort(ExcelApp.Cells.Item[3,8].Value,1,
> EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
> EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
>
> Lenze pri vykonavani tohto prikazu, to vyhodi chybu: "Invalid variant type
> conversion" a ja neviem prist na to, co sa mu nepaci. Uz som tam vyskusal
> zadat vselijake kombinacie parametrov, hladal som v hlp, na inete, ale
> nedokazem sa pohnut ani o krocik. Moze ma, prosim, niekto postrcit.
> Potesil by funkcni prikladik.
>
> Vdaka.
>
> M

--
______________________________________________________
Karel Kral, vyvojar IT / IT developer
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________

IB: Index unexpectedly deleted.

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 8.7.2002 13:28:43

Netusite, jak vznikne tato chyba a co se s ni da delat? V tabulce lze
pridavat, editovat a prohlizet, chybu SQL server nahlasi pri pokusu o
zruseni zaznamu.

Re[2]: XP nebo W2000?

[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 8.7.2002 13:44:46

No na kazdem pc neco jineho. Ale asi takto

grafika: GeForce II 64MB AGP, popr. ATI Radeon 7000
motherboard: K7T266 Pro2 nebo intel D845T
sitovka: NETGEAR FA 310 nebo 311 popr. intel ted nevim presne oznaceni
procesor: P IV 1.5GHz nebo Athlon XP+ 1200
pamet: DDRAM 256 nebo 512MB
HDD: seagate barracuda

Milos

-----Original Message-----
From: Robert Suska [mailto:delphi(zv)korak.sk]
Sent: Monday, July 08, 2002 1:22 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Re[2]: XP nebo W2000?


Ahoj!

Chcem sa opytat aky hardware pouzivate?

Robo


Win XP 15-20 dni ? hmm No co mame tady u nas tak vsechny winxp padaji tak 2x
i vicekrat denne (chyba v services.exe a automaticky odpocet do restartu).
W2K jsou bez problemu. Mame samozrejme vsechny posledni patche.


Milos

Doubleboot W2000 a WXP

[*] Robert Suska <delphi(zv)korak.sk> - 8.7.2002 13:45:17

Ahoj!

Aj jeden kamarat nepozoroval problemi asi 2 tyzdne pokial sa mu to ale
dokladne nezcapalo :) Pomohlo iba separatne na druhy disk nainstalovat
Win2000 a prebrat vlastnicke prava na disk resp. na tie casti ktore mal ako
private. Takze potom si dal povedat a ma teraz partition 6,9GB co na system
a nejaky ten soft uplne staci a chodi mu to uplne bez problemov a dam ruku
do ohna za to ze ten pad systemu nesposobil on. Na microsofte by to asi zo
srandy nebolo .... Kolega ma tu URL odkial cerpam tuto info ked pride do
firmy tak Vam ju poslem.

Robo


> Mam doma partition 10 GB s WinXP a zadny problem nepozoruji. Filesystem je
> NTFS.
>
> S pozdravem
>
> Milan Tomes
> mailto:milan.tomes(zv)haida(tec)cz
>
> > rozdeleny disk na dve particie a max velkost particie pre Win2000
> > a WinXP je
> > cca. 7GB obmedzenie M$. a nejaku tretiu datovu particiu.
> > Robo

MS Word

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 08.7.2002 13:46:17

> PV> W.ActiveDocument.SaveAs ( 'c:\test1.rtf', wdFormatRTF );
>
> Dakujem, a este mi prosim porad, kde sa docitam, ze co je mozne pouzit
> v OLE automation a co nie, lebo v napovede k VBA s Wordom to nemam
> vsade uvedene.
> Je mozne sa pripojit aj na udalosti vo worde, konkretne mi ide o
> Document.BeforeClose.

Ahoj,

popravde povedane, systematicky popis prace s OLE vo vztahu
k Delphi som zatial nikde nenasiel, aj to malo, co som v tejto
oblasti naprogramoval, som robil vacsinou systemom pokusov
a omylov, na zaklade prikladov najdenych na Internete.
Mna osobne napriklad dost vytacalo, ze implementacia funkcii
volanych cez OLE sa medzi jednotlivymi verziami MS Office
moze lisit, tazko potom clovek vymysli nejake univerzalne
riesenie. Co sa tyka ovladania udalosti cez OLE, to som
zatial v praxi neriesil (pomozu snad nasi skusenejsi
kolegovia ;-) Mna sameho by to tiez celkom zaujimalo.

Vlkovic

Re[2]: XP nebo W2000?

[*] Robert Suska <delphi(zv)korak.sk> - 8.7.2002 13:54:22

Ahoj!

A pada to len pri AMD ci vseobecne ? Nie ze by som nieco mal proti AMD ale
predsa ten intel je lepsi co sa tyka stability. A predpokladam ze mas
naistalovane najnovsie drivery co sa tyka hardware. Obcas sa oplati nahrat
aj novy bios do MB www.abit.com.tw to je pre tu 845-ku s MSI nemam velke
skusenosti. Ake zariadenia su pripojene ku tym masinam a ake karty tam okrem
grafiky a integrovanej zvukovky pouzivate.

Robo

------

No na kazdem pc neco jineho. Ale asi takto

grafika: GeForce II 64MB AGP, popr. ATI Radeon 7000
motherboard: K7T266 Pro2 nebo intel D845T
sitovka: NETGEAR FA 310 nebo 311 popr. intel ted nevim presne oznaceni
procesor: P IV 1.5GHz nebo Athlon XP+ 1200
pamet: DDRAM 256 nebo 512MB
HDD: seagate barracuda

Milos

-----Original Message-----
From: Robert Suska [mailto:delphi(zv)korak.sk]
Sent: Monday, July 08, 2002 1:22 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Re[2]: XP nebo W2000?


Ahoj!

Chcem sa opytat aky hardware pouzivate?

Robo


Win XP 15-20 dni ? hmm No co mame tady u nas tak vsechny winxp padaji tak 2x
i vicekrat denne (chyba v services.exe a automaticky odpocet do restartu).
W2K jsou bez problemu. Mame samozrejme vsechny posledni patche.


Milos

Doubleboot W2000 a WXP

[*] Josef Madlik <madlik(zv)jsp(tec)cz> - 8.7.2002 14:22:07

Doma mam na NTFS partition 25GB (win 2k) a v praci na NTFS partition 15GB
(NT4) a bez problemu vice nez rok...
Problemy bych v tomto pripade hledal v HW.
J.M.

----- Original Message -----
From: "Robert Suska" <delphi(zv)korak.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 08, 2002 1:45 PM
Subject: Re: Doubleboot W2000 a WXP


> Ahoj!
>
> Aj jeden kamarat nepozoroval problemi asi 2 tyzdne pokial sa mu to ale
> dokladne nezcapalo :) Pomohlo iba separatne na druhy disk nainstalovat
> Win2000 a prebrat vlastnicke prava na disk resp. na tie casti ktore mal ako
> private. Takze potom si dal povedat a ma teraz partition 6,9GB co na system
> a nejaky ten soft uplne staci a chodi mu to uplne bez problemov a dam ruku
> do ohna za to ze ten pad systemu nesposobil on. Na microsofte by to asi zo
> srandy nebolo .... Kolega ma tu URL odkial cerpam tuto info ked pride do
> firmy tak Vam ju poslem.
>
> Robo
>

Database, insert a hodnota NULL

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 8.7.2002 15:28:18


Ahoj,

muzete mi prosim nekdo poradit ?
Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere jsou NOT NULL. Za boha nemuzu do techto sloupcu nainsertovat hodnotu NULL. Nevite nekdo co s tim ?

Diky

Vasek

Database, insert a hodnota NULL

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 8.7.2002 15:30:14

NOT NULL sloupce samozrejme musi byt vyplneny, jaky by jinak meli
vyznam oproti NULL sloupcum?

Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

Monday, July 8, 2002, 3:28:18 PM, you wrote:


LV> Ahoj,

LV> muzete mi prosim nekdo poradit ?
LV> Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere jsou NOT NULL. Za boha nemuzu do techto sloupcu nainsertovat hodnotu NULL. Nevite nekdo co s tim ?

LV> Diky

LV> Vasek

Record a data v tabulce

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 8.7.2002 15:33:00


Ahoj,

rad bych Vas poprosil o radu.
Mam type record a rad bych do nej nacpal data z tabulky.
Lze udelat neco takovehoto ???

type
TRec = record
Slovo: string;
Cislo: integer;
end;

var
Rec: TRec;.
.
.
SQL.Clear;
SQL.Add('select * into Rec.* from tabulka where cislo = 10');
SQL.Open;
.
.
.

Me to nejde. Jak naplnim onen record ?

Diky

V.

Database, insert a hodnota NULL

[*] <ivan.virag(zv)aliatel(tec)cz> - 8.7.2002 15:33:42

Zdravim.

A co to znamena, ze jsou NOT NULL? Jsou definovany jako NOT NULL, nebo je aktualni hodnota jina nez null? V prvnim pripade by ty potize byly logicke. Pokud je sloupec definovan jako NOT NULL, nelze do nej tuto hodnotu vlozit.

Ivan VIrag

-----Original Message-----
From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
Sent: Monday, July 08, 2002 3:28 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Database, insert a hodnota NULL



Ahoj,

muzete mi prosim nekdo poradit ?
Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere jsou NOT NULL. Za boha nemuzu do techto sloupcu nainsertovat hodnotu NULL. Nevite nekdo co s tim ?

Diky

Vasek

Database, insert a hodnota NULL

[*] Richard Siegl <rsiegl(zv)elas.sk> - 8.7.2002 15:38:56

Do stlpcov ktore su NOT NULL predsa nemozes dat hodnotu NULL.

Rickie

----- Original Message -----
From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 08, 2002 3:28 PM
Subject: Database, insert a hodnota NULL



Ahoj,

muzete mi prosim nekdo poradit ?
Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere jsou NOT NULL. Za
boha nemuzu do techto sloupcu nainsertovat hodnotu NULL. Nevite nekdo co s
tim ?

Diky

Vasek

Record a data v tabulce

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 8.7.2002 15:39:13

UGVrbmUgcnVjbmUuIERhdGFiYXpvdnkgZW5naW5lIG5ldmkgbmljIG8gb2JqZWt0ZWNoIHYgcHJv
Z3JhbXUuDQoNClNRTC5DbGVhcjsNClNRTC5BZGQoJ3NlbGVjdCAqIGZyb20gdGFidWxrYSB3aGVy
ZSBjaXNsbyA9IDEwJyk7DQpTUUwuT3BlbjsNCg0KUmVjLlNsb3ZvIDo9IFNRTC5GaWVsZEJ5TmFt
ZSgnU2xvdm8nKS5Bc1N0cmluZzsNClJlYy5DaXNsbyA6PSBTUUwuRmllbGRCeU5hbWUoJ0Npc2xv
JykuQXNJbnRlZ2VyOw0KDQpTUUwuQ2xvc2U7DQoNCi0tIA0KaW5nLiBKYW4gRmlhbGENCm1haWx0
bzpqYW4uZmlhbGFAaW9sLmN6DQoNCjguNy4yMDAyIExVS0VTIFbhY2xhdjoNCg0KPiBBaG9qLA0K
DQo+IHJhZCBieWNoIFZhcyBwb3Byb3NpbCBvIHJhZHUuDQo+IE1hbSB0eXBlIHJlY29yZCBhIHJh
ZCBieWNoIGRvIG5laiBuYWNwYWwgZGF0YSB6IHRhYnVsa3kuDQo+IEx6ZSB1ZGVsYXQgbmVjbyB0
YWtvdmVob3RvID8/Pw0KDQo+IHR5cGUNCj4gICBUUmVjID0gcmVjb3JkDQo+ICAgICBTbG92bzog
c3RyaW5nOw0KPiAgICAgQ2lzbG86IGludGVnZXI7DQo+ICAgZW5kOw0KDQo+IHZhcg0KPiAgIFJl
YzogVFJlYzsNCg0KDQo+IC4NCj4gLg0KPiAuDQo+IFNRTC5DbGVhcjsNCj4gU1FMLkFkZCgnc2Vs
ZWN0ICogaW50byBSZWMuKiBmcm9tIHRhYnVsa2Egd2hlcmUgY2lzbG8gPSAxMCcpOw0KPiBTUUwu
T3BlbjsNCj4gLg0KPiAuDQo+IC4=

Database, insert a hodnota NULL

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 8.7.2002 15:41:55


To je pravda, ale pri pouziti RECORD LIKE v Informixu to je asi jinak...
V.
-----Original Message-----
From: Richard Siegl [mailto:rsiegl(zv)elas.sk]
Sent: Monday, July 08, 2002 3:39 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Database, insert a hodnota NULL


Do stlpcov ktore su NOT NULL predsa nemozes dat hodnotu NULL.

Rickie

----- Original Message -----
From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 08, 2002 3:28 PM
Subject: Database, insert a hodnota NULL



Ahoj,

muzete mi prosim nekdo poradit ?
Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere jsou NOT NULL. Za
boha nemuzu do techto sloupcu nainsertovat hodnotu NULL. Nevite nekdo co s
tim ?

Diky

Vasek

Database, insert a hodnota NULL

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 8.7.2002 15:42:38

Pokud je sloupec NOT NULL, znamena to, ze do nej NEMUZES ulozit hodnotu
NULL.
Pokud presto do tech sloupcu chces hodnotu NULL vlozit, musis zmenit jejich
definici.
A nebo misto NULL pouzij nejakou nahradni hodnotu.

Martin Ben


> -----Original Message-----
> From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
>
> Ahoj,
>
> muzete mi prosim nekdo poradit ?
> Mam DTB Informix a tabulku, kde je nekolik sloupcu, ktere
> jsou NOT NULL. Za boha nemuzu do techto sloupcu nainsertovat
> hodnotu NULL. Nevite nekdo co s tim ?

OT: XP nebo W2000?

[*] Erik Salaj <winsoft(zv)stonline.sk> - 8.7.2002 16:33:28

> u Delphi 6 je to jedno. U Delphi 5 Win2K protoze jinak nelze krokovat DLL.
> Ja bych radeji sahnul pro XP, protoze jadro maji stejne jako 2000, ale
> navic maji par vylepseni - treba GDI+,...

tych vylepseni vo WinXP je oproti Win2k malo. WinXP
su podla mna urcene pre doterajsich uzivatelov Win98/ME.
Pre nich je prechod na NT technologiu samozrejme vyznamne
zlepsenie. Pre uzivatelov Win2k to uz nie je take jednoznacne,
pocul som, ze XP ma zopar neprijemnych chyb a poznam niekolko
uzivatelov, ktori sa "vratili" z Windows XP na Windows 2000.

Co sa tyka vylepseni Win2k, tak urcite viac vylepseni ako prechod
na WinXP je prechod na .Net technologiu, ktora je velmi dobre
spravena, napr. je tam aj spominane GDI+.

Erik

XML editor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 8.7.2002 16:41:33

Ahoj,

nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
byt nic sloziteho.

S pozdravem

Zbysek Hlinka


Record a data v tabulce

[*] <ivan.virag(zv)aliatel(tec)cz> - 8.7.2002 16:50:30



Query1.SQL.Clear;
Query1.SQL.Add('select slovo, cislo from tabulka where cislo = 10');
Query1.SQL.Open;

Rec.Slovo := Query1.FieldByName('SLOVO').AsString;
Rec.Cislo := Query1.FieldByName('CISLO').AsInteger;

Ivan Virag

-----Original Message-----
From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
Sent: Monday, July 08, 2002 3:33 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Record a data v tabulce



Ahoj,

rad bych Vas poprosil o radu.
Mam type record a rad bych do nej nacpal data z tabulky.
Lze udelat neco takovehoto ???

type
TRec = record
Slovo: string;
Cislo: integer;
end;

var
Rec: TRec;.
.
.
SQL.Clear;
SQL.Add('select * into Rec.* from tabulka where cislo = 10');
SQL.Open;
.
.
.

Me to nejde. Jak naplnim onen record ?

Diky

V.

Polopruhledna cara

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 8.7.2002 17:20:14

Ahoj,
potrebuji nakreslit na canvas timage.bitmap polopruhlednou caru (kruhy, obdelniky). Nevite nekdo jakt to udelat a jak zadat intenzitu propustnosti?
Diky
Jaro B.

cteni dat z LPT portu

[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 8.7.2002 18:05:14

Zdravim,

mate nekdo zkusenosti s dekodovanim dat, ktere odchazi na tiskarnu? Jednalo
by se pouze o dekodovani textu (cisel apod.) - zadna grafika ... nechapu
vubec ten princip...
Diky za kazdou myslenku
Jiri


Oto�en� text na Canvas

[*] <conehead(zv)email(tec)cz> - 8.7.2002 20:18:03

Dobry den,

Muzete mi nekdo poradit, jak mam vytisknout na Canvas text oto�en� o 90 stupnu?

Diky,

Tomas Danek

______________________________________________________________________________
P�ipojen� s TES, odbour� V�m stres! TESnet - p�ipojen� k Internetu po kabelovce. http://www.tesmedia(tec)cz/flash/prip-vyhody.php

Polopruhledna cara

[*] <prichy(zv)volny(tec)cz> - 8.7.2002 20:33:00

Jsem pouze za��te�n�k a na konferenci jsem p�ipojen cca 2 dny, ALE n�co o
tom je na www.builder(tec)cz .
F-ce se jmenuje Aplha Bend. Ur�it� to najde� ( je to �l�nek).

P�ichy

----- Original Message -----
From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 08, 2002 5:20 PM
Subject: Polopruhledna cara


Ahoj,
potrebuji nakreslit na canvas timage.bitmap polopruhlednou caru (kruhy,
obdelniky). Nevite nekdo jakt to udelat a jak zadat intenzitu propustnosti?
Diky
Jaro B.

XML editor

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 8.7.2002 21:06:50

Ahoj,

On 8 Jul 2002 at 16:41, Zbysek Hlinka wrote:

> nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> byt nic sloziteho.

podivej se tady
http://www.pbe.com/SourceWorks/XMLWorks/

Jarek Uher

Oto�en� text na Canvas

[*] Josef Pol�k <Josef.Polak(zv)clnet(tec)cz> - 8.7.2002 21:07:57

Cau, hledej v helpu "lfOrientation"

>>Muzete mi nekdo poradit, jak mam vytisknout na Canvas text oto�en� o
90
>> stupnu?

Re[4]: XP nebo W2000?

[*] Roland Turcan <rolo(zv)sedas.sk> - 8.7.2002 21:37:35

SM> From: Roland Turcan [mailto:rolo(zv)sedas.sk]
SM> Moja skusenost je ze na Windows Playstation sa dalo pracovat pre
SM> modrej obrazovky tak cca. 4hodiny na Win2000, WinXP ide PC bez
SM> vypnutia cca. 15-20 dni potom ho restartnem (zvycajne po intalacii
SM> nejakeho patchu od MS), zvykne Delphi 5 Pro SP#1 zosypat, ale dam ukoncit proces a spustim znova a ide ako
SM> jedna basen. Na WindowsXP som zistil akurat jednu chybu krasy a to ze
SM> niekedy spravi, ze okienko zo zdrojovym kodom sa objavi ako spustena
SM> aplikacia v taskbare. Teraz som menil PC a na novom z nVidiou Ge400 mi
SM> to zatial nespravil. Mozno to bude tym ze tam bola ATI Rage IIC.<<< 8. 7. 2002 21:36 - Sula Milos "milos.sula(zv)oku-su(tec)cz" >>>
SM> Win XP 15-20 dni ? hmm No co mame tady u nas tak vsechny winxp padaji tak 2x i vicekrat denne (chyba v services.exe a automaticky odpocet do restartu). W2K jsou bez problemu. Mame samozrejme
SM> vsechny posledni patche.


Este raz si precitaj prosim co som napisal, ze cca. 15-20 restartujem,
lebo sa nainstaluje nejaky patch od Microsoftu ktory si pyta restart,
a nie preto ze sa PC "zosralo".

--
Best regards, TRoland

Spustenie iba aplikacie a nie prostredia Windows

[*] Roland Turcan <rolo(zv)sedas.sk> - 8.7.2002 22:49:25

Hello Delphi CZ konferencia!

Davnejsie sa preberala moznost spoustenia namiesto shell Windows
priamo aplikaciu a po ukonceni aplikacie ukoncenie Windows.
Ide mi o aplikovanie pre Windows XP a Windows 98?

--
Best regards, TRoland

XML editor

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 00:54:07

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>
> nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> byt nic sloziteho.

Treba TXMLDocument v Delphi 6 ?

Petr Vones

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 00:59:26

From: "David Michal" <david.michal(zv)czechwireless(tec)cz>
> Mam v aplikaci nekolik QReportu. Tyto bych rad presunul do DLL a toto DLL
> chci nacist do pameti az bude potreba tisknout. Problem je, ze nevim jak to
> udelat. :)

Nejaky priklad najdes asi tady:
"QuickReport 3 example for Delphi 5 that shows how call a report that is in a
DLL." http://www.qusoft.com/stanlegacy.html

Nevidim ale zadny smysl v tom to ukladat do DLL. Uz jen proto, ze v te DLL
(pokud to nebude cele prelozeno s balicky) bude znovu kod VCL, takze vysledek
bude ve skutecnosti horsi (velikosti kodu, zbytecne duplikovany kod v jednom
procesu atd...)

Petr Vones

Hint namiesto manualu (aj napovedy)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 01:00:25

From: "Jaroslav Popluhar" <delphi1(zv)acc.sk>
> ako je mozne nastavit dlzku zobrazovania "Hintu"
> na urovni celej aplikacie ? (Potrebujem dlhsie zobrazovanie).

viz TApplication.HintHidePause

Petr Vones

Dva dotazy - EventLog, Jmeno aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 01:06:28

From: "Zach Tom�" <zach(zv)g-data(tec)cz>
> 1. Neznate nekdo nahodou nejake freewarove komponenty pro praci s EventLogy?

Ne. Staci pouzit prislusne API + zaregistrovat DLL s messages.

> 2. Mam program v Delphi, ktery hlida spusteni urcite aplikace. Lze nejakym
> zpusobem zjistit, kdyz na zminenou aplikaci kliknu mysi, jeji handle a nazev
> okna - programove, ne pomoci WinSight

Napriklad tak, ze budes periodicky cist GetForegroundWindow, ze ziskaneho
handle pak ziskas jmeno procesu funkci GetProcessNameFromWnd (unit JclSysInfo)
z JCL (http://delphi-jedi.org/Jedi:CODELIBJCL)

Petr Vones

Vytvoreni www site

[*] Delphi - konference <Delphikonf(zv)pilscom(tec)cz> - 9.7.2002 07:33:46



> ----------
> From: Jan Netrval
> Sent: Tuesday, July 09, 2002 7:33:46 AM
> To: Delphi - konference
> Subject: Vytvoreni www site
> Auto forwarded by a Rule
>
Ahoj

Mamtakovy problem. Potreboval bych programove (z Delphi) vytvorit novy web
site na IIS a urcit mu zakladni vlastnosti (zabezpeceni, prava ...). Vim ze
existuje neco jako jakasi metabaze kde lze precist a nakonfigurovat cele
nastaveni IIS, ale bohuzel vubec nevim jak do toho.
Predem diky za odpovedi.

Honza

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

optimalizacia vyrobneho procesu

[*] Pavol Svorc <svorcp(zv)pp.internet.sk> - 9.7.2002 06:34:49

Zdravim,
potrebujem zoptimalizovat vyrobny proces. Jedna sa o kusovu
vyrobu tovarov na objednavku. Zjednoduseny popis:
-10 az 20 vyrobnych stredisk, kazde s nejakou kapacitou
hodin/den. Vyrabaju sa vyrobky zlozene z dielov. Jeden vyrobok
obsahuje n roznych dielov. Na kazdom dieli sa prevadzaju nejake
operacie a podla pevnych pravidiel putuje strediskami.
Napr.:
diel1: stredisko1 -1 hod, stredisko3 -0.5 hod, stredisko1 -2 hod,
stredisko8 -5min.
diel2: stredisko2 -0.5 hod, stredisko1-3 hod, stredisko6 -1hod

vstupy su: datum zadania vyrobku do vyroby a jeho priorita (0-9);
vystupy su: detailny denny plan pre kazde stredisko; datum
dokoncenia naplanovanych vyrobkov.

Pre zjednodusenie uvazujme len o optimalizacii pre maximalne
vyuzitie kapacity stredisk, tak aby prestoje z dovodu cakania na
ine stedisko boli minimalne.

Zaujima ma, ci by ste to riesili hrubou silou (to by som nerad lebo
by to bolo zrejme neunosne na dlzku vypoctu) alebo by ste pouzili
nejaky ucinnejsi (aky?) algoritmus.

P.Svorc

Vstup dat na formulari

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 9.7.2002 07:47:22

> 1. Neexistuje nieco vhodnejsie ako MaskEdit co by zabezpecilo aspon jednoduchu
> validaciu?

Validace v obecne podobe je tak siroky pojem, ze si nedelam iluze, ze bys nasel
neco, co Ti opravdu stoprocentne sedne. Uvazoval bych o napsani vlastnich
validacnich funkci a ty pak treba povesit na OnChange nebo lepe odvodit potomka a
do nej tyto kontroly vestavet. 2. Neexistuje nieco ako DBEdit ale nebolo by to previazane
> s polom v databaze ale napr. s premennou v mojom rekorde?

Neverim tomu.

> Ako riesite vstup a validaciu dat vy ?

V prvni rade pouzivanim vhodnych komponent, napr. pro datum a cas
TDateTimePicker apod. a tam, kde to nejde jinak, tak pomoci vlastnich procedur pro
validaci. Princip je ten, ze napr. na OnChange hlidas, jestli uzivatel pri zadavani
realneho cisla nezadal dve desetinne carky, pismeno apod., a kdyz ano, posledni
vlozeny znak se zrusi. Melo by se to vypracovat, aby to resilo dobre i vkladani
doprostred stavajiciho textu nebo vlozeni chybneho textu ze schranky.

Takhle to delam ja, neznamena to, ze treba nekdo nema lepsi reseni.

David Lebeda

OT: Ulozenie hesla do zoznamu hesiel

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 09.7.2002 07:48:49

Ahoj,

sorry za OT, ale rad by som vedel, ci je mozne
"vymazat" heslo, ktore bolo ulozene pri pripajani
na zdielany zdroj ineho pocitaca. Ide o system W9x.

Vlkovic


PS: Najradsej by som bol, ak by existovala
cesta niekde v systeme vypnut, aby bola
tato volba defaultne zaskrtnuta v prislusnom
dialogu na pripojenie zdielaneho prostriedku.
Ale o tom dost pochybujem.

Vstup dat na formulari

[*] Pavol Svorc <svorcp(zv)pp.internet.sk> - 9.7.2002 06:53:32

Zdravim,
mam formular a na nom 5 - 15 komponentov TMaskEdit. Po zadani
niektorych dat mam spravene nejake kontroly, predplnanie dalsich
MaskEditov, premennych a pod. Tiez podla zadanych udajov sa
urcuje, ktory dalsi MaskEdit dostane fokus. Po stlaceni Buttonu na
ulozenie do DB (priamo do DB zapisovat nemozem) musim ale
vsetko opat kontrolovat, lebo MaskEdit mi prepusti napr. datum v
tvare 32.13.2002. Tieto formulare sa mi opakuju s malymi
obmenami (pocet MaskEdit-ov, specificke podmienky) a su na cca
80% zhodne. Je to pomerne pracne na programovanie lebo velmi
lahko na nieco mozem zabudnut.
1. Neexistuje nieco vhodnejsie ako MaskEdit co by zabezpecilo
aspon jednoduchu validaciu?
2. Neexistuje nieco ako DBEdit ale nebolo by to previazane s
polom v databaze ale napr. s premennou v mojom rekorde?
3. Rad by som mal nejaky spolocny formular a z neho potom
odvodzoval dalsie, ale neviem ako do toho zabudovat tie specificke
podmienky pri predplnani tak aby to ostalo prehladne.
4. Ako riesite vstup a validaciu dat vy ?

P.Svorc

Vstup dat na formulari

[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 9.7.2002 07:55:32

Ja jsem si udelal svuj vlastni edit (potomek TCustomEdit) a v nem mam
veskere validacni funkce pochopitelne vcetne odchyceni insertu z clipboardu,
deletu, bloku atp.....
Je to stavene tak, ze podporuje datove typy IB/FB (Char, numeric....) +
nejake dalsi features.

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> Validace v obecne podobe je tak siroky pojem, ze si nedelam
> iluze, ze bys nasel
> neco, co Ti opravdu stoprocentne sedne. Uvazoval bych o napsani vlastnich
> validacnich funkci a ty pak treba povesit na OnChange nebo lepe
> odvodit potomka a
> do nej tyto kontroly vestavet.

> vlozeny znak se zrusi. Melo by se to vypracovat, aby to resilo
> dobre i vkladani
> doprostred stavajiciho textu nebo vlozeni chybneho textu ze schranky.
> David Lebeda

Oto�en� text na Canvas

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 09.7.2002 07:55:21

Ahoj,

> conehead(zv)email(tec)cz 8.7.02 20:18 >>>
Muzete mi nekdo poradit, jak mam vytisknout na Canvas text oto�en� o 90 stupnu?

http://www.windev(tec)cz/clanek.asp?stranka=kratke_tipy.htm#text_uhel


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

Hint namiesto manualu (aj napovedy)

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 09.7.2002 08:00:29

Ahoj,

> delphi1(zv)acc.sk 6.7.02 14:48 >>>
>Da sa nejako dosiahnut aby bol "Hint" zobrazeny trvale,
>pokial sa kurzor mysi nachadza nad ovladacim prvkom?

Muzes pouzit treba dlouhe hinty
http://www.windev(tec)cz/clanek.asp?stranka=cb_hints.htm


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

Vstup dat na formulari

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 9.7.2002 08:21:05

Ahoj,
zkus se podivat na www.micrel(tec)cz/delphi , mam tam v baliku komponent TPubMaskEdit, ktery umoznuje validaci hodnoty. Delal jsem to prave pro tyto pripady. Delavam to ale jinak, pouzivam pouze jednoduche komponenty typu edit a mam dve validace. Prvni je individualne na poli (ocekavam, ze uzivatel hodnotu 'nejak' vyplni) a druhou, kumulovanou validaci zavedu az pri shrabnuti dat z formulare pro kontrolu vztahu mezi poli (napriklad pokud uzivatel na pozadovane pole vubec nesel). Pouziti overovani spravnosti pres Modified editu se mi neosvedcilo. Velmi se mi ale osvedcilo pouzit na stale se opakujici skupiny poli (personalni udaje, adresy, bankovni spojeni atp) frame, kde mam soustredeny jak lokalni validace, tak jednu proceduru pro kumulovanou validaci.

Jaro B.

-----Original Message-----
From: Pavol Svorc [mailto:svorcp(zv)pp.internet.sk]
Subject: Vstup dat na formulari

urcuje, ktory dalsi MaskEdit dostane fokus. Po stlaceni Buttonu na
ulozenie do DB (priamo do DB zapisovat nemozem) musim ale
vsetko opat kontrolovat, lebo MaskEdit mi prepusti napr. datum v
tvare 32.13.2002. Tieto formulare sa mi opakuju s malymi
obmenami (pocet MaskEdit-ov, specificke podmienky) a su na cca
80% zhodne. Je to pomerne pracne na programovanie lebo velmi
lahko na nieco mozem zabudnut.
1. Neexistuje nieco vhodnejsie ako MaskEdit co by zabezpecilo
aspon jednoduchu validaciu?
2. Neexistuje nieco ako DBEdit ale nebolo by to previazane s
polom v databaze ale napr. s premennou v mojom rekorde?
3. Rad by som mal nejaky spolocny formular a z neho potom
odvodzoval dalsie, ale neviem ako do toho zabudovat tie specificke
podmienky pri predplnani tak aby to ostalo prehladne.
4. Ako riesite vstup a validaciu dat vy ?

P.Svorc

Prevod DLL do SO

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 9.7.2002 08:29:16

Ahojte,

mate, prosim, nekdo zkusenosti s vytvarenim linuxovych
souboru .SO (Shared Objects) pomoci Kylixu? Konkretne
bych potreboval prevest jiz existujici projekt knihovny DLL
v Delphi do tohoto formatu. Knihovna obsahuje pouze
nekolik prostych procedur a funkci. Diky.

Martin

Ulozenie hesla do zoznamu hesiel

[*] Kr�l Jirka <admin(zv)printo(tec)cz> - 9.7.2002 08:34:42

>>"vymazat" heslo, ktore bolo ulozene pri pripajani
>>na zdielany zdroj ineho pocitaca. Ide o system W9x.

ano, w9x si tvori soubory [username].pwl do kterych cpou hesla
staci tyto soubory pomazat (pak se to pta na heslo znova)

J.

Oto�en� text na Canvas

[*] Vagner Pavel <Vagner(zv)ceps(tec)cz> - 9.7.2002 08:37:26

Cau,
musis naplnit strukturu TLogFont a "vytvorit" pozadovanej font pomoci
CreateFontIndirect a pak to priradis Canvas.Font. Pisu to ted z hlavy, tak
sorry za nejakou nepresnost. Priklad na to je taky v 1000+1 T&T., nebo
Developer's Guide od Teixeiry, dil s grafikou.

Pavel

-----Original Message-----
From: Josef Pol�k [mailto:Josef.Polak(zv)clnet(tec)cz]
Sent: Monday, July 08, 2002 9:08 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Oto�en� text na Canvas


Cau, hledej v helpu "lfOrientation"

>>Muzete mi nekdo poradit, jak mam vytisknout na Canvas text oto�en� o
90
>> stupnu?

XML editor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 09:07:50

On 8 Jul 2002 at 21:06, Jaroslav Uher wrote:

> > nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> > byt nic sloziteho.
>
> podivej se tady
> http://www.pbe.com/SourceWorks/XMLWorks/

Stranku nelze najit. :-(

S pozdravem

Zbysek Hlinka


XML editor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 09:08:40

On 9 Jul 2002 at 0:54, Petr Vones wrote:

> > nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> > byt nic sloziteho.
>
> Treba TXMLDocument v Delphi 6 ?

Ne. Ja potrebuji vizualni komponentu.

S pozdravem

Zbysek Hlinka


Ulozenie hesla do zoznamu hesiel

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 09.7.2002 09:10:54

> >>"vymazat" heslo, ktore bolo ulozene pri pripajani
> >>na zdielany zdroj ineho pocitaca. Ide o system W9x.
>
> ano, w9x si tvori soubory [username].pwl do kterych cpou hesla
> staci tyto soubory pomazat (pak se to pta na heslo znova)
>
> J.

Mozno sme sa nerozumeli.
Ak si vo svojom pocitaci otvorim zlozku "okolite pocitace",
zobrazia sa mi v okne dostupne pocitace na lokalnej sieti.
Pri kliknuti na niektory z nich sa ukazu adresare, ktore
tento pocitac poskytuje k zdielaniu. Ak pri ich zdielani
bolo nastavene nejake heslo, objavi sa pri ich otvarani
dialog na jeho zadanie, ktory obsahuje checkbox na ulozenie
hesla do zoznamu hesiel. Tento checkbox je zaskrtnuty,
takze pri kazdom dalsom pripajani si pocitac uz heslo
nepyta.

Ak heslo nechcem na dany pocitac ukladat, musim
si pri kazdom otvarani zdielanych zdrojov ineho
pocitaca davat pozor, aby som ho nezabudol disablovat.
Mimochodom, najradsej by som bol, keby bol disablovany
uz ako defualt, pri otvarani dialogu. Pochybujem vsak,
ze sa to v ramci Win9x da nejako okaslat.

Urcite to poznate, idete vykonat nejaky servisny zasah
k nejakemu pocitacu a potrebujete si pritom nieco stiahnut
zo siete (napr.z vasho vlastneho pocitaca). Ak si
pri pripajani na prislusny sietovy pocitac nedate
pozor, dotycny uzivatel ziska nezaheslovany pristup
k vasmu resp. inemu pocitacu, odkial ste pocas
vasho servisneho zasahu stahovali subory.

Rozumieme si?


Vlkovic

Sort v ruznych verzich Excelu je nekompatibilni

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 09.7.2002 09:52:21

Ahoj,
narazili jsme tady na problem, ktery neumime elegantne vyresit. (D5Pro)

Problem je v tom, ze potrebujeme sortovat data v Excelu. A zjistili
jsme, ze pokud pouzijeme type library, ma metoda Sort rozdilny pocet
parametru pro Excel 2000 a Excel 97. Takze pokud Sort zkompilujeme s
knihovnou Excel97, nefunguje to pod Excel2000 a obracene.

Napadlo me zjistit si verzi Excelu a pro volani metody Sort nepouzivat
type library ale pristup pres OLE, ktery se vyhodnocuje az v runtime. To
by podle me melo jit kombinovat s pristupem pres type library. Jen
nevim, jak se dostat ke spravnym promennym typu TOleVariant pro Range.
Pripada mi nesmyslne to cele predelat s OleVariant. Neumite nekdo
poradit?

Tridime takto:

// setrideni v excelu
procedure TDenSplExport.XlsSort;
var
CellsRange, KeyRange1, KeyRange2: Range;
begin
with FXLSheet do
try
CellsRange := Range[Cells.Item[5, 1], Cells.Item[FCurRow - 1,
8]]; // datove radky - trideni
KeyRange1 := Range[Cells.Item[5, 3], Cells.Item[5,
3]]; // oblast pro trideni 1
KeyRange2 := Range[Cells.Item[5, 5], Cells.Item[5,
5]]; // oblast pro trideni 2
CellsRange.Sort(KeyRange1, xlAscending, KeyRange2, EmptyParam,
xlAscending, // trideni
EmptyParam, xlAscending, xlGuess, EmptyParam,
EmptyParam,
xlSortColumns, xlStroke, True, EmptyParam,
EmptyParam);
except
on E: Exception do
raise EXlExport.CreateFmt(sCantSortXls, [E.Message]);
end; // with
end; // proc

Samozrejme by to slo resit podminenou kompilaci pro kazdou verzi Excelu
ale to je pro nas nevhodne reseni.


--
______________________________________________________
Karel Kral, vyvojar IT / IT developer
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] David Michal <david.michal(zv)czechwireless(tec)cz> - 9.7.2002 10:22:25

No chtel bych to ukladat do DLL z duvodu moznych ruznych jazykovych verzi.
David

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vones
Sent: 9. �ervence 2002 0:59
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak vytvoreny QReport ulozit do DLL, a jak s nim pote
pracovat z aplikace.


From: "David Michal" <david.michal(zv)czechwireless(tec)cz>
> Mam v aplikaci nekolik QReportu. Tyto bych rad presunul do DLL a toto DLL
> chci nacist do pameti az bude potreba tisknout. Problem je, ze nevim jak
to
> udelat. :)

Nejaky priklad najdes asi tady:
"QuickReport 3 example for Delphi 5 that shows how call a report that is in
a
DLL." http://www.qusoft.com/stanlegacy.html

Nevidim ale zadny smysl v tom to ukladat do DLL. Uz jen proto, ze v te DLL
(pokud to nebude cele prelozeno s balicky) bude znovu kod VCL, takze
vysledek
bude ve skutecnosti horsi (velikosti kodu, zbytecne duplikovany kod v jednom
procesu atd...)

Petr Vones

---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.373 / Virus Database: 208 - Release Date: 1.7.2002

Prevod DLL do SO

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 9.7.2002 10:37:29

----- Original Message -----
From: "Martin Dupal" <mdupal(zv)vision(tec)cz>
> mate, prosim, nekdo zkusenosti s vytvarenim linuxovych
> souboru .SO (Shared Objects) pomoci Kylixu? Konkretne
> bych potreboval prevest jiz existujici projekt knihovny DLL
> v Delphi do tohoto formatu. Knihovna obsahuje pouze
> nekolik prostych procedur a funkci. Diky.

No problem, proste si vytvoris jednoduchy projekt pro knihovnu
pod Kylixem, unita s funkcemi vcetne deklarace 'exports' muze
byt sdilena s Windows. Delame to tak bezne pro knihovny
UDF-funkci pro IB/FB.

Martin Schayna

Ulozenie hesla do zoznamu hesiel

[*] Pavel Zichovsky <zichovsky(zv)trul(tec)cz> - 9.7.2002 10:47:54

Zdravim,

> Ak heslo nechcem na dany pocitac ukladat, musim
> si pri kazdom otvarani zdielanych zdrojov ineho
> pocitaca davat pozor, aby som ho nezabudol disablovat.
> Mimochodom, najradsej by som bol, keby bol disablovany
> uz ako defualt, pri otvarani dialogu. Pochybujem vsak,
> ze sa to v ramci Win9x da nejako okaslat.

Pomoci politik se da toto ukladani hesel vypnout v ramci celeho systemu.
Pustte si poledit (na CD s win98 ho pohledejte, je tam nekde v net admin tools) a na
mistnim pocitaci zakazte ukladani sitovych hesel.

checkbox "ulozit heslo" pak bude vzdycky neaiktivni, a budete vsechna hesla muset
vzdy znovu psat.

S pozdravem
Pavel �ichovsk� (zichovsky(zv)trul(tec)cz)

Kopirovanie z TFileStream do TStringList

[*] Roland Turcan <rolo(zv)sedas.sk> - 9.7.2002 11:10:21

Hello Delphi CZ konferencia!

Toto pouzivam na export XML do stringlistu ale mi to nezapise to co
ma. Ak pozrem subor Skuska.XML tak data tam su presne tak ako maju
byt, ale TStringList.LoadFromStream to nejako nezvlada. SL.Text
obsahuje prazdny text. Ked zmenim TFileStream na TMemoryStream,
vysledok je ten isty a ked dam TMemoryStream.SaveTOFile tak je to
presne ako pri TFileStreame

var MS:TFileStream;
SL:TStringList;
begin
MS:=TFileStream.Create(ExtractFilePath(Application.ExeName)+'XML\Skuska.xml',fmCreate or fmShareExclusive);
SL:=TStringList.Create;
try
ZahajTransakciu(ib1.Transaction);
try
ib1.SQL.Text:='execute procedure Rep_Send(0,0)';
ib1.ExecSQL;

ib1.SQL.Text:='select * from pobocky_r';
ib1.Open;
if ib1.Active and not ib1.IsEmpty then
begin
xml.SaveToStream(MS);
SL.LoadFromStream(MS); //preco sa neprekopiruje zo streamu
ShowMessage(SL.Text); //ma tu prazdny text
end;
except on E:Exception do
begin
RollBackTransaction(ib1.Transaction);
//VypisChybu(E);
raise;
end; end;
finally
begin
MS.Free;
SL.Free;
end; end;


--
Best regards, TRoland

Vstup dat na formulari

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 9.7.2002 11:21:53

----- Original Message -----
From: "Pavol Svorc" <svorcp(zv)pp.internet.sk>
> mam formular a na nom 5 - 15 komponentov TMaskEdit. Po zadani
> niektorych dat mam spravene nejake kontroly, predplnanie dalsich
> MaskEditov, premennych a pod. Tiez podla zadanych udajov sa
> urcuje, ktory dalsi MaskEdit dostane fokus. Po stlaceni Buttonu na
> ulozenie do DB (priamo do DB zapisovat nemozem) musim ale
> vsetko opat kontrolovat, lebo MaskEdit mi prepusti napr. datum v
> ...
> 4. Ako riesite vstup a validaciu dat vy ?

Po nekolika iteracich kdy jsme meli validace na ruznych mistech
jsme dospeli k tomuto reseni:
- validace na editech pouzivame pouze tam, kde je jasne uzivateli
na prvni pohled ze hodnota neni spravna (napr. hodnota z ciselniku,
datum apod), v tom pripade hodnotu po opusteni editu vycistime
- vsechny ostatni slozitejsi validace (napr. pokud do validace vstupuje
vic hodnot najednou) a test na vyplnenost povinnych editu delame az
po potvrzeni formulare, pricemz po chybe focusujeme prvni edit
ve kterem je chyba
- preskakovani po editech, potvrzeni a storno dialogu je podle
zvyklosti Windows (Tab, Enter, Esc).

Vyhody:
- uzivatel muze kdykoliv formular zrusit pomoci Esc nebo
mysi tlacitkem Storno a nevyzaduje se po nem vyplneni editu
na kterem prave stoji (validace pri opusteni editu)
- uzivatel muze preskakovat pomoci Tab a vyplnovat edity
napreskacku a nemusi vyplnovat povinne edity "po ceste"
- uzivatel muze preskocit edity Enterem (potvrzeni dialogu)
pricemz po chybe kterou ceka se dostane rovnou na edit
ktery je potreba doplnit/opravit

Co si o tom myslite vy?

Martin Schayna

Kopirovanie z TFileStream do TStringList

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 9.7.2002 11:41:16

Nezkousel jsi nastavit Po nacteni MS.Position := 0 ?
xml.SaveToStream(MS);
MS.Position := 0;
SL.LoadFromStream(MS); //preco sa neprekopiruje zo streamu

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

9.7.2002 Roland Turcan:
> Hello Delphi CZ konferencia!

> Toto pouzivam na export XML do stringlistu ale mi to nezapise to co
> ma. Ak pozrem subor Skuska.XML tak data tam su presne tak ako maju
> byt, ale TStringList.LoadFromStream to nejako nezvlada. SL.Text
> obsahuje prazdny text. Ked zmenim TFileStream na TMemoryStream,
> vysledok je ten isty a ked dam TMemoryStream.SaveTOFile tak je to
> presne ako pri TFileStreame

> var MS:TFileStream;
> SL:TStringList;
> begin
> MS:=TFileStream.Create(ExtractFilePath(Application.ExeName)+'XML\Skuska.xml',fmCreate or fmShareExclusive);
> SL:=TStringList.Create;
> try
> ZahajTransakciu(ib1.Transaction);
> try
> ib1.SQL.Text:='execute procedure Rep_Send(0,0)';
> ib1.ExecSQL;

> ib1.SQL.Text:='select * from pobocky_r';
> ib1.Open;
> if ib1.Active and not ib1.IsEmpty then
> begin
> xml.SaveToStream(MS);
> SL.LoadFromStream(MS); //preco sa neprekopiruje zo streamu
> ShowMessage(SL.Text); //ma tu prazdny text
> end;
> except on E:Exception do
> begin
> RollBackTransaction(ib1.Transaction);
> //VypisChybu(E);
> raise;
> end; end;
> finally
> begin
> MS.Free;
> SL.Free;
> end; end;

optimalizacia vyrobneho procesu

[*] Peter Surovy <psurovy(zv)uevora.pt> - 9.7.2002 10:45:24

Ahoj

----- Original Message -----
From: "Pavol Svorc" <svorcp(zv)pp.internet.sk>
Sent: Tuesday, July 09, 2002 6:34 AM

> potrebujem zoptimalizovat vyrobny proces. Jedna sa o kusovu
> Zaujima ma, ci by ste to riesili hrubou silou (to by som nerad lebo
> by to bolo zrejme neunosne na dlzku vypoctu) alebo by ste pouzili
> nejaky ucinnejsi (aky?) algoritmus.
---s tou hrubou silou by som to nevidel tak cierne
optimalizacny algoritmus asi tazko bude ucinnejsi ako hruba sila
lebo vyhoda algoritmu je prave ze je rychly t.j. menej presny.

na optimalizacny algoritmus musis mat pomerne presne definovanu
funkciu t.j. ako sa sprava optimalizovana velicina vo vztahu
k premennym.

skus najskor prist na to co je to co chces dosiahnut napr.
vyuzitie pracoviska na 100% = 100 cervenych bodov
vyuzie na 0% = 0 cervenych bodov :-)
a potom si preveruj rozne scenare vyroby a ako ovplyvnuju celkove
mnozstvo cervenych bodov.
hlavne zisti kolko je moznych scenarov pretoze ak je to nie vela
(cca 10000) tak nema vyznam uvazovat o optimalizacnom algoritme.
Peter Surovy

PS: a a by som len nedristal: simulated annealing alebo genetic algorithms
su optimalizacne algoritmy; asi sa pouzivaju aj neuronove siete
ale skor by som pouzil tie prve dva.

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 11:49:44

On 9 Jul 2002 at 10:22, David Michal wrote:

> No chtel bych to ukladat do DLL z duvodu moznych ruznych jazykovych
> verzi. David

Tak si lokalizuj i balicky, nic ti v tom nebrani, pokud to udelas do
samostatne dll.

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Vones Sent: 9. �ervence 2002 0:59 To:
> delphi-l(zv)clexpert(tec)cz Subject: Re: Jak vytvoreny QReport ulozit do DLL,
> a jak s nim pote pracovat z aplikace.
>
>
> From: "David Michal" <david.michal(zv)czechwireless(tec)cz>
> > Mam v aplikaci nekolik QReportu. Tyto bych rad presunul do DLL a
> > toto DLL chci nacist do pameti az bude potreba tisknout. Problem je,
> > ze nevim jak
> to
> > udelat. :)
>
> Nejaky priklad najdes asi tady:
> "QuickReport 3 example for Delphi 5 that shows how call a report that
> is in a DLL." http://www.qusoft.com/stanlegacy.html
>
> Nevidim ale zadny smysl v tom to ukladat do DLL. Uz jen proto, ze v te
> DLL (pokud to nebude cele prelozeno s balicky) bude znovu kod VCL,
> takze vysledek bude ve skutecnosti horsi (velikosti kodu, zbytecne
> duplikovany kod v jednom procesu atd...)
>
> Petr Vones

S pozdravem

Zbysek Hlinka


Kylix & RedHat 6.1

[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 9.7.2002 11:57:47

Zdravim,
zkousel nekdo rozjet Kylix na distribuci RedHat 6.1, prestoze
Borland uvadi minimalne verzi 6.2 ? Martin

Vstup dat na formulari

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 9.7.2002 12:01:01

> - validace na editech pouzivame pouze tam, kde je jasne uzivateli na
> prvni pohled ze hodnota neni spravna (napr. hodnota z ciselniku, datum
> apod), v tom pripade hodnotu po opusteni editu vycistime - vsechny
> ostatni slozitejsi validace (napr. pokud do validace vstupuje vic
> hodnot najednou) a test na vyplnenost povinnych editu delame az po
> potvrzeni formulare, pricemz po chybe focusujeme prvni edit ve kterem
> je chyba - preskakovani po editech, potvrzeni a storno dialogu je
> podle zvyklosti Windows (Tab, Enter, Esc).
>
> Co si o tom myslite vy?
>
> Martin Schayna


Ahoj,

jednoznacne souhlas, delame to taky tak. Jinak to strasne prekazi. Jiste budou
existovat situace, kdy je postupne vyplnovani v danem poradi potrebne, ale tech
bude malo.

David Lebeda

ReadSection nad TStrings/TStringList

[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 9.7.2002 12:28:40

Hi all,
Chcem sa vas opytat, existuje nejaka fcia, kt. by sa spravala presne ako
TIniFile.ReadSectionValues, ale aby fungovala nad TStrings(resp.
TStringList)?
Dik

Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (181)

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 9.7.2002 12:28:42

David Michal dne 9 Jul 2002 v 10:22:

> No chtel bych to ukladat do DLL z duvodu moznych ruznych jazykovych
> verzi. David

Ahoj,

ty ruzne jazykove verze jsem resil jinak: cela sestava ma sve cislo a kazdemu QRText na sestave
jsem pridelil jiny Tag. Preklady jsou ulozeny v databazi v jedne tabulce, kde se podle cisla
sestavy a Tagu preklad snadno dohleda (mam na to procedurku, ktera prochazi vsechny prvky v
reportu a preklada je). V mem pripade jsem to tak delal mimo jine proto, aby si preklady mohl
delat uzivatel sam; muze si udelat i "preklad" do cestiny a pozmenit tak moje puvodni texty. Kdyz
se pak na sestave delaji nejake zmeny (posouvani sloupcu, zmeny pisma apod.), staci mne to udelat
jen jednou, stejne tak, kdyz je sestava nejaka slozitejsi a jsou tam jeste nejake vypocty.
Nevyhodou je, ze kdyz pridam nejaky uplne novy text, musi si jej uzivatel prelozit, jinak mezi
vsemi napr. anglickymi vyrazy vyskoci ten jeden novy cesky...

Karel Rys

OT: Zverejnenie zdrojovych kodov

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 9.7.2002 12:47:46

Mozna by stalo za to se nejdriv naucit zaklady Pascalu nez zverejnuji
funkce, je to des, hlavne knihovna na prevod mezi znakovymi sadami :)
Proc proboha goto? A proc nevytvorit jednoduchou prevodni tabulku? :))

function ReplaceTable (s: string; t1, t2: string): string;
var i: Integer;
begin
Result := '';
for i := 1 to Length (s) do
begin
if Pos (s [i], t1) > 0 then
begin
Result := Result + t2 [Pos (s [i], t1)];
end
else
if Pos (s [i], AnsiUpperCase (t1)) > 0 then
begin
Result := Result + UpperCase (t2 [Pos (s [i], AnsiUpperCase (t1))]);
end
else
Result := Result + s [i];
end;
end;

const
Table1250 = '�����������̩�خ����������ϻ�������';
Table852 = '����젡���������֐������Ҷ�������';

function Convert1250To852 (s: string): string;
begin
Result := ReplaceTable (s, Table1250, Table852);
end;


Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

Sunday, July 7, 2002, 11:38:03 AM, you wrote:

MK> Na mojej stranke som nahadzal nejake procedury a funkcie bez ktorych sa
MK> programator nezaobide pri tvorbe vatsieho progamu. Zatial je ich tu len
MK> tridsat. Viac som tam nestihol dat, ale slubujem ze do dvoch tyzdnov uz ich
MK> budu stovky. Ak aj vy mate nejake sikovne procedury a funkcie a chceli by
MK> ste sa s nimi podelit, poslete mi ich. Rad ich zverejnim spolu s Vasim
MK> menom, pripadne aj s kontaktom na Vas. Stranka a popisy k podprogramom su
MK> samozrejme v slovencine.

MK> S podravom Martin Kasman.

MK> www.kasman.martin.as

IB/FB

[*] Roman Konecny <rkonecny(zv)datis(tec)cz> - 9.7.2002 13:01:24

Zdravim vsechny,

nevite nekdo, jak bych mel vytvorit tabulku "RDB$NECO" tak, aby nebyla obycejnemu uzivateli viditelna ( neco na zpusob systemovych table). Je mi jasne, ze jde pak pres View ->System data, ale ne kazdy ma cas se jen tak pro nic za nic hrabat v systemovych tabulkach a ne kazdy vi, kde a co ma hledat.

Dekuji

Roman K.

Kontejnerova komponenta - resize slozek,prideleni

[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 9.7.2002 13:05:44

Ahoj udelal jsem si neco takoveho(pokud to ocesu)


type
TDataWindow = class(TPanel)
IBDataSet :TIBDataset;
DataSource:TDataSource;
Panel_Edit:TPanel;
DBGrid_Data:TDBGrid;
E_Vyber_Edit:TDBLookupComboBox;
private
{ Private declarations }
FSelectSQL:TStringList;
FDatabase:TIBDatabase;

procedure SetSelectSQL(Value: TStringList);
procedure SetDatabase(Value:TIBDatabase);
protected
{ Protected declarations }

public
{ Public declarations }
constructor Create(Owner:TComponent); override;
destructor Destroy; override;

published
{ Published declarations }
property SelectSQL:TStringList read FSelectSQL write SetSelectSQL;
property Database:TIBDatabase read FDatabase write SetDatabase;
end;

a ted problem
IBDataSet :TIBDataset;
DataSource:TDataSource;
Panel_Edit:TPanel;
DBGrid_Data:TDBGrid;
E_Vyber_Edit:TDBLookupComboBox;

nemuzu pri navrhu menit klasicky rucne velikost a polohu komponent....
take nevim jak priradit nejak jednoduse proprty z DBGridu do potomka TPanelu
(TDatawindow)

nevite jak na to????

Aldik Pavel
D6 Ent WXP

IBDataset a zmena selectsql za behu (order by)HEE

[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 9.7.2002 13:05:50

Ahoj pouzivat ibdataset a kdy zmenim select konkretne posledni radek na
kterem mam order by tak se mi zobrazi nulove radky....nevite co delam blbe?
mam tam neco takovyho

AddSQL:=Format('ORDER BY %s',[Column.FieldName]);
with DataModule_Firmy.IBDataset_Klienti_Main do
begin
DM_Databaze.IBTrans_login.Commit;
Close;
DM_Databaze.IBTrans_login.StartTransaction;
Params.ByName('ADRESAR_FIREM_ID').AsInteger:=Form_Firmy_Detail.Tag;
SelectSQL.Delete(SelectSQL.Count-1);
SelectSQL.Add(AddSQL);
Open;
ShowMessage(SelectSQL.Text);
end;

FB alias a IBX

[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 9.7.2002 13:06:12

zase jedna otazka a prosim odpovezte nekdo jo???

Udelal jsem si pres IBExperta alias...(to by me taky zajimalo jak udelat
alias pres API/delphi)

Pak jsem chtel pripojit databazi pres IBX ale ouha....nevim jak komponenta
TIBDatabase to neumi - pripojit se pres alias,nebo jsem jen zblblej z BDE?
Nebo jak se to dela?????

Please please....

Aldik Pavel
D6Ent WXP

ADO ???

[*] <volcik(zv)email(tec)cz> - 9.7.2002 13:07:14

Zdravim vsecky. Tak jsem se rozhoupal a zkousim pouzivat ADO pro pristup k MDB (Access). Nejdrive jsem zkoumal demo (adotest, briefcasedemo, ...). Pak jsem si udelal jednoduchou aplikaci na vyzkouseni. A narazil jsem na problem. Aplikaci spustim (briefcasedemo nebo moje), v zobrazenem okne (dbgrid) sjedu na posledni zaznam, stiskem sipky dolu (down) se zobrazi novy radek (*). Potud je vse O.K. V novem radku nedelam nic a chci se vratit na predchozi radek (posledni zaznam). No a ... zobrazi se hlaska: "Project briefcasedemo.exe raised exception ...". A to same se mi zobrazilo i v me aplikaci, kde dbgrid byl pouze pro cteni, tzn. novy radek (*) se nezobrazi, pri prechodu z posledniho zazanmu na predposledni.
Muze mi nekdo, kdo ma zkusenosti s ADO poradit? Diky za kazdou radu.
D.V. (W2K SP2, D5E SP1 )

______________________________________________________________________________
P�ipojen� s TES, odbour� V�m stres! TESnet - p�ipojen� k Internetu po kabelovce. http://www.tesmedia(tec)cz/flash/prip-vyhody.php

optimalizacia vyrobneho procesu

[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 9.7.2002 13:12:35

Doporucuji se zamerit na tato temata:
1. Operacni vyzkum - Linearni programovani, nelinearni programovani
2. Geneticke algorytmy
3. Teorie omezeni

Podle meho, bude stacit linearni programovani, pripadne teorie omezeni.
Zadejte do googla: linear programing a on vychrli vic odkazu.

Slavek

PS: Dejte vedet jak jste dopadl.

> Zdravim,
> potrebujem zoptimalizovat vyrobny proces. Jedna sa o kusovu
> vyrobu tovarov na objednavku. Zjednoduseny popis:
> -10 az 20 vyrobnych stredisk, kazde s nejakou kapacitou
> hodin/den. Vyrabaju sa vyrobky zlozene z dielov. Jeden vyrobok
> obsahuje n roznych dielov. Na kazdom dieli sa prevadzaju nejake
> operacie a podla pevnych pravidiel putuje strediskami.
> Napr.:
> diel1: stredisko1 -1 hod, stredisko3 -0.5 hod, stredisko1 -2 hod,
> stredisko8 -5min.
> diel2: stredisko2 -0.5 hod, stredisko1-3 hod, stredisko6 -1hod
>
> vstupy su: datum zadania vyrobku do vyroby a jeho priorita (0-9);
> vystupy su: detailny denny plan pre kazde stredisko; datum
> dokoncenia naplanovanych vyrobkov.
>
> Pre zjednodusenie uvazujme len o optimalizacii pre maximalne
> vyuzitie kapacity stredisk, tak aby prestoje z dovodu cakania na
> ine stedisko boli minimalne.
>
> Zaujima ma, ci by ste to riesili hrubou silou (to by som nerad lebo
> by to bolo zrejme neunosne na dlzku vypoctu) alebo by ste pouzili
> nejaky ucinnejsi (aky?) algoritmus.
>

optimalizacia vyrobneho procesu

[*] Richard Siegl <rsiegl(zv)elas.sk> - 9.7.2002 13:34:44

Jednoznacne by som pouzil simulaciu.

Nieco podobne som programoval do skoly. Vyrobny proces fabriky na vyrobu TV
.... niekolko typov vyrobnych liniek kde sa do konstrukcie pridavali
jednotlive diely, prevadzali testy , robila kontrola ... beziace pasy ...
optimalizacia kapacity dopravnych pasov, poctu liniek atd

Ulohou bolo zvysit produkciu aby bola nad limit TV denne pricom bolo dame co
mozem menit a co nie

Rickie

----- Original Message -----
From: "Pavol Svorc" <svorcp(zv)pp.internet.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 09, 2002 7:34 AM
Subject: optimalizacia vyrobneho procesu


> Zdravim,
> potrebujem zoptimalizovat vyrobny proces. Jedna sa o kusovu
> vyrobu tovarov na objednavku. Zjednoduseny popis:
> -10 az 20 vyrobnych stredisk, kazde s nejakou kapacitou
> hodin/den. Vyrabaju sa vyrobky zlozene z dielov. Jeden vyrobok
> obsahuje n roznych dielov. Na kazdom dieli sa prevadzaju nejake
> operacie a podla pevnych pravidiel putuje strediskami.
> Napr.:
> diel1: stredisko1 -1 hod, stredisko3 -0.5 hod, stredisko1 -2 hod,
> stredisko8 -5min.
> diel2: stredisko2 -0.5 hod, stredisko1-3 hod, stredisko6 -1hod
>
> vstupy su: datum zadania vyrobku do vyroby a jeho priorita (0-9);
> vystupy su: detailny denny plan pre kazde stredisko; datum
> dokoncenia naplanovanych vyrobkov.
>
> Pre zjednodusenie uvazujme len o optimalizacii pre maximalne
> vyuzitie kapacity stredisk, tak aby prestoje z dovodu cakania na
> ine stedisko boli minimalne.
>
> Zaujima ma, ci by ste to riesili hrubou silou (to by som nerad lebo
> by to bolo zrejme neunosne na dlzku vypoctu) alebo by ste pouzili
> nejaky ucinnejsi (aky?) algoritmus.
>
> P.Svorc
>
>
>

Vstup dat na formulari

[*] Pavol Svorc <svorcp(zv)pp.internet.sk> - 9.7.2002 12:41:35

> Vyhody:
> - uzivatel muze kdykoliv formular zrusit pomoci Esc nebo
> mysi tlacitkem Storno a nevyzaduje se po nem vyplneni editu
> na kterem prave stoji (validace pri opusteni editu)
> - uzivatel muze preskakovat pomoci Tab a vyplnovat edity
> napreskacku a nemusi vyplnovat povinne edity "po ceste"
> - uzivatel muze preskocit edity Enterem (potvrzeni dialogu)
> pricemz po chybe kterou ceka se dostane rovnou na edit
> ktery je potreba doplnit/opravit
> Co si o tom myslite vy?
>
> Martin Schayna
>
Asi to takto budem riesit, vdaka vsetkym za napady.
P.Svorc

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 14:28:25

On 9 Jul 2002 at 12:28, Karel Rys wrote:

> ty ruzne jazykove verze jsem resil jinak: cela sestava ma sve cislo a
> kazdemu QRText na sestave jsem pridelil jiny Tag. Preklady jsou
> ulozeny v databazi v jedne tabulce, kde se podle cisla sestavy a Tagu
> preklad snadno dohleda (mam na to procedurku, ktera prochazi vsechny
> prvky v reportu a preklada je). V mem pripade jsem to tak delal mimo
> jine proto, aby si preklady mohl delat uzivatel sam; muze si udelat i
> "preklad" do cestiny a pozmenit tak moje puvodni texty. Kdyz se pak na
> sestave delaji nejake zmeny (posouvani sloupcu, zmeny pisma apod.),
> staci mne to udelat jen jednou, stejne tak, kdyz je sestava nejaka
> slozitejsi a jsou tam jeste nejake vypocty. Nevyhodou je, ze kdyz
> pridam nejaky uplne novy text, musi si jej uzivatel prelozit, jinak
> mezi vsemi napr. anglickymi vyrazy vyskoci ten jeden novy cesky...

Pokud ma byt program lokalizovan, tak to resim tak, ze ho pisu cely
anglicky, a pak ho cely pocestim v Lokalizatoru. A nestane se mi, ze
by se mi michaly takto texty - leda bych je omylem neprelozil. Nejaky
QReport samozrejme neni problem lokalizovat.

S pozdravem

Zbysek Hlinka


Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 9.7.2002 14:33:12

> Pokud ma byt program lokalizovan, tak to resim tak, ze ho pisu cely
> anglicky, a pak ho cely pocestim v Lokalizatoru. A nestane se mi, ze
> by se mi michaly takto texty - leda bych je omylem neprelozil. Nejaky
> QReport samozrejme neni problem lokalizovat.

Pokud potrebujes lokalizovat cely program, je to urcite nejlepsi varianta; ja jsem se setkal zatim
(nastesti...) jen s tim, ze z ceskeho programu je treba tisknout ruzne doklady pro zahranicni
dodavatele a odberatele, tudiz uzivatel potrebuje mit moznost dodelat si tam, kolik jazyku a jake
uzna zavhodne.

Jinak Lokalizator chvalim, kudy chodim; prekladal jsem s nim balicky Delphi 5, diky za nej!

Karel Rys

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] David Michal <david.michal(zv)czechwireless(tec)cz> - 9.7.2002 14:35:03

Diky za napady, ale pokud ma byt v jine jazykove verzi napriklad faktura.
Pak stejne nezbyva nezli pro kazdy jazyk vytvorit jinou. Jelikoz kazda zeme
potrebuje jine nalezitosti na fakture.
David

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Zbysek Hlinka
Sent: 9. cervence 2002 14:28
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Jak vytvoreny QReport ulozit do DLL, a jak s nim pote pracovat
z aplikace.


On 9 Jul 2002 at 12:28, Karel Rys wrote:

> ty ruzne jazykove verze jsem resil jinak: cela sestava ma sve cislo a
> kazdemu QRText na sestave jsem pridelil jiny Tag. Preklady jsou
> ulozeny v databazi v jedne tabulce, kde se podle cisla sestavy a Tagu
> preklad snadno dohleda (mam na to procedurku, ktera prochazi vsechny
> prvky v reportu a preklada je). V mem pripade jsem to tak delal mimo
> jine proto, aby si preklady mohl delat uzivatel sam; muze si udelat i
> "preklad" do cestiny a pozmenit tak moje puvodni texty. Kdyz se pak na
> sestave delaji nejake zmeny (posouvani sloupcu, zmeny pisma apod.),
> staci mne to udelat jen jednou, stejne tak, kdyz je sestava nejaka
> slozitejsi a jsou tam jeste nejake vypocty. Nevyhodou je, ze kdyz
> pridam nejaky uplne novy text, musi si jej uzivatel prelozit, jinak
> mezi vsemi napr. anglickymi vyrazy vyskoci ten jeden novy cesky...

Pokud ma byt program lokalizovan, tak to resim tak, ze ho pisu cely
anglicky, a pak ho cely pocestim v Lokalizatoru. A nestane se mi, ze
by se mi michaly takto texty - leda bych je omylem neprelozil. Nejaky
QReport samozrejme neni problem lokalizovat.

S pozdravem

Zbysek Hlinka


FB alias a IBX

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 9.7.2002 14:37:55

> Udelal jsem si pres IBExperta alias...(to by me taky zajimalo jak
> udelat alias pres API/delphi)
>
> Pak jsem chtel pripojit databazi pres IBX ale ouha....nevim jak
> komponenta TIBDatabase to neumi - pripojit se pres alias,nebo jsem jen
> zblblej z BDE? Nebo jak se to dela?????


Ahoj,

zadny aliasy vubec nepotrebujes, v IBX ani nic takoveho neexistuje. Alias v
IBExpertu je pouze lidsky nazev databaze v IBExpertu a je to pouze interni zalezitost
IBExperta. Pro pristup k databazi z IBX potrebujes vedet jmeno databaze vcetne
cesty, jmeno a heslo uzivatele, charset, podle potreby roli.

David Lebeda

optimalizacia vyrobneho procesu

[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 9.7.2002 14:37:43

Presne na tuto temu som robil na katedere eko v Brne vylepsenie metody MOT.
Dany problem nie je trivialny. Zaobera sa s tym systemova analyza a
kontretne metod MOT = metoda organizacnych a technologickych vazieb.
Optimalne riesenie problemu (pri obecnej formulacii) je dodnes neznama. Na
optimalizaciu sa pouzivaju rozne heuristiky. Moja metoda , ktora bola
publikovana v doktorskej disertacii mojho profesora dokazala porazit vsetky
zname heuristicke metody a umoznuje operativne riadenie vyroby v realnom
case v pripade zmeny urcitych kapacit , tras alebo pri zmene technologickeho
postupu atd. Zial optimalitu sa nepodarilo dokazat lebo mat. model je
pomerne zlozity.

Neviem ci sa chces do toho spustit a kolko energie si ochotny do toho vlozit
a ci sa to oplati.
Ak ano tak mozeme sa dohodnut, napis mi emal a v subjekte prosim uved MOT.
Jan Tungli, mailto:tungli(zv)datapac.sk ; mailto:jan.tungli(zv)seznam(tec)cz

|| -----Original Message-----
|| From: Pavol Svorc [mailto:svorcp(zv)pp.internet.sk]
|| Sent: Tuesday, July 09, 2002 7:35 AM
|| To: delphi-l(zv)clexpert(tec)cz
|| Subject: optimalizacia vyrobneho procesu
||
||
|| Zdravim,
|| potrebujem zoptimalizovat vyrobny proces.
|| P.Svorc
||
||

XML editor

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 14:44:06

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>
> Ne. Ja potrebuji vizualni komponentu.

Aha, tak to muze byt treba ale i TMemo ;-) Zkus vice priblizit co by to melo
delat a jak by to melo vypadat. XML Editor muze vypadat treba takhle:
http://www.xmlspy.com/images/shots/ide40large.gif
http://www.compchemcons.com/XML/XMLNotePad.gif

Petr Vones

HTML HELP a EHS KOMPONENTY

[*] Je� Draho� - 9.7.2002 14:59:53

Zkousim vytvarekt html help v delphi5. stahl jsem si komponenty firmy EHS
(http://www.ec-software.com).
Potreboval bych aby se mi po stisknuti F1 zobrazilo okno helpu (ne zlute
okenko pop-up helpu) - tj. v leve casti obsah, v prave casti odpovidajici
text (jako pri pouziti 'helpjump'). Ocenil bych jednoduchy priklad nastaveni
komponent a definice jednotlivych sekci v html helpu.

Diky predem dj

Ulozenie hesla do zoznamu hesiel

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 09.7.2002 15:04:18

> Pomoci politik se da toto ukladani hesel vypnout v ramci celeho systemu.
> Pustte si poledit (na CD s win98 ho pohledejte, je tam nekde v net admin tools) a na
> mistnim pocitaci zakazte ukladani sitovych hesel.

Tvoja informacia mi dodala optimizmu.
POLEDIT(EXE?) som vsak na instalacnom CD (W98) nenasiel.
Pravdepodobne sa to nastavuje niekde v registroch (dufam).
Skusim sa teda poobzerat niekde na internete po nejakych
tweakoch, po nejakom laborovani na to snad pridem.
Mimochodom potreboval by som to aj na w95.

> checkbox "ulozit heslo" pak bude vzdycky neaiktivni,
> a budete vsechna hesla muset vzdy znovu psat.


Vlkovic

HTML HELP a EHS KOMPONENTY

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 9.7.2002 15:04:44

SmFrb3Uga29tcG9uZW50dSBqc2kgcHJvIEhlbHAgUG91emlsID8NCk5hIGZvcm0gc2kgZGVqIEhl
bHBSb3V0ZXIsIG5pYyBqaW5laG8gbmVwb3RyZWJ1amVzLiB0ZW4gc2Ugc3RhcmEgbw0KcHJlc21l
cm92YW5pIE9uSGVscCB1ZGFsb3N0aSB6IFdpbkhlbHB1IGRvIEhUTUwgaGVscHUuDQpTdGFjaSBu
YXN0YXZpdA0KSGVscFR5cGUgOj0gaHRIVE1MSGVscDsNCkhlbHBGaWxlIDo9IHNvdWJvcl9zX2hl
bHBlbTsNClNob3dUeXBlIDo9IHN0RGVmYXVsdDsgIC8vIG5lbWFzIHR1IG5hc3RhdmVubyBzdFBv
cHVwID8NCg0KLS0gDQppbmcuIEphbiBGaWFsYQ0KbWFpbHRvOmphbi5maWFsYUBpb2wuY3oNCg0K
OS43LjIwMDIgSmW+IERyYWhvuToNCj4gWmtvdXNpbSB2eXR2YXJla3QgaHRtbCBoZWxwIHYgZGVs
cGhpNS4gc3RhaGwganNlbSBzaSBrb21wb25lbnR5IGZpcm15IEVIUw0KPiAoaHR0cDovL3d3dy5l
Yy1zb2Z0d2FyZS5jb20pLg0KPiBQb3RyZWJvdmFsIGJ5Y2ggYWJ5IHNlIG1pIHBvIHN0aXNrbnV0
aSBGMSB6b2JyYXppbG8gb2tubyBoZWxwdSAobmUgemx1dGUNCj4gb2tlbmtvIHBvcC11cCBoZWxw
dSkgLSB0ai4gdiBsZXZlIGNhc3RpIG9ic2FoLCB2IHByYXZlIGNhc3RpIG9kcG92aWRhamljaQ0K
PiB0ZXh0IChqYWtvIHByaSBwb3V6aXRpICdoZWxwanVtcCcpLiBPY2VuaWwgYnljaCBqZWRub2R1
Y2h5IHByaWtsYWQgbmFzdGF2ZW5pDQo+IGtvbXBvbmVudCBhIGRlZmluaWNlIGplZG5vdGxpdnlj
aCBzZWtjaSB2IGh0bWwgaGVscHUuDQoNCj4gRGlreSBwcmVkZW0gZGoNCg0KIA==

IB/FB

[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 9.7.2002 15:07:58

A co takle pouzit prava ?

Slavek

> Zdravim vsechny,
>
> nevite nekdo, jak bych mel vytvorit tabulku "RDB$NECO" tak, aby
nebyla obycejnemu uzivateli viditelna ( neco na zpusob systemovych table).
Je mi jasne, ze jde pak pres View ->System data, ale ne kazdy ma cas se jen
tak pro nic za nic hrabat v systemovych tabulkach a ne kazdy vi, kde a co
ma hledat.
>
> Dekuji

Vstup dat na formulari

[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 9.7.2002 14:18:29

Uplny souhlas, jen mi pripada trochu neprijemne to vymazani "datumove
polozky", pokud do ni napisu neco jineho nez datum. Ja jsem to resit tak, ze
to piplo a pustilo uzivatele dal, chyba se hlasila na onSave. (napr. pokud
mate kalendar na vedlejsi tlacitko, mohou nastat zajimave situace.)
Ohledne validace proti ciselniku je to obecne na kazdy exit doraz do DB -
nevim, nevim

S tim souvisi jeste jedna vec - kdy delate formatovani textu v editu (napr.
mezery po tisicovkachj u cisel apod.)
Varianta onExit vyzaduje korektni informaci v editu, varianta onSave naopak
formatuje az kdyz je to nanic.

Danik

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Martin Schayna

- validace na editech pouzivame pouze tam, kde je jasne uzivateli
na prvni pohled ze hodnota neni spravna (napr. hodnota z ciselniku,
datum apod), v tom pripade hodnotu po opusteni editu vycistime
- vsechny ostatni slozitejsi validace (napr. pokud do validace vstupuje
vic hodnot najednou) a test na vyplnenost povinnych editu delame az
po potvrzeni formulare, pricemz po chybe focusujeme prvni edit
ve kterem je chyba
- preskakovani po editech, potvrzeni a storno dialogu je podle
zvyklosti Windows (Tab, Enter, Esc).

Co si o tom myslite vy?

Martin Schayna

Ulozenie hesla do zoznamu hesiel

[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 9.7.2002 15:33:17

> Tvoja informacia mi dodala optimizmu.
> POLEDIT(EXE?) som vsak na instalacnom CD (W98) nenasiel.
> Pravdepodobne sa to nastavuje niekde v registroch (dufam).
> Skusim sa teda poobzerat niekde na internete po nejakych
> tweakoch, po nejakom laborovani na to snad pridem.
> Mimochodom potreboval by som to aj na w95.

POLEDIT je soucasti Resource Kitu k Win95, resp. Win98. Byly to knizky,
ale snad lze stahnout i nekde u MS.

Honza +

Vstup dat na formulari

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 9.7.2002 15:47:51


----- Original Message -----
From: "Daniel Frantik" <frantik(zv)telpro(tec)cz>
> Uplny souhlas, jen mi pripada trochu neprijemne to vymazani "datumove
> polozky", pokud do ni napisu neco jineho nez datum. Ja jsem to resit tak, ze
> to piplo a pustilo uzivatele dal, chyba se hlasila na onSave. (napr. pokud
> mate kalendar na vedlejsi tlacitko, mohou nastat zajimave situace.)
Je vyhodne pouzivat edity primo na editaci datumovych hodnot, tedy nikoliv
pouhe maskedity -- pak nesmyslne datumy odchyti edit sam. V tom pripade
vycisteni polozky neni nutne.

> Ohledne validace proti ciselniku je to obecne na kazdy exit doraz do DB -
> nevim, nevim
Ciselnik muze uzivatel bud vyvolat pres tlacitko vedle editu nebo muze
zacit psat a dohleda se mu prvni zaznam odpovidajici identifikaci, kterou
zadava (typicky kod nebo nazev). Pokud zada spatne, nedohleda se nic
a edit zustane prazdny. V ciselnicich jeste rozlisujeme povinne a nepovinne
vyplneni -- jiz drive vyplnene povinne odkazy nelze vymazat, pouze prepsat
na jinou hodnotu, nepovinne lze vymazat.

> S tim souvisi jeste jedna vec - kdy delate formatovani textu v editu (napr.
> mezery po tisicovkachj u cisel apod.)
> Varianta onExit vyzaduje korektni informaci v editu, varianta onSave naopak
> formatuje az kdyz je to nanic.
Formatovani tohoto typu obvykle resi edity samy a to tak, ze pokud ma
edit focus, neni text formatovan (a napr. je alignovan vzdy doleva), pokud
edit focus nema, formatuje se text sam podle masky zadane u editu.
V cem je problem?

Martin Schayna

PROBLEM S PAMATOU - PRECO ?

[*] Fabik Milan <kinekus(zv)nextra.sk> - 9.7.2002 16:01:52

D6, W98
Ahoj,

prosim o radu. Previedol som aplikaciu z D4 do D6. Po spusteni a odkliknuti
nejakej volby v menu mi vypisuje tuto hlasku :
"ACCES VIOLATION AT ADDRESS 004633EE IN MODULE "PROGRAM.EXE". READ OF
ADDRESS FFFFFFFF.

Po odkliknuti hlasky a naslednom odkliknuti tej istej volby v menu napr. "O
programe" mi to uz nevypise.
V com to moze byt? Neviem si s tym pomoct.

Dakujem za pomoc.

Fabik.

Jak vytvoreny QReport ulozit do DLL, a jak s nim p

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 16:16:56

On 9 Jul 2002 at 14:33, Karel Rys wrote:

> Pokud potrebujes lokalizovat cely program, je to urcite nejlepsi
> varianta; ja jsem se setkal zatim (nastesti...) jen s tim, ze z
> ceskeho programu je treba tisknout ruzne doklady pro zahranicni
> dodavatele a odberatele, tudiz uzivatel potrebuje mit moznost dodelat
> si tam, kolik jazyku a jake uzna zavhodne.

To je uz ale o vytvoreni externich sablon, nebo snad ne? Ja pouzivam
Sineu, a nechavam na uzivatelich, at si vytvori jake sestavy chteji.
:-)

> Jinak Lokalizator chvalim, kudy chodim; prekladal jsem s nim balicky
> Delphi 5, diky za nej!

Oooooh! :-)))

S pozdravem

Zbysek Hlinka


XML editor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.7.2002 16:18:57

On 9 Jul 2002 at 14:44, Petr Vones wrote:

> > Ne. Ja potrebuji vizualni komponentu.
>
> Aha, tak to muze byt treba ale i TMemo ;-) Zkus vice priblizit co by
> to melo delat a jak by to melo vypadat. XML Editor muze vypadat treba
> takhle: http://www.xmlspy.com/images/shots/ide40large.gif
> http://www.compchemcons.com/XML/XMLNotePad.gif

No, ja potrebuji hlavne rozbalovaci strom s moznosti vymazani, v
lepsim pripade i upravy jednotlivych uzlu a polozek v nich.

S pozdravem

Zbysek Hlinka


staticka promenna tridy

[*] karel macka <seduvplacek(zv)post(tec)cz> - 9.7.2002 16:31:18

zdravim,
v c++ existuje staticka promenna nebo metoda tridy. deklaruje se v tride klicovym slovem static a funguje tak ze je spolecna pro vsechny instance teto tridy.
existuje neco takoveho i v delphi?

se
----
Nem�te na ni? http://dovolena.finance(tec)cz

FB alias a IBX

[*] Alex Cherednichenko <cherednichenko(zv)wo(tec)cz> - 9.7.2002 16:31:06

Hello, Ales!
You wrote:

AP> Udelal jsem si pres IBExperta alias...(to by me taky zajimalo jak
AP> udelat alias pres API/delphi)

Alias IBExperta nema nic spolecneho z API/delphi.

AP> Pak jsem chtel pripojit databazi pres IBX ale ouha....nevim jak
AP> komponenta TIBDatabase to neumi - pripojit se pres alias,nebo jsem jen
AP> zblblej z BDE? Nebo jak se to dela?????

Musis zadat cestu, presne tak jak ty to delal pri vytvoreni aliasu v IBExpertu.
Zadnyj alias pro IBX neplati.


With best regards, Alex Cherednichenko.

PROBLEM S PAMATOU - PRECO ?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 16:32:54

From: "Fabik Milan" <kinekus(zv)nextra.sk>
> prosim o radu. Previedol som aplikaciu z D4 do D6. Po spusteni a odkliknuti
> nejakej volby v menu mi vypisuje tuto hlasku :
> "ACCES VIOLATION AT ADDRESS 004633EE IN MODULE "PROGRAM.EXE". READ OF
> ADDRESS FFFFFFFF.

Asi je nekde chyba. Mas k dispozici debugger takze to muzes ladit. Ta adresa
je evidentne v EXE te aplikace, takze muzes pouzit Search | Find Error.

Petr Vones

staticka promenna tridy

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 16:35:27

From: "karel macka" <seduvplacek(zv)post(tec)cz>
> v c++ existuje staticka promenna nebo metoda tridy. deklaruje se v tride
> klicovym slovem static a funguje tak ze je spolecna pro vsechny instance
> teto tridy. existuje neco takoveho i v delphi?

Podivej se v helpu na 'Class methods'. Staticke promenne v Object Pascalu
nejsou.

Petr Vones

ReadSection nad TStrings/TStringList

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 16:38:28

From: "�tevl�k Mari�n" <Marian.Stevlik(zv)merlin(tec)cz>
> Chcem sa vas opytat, existuje nejaka fcia, kt. by sa spravala presne ako
> TIniFile.ReadSectionValues, ale aby fungovala nad TStrings(resp.
> TStringList)?

Ne, ale muzes pouzit TMemIniFile.

Petr Vones

WS_EX_TOOLWINDOW, Z-Order a Show

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 16:40:10

From: <mipr(zv)volny(tec)cz>
> Na Form1 je tlacitko, ktere vytvori a zobrazi Form2. Na Form2 je
> tlacitko ktere vytvori a zobrazi (modalne ci nemodalne) Form3. V
> okamziku, kdy se vola pro Form3 metoda Show (at samostatne nebo v
> metode ShowModal) nastane inkriminovany okamzik, kdy je zmeneno
> Z-order formularu: Form3 je spravne nahore, ale pod nim je Form1 (ne
> Form2) a teprve pod Form1 se naleza Form2! Me znalosti bohuzel
> nestaci na nalezeni priciny tohoto chovani ani na jeho korekci.

Tohle se resilo uz hodnekrat v newsech na Borlandu a pokud vim, tak se to
nikdy uspokojive nevyresilo.

Petr Vones

PROBLEM S PAMATOU - PRECO ?

[*] Fabik Milan <kinekus(zv)nextra.sk> - 9.7.2002 16:54:29

.
>
> Asi je nekde chyba. Mas k dispozici debugger takze to muzes ladit. Ta
adresa
> je evidentne v EXE te aplikace, takze muzes pouzit Search | Find Error.
>
> Petr Vones

Zistil som, ze problem je v tom, ze program na zaciatku otvara subor s
kontrolou, ktora cas MainMenu ma byt pristupna a ktora nie. Je to
individualne podla uzivatela.

Situacia je taka.
1. Spusti sa program
2. Otvori subor s info o polozkach MainMenu.
Ten subor je nejaky takyto :
FALSE
TRUE
TRUE
FALSE ...
Podla toho urobi podla podmienok
Ak je TRUE -> bud vyditelny ak je FALSE nebud vyditelny.

A v tomto je problem. Mozno je to v tom, ze tieto testy som hodil do OnShow.

Co vy na to ?

Fabik

jak pouzit TDBLookupControl?

[*] bleak <bleak(zv)atlas(tec)cz> - 9.7.2002 17:04:25

umi TDBLookupControl zobrazit nekolik poli v kazde polozce vedle sebe? Z
Helpu jsem pochopil, ze ano: ListField Identifies the field or fields whose
values are displayed in the lookup control.
Takze nastavim ListSource na otevrenou tabulku a v ListField napisu jedno
nebo vice poli, ktere chci zobrazit.
Jenze TDBLookupControl zustava prazdny (nepristupny). V DBGridu napojenem
na stejny DataSource jsou videt data.

Bleak

OT:Vlajky

[*] <ivan.virag(zv)aliatel(tec)cz> - 9.7.2002 18:03:10

Zdravim

nedavno jsem zde zadal o odkaz na vlajky sveta. Protoze byl ze strany ucastniku konference pomerne veliky zajem o vysledky, tak zasilam pro zajemce adresu, ktera nema lepsich variant:

http://www.blueflash.de/

Ivan Virag

navrat na predchozi radek

[*] Petr Holomecek <pisingr(zv)volny(tec)cz> - 9.7.2002 18:09:21

Dobry den
jak je mozne pri zpracovavani souboru metodou readln vratit se na predchozi
radek a provest zpracovani daneho radku znovu.

Dekuji

Petr Holomecek

navrat na predchozi radek

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 18:17:56

From: "Petr Holomecek" <pisingr(zv)volny(tec)cz>
> jak je mozne pri zpracovavani souboru metodou readln vratit se na predchozi
> radek a provest zpracovani daneho radku znovu.

Ne.

Muzes nacist cely text do TStringList kde pak pristupujes k jednotlivym
radkum dle libosti. Nevyhodou je, ze nacteni neni prilis rychle pro velke
soubory (radove desitky MB). Dalsi moznost je pouzit TJclMappedTextReader z
JCL kde neni prave problem s velkymi soubory.

Petr Vones

Filtry v DB + Adress Book

[*] David Kraina <DKx(zv)Seznam(tec)cz> - 9.7.2002 19:27:48

Nazdar,
jsem naprosty zacatecnik v DB. Jiz chapu princip, udelam tabulku a
potreboval bych nasledujici:

1) Jak pouzivat filtry? Nebo presneji co delat, at je aktivni filtr (A-Z,
datum od-do, aj)

2)Jak se da pristupovat k Adress Booku Windows (asi ho vlastni Outlok
Express) ?

Diky za pomoc. DKx.

*DKx# - Prosim nemazat, index do filtru.

Refresh oken

[*] David Kraina <DKx(zv)Seznam(tec)cz> - 9.7.2002 19:28:02

Ahoj,
jiz delsi dobu mam problem, ktery jiz musim resit. Pomoci API upravim
WorkArea obrazovky a potreboval bych udelat takovy refresh, aby ho ostatni
aplikace vzali na vedomi i pod NT (pr. potrebuji aby maximalizovane okno na
pozadi se omezilo dle me aplikace jako tomu je u aplikaci vs. taskbar). Dik
za kazdou pomoc. DKx.

*DKx# - Prosim nemazat, index do filtru.

Filtry v DB + Adress Book

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 19:51:39

From: "David Kraina" <DKx(zv)Seznam(tec)cz>
> 2)Jak se da pristupovat k Adress Booku Windows (asi ho vlastni Outlok
> Express) ?

ftp://delphi-jedi.org/api/WAB.zip

Petr Vones

Vytvoreni databaze na MS SQL Serveru

[*] Dobromil Maly <dmaly(zv)yo(tec)cz> - 9.7.2002 20:02:42

Ahoj vsem,

omlouvam se za dotaz, ktery tak uplne nesouvisi s Delphi. Rad bych vedel,
zda a jak se da zjistit seznam MS SQL servery na siti a jak na takovy server
pote nainstalovat ( vytvorit ) databazi.

Za reseni vytvoreni DB bych bud povazoval
a) vytvoreni DB pomoci SQL prikazu*
b) restorovani DB z backupu**
c) attachovanim existujiciho databazoveho souboru***
A to vse bez ucasti uzivatele.

Vim, ze nektere nejsou uplne "koser", takze pokud mate nekdo zkusenosti,
budu velmi vdecen za kazdy tip ci radu.

Dekuji...
...Dobra

*) mohu nejak z databaze vygenerovat SQL script, ktery po spusteni na jinem
SQL
serveru vytvori identickou kopii te puvodni?

**) na svem PC jiz prazdnou databazi mam a vytvoril bych BACKUP, ze kterho
bych
pote na cilovem SQL databazi obnovil

***) zkopiroval cely databazovy soubor na cilove PC a tam jej jen pripojil
do MS SQL
Serveru, toto reseni ze mi vsak zda zcela nevhodne.

----------
A na zaver jeste jedna omluva, minuly mail mi uletnul bez SUBJECTu :-(

PROBLEM S PAMATOU - PRECO ?

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 9.7.2002 20:17:02

> > Asi je nekde chyba. Mas k dispozici debugger takze to muzes ladit. Ta
> adresa
> > je evidentne v EXE te aplikace, takze muzes pouzit Search | Find Error.
> >
>
> Zistil som, ze problem je v tom, ze program na zaciatku otvara subor s
> kontrolou, ktora cas MainMenu ma byt pristupna a ktora nie. Je to
> individualne podla uzivatela.
>
> Situacia je taka.
> 1. Spusti sa program
> 2. Otvori subor s info o polozkach MainMenu.
> Ten subor je nejaky takyto :
> FALSE
> TRUE
> TRUE
> FALSE ...
> Podla toho urobi podla podmienok
> Ak je TRUE -> bud vyditelny ak je FALSE nebud vyditelny.
>
> A v tomto je problem. Mozno je to v tom, ze tieto testy som hodil do
OnShow.

Jak uz psal P. Vones - pri krokovani v debuggeru se problem projevi taky?
Vytipuj podezrele rutiny a ty prokrokuj, pripadne opatri ladicim vypisy do
filu atd.

Jako dalsi metodu muzes zkusit MemProof - budes-li mit stesti najdes misto
kde pouzivas neinicializovany pointer atd.


D. Toman

Vytvoreni databaze na MS SQL Serveru

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 9.7.2002 20:21:01

> ***) zkopiroval cely databazovy soubor na cilove PC a tam jej
> jen pripojil
> do MS SQL
> Serveru, toto reseni ze mi vsak zda zcela nevhodne.

To je zrejme nejlapidarnejsi reseni, zkopirovat vsechny MDF, LDF, NDF
soubory databaze a na jine masine ji pripojit pomoci sp_attachdb. Ale to si
zkopirujes pouze databazi (tabulky, indexy, view, triggery, ulozene
procedury, ...) ale nikoliv veci, ktery jsou ulozeny v master databazi
(loginy, ...).

Nicmene se zkus podivat do BOL na heslo DTS.


S pozdravem a pranim hezkeho dne

Milan Schembera
MISSOFTWARE Lanskroun
software, obchod, servis
tel. 0 776 677 776
tel. 0467 521 555
0467 520 141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz

**********************************
Zajimate se o automobilovy sport ?
http://www.zavodydovrchu(tec)cz
**********************************

univerzalni vstupni dialog?

[*] bleak <bleak(zv)atlas(tec)cz> - 9.7.2002 21:02:09

zdravim,
nevite nekdo o komponente pro univerzalni vstup dat? Potrebuji moznost
definovani ruzneho poctu vstupnich poli - edit, datatimepicker, combobox
atd.
Delat pro kazdy vstup ruznych parametru od uzivatele samostatny form je
unavne.
bleak

Polopruhledna cara

[*] Libor Va���ek - 9.7.2002 21:32:22

Mas nekolik zpusobu. Asi nejlepsi a nejrychlejsi je napsat si vse sam,
protoze standardni funkce GDI nepodporuji takove vykreslovani. Microsoft
vydal ve WinXP nove rozhrani GDI+, ktere poskytuje mimo jine prime
vykreslovani AlphaBlendingu. Pokud ti nevadi zpetna kompatibilita tak tuto
knihovnu muzes pouzit. Ja mam pouze Delphi 5, tak nevim jestli je v D6 tato
knihovna primo podporovana. Pokud ne, nezbude ti nic jineho nez se podivat
do hlavickovich souboru C++ a pokusit se pozadovane funkce vyexportovat
rucne z gdiplus.dll (Gdiplus.h). V helpu je napsano ze je knihovna
podporovana od W98 nahoru, ale az po stazeni updatu:
http://www.microsoft.com/msdownload/platformsdk/sdkupdate/psdkredist.htm.
Dalsi moznost je trochu improvizovat se stavajicimi funkcemi GDI. To tak, ze
si vytvoris dve pametove bitmapi. Jednu jako Alpha kanal (napr. 8bit stupne
sedi) a druhou s pozadovanym obrazkem. Kdyz budes chtit vykreslit napr.
elipsu: do Alpha kanalu ji vykreslis v sedi (0 az 255 - to znamena z kolika
procent je pruhledna) a do druhe bitmapi uplne stejnou v pozadovane barve.
Pak je musis smichat v jednu. Takto vytvorenou bitmapu pak muzes vykreslit
pomoci funkce AlphaBlend (nachazi se v Msimg32.dll).
Vim, ze to neni neni naprosto idealni reseni, ale pokud to nechses pouzivat
pro animaci tak je zcela dostacujici. Navic s touto funkci muzes vykreslovat
jakoukoli bitmapu s Alpha kanalem.

Prikladam malou ukazku, kterou jsem na rychlo splacal, ale uz jsem ji
nestihl prepsat to Delphi. Pokud to nekdo bude chtit tak si udelam cas.

void DrawEllipse (HWND hWnd, HDC hdcwnd, int nWidth, COLORREF crColor,
COLORREF crTransparent)
{
RECT rt;
HBITMAP oldBitmap;
HBRUSH oldBrush;
HPEN oldPen;
VOID * pvBits;
VOID * pvBitsAlpha;
HBITMAP hbitmap;
HBITMAP hbitmapAlpha;
BLENDFUNCTION bf;
BITMAPINFO bmi;
HDC hdc;
ULONG ulBitmapWidth, ulBitmapHeight;

GetClientRect(hWnd, &rt);
hdc = CreateCompatibleDC(hdcwnd);

ulBitmapWidth = rt.right - rt.left;
ulBitmapHeight = rt.bottom - rt.top;

ZeroMemory(&bmi, sizeof(BITMAPINFO));
bmi.bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
bmi.bmiHeader.biWidth = ulBitmapWidth;
bmi.bmiHeader.biHeight = ulBitmapHeight;
bmi.bmiHeader.biPlanes = 1;
bmi.bmiHeader.biBitCount = 32; // four 8-bit components
bmi.bmiHeader.biCompression = BI_RGB;
bmi.bmiHeader.biSizeImage = ulBitmapWidth * ulBitmapHeight * 4;

hbitmapAlpha = CreateDIBSection(hdc, &bmi, DIB_RGB_COLORS, &pvBitsAlpha,
NULL, 0x0);
hbitmap = CreateDIBSection(hdc, &bmi, DIB_RGB_COLORS, &pvBits, NULL, 0x0);

oldBitmap = (HBITMAP)SelectObject(hdc, hbitmapAlpha);

oldBrush = (HBRUSH)SelectObject(hdc, GetStockObject(NULL_BRUSH));
oldPen = (HPEN)SelectObject(hdc, CreatePen(PS_INSIDEFRAME, nWidth,
crTransparent));

Ellipse(hdc, rt.left, rt.top, rt.right, rt.bottom);
SelectObject(hdc, hbitmap);
DeleteObject(SelectObject(hdc, CreatePen(PS_INSIDEFRAME, nWidth,
crColor)));
Ellipse(hdc, rt.left, rt.top, rt.right, rt.bottom);

bf.BlendOp = AC_SRC_OVER;
bf.BlendFlags = 0;
bf.AlphaFormat = AC_SRC_ALPHA;
bf.SourceConstantAlpha = 0xff;

UINT x,y;

for (y = 0; y < ulBitmapHeight; y++)
for (x = 0; x < ulBitmapWidth; x++)
((RGBQUAD *)pvBits)[x + y * ulBitmapWidth].rgbReserved = ((RGBQUAD
*)pvBitsAlpha)[x + y * ulBitmapWidth].rgbBlue;

AlphaBlend(hdcwnd, 0, 0, ulBitmapWidth, ulBitmapHeight, hdc, 0, 0,
ulBitmapWidth, ulBitmapHeight, bf);

DeleteObject(SelectObject(hdc, oldPen));
SelectObject(hdc, oldBrush);
SelectObject(hdc, oldBitmap);
DeleteObject(hbitmapAlpha);
DeleteObject(hbitmap);
DeleteDC(hdc);
}

Polopruhledna cara

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.7.2002 21:36:19

From: "Libor Va���ek" <l.vasicek(zv)centrum(tec)cz>
> knihovna primo podporovana. Pokud ne, nezbude ti nic jineho nez se podivat
> do hlavickovich souboru C++ a pokusit se pozadovane funkce vyexportovat

http://www.progdigy.com/gdiplus/

Petr Vones

Refresh oken

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.7.2002 02:36:40

From: "David Kraina" <DKx(zv)Seznam(tec)cz>
> jiz delsi dobu mam problem, ktery jiz musim resit. Pomoci API upravim
> WorkArea obrazovky a potreboval bych udelat takovy refresh, aby ho ostatni
> aplikace vzali na vedomi i pod NT (pr. potrebuji aby maximalizovane okno na

Co predavas jako parametr fWinIni ?

Petr Vones

IB: Index unexpectedly deleted.

[*] Alex Cherednichenko <cherednichenko(zv)wo(tec)cz> - 10.7.2002 06:21:21

Hello, Kalhous!
You wrote:

KZ> Netusite, jak vznikne tato chyba a co se s ni da delat? V tabulce lze
KZ> pridavat, editovat a prohlizet, chybu SQL server nahlasi pri pokusu o
KZ> zruseni zaznamu.

Proved gfix -v -n. Pokud zadnu chybu ne najde,
podivajse do tabulek RDB$INDICES a RDB$INDEX_SEGMENTS

With best regards, Alex Cherednichenko.

Vstup dat na formulari

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 10.7.2002 07:25:09

Zdravim.

Nikdy som s frame nerobil, a toto sa mi zda naozaj pre frame vhodne.

Mohol by si to (alebo aspon nieco ako demo) poslat?

Vdaka.

Jaro

----- Original Message -----
From: "Bene� Jaroslav" <JBenes(zv)cpoj(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 09, 2002 8:21 AM
Subject: RE: Vstup dat na formulari


Ahoj,
zkus se podivat na www.micrel(tec)cz/delphi , mam tam v baliku komponent
TPubMaskEdit, ktery umoznuje validaci hodnoty. Delal jsem to prave pro tyto
pripady. Delavam to ale jinak, pouzivam pouze jednoduche komponenty typu
edit a mam dve validace. Prvni je individualne na poli (ocekavam, ze
uzivatel hodnotu 'nejak' vyplni) a druhou, kumulovanou validaci zavedu az
pri shrabnuti dat z formulare pro kontrolu vztahu mezi poli (napriklad pokud
uzivatel na pozadovane pole vubec nesel). Pouziti overovani spravnosti pres
Modified editu se mi neosvedcilo. Velmi se mi ale osvedcilo pouzit na stale
se opakujici skupiny poli (personalni udaje, adresy, bankovni spojeni atp)
frame, kde mam soustredeny jak lokalni validace, tak jednu proceduru pro
kumulovanou validaci.

Jaro B.

-----Original Message-----
From: Pavol Svorc [mailto:svorcp(zv)pp.internet.sk]
Subject: Vstup dat na formulari

urcuje, ktory dalsi MaskEdit dostane fokus. Po stlaceni Buttonu na
ulozenie do DB (priamo do DB zapisovat nemozem) musim ale
vsetko opat kontrolovat, lebo MaskEdit mi prepusti napr. datum v
tvare 32.13.2002. Tieto formulare sa mi opakuju s malymi
obmenami (pocet MaskEdit-ov, specificke podmienky) a su na cca
80% zhodne. Je to pomerne pracne na programovanie lebo velmi
lahko na nieco mozem zabudnut.
1. Neexistuje nieco vhodnejsie ako MaskEdit co by zabezpecilo
aspon jednoduchu validaciu?
2. Neexistuje nieco ako DBEdit ale nebolo by to previazane s
polom v databaze ale napr. s premennou v mojom rekorde?
3. Rad by som mal nejaky spolocny formular a z neho potom
odvodzoval dalsie, ale neviem ako do toho zabudovat tie specificke
podmienky pri predplnani tak aby to ostalo prehladne.
4. Ako riesite vstup a validaciu dat vy ?

P.Svorc


Vytvoreni databaze na MS SQL Serveru

[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 10.7.2002 07:27:10

Zjisteni MS SQL Serveru na siti:
Uses SQLDMO;
Application:=CoApplication_.Create;
with Application do
begin
lb.Items.Clear;
for i:=1 to ListAvailableSQLServers.Count do
lb.Items.Add(ListAvailableSQLServers.Item(i));
end;
Dalsi veci by asi sli udelat, take pomoci SQLDMO
Petr

> Ahoj vsem,
>
> omlouvam se za dotaz, ktery tak uplne nesouvisi s Delphi. Rad bych vedel,
> zda a jak se da zjistit seznam MS SQL servery na siti a jak na takovy
server
> pote nainstalovat ( vytvorit ) databazi.
>
> Za reseni vytvoreni DB bych bud povazoval
> a) vytvoreni DB pomoci SQL prikazu*
> b) restorovani DB z backupu**
> c) attachovanim existujiciho databazoveho souboru***
> A to vse bez ucasti uzivatele.
>
> Vim, ze nektere nejsou uplne "koser", takze pokud mate nekdo zkusenosti,
> budu velmi vdecen za kazdy tip ci radu.
>
> Dekuji...
> ...Dobra
>
> *) mohu nejak z databaze vygenerovat SQL script, ktery po spusteni na
jinem
> SQL
> serveru vytvori identickou kopii te puvodni?
>
> **) na svem PC jiz prazdnou databazi mam a vytvoril bych BACKUP, ze kterho
> bych
> pote na cilovem SQL databazi obnovil
>
> ***) zkopiroval cely databazovy soubor na cilove PC a tam jej jen pripojil
> do MS SQL
> Serveru, toto reseni ze mi vsak zda zcela nevhodne.
>
> ----------
> A na zaver jeste jedna omluva, minuly mail mi uletnul bez SUBJECTu :-(
>

Fomr z dll

[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 10.7.2002 07:58:40

Caute
Mam problem a neviem si snim dat rady
MDIAplikacia vyuzivajuca mnou vytvorene dllko, vola z neho fciu OtvorOkno
Tato fcia vyzera asi takto
function OtvorOkno: PChar; stdcall;
var
frm: TForm1; // FormStyle = fsNormal;
begin
frm := TForm1.CreateParented(AppHandle); // AppHandle je glob.premena kt.
mi nastavi //
applikacia cez inu fciu
while (Assigned(frm)) and (frm.Visible) do
Application.ProcesMessage; // Pockam kym okno niekto nezavrie
end;
Vznika problem, ked aplikacia zavola FreeLibrary, tak to hodi AV, ak ostali
otvorene nejake okna z dllka
Skusal som si vytvorit zoznam otvorenych okien a potom som ich chcel v fcii
ZavriVsetko
cyklicky prejst a zavolat nad kazdym Close (resp. Release, resp
PostMessage(WM_CLOSE)
Ani jedno mi vsak nepomohlo (okna sice zavriem), ale pri FreeLibrary to hodi
opat AV
Jedine mi to nehodi AV, ak tie okna zavrie bud klient alebo aplikacia (cez
WM_CLOSE)
Mozete mi poradit ako mozem takto vytvorene okno zavriet korektne z dllka

Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (181)

IB/FB

[*] Roman Konecny <rkonecny(zv)datis(tec)cz> - 10.7.2002 08:10:15

Ale jo, ale ani to nekdy neni to prave orechove. Navic, kdyz distribuuji DB
i s aplikaci, pak ztracim kontrolu nad DB, coz v pripade, ze chci provest
urcita omezeni nad daty mimo viditelne uzivatelske rozhrani mi prava nijak
zvlast nepomuzou.

Roman
----- Original Message -----
From: "Skopalik Slavomir" <skopalik(zv)hlubocky.del(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 09, 2002 3:07 PM
Subject: RE: IB/FB


> A co takle pouzit prava ?
>
> Slavek
>
> > Zdravim vsechny,
> >
> > nevite nekdo, jak bych mel vytvorit tabulku "RDB$NECO" tak, aby
> nebyla obycejnemu uzivateli viditelna ( neco na zpusob systemovych table).
> Je mi jasne, ze jde pak pres View ->System data, ale ne kazdy ma cas se
jen
> tak pro nic za nic hrabat v systemovych tabulkach a ne kazdy vi, kde a co
> ma hledat.
> >
> > Dekuji
>

Polopruhledna cara

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 10.7.2002 08:15:12

> potrebuji nakreslit na canvas timage.bitmap polopruhlednou
> caru (kruhy, obdelniky).

V JCL: www.delphi-jedi.org v unite JclGraphics je podpora alpha blending.
Pozri si BlockTransfer a TJclBitmap32.

HTH
TOndrej

IB: Index unexpectedly deleted.

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 10.7.2002 08:17:19

>> IB: Index unexpectedly deleted.
>> Netusite, jak vznikne tato chyba a co se s ni da delat? V tabulce
>> lze pridavat, editovat a prohlizet, chybu SQL server nahlasi pri
>> pokusu o zruseni zaznamu.
>
> Proved gfix -v -n. Pokud zadnu chybu ne najde,
> podivajse do tabulek RDB$INDICES a RDB$INDEX_SEGMENTS
>
> With best regards, Alex Cherednichenko.
>
Hm. Zatimco jsem marne hledal v manualech (a nenasel - tato
hlaska podle manualu neexistuje pokud ovsem nepovazuju za
dostatecnou informaci to, ze existuje chyba -901 <string>) tak vyslo
najevo, ze v databazi je dalsi problem: pri jakemkoli pokusu o
pridani constraintu se objevilo hlaseni "pokus o ulozeni duplicitni
hodnoty" s tim, ze system si systematicky (proto je to system, ze)
vymyslel jmena RDB$PRIMARYxxx ktera v systemovych tabulkach
neexistovala a pri kazdem dalsim pokusu zvetsil v tomto nesmyslu
cislo xxx o jednicku. Mezitim nastal konec pracovni doby a druhy
den rano bylo vsechno OK a vsechno funguje. Podotykam, ze se
jednalo o ladici databazi na ktere rozhodne neprobehly v noci zadne
udrzovaci prace. Uz jsem si zvykl ze si IB obcas sama od sebe
vymysli nesmyslne dependencies, i ty constrainty se daji prezit - to
je otazka udrzby struktury a provoz to neohrozuje. Ale predstava, ze
uzivateleli prestane fungovat ruseni zaznamu me dost desi.
OT: Obcas zde probehne diskuse o volbe databazoveho systemu.
Vesmes se nese v duchu "jedine SQL server" a "souborove
databaze jsou k nicemu - leda na seznam milenek". Moje letite
zkusenosti jsou kupodivu takove, ze jsem videl spoustu rozsahlych
aplikaci ktere pouzivaly Btrieve, Clipper, Fox, dBase, PCFAND,
Paradox 3.x i mnohem obskurnejsi souborove databaze, chodily jak
z praku na serverech 386 (ba i na 286), par desitek soucasne
pracujicich uzivatelu nebyl problem (samozrejme zadne 100Mb site
- vzpominate nekdo na ArcNet ?), ztrata dat nebo dokonce
zhrouceni databaze byl pojem neznamy a uzivatel o nejake udrzbe
nemel ani poneti - chodilo to "samo od sebe". Nezda se mi, ze pro
tyto ucely by SQL servery typu IB, FB, MSSQL a podobne byly
nejakym pokrokem. Pokud jsou tak je to pokrok ktery velmi vystizne
charakterizoval hostinsky Palivec byv zatcen pro urazku cisare
pana. Nemluvim samozrejme o databazich zvici stovek GB a
systemech pro stovky uzivatelu, Oracle nebo IBM SQL je o necem
jinem.

navrat na predchozi radek

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 10.7.2002 08:23:03

My jsme si vytvorili vlastni objekt (TTextFileStream), ktery otevre dany
soubor a nemusis ho prochazet sekvencne. Proste jen pouzijes
ReadLn(CisloRadku) a je to. Samozrejme ale je moznost pouziti konstrukce
while not EOF do
ReadLn;
Funguje to na principu vytvoreni indexu zacatku a konce radku. Pri cca. 10MB
souboru (resp. 108 000 radku) to zabere v pameti cca. 2,5MB a kompletni
indexace na tomto souboru zabrala na Athlonu 1GHz, 256MB cca. 2-3 sekundy.
Pokud by byl zajem, tak, az to bude poradne otestovane, to chceme uvolnit
jako open source

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

jak je mozne pri zpracovavani souboru metodou readln vratit se na predchozi
radek a provest zpracovani daneho radku znovu.
Petr Holomecek

OT:Vlajky

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 10.7.2002 08:28:22

ivan.virag(zv)aliatel(tec)cz dne 9 Jul 2002 v 18:03:

> nedavno jsem zde zadal o odkaz na vlajky sveta. Protoze byl ze strany
> ucastniku konference pomerne veliky zajem o vysledky, tak zasilam pro
> zajemce adresu, ktera nema lepsich variant:
>
> http://www.blueflash.de/

No ja nevim, zrovna ta ceska mi tam pripada nejaka divna... Myslim, ze ma mit pomer stran 3:2 a
modry klin ma sahat do stredu...

Karel Rys

navrat na predchozi radek

[*] Obermaier Petr Ing. <Obermaier(zv)mail.sdas(tec)cz> - 10.7.2002 08:31:44

> Od: Milan Tome� [SMTP:milan.tomes(zv)haida(tec)cz]
> My jsme si vytvorili vlastni objekt (TTextFileStream), ktery otevre dany
> soubor a nemusis ho prochazet sekvencne. Proste jen pouzijes
> ReadLn(CisloRadku) a je to. Samozrejme ale je moznost pouziti konstrukce
> while not EOF do
> ReadLn;
> Funguje to na principu vytvoreni indexu zacatku a konce radku. Pri cca.
> 10MB
> souboru (resp. 108 000 radku) to zabere v pameti cca. 2,5MB a kompletni
> indexace na tomto souboru zabrala na Athlonu 1GHz, 256MB cca. 2-3 sekundy.
> Pokud by byl zajem, tak, az to bude poradne otestovane, to chceme uvolnit
> jako open source
>
>
Urcite napis, az to po testech uvolnite, velmi by se to mne a zajiste i
jinym hodilo.

diky
Ober

implicitni vyber tlacitek v MessageDlg()

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 10.7.2002 08:33:46

Ahoj
rad bych se poptal, jak je mozne nastavit implicitni tlacitko u MessageDlg.
Napriklad tady
MessageDlg('Opravdu si prejete...', mtConfirmation, [mbYes, mbNo], 0);
se nastavi jako implicitni tlacitko YES ale potreboval bych aby se nastavilo NO.
Da se to nejak udelat?
Diky
Jaro B.

univerzalni vstupni dialog?

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 10.7.2002 08:34:15

> zdravim,
> nevite nekdo o komponente pro univerzalni vstup dat? Potrebuji moznost
> definovani ruzneho poctu vstupnich poli - edit, datatimepicker,
> combobox atd. Delat pro kazdy vstup ruznych parametru od uzivatele
> samostatny form je unavne. bleak

Ahoj,

nejak si neumim predstavit, jak by se to melo pouzivat. Budes mit univerzalni form,
ale stejne bys musel nastavit spoustu parametru: typy editu (edit, combo apod.),
vsechny texty labelu, mozna implicitni predvyplnene hodnoty, usporadani do
sloupcu, sirky komponent apod. Neumim si predstavit, ze by to bylo v necem
vyhodnejsi nez dialog vyrobeny na miru, ktary mozna vypiplas do pozadovane
podoby rychleji.

David Lebeda

implicitni vyber tlacitek v MessageDlg()

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 10.7.2002 08:47:39

Misto MessageDlg pouzij Application.MessageBox
napr:
Application.MessageBox('Opravdu si prejete...', 'Dotaz', MB_YESNO +
MB_DEFBUTTON2 + MB_ICONQUESTION);

Mimo jine tim ziskas automaticky lokalizovane texty tlacitek (je to volani
API funkce MessageBox a popisy jsou automaticky vytazene z resourcu Windows)

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> rad bych se poptal, jak je mozne nastavit implicitni tlacitko u
> MessageDlg.
> Jaro B.

Zruseni PopupMenu

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 10.7.2002 09:10:35

Sevrvus ve spolek,
nevite nekdo, jak se da zrusit vyvolane PopupMenu? Neco jakoby:
PopupMenu1.Close;
Rumcajs


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

implicitni vyber tlacitek v MessageDlg()

[*] David Both <dboth(zv)merlin(tec)cz> - 10.7.2002 09:22:11

Tak zkus prohodit mbYes ambNo

David.
----- Original Message -----
From: "Bene� Jaroslav" <JBenes(zv)cpoj(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, July 10, 2002 8:33 AM
Subject: implicitni vyber tlacitek v MessageDlg()


Ahoj
rad bych se poptal, jak je mozne nastavit implicitni tlacitko u MessageDlg.
Napriklad tady
MessageDlg('Opravdu si prejete...', mtConfirmation, [mbYes, mbNo], 0);
se nastavi jako implicitni tlacitko YES ale potreboval bych aby se nastavilo
NO.
Da se to nejak udelat?
Diky
Jaro B.

IB/FB

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 10.7.2002 09:23:05

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
nevite nekdo, jak bych mel vytvorit tabulku "RDB$NECO" tak, aby nebyla obycejnemu uzivateli viditelna ( neco na zpusob systemovych table). Je mi jasne, ze jde pak pres View ->System data, ale ne kazdy ma cas se jen tak pro nic za nic hrabat v systemovych tabulkach a ne kazdy vi, kde a co ma hledat.
Vytvor normalne tabulku a pak udelej:

Update RDB$RELATIONS
Set
RDB$SYSTEM FLAG=1
Where
(RDB$RELATION NAME='Jmeno tabulky')

Ale se zasahy do systemovych tabulek opatrne.

PDF soubory a Delphi 4

[*] Petr Turek <petr.turek(zv)unimontex(tec)cz> - 10.7.2002 09:36:23

Ahoj.
Chtel bych udelat aplikaci v Delphi 4, ktera by umela cist soubory PDF bez
pritomnosti exploreru, acrobatu a jinych programu. Nevite nekdo o nejake
free komponente? Prosel jsem archiv konference, ale nic podobneho jsem
nenasel.

Diky Petr Turek

Platnost FileName

[*] Jaroslav Bucek <bucek(zv)eskon(tec)cz> - 10.7.2002 10:19:28

Pratele,
potrebuji nejakou funkci zjistit, zda je mozno pouzit string jako platny
nazev souboru. Existuje nejaka takova funkce v D5?

Diky Jarda

Platnost FileName

[*] David Both <dboth(zv)merlin(tec)cz> - 10.7.2002 10:31:07

uses SysUtils

if FileExists(string) then
poklud je spln�na podm�nka, tak je to string platn� s n�zev existuj�c�ho
souboru a nebo to lze �e�it p�es funkci ExtractFileDir
if ExtractFileDir(string) <> '' then
pokud je spln�na podm�nka, tak existuje cesta a t�m je platn� n�zev souboru.

David
----- Original Message -----
From: "Jaroslav Bucek" <bucek(zv)eskon(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, July 10, 2002 10:19 AM
Subject: Platnost FileName


> Pratele,
> potrebuji nejakou funkci zjistit, zda je mozno pouzit string jako platny
> nazev souboru. Existuje nejaka takova funkce v D5?
>
> Diky Jarda

Generovani stisknuti klavesy API funkci

[*] Petr =?ISO-8859-2?Q?Turo=F2 ?= <turon(zv)centrum(tec)cz> - 10.7.2002 10:45:37

Dobry den,
mam nejasnost s generovanim stisknute klavesy pomoci Api fukce.
Pouzivam napr. pro stisknuti klavesy sipka nahoru funkci

Keybd_Event(VK_UP, MapVirtualKey(VK_UP,0),0 ,0);

akce probehne, ale pouze jednou, potrebuji zajistit autorepeat a
nevim jak.

Nasel jsem i funkci:
WM_KEYDOWN
nVirtKey = (int) wParam; // virtual-key code
lKeyData = lParam; // key data
Ale jeji pouziti mi neni zcela jasne, hlavne paramtru lKeyData.

Diky za jakykokoliv namet.
Petr T.


--------------------
Centrum pro milovn�ky pen�z http://finance.centrum(tec)cz


PDF soubory a Delphi 4

[*] Roman Toda <toda(zv)digitaldocuments.org> - 10.7.2002 10:50:56

Co znamena "cist sobory PDF"?
Chces urobit export do PDF? Chces menit existujuce PDFka? Co presne chces v
PDFku menit?

Na export je dost dobrych ci lepsich komponent, ale na pracu s existujucim
PDF suborom na urovni aspon najnizsich logickych struktur toho existuje vo
svete PDF velmi malo. A ked chces nieco free tak mas skutocne velmi malo
moznosti (ghostscript je jednym z nich). S Delphi native kod som sa este
nestretol.

Roman

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Turek
> Sent: Wednesday, July 10, 2002 9:36 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: PDF soubory a Delphi 4
>
>
> Ahoj.
> Chtel bych udelat aplikaci v Delphi 4, ktera by umela cist soubory PDF bez
> pritomnosti exploreru, acrobatu a jinych programu. Nevite nekdo o nejake
> free komponente? Prosel jsem archiv konference, ale nic podobneho jsem
> nenasel.
>
> Diky Petr Turek
>
>

implicitni vyber tlacitek v MessageDlg()

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 10.7.2002 11:01:02

Ahoj
udelal jsem vlastni dialog (mozna to vyhledani a pretypovani bych mohl udelat lepe :-) ) a je to funkcni.
timto zpisobem je mozne udelat i jine zmeny (snad je to dobry tip)
obrazek se jmenuje Image, text je Message, tlacitka Yes a No (ostatni budou asi analogicka)
A je to
Jaro B.

Var I:Integer;
Begin
{vytvoreni dialogu letmo}
with CreateMessageDialog('Opravdu si prejete...', mtConfirmation, [mbYes,mbNo]) do
try
Position := poScreenCenter; {doprostred}
{projit komponenty, kvuli jmenu}
For I := 0 To ComponentCount-1 Do
Begin
If (Components[I] as TObject).Name = 'No' Then
{a je aktivni No a ne Yes}
ActiveControl := (Components[I] as TWincontrol);
End;
{zde je kladna akce, nebo nuze byt navratova hodnota}
if (ShowModal = mrYes) then
begin
...
end
finally
Free; {uvolnit letmo zaveseny formular}
end;
End;

-----Original Message-----
From: David Both [mailto:dboth(zv)merlin(tec)cz]
Tak zkus prohodit mbYes ambNo
David.
----- Original Message -----
From: "Bene� Jaroslav" <JBenes(zv)cpoj(tec)cz>
rad bych se poptal, jak je mozne nastavit implicitni tlacitko u MessageDlg.
Napriklad tady
MessageDlg('Opravdu si prejete...', mtConfirmation, [mbYes, mbNo], 0);
se nastavi jako implicitni tlacitko YES ale potreboval bych aby se nastavilo
NO.
Da se to nejak udelat?
Diky
Jaro B.

Vytvoreni databaze na MS SQL Serveru

[*] Z�le��k Tom� <tomas.zalesak(zv)lcs(tec)cz> - 10.7.2002 11:10:40

> zda a jak se da zjistit seznam MS SQL servery na siti:

program ListAvailableSQLServers;
uses Windows, ComObj, ActiveX;
var
I : Integer;
S : AnsiString;
DMOApp : Variant;
DMOServers : Variant;
begin
CoInitialize(nil);

DMOApp := CreateOLEObject('SQLDMO.Application');
DMOServers := DMOApp.ListAvailableSQLServers;
for I := 1 to DMOServers.Count do
S := S + DMOServers.Item(i) + #13;

Windows.MessageBox(0, PChar(S), nil, 0);
end.> jak na takovy server pote nainstalovat (vytvorit) databazi.
> Za reseni vytvoreni DB bych bud povazoval
> a) vytvoreni DB pomoci SQL prikazu*
> b) restorovani DB z backupu**
> c) attachovanim existujiciho databazoveho souboru***
> A to vse bez ucasti uzivatele.
> Vim, ze nektere nejsou uplne "koser", takze pokud mate nekdo
> zkusenosti, budu velmi vdecen za kazdy tip ci radu.

Vsechny reseni jsou vzhledem k MSSQL "koser".> *) mohu nejak z databaze vygenerovat SQL script, ktery po
> spusteni na jinem SQL serveru vytvori identickou kopii te
> puvodni?

Tlacitko Start -> Programs -> Microsoft SQL Server ->
Enterprise Manager -> vybrat databazi -> v menu Tools ->
Generate SQL Scripts


> **) na svem PC jiz prazdnou databazi mam a vytvoril bych
> BACKUP, ze ktereho bych pote na cilovem SQL databazi obnovil

Jen pozn.: vysledek FULL BACKUP/RESTORE je na MSSQL (na rozdil od
napr. IB/FB) identicky s sp_detach_db/sp_attach_db - tzn. neprobihaji
zadne "optimalizace" apod.> ***) zkopiroval cely databazovy soubor na cilove PC a tam jej
> jen pripojil do MS SQL
> Serveru, toto reseni ze mi vsak zda zcela nevhodne.

Proc je nevhodne ? Pokud jsi databazi odpojil pres sp_detach_db,
staci Ti distribuovat jen MDF soubor a ten pripojit pres sp_attach_db.
Tuto variantu pouzivame (na MSSQL7 i MSSQL2000) cca 4 roky a vse je
bez problemu.


Tomas Zalesak

Generovani stisknuti klavesy API funkci

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 10.7.2002 11:13:39

V parametru lKeyData se predava napr. stav klaves Shift, Control a Alt.
Podivej se do unity Forms na funkci KeyDataToShiftState

IMHO WM_KEYDOWN neni funkce, ale struktura recordu, ktery se pri teto
udalosti predava do WndProc.

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> Nasel jsem i funkci:
> WM_KEYDOWN
> nVirtKey = (int) wParam; // virtual-key code
> lKeyData = lParam; // key data
> Ale jeji pouziti mi neni zcela jasne, hlavne paramtru lKeyData.

staticka promenna tridy

[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 10.7.2002 10:27:42

misto staticke promene muzes udelat globalni promenou v unite s deklaraci
teto tridy, viditelnou jen pro tuto unitu. Neni to uplne totez, neni to
uplne ciste a objektove, ale resi to zhruba tento problem (koneckoncu
kompilator C++ to vyresi taky tak nejak, ze?).

Danik

-----Original Message-----
From: "karel macka" <seduvplacek(zv)post(tec)cz>
> v c++ existuje staticka promenna nebo metoda tridy. deklaruje se v tride
> klicovym slovem static a funguje tak ze je spolecna pro vsechny instance
> teto tridy. existuje neco takoveho i v delphi?

Podivej se v helpu na 'Class methods'. Staticke promenne v Object Pascalu
nejsou.

Petr Vones

Jak prehrat X mp3 na X zvukovkach soucasne ?

[*] VladimirRuzicka <ruzicka(zv)digitus(tec)cz> - 10.7.2002 11:39:22

Ahoj

resim problem %subj%, kde X muze nabyvat hodnoty maximalne 5. Delal jste
nekdo neco podobneho ? Zatim se mi povedlo prehat jenom 5 mp3 soucasne na
jednu zvukovku, ale to je mi na nic.

predem dik

Vladimir, D4, W98

navrat na predchozi radek

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.7.2002 11:51:03

From: "Milan Tome�" <milan.tomes(zv)haida(tec)cz>
> My jsme si vytvorili vlastni objekt (TTextFileStream), ktery otevre dany
> soubor a nemusis ho prochazet sekvencne. Proste jen pouzijes
> ReadLn(CisloRadku) a je to. Samozrejme ale je moznost pouziti konstrukce
>
> Funguje to na principu vytvoreni indexu zacatku a konce radku.

Na podobnem principu funguje i jiz zminena trida TJclMappedTextReader z JCL
(http://delphi-jedi.org/Jedi:CODELIBJCL). Rozdil je pouze v tom, ze se indexy
radku neukladaji, ale vzdy pocitaji relativne od posledni pozice, pricemz se
pouzije nejkratsi usek bud od posledni pozice nebo od zacatku/konce souboru.
Vlastni soubor je namapovan do pameti. Pouziti je vcelku zrejme z prikladu
TextReaderExample.dpr kde jsou i jednoduche performance testy v porovnani s
ReadLn a TStringList. Z vyse popsaneho principu je zjevne, ze rychlost nebude
uplne idealni pri skakani po od sebe znacne vzdalenych radcich, coz by slo
resit pouzitim cache na jiz jednou zjistene pozice. Trida umoznuje sekvencni
cteni (ReadLn), cteni daneho radku dle indexu (Lines[]) a zjisteni celkoveho
poctu radku v souboru (LineCount).

Pro predstavu, textovy soubor o velikosti 8MB a cca 73,000 radcich je otevren
za 55ms vcetne ziskani celkoveho poctu radku, sekvencni cteni vsech radku je
cca 3x rychlejsi nez pri pouziti ReadLn. (Windows 2000, Duron 700, 256M RAM)

Petr Vones

DLL a MAINICON

[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 10.7.2002 11:56:26

Kdyz zkompiluji v D6 DLL knihovnu, tak vysledny soubor
obsahuje ikonu MAINICON, ale v dialogu Project options
ji nelze zmenit. Jak ji zmenit, ci jeste lepe zrusit ?

Daniel
-------------------------------------------------------
Scanning complete: NO intelligent life form in range.

PDF soubory a Delphi 4

[*] Petr Turek <petr.turek(zv)unimontex(tec)cz> - 10.7.2002 12:03:29

Chci pouze zobrazit PDF soubor ve sve aplikaci, aby si ho mohl uzivatel
precist, popruipade vytisknout (to neni nutne).

Petr Turek

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Roman Toda
Sent: Wednesday, July 10, 2002 10:51 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: PDF soubory a Delphi 4


Co znamena "cist sobory PDF"?
Chces urobit export do PDF? Chces menit existujuce PDFka? Co presne chces v
PDFku menit?

Na export je dost dobrych ci lepsich komponent, ale na pracu s existujucim
PDF suborom na urovni aspon najnizsich logickych struktur toho existuje vo
svete PDF velmi malo. A ked chces nieco free tak mas skutocne velmi malo
moznosti (ghostscript je jednym z nich). S Delphi native kod som sa este
nestretol.

Roman

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Turek
> Sent: Wednesday, July 10, 2002 9:36 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: PDF soubory a Delphi 4
>
>
> Ahoj.
> Chtel bych udelat aplikaci v Delphi 4, ktera by umela cist soubory PDF bez
> pritomnosti exploreru, acrobatu a jinych programu. Nevite nekdo o nejake
> free komponente? Prosel jsem archiv konference, ale nic podobneho jsem
> nenasel.
>
> Diky Petr Turek
>
>

Fomr z dll

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.7.2002 12:05:02

From: "�tevl�k Mari�n" <Marian.Stevlik(zv)merlin(tec)cz>
> Mam problem a neviem si snim dat rady
> MDIAplikacia vyuzivajuca mnou vytvorene dllko, vola z neho fciu OtvorOkno

Preloz EXE i DLL s balicky. Jedine tak:

a) to bude fungovat
b) ma smysl ukladat MDI child do DLL/BPL

Vice treba tady: http://www.obsof.com/delphi_tips/DL613.html

Petr Vones

DLL a MAINICON

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.7.2002 12:07:16

From: "Daniel Rott" <roxton(zv)seznam(tec)cz>
> Kdyz zkompiluji v D6 DLL knihovnu, tak vysledny soubor
> obsahuje ikonu MAINICON, ale v dialogu Project options
> ji nelze zmenit. Jak ji zmenit, ci jeste lepe zrusit ?

Zrusis ji tak, ze odstranis .RES soubor z projektu. Tim vsak zaroven prijdes o
VersionInfo.

Petr Vones

PDF soubory a Delphi 4

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

From: "Petr Turek" <petr.turek(zv)unimontex(tec)cz>
> Chci pouze zobrazit PDF soubor ve sve aplikaci, aby si ho mohl uzivatel
> precist, popruipade vytisknout (to neni nutne).

1. Acrobat Reader lze zdarma stahnout
2. Acrobat Reader obsahuje i ActiveX control
3. Delphi umi pouzivat ActiveX

Petr Vones

DLL a MAINICON

[*] Milan Cizek <Cizek.Milan(zv)seznam(tec)cz> - 10.7.2002 12:34:20

From: "Daniel Rott" <roxton(zv)seznam(tec)cz>
> Kdyz zkompiluji v D6 DLL knihovnu, tak vysledny soubor
> obsahuje ikonu MAINICON, ale v dialogu Project options
> ji nelze zmenit. Jak ji zmenit, ci jeste lepe zrusit ?

ahoj,
zmenit nebo zrusit se da napr. pomoci ResourceHackeru.

S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP2)
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ:
59826637

______________________________________________________________________
Reklama:
Mapy Prahy, Brna a Cech najdete na http://www.mapy(tec)cz

navrat na predchozi radek

[*] Pavel T�e���k - 10.7.2002 12:37:29

Pro zajimavost porovnani vykonu TTextFileStream a TJclMappedTextReader:

Zjisteni poctu radek

TTextFileStream - 2s 265ms
TJclMappedTextReader - 60ms - klobouk dolu

5000x precteni nahodne radky (soubor 108000 radek, cca. 10MB)

TTextFileStream - 2s 343ms
TJclMappedTextReader - 2m 0s 133ms

Nas pozadavek totiz nebyl sekvencni cteni, proto budujeme index, pak se to
zuroci. Sekvencni test jsem neprovedl, asi by nas JCL rozdrtilo ;)

Pavel Tresnak

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vones
Sent: Wednesday, July 10, 2002 11:51 AM
To: Konference Delphi
Subject: Re: navrat na predchozi radek


>From: "Milan Tome�" <milan.tomes(zv)haida(tec)cz>
>> My jsme si vytvorili vlastni objekt (TTextFileStream), ktery otevre dany
>> soubor a nemusis ho prochazet sekvencne. Proste jen pouzijes
>> ReadLn(CisloRadku) a je to. Samozrejme ale je moznost pouziti konstrukce
>>
>> Funguje to na principu vytvoreni indexu zacatku a konce radku.

>Na podobnem principu funguje i jiz zminena trida TJclMappedTextReader z JCL
>(http://delphi-jedi.org/Jedi:CODELIBJCL). Rozdil je pouze v tom, ze se
indexy
>radku neukladaji, ale vzdy pocitaji relativne od posledni pozice, pricemz
se
>pouzije nejkratsi usek bud od posledni pozice nebo od zacatku/konce
souboru.

>Pro predstavu, textovy soubor o velikosti 8MB a cca 73,000 radcich je
otevren
>za 55ms vcetne ziskani celkoveho poctu radku, sekvencni cteni vsech radku
je

>Petr Vones

navrat na predchozi radek

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.7.2002 12:42:24

From: "Pavel T�e���k" <pavel.tresnak(zv)haida(tec)cz>
> 5000x precteni nahodne radky (soubor 108000 radek, cca. 10MB)
>
> TTextFileStream - 2s 343ms
> TJclMappedTextReader - 2m 0s 133ms

Z toho je videt, ze by nebylo spatne tam pridat jako volitelny parametr tvorbu
indexu pro cely soubor. Cache na jiz jednou prectene pozice to asi nezachrani.

Petr Vones

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