Archív konference Delphi

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

Zmena stylu v grafu

[*] Rumcajs - konference <konrum(zv)seznam(tec)cz> - 26.10.2002 09:53:47

Servius vsem,
nevite nekdo, jak v komponente TChart zmenit nektery ze Series treba z baru
na pie?
Rumcajs


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

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 26.10.2002 09:58:47

Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu. Stanice
se k nemu pripojuji, ma to vsak jeden hacek: neznaji dopredu jeho IP adresu.
Neni sice problem to u vsech nastavit "natvrdo", ale pripada mi to malo
elegantni. Resil jsem to tak, ze server po startu zapise IP adresu do
souboru a stanice si jej prectou, ale to fungovalo jen do te doby, nez se u
jednoho zakaznika nainstaloval server na pocitac se dvema sitovymi kartami a
on zapsal do souboru podle zakona schvalnosti zrovna tu nevhodnou. Nemate
nekdo tip, jak "projit" sit a zjistit IP adresu pocitace, na kterem muj
server bezi?

Zdravim a diky predem

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234

MySQL vs. Transakcie

[*] David Janko <djanko(zv)wizards(tec)cz> - 26.10.2002 10:02:30

> Z Delphi chceme pracovat s MySQL serverom. Pri rieseni nasej aplikacie
> potrebujeme aj transakcie. Bohuzial v dokumentacii sme nerarazili ze by
> MySQL server vedel pracovat s transakciami. Nasa otazka je ci podporuje
> MySQL server transakcie? Mame server postaveny na Linuxe a pripajame sa s
> Delphi 6-7 Ent. OS pre clienta Win 2000 / XP

Ano, podporuje.
Ale nikdy sem je jeste nepouzil - tusim, ze tabulka musi pak byt typu
InnoDB, nejsem si jist zda funguji nad MyISAM a urcite nefunguji nad starym
typem ISAM. Byli zavedeny v rade 3.23.X, ktera je nyni stabilni.
Ale v dokumentaci je o tom spousta info ...

---
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
+420 604 164 999

MySQL vs. Transakcie

[*] Robert Suska <delphi(zv)korak.sk> - 26.10.2002 10:08:14

Ahoj

> Ano, podporuje.
> Ale nikdy sem je jeste nepouzil - tusim, ze tabulka musi pak byt typu
> InnoDB, nejsem si jist zda funguji nad MyISAM a urcite nefunguji nad
starym
> typem ISAM. Byli zavedeny v rade 3.23.X, ktera je nyni stabilni.
> Ale v dokumentaci je o tom spousta info ...

Co je to InnoDB a co je to MyISAM ??? ja som sa pytal na MySQL ma to nieco
spolocne s tym co si pisal ? Ak ano prosim o vysvetlenie

Dakujem

Robo

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 26.10.2002 10:35:53

A bezi tam napr. DNS ? pak by prece stacilo se pripojovat, ne podle IP adresy ale podle nazvu PC ?

Milos

-----Original Message-----
From: Petr Brant [mailto:brant(zv)dcomm(tec)cz]
Sent: Tuesday, November 26, 2002 9:59 AM
To: Konference Delphi (delphi-l(zv)clexpert(tec)cz); Konference Pandora (delphin(zv)pandora(tec)cz)
Subject: Jak zjistit IP adresu pocitace, kdyz znam port


Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu. Stanice se k nemu pripojuji, ma to vsak jeden hacek: neznaji dopredu jeho IP adresu. Neni sice problem to u vsech nastavit "natvrdo", ale pripada mi to malo elegantni. Resil jsem to tak, ze server po startu zapise IP adresu do souboru a stanice si jej prectou, ale to fungovalo jen do te doby, nez se u jednoho zakaznika nainstaloval server na pocitac se dvema sitovymi kartami a on zapsal do souboru podle zakona schvalnosti zrovna tu nevhodnou. Nemate nekdo tip, jak "projit" sit a zjistit IP adresu pocitace, na kterem muj server bezi?

Zdravim a diky predem

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234

Pouziti IBRestoreService

[*] Pavel Cisar <pcisar(zv)users.sourceforge(tec)net> - 26.10.2002 10:38:52

Haj hou!

On 26 Nov 2002 at 8:26, Lebeda David wrote:

> Reseni to ale asi nema, jelikoz v jinem threadu jsem se pred chvili docetl, ze tabulku
> (a asi ani databazi) prejmenovat proste nejde.

A proc by neslo prejmenovat databazi ? Jediny problem by vznikl pri
pokusu prejmenovat kazdy soubor vicesouborove databaze (k tomu je
zapotrebi upravit obsah havicky databaze - je k tomu na IBP webu
utilita), ale prvni soubor jde prejmenovat bez problemu. Jde jen o to,
aby ji nikdo nemel otevrenou (ani server).

S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase

Pouziti IBRestoreService

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 26.10.2002 10:40:14

> A proc by neslo prejmenovat databazi ?

A jak? Mam na mysli prejmenovani bez toho, abych mel pristup k
souboru gdb, tj. s pomoci komponent IBX, nikoli pomoci prostredku
operacniho systemu. Pokud to jde a ja to jen prehledl, tak by mi to
moc pomohlo. Protoze k pocitaci s FB serverem nemam zadna
opravneni, neznam jmeno a heslo pro prihlaseni...

David Lebeda

Jak dostat zn�n� view z databaze

[*] Ale� Kerner <kerner(zv)metalcom(tec)cz> - 26.10.2002 10:41:29

Zdravim

nevite nekdo jestli lze dostat zneni z databaze IB ve formatu SQL,

myslim toto
CREATE VIEW KON_SPAT_DPH_VFAKTURY(DOKLAD, DODAVATEL, VYSTAVENO, PLNENODPH,
DPH5, DPH22, KODDPH) AS select DOKLAD, D_NAZEV, VYSTAVENO, PLNENODPH, DPH_1,
DPH_2, KODDPH from Vfaktury where ("DPH_1">0 or "DPH_2">0) and KODDPH<>'_�
444,445'

umim dostat nazvy Views pres

select * from RDB$VIEW_RELATIONS

ale to nestaci


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

soucet CHAR poli na FB

[*] bleak <bleak(zv)mvesely(tec)com> - 26.10.2002 10:43:52

zkusil jsem zmenit VAR na VARCHAR, ale ty mezery navic tam jsou porad.
bleak

----- Original Message -----
From: "Jan Sebel�k" <honza(zv)haes(tec)cz>
prijmeni, jmeno jsou asi typu CHAR(x), mely by byt VARCHAR(x)> Odes�latel: bleak <bleak(zv)mvesely.com>
> SELECT (prijmeni || ',' || jmeno) as jmeno FROM table
> |Novak ,Petr |
> jak se vyhnout tem mezeram, ktere tam jsou doplneny na velikost puvodnich


Honza


prejmenovat tabulku na FB

[*] bleak <bleak(zv)mvesely(tec)com> - 26.10.2002 10:45:22

jenze tim prijdu o data v tabulce :-(
musel bych je nejprve "prepumpovat" a tomu jsem se chtel vyhnout.
bleak

----- Original Message -----
From: "Pavol Kakacka" <kakacka(zv)proca(tec)cz>
> Bohuzial! Vygeneruj si DDL tabulky (skript) a tabulku znovu vytvor pod
inym
> menom. :(> From: "bleak" <bleak(zv)mvesely.com>
> > Jak prejmenovat tabulku na FB?
> > ALTER TABLE table1 RENAME table2 //tak bych to delal na MySQL

Barva u buttonu

[*] Ales Kerner <kerner(zv)metalcom(tec)cz> - 26.10.2002 10:48:50

Tak tohle mi nefunguje


> AK> Nevite nekdo jak zmenit barvu u buttonu?
>
> Button.Brush.Color := clRed;
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.423 / Virov� b�ze: 238 - datum vyd�n�: 25.11.2002

MessageDlg a dalsi dialogy predavaji sve udalosti

[*] Petr Varga <djvar(zv)post(tec)cz> - 26.10.2002 10:54:20

M�m formul��, kter� reaguje na stisknut� enteru a spousty dal��ch
kl�ves. V�dycky se zavola n�jak� p��slu�n� funkce. A kdy� v jedn� z
techto fc� zavol�m MessageDlg nebo Application.MessageBox a zav�u
dialog kl�vesou, p�ejde mi tato kl�vesa do ud�losti formul��e.. Jak
to �e? Pot�ebuji aby prost� kdy� v tom dialogu m� focus t�eba
tla��tko OK a u�ivatel zm��kne Enter tak tato ud�lost se t�kala
pouze tohoto dialogu. Ne celeho formul��e.. Nev�te n�kdo? Jen tak na
okraj n�jak� nastavov�n� prom�nnych na true a v onkeydown pri
promenne true stornovat vstup je a� posledn� varianta..

Delphi 5, Enterprice..
D�kuji Petr Varga

--
---
P�ipojen� serveru k internetu rychlost� 10 nebo 100 Mbps nab�z�
slu�ba Server Housing od Jet2Web Czech Republic. Ceny od 1.500 K�
m�s��n�! Info:
http://www.jet2web(tec)cz/cs/products?article=jet2web_products_housing_housing

soucet CHAR poli na FB

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 26.10.2002 10:57:22

> > kdyz provedu:
> > SELECT (prijmeni || ',' || jmeno) as jmeno FROM table
> > tak ve vysledku pole jmeno vypada takto:
> >
> > |Novak ,Petr |
> >
> > jak se vyhnout tem mezeram, ktere tam jsou doplneny na
> > velikost puvodnich poli?

no, predne bych pole podobneho razeni navrhoval jako VarChar.
pak nebudes mit podobne problemy. cili opet, jak na Honza
Sebelik neustale opakuje: "Analyza, Analyza, Analyza...".

je mi jasne, ze je to rada spise do budoucna a ted honem ti
nepomuze.

peca

Re[2]: Pouziti IBRestoreService

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 26.10.2002 11:04:20

> Moj nazor je ze ak si do tabulky robil Alter Table XXX add ColumnABC
> ... not null, tak si to hned mal aj naplnit niecim,

Ja nevim, jak to vzniklo, ostatne tohle mi tu uz nekdo vysvetlil. Nemohu bohuzel
potvrdit ani vyvratit, zda problem vznikl kvuli tomu. Tady ale nejde o to, ze to
vzniklo, ale ze to neni prekazkou uz pri vytvoreni zalohy. Podle me by se nemelo
podarit vytvorit gbk soubor, ze ktereho pak nelze obnovit, i za cenu dlouho, ze urcite
kontroly dobu trvani vytvareni gbk souboru prodlouzi. Ale toto bych uzavrel, debata
uz tu probehla.

> na to zabudnut. A tento problem by si nemal.


Tak bych nemel tento problem, ale treba se najde jiny. Tuhle jsem zjistil u zakaznika,
ze jsou naborene nektere indexy. Chtelo to prislusny index deaktivovat a znovu
aktivovat. To si ce nebrani provedeni zalohy, ale co kdyz se zanedlouho zase objevi
neco, co zpusobi nemoznost obnovy?

Do spravy systemu proto musim pridelavat funkce, ktere bych cekal u paradoxu, ale
ne u SQL databazi, jako je reindexace apod. Je mi pritom celkem jedno, jak to
poskozeni vznikne. Proste vznikne pri beznem provozu a ja nemam jinou moznost,
nez si pripravit nastroje, jak tyto necekane problemy resit.

David Lebeda

Barva u buttonu

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 26.10.2002 11:19:49

Ales Kerner wrote:
> Nevite nekdo jak zmenit barvu u buttonu?

Zkus treba http://www.kopr(tec)cz/delphi/k-delphi.htm

Vaclav Sazima

MySQL vs. Transakcie

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 26.10.2002 11:36:13

> Ahoj
>
> > Ano, podporuje.
> > Ale nikdy sem je jeste nepouzil - tusim, ze tabulka musi pak byt typu
> > InnoDB, nejsem si jist zda funguji nad MyISAM a urcite nefunguji nad
> starym
> > typem ISAM. Byli zavedeny v rade 3.23.X, ktera je nyni stabilni.
> > Ale v dokumentaci je o tom spousta info ...
>
> Co je to InnoDB a co je to MyISAM ??? ja som sa pytal na MySQL ma to nieco
> spolocne s tym co si pisal ? Ak ano prosim o vysvetlenie

V MySQL muzou byt tabulky typu (my)isam (defaultne) nebo innodb, kdyz se
podivas do dokumentace, je tam info i s priklady i na pouziti transakci
(nebo alespon to tam kdysi bylo, uz jsem s tim dlouho nedelal) :-)

Roman
==============================
http://kouzelne.misto(tec)cz

SQL dotaz , vraceni noveho pole

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 26.10.2002 11:37:22

Access ma fci IIf(podminka, navratova hodnota pro splneno,navratova hodnota
pro nesplneno)

J�jkc> Ahoj,
J�jkc> mam jednu otazecku ohledne SQL dotazu (napr. pres Query v D5
do DB
J�jkc> MSAccess 97/2000). Mam tabulku, kde je jeden atribut typu Boolean
(napr.
J�jkc> head_flag : Boolean) a chci, aby mi dotaz vracel dataset, kde bude
bude
J�jkc> umele vytvoren atribut head_str, ktery bude nastaven v zavislosti na
J�jkc> head_flag nasledujicim zpusobem:

J�jkc> head_flag : head_str = "ANO"
J�jkc> !head_flag : head_str = "NE"

J�jkc> Dik za pripadnou radu,
J�jkc> Kuba.

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Langer <langer(zv)xdom(tec)cz> - 26.10.2002 11:50:01

Ahoj,
pokud to chces pouzit v lokalni siti, tak bud muzes pouzit WNetEnumResource
pro zjisteni vsech stroju na siti a pak vsem osahat port, jestli je tam
tvoje sluzba, nebo muzes pouzit sitovy broadcasting z klienta s tim, ze to
server zachyti a posle zpet odpoved (nikdy jsem to nedelal, ale melo by to
fungovat, pouziva to standardne SQL server a myslim si, ze i ten
WNetEnumResource dela neco podobneho...)

HTH
Petr

btw. jakym zpusobem zapisuje server tu svoji adresu? Jak vi bud server na
jake pocitace ji ma zapsat, nebo jak vi klienti na jaky share se maji
podivat? To musis mis stejne natvrdo, ne?

----- Original Message -----
From: "Petr Brant" <brant(zv)dcomm(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>; <delphin(zv)pandora(tec)cz>
Sent: Tuesday, November 26, 2002 9:58 AM
Subject: Jak zjistit IP adresu pocitace, kdyz znam port


Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu. Stanice
se k nemu pripojuji, ma to vsak jeden hacek: neznaji dopredu jeho IP adresu.
Neni sice problem to u vsech nastavit "natvrdo", ale pripada mi to malo
elegantni. Resil jsem to tak, ze server po startu zapise IP adresu do
souboru a stanice si jej prectou, ale to fungovalo jen do te doby, nez se u
jednoho zakaznika nainstaloval server na pocitac se dvema sitovymi kartami a
on zapsal do souboru podle zakona schvalnosti zrovna tu nevhodnou. Nemate
nekdo tip, jak "projit" sit a zjistit IP adresu pocitace, na kterem muj
server bezi?

Zdravim a diky predem

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234

soucet CHAR poli na FB

[*] Pavol Kakacka <kakacka(zv)proca(tec)cz> - 26.10.2002 11:54:20

From: "bleak" <bleak(zv)mvesely.com>
> zkusil jsem zmenit VAR na VARCHAR, ale ty mezery navic tam jsou porad.
> bleak

Ako zmenil? Cim zmenil? Po zmenach napriklad IBExpertom je treba urobit (nie
vzdy ale vacsinou) backup/restore ak robis zmeny priamym zapiso do
systemovych tabuliek!
Pravdepodobne ale ani to nepomoze a budes musiet urobit jedoduchy update
(field=field), pretoze data uz boli zapisane do stlpca vcetne medzier.

Kakacka Pavol
KasiX(zv)atlas(tec)cz

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 26.10.2002 11:55:28

DNS tam pravdepodobne bezi, ale nelze zarucit jeho korektni konfiguraci. A
navic klient nezna jmeno toho pocitace, ledaze by se zadalo rucne, coz je
prave to, co nechci. Jde mi o to automaticke rozpoznani.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234


Subject: RE: Jak zjistit IP adresu pocitace, kdyz znam port

A bezi tam napr. DNS ? pak by prece stacilo se pripojovat, ne podle
IP adresy ale podle nazvu PC ?

Subject: Jak zjistit IP adresu pocitace, kdyz znam port


Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu.
Stanice se k nemu pripojuji, ma to vsak jeden hacek: neznaji dopredu jeho IP
adresu. Neni sice problem to u vsech nastavit "natvrdo", ale pripada mi to
malo elegantni. Resil jsem to tak, ze server po startu zapise IP adresu do
souboru a stanice si jej prectou, ale to fungovalo jen do te doby, nez se u
jednoho zakaznika nainstaloval server na pocitac se dvema sitovymi kartami a
on zapsal do souboru podle zakona schvalnosti zrovna tu nevhodnou. Nemate
nekdo tip, jak "projit" sit a zjistit IP adresu pocitace, na kterem muj
server bezi?

Barva u buttonu

[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 26.10.2002 12:12:03

Ales Kerner, <mailto:kerner(zv)metalcom(tec)cz>:
AK> Tak tohle mi nefunguje

>> AK> Nevite nekdo jak zmenit barvu u buttonu?
>> Button.Brush.Color := clRed;

Omlouvam se, nikdy jsem nemenil barvu tlacitka, jen jsem vedel, ze je
tam Brush. Vhodnou komponentu s vlastnim vykreslovanim najdes
nejrychleji na Internetu.

------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
W2K/SP2, D5Ent/UP1

Pouziti IBRestoreService

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 26.10.2002 12:16:56

> A jak? Mam na mysli prejmenovani bez toho, abych mel pristup k
> souboru gdb, tj. s pomoci komponent IBX.......

no, mozna by bylo snadnejsi udelat obnoveni databaze, do jineho
souboru a potom proste pripojit TIBDatabase k tomuto novemu
souboru. muzes si ho ulozit treba do INI a priste se pripojit primo
na nej. takhle bys vystacil s rekneme dvema GDB pouzivanyma
stradeve. pokud by bylo potreba, aby se o prechodu na novou GDB
dozvedeli dalsi klienti, tak bych stvoril jednu pomocnou databazi,
kde by se toto nastavovalo dalo by se tam i ulozit, ze se bude
restorovat a klienti by se odpojily od te stare, aby se neco nezprasilo
a pripojily se az k te nove.

peca

FreeReport + D7

[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 26.10.2002 12:16:40

Ahoj,
sleduji se zajmem Vasi diskuzi ohledne FreeReportu. Chtel bych se zeptat zda
existuje FreeReport pro D7 nebo zda jste si ho n�kdo neupravil pro D7.

Petr Kejval

MySQL vs. Transakcie

[*] David Janko <djanko(zv)wizards(tec)cz> - 26.10.2002 12:19:51

> > typem ISAM. Byli zavedeny v rade 3.23.X, ktera je nyni stabilni.
> > Ale v dokumentaci je o tom spousta info ...
>
> Co je to InnoDB a co je to MyISAM ??? ja som sa pytal na MySQL ma to nieco
> spolocne s tym co si pisal ? Ak ano prosim o vysvetlenie
>
> Dakujem
>
> Robo

Pri CREATE TABLE lze specifikovat jakeho typu ta tabulka bude, pr.
CREATE TABLE Contract (
...
) TYPE=MyISAM;

zpusob ulozeni dat na je pak jiny a jen nad nekterymi typy ty transakce pak
jdou ...
Pokud budes stahovat zdrojaky nebo verzi pro win tak tahej verzi MAX (aspon
tusim ze se tak jmenuje, ja pouzivam Linuxi deb balicky) - v te "mensi"
verzi ta podpora neni ... V debianich balickach se to nerozlisuje, tam je
primo kompletni verze ...
Ale pokud se neco nezmenilo, tak je to vse docela slusne popsano v doc....


---
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
+420 604 164 999

MySQL vs. Transakcie

[*] Marek Eichler <marek.eichler(zv)seznam(tec)cz> - 26.10.2002 12:20:12

Zdravim,

----- P�vodn� zpr�va -----
Od: "Robert Suska" <delphi(zv)korak.sk>
Komu: <delphi-l(zv)clexpert(tec)cz>
Odesl�no: 26. listopadu 2002 10:08
P�edm�t: Re: MySQL vs. Transakcie


> Co je to InnoDB a co je to MyISAM ??? ja som sa pytal na MySQL ma to nieco
> spolocne s tym co si pisal ? Ak ano prosim o vysvetlenie

MySQL podporuje nekolik typu tabulek. Mezi tyto typy patri InnoDB, MyISAM a
ISAM. MySQL je docela zvlastni databaze a pro praci s ni je asi nejlepsi
projit si dokumentaci, aby jsi nebyl prekvapen tim co vsechno nezvladne,
napr.: nepodporuje triggery, ulozene procedury, vnorene selecty. Tyto
nevyhody se snazi vyvazit predevsim rychlosti (alespon podle tvurcu a snad i
podle jeji obliby v internetovych aplikacich)

S pozdravem Marek Eichler

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.10.2002 12:22:49


>A bezi tam napr. DNS ? pak by prece stacilo se pripojovat, ne podle
IP adresy ale podle nazvu PC ?

tazateli jde zrejme o to, ze v kazde firemni siti muze mit dany server
jine IPcko - cili muze mit i jine lokalni jmeno.>Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu.
Stanice se k nemu pripojuji, ma to >vsak jeden hacek: neznaji dopredu
jeho IP adresu. Neni sice problem to u vsech nastavit "natvrdo", ale
>pripada mi to malo elegantni. Resil jsem to tak, ze server po startu
zapise IP adresu do souboru a stanice >si jej prectou, ale to
fungovalo jen do te doby, nez se u jednoho zakaznika nainstaloval
server na pocitac >se dvema sitovymi kartami a on zapsal do souboru
podle zakona schvalnosti zrovna tu nevhodnou. >Nemate nekdo tip, jak
"projit" sit a zjistit IP adresu pocitace, na kterem muj server bezi?

optimalni varianta je podle mne (pokud se spoleha pouze na TCP/IP
protokol):
1) broadcast dotaz od klienta - proste broadcastne UDP dotaz na
nejakem portu (muze byt stejny jako ten TCP port na kterym server
posloucha). Server musi poslouchat i na tom UDP portu - posle odpoved
a klient uz vi kde server je (IP odesilatele UDP datagramu je ta
prava)

2) server cas od casu posila sam UDP broadcasty a klienti si je
chytaji. Problem je, ze se musi pockat az ten broadcast prijde
(budou-li se posilat moc casto zbytecne se zvysuje traffic)

oproblem u obou metod je ten, ze broadcasty se nebudou sirit do
segmentu oddelenych routery (tam nezbyde nic jineho nez klienty
konfigurovat natvrdo)


Zdravi
D. Toman

soucet CHAR poli na FB

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 26.10.2002 12:24:31

> zkusil jsem zmenit VAR na VARCHAR, ale ty mezery navic tam jsou porad.
> bleak

predpokladam, ze to bylo CHAR na VARCHAR,
ale to ti ty mezery skutecne neodmaze.
musel by si potom udelat update tabulky do
sebe a nejakym vhodnym zpusobem
ty mezery odrezat nejakou UDF funkci.

proste bud to premeles jednou pro vzdy, nebo
budes vzdy pouzivat funcki pro orezani. ja
osobne bychto prevexloval jednou provzdy.

peca

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 26.10.2002 12:25:00

Odpoved na tvunj dotaz: Pro vsechny stanice je spolecny sdileny adresar s
daty. Tam zapise server svou IP adresu do textoveho souboru a kazda stanice
vi, jak se tento soubor jmenuje. Takze si ho precte a hotovo. Nemas nahodou
nejaky funkcni priklad na to WNetEnumResource? Nikdy jsem s tim nedelal, tak
at mevymyslim jiz vymyslene. Diky a zdravim

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234

Subject: Re: Jak zjistit IP adresu pocitace, kdyz znam port

Ahoj,
pokud to chces pouzit v lokalni siti, tak bud muzes pouzit
WNetEnumResource
pro zjisteni vsech stroju na siti a pak vsem osahat port, jestli je
tam
tvoje sluzba, nebo muzes pouzit sitovy broadcasting z klienta s tim,
ze to
server zachyti a posle zpet odpoved (nikdy jsem to nedelal, ale melo
by to
fungovat, pouziva to standardne SQL server a myslim si, ze i ten
WNetEnumResource dela neco podobneho...) btw. jakym zpusobem zapisuje server tu svoji adresu? Jak vi bud
server na
jake pocitace ji ma zapsat, nebo jak vi klienti na jaky share se
maji
podivat? To musis mis stejne natvrdo, ne? Ahoj vespolek, v mem programu bezi TCP/IP server na urcitem portu.
Stanice
se k nemu pripojuji, ma to vsak jeden hacek: neznaji dopredu jeho IP
adresu.
Neni sice problem to u vsech nastavit "natvrdo", ale pripada mi to
malo
elegantni. Resil jsem to tak, ze server po startu zapise IP adresu
do
souboru a stanice si jej prectou, ale to fungovalo jen do te doby,
nez se u
jednoho zakaznika nainstaloval server na pocitac se dvema sitovymi
kartami a
on zapsal do souboru podle zakona schvalnosti zrovna tu nevhodnou.
Nemate
nekdo tip, jak "projit" sit a zjistit IP adresu pocitace, na kterem
muj
server bezi?

Win32 Error. Code: 87. Bad Parameter

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 26.10.2002 12:59:22

Ahoj,

nevite, prosim, co je tohle za chybu? Program bezel na Win95SE IE5.5

Diky

Jaro B.

MessageDlg a dalsi dialogy predavaji sve udalosti

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 26.10.2002 13:00:33

Ahoj,

skus do obsluhy klavesy v hlavnom formulari napisat podmienku:

if Sender <> self then
Exit;

Vlkovic


> M�m formul��, kter� reaguje na stisknut� enteru a spousty dal��ch
> kl�ves. V�dycky se zavola n�jak� p��slu�n� funkce. A kdy� v jedn� z
> techto fc� zavol�m MessageDlg nebo Application.MessageBox a zav�u
> dialog kl�vesou, p�ejde mi tato kl�vesa do ud�losti formul��e..

Barva u buttonu

[*] Ing. Jan Dvorak <dvorak(zv)szu(tec)cz> - 26.10.2002 13:06:40

TKColBtn je vyborne, nema vsak volitelnou barvu textu.
Neporadil by mi nekdo free komponentu s touto vlastnosti a
take s vlastnosti 'text alignment'?
Dekuji predem Ing. Jan Dvorak

> > Nevite nekdo jak zmenit barvu u buttonu?
>
> Zkus treba http://www.kopr(tec)cz/delphi/k-delphi.htm
>
> Vaclav Sazima
>

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Robert Suska <delphi(zv)korak.sk> - 26.10.2002 13:08:18

AHoj

A co keby server vysielal nieco po broadcaste na nejakom portre trebars tu
konfiguraciu a v tom programe by si mal tento port nastaveny pevne. Neslo by
to tak ? Ak sa mylim tak sorry.

Robo


>DNS tam pravdepodobne bezi, ale nelze zarucit jeho korektni konfiguraci. A
>navic klient nezna jmeno toho pocitace, ledaze by se zadalo rucne, coz je
>prave to, co nechci. Jde mi o to automaticke rozpoznani.

>RNDr. Petr Brant [brant(zv)dcomm(tec)cz]

Re[2]: MessageDlg a dalsi dialogy predavaji sve ud

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 26.10.2002 13:09:43

Sender je vzdycky ten co ma prirazenu udalost, cili takhle to nepujde.
Zrejme to obsluhujes na OnKeyUp, takze si treba v OnKeyDown zapamatuj
posledni stisknutou klavesu a jinou (ta ktera byl stistena dolu v
jinem formulari) v OnKeyUp ignoruj.

Jakub Dusek

--------------------------------
Homepage : http://dusek.webz(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Sms GateKeeper
--------------------------------

Tuesday, November 26, 2002, 1:00:33 PM, you wrote:

PV> Ahoj,

PV> skus do obsluhy klavesy v hlavnom formulari napisat podmienku:

PV> if Sender <> self then
PV> Exit;

PV> Vlkovic


>> M�m formul��, kter� reaguje na stisknut� enteru a spousty dal��ch
>> kl�ves. V�dycky se zavola n�jak� p��slu�n� funkce. A kdy� v jedn� z
>> techto fc� zavol�m MessageDlg nebo Application.MessageBox a zav�u
>> dialog kl�vesou, p�ejde mi tato kl�vesa do ud�losti formul��e..

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 26.10.2002 13:22:04

> navic klient nezna jmeno toho pocitace, ledaze by se zadalo
> rucne, coz je prave to, co nechci. Jde mi o to automaticke rozpoznani.

pak muzes IMHO (ja do siti moc nedelam ;) poslat
UDP paket, coz jestli se nepletu, tak je jakesi
vsesmerove obeslani site a serverem si poslat IP
na odeselitale UDP paketu a potom uz by to snad slo...

peca

Pouziti IBRestoreService

[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.10.2002 13:29:17

A neni jednodussi tu starou databazi smazat. Pak nehrozi, ze ji nekdo
omylem pouzije. Prikaz drop database se da provest bez pristupu k
tomu serveru normalne z klienta

> > A jak? Mam na mysli prejmenovani bez toho, abych mel pristup k
> > souboru gdb, tj. s pomoci komponent IBX.......
>
> no, mozna by bylo snadnejsi udelat obnoveni databaze, do jineho
> souboru a potom proste pripojit TIBDatabase k tomuto novemu
> souboru. muzes si ho ulozit treba do INI a priste se pripojit primo na
> nej. takhle bys vystacil s rekneme dvema GDB pouzivanyma stradeve.
> pokud by bylo potreba, aby se o prechodu na novou GDB dozvedeli dalsi
> klienti, tak bych stvoril jednu pomocnou databazi, kde by se toto
> nastavovalo dalo by se tam i ulozit, ze se bude restorovat a klienti
> by se odpojily od te stare, aby se neco nezprasilo a pripojily se az k
> te nove.
>
> peca
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

JCLSimpleSendMAIL

[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.10.2002 14:15:31

Ahoj nevite nekdo o problemu s touto funkci. Mam ji v jednom
programu funguje uz dost dlouho. Nyni to pustili poprve pod XP a
pada to na System Error Code 1114
Proces inicializace dynamicky Pripojovane knihovny (DLL) se
nezdaril


S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

JCLSimpleSendMAIL

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

From: "Radek KALA" <Kala(zv)BetaControl(tec)cz>
> Ahoj nevite nekdo o problemu s touto funkci. Mam ji v jednom
> programu funguje uz dost dlouho. Nyni to pustili poprve pod XP a
> pada to na System Error Code 1114
> Proces inicializace dynamicky Pripojovane knihovny (DLL) se
> nezdaril

Bez blizsiho popisu se s tim da tezko neco delat. Tedy kde presne k te chybe
dojde, o jakou DLL se jedna atd.

Petr Vones

Win32 Error. Code: 87. Bad Parameter

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 14:23:19

From: "Bene� Jaroslav" <JBenes(zv)cpoj(tec)cz>
> nevite, prosim, co je tohle za chybu? Program bezel na Win95SE IE5.5

Predevsim je dobre vedet kde presne ta chyba vznika.

Petr Vones

MyProgram.exe.Manifest

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 14:32:55

From: "Roland Turcan" <rolo(zv)sedas.sk>
> Cim sa tvoria subory pre XP s priponou Manifest, alebo ake su tam
> podmienky?

Podivej se do MSDN, tak je to presne popsane. Samotny manifest ale jeste
neznamena, ze takova aplikace bude korektne fungovat ve Windows XP. Podpora XP
temat je ve VCL az od Delphi 7, castecne funguje i v Delphi 6. Jinym resenim
nez davat samostatny manifest jako soubor je prilinkovat jej jako resource do
aplikace.

V Delphi 7 je sice komponenta TXPManifest, ale ta je naprosto hrozna. Asi
lepsi je pouzit IDE expert, kterym muzes manifest kdykoli odstranit a zmenit v
nem i potrebne udaje. Po instalaci se v Project Options dialogu objevi polozka
XP Manifest: http://www.volweb(tec)cz/pvones/download/XPManifestExpert.png

Ke stazeni zde:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=18347

Petr Vones

Win32 Error. Code: 87. Bad Parameter

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 26.10.2002 14:37:47

Vetsinou mi to tuhle chybu hazi kdyz je malo prostredku, coz sedi i na
pouzity system :)

Jakub Dusek

--------------------------------
Homepage : http://dusek.webz(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Sms GateKeeper
--------------------------------

Tuesday, November 26, 2002, 12:59:22 PM, you wrote:

BJ> Ahoj,

BJ> nevite, prosim, co je tohle za chybu? Program bezel na Win95SE IE5.5

BJ> Diky

BJ> Jaro B.

JCLSimpleSendMAIL

[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.10.2002 14:42:12

Nazev DLL tam neni.
Posila se mail s prilohou. Mam zapnuty dialog. abych potom ten
soubor mohl smazat
Objevi se mail klient, odejde mail,
pak se vratim do programu, tam ceka ten dialog, jakmile ho odklepnu
tak to spadne s touto chybou.
Zadna blizsi specifikace.> From: "Radek KALA" <Kala(zv)BetaControl(tec)cz>
> > Ahoj nevite nekdo o problemu s touto funkci. Mam ji v jednom
> > programu funguje uz dost dlouho. Nyni to pustili poprve pod XP a
> > pada to na System Error Code 1114 Proces inicializace dynamicky
> > Pripojovane knihovny (DLL) se nezdaril
>
> Bez blizsiho popisu se s tim da tezko neco delat. Tedy kde presne k te
> chybe dojde, o jakou DLL se jedna atd.
>
> Petr Vones
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

JCLSimpleSendMAIL

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 14:49:08

From: "Radek KALA" <Kala(zv)BetaControl(tec)cz>
> Nazev DLL tam neni.
> Posila se mail s prilohou. Mam zapnuty dialog. abych potom ten
> soubor mohl smazat
> Objevi se mail klient, odejde mail,
> pak se vratim do programu, tam ceka ten dialog, jakmile ho odklepnu
> tak to spadne s touto chybou.
> Zadna blizsi specifikace.

To je ten problem ;-) Jinak receno, kde presne k te chybe dojde, ukazat by to
mel debugger. Nejak nerozumim tomu 'mam zapnuty dialog', jaky dialog ?

Petr Vones

Pouziti IBRestoreService

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 26.10.2002 14:51:31

> A neni jednodussi tu starou databazi smazat. Pak nehrozi, ze ji nekdo
> omylem pouzije. Prikaz drop database se da provest bez pristupu k tomu
> serveru normalne z klienta

Metoda "obnovit do jine databaze" a tu pak pouzivat misto puvodni by asi byla
funkcni, ale presto bych ji povazoval az za nouzove reseni. Volani drop je pak uz jen
perlicka na dortu. Jak se zda, nic jineho mi asi nezbyde. Cimz dekuji puvodnimu
navrhovateli (tusim peca) za zajimavy napad.

David Lebeda

JCLSimpleSendMAIL

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 26.10.2002 15:04:16

> Nazev DLL tam neni.
> Posila se mail s prilohou. Mam zapnuty dialog. abych potom ten
> soubor mohl smazat
> Objevi se mail klient, odejde mail,
> pak se vratim do programu, tam ceka ten dialog, jakmile ho odklepnu
> tak to spadne s touto chybou.
> Zadna blizsi specifikace.

:-)) A z toho soudis, ze je chyba v JCLSimpleSendMail?
No a zadna DLL se nepouziva? Nebo BPL? Hadam, ze je to prelozene s balicky,
jsou tam spravne verze?

Roman
==============================
http://kouzelne.misto(tec)cz

Barva u buttonu

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 26.10.2002 15:10:07

Ing. Jan Dvorak wrote:
> TKColBtn je vyborne, nema vsak volitelnou barvu textu.

Ale ma, musis na to pres TKColBtn.Font.Color

> take s vlastnosti 'text alignment'?

Tak to fakt asi nema.

Vaclav Sazima
>>Zkus treba http://www.kopr(tec)cz/delphi/k-delphi.htm

JCLSimpleSendMAIL

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

From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> :-)) A z toho soudis, ze je chyba v JCLSimpleSendMail?
> No a zadna DLL se nepouziva? Nebo BPL? Hadam, ze je to prelozene s balicky,
> jsou tam spravne verze?

Dulezita je jeste verze JCL, aktualni je 1.22:
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195

Petr Vones

Win32 Error. Code: 87. Bad Parameter

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 26.10.2002 15:15:03

Vznika cituji
"pri psani do editu, text se zmeni v paznaky"
Nepodarilo se mi to vyvolat, je to jen na jednom stroji.
Jaro B.

-----Original Message-----
From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]

Predevsim je dobre vedet kde presne ta chyba vznika.

Petr Vones

Win32 Error. Code: 87. Bad Parameter

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 15:18:27

From: "Bene� Jaroslav" <JBenes(zv)cpoj(tec)cz>
> "pri psani do editu, text se zmeni v paznaky"
> Nepodarilo se mi to vyvolat, je to jen na jednom stroji.

To neni zrovna presne radek ve zdrojaku. Navic pokud se ta chyba objevuje
opakovane nebo ji lze dokonce nejakym postupem operaci vyvolat tak je napul
vyhrano. Co treba zkusit Remote Debugger nebo zkompilovat aplikaci s nejakym
exception stack trackerem a dozvedet se vic ?

Petr Vones

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.10.2002 15:19:57

>pak muzes IMHO (ja do siti moc nedelam ;) poslat
>UDP paket, coz jestli se nepletu, tak je jakesi
>vsesmerove obeslani site

UDP samo o sobe neznamene vsesmerove vysilani. Ale je mozne UDP packet
takto vyslat

>a serverem si poslat IP
>na odeselitale UDP paketu a potom uz by to snad slo...

to neni mozne, protoze v pripade serveru s vice sitovkama (nebo vice
IPcky na sitovce) aplikace nemuze vedet jaka IP adresa je z klientske
stanice dosazitelna (samozrejme lze to odhadnout ale je to zbytecnej
kod vyuzivajici funkce, ktere nejsou na vsech verzich windowsu
dostupne). Reseni je aby klient sam pouzil to IPcko ktere bude
odesilatelem UDP packetu ze serveru. A server by mel na dotazy klientu
naslouchat na vsech IP (jista bezpecnost - aby nereagoval na packety
napriklad z internetu - je ale ovsem zadouci a mela by byt
implementovana)


Zdravi
D. Toman

MAPI - zjisteni odchozi adresy (Jeste jednou)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 15:21:10

From: "Danik Frantik" <frantik(zv)telpro(tec)cz>
> Jak zjistim emailovou adresu, ktera bude v emailu odeslanem pres MAPI
> (TJCLEmail) jako adresa OD:

Nijak, ty pouze vytvaris zpravu a tu pak prostrednictvim klienta odesles.

Petr Vones

Vyuzivani Delphi 6

[*] Petr Kuklik <Petr.Kuklik(zv)seznam(tec)cz> - 26.10.2002 15:28:49

Dobry den,
obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
vas vyzkouseli prejit na D6, mohli byste mi napsat, zda vam vyhovuji
a nebo toho litujete?

Diky

Petr
Kuklik

______________________________________________________________________
Reklama:
DUMPINGOV� CENY ve v�ech obchodech Internet Mall!
http://www.mall(tec)cz - ov��te si to!

Jak zjistit IP adresu pocitace, kdyz znam port

[*] Petr Langer <langer(zv)xdom(tec)cz> - 26.10.2002 15:29:42

No, tazke musis mit natvrdo dany nazev sdileneho adresare, tj. stejne, jako
bys mel nekde natvrdo nazev stroje, nebo IP... takze o nicem...
Nicmene, priklad sice nemam, ale magicky dotaz na googlu na
"WNetEnumResource Delphi" mi prozradil hned nekolik kouzelnych adres ;-),
napr.
http://www.infojet(tec)cz/program/delphi/tips/tip0012.html
nebo
http://www.elists.org/pipermail/delphi/2001-March/009012.html
a nekolik dalsich...

Hledat chlapci, hledat, jinak se vsichni budeme zbytecne zdrzovat, kdyz to
muzeme najit snadno a rychle...

HTH
pl

----- Original Message -----
From: "Petr Brant" <brant(zv)dcomm(tec)cz>


Odpoved na tvunj dotaz: Pro vsechny stanice je spolecny sdileny adresar s
daty. Tam zapise server svou IP adresu do textoveho souboru a kazda stanice
vi, jak se tento soubor jmenuje. Takze si ho precte a hotovo. Nemas nahodou
nejaky funkcni priklad na to WNetEnumResource? Nikdy jsem s tim nedelal, tak
at mevymyslim jiz vymyslene. Diky a zdravim

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]

Vyuzivani Delphi 6

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.10.2002 15:44:07

From: "Petr Kuklik" <Petr.Kuklik(zv)seznam(tec)cz>
> obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
> drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z

Delphi 6 je ponekud starsi verze, Delphi 7 se prodava uz nejaky ten mesic.

Petr Vones

Vyuzivani Delphi 6

[*] Jan �imeck� - 26.10.2002 15:49:31

Prejdi radsi na Delphi 7, je i lepe graficky spracovan - podle meho
nazoru.

Jinak k tomu ti neporadim, jelikoz mam doma akorat DELPHI 2, DELPHI 4,
DELPHI 6, DELPHI 7.

HONZA [www.simecky.tk]

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Petr Kuklik
Sent: Tuesday, November 26, 2002 3:29 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Vyuzivani Delphi 6

Dobry den,
obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
vas vyzkouseli prejit na D6, mohli byste mi napsat, zda vam vyhovuji
a nebo toho litujete?

Diky

Petr
Kuklik

______________________________________________________________________
Reklama:
DUMPINGOV� CENY ve v�ech obchodech Internet Mall!
http://www.mall(tec)cz - ov��te si to!

Vyuzivani Delphi 6

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 26.10.2002 16:02:18

> P�edm�t: Re: Vyuzivani Delphi 6
> > obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
> > drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
> Delphi 6 je ponekud starsi verze, Delphi 7 se prodava uz
> nejaky ten mesic.

Ahoj,
taky by mne tohle srovnani zajimalo - jde o to, ze D7 je navic podstatne
drazsi, nez D6 (aspon podle toho, co mi nabizeji z Borland CZ). Prechod na
jinou verzi Delphi pro mne vzdycky znamena dodatecne naklady (krome
porizovaci ceny samozrejme), a pokud prinosy nove verze nevyvazi naklady,
tak proc upgradovat ? Cili nejake zhodnoceni plusu a minusu upgrade (v mem
pripade z D5) by bylo velmi cenne...

Zdravim

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

JCLSimpleSendMAIL

[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.10.2002 16:05:09

Neni to s balicky

> > Nazev DLL tam neni.
> > Posila se mail s prilohou. Mam zapnuty dialog. abych potom ten
> > soubor mohl smazat
> > Objevi se mail klient, odejde mail,
> > pak se vratim do programu, tam ceka ten dialog, jakmile ho odklepnu
> > tak to spadne s touto chybou. Zadna blizsi specifikace.
>
> :-)) A z toho soudis, ze je chyba v JCLSimpleSendMail?
> No a zadna DLL se nepouziva? Nebo BPL? Hadam, ze je to prelozene s
> balicky, jsou tam spravne verze?
>
> Roman
> ==============================
> http://kouzelne.misto(tec)cz
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

Vyuzivani Delphi 6

[*] Jan �imeck� - 26.10.2002 16:06:27

Ja st�le pro nektere aplikace vzuzivam Delphi4, jelikoz jsem si na nej
zvykl. Nez si poridis nejakou placenou verzi, tak si najdi nejakou FREE
pro nekomercni vyuziti. Ja jsem personal verze delphi 6 a 7 nasel v
caso�)pisu Computer.

HONZA

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Jiri Foldyna
Sent: Tuesday, November 26, 2002 4:02 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Vyuzivani Delphi 6

> P�edm�t: Re: Vyuzivani Delphi 6
> > obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
> > drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
> Delphi 6 je ponekud starsi verze, Delphi 7 se prodava uz
> nejaky ten mesic.

Ahoj,
taky by mne tohle srovnani zajimalo - jde o to, ze D7 je navic podstatne
drazsi, nez D6 (aspon podle toho, co mi nabizeji z Borland CZ). Prechod
na
jinou verzi Delphi pro mne vzdycky znamena dodatecne naklady (krome
porizovaci ceny samozrejme), a pokud prinosy nove verze nevyvazi
naklady,
tak proc upgradovat ? Cili nejake zhodnoceni plusu a minusu upgrade (v
mem
pripade z D5) by bylo velmi cenne...

Zdravim

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz


JCLSimpleSendMAIL

[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 26.10.2002 16:07:58

Parametr ShowDialog = True;

Zkusim tam zitra dodelat debug a najit to presne. Zatim na to
zapomente.
Psal jsem to konference ocekavaje reakci typu nojo XP oprav si na
radku xxx : ......................

Zatim dekuji za snahu

> > Nazev DLL tam neni.
> > Posila se mail s prilohou. Mam zapnuty dialog. abych potom ten
> > soubor mohl smazat
> > Objevi se mail klient, odejde mail,
> > pak se vratim do programu, tam ceka ten dialog, jakmile ho odklepnu
> > tak to spadne s touto chybou. Zadna blizsi specifikace.
>
> To je ten problem ;-) Jinak receno, kde presne k te chybe dojde,
> ukazat by to mel debugger. Nejak nerozumim tomu 'mam zapnuty dialog',
> jaky dialog ?
>
> Petr Vones
> S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15

JCLSimpleSendMAIL

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

From: "Radek KALA" <Kala(zv)BetaControl(tec)cz>
> Psal jsem to konference ocekavaje reakci typu nojo XP oprav si na
> radku xxx : ......................

Kdyby bylo vse tak jednoduche ;-) Co predavas jako AParentWnd do te funkce ?

Petr Vones

MAPI - zjisteni odchozi adresy (Jeste jednou)

[*] Danik Frantik <frantik(zv)telpro(tec)cz> - 26.10.2002 17:04:21

Principu rozumim.
Jen jsem chtel nechat uzivateli zmenit adresu, na kterou mu budu odpovidat,
ale prednabidnout mu tu kterou tam potom dosadi postovni klient.
Takze podle teto reakce soudim, ze toto obecne zjistit nejde, ze?
(Reseni je samozrejme Prazna -> adresa se vezme z emailu, ale neni to moc
elegantni)

Diky,
Danik

-----Original Message-----
Behalf Of Petr Vones
> Jak zjistim emailovou adresu, ktera bude v emailu odeslanem pres MAPI
> (TJCLEmail) jako adresa OD:

Nijak, ty pouze vytvaris zpravu a tu pak prostrednictvim klienta odesles.
Petr Vones

MyProgram.exe.Manifest

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2002 19:06:16

26.11.2002 Petr Vones:
> Podivej se do MSDN, tak je to presne popsane. Samotny manifest ale jeste
> neznamena, ze takova aplikace bude korektne fungovat ve Windows XP. Podpora XP
> temat je ve VCL az od Delphi 7, castecne funguje i v Delphi 6. Jinym resenim
> nez davat samostatny manifest jako soubor je prilinkovat jej jako resource do
> aplikace.

Bez problemu funguje i v Delphi5, pokud se vyhnu ListView, ktere ale dela
problemy i v Delphi6

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

Vyuzivani Delphi 6

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2002 19:08:46

26.11.2002 Petr Vones:
> From: "Petr Kuklik" <Petr.Kuklik(zv)seznam(tec)cz>
>> obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
>> drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z

> Delphi 6 je ponekud starsi verze, Delphi 7 se prodava uz nejaky ten mesic.

Ja bych ti zase naopak poradil jeste nejaky ten mesic pockat, az se D7
"doladi" (viz RaveReport a cestina apod.). Upgrade na D6 asi vyznam nema.

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

Odeslani mejlu bez niceho ^

[*] David Kraina <DKx(zv)Seznam(tec)cz> - 26.10.2002 19:47:34

Dobry den,
jde nejak odeslat e-mail z aplikace v Delphi bez jakehokoliv SMTP ? A pokud
ne, jak na to ?

Re[2]: MyProgram.exe.Manifest

[*] Roland Turcan <rolo(zv)sedas.sk> - 26.10.2002 20:13:05

<<< 26. 11. 2002 20:09 - ing. Jan Fiala "jan.fiala(zv)iol(tec)cz" >>>

>> Samotny manifest ale jeste neznamena, ze takova aplikace bude korektne fungovat ve Windows XP.

Toto mi nie je jasne, co je v XP, ze by to mohlo sposobovat nekorektne
fungovanie?

>> nez davat samostatny manifest jako soubor je prilinkovat jej jako resource do
>> aplikace.

Ano takto som to spravil, ale nezvlada to TJvImgBtn a este
TSpeedButton. S tym sa da nieco spravit?


--
Best regards, TRoland

Db aplikace na ruznych serverech

[*] Lada 'Ray' Lostak <ray(zv)unreal64(tec)net> - 26.10.2002 20:26:11

Zdravim...

Mel bych maly dotaz. Mam Delphi aplikaci, ktera musi bezet na ruznych
SQL serverech. Je to mala vec - resim to tak, ze jako source pouzivam ODBC.
Ale jednu vec nemohu nikde v helpu najit. Mam 2 tabulky, provazane prez ID.
'Id' je autoincrement (serial, counter, ...).. Jde mi o to, aby zaroven s
vlozenim noveho zaznamu pres insert do teto tabulky, jsem se dostal k
vygenerovanemu ID zaznamu - v ramci jedne session/transakce. Mam to vyresene
se vsemi DB, ale s Microsoft Accessem (MDB) ne a ne... Konkretne mi jde o:

parent - tabulka obsahujici auto increment - 'Id'
slave - tabulka odkazujici se na parent.id

INSERT INTO parent(....) values (....)
INSERT INTO slave(id_parent,...) values(auto_increment_z_parentu)

Jedna z implementaci muze byt

INSERT INTO parent(...) values(...)
SELECT currval('parent_column_sequence_name')
INSERT INTO slave...

(vetsina objektovych db, ala postres)

Kde 'parent_column_sequence_name' je sequence, at jiz automaticka z CREATE
TABLE nebo z CREATE SEQUENCE. To je jedno...

Nevite prosim nekdo, jak na to v accessu ? Moznosti ala pridat timestamp
(tohle dokonce doporuciji na jedne help strance, jak nechutne :), pripadne
SELECT na zaklade vlozenych hodnot jsou k nicemu - prilis nespolehlive.

At hledam jak hledam, nemohu prijit na to, jak to provest....
Diky
Best regards,
Lada 'Ray' Lostak
Unreal64 Develop group
http://www.unreal64.net

--------------------------------------------------------------------------
In the 1960s you needed the power of two C64s to get a rocket
to the moon. Now you need a machine which is a vast number
of times more powerful just to run the most popular GUI.

Odeslani mejlu bez niceho ^

[*] Lada 'Ray' Lostak <ray(zv)unreal64(tec)net> - 26.10.2002 21:06:04

> jde nejak odeslat e-mail z aplikace v Delphi bez jakehokoliv SMTP ? A
pokud
>ne, jak na to ?
Jde, jednoduse... "Postup":

1. sestaveni majlu (hlavicka, mime, ...) - RFC 822
2. rozeznani DNS, pripadne zpracovani priority mail zaznamu
3. kontaktovani prislusneho serveru (napr. WinSocks - viz help, nebo telnet
na port 25, netcat, ...)
4. pomoci protokolu predani majlu (SMTP)

V pripade SMTP protokolu se jedna jen (detajly viz prislusne RFC -
1651/1869)

HELO
MAIL FROM: from(zv)pivo(tec)cz
RCPT TO: havel(zv)peklo(tec)cz (pripadne opakovani pro vice prijemcu)
DATA
samotny text majlu, ukonceny teckou + cr/lf (nesmi se vyskytovat v DATA,
obycejne se narhazuje .CRLF nahrazuje za .<mezera>CRLF)
QUIT

Ac to vypada slozite, je to jednoduche, specialne pokud jde jen o 'obycejny'
emajl. Podotykam jen, ze SMTP 'from/to' nema nic spolecneho s from/to v tele
zpravy. pro BCC je adresa to odlisna v SMTP hlavicce a tele majlu.

Snad to pomuze :o)
Best regards,
Lada 'Ray' Lostak
Unreal64 Develop group
http://www.unreal64.net

--------------------------------------------------------------------------
In the 1960s you needed the power of two C64s to get a rocket
to the moon. Now you need a machine which is a vast number
of times more powerful just to run the most popular GUI.

MyProgram.exe.Manifest

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 26.10.2002 21:11:37

26.11.2002 Roland Turcan:
>>> nez davat samostatny manifest jako soubor je prilinkovat jej jako resource do
>>> aplikace.

> Ano takto som to spravil, ale nezvlada to TJvImgBtn a este
> TSpeedButton. S tym sa da nieco spravit?

Pomoci manifestu ne. Resenim je vyhnout se podobnym hybridum a
pouzivat standardni ovladaci prvky. Nezkousel jsem to s ThemeManagerem
(myslim samostatnou komponentu od tusim Lishkeho). Mozna by ti mohl
pomoct.


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

Re[2]: MyProgram.exe.Manifest

[*] Martin Falta <martin(zv)aprog(tec)cz> - 26.10.2002 22:24:03

>> Ano takto som to spravil, ale nezvlada to TJvImgBtn a este
>> TSpeedButton. S tym sa da nieco spravit?

iJF> Pomoci manifestu ne. Resenim je vyhnout se podobnym hybridum a
iJF> pouzivat standardni ovladaci prvky. Nezkousel jsem to s ThemeManagerem
iJF> (myslim samostatnou komponentu od tusim Lishkeho). Mozna by ti mohl
iJF> pomoct.

S ThemeManagerem mi to funguje bez problemu - D6.

--
Best regards,
Martin mailto:martin(zv)aprog(tec)cz

Datovy modul

[*] bugi <bugala_a(zv)centrum.sk> - 26.10.2002 23:24:18

Ahojte,

moze mi prosim niekto vysvetlit, co je datovy modul, na ktory sa daju
umiestnovat
len nevizualne komponenty, na co sa pouziva, a ako ho pridat na form ?!

Dakujem,
A

Popupmenu v komponente

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.10.2002 00:22:09

Ahoj,
v komponente odvozene od TDBGrid vytvarim v constructoru vlastni PopupMenu,
kt. zobrazuji po kliknuti pravym tlac. mysi. Polozky menu vytvarim za behu
programu.
Potreboval bych, abych mohl uz v dobe navrhu (tj. pomoci Obj. Insp., kliknu
na "tri tecky" a muzu editovat obsah menu) vytvorit nejake polozky toho
Popupmenu.
Zkousel jsem: published PopupMenuitems:TMenuItem..., ale tudy cesta asi
nevede.
Muzete nekdo poradit jak na to?

Dik,
Roman
- - - - - - - - - - - - - - - - - - - - -
http://kouzelne.misto(tec)cz/

MyProgram.exe.Manifest

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2002 02:44:51

From: "Roland Turcan" <rolo(zv)sedas.sk>
> Toto mi nie je jasne, co je v XP, ze by to mohlo sposobovat nekorektne
> fungovanie?

Ne v XP ale ve VCL (krome Delphi 7) ktera proste nesplnuje vsechny pozadavky
na spravny beh s XP tematy. Nebudou napriklad spravne zobrazeny komponenty
ktere pouzivaji vlastni vykreslovani, protoze nevedi jak se vykreslit.

> Ano takto som to spravil, ale nezvlada to TJvImgBtn a este
> TSpeedButton. S tym sa da nieco spravit?

Pouzivat veci k tomu ucelu zhotovene. Implementace pro TSpeedButton by mela
byt pro D6 v http://www.delphi-gems.com/ThemeManager.php

Petr Vones

Barva u buttonu

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.10.2002 03:54:25

koukni na http://www.kopr(tec)cz/delphi/index.htm

----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz


>
> Nevite nekdo jak zmenit barvu u buttonu?

Barva u buttonu

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 27.10.2002 04:03:01

ColorTextOnFocus zmeni barvu zamereneho tlacitka
Zmena barvy textu je prece v Font.Color
'text alignment' se nastavuje pomoci Alignment - vlevo, na stred, doprava

Co jeste potrebujes ???

----- Pavel ZIDEK -----
http://www.kopr(tec)cz/delphi, delphi(zv)kopr(tec)cz

> TKColBtn je vyborne, nema vsak volitelnou barvu textu.
> Neporadil by mi nekdo free komponentu s touto vlastnosti a
> take s vlastnosti 'text alignment'?
> Dekuji predem Ing. Jan Dvorak
>

Datovy modul

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 27.10.2002 06:48:42

> moze mi prosim niekto vysvetlit, co je datovy modul, na ktory sa daju
> umiestnovat len nevizualne komponenty, na co sa pouziva, a ako ho
> pridat na form ?!

Na form se nepridava. Datamodul je neco jako form, akorat se nezobrazuje a ma
slouzit k uchovavani "spolecnych" veci pro celou aplikaci nebo skupinu formularu
apod. Obvykle treba ImageList s obrazky na tlacitka, pripojeni k databazi a jine veci,
ktere se logicky netykaji nejakeho konkretniho jednoho formulare.

Tyto veci by mohly byt i treba na hlavnim formu, ale takhle jsou pekne oddeleny a
napomaha to tak treba lepsi organizaci programu (z hlediska programatora).

Neznamena to vsak, ze veskere nevizualni komponenty by mely byt na datamodulu.
Napr. komponenty Table, Query a jine, ktere se tykaji jen jednoho konkretniho
formulare, je lepsi umistovat primo na ten formular.

David Lebeda

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] <little_bobes(zv)centrum(tec)cz> - 27.10.2002 07:17:05

Zdravim,

vytvarim program na zasilani neceho nekam na web a pouzil jsem k tomu demo
HTTP, ktere pouziva komponentu NMHTTP.
Skoro to vypadalo jako idealni zacatek, ale narazil jsem na to, ze na
nekterych strankach se metoda Post nejak zasekla a na neco cekala. Pomohl
Abort, kdy ohlasil chybu v ReadLn (?).

Drive se tu nekdo ptal na tuto komponentu a bylo mu doporuceno, aby pouzil
Indy.
Stahl jsem si Indy a zkusil jsem demo HTTPClient.
Vse by bylo v poradku, ale nyni nevim, jak mam komponente idHTTP predat jiz
existujici Cookie.
V NMHTTP to bylo snadne a fungovalo to (property CookieIn), ale v idHTTP
jsem nic takoveho nenasel.

Ma s timto nekdo zkusenosti?

Diky Bob
(D4 c/s)

Datovy modul

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 27.10.2002 07:22:24

ahoj,

> moze mi prosim niekto vysvetlit, co je datovy modul, na ktory sa daju
> umiestnovat len nevizualne komponenty, na co sa pouziva, a ako ho pridat
> na form ?!

sam si otazkami castecne odpovidas :o)
na DM lze umisti pouze nevizualni komponenty. k tomu taky slouzi
a jde o to, aby sis mohl ruzne (puvodne) databazove komponenty
odlozit bokem od hlavniho formulare, respektive i z ostatnich
formularu prave do DM. DM je samostatny nevizualni formular a
nelze jej do jineho formulare vlozit, pouze se na nej muzes odkazat
v klausuli USES a potom pouzivat komponenty na nem umistene.
ja si na nej daval i komponenty pro sinea sestavy, open, save, print
dialogy a jine podobne nevizualni komponenty.

peca

Barva u buttonu

[*] Ing. Jan Dvorak <dvorak(zv)szu(tec)cz> - 27.10.2002 07:55:42

Omlouvam se za chybne sdeleni, barva textu u TKColBtn
skutecne volitelna je, avsak plati bohuzel jen do prvniho
zamereni tlacitka ve verzi 1.33. Jinak celkove zachazeni s
barvami je krajne neduveryhodne, napr. pri prvnim kliknuti
mysi je barva ColorOnFocus vzdy na clLime bez ohledu na to,
co bylo nastaveno v design time. Byl bych rad, kdyby to bylo
v poradku, avsak .... Text alignment naopak ma a fukcni.
Ing. Jan Dvorak

> > TKColBtn je vyborne, nema vsak volitelnou barvu textu.
>
> Ale ma, musis na to pres TKColBtn.Font.Color
>
> > take s vlastnosti 'text alignment'?
>
> Tak to fakt asi nema.
>
> Vaclav Sazima
> >>Zkus treba http://www.kopr(tec)cz/delphi/k-delphi.htm
>
>

Vyuzivani Delphi 6

[*] Marek Dost�l <marek.dostal(zv)mujweb(tec)cz> - 27.10.2002 08:17:41

> taky by mne tohle srovnani zajimalo - jde o to, ze D7 je navic podstatne
> drazsi, nez D6 (aspon podle toho, co mi nabizeji z Borland CZ). Prechod na
> jinou verzi Delphi pro mne vzdycky znamena dodatecne naklady (krome
> porizovaci ceny samozrejme), a pokud prinosy nove verze nevyvazi naklady,
> tak proc upgradovat ? Cili nejake zhodnoceni plusu a minusu upgrade (v mem
> pripade z D5) by bylo velmi cenne...

Neudelam sice komplexni zhodnoceni plus minus upgrade, ale treba ti pouze par informaci:
Z hlediska p��stupu k datab�z�m je od Delphi6 z�sadn� zm�na v tom, �e BDE se d�le nepodporuje a bude ur�eno pouze pro lok�ln� p��stp k dat�m a nahrazuje jej nov� technologie dbExpress. Jinak vy��� verze Delphi v�dy obsahuj� nov� sady komponent v ur�it�ch oblastech (nap�.v D7 je QuickReport nahrazen RaveReportem, jsou za�len�ny komponenty Indy atd.), tak�e z�le�� na tom, zda tyto nov� v�ci pot�ebuje� nebo ne. Zdravim,
Marek Dostal

Pouziti IBRestoreService

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 27.10.2002 08:26:36

> Asi by bylo vhodne vysvetlit, k cemu to potrebuji. Tady jde o neco jineho.
Zalohovani
> se provadi dvakrat denne automaticky mimo rizeni aplikace - o tom rec
neni.
>
> Ale zalohu a obnovu se doporucuje provadet obcas z cvicnych duvodu, aby se
> databaze procistila. Mame databazi s nekolika sty tabulek. Jednou za cas
tam prijdu
> se skriptem a strukturu databaze chci doplnit, popr. opravit chyby. Chci
proto predtim
> databazi zazalohovat, a kdyz se pak neco nepovede (z ruznych duvodu),
obnovenim
> se vratit k puvodnimu stavu.
>
> Bohuzel, pokud je gdb soubor "trochu naboreny", muze vzniknout problem.
Napr.

My to resime tak, ze mame na zalohovani udelany COM server, ktery bud
aktivujeme
z planovace nebo ho muzem vyvolat primo i ze vzdaleneho pocitace. Ten
zazalohuje do nejake
Temp.gbk, pak ho vyzkousime opetovne rozbalit zase do Temp.gdb a pokud to
projde, tak
to na zaver zazipujem a zkopirujem do zalohovaciho adresare.
No a pak si muzeme dovolit, rozbalit to primo do ostre databaze i kdyz to
tak nedelame.
Kdyby obnova neprobehla korektne, zmineny zip soubor se nevytvori a musi se
to resit.
Na proste procisteni dat ti muze stacit i sweep.

S pozdravem
ing. Richard Kejval
IC Software s.r.o
Mobil: +420602477679

soucet CHAR poli na FB

[*] bleak <bleak(zv)mvesely(tec)com> - 27.10.2002 08:46:12

normalne jsem zmenil datovy typ CHAR na VARCHAR pomoci klienta. Potom jsem
provedl

UPDATE table SET pole1=RTRIM(pole2)

a tim je to vyreseno. Diky vsem
bleak

----- Original Message -----
From: "Pavol Kakacka" <kakacka(zv)proca(tec)cz>
> From: "bleak" <bleak(zv)mvesely.com>
> > zkusil jsem zmenit VAR na VARCHAR, ale ty mezery navic tam jsou porad.
> > bleak
>
> Ako zmenil? Cim zmenil? Po zmenach napriklad IBExpertom je treba urobit
(nie
> Pravdepodobne ale ani to nepomoze a budes musiet urobit jedoduchy update
> (field=field), pretoze data uz boli zapisane do stlpca vcetne medzier.

VXD

[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 27.10.2002 08:47:12

Hi all,
Mam CPP zdrojak, kt. potrebujem prepisat do Delphi
Narazil som tam na volanie funkcie z VXD
Ako je mozne taketo volanie urobit v Delphi? (je to obdobne ako DLL?)

....
// 1. Try to load the VxD
VxDHandle = CreateFile ("\\\\.\\IDE21201.VXD", 0, 0, 0, 0,
FILE_FLAG_DELETE_ON_CLOSE, 0);

if (VxDHandle != INVALID_HANDLE_VALUE)
{
// 2. Run VxD function
DeviceIoControl (VxDHandle, m_cVxDFunctionIdesDInfo,
0, 0, pOutBufVxD,
sizeof(pt_IdeDInfo), &lpBytesReturned, 0);

// 3. Unload VxD
CloseHandle (VxDHandle);
}
else
MessageBox (NULL, "ERROR: Could not open IDE21201.VXD file",

TITLE, MB_ICONSTOP);
....

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

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] Ji�� Mat�jka�����^�F�צ����̿ - 27.10.2002 09:10:07

V IdHTTP je property CookieManager a v ni dale CookieCollection. Tim by se k
tomu melo dat dostat... Mam Indy 9.0.3, jestli to je v 8ckach stejne to
nevim... Aby komponenta IdHTTP cookie prijimala musi byt navic nastavena
property AllowCookies na true (ale je to tak myslim defaultne).

Jirka Matejka

----- Original Message -----
From: <little_bobes(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, November 27, 2002 7:17 AM
Subject: Misto NMHTTP pouziju idHTTP - ale co s Cookie?> Zdravim,
>
> vytvarim program na zasilani neceho nekam na web a pouzil jsem k tomu demo
> HTTP, ktere pouziva komponentu NMHTTP.
> Skoro to vypadalo jako idealni zacatek, ale narazil jsem na to, ze na
> nekterych strankach se metoda Post nejak zasekla a na neco cekala. Pomohl
> Abort, kdy ohlasil chybu v ReadLn (?).
>
> Drive se tu nekdo ptal na tuto komponentu a bylo mu doporuceno, aby pouzil
> Indy.
> Stahl jsem si Indy a zkusil jsem demo HTTPClient.
> Vse by bylo v poradku, ale nyni nevim, jak mam komponente idHTTP predat
jiz
> existujici Cookie.
> V NMHTTP to bylo snadne a fungovalo to (property CookieIn), ale v idHTTP
> jsem nic takoveho nenasel.
>
> Ma s timto nekdo zkusenosti?
>
> Diky Bob
> (D4 c/s)
>
>
>
>


---
Odchoz� zpr�va neobsahuje viry.
No viruses found in the outgoing message.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.422 / Virov� b�ze: 237 - datum vyd�n�: 20.11.2002

VXD

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 27.10.2002 09:13:49



> Hi all,
> Mam CPP zdrojak, kt. potrebujem prepisat do Delphi
> Narazil som tam na volanie funkcie z VXD

> Ako je mozne taketo volanie urobit v Delphi? (je to obdobne ako
DLL?)

?? je to uplne stejne jako v CCku. Pouze se zmeni syntaxe a v pripade,
ze narazis na nejakou nedefinovanou konstantu tak si ji musis sporavne
nadefinovat sam.

> ....
> // 1. Try to load the VxD
> VxDHandle = CreateFile ("\\\\.\\IDE21201.VXD", 0, 0, 0, 0,
> FILE_FLAG_DELETE_ON_CLOSE, 0);
..
..

D. Toman

MIDAS

[*] CERMAK <CERMAK(zv)procom(tec)cz> - 27.10.2002 09:26:10

Ahoj vsichni

Nevite nekdo zda se daji v D7 profesional vyvijet klienti vicevrstve
aplikace vyuzivajici MIDAS? Server by se vyvijel pod Enterprise verzi.


Jaromir Cermak

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] <little_bobes(zv)centrum(tec)cz> - 27.10.2002 09:31:10

Vyzkousel jsem toto:
HTTP.CookieManager.AddCookie('LoginCookie=xyz', cbURL.Text);
ale hazi AccesViolation.
Nemusi se jeste neco vytvorit?

Bob


> V IdHTTP je property CookieManager a v ni dale CookieCollection. Tim by se
k
> tomu melo dat dostat... Mam Indy 9.0.3, jestli to je v 8ckach stejne to
> nevim... Aby komponenta IdHTTP cookie prijimala musi byt navic nastavena
> property AllowCookies na true (ale je to tak myslim defaultne).
>

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 27.10.2002 09:38:30

prihreji si polivcicku...

Kdybys misto Indy pouzil synapsi (konkretne verzi z posledniho
Synasnapu), tak tam jsou cookies v normalnim prachprostem
stringlistu... takze staci nakrmit ten stringlist radky typu:
"LoginCookie=xyz", a je to. ;-)

> Vyzkousel jsem toto:
> HTTP.CookieManager.AddCookie('LoginCookie=xyz', cbURL.Text);
> ale hazi AccesViolation.
> Nemusi se jeste neco vytvorit?


-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

Odeslani mejlu bez niceho ^

[*] Petr Langer <langer(zv)xdom(tec)cz> - 27.10.2002 09:41:07

Zrejme myslis bez SMTP Serveru ?
Stahni si Indy components z www.nevrona.com/indy a podivej se na priklad
SMTPRelay.
Je to ukazka toho, co chces...

HTH
pl

----- Original Message -----
From: "David Kraina" <DKx(zv)Seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, November 26, 2002 7:47 PM
Subject: Odeslani mejlu bez niceho ^> Dobry den,
> jde nejak odeslat e-mail z aplikace v Delphi bez jakehokoliv SMTP ? A
pokud
> ne, jak na to ?
>
>

OT: rozdelit disk bez reinstalace ???

[*] <delphik(zv)email(tec)cz> - 27.10.2002 09:49:05

Nazdar lidi. Na disku mam W2000 / NTFS a ted doslo k tomu, ze bych potreboval bez reinstalace rozdelit disk na nekolik logickych disku. Na jeden takto vznikly logicky disk potrebuji dat Linux. Mate nekdo nejake vedomosti zda je to mozne nejakym zpusobem provest, aniz bych musel preinstalovavat stavajici W2000 + vse co mam na disku. Diky za rady. Delphik

rozdelit disk bez reinstalace ???

[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 27.10.2002 09:50:56

skus PQ Patition Magic s tym to ide v pohode

joka

-----Original Message-----
From: delphik(zv)email(tec)cz [mailto:delphik(zv)email(tec)cz]
Sent: Wednesday, November 27, 2002 9:49 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: OT: rozdelit disk bez reinstalace ???


Nazdar lidi. Na disku mam W2000 / NTFS a ted doslo k tomu, ze bych
potreboval bez reinstalace rozdelit disk na nekolik logickych disku. Na
jeden takto vznikly logicky disk potrebuji dat Linux. Mate nekdo nejake
vedomosti zda je to mozne nejakym zpusobem provest, aniz bych musel
preinstalovavat stavajici W2000 + vse co mam na disku. Diky za rady.
Delphik
__________ Informacia od NOD32 1.332 (20021125) __________

Tato sprava bola preverena systemom NOD32 pre Exchange.
http://www.eset.sk


TRegIniFile do TMemIniFile

[*] Pavel Malinsky <spiderland(zv)iol(tec)cz> - 27.10.2002 09:52:21

Ahoj,

poradte, prosim, zda je mozne ulozit cely
klic s podklici a hodnotami v registru vytvoreny
pomoci TRegIniFile ulozit do TMemIniFile fyzicky
na disk aniz by bylo nutne prochazet vsechny
vetve a hodnoty prepisovat po jedne.

S tim souvisi otazka jak programove
exportovat a importovat vetev(+podrizene) z registru
do souboru a zpatky.

Env: W2k, D5Pro

S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
=====================================
GSM: 602 652 203

Vyuzivani Delphi 6

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 27.10.2002 09:58:45

> obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
> drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z

Ono je vsak treba pri prechodu na jinou verzi Delphi nezapomenout na jednu
vec: Pokud se budou vytvaret v nove verzi nove aplikace, nemel by to byt
problem. Pokud je ale treba preklopit do nove verze nejakou vetsi aplikaci,
kterou je treba dal udrzovat, nastanou problemy. A to zejmena, pokud se
pouzivaji komponenety tretich stran - v nove verzi se treba chovaji uplne
jinak nez ve stare. Uzili jsme si sve pri prechodu z D2 na D4 (resp. D5).

Jaroslav Nadhera

CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel.: 224 312 344-5
fax: 235 522 892
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
pobocka Ostrava:
Nedbalova 14, 701 00 Ostrava
tel: 596 635 687

Help - slouceni dvou BMP

[*] Petr SZNAPKA, Gradiva a.s. <sznapka(zv)gradiva(tec)cz> - 27.10.2002 10:06:17

Potreboval bych najit reseni pro slouceni dvou BMP o velikostech nap�.
1800x1200 pixel�. V sekcenci se provadi slouceni cca 100 BMP.

Vstupni podminky :

1/ soubor je na lezato
2/ obrazky sloucit do jedne BMP oddelenymi cca 25 pixely
3/ obrazky maj� uz stejnou vysku, ale mohou mit rozdilnou vysku
3/ jedna se o 24-bitove BMP


Zkousel jsem rezim p�es canvas.strechdraw ale je to pomerne pomale.
Reseni prostrednictvim scanline mi nevyhovuje,proto�e musim druhou
bitmapu umistovat s urcitym posunem a to scanline nejde nebo jsem
nenasel.

Petr

Pad Delphi pri definici vicerozmeroveho konstantni

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 27.10.2002 10:07:10

Ahoj,

zkousel jsem toto:

type
pole=array[1..2,1..5]of variant;
const
status:pole=
(1,true,'Ahoj','Uvitani',''),
(2,false,'Hezky den','Rozlouceni','');

Pak mi spadnou cely Delphi. Nevite nekdo, kde delam chybu?
P.S.:Obsah konstatniho pole berte s rezervou ... hodnoty pouzivam jine, ale nejsou stejneho typu a
proto bych potreboval udrzet typ variant

Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator

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

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] Ji�� Mat�jka�����^�F�צ����̿ - 27.10.2002 10:11:37

Mozna zkus jeste metodu AddCookie2 (zrejme dava cookie podle jineho
RFCcka)... prip. jeste metody Add, Add2, AddCookie v
HTTP.CookieManager.CookieCollection.

JM

----- Original Message -----
From: <little_bobes(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, November 27, 2002 9:31 AM
Subject: Re: Misto NMHTTP pouziju idHTTP - ale co s Cookie?> Vyzkousel jsem toto:
> HTTP.CookieManager.AddCookie('LoginCookie=xyz', cbURL.Text);
> ale hazi AccesViolation.
> Nemusi se jeste neco vytvorit?
>
> Bob
>
>
> > V IdHTTP je property CookieManager a v ni dale CookieCollection. Tim by
se
> k
> > tomu melo dat dostat... Mam Indy 9.0.3, jestli to je v 8ckach stejne to
> > nevim... Aby komponenta IdHTTP cookie prijimala musi byt navic nastavena
> > property AllowCookies na true (ale je to tak myslim defaultne).
> >
>
>
>
>


---
Odchoz� zpr�va neobsahuje viry.
No viruses found in the outgoing message.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.422 / Virov� b�ze: 237 - datum vyd�n�: 20.11.2002

Firebird zaokrouhleni dinamickeho sloupce

[*] Petr Varga <djvar(zv)post(tec)cz> - 27.10.2002 10:15:49

Ahoj
M�m tento sql dotaz

Select BPL_NAME AS "JM�NO", BPL_PLU AS "PLU",
BPL_VAT AS "DPH",BPL_PRICE AS "CENA BEZ DPH",BPL_ENABLED AS
"AKTIVN�", BPL_CODE AS "&Egrave;�ROV� K�D"
,(BPL_PRICE*(1+BPL_VAT*0.01)) AS "CELKOVA CENA" from BPLU order by
BPL_ID

No a pot�eboval bych zaokrouhlit onen vypocten� sloupec Celkov� cena
na dv� nebo jedno desetinn� m�sto. Fce round v FireBirdu nejak nen�
a Decimal m� to n�jak nevzalo. Jestli n�kdo v� tak pros�m napi�te.
Docela to sp�ch�. D�ky moc p�edem
Varga Petr


--
---
V�e praktick� pro �eny na str�nk�ch http://zena.volny(tec)cz

Misto NMHTTP pouziju idHTTP - ale co s Cookie?

[*] <little_bobes(zv)centrum(tec)cz> - 27.10.2002 10:38:54

Nejdriv jsem stahnul tu starsi Synapsi a at jsem koukal, jak jsem koukal,
nikde jsem Cookie nenasel.
A tak me napadlo to napsat rovnou pred zasilany text a fungovalo to.

Pak jsem si teprve vsimnul, ze jsi psal, abych stahnul synasnap a tam jsem
to nasel.
Diky

Bob

> Kdybys misto Indy pouzil synapsi (konkretne verzi z posledniho
> Synasnapu), tak tam jsou cookies v normalnim prachprostem
> stringlistu... takze staci nakrmit ten stringlist radky typu:
> "LoginCookie=xyz", a je to. ;-)
>

Jak prehrat MP3 na ruzne audiovystupy

[*] Ing. Vladim�r R��i�ka - 27.10.2002 10:43:45

Ahoj vsichni,

v nekterys scvych projektech pouzivam komponentu XAudio, ktera umi prehravat
MP3, dokonce ma u sebe i priklady jak prehrat nekolik MP3 soucasne a ruznou
rychlosti. Vse ale smicha do jednoho vystupniho audiosignalu, ktery pak
posle ven jednou zvukovkou ... Potrebuju neco podobneho, jen ze chci
prehravat nekolik MP3 soucasne, zrychlovat, zpomalovat je a audio signal
kazde MP3 poslat treba na jinou zvukovku ... Nevite nekdo neco ?

Diky.

Vladimir, D98

Vyuzivani Delphi 6

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 27.10.2002 10:54:39

Petr Kuklik dne 26 Nov 2002 v 15:28:

> Dobry den,
> obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
> drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
> vas vyzkouseli prejit na D6, mohli byste mi napsat, zda vam vyhovuji a
> nebo toho litujete?

Ahoj,

jeden velky projekt delam v D5 (koupene na firmu), druhy v D6 (koupene na sebe). Uvazoval jsem o
prechodu firemnich D5 na D6, ale nenarazil jsem na zadnou vyhodu, ktera by vyvazila riziko, ze se
"nekde neco" pokope a nebude fungovat tak jako driv; dukladnym testovanim projektu prelozeneho v
D6 bych stravil spoustu casu a stejne zustava moznost, ze bych neco prehlednul.

Nejvetsi nocni murou pro me v tomto pripade je QuickReport, protoze u slozitejsich sestav mi obcas
pripada, ze funguji spis silou vule nez tim, ze by QR byl spravne naprogramovany (zdrojaky jsem si
k nemu nekupoval a tak jsem odkazan na jejich hodne ridke opravy).

Pokud Ti v D5 nechybi neco zivotne duleziteho, na D6 bych neprechazel.

Karel Rys

Pad Delphi pri definici vicerozmeroveho konstantni

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 27.10.2002 10:57:07

> zkousel jsem toto:
>
> type
> pole=array[1..2,1..5]of variant;
> const
> status:pole=
> (1,true,'Ahoj','Uvitani',''),
> (2,false,'Hezky den','Rozlouceni','');
>
> Pak mi spadnou cely Delphi. Nevite nekdo, kde delam chybu?
> P.S.:Obsah konstatniho pole berte s rezervou ... hodnoty pouzivam
> jine, ale nejsou stejneho typu a proto bych potreboval udrzet typ
> variant

Ahoj,

a nebylo by lepsi mit jednorozmerne pole recordu? Record je
vhodnejsi k uchovavani dat ruznych typu.

David Lebeda

Programove otevreni PDF souboru

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

Zdravim,

pouzivam tenhle kousek kodu:

procedure TMainForm.aPriruckaPDFExecute(Sender: TObject);
var Prirucka:string;
begin
Prirucka:=ExtractFilePath(ParamStr(0))+'spw.pdf';
ShellExecute(Self.Handle,'',pchar(Prirucka),nil,nil,SW_SHOWNORMAL);
end;

Na nekterych pocitacich se PDF soubor otevre, na nekterych ne (jen se spusti Acrobat Reader a zase
se zavre). Zrovna tak kdyz spustim aplikaci z debuggeru, PDF se neotevre, pritom na stejnem PC
pustena samostatna aplikace soubor otevre.

Nenapada vas, v cem delam chybu? Zkousel jsem i misto '' davat 'open', vysledek uplne stejny.

Diky,

Karel

Komunikace mezi aplikacemi na ruznych strojich.

[*] pilifs pilifs <pilifs(zv)seznam(tec)cz> - 27.10.2002 11:51:49

Zdravim,
resime ted problem jak komunikovat po siti formou urcitych textovych
zprav zasilanych primo do aplikace. Zatim vim o techto variantach:

1. klasicka komunikace TCP/IP pomoci komponent FastNet...
2. pomoci MailSlotu - asi ne protoze tam maji existovat nejake
problemy pri komunikaci mezi domenou.
3. neco jsem zaslechl o moznosti vyuziti tzv. kuryrni sluzby od MS
(Instant Messenger??), ale totalne nevim o co se jedna.
4. ??? neco jineho ???

Vyhodou by bylo, kdyby tam existovala nejaka moznost zasilani zprav z
MSSQL2000.

Muzete se nekdo podelit o sve zkusenosti s timto problemem?

Diky L. Filip

D5Ent, W2000,
MSSQL2000

______________________________________________________________________
Reklama:
Kam do kina ci divadla? http://kultura.seznam(tec)cz

Programove otevreni PDF souboru

[*] Obermaier Petr Ing. <Obermaier(zv)mail.sdas(tec)cz> - 27.10.2002 11:59:55

> Od: Karel Rys [SMTP:delphi(zv)zas-me(tec)cz]
> Prirucka:=ExtractFilePath(ParamStr(0))+'spw.pdf';
> Na nekterych pocitacich se PDF soubor otevre, na nekterych ne (jen se spusti Acrobat Reader a zase
> se zavre). Zrovna tak kdyz spustim aplikaci z debuggeru, PDF se neotevre, pritom na stejnem PC
> pustena samostatna aplikace soubor otevre.
>
Zkus kontrolovat, jestli ExtractFilePath(ParamStr(0)) obsahuje obracene lomitko na konci. Nemusi tam byt v zavislosti na verzi Windows.

Ober

Programove otevreni PDF souboru

[*] David Michal <david.michal(zv)www-bv(tec)com> - 27.10.2002 12:10:37

A co zkusit otevrit acrord32.exe a predat mu pdf file jako parametr?
ShellExecute(Self.Handle,'',pchar('AcroRd32.exe'),
pchar(Prirucka),nil,SW_SHOWNORMAL);
David


pouzivam tenhle kousek kodu:

procedure TMainForm.aPriruckaPDFExecute(Sender: TObject);
var Prirucka:string;
begin
Prirucka:=ExtractFilePath(ParamStr(0))+'spw.pdf';
ShellExecute(Self.Handle,'',pchar(Prirucka),nil,nil,SW_SHOWNORMAL);
end;

Na nekterych pocitacich se PDF soubor otevre, na nekterych ne (jen se spusti
Acrobat Reader a zase
se zavre). Zrovna tak kdyz spustim aplikaci z debuggeru, PDF se neotevre,
pritom na stejnem PC
pustena samostatna aplikace soubor otevre.

Nenapada vas, v cem delam chybu? Zkousel jsem i misto '' davat 'open',
vysledek uplne stejny.

Diky,

Karel

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.423 / Virus Database: 238 - Release Date: 25/11/2002

Delphi Encryption Compendium pro Delphi 7

[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 27.10.2002 12:25:38

Zdravim

nevite nahodou kde se da stahnout "Delphi Encryption Compendium" pro
Delphi 7 ? Pri instalci techto komponent mi to hlasi ze nemuze nalezt
DsgnIntf.

Nevite kde by mohl byt problem ? na Delphi 5 mi to fungovalo skvele..


Dik Milan

Firebird zaokrouhleni dinamickeho sloupce

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 27.10.2002 12:26:49

> ,(BPL_PRICE*(1+BPL_VAT*0.01)) AS "CELKOVA CENA" from BPLU order by
> BPL_ID
>
> No a pot�eboval bych zaokrouhlit onen vypocten� sloupec Celkov� cena
> na dv� nebo jedno desetinn� m�sto. Fce round v FireBirdu nejak nen�
> a Decimal m� to n�jak nevzalo. Jestli n�kdo v� tak pros�m napi�te.
> Docela to sp�ch�. D�ky moc p�edem
> Varga Petr
>

Ahoj,
dlouho jsem neveril tomu, ze by chybela f-ce na zaokrouhlovani a tak jsem
studoval dokumentaci a zjistil, ze opravdu neni. Konkretni reseni nemam,
ale jako navod bych pouzil priklad z knihy 1001tipu&triku, kde je uvedeno,
jak si vytvorit vlastni UDF knihovnu a do ni si vytvorit jakoukoliv
vlastni f-ci a tu pak zaregistrovat do databaze.
Hodne zdaru a jestli muzu prosit, dej mi vedet treba jen soukrome, jak jsi
dopadl. Docela me to zajima, protoze jsem to sam jeste nezkousel. Diky.

Jirka

Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky
programator

______________________________________________________________________
Reklama:
FIMFARUM - Cesky celovecerni loutkovy film na motivy pohadek Jana Wericha. www.fimfarum(tec)cz V kinech od 28. listopadu. http://www.fimfarum(tec)cz

Komunikace mezi aplikacemi na ruznych strojich.

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 27.10.2002 12:33:42

Komunikuji pres TCP/IP (komponenty Indy, ale Synapse je lepsi - co dostanu,
Lukasi?) a jde to zcela bez problemu. FastNet nedoporucuji, pokud k tomu
nemas zdrojaky.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234


Subject: Komunikace mezi aplikacemi na ruznych strojich.


resime ted problem jak komunikovat po siti formou urcitych textovych zprav
zasilanych primo do aplikace. Zatim vim o techto variantach:

1. klasicka komunikace TCP/IP pomoci komponent FastNet...
2. pomoci MailSlotu - asi ne protoze tam maji existovat nejake problemy
pri komunikaci mezi domenou.
3. neco jsem zaslechl o moznosti vyuziti tzv. kuryrni sluzby od MS
(Instant Messenger??), ale totalne nevim o co se jedna.
4. ??? neco jineho ???

Vyhodou by bylo, kdyby tam existovala nejaka moznost zasilani zprav z
MSSQL2000.

Muzete se nekdo podelit o sve zkusenosti s timto problemem?

rozdelit disk bez reinstalace ???

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 27.10.2002 12:33:06

> Nazdar lidi. Na disku mam W2000 / NTFS a ted doslo k tomu, ze
> bych potreboval bez reinstalace rozdelit disk na nekolik
> logickych disku. Na jeden takto vznikly logicky disk
> potrebuji dat Linux. Mate nekdo nejake vedomosti zda je to
> mozne nejakym zpusobem provest, aniz bych musel
> preinstalovavat stavajici W2000 + vse co mam na disku. Diky
> za rady. Delphik

Je to sucastou instalacie napr. SuSE Linux, ktora za behu zmensi Windows
partition bez straty dat, vytvori si (podla zadanych parametrov) Linux
partition a potom sa tam nainstaluje. U mna to tak fungovalo bez problemov.
Ci je to aj v inych distribuciach, to neviem.

HTH
TOndrej

Programove otevreni PDF souboru

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 27.10.2002 12:38:26

No to by me zajimalo v jake verzi Windows se tohle deje ...
Jaro B.

-----Original Message-----
From: Obermaier Petr Ing. [mailto:Obermaier(zv)mail.sdas(tec)cz]

Zkus kontrolovat, jestli ExtractFilePath(ParamStr(0)) obsahuje obracene lomitko na konci. Nemusi tam byt v zavislosti na verzi Windows.

Ober

OT: rozdelit disk bez reinstalace ???

[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 27.10.2002 12:41:20

delphik(zv)email(tec)cz, <mailto:delphik(zv)email(tec)cz>:
dec> Nazdar lidi. Na disku mam W2000 / NTFS a ted doslo k tomu, ze bych potreboval
dec> bez reinstalace rozdelit disk na nekolik logickych disku.

Na rozdeleni disku "zaziva" lze pouzit Partition Magic, s uspechem
jsem pouzil na W98 i na W2000 NTFS. Doporucuji ZALOHOVAT !

dec> Na jeden takto vznikly logicky disk potrebuji dat Linux.

Jestli to ihned zmeni system souboru z NTFS na Linux, nevim, ale s
novym logickym diskem muzes delat cokoliv, treba ho nakonec opet
zrusit :-)

------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
W2K/SP2, D5Ent/UP1

Help - slouceni dvou BMP

[*] Delphin <delphin(zv)post(tec)cz> - 27.10.2002 12:44:20

> Zkousel jsem rezim p�es canvas.strechdraw ale je to pomerne pomale.
> Reseni prostrednictvim scanline mi nevyhovuje,proto�e musim druhou
> bitmapu umistovat s urcitym posunem a to scanline nejde nebo jsem
> nenasel.

Se scanline to jde nejak takto.

type
PBytes=^TBytes;
TBytes=array [0..1000] of byte;

move(SourceBMP.ScanLine[y]^,PBytes(DestBMP.ScanLine[y])^[posun],3*sirka);

Komunikace mezi aplikacemi na ruznych strojich.

[*] Delphin <delphin(zv)post(tec)cz> - 27.10.2002 12:48:13

> 1. klasicka komunikace TCP/IP pomoci komponent FastNet...
> 2. pomoci MailSlotu - asi ne protoze tam maji existovat nejake
>problemy pri komunikaci mezi domenou.
> 3. neco jsem zaslechl o moznosti vyuziti tzv. kuryrni sluzby od MS
>(Instant Messenger??), ale totalne nevim o co se jedna.
> 4. ??? neco jineho ???

idealni je 2, kdyz to nebude fungovat, tak zjistit jmena stroju v siti (bylo
to ted nedavno v konferenci) a pak 1.

Firebird zaokrouhleni dinamickeho sloupce

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 27.10.2002 12:57:32

........
> ,(BPL_PRICE*(1+BPL_VAT*0.01)) AS "CELKOVA CENA"
........

, cast((BPL_PRICE*(1+BPL_VAT*0.01)) as Numeric(10,2)) AS "CELKOVA CENA"
ti neveme? a v prilozenych UDF taky neni zadny round?
tak potom si budes muzet ten round napsat do UDF sam :o)

peca

Help - slouceni dvou BMP

[*] Peter Surovy <psurovy(zv)uevora.pt> - 27.10.2002 12:04:51 -0000

Ahoj
----- Original Message -----
From: "Petr SZNAPKA, Gradiva a.s." <sznapka(zv)gradiva(tec)cz>
Sent: Wednesday, November 27, 2002 9:06 AM
> Zkousel jsem rezim p�es canvas.strechdraw ale je to pomerne pomale.
> Reseni prostrednictvim scanline mi nevyhovuje,proto�e musim druhou
> bitmapu umistovat s urcitym posunem a to scanline nejde nebo jsem
> nenasel.
-- mozno som spravne nepochopil co sa pytas
ale nedalo by sa to tak ze vytvoris
novu bitmapu kde;
NovaBitmap.witdh:=Bitmapa1.width + Bitmapa2.width+25;

a potom do Canvasu tej novej cez
CopyRect nakopirujes staru jednu a potom druhu?


PS

Komunikace mezi aplikacemi na ruznych strojich.

[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 27.10.2002 13:15:04

Prikladek na mailsloty by please nebyl?

Dekuji
Tomas Bihary

----- Original Message -----
> > 1. klasicka komunikace TCP/IP pomoci komponent FastNet...
> > 2. pomoci MailSlotu - asi ne protoze tam maji existovat nejake
> >problemy pri komunikaci mezi domenou.
> > 3. neco jsem zaslechl o moznosti vyuziti tzv. kuryrni sluzby od MS
> >(Instant Messenger??), ale totalne nevim o co se jedna.
> > 4. ??? neco jineho ???
>
> idealni je 2, kdyz to nebude fungovat, tak zjistit jmena stroju v siti
(bylo
> to ted nedavno v konferenci) a pak 1.

DelphiX

[*] Branislav Dimo� <listonos(zv)stonline.sk> - 27.10.2002 13:15:51

Myslel som to tak ze DXT3 podporuju nove veci ktore su v DX8, ale
tiez som kdesi cital ze Microsoft v novych verziach pomaly vypusta niektore
stare funkcie ale co konkretne, neviem.> Oni programy se starsimi verzemi DELPHIX nebezi pod novejsimi directy?
> V.

> > Mam DelphiX pre Delphi6 ale nevola sa to DelphiX ale DXT a je to bez
> > zdroj. suborov. Skus hladat DXT3 konkretne DXT3.zip
> >
> > Uz to nerobil ten Japonec ale nejaka firma ale je to to iste a myslim ze
> > to podporuje aj DirectX 8
> >
> > >: V�en� program�to�i,
> > >: Ur�it� jste ji� zde �e�ili probl�m DelphiX pro Delphi v.6. Kde bych
> > >: mohl tuto komponentu stahnout, nebo mi ji pros�m n�kdo po�lete. Moc
> > >: D�k

Re2x: Pad Delphi pri definici vicerozmeroveho kons

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 27.10.2002 13:19:56

>
> Ahoj,
>
> a nebylo by lepsi mit jednorozmerne pole recordu? Record je
> vhodnejsi k uchovavani dat ruznych typu.
>
> David Lebeda

To uz me taky napadlo, ale zajimalo me, proc dochazi k te chybe.
Pouzitim recordu ale dojde k tomu, ze se na hodnoty nedostanu pomoci indexu
a to je skoda. Budu muset predelat system kodu. :(
Nebo vite nekdo jak se odkazat na record pomoci indexu?
napr:
type
RZaznam=record
aktivni : boolean;
text : string;
end;
pole = array [1..2] of RZaznam;
const
Status:pole=
(true,'Ahoj'),
(false,'Nashle');

...

Jak se dostanu na druhy radek - text?
Status[2].Text ... jde to nejak pres index?
napr:
Status[2].[2] - jako aby vratil druhy sloupec???

Diky
Jirka

Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky
programator

______________________________________________________________________
Reklama:
Seznam Prace - Hledate praci nebo menite zamestnani? http://prace.seznam(tec)cz

Programove otevreni PDF souboru

[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 27.10.2002 13:20:10

ahoj,

> Zkus kontrolovat, jestli ExtractFilePath(ParamStr(0))
> obsahuje obracene lomitko na konci.......

nebo pouzij:

Prirucka:=ExtractFileDir + '\blabla.pdf';
// respektive ...+PathDelim+'blabla.pdf'

peca

Jak zjistit TEMP directory Windows

[*] "Netu�il, Roman, Ing." - 27.10.2002 13:22:25

Panove,
nevite nekdo jak z Delphi 6 Proff zjistit nazev TEMP adresare Windows a to
s prihlednutim na jednotlive verze 95,98, 2000, XP...

A kdyz uz jsme u toho i slozku "Dokumenty" aktualniho uzivatele?

Diky

Roman

Vyuzivani Delphi 6

[*] "Netu�il, Roman, Ing." - 27.10.2002 13:24:28

Dobry den,

ja osobne jsem presel z Delphi 3 na Delphi 6 a to naprosto bez problemu.
Jsem opravdu spokojeny. V soucasne dobe se poohlizim po nejakem tom .NET.

-----Original Message-----
From: Jan �imeck� [mailto:jsimecky(zv)zskuldova(tec)cz]
Sent: Tuesday, November 26, 2002 3:50 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Vyuzivani Delphi 6


Prejdi radsi na Delphi 7, je i lepe graficky spracovan - podle meho
nazoru.

Jinak k tomu ti neporadim, jelikoz mam doma akorat DELPHI 2, DELPHI 4,
DELPHI 6, DELPHI 7.

HONZA [www.simecky.tk]

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Petr Kuklik
Sent: Tuesday, November 26, 2002 3:29 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Vyuzivani Delphi 6

Dobry den,
obcas tu probehne nejake tema okolo Delphi 6. Premyslim o tom zda
drzet krok s vyvojem a prejit z Delphi 5 na tuto verzi. Ti, kteri z
vas vyzkouseli prejit na D6, mohli byste mi napsat, zda vam vyhovuji
a nebo toho litujete?

Diky

Petr
Kuklik

______________________________________________________________________
Reklama:
DUMPINGOV� CENY ve v�ech obchodech Internet Mall!
http://www.mall(tec)cz - ov��te si to!

Jak se pripojovat na Oracle

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 27.10.2002 13:38:33

Zdravim,
pripojuju se na Oracle pres BDE native link, s pochopitelnych duvodu
chci prejit na jiny zpusob. Od Delphi 6 jsou jestli jsem to podle
prispevku pochopil 2 nejpouzivanejsi zpusoby pripojeni, ADO nebo DBExpress.
DbExpress ma tu nevyhodu ze abych se pripojil na Oracle standartnim
driverem od Borlandu musim mit aspon verzi Enterprise, coz zatim nemam, ale
to je vedlejsi. Potreboval bych porovnani obou zpusobu co se tyce spolehlivosti,
stability atd... Teoreticky taky podle dostupnosti driveru i pro jine databaze.

A jeden dotaz ohledne ADO a Oraclu: Ole DB driver pro Oracle u sebe nainstalovan mam,
jak jsem zjistil pri testech, ale nevim s cim se nainstaloval, ze by s
Oracle clientem?

Jakub Dusek

--------------------------------
Homepage : http://dusek.webz(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Sms GateKeeper
--------------------------------

Delphi Encryption Compendium pro Delphi 7

[*] Danik Frantik <frantik(zv)telpro(tec)cz> - 27.10.2002 13:38:48

Melo by stacit rozdelit designtimovou a runtime cast.

V praxi to znamena (alespon v D5) Udelat unitu blablaREG.pas a do ni
nahazet vsechny procedury register. A pak taky zaridit, aby se nikde v
runtime kodu nebyl odkaz na unity s propertyediory a ti blablaREG.pas
(Prehazet je do jinych unit)

Danik

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Vymazal Milan
nevite nahodou kde se da stahnout "Delphi Encryption Compendium" pro
Delphi 7 ? Pri instalci techto komponent mi to hlasi ze nemuze nalezt
DsgnIntf.
Nevite kde by mohl byt problem ? na Delphi 5 mi to fungovalo skvele..

Jak prehrat MP3 na ruzne audiovystupy

[*] Lada 'Ray' Lostak <ray(zv)unreal64(tec)net> - 27.10.2002 13:44:49

Zdravim,

>v nekterys scvych projektech pouzivam komponentu XAudio, ktera umi
prehravat
>MP3, dokonce ma u sebe i priklady jak prehrat nekolik MP3 soucasne a ruznou
>rychlosti. Vse ale smicha do jednoho vystupniho audiosignalu, ktery pak
>posle ven jednou zvukovkou ... Potrebuju neco podobneho, jen ze chci
>prehravat nekolik MP3 soucasne, zrychlovat, zpomalovat je a audio signal
>kazde MP3 poslat treba na jinou zvukovku ... Nevite nekdo neco ?
Zkus Enigmu - http://www.unreal64.net/beta/index.html

Best regards,
Lada 'Ray' Lostak
Unreal64 Develop group
http://www.unreal64.net

--------------------------------------------------------------------------
In the 1960s you needed the power of two C64s to get a rocket
to the moon. Now you need a machine which is a vast number
of times more powerful just to run the most popular GUI.

Spusteni ciziho programu v okne a cekani na jeho u

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 27.10.2002 14:24:51


Ahoj,

mam na Vas prosbu. Mam D6 Ent. a Win 2000.
Jde mi o nasledujici vec. Mam menu, kde jsou treba polozky JEDNA, DVE a KONEC.
Rad bych po kliknuti na polozce JEDNA spustil nejaky programek, treba notepad.
Pokud pouziju tohle WinExec(...); funguje to. Ale ja bych to chtel jednak spustit v hlavnim okne peho programku a potom bych chtel, aby se cely program dal zavrit, az kdyz bude zavrene i okno s notepadem.

Diky

V.

Sinea - tisk na vysku

[*] bardon <bardon(zv)akord-soft(tec)cz> - 27.10.2002 14:37:28

Sinea sestavy umoznuje otocit tisk polozky napriklad o 90 stupnu takze
tiskne na vysku. To je skvele, ale nevim jak takovy otoceny text zarovnat
zleva nebo zprava (respektive zhora nebo zdola), vzdy se to tiskne
uprostred. Nevite prosim nekdo jak na to?

Predavanie nazvu DTB medzi Formularmi

[*] bugi <bugala_a(zv)centrum.sk> - 27.10.2002 14:38:09

Ahojte,

na hlavnom formulari mam DBGrid do ktoreho nacitavam /jednu z mnohych/
databazu.
Do Edit-u zadam nazov databazy a po kliknuti na tlacidlo sa spusti tato
obsluha:

procedure TForm1.Button2Click(Sender: TObject);
var
Y: Variant;
begin
Y := Edit1.Text;

Table1.Active := False;
Table1.DatabaseName := 'data';
Table1.TableName := Y;
Table1.Active := True;
end;

V premennej Y mam nazov databazy. Ked otvorim druhy formular pre pridavanie
zaznamov potrebujem nadstavit uz otvorenu databazu pre pridavanie, ale
ked tam dosadim premennu Y, ktora by mala obsahovat nazov databazy,
tak to nefunguje.

Do uses Unit-u2 som vlozil Unit1, ale aj tak to nepomohlo.

Vo Form2 som si dal vypisat premennu Y, ale je prazdna!

Skusil som premennu Y deklarovat mimo obsluhy tlacidla, ale ani to
nepomohlo.

Pri OnCreate Form2 by som potreboval nejak zistit nazov databazy, ktora
je prave otvorena vo Form1 a pomocou nejakej premennej ju odovzdat ako
parameter, ktory by som mohol zadat pre prepnutie databazy do rezimu
pridavania.

Y.Append; ---> toto nefunguje tiez ...

Vyskusal som uz kadeco, ale bezvysledne ... :-(

Kde robim chybu? Ako na to ?

Dik,
A

Bugala Alex - stredoskolak 2 roc.
-----------------------------------------------------
Win2000 Prof Cz - SP2
Delphi 3 Client / Server Suite

Jake komponenty pro Mysql InnoDB s transakcemi?

[*] Michal Jan� <janu(zv)stemmark(tec)cz> - 27.10.2002 14:50:18

Nazdarek vsem,

jen bych se chtel zeptat, jake komponenty pouzit pro databazi MySQL s
podporou InnoDB s vyuzitim transakci?
Mam D6 Prof.
dbExpress Update2 podporuje MySQL 3.23.45 (bohuzel kvuli InnoDB by byla
lepsi verze vyssi).
dbExpress ci Zeos nebo other?

Diky

Michal Janu


OT: CHM soubory

[*] Valenta P <valentapat(zv)volny(tec)cz> - 27.10.2002 14:53:18

Zdravim , cim se delaji CHM soubory ?, nejak nemuzu nic najit.

valik


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

Komunikace mezi aplikacemi na ruznych strojich.

[*] Delphin <delphin(zv)post(tec)cz> - 27.10.2002 14:54:34

> Prikladek na mailsloty by please nebyl?

prikladek na mailsloty nemam, ale komunikace probiha zhruba takto (spojeni
je jen jednosmerne)
1) server zavola createmailslot s parametrem \\.\mailslot\mujmailslot
2) client zavola createfile s parametrem \\*\mailslot\mujmailslot
3) client zapise pomoci writefile zpravu
4) server periodicky zjistuje stav pomoci getmailslotinfo a kdyz prijde
zprava, tak si ji vyzvedne pomoci readfile

Datovy modul

[*] bugi <bugala_a(zv)centrum.sk> - 27.10.2002 14:54:29

Ahojte!

Dakujem za odpovede a vysvetlenie, ale stale mi nie je jasne, ako
ho vytvorim... niekde nieco napisem, vlozim, kus kodu, alebo co ...???

dik,
Alex


Bugala Alex - stredoskolak 2 roc.
-----------------------------------------------------
Win2000 Prof Cz - SP2
Delphi 3 Client / Server Suite


Delphi Encryption Compendium pro Delphi 7

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2002 15:03:54

From: "Danik Frantik" <frantik(zv)telpro(tec)cz>
> Melo by stacit rozdelit designtimovou a runtime cast.

Coz uz melo byt v Delphi 5, ale kdo vlastne pise komponenty tak jak by se to
melo delat (kdyz to bohuzel z duvodu zpetne kompatibility slo delat i spatne),
ze ?

Petr Vones

Jeste k IBRestoreService

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 27.10.2002 15:09:59

Ahoj,

nedavno tu byla diskuse o IBRestoreService a o tom, ze obnova ze
zalohy se nemusi vzdy podarit, zejmena ne tehdy, kdyz by ji clovek
delal do ostre databaze a potreboval by, aby opravdu dobehla. Jako
priklad, proc napr. muze obnova zkolabovat, jsem tu uvadel null
hodnoty v not null sloupci. Jsem ochoten uznat, ze to muze
vzniknout moji chybou.

Ale prave ted se mi prihodil dalsi duvod, na kterem obnova
zkolabovala. Proste uprostred obnovovani mi to najednou nahlasilo
lock manager out of room a je vymalovano. Kdybych obnovoval do
ostre databaze, tak jsem v pytli. Pravda, mohl bych zacit shanet
spravce serveru, aby mi restartoval FireBirda nebo pockat do zitrka,
az se lock manager vzpamatuje, ale tohle je uz jiste nezavinena
situace, ktera brani provedeni obnovy. FB server obhospodaruje
nekolik databazi a zrejme mu ani zvyseni implicitniho mnozstvi
pameti pro lock manager z cca 98000 na 200 000 nestaci. Tak ze
bych mu rovnou pridelil celou RAMku?

David Lebeda

Sinea - tisk na vysku

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 27.10.2002 15:22:19

> From: bardon
>
> Sinea sestavy umoznuje otocit tisk polozky napriklad o 90 stupnu takze
> tiskne na vysku. To je skvele, ale nevim jak takovy otoceny
> text zarovnat
> zleva nebo zprava (respektive zhora nebo zdola), vzdy se to tiskne
> uprostred. Nevite prosim nekdo jak na to?

Sinea umoznuje otacet text o libovolny uhel.
V tom pripade je velmi tezke urcit co je nahore
a co vpravo.

Text, ktery je jakkoliv otoceny lze zarovnavat pouze na stred,
kolem ktereho se otaci.

Vaclav Krmela

Pad Delphi pri definici vicerozmeroveho konstantni

[*] Robert Vr�eck� <robert.vrsecky(zv)softok(tec)cz> - 27.10.2002 15:22:55

Pro� pad�j� delphi je jasn�. Pokud se nap�e
array[1..2,1..5]of variant, tak pole m��e b�t pouze jednoho typu. (nap�
integer). Nen� mo�n� m�t jednu hodnotu ��selnou a druhou hodnotu textovou,
proto�e tomu delphi nem��ou rozum�t... Re�en� je opravdu p�es record viz
p�edchozi� p��sp�vek a nebo p�es dynamick� pole...teda pokud chce� udr�et
prom�nnou typu varriant a m�t v�ce rozm�rn� pole....
Robert

----- Original Message -----
From: "Ing. Jiri SOKOL" <JS-delphi(zv)seznam(tec)cz>
To: "dotaz-delp" <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, November 27, 2002 10:07 AM
Subject: Pad Delphi pri definici vicerozmeroveho konstantniho pole


Ahoj,

zkousel jsem toto:

type
pole=array[1..2,1..5]of variant;
const
status:pole=
(1,true,'Ahoj','Uvitani',''),
(2,false,'Hezky den','Rozlouceni','');

Pak mi spadnou cely Delphi. Nevite nekdo, kde delam chybu?
P.S.:Obsah konstatniho pole berte s rezervou ... hodnoty pouzivam jine, ale
nejsou stejneho typu a
proto bych potreboval udrzet typ variant

Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator

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

Jak zjistit TEMP directory Windows

[*] Ing. Jan Dubsk� <hdplot(zv)seznam(tec)cz> - 27.10.2002 15:24:23



function sysTempPath: string;
var
buffer: array[0..1023] of char;
begin
SetString(Result, Buffer, GetTempPath(Sizeof(Buffer)-1,Buffer));
end;
Dne 27.�listopad�2002, <delphi-l(zv)clexpert(tec)cz> napsal:

> Panove,
> nevite nekdo jak z Delphi 6 Proff zjistit nazev TEMP adresare Windows a to
> s prihlednutim na jednotlive verze 95,98, 2000, XP...
>
> A kdyz uz jsme u toho i slozku "Dokumenty" aktualniho uzivatele?

______________________________________________________________________
Reklama:
Obchodn� d�m(tec)cz - �irok� sortiment dom�c�ch spot�ebi�� a elektroniky, v�razn� slevy. Nav�tivte http://www.obchodni-dum(tec)cz/index.phtml?prov=59

Jak zjistit TEMP directory Windows

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 27.10.2002 15:35:08

function GetDefaultTempDir: string;
var Len : Integer;
Buff : PChar;
begin
Len := MAX_PATH + 1;
GetMem (Buff, Len);
try
if GetTempPath (Len, Buff) <> 0 then
Result := StrPas (Buff)
else
Result := '';
finally
FreeMem (Buff, Len);
end;
end;


Jakub Dusek

--------------------------------
Homepage : http://dusek.webz(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Sms GateKeeper
--------------------------------

Wednesday, November 27, 2002, 1:22:25 PM, you wrote:

NRI> Panove,
NRI> nevite nekdo jak z Delphi 6 Proff zjistit nazev TEMP adresare Windows a to
NRI> s prihlednutim na jednotlive verze 95,98, 2000, XP...

Stav jobu v MS-SQL

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 27.10.2002 16:15:33

Ahoj,

nemate nekdo kousek SQL scriptu pro MS-SQL 7, ktery by vratil stav jobu ?
(running, retrieving...) Zkousel jsem pouzit

DECLARE (zv)job_stav int
CREATE TABLE ##job_test (...)
INSERT INTO ##job_test EXEC sp_help_job
SELECT (zv)job_stav = current_execution_status FROM ##job_test WHERE name =
'my_job'
DROP TABLE ##job_test

ale dostavam chybu "An INSERT EXEC statement cannot be nested" na radku s
INSERT INTO. Lamat systemove procedury se zatim moc nechce, jen kdyby nebylo
zbyti :-))

Diky

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

Delphi Encryption Compendium pro Delphi 7

[*] Peter SKODA <peter(zv)korak.sk> - 27.10.2002 16:33:38

V D7 borlandaci premenovali niektore unity. Skus nahradit DsgnIntf nazvom
DesignInfo, alebo nejak
podobne. Pohladaj v Helpe.

----- Original Message -----
From: "Vymazal Milan" <vymazal.milan(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, November 27, 2002 12:25 PM
Subject: Delphi Encryption Compendium pro Delphi 7


> Zdravim
>
> nevite nahodou kde se da stahnout "Delphi Encryption Compendium" pro
> Delphi 7 ? Pri instalci techto komponent mi to hlasi ze nemuze nalezt
> DsgnIntf.
>
> Nevite kde by mohl byt problem ? na Delphi 5 mi to fungovalo skvele..
>
> Dik Milan

CHM soubory

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 27.10.2002 16:41:38

Na strankach MS je ke stazeni free HTML Help Workshop nebo muzu poslat.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234


Subject: OT: CHM soubory


Zdravim , cim se delaji CHM soubory ?, nejak nemuzu nic najit.

Spusteni ciziho programu v okne a cekani na jeho u

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 27.10.2002 16:43:30

V JCL je na to funkce myslim WinExecAndWait nebo tak nejak podobne.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
D&COMM s.r.o.
Korunova�n� 6
Praha 7
tel. +420724007234

Subject: Spusteni ciziho programu v okne a cekani na jeho ukonceni

Mam D6 Ent. a Win 2000.
Jde mi o nasledujici vec. Mam menu, kde jsou treba polozky JEDNA, DVE a
KONEC. Rad bych po kliknuti na polozce JEDNA spustil nejaky programek, treba
notepad. Pokud pouziju tohle WinExec(...); funguje to. Ale ja bych to chtel
jednak spustit v hlavnim okne peho programku a potom bych chtel, aby se cely
program dal zavrit, az kdyz bude zavrene i okno s notepadem.

OT: CHM soubory

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.10.2002 18:51:00

Stahni si HTML help workshop (zdarma na strankach M$) + nejaky HTML
editor. Zjednodusene jsou to zkompilovane HTML stranky

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

27.11.2002 Valenta P:
> Zdravim , cim se delaji CHM soubory ?, nejak nemuzu nic najit.

Jak zjistit TEMP directory Windows

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2002 19:18:48

From: "Netu�il, Roman, Ing." <Netusil.Roman(zv)vspardubice(tec)cz>
> nevite nekdo jak z Delphi 6 Proff zjistit nazev TEMP adresare Windows a to
> s prihlednutim na jednotlive verze 95,98, 2000, XP...
>
> A kdyz uz jsme u toho i slozku "Dokumenty" aktualniho uzivatele?

Pouzij funkce GetWindowsTempFolder a GetPersonalFolder v unitu JclSysInfo v
JCL:
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195

Petr Vones

OT: CHM soubory

[*] Lada 'Ray' Lostak <ray(zv)unreal64(tec)net> - 27.10.2002 20:36:56

>Stahni si HTML help workshop (zdarma na strankach M$) + nejaky HTML
>editor. Zjednodusene jsou to zkompilovane HTML stranky
'Zkompilovane' ? :))) Je pravda, ze tomu MS rika, .... Ale CHM je obycejny
'doc' soubor (typove), ktery obsahuje soubory dane do projektu, vetsinou
HTML a obrazky. To co se 'kompiluje' (spise bych rekl generuje, protoze jsou
to obyc HTML soubory) je obsah/index/... (hhc/hhk/...). Chm pouziva featuru
komprimace vlozenych souboru.

Jinak pokud uz dokumentaci mas v jine forme, existuje dost 'generatoru'
hhk/hhc/... souboru (at jiz z XML, hlp, docbook ci manu). Je dobre to nepsat
primo v HTML, ale spise pouzit nejakou utilitku a psat to treba v XML, nebo
necem jinem rozumnem. Soubory pro CHM si pak nechat vygenerovat a nasledne
'zkompilovat' CHM. Pokud mas vetsi projekt, je tohle jedina rozumna cesta,
jak psat helpy... Rucne klikat vetsi objemy helpu je dost narocne na cas.

Best regards,
Lada 'Ray' Lostak
Unreal64 Develop group
http://www.unreal64.net

--------------------------------------------------------------------------
In the 1960s you needed the power of two C64s to get a rocket
to the moon. Now you need a machine which is a vast number
of times more powerful just to run the most popular GUI.

OT: CHM soubory

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.10.2002 21:12:34

MjcuMTEuMjAwMiBMYWRhICdSYXknIExvc3RhazoNCj4+U3RhaG5pIHNpIEhUTUwgaGVscCB3b3Jr
c2hvcCAoemRhcm1hIG5hIHN0cmFua2FjaCBNJCkgKyBuZWpha3kgSFRNTA0KPj5lZGl0b3IuIFpq
ZWRub2R1c2VuZSBqc291IHRvIHprb21waWxvdmFuZSBIVE1MIHN0cmFua3kNCj4gJ1prb21waWxv
dmFuZScgPyA6KSkpIEplIHByYXZkYSwgemUgdG9tdSBNUyByaWthLCAuLi4uIEFsZSBDSE0gamUg
b2J5Y2VqbnkNCj4gJ2RvYycgc291Ym9yICh0eXBvdmUpLCBrdGVyeSBvYnNhaHVqZSBzb3Vib3J5
IGRhbmUgZG8gcHJvamVrdHUsIHZldHNpbm91DQo+IEhUTUwgYSBvYnJhemt5LiBUbyBjbyBzZSAn
a29tcGlsdWplJyAoc3Bpc2UgYnljaCByZWtsIGdlbmVydWplLCBwcm90b3plIGpzb3UNCj4gdG8g
b2J5YyBIVE1MIHNvdWJvcnkpIGplIG9ic2FoL2luZGV4Ly4uLiAoaGhjL2hoay8uLi4pLiBDaG0g
cG91eml2YSBmZWF0dXJ1DQo+IGtvbXByaW1hY2UgdmxvemVueWNoIHNvdWJvcnUuDQoNCk8gImtv
bXBpbGFjaSIganNlbSBtbHV2aWwgcHJvdG8sIJ5lIGRvIGplZG5vaG8gc291Ym9ydSBqc291IHph
aHJudXR5DQpqYWsgdmxhc3RuaSBIVE1MLCBvYnJhemt5LCBvYnNhaCwgaW5kZXh5LCAuLi4gYSBu
YXbtYyBqZSB0bw0Ka29tcHJpbW92YW5vLg0KDQotLSANCkphbiBGaWFsYQ0KbWFpbHRvOmphbi5m
aWFsYUBpb2wuY3o=

Sinea a onstepdata v detailu

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 27.10.2002 21:13:08

Zdravim.
Mam dve memory tabulky, master a detail. Jejich obsah pak chci rucne predat
do sestavy pomoci OnGetData, OnStepData. V detailu sestavy se mi vsak tiskne
porad pouze prvni zaznam. Pokud pripojim k TSestDetail primo DataSource, tak
je vse v poradku.

Obsluha OnGet a OnStep vypada takto:
procedure TFormSest.SestDetGetData(Sender: TSestavaD);
with Sender do
begin
for i:=0 to MemDet.Fields.Count-1 do
ObsahyPolozek.Add(MemDet.Fields[i].asString);
end;

function TFormSest.SestDetStepData(Sender: TSestavaD;
Result:=srOK;
case Dir of
sdFirst:begin MemDet.First;Result:=srBof;end;
sdPrior:begin MemDet.Prior; if MemDet.BOF then Result:=srBof;end;
sdNext :begin MemDet.Next; if MemDet.EOF then Result:=srEof;end;
sdLast :begin MemDet.Last;Result:=srEof;end;
end;

V cem je problem?

Dik,
Roman
D4, Sinea x.39z

Pad Delphi pri definici vicerozmeroveho konstantni

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

From: "Ing. Jiri SOKOL" <JS-delphi(zv)seznam(tec)cz>
> To uz me taky napadlo, ale zajimalo me, proc dochazi k te chybe.

[Error] Project1.dpr(9): Incompatible types: 'Array' and 'Integer'

Typ Variant navic nelze inicializovat pomoci typove konstanty, pouze az v dobe
behu kodu.

> Pouzitim recordu ale dojde k tomu, ze se na hodnoty nedostanu pomoci indexu
> a to je skoda. Budu muset predelat system kodu. :(

Co to napsat jako seznam objektu, pak lze udelat pristup dle libosti.

Petr Vones

Pad Delphi pri definici vicerozmeroveho konstantni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2002 22:37:16

From: "Robert Vr�eck�" <robert.vrsecky(zv)softok(tec)cz>
> Pro� pad�j� delphi je jasn�.

Neni, prekladac musi ohlasit chybu a ne spadnout s AV, v Delphi 7 je to uz
opravene.

> Pokud se nap�e array[1..2,1..5]of variant, tak pole m��e b�t pouze jednoho
> typu. (nap� integer). Nen� mo�n� m�t jednu hodnotu ��selnou a druhou hodnotu
> textovou, proto�e tomu delphi nem��ou rozum�t...

To je samozrejme nesmysl, od ceho je typ Variant:

program Project1;

{$APPTYPE CONSOLE}

uses
Variants;

var
AnArray: array [0..2] of Variant;
I: Integer;

begin
AnArray[0] := 42;
AnArray[1] := 'Bla';
AnArray[2] := 3.14;

for I := Low(AnArray) to High(AnArray) do
WriteLn(I, ': ', VarToStr(AnArray[I]));
ReadLn;

end.

Petr Vones

MAPI - zjisteni odchozi adresy (Jeste jednou)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.10.2002 22:44:26

From: "Danik Frantik" <frantik(zv)telpro(tec)cz>
> Jen jsem chtel nechat uzivateli zmenit adresu, na kterou mu budu odpovidat,
> ale prednabidnout mu tu kterou tam potom dosadi postovni klient.

Aha, pokud vim tak tohle neni pres Simple MAPI mozne. Pouzije se vychozi
nastaveni klienta, vcetne pripadne odlisne adresy na kterou bude zaslana
odpoved.

Petr Vones

Vyuzivani Delphi 6

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

From: "Netu�il, Roman, Ing." <Netusil.Roman(zv)vspardubice(tec)cz>
> ja osobne jsem presel z Delphi 3 na Delphi 6 a to naprosto bez problemu.
> Jsem opravdu spokojeny. V soucasne dobe se poohlizim po nejakem tom .NET.

V Delphi 7 mas i .NET compiler preview.

Ohledne upgradu, jako vzdy je tam par chyb opravenych (a par opet vzniklo ;-),
neni treba jiz resit licence na Midas/DataSnap, VCL podporuje XP themes,
editor ma docela pekne HTML code completion ...

Petr Vones

Testovani Terminated

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

From: "Jiri Foldyna" <jiri.f(zv)avizo(tec)cz>
> Ted mne napadlo, ja prece muzu predat misto adresy Terminated odkaz na
> instanci threadu, a testovat to jako properties, ne ? Asi takto:
>
> procedure TImportThread.Execute;
> ...
> while not(Terminated) do
> ProcessData(Self);
> end;
> ...
>
> procedure ProcessData(Thread : TThread);
> ...
> while not(Thread.Terminated) do
> ...
> end;
> ...


A co udelat z procedury ProcessData metodu te tridy TImportThread ?

Petr Vones

Testovani Terminated

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 27.10.2002 23:29:27

To by samozrejme slo, ale jak uz jsem psal, je to soucast service, presneji
receno jeji klicova rutina a potreboval jsem ji odladit - nastartovat
service s debuggerem se mi nejak nepodarilo (viz muj dotaz par tydnu
zpatky), takze jsem ji ladil provizornim volanim (jeden button na jinak
prazdnem formulari :-)). No, uz je to vyresene, i kdyz pravda, Terminated je
protected property, takze jsem si ji musel publikovat v pomocne tride :-)).
Ale funguje to spolehlive.

> > Ted mne napadlo, ja prece muzu predat misto adresy
> Terminated odkaz na
> > instanci threadu, a testovat to jako properties, ne ? Asi takto:
>
> A co udelat z procedury ProcessData metodu te tridy TImportThread ?
>
> Petr Vones


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