Archív konference Delphi

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

Vypis vsech bezicich procesu, SLEEP Windows

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.1.2001 01:58:39

From: <milan_2(zv)sose-sou(tec)cz>
> Petr Vones navrhuje JCL komponenty atd ... jenze jaxem koukal, JCL jsou
> pouze pro D5 ... ale co kdyz delam v D3 ... da se to nejak resit ?

Ahoj,

JCL je D5 a D4. Pro D3 si budes muset kod vytahnout a patricne upravit.

BTW JCL neobsahuje (a ani nebude obsahovat) zadnou komponentu ;-)

Petr Vones, amatersky programator

problem - sitova karta

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.1.2001 02:01:30

From: <volcik(zv)email(tec)cz>
> Pokud aplikaci spustim na stroji se sitovou kartou, tak vse bezi bez
> problemu.
> Predpokladam, ze problem bude asi s TNMSMTP.

Ahoj,

neni to tim, ze jakmile na pocitaci neni instalovana sitova karta (ani modem),
tak tam neni ani WinSock ? Mozna s tim ty komponenty nepocitaji. Bohuzel od
nich neni zdrojak. Zkus pouzit radeji Indy: (http://www.nevrona.com/Indy)

Petr Vones, amatersky programator

ISAPI a TTimer

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

From: "Kov߰�k Ladislav" <Ladislav.Kovarik(zv)brno.aksignal(tec)cz>
> Vytvarim jednoduchy prog. pro Web.
> Do nej potrebuji dat TTimer.
> Comp. TTimer vlozit jde ale nevola se jeji Event OnTimer.
> DLL spoustim pod Intrabob.exe.

Ahoj,

TTimer je zalozen na zpravach. Obavam se, ze ISAPI nezpracovava zadne zpravy,
takze to nemuze fungovat. K cemu vlastne potrebujes TTimer ?

Petr Vones, amatersky programator


Debug in design time

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

From: "Josef Zvonicek" <prosoft(zv)prosoft(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
> Mam ale s tim problem. Kdyz si v parameters nastavim delphi32.exe a dam LOAD
> a pak zmacknu RUN tak se mi zacne spoustet druha instance DELPHI ale napise
> mi to 'EPackageError with message Can't load package VCLMid50.' Tento soubor
> neexistuje. Muzez mi poradit co s tim?

Ahoj,

netusim co s tim. Ono je to cele takovy postup na hranici moznosti. Nemuze to
byt neco specifickeho ve vychozim desktopu ? Pouzivas NT nebo PlayStation ?

Petr Vones, amatersky programator


Instalacia balika

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.1.2001 02:19:22

From: "�u#ka R�bert" <spravca(zv)lumen.sk>
> Ludia kto mi poradi ako skompilovat program ked mam subor baliku
> WavRecpk5.bpl potom mam aj DCU subor ten sa vola wavrec.dcu, ktory je
> skopirovany v adresaroch c:\Prog..\Borland\Delphi5\lib a je aj v adresary
> c:\Prog..\Borland\Delphi5\lib\DEBUG. Samozrejme BPL subor je nainstalovany
> ako balik komponenta je zobrazena v liste komponent ale ked dam vytvorit
> (RUN program) program tak odo mna chce subor PAS. To sa bez neho sakra neda

Ahoj,

vypada to, ze DCU je zkompilovan s ladicimi informacemi, kde pak IDE chce
zdrojak. Zkus prekladat aplikaci s balicky.

Petr Vones, amatersky programator


Programatorska komora (v Cechach)

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 27.1.2001 11:34:24

Prvotne poslano do konferenci o Delphi a MS SQL.
Prosim o shovivavost, dostanete-li tento text vicekrat z ruznych
stran.

Ahoj all, dobry den (pro ty, ktere by "ahoj" urazelo :),

Na seminari Delphi programatoru v Laznich Belohrad, 24. a
25.1.2001 vznikla myslenka zalozeni profesni programatorske
komory. Nejprve to bylo v hluboke noci a opilosti pojato spise jako
recesisticky spolek. Kdyz jsem vsak rano u snidane rozhlasoval
usneseni schuze opilcu, dozvedel jsem se, ze v Polsku vymysleli a
uvedli v zivot zakon o zdanovani freeware (dani darovaci). V tom
okamziku me polil studeny pot, vzapeti jsem vystrizlivel a doslo mi,
ze to zas takova sranda nemusi byt. :-( Tolik k uvedeni do historie.

Protoze i u nas (a potazmo i v EU, kam se cpeme) se objevuji
snahy vselijak omezit cinnost programatoru omezovanim sireni
freeware, obskurnimi ustanovenimi v Autorskem zakone a podobne,
domnivam se (spolu s radou lidi ze seminare), ze je cas neco s tim
udelat.

Dalsim z rady bolavych mist je cinnost ruznych umeleckych a
autorskych (zejmena hudebnich) agentur, ktere se snazi ziskat
prostredky nekalym zavadenim dani na prehravace, nosice atp., v
Nemecku jsou snad dokonce i dane na kazdy prodany HD.
Protoze na CD a HD se nahravaji nelegalne nejen hudebni
zalezitosti, ale mohutne i programy, jsem presvedcen o tom, ze je-
li uz takova dan zavedena, nalezi velka cast jejiho vynosu prave
programatorum a firmam zivicich se obchodem s programy.

Z uvedenych duvodu se domnivam, ze komunita programatoru si
zaslouzi take nejakou ochranu pred zvuli pravniku a velkych firem,
ktere ve snaze vydelat "prave ted" podkopavaji do budoucna
cinnost jednotlivych programatoru, a tedy v dusledku i svou.

Pokud vas tato iniciativa zaujala, rad bych navrhl prvni organizacni
postup, s prosbou o pokus jejich reseni.

1. Je vhodne seznamit s timto textem (ci myslenkou) co nejvice
programatoru v tomto state (pres ruzne konference, newsy atp.,
ktere probihaji v Cechach). Prosim tedy ctenare o vhodne rozsireni.

2. Aby mohly informace tect pres jeden kanal, bylo by vhodne
zavest prostor na webu, zalozit samostatnou domenu, a v ni e-
mailovou konferenci a newsy. Je nekdo ochoten a schopen toto
zainvestovat/zasponzorovat? Poznamka: domena nekde na
zadarmo(tec)cz, kde je pouze statickych 10MB prostoru je jiste skvela
pro chovatele angorskych kraliku, ale ne pro programatory.
Docasne bych sice mohl umistit neco do sveho prostoru, ale
dlouhodobe by to bylo nezadouci.

3. Po zavedeni webu a konferenci je treba vymyslet dalsi postup,
vymezeni clenske zakladny, schema financovani sdruzeni, zpusob
nakladani se ziskanymi prostredky, oblasti lobbovani pro spolecny
zajem atp.


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


QuickReport a cestina

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 27.1.2001 11:48:55

> Ahoj lidi, jak prinutim QuickReport v nahledu k zobrazovani
> Hintu v cestine?
> + tlacitko "close" na "Zavrit"

Ahoj, ja jsem to udelal pocestenim QRPREV.DFM - otevrel jsem si ho v Delphi
a poopravoval. Nevim, jestli je to ciste, uvahy na toto tema prenechavam
systemovym a pravnim puristum, ale funguje mi to :-).

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

QuickReport a cestina

[*] J.Falt�nek <Jiri.Faltynek(zv)quick(tec)cz> - 27.1.2001 13:01:25

Ahoj,
otevri si v delphi primo v libu prislusne DFM - zacinaji qr... a v textovem
tvaru oprav vsechny texty.
Jirka

----- Original Message -----
From: "WEB ATLAS - SUKY" <suky(zv)atlas(tec)cz>
To: "DELPHI - Konference" <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 26, 2001 9:24 PM
Subject: QuickReport a cestina


> Ahoj lidi, jak prinutim QuickReport v nahledu k zobrazovani Hintu v
cestine?
> + tlacitko "close" na "Zavrit"
>
> Michal
>
>
>

Registry na jin�m PC

[*] Ale� Pavel <bejcek(zv)centrum(tec)cz> - 27.1.2001 13:21:27

Ahoj jak najdu pocitac na siti komunikujici pomoci TCP/IP a jak mohu
editovat registry na tomto pocitaci?
Nasel jsem API fci
RegConnectRegistry, ale uprimne neumim ji pouzit nemel by jste nekdo nejakou
ukazku na vyhledani PC a zmenu registru? Nejsem hacker, ale spravce site.
Jiste pochopite proc to potrebuji vedet, take by mi bodlo kdyby jste mi
nekdo poslal nejake priklady co se da zakazat v registrech
(windows/policies) jde mi predevsim o pristup do nastaveni. Diky velice

Ales Pavel
Amater vsech amateru
Kukacka mi kukla 24krat
a jiny ptaky krome kachny na cerno
se zelim odmitam znat.....

Komponenta v DLL??

[*] Jan Nov�k <megamax(zv)seznam(tec)cz> - 27.1.2001 15:57:50

Ahoj,
cht�l bych polo�it jedni takovou (pro mnoh� zcela ur�it� amat�rskou) ot�zku:
Pot�ebuji, aby DLL vykon�vala funkci, o kterou ji ��d� aplikace. Tato funkce
je slo�it� a norm�ln� na formu ji prov�d� moje komponenta. Ot�zka: Jak v DLL
spr�vn� zalo�it komponentu, abych j� mohl volat tak jako na formu??
V�m, �e je to slo�it� t�ma, posta�� mi jenom kous��ek k�du s uk�zkou, jetli
u� jste to n�kdo �e#il.
D�ky.
Jan Nov�k, megamax(zv)seznam(tec)cz


Tlacitko do listy IE

[*] morzol(zv)atlas(tec)cz - 27.1.2001 16:05:19

Jak muzu pridat tlacitko na listu aplikace Internet Explorer s vlastni ikonou a obsluhou udalosti onclick ?

Diky


Format date Oracle a DBF

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 27.1.2001 17:25:03

Zkus univerzalni format. String ve tvaru 'yyyymmdd hh:mm:ss'. Konverzi
by si mel SQL server udelat automaticky. S timto formatem zatime
nebyly problemy.

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

> a hnedka pokladam dotaz. Potrebuji importovat tabulku ve
> formatu DBF III do tabulky Oracle. A nevim co s casem. Tim myslim
> sloupec ve formatu date (prip. datetime) v Oraclu. DBF totiz
> neumoznuje mit datum a cas zaroven v jednom sloupci a ja to
> potrebuji takto (oba dva udaje) naimportovat do jednoho sloupce
> Oracle. Nemuzu pouzivat zadne ulozene procedury a ostatni
> vymozenosti.

> resenim by nejspis bylo dat sloupec v DBF jako typ C (char) a
> naformatovat to do podoby datetime Oraclu, ale nevim jak to ma
> vypadat. Poradi mi nekdo?

Bar Code

[*] Mirek Junek <mirek.junek(zv)worldonline(tec)cz> - 27.1.2001 19:29:36

V podstate nejcasteji narazis na BCR ve dvou provrdenich - bud to posila
znaky po RS232, nebo se to tvari jako klavesnice. Pozor - nektere snimace
nemaji dekoder a pak se musi dekodovat, at uz pomoci HW nebo SW. Vetsina
snimacu cte vsechny standardni kody a posila je jako ASCII znaky, popripade
s nejakou dalsi informaci (typ kodu, CR,LF, CheckChar,..)
Rezim a parametry se nejcasteji nastavuji pomoci programovacich carovych
kodu.

Zdar,Mirek


| Haj hou,
| vim, ze se to tu jiz probiralo, ale nejak nejsem schopnej najit tu
spravnou
| kombinaci slov pro vyhledavani.
| Kde muzu najit neco k ovladani ctecky caroveho kodu ?
| Ja vim, ze je to strasne obecnej dotaz, ale zatim toho moc nevim a
potrebuju
| si udelat nejakej prehled o problemu.
|
| S pozdravem
| Marek Soukup
|
|

editace v gridu - opet

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 27.1.2001 22:50:52

Jasne. Pak je zde k dispozici normalni Grid nebo TreeList ktery pouzivam pro
zobrazovani dat ja a na pozadi resim SQL procedury. Fakt to nema chybu,
muzes s tim delat jakakoliv kouzla. Pokud by jsi mel zajem o upravu TreeView
pro moznost nastaveni trideni sloupcu podle zvoleneho datoveho typu, poslu
to.

Ja sice neresim editaci primo v seznamu ale zkousel jsem to a fungovalo to
perfektne.

Jan Skopovy

http://www.devexpress.com

svisly text

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 27.1.2001 22:54:41

TCxLabel - na strankach www.creatix(tec)cz soucast kolekce FREE komponent (lze nastavit stupen pootoceni).

Jan Skopovy
----- Original Message -----
From: Slavek B
To: delphi-l prispevky
Subject: svisly text


zdravim vsechny
mam problem, potreboval bych do formulare napsat svisly text a to psany ze spodu i zvrchu, nevite nekdo o nejake komponente podobne TLabel nebo necem jak by se to dalo lechce a rychle20

Programatorska komora (v Cechach)

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 28.1.2001 10:19:06

Prosim rozsirte tuto zpravu ostatnim programatorum a jejich
konferencim. Dekuji.

------- Forwarded message follows -------
From: "Altair" <altair(zv)altair2000.net>
To: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>,
"Martin Krajnak" <martink(zv)1kdesign.com>
Subject: RE: Programatorska komora (v Cechach)
Date sent: Sat, 27 Jan 2001 18:28:47 +0100

Zridil jsem konferenci czdev-l.

Prihlaseni se deje zaslanim zpravy s telem "subscribe" na adresu
czdev-request(zv)byte(tec)cz.

Zpravy se posilaji na czdev-l(zv)byte(tec)cz.

Prihlaseni uzivatele mohou prispivat primo, prispevky od
neprihlasenych podlehaji autorizaci moderatorem, coz jsem v teto
chvili ja. Tuto politiku lze samozrejme kdykoliv zmenit.

K ostatnim vecem se vyjadrim pozdeji.

--------------------
Z��dil jsem do�asnou str�nku s adresou http://czdev.byte(tec)cz, na
kterou je mo�no odkazovat. Zat�m se tam skv� toliko v�zva k
p�ihl�#en� do konference czdev-l(zv)byte(tec)cz a onen �vodn� mail.
Jakmile se dohodneme na n�jak�m n�zvu, mohu zaregistrovat
dom�nu a provozovat ji na na#ich serverech (sb�rka asi po��ta��
osciluj�c� po�tem kolem dev�ti, jedou d�lem na Windows 2000,
d�lem na FreeBSD, hostov�no na p�te�i d�lem na Internet Online,
d�lem na KPNQwestu, alias Eunetu).
--------------------

-- Michal 'Altair' Valasek
Altair Software Production

Vse o Microsoft technologiich pro Internet: http://www.asp(tec)cz

----------------------------[I don't make the rules; I just break
them.]--- Webdesign, webhosting, programming - They use the
Internet,
we live there! E-mail: altair(zv)altair2000.net * ICQ: 6160893 * Phone:
+420-603-828493 Corp. WWW: http://www.altair2000.net *
Personal:
http://home.altair2000.net
_____________________________________________________...p
owered by
Internet

------- End of forwarded message -------


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


SHORT KEY v MENU

[*] WEB ATLAS - SUKY <suky(zv)atlas(tec)cz> - 28.1.2001 11:02:05

Prendal jsem si menu aplikace na ToolBar, ktery je umisteny na ControlBaru a
z Formu aplikace jsem menu odstranil. Vse funguje az do doby kdy jsem pridal
do menu klavesove zkratky, ktere bohuzel nereaguji. Nevite kde mam hledat
chybu, co kde nastavit?

Predem diky,

Michal

Komponenta v DLL??

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

From: "Jan Nov�k" <megamax(zv)seznam(tec)cz>
> cht�l bych polo�it jedni takovou (pro mnoh� zcela ur�it� amat�rskou) ot�zku:
> Pot�ebuji, aby DLL vykon�vala funkci, o kterou ji ��d� aplikace. Tato funkce
> je slo�it� a norm�ln� na formu ji prov�d� moje komponenta. Ot�zka: Jak v DLL
> spr�vn� zalo�it komponentu, abych j� mohl volat tak jako na formu??

Ahoj,

pokud chces predavat Delphi objekty mezi aplikaci a DLL, tak musis aplikaci i
DLL prelozit s balicky, ulehcis si tim zivot. Dalsi moznost jsou dynamicky
nahravane balicky: http://www.obsof.com/delphi_tips/DL613.html

Petr Vones, amatersky programator


Programatorska komora (v Cechach)

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 28.1.2001 13:11:53

Ahoj,

nechci Ti kazit radost, ale jedna se o dalsi z aktivit, ktera je
zakonodarcum naprosto ukradena a nebude vyslysena a postupem
casu vysumi do ztracena. :-(

Nebo si vazne myslis, ze panove poslanci se timto budou zabyvat,
byt jen u poslaneckeho bufetu s parkem za 2 Kc v ruce?

Slavek


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


QuickReport a cestina

[*] Jan Naiser <tua(zv)wo(tec)cz> - 28.1.2001 13:22:54

Ahoj,

kdyz jsem kdysi QR zkousel (nez jsem presel na Sineu), vyhnul jsem se tomu
tim, ze jsem si udelal vlastni form a vlastni zobrazovani nahledu podle
prikladu, ktery jsem nekde nasel. Navic si vse udelas jak je libo, vcetne
obsluhy zvetseni, tisku a buttonu, coz ma vyhodu v jednotne filozofii
ovladacich prvku programu, jelikoz nevybocujes ze sveho rukopisu. :-)

Honza Naiser.


----- Original Message -----
From: Ji�� Foldyna <jiri.f(zv)avizo(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 27, 2001 11:48 AM
Subject: RE: QuickReport a cestina


> Ahoj, ja jsem to udelal pocestenim QRPREV.DFM - otevrel jsem si ho v
Delphi
> a poopravoval. Nevim, jestli je to ciste, uvahy na toto tema prenechavam
> systemovym a pravnim puristum, ale funguje mi to :-).
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz

OT: Programatorska komora (v Cechach)

[*] Josef Kokes <kokes(zv)fsid.cvut(tec)cz> - 28.1.2001 15:32:07

Nevidel bych to az tak cerne. Staci se podivat na dva takrka skolni
priklady: na jedne strane je stomatologicka komora, ktera pevne drzi pri
sobe a ktera si dokaze vydupat uplne vsechno. Na druhe strane komora
lekarska (at mi nikdo nerika, ze stomatologove jsou o tolik dulezitejsi nez
"opravdovi" doktori), ktera je roztristena a ze ktere si nikdo nic nedela.
Obe dve zacinaly za stejnych podminek (kdyz jeste zadny zakon o komorach
neexistoval a kdyz komory vubec byly v nemilosti). Ale jedna se dokazala
rozjet a druha se dokazala rozhadat. Nicmene soudim, ze sance by tu byla.
Kokes

----- Original Message -----
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Cc: <honza(zv)haes(tec)cz>; <info(zv)nic(tec)cz>
Sent: Sunday, January 28, 2001 1:11 PM
Subject: Re: Programatorska komora (v Cechach)> Ahoj,
>
> nechci Ti kazit radost, ale jedna se o dalsi z aktivit, ktera je
> zakonodarcum naprosto ukradena a nebude vyslysena a postupem
> casu vysumi do ztracena. :-(
>
> Nebo si vazne myslis, ze panove poslanci se timto budou zabyvat,
> byt jen u poslaneckeho bufetu s parkem za 2 Kc v ruce?
>
> Slavek
>
>
> Setrete vodou. Sprchujte se s pritelem/pritelkyni.
> -------------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> http://swnet(tec)cz
> -------------------------------------------------

Export dotazu do *.CSV

[*] Milan ��ek - 28.1.2001 15:45:20

ahoj,
potreboval bych vedet, jak uloziv vysledek dotazu Query do souboru csv.

Diky

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


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


Vyberove menu asi s html

[*] Milan ��ek - 28.1.2001 16:04:15

ahoj,
potreboval bych se dopracovat k podobne nabidce, jakou disponuje napr.
WinMediaPlayer7. Staci mi, aby byly podporovany jen obrazky (bez textu),
jiny obrazek pri vyberu, a pri prejeti mysi.

Chci se zeptat, jestli nevite o nejaky komponente, ktera by toto dovedla,
zkousel jsem to pres WebBrowser (pomoci html) - vcelku to ujde, ale chtel
bych nezavislost na Browseru.

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


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


Import historie URLadres

[*] Milan ��ek - 28.1.2001 16:13:03

ahoj,
nevyjadril jsem se moc presne, takze to upresnim -
tam se ale nachazi jen par poslednich linku. Potreboval bych kompletni
historii. Na msdn jsem nasel neco jako URLhistory, ale to je jen pro IE, a
navic tak desne slozity... Nevite treba uz o necem hotovem (komponenta), Pro
IE&NC pripadne dalsi prohlizece?

Diky

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

> Mrkni se do registru na
> HKEY_CURRENT_USER\SOFTWARE\Microsoft\Internet Explorer\TypedURLs
> je tam seznam adres, ktery jsi napsal
>

> 25.1.2001 Milan #ݿek :
> > ahoj,
> > potreboval bych nejakym zpusobem sjistit seznam vsech URL adres
otevrenych v IE (pokud mozno i pro Netscape). Jde mi o takovou tu historii
adres, ktera se objevuje vzdy pri psani URL (doplnovani).
>
> > Jak tento seznam ziskat? Nejlepsi by byl asi StringList, ale to uz je
jedno.
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.230 / Virov� b�ze: 111 - datum vyd�n�: 25.1.2001

Programatorska komora (v Cechach)

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 28.1.2001 19:55:07

Ahoj,

spousta zakonu projde, aniz by se nad nimi poslanci zamysleli
(vezmeme napriklad boj pana Smejkala o autorsky zakon ci
elektronicky podpis - ted si presne nevybavuju, o co slo). Kolik nas
musi byt, abychom byli vyslyseni? Vem si treba zakon o
,,bojovych psech`` a soucasnych protestech. Vem si ,,Dekujeme,
odejdete``. Muj nazor je takovy, ze v tehle kasparkovske republice
jde zakonodarcum pouze o vlastni koryta a obcas zvednou pacicku
pro dobro sve ci nemyslici vetsiny.

Zbyskova akce je fajn vec, ale kdo ji bude delat opravdu poradne a
se zapalenim? Zrejme nikdo, kdo chce programovat, protoze pokud
by svadel boj s vetrnymi mlyny, na programovani casu nezbude.

Nechci vyvolat flame war, zvlaste netykajici se delphi, proto prosim
neodpovidejte do konference, ale pouze na moji osobni adresu.

Diky

Slavek

> Ahoj.
> Reagujes sice na Zbyskuv mail, ale nedokazu si odpustit odpoved.
>
> Pokud v tomto state budou vsichni lide uvazovat jeko Ty, bude to
> tu vypadat jeste hure nez to tu vypada. Dojem, ze tim, ze jednou za
> 4 roky strcim listek do urny a vse za mne nekdo dojedna, navrhne a
> udela je spatny. Parlament je az vrsek vseho a pokud ma dostatecne
> vazeneho protihrace (a tim by IMHO komora byla) je mozno ho urcite
> korigovat nebo se alespon o to pokusit.
> Mozna, ze prave neexistence takovych organizaci je duvodem
> velmi tristniho stavu, ktery u nas vladne.
>
> Sedet na zadku a zavidet poslancum parky je IMHO ta nejlepsi
> cesta do haje.
>
> Ludek
>
>
>
Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


JDBC & Interbase

[*] Pavel Chaloupka <chaloupka.pavel(zv)worldonline(tec)cz> - 28.1.2001 20:29:45

Tak jako k InterBase, je i k InterClientu dostupny source code. Muzes si
ho upravit nebo napsat novy.....
Nebo muzes napsat svuj problem do konference na www.java(tec)cz, nebo primo na
news Borlandu. Mozna to bude rozumnejsi, nez resit to pres konferenci o
Delphi.

Pavel

> Bohuzial, aj to som uz urobil, ale nepomaha. :-)
> Ja si myslim, ze interclient ( medzixsicht :-) medzi interbase a JDBC )
> cachuje vlozene riadky a ja neviem, ako ho prinutit, aby ich flushol do
> databazy. Dokonca som skusal z isql vlozit riadok, ktory by sa standardne
> nemal vlozit, pretoze by bol duplikatny primarny kluc s riadkom pridanym
cez
> JDBC, a olala .. ono to islo.
> Vyzera to tak, ze si budem musiet sam napisat JDBC driver :-(
>
> Brano
>
> P.S. Ak pani, ktori pisali JDBC driver pre InterBase, si hovoria
> programatori, tak ... je mi luto ....
>

tiskove sestavy

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 28.1.2001 20:37:47

Ahoj,
potreboval bych poradit nejaky nastroj pro tvorbu tiskovych sestav, jako jsou
katalogy zbozi i s fotkama.
Fotky nejsou v databazi ale na disku, max. 35 fotek na A4, bezne 4-5 stranek.
Nechci pouzit QR, zatim uvazuji nad Sineou...

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


Import historie URLadres

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

From: "Milan #ݿek" <cizek.milan(zv)seznam(tec)cz>
> tam se ale nachazi jen par poslednich linku. Potreboval bych kompletni
> historii. Na msdn jsem nasel neco jako URLhistory, ale to je jen pro IE, a

Ahoj,

problem je v tom, ze kazdy prohlizec ma (pokud vubec nejake ma) jine API pro
pristup do historie. U IE je to pomerne v pohode, co se tyce ostatnich, tak to
budes muset hledat u jejich vyrobcu.

Opera: http://www.opera.com
Netscape: http://developer.netscape.com

Petr Vones, amatersky programator


DB Engine

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 28.1.2001 21:14:49

Ahoj,

to DBE ma byt zrejme BDE, a najdes to na CD Delphi ako BDEinst.cab.

Pavol Stolc
pstolc(zv)sc.sknet.sk


Export dotazu do *.CSV

[*] WEB ATLAS - SUKY <suky(zv)atlas(tec)cz> - 28.1.2001 22:22:43


Pouzij nejakou free komponentu, na Internetu jich je mraky, staci jen hledat
:) Treba tady www.torry.net , nebo tady http://www.delphicity.net .

Michal

----- P�vodn� zpr�va -----
Od: "Milan #ݿek" <cizek.milan(zv)seznam(tec)cz>
Komu: "Delphi konference" <delphi-l(zv)fwd(tec)cz>
Odesl�no: 28. ledna 2001 15:45
P�edm�t: Export dotazu do *.CSV


> ahoj,
> potreboval bych vedet, jak uloziv vysledek dotazu Query do souboru csv.
>
> Diky
>
> S pozdravem Milan Cizek, amatersky programator, D5 Ent (SP1)
> Win2k (SP1) a Win98, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.230 / Virov� b�ze: 111 - datum vyd�n�: 25.1.2001
>

DATA Z KONFERENCE: PROSINEC 2000

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 28.1.2001 22:33:57

Preji vsem pekneho dne,

ponekud pozdeji, ale preci. Data za prosinec naleznete na adrese

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

Slavek


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


Programatorska komora (v Cechach)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2001 00:58:15

From: "L. ZITA" <konference(zv)sales(tec)cz>
> Mozna, ze prave neexistence takovych organizaci je duvodem
> velmi tristniho stavu, ktery u nas vladne.

Souhlasim, ovsem na druhe strane nelze uprit jistou davku zdrave skepse,
protoze v tomhle state je to opravdu jak v Kocourkove. Koneckoncu problem se
samozvanymi spravci autorskych prav se tu tahne uz nekolik let bez znatelnych
vysledku (k lepsimu). Staci si precist clanky co o teto problematice vysly v
Reflexu, Respektu a mnoha dalsich mediich. Problem je predevsim v naproste
nekontrolovatelnosti a nepostizitelnosti techto organizaci.

> Sedet na zadku a zavidet poslancum parky je IMHO ta nejlepsi
> cesta do haje.

Myslim ze puvodni odpoved nebyla o zavideni parku poslancum ;-)

Petr Vones, amatersky programator

OT: Win ME

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 29.1.2001 07:32:56

Ahoj, predem se omlouvam za OT.

Mate nekdo praktizke zkusenosti s Windows ME?
Jsou lepsi nez 98SE? Stabilnejsi? atd..
Pripadne jestli jsou nejake problemy s provozem Delphi ..

Predem diky

Dalibor


desatinne cislo

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 29.1.2001 07:52:36

> Chyba neni v Int ale v promenne "vysl". jestli vysl byl typy real,
> tato chyba se vyskytuje u kazdeho druheho cisla. Lepe je pouzit vysl
> := StrToFloat(DBEdit1.Value)
>
> Pavel

Ahoj,

jenze DBEdit1.Value neni string a promennou vysl jsem dal jen pro
priklad. Cilem teto operace bylo zadane cislo oriznout na dve
desetinna mista. Ale i ve zcela jinych pripadech, pokud pouziji Int
ve nekde ve vyrazu (pocitajicim s cisly typu double nebo extended)
a parametr funkce Int je cele cislo (ulozene v promenne typu
double, TDateTime apod.), dojde k popsanemu jevu. Pro me bylo
nejjednodussi vzdy k parametru fce Int proste pricist jednicku na
nejakem zadnim desetinnem miste.
Je mi jasne, ze to je dane zpusobem reprezentace realneho
cisla v pocitaci - jen jsem na to chtel upozornit.

David

>
>
> > > na to jsou funkce Int a Frac. jsou popsany v helpu
> > > Ing. V�t Kr#ka
> > > vit.krska(zv)del(tec)cz
> >
> > Ja bych rad pripojil jeste jednu zkusenost, kterou jsem nedavno
> > udelal. Mel jsem DBEdit1 a do nej uzivatel vlozil cislo 18.20. V
> > kodu jsem ho zpracovaval nejak takto:
> >
> > vysl := Int(DBEdit1.Value * 100) /100;
> >
> > a vyslo 18.99, protoze cislo 18.20 bylo ulozeno jako 18.999999999.
> >
> > Chci proto upozornit na zaokrouhlovaci chyby, ktere se vyskytuji i u
> > fce Int. V danem pripade stacilo pricist jednicku na nejakem zadnim
> > desetinnem miste.
> >
> > David Lebeda
> >
> > >
> > > -----Original Message-----
> > > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > > Behalf Of
> > > Martin
> > > Sent: Tuesday, January 23, 2001 1:29 PM
> > > To: delphi-l(zv)fwd(tec)cz
> > > Subject: desatinne cislo
> > >
> > >
> > > Zdravim,
> > >
> > > mam taku blbu otazku ale akosi mi to nepali.
> > >
> > > Mam desat. cislo, napr. 8.5 - typ real
> > > potrebujem z toho vybrat celu cast a desatinnu cast a nechcem s
> > > tym robit
> > > ako s retazcom.
> > >
> > > Martin
> > >
> >
> >
>

Mirne OT: Resource editor; Pegasus Mail

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

> a konkretne cestinu dela p. Kuchta <Kuchta(zv)dean.fee.vutbr(tec)cz>,
> ale kdy to bude pro v3.xx jeste nerekl :-).
> Cekame na to vsichni velmi velmi velmi...

Je to opravdu OT, ale kdyz pises, ze "velmi velmi velmi" :-)

O tomto vikendu jsem ty casti Pegasus Mailu, se kterymi bezny
uzivatel pracuje, prelozil do cestiny. Pokud byste o prelozenou verzi
mel nekdo zajem, napiste, muzu to poslat, popr. doprelozit i casti,
ktere jsem ted vynechal.

Karel Rys
delphi(zv)zas-me(tec)cz


Programatorska komora (v Cechach)

[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 29.1.2001 08:13:07

> Zbyskova akce je fajn vec, ale kdo ji bude delat opravdu poradne a
> se zapalenim? Zrejme nikdo, kdo chce programovat, protoze pokud
> by svadel boj s vetrnymi mlyny, na programovani casu nezbude.

Muj nazor:
Nejprve ke konferenci - k Delphi to patri, protoze se to programovani,
lepe receno jeho vysledku, bezprostredne tyka (aspon dokud to ADM nezakaze).
Myslim, ze kazdy clen Komory by mel platit rocni prispevek,
napriklad Sdruzeni uzivatelu TeX (www.cstug(tec)cz) vybira 300,- od soukromych
osob,
1850,- od firem. A jak se zda, funguje to.
Za sve penize by mely clen zastani - Komora by aktivne vstupovala do jednani
s medii,
s parlamentem, s odbornou i laickou verejnosti, byla na poplach pri priprave
zakonu,
mela uzke vazby na pravni specialisty, softwareovou policii, soudni znalce.
Mela by prehled o podobnych zalezitostech mimo CR a byla by pripravena na
pozadani
clenum poradit. Cili - brala by se za vsechny, aktivne by pak pomahala
clenum.
To by samozrejme chtelo par lidi + nejaky prostor, placeny z jiz zminenych
prispevku.
Cele to stoji na zajmu lidi / programatoru. Rozhodne by to bylo ve prospech
veci.
Leos


ExpressQuantumGrid

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 29.1.2001 08:23:53

Ahoj,
zajima me editace, jestli to tam je vyreseno nejak inteligentne. Jestli je
mozno editovat v Gridu v pripade, ze Select je z vice tabulek apod. Myslim
rozumne editovat, ne jako ve standardnim DBGridu.
Zakaznik si to vymyslel, a ja mam zjistit, jestli to jde.. :-(

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> delphi(zv)htkpro(tec)cz
> Sent: Friday, January 26, 2001 5:47 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: ExpressQuantumGrid
>
>
>
> --- P�vodn� dopis
> ----------------------------------------------------------
> Datum: 26.01.2001 16:07
> Od: ota.maly(zv)volny(tec)cz
> Pro: Konference DELPHI (DELPHI), ...
> V�c: Fw: ExpressQuantumGrid
> ------------------------------------------------------------------
> ----------
> >Ahoj,
> >mate nekdo zkusenosti s timto Gridem?
> >Potreboval bych se zeptat na par veci, vyrobce nema trial a demo ma jen
> >jako
> >exe :(
>
> Tak se ptej, pouzivame prakticky vsechno od devexpress.
>
> S pozdravem
> Jan Kadlecek
> HTK Pro s.r.o.
> www.dev-shop(tec)cz
>
>
> >
> >S pozdravem
> >Ota Maly
> >
> >PaPouch elektronika
> >http://www.papouch.com
> >
> >
> >
>

QuickReport a cestina

[*] Krska Vit <v_krska(zv)del(tec)cz> - 29.1.2001 08:25:49

udelej si vlatni preview.

Ing. V�t Kr#ka
vit.krska(zv)del(tec)cz

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ji�� Foldyna
Sent: Saturday, January 27, 2001 11:49 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: QuickReport a cestina


> Ahoj lidi, jak prinutim QuickReport v nahledu k zobrazovani
> Hintu v cestine?
> + tlacitko "close" na "Zavrit"

Ahoj, ja jsem to udelal pocestenim QRPREV.DFM - otevrel jsem si ho v Delphi
a poopravoval. Nevim, jestli je to ciste, uvahy na toto tema prenechavam
systemovym a pravnim puristum, ale funguje mi to :-).

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

OT: stare DOS aplikace na novych strojich

[*] Suska R�bert <spravca(zv)lumen.sk> - 29.1.2001 08:26:47

Zdravim nechcem otravovat, ale taky PATCH by sa mi sikol, lebo mam dost vela
vlastnych aplikacii napisanych v TP 7.0. Tak ak Vas mozem poprosit ci by ste
mi ho nemohli poslat.


Dakujem

S pozdravom,

Sefino (c) :-)
Predpokladam ze se jedna o RUN TIME ERROR 200 coz hlasi
stare programy v borland pascalu, protoze borland nepocital s PC
rychlejsimi nez 300 MHz, reseni je stahnout si od borlandu Patch a
opravit si ty programy. Pokud ho nenajdes tak napis, ja ti ho poslu.

> Butonek ? Cauko delfini.
>

Debug in design time

[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 29.1.2001 08:35:27

Bohuzel musim pozivat PlayStation. Ale vyzkousim to pod NT. Nemuze to
byttake tim, ze mam poze D5 PRO ane ENT?


ZVO.
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, January 27, 2001 2:17 AM
Subject: Re: Debug in design time


> From: "Josef Zvonicek" <prosoft(zv)prosoft(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> > Mam ale s tim problem. Kdyz si v parameters nastavim delphi32.exe a dam
LOAD
> > a pak zmacknu RUN tak se mi zacne spoustet druha instance DELPHI ale
napise
> > mi to 'EPackageError with message Can't load package VCLMid50.' Tento
soubor
> > neexistuje. Muzez mi poradit co s tim?
>
> Ahoj,
>
> netusim co s tim. Ono je to cele takovy postup na hranici moznosti. Nemuze
to
> byt neco specifickeho ve vychozim desktopu ? Pouzivas NT nebo PlayStation
?
>
> Petr Vones, amatersky programator
>
>

desatinne cislo

[*] borkovec(zv)email(tec)cz - 29.1.2001 08:39:58

Moje mirne vzdalena troska do mlyna k des. cislum:
Potreboval jsem zaokrouhlovat vystupy (resp. formatovat) z obecneho Query
do DBGridu - jakysi SQLBuilder pro uzivatele v aplikaci. Jedine reseni, ktere
jsem nasel, bylo dodat do textu Query parametr, ktery jsem interpretoval
a pridal k polozce query jako AS. Znate nekdo primejsi cestu bez nutnosti
doplnovat sql prikazy o vlastni formatovaci prikaz? (Mluvim o DB tabulkach,
nikoliv o databazi.)
P.S. Daji se nejakym zpusobem rozsirovat SQL dotazy v prostredi DB (neco jako
UDF?)
Roman Borkovec


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

OT: stare DOS aplikace na novych strojich

[*] RDocekal(zv)csas(tec)cz - 29.1.2001 08:49:48

Uz to tu mnohokrat bylo, napr. na
http://www.brain.uni-freiburg.de/~klaus/pascal/runerr200/
je jednak patch na opravu existujicich EXE, jednak opravene *.tpl soubory
pro programy, od kterych mas zdrojak.

S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367

> -----Original Message-----
> From: Suska R�bert [mailto:spravca(zv)lumen.sk]
> Sent: Monday, January 29, 2001 8:27 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: OT: stare DOS aplikace na novych strojich
>
>
> Zdravim nechcem otravovat, ale taky PATCH by sa mi sikol,
> lebo mam dost vela
> vlastnych aplikacii napisanych v TP 7.0. Tak ak Vas mozem
> poprosit ci by ste
> mi ho nemohli poslat.
>
>
> Dakujem
>
> S pozdravom,
>
> Sefino (c) :-)
>
>
>
> Predpokladam ze se jedna o RUN TIME ERROR 200 coz hlasi
> stare programy v borland pascalu, protoze borland nepocital s PC
> rychlejsimi nez 300 MHz, reseni je stahnout si od borlandu Patch a
> opravit si ty programy. Pokud ho nenajdes tak napis, ja ti ho poslu.
>
> > Butonek ? Cauko delfini.
> >
>

ISAPI a TTimer

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 29.1.2001 08:58:59


> Vytvarim jednoduchy prog. pro Web.
> Do nej potrebuji dat TTimer.
> Comp. TTimer vlozit jde ale nevola se jeji Event OnTimer.
> DLL spoustim pod Intrabob.exe.
> Nevite nekdo kde je chyba?

Bohuzel TDataModule nema okenni handle a tak
nemuze zpravu od timeru prijmout. Moznosti je volat
API fce primo a nastavit si proceduru pro cyklicke
volani timeru.
Ale to vse opravdu odporuje zpusobu chovani
CGI - ISAPI aplikace. Ta by mela provest to proc
byla zavolana a ukoncit se, ne drepet v pameti.
Dokazes si navic predstavit 300 soucasnych
pripojenych uzivatelu?
Pokud chces aby Ti ISAPI vracela stav co urcity
interval (to bych rekl, ze je duvod) nejjednodussi
je dat do HTML pokyn k obcerstvovani. Slozitejsi
cestou je udrzovat spojeni, ale nejsem si jisty, ktere
servery to podporuji. Univerzalni moznost je fakt
nechat stranky refreshovat v pravidelnych intervalech.

Martin


datum

[*] Raul Endymion <raul(zv)raphael(tec)cz> - 29.1.2001 09:20:51

Dobr� den,

jak nejjednoduseji zjistim, zda jedno datum je vcera ?
co takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < now;
end;

nebo takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
abych zjistil pouze datum z now a ne i hodinu apod.}
end;

dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
spusteni)

--
S pozdravem,
Raul
raul(zv)raphael(tec)cz

Win ME

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 29.1.2001 09:35:06

> Mate nekdo praktizke zkusenosti s Windows ME?
> Jsou lepsi nez 98SE? Stabilnejsi? atd..
> Pripadne jestli jsou nejake problemy s provozem Delphi ..

Ahoj skusenosti prakticke su. Ale oproti Win98 to neni velky rozdiel. Skor
by som povedal iba prerobeny "face".(ale dufam ze ma zasa nebude niekto
chytat za slovicka ako v minulom prispevku) Su stabilne asi tak ako Win98
(samozrejme zalezi na "zeleze" na akom bezia). Delphi tam slape v pohode.

BTW: Skor by smo ale uvazoval o W2000, tam uz MS urobil kus skvelej prace.

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

Spusteni aplikace pri ukonceni Windows

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 29.1.2001 09:41:14

Ahoj,

nevite nekdo o nejake ceste jak zaridit spusteni aplikace pred
ukoncenim Windows? Vim, je to takovy trochu extremisticky
pozadavek, ale mam k tomu sve duvody. Jedna cesta je mit
aplikaci trvale spustenou, treba minimalizovanou nebo skrytou a
regovat na zpravu o ukonceni Windows. Je to pouzitelne a
nebranim se tomu. Jen by me zajimalo, zda Windows samy o
sobe nenabizeji nejaky mechanismus (jakysi opak "Po spusteni",
volany pred ukoncenim).

Diky.

David


Prechod velkeho projektu z BDE na ADO

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 29.1.2001 09:43:34

> prave jsem se necim takovym zabyval, takze jestli ma nekdo zajem, tady
jsou
> me zavery
>
> Na po�atku navrhuji zm�nit v#echny soubory .dfm z binarni reprezentace na
> Textovou (klepnut� na formul߰ a vybrat "Text dfm")
>
> 1. v klauzuli uses zm�nit odkaz na unitu DBTables na ADODB

atd.

Toto je sice hezke, ale ono je to trochu slozitejsi. SQL servery pracuji
trochu jinak nez treba Paradox. Neco je treba napsat uplne jinak, protoze
to, co chodilo v Paradoxu docela rychle, pri stejnem naprogramovani na SQL
databazi leze jako snek. Takze moje doporuceni je sednout a napsat projekt
uplne znovu (s tim, ze se nejake procedury daji pouzit ze stareho projektu).
Novemu projektu je vsak treba dat "duch" SQL databaze.

J. N�dhera

CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz

Win ME

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 29.1.2001 09:52:10

> Mate nekdo praktizke zkusenosti s Windows ME?
> Jsou lepsi nez 98SE? Stabilnejsi? atd..
> Pripadne jestli jsou nejake problemy s provozem Delphi ..
>

V ramci pomerne kratkeho testu jsem cca 2 dny ladil v D5 vetsi aplikaci na
WinME. Zadne problemy s chodem D5 jsem nezjistil. Pozitivni vlastnosti WinME
je opravdu kratka doba startu/restartu (a to i s ohledem na to, ze ale slo o
novou instalaci nezanesenou balastem tun third-party DLLek atd.)

Stabilitu WinME nejsem schopen z duvodu kratkosti testu posoudit, ale
predpokladam, ze horsi (a z principu ani o moc lepsi) nez u Win98 to nebude.

D. Toman

datum

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 29.1.2001 09:54:56

Vcera := NOW - 1;
Jaro B.

> -----P�vodn� zpr�va-----
> Od: Raul Endymion [SMTP:raul(zv)raphael(tec)cz]
> Odesl�no: 29. I 2001 9:21
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: datum
>
> Dobr� den,
>
> jak nejjednoduseji zjistim, zda jedno datum je vcera ?
> co takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < now;
> end;
>
> nebo takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
> abych zjistil pouze datum z now a ne i hodinu apod.}
> end;
>
> dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
> casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
> spusteni)
>
> --
> S pozdravem,
> Raul
> raul(zv)raphael(tec)cz
>
>
>

OT: Win ME

[*] Jaroslav Antos <jara-slava(zv)seznam(tec)cz> - 29.1.2001 10:17:08

mam je

stabilnejsi, hmm asi jo za pul roku mi jeste nespadly

zabyraji ovsem asi 600 MB na hardu :-(((

jinak zadne viditelne zmeny

zadne doporuceni z moji strany

hoj jara

jara-slava(zv)seznam(tec)cz
_____________________________________________________________________
Jak si stoj� kurz koruny? http://kurzy.seznam(tec)cz


OT: Win ME

[*] <mdelphi(zv)email(tec)cz> - 29.1.2001 10:18:29

Pot�ebuji p�ev�st ��slo na form�t XXE+YY v typu string. Je na
to n�jak� specieln� fce ?

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

Uzavreni pripojeni pres NMFTP

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 29.1.2001 10:18:04

Dobry den

nevite nekdo jak nasilne z jineho programu uzavru spojeni s internetem
vytvorene pomoci NMFTP komponenty

predem diky za kazde nakopnuti


svisly text

[*] Tom� Bihary <tomas(zv)wige-mic(tec)cz> - 29.1.2001 10:36:03

Nasledujici kod to umi

procedure TForm1.FormCreate(Sender: TObject);
begin
SikmyPismo := TFont.Create;
SikmyPismo.Name := 'Arial';
SikmyPismo.Size := 12;
SikmyPismo.Style := [fsBold, fsItalic, fsUnderline];
SikmyPismo.Color := clYellow;
end;

procedure TForm1.FormPaint(Sender: TObject);
var
PredchFont: HFONT;
FontData: TLOGFONT;
begin
GetObject(SikmyPismo.Handle, SizeOf(FontData), (zv)FontData);
FontData.lfEscapement := 900; // 90 stupnu
FontData.lfOutPrecision := OUT_TT_ONLY_PRECIS;
SikmyPismo.Handle := CreateFontIndirect(FontData);
SetBkMode(Canvas.Handle, TRANSPARENT);
PredchFont := SelectObject(Canvas.Handle, SikmyPismo.Handle);
Canvas.TextOut(100, 100, 'Ahoj svete');
SelectObject(Canvas.Handle, PredchFont);
end;

Ahoj Tomas Bihary

----- Original Message -----
From: Slavek B
To: delphi-l prispevky
Sent: Thursday, January 25, 2001 11:12 PM
Subject: svisly text


zdravim vsechny
mam problem, potreboval bych do formulare napsat svisly text a to psany ze
spodu i zvrchu, nevite nekdo o nejake komponente podobne TLabel nebo necem
jak by se to dalo lechce a rychle?

diky za kazdou odpoved :))
Slavek


Spusteni aplikace pri ukonceni Windows

[*] Pavol Kakacka <paka(zv)aktis(tec)cz> - 29.1.2001 10:51:49

Windows pri ukoncei posielaju aplikacii message WM_QueryEndSession a
WM_EndSession. Mrkni sa na ne. Ak ich obsluziz tak mozes spustit co chces.

Pavol Kakacka
kasix(zv)atlas(tec)cz

> nevite nekdo o nejake ceste jak zaridit spusteni aplikace pred
> ukoncenim Windows? Vim, je to takovy trochu extremisticky
> pozadavek, ale mam k tomu sve duvody. Jedna cesta je mit
> aplikaci trvale spustenou, treba minimalizovanou nebo skrytou a
> regovat na zpravu o ukonceni Windows. Je to pouzitelne a
> nebranim se tomu. Jen by me zajimalo, zda Windows samy o
> sobe nenabizeji nejaky mechanismus (jakysi opak "Po spusteni",
> volany pred ukoncenim).

Spusteni aplikace pri ukonceni Windows

[*] Pavol Kakacka <paka(zv)aktis(tec)cz> - 29.1.2001 10:54:08

A sakra sorry, trochu mi to uletelo. Windows aspon Win9x nemaju taky
mechanizmus.

Pavol Kakacka
kasix(zv)atlas(tec)cz


> nevite nekdo o nejake ceste jak zaridit spusteni aplikace pred
> ukoncenim Windows? Vim, je to takovy trochu extremisticky
> pozadavek, ale mam k tomu sve duvody. Jedna cesta je mit
> aplikaci trvale spustenou, treba minimalizovanou nebo skrytou a
> regovat na zpravu o ukonceni Windows. Je to pouzitelne a
> nebranim se tomu. Jen by me zajimalo, zda Windows samy o
> sobe nenabizeji nejaky mechanismus (jakysi opak "Po spusteni",
> volany pred ukoncenim).

OT: Mate zkusenosti DDS od Lesni spolecnosti HK-LE

[*] Zdenek Drvota <drvota-l(zv)zds(tec)cz> - 29.1.2001 11:08:55

Ahoj,
dostala se k nam nabidka na pevne pripojeni k internetu
prostrednictvim tzv. DDS od Lesni spolecnosti HK
(http://www.vslesy(tec)cz)
a tak hledam nekoho, kdo ma s touto firmou nejake
zkusenosti (pry uz ta sit funguje v Hradci Kralove).
Pokud to znate, jak jsou na tom s pripojenim Linuxovych
stroju? Neni to dalsi sit, ktera funguje jen pro
Windows :-)? Neradi bychom naleteli...
Diky



--
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
--


datum

[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 29.1.2001 10:21:31 met-1

> dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
> casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
> spusteni)

Ja bych to asi resil pres funkci
DecodeDate(Data: TDateTime; var Year, Month, Day: Word);

Jirka.

None

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 29.1.2001 11:34:33

Ahoj,

zkus
s := Format('%e', [cislo]);

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

> Pot�ebuji p�ev�st ��slo na form�t XXE+YY v typu string. Je na
> to n�jak� specieln� fce ?

None

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 29.1.2001 11:37:34

>Pot�ebuji p�ev�st ��slo na form�t XXE+YY v typu string. Je na
> to n�jak� specieln� fce ?

viz Help: Format(); a pod.

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


SQL Monitoring pre IB ?

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 29.1.2001 11:39:39

Ahoj,

je mozne najek spolahlivo monitorovat vsetky vykonavane SQL dotazy v IB z
roznych aplikacii?
Skratka ked chcem vidiet vsetky vykonavane SQL.

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


datum

[*] Kriz Pavel, TDS <tds(zv)volny(tec)cz> - 29.1.2001 11:45:03


> abych zjistil pouze datum z now a ne i hodinu apod.}

A pro� tedy nepou��v�# p��mo SysUtils.Date?


Pavel K�ݿ
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Raul Endymion
> Sent: Monday, January 29, 2001 9:21 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: datum
>
>
> Dobr� den,
>
> jak nejjednoduseji zjistim, zda jedno datum je vcera ?
> co takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < now;
> end;
>
> nebo takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
> abych zjistil pouze datum z now a ne i hodinu apod.}
> end;
>
> dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
> casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
> spusteni)
>
> --
> S pozdravem,
> Raul
> raul(zv)raphael(tec)cz
>
>
>

Funkcia v assemberi vracajuca string

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 29.1.2001 11:55:50

> samozrejme ze to je mozne, vid priklad:
>
> function MyAction:pchar;assembler;
> asm
> mov eax,offset (zv)(zv)s
> ret
> (zv)(zv)s: db 'toto je retazec'
> db 0
> end;
>
> Odporucam pouzivat v Assembleri pointre a nie si zbytocne komplikovat zivot
> z pascal retazcami. Vystup si uz jednoducho prekonvertujes napr. string
> (MyAction), strPas (MyAction),...
>
> Ivan Turcan
>

OK, ale ja som nehovoril o pascalovskych retazcoch,
resp. o retazcovej konstante. Potrebujem vytvorit
NOVY huge string a tento vratit v resulte.
(bez nutnosti konverzii - ide mi o rychlost).

Vlkovic


>---------------------------
> Ahoj,
>
> potreboval by som poradit, ako v assemblerovskej
> funkcii vratit string.
>
> Nieco na sposob:
>
> FUNCTION Action: string; assembler;
> ASM
> ...
> vytvorenie noveho retazca
> pozadovana akcia s retazcom
> priradenie retazca do Result
> ...
> END;
>
> Pozeral som v zdrojaku SYSTEM.PAS, ako funguje praca
> s retazcami v assemblerovskych rutinach, chcel som
> vyuzit napriklad _NewAnsiString, ale kompilator ma
> k tejto funkcii nepusti (je pri nej poznamka len pre
> ladiacke ucely!?).
> Mimochodom, aky je vyznam identifikatora "_" na
> zaciatku nazvu niektorych rutin v tejto unite?.
>
> Pri prehladavani zdrojakov k Delphi (D3) som
> nikde nenasiel implementaciu assemblerovskej
> funkcie vracajucej string - naozaj to v Delphi
> nie je mozne?
>
> Vlkovic


datum

[*] Ivan Virag <ivirag(zv)hopi(tec)cz> - 29.1.2001 11:57:00

RE: datumDobry den
Podle me je treba si za pomoci procedury DecodeDate z obou datumu
vygenerovat den a ty potom porovnat.
Ivan Virag
-----P�vodn� zpr�va-----
Od: Raul Endymion [SMTP:raul(zv)raphael(tec)cz]
Odesl�no: 29. I 2001 9:21
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: datum

Dobr� den,

jak nejjednoduseji zjistim, zda jedno datum je vcera ?
co takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < now;
end;

nebo takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
abych zjistil pouze datum z now a ne i hodinu apod.}
end;

dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
spusteni)

--
S pozdravem,
Raul
raul(zv)raphael(tec)cz

OT: ISDN a free internet

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 29.1.2001 12:04:14

Omlouvam se za offtopic, ale nikde se mi nedari zjistit:
1. Pokud si poridim namisto klasickych linek EuroISDN od Telecomu, lze se tudy pripojovat k free poskytovateli internetu?
(jedna se o Ceske Budejovice)
2. Jake koncove zarizeni mam pozadovat po Telecomu, aby pripjeni PC k internetu vyslo co nejlevneji.

Dik a jeste jednou se omlouvam
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================

Qrep

[*] Starka <starka(zv)ticketpro(tec)cz> - 29.1.2001 12:21:04

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Dobry den,
prosim pekne nevite nekdo proc se mi pri pouziti
QReportu v Delphi 5 vytrvale vytvareji jen sestavy
s jednim radkem na strance? Situace je takova:
otevrena TTable, TQuickRep napojena na TTable,
jeden detail band a na nem jeden TQRDBText napojeny
na TTable. A pri prewiev i pri vlastnim tisku dostavam
vytrvale jen jeden radek na jedne strance, coz pri
poctu 490 radek je dost na nic. Jestli mi nekdo muzete
pomoci, byl bych vam moc vdecny. Dekuji Jarka

Mirne OT: Resource editor

[*] Zdenek Drvota <drvota-l(zv)zds(tec)cz> - 29.1.2001 12:25:53

Ahoj,
### Zbysek Hlinka napsal dne 26 Jan 01, v 10:52 :
> On 25 Jan 2001, at 16:32, Zdenek Drvota wrote:
>
> > co se tyce ceskeho Pegasus Mailu, doporucuji
> >
> > P.S. Nepochodil jsem u PM ani s pokusy pomoci jinak
> > velmi uspesneho Lokalizatoru (Z.H.)
>
> A v cem byl problem? Prave jsem zkusil zlokalizovat
> winpm-32.exe, verze 3.12c, Lokalizatorem verze 4.7, a nenarazil
> jsem na zadny problem. Je ovsem nutne to delat pod NT nebo
> 2000, a resourcy vrazit zpet do exe.
>
Byla to tusim verze PM 3.11 a Loc3Free na W2000.
Stringy jsem prelozil a ulozil, ale PM uz nenastartoval,
coz byla takova drobna zavada :-) (takze dalsich pokusu
jsem zanechal)


--
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
--


None

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 29.1.2001 12:28:58

Lepe problem specifikuj,
ja to chapu tak
A := IntToStr(123 + 45);
nebo
B := FloatToStr(123 + 45);
Pavel

----- Original Message -----
From: <mdelphi(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 29, 2001 10:18 AM


> Pot�ebuji p�ev�st ��slo na form�t XXE+YY v typu string. Je na
> to n�jak� specieln� fce ?
>
> EMAIL.CZ - Vase posta je vzdy s Vami na
> http://www.email(tec)cz
>
>

Win ME

[*] Jan Naiser <tua(zv)wo(tec)cz> - 29.1.2001 12:37:14

Ahoj,

neprozretelne jsem je minuly rok doporucil jednomu zakaznikovi, abychom to
vyzkouseli a i kdyz jsem nedelal zadne presne testy, zdaji se mi byt citelne
pomalejsi oproti W98SE na stejnem stroji a obcas se chovaji dosti podivne.
Na PC je pouze "cisty" system a bezi tam pouze 1 aplikace.
Uvedu jenom 2 svoje postrehy, s kterymi jsem se setkal.
1) Pri prevodu cca 15 tis. polozek z DBF do PX databaze v lokalnim provozu,
kde na W98 bezelo nekolikrat vse normalne, na ME se to asi v polovine
zpomalilo dost hrubym zpusobem, takze misto asi 50 rec/sec to zacalo jit
1rec/sec a to uz jsem nevydrzel a po 1 hodine shodil a radeji naplnil na
jinem PC s WIN98, kde to slo normalne. Toto se udalo asi 2x pri potrebe
importovat ve dvou ruznych castech programu. Citelne zpomaleni aplikace a
celeho PC se ovsem udalo jiz vicekrat i v beznem provozu a pomohl jenom
restart. System bezel, ale jakoby byl pretizeny ci co?
2) Obcas, kdyz program pracuje naplno, zpomali se kurzor mysi (PS) pri
presunu pres obrazovku takovym zpusobem, jako by neco blokovalo klasicke
porty (COM, LPT) nebo jakoby byl kurzor rizen nejakym procesem na pozadi a
ten se citelne zpomalil. To jsem na WIN95 ani WIN98 v takoveto situaci nikdy
nezapsal. (Pouze napr. pri inicializaci modemu, kdy mys na chvili prestane
reagovat, coz je normalni).
Pritom masina je nova Celeron 677 s deskou AOpen, 64MB RAM, HDD 20G,...
Jinde to pod W98 chodi normalne a slusne. Nemel jsem cas se tim vice zatim
zaobirat a zadny patch na ME jsem zatim nenasel. Ale kdybych se rozhodoval
ted, volill bych W2k nebo W98SE.

Zkus pohledat na inetu, kde jsem pred nedavnem nasel nejake clanky s
podobnymi zkusenostmi z provozu. ME obsahuji nejakou novou funkci pro
zabezpeceni dat (ztratu v pripade padu systemu), ktera udajne prave
zpomaluje (autor psal az 1/3 rychlost PC v porovnani s WIN95/98).

Honza Naiser.

----- Original Message -----
From: Bednar��k Dalibor <dalibor(zv)torola(tec)cz>
To: forum <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 29, 2001 7:32 AM
Subject: OT: Win ME


> Ahoj, predem se omlouvam za OT.
>
> Mate nekdo praktizke zkusenosti s Windows ME?
> Jsou lepsi nez 98SE? Stabilnejsi? atd..
> Pripadne jestli jsou nejake problemy s provozem Delphi ..
>
> Predem diky
>
> Dalibor
>
>

datum

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 29.1.2001 12:56:26

> jak nejjednoduseji zjistim, zda jedno datum je vcera ?
> co takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < now;
> end;
>
> nebo takhle ?
>
> function newday(Datum1 : String) : Boolean;
> begin
> result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
> abych zjistil pouze datum z now a ne i hodinu apod.}
> end;
>
> dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
> casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
> spusteni)

Existuje funkce date, ktera by mela vratit jen datum, nicmene i
kdyz je k dispozici datum s casem (at uz z fce now nebo v nejake
promenne typu TDateTime), je datum cela cast toho cisla, takze
se da pouzit neco jako Int(dt) nebo - s ohledem na problemy se
zaokrouhlovanim (viz paralelni mail) Int(dt + 0.0000000001);

David

ISDN a free internet

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2001 13:10:53

From: "Richard Valny" <Richard.Valny(zv)oku-st(tec)cz>
> 1. Pokud si poridim namisto klasickych linek EuroISDN od Telecomu, lze se
> tudy pripojovat k free poskytovateli internetu?

Ahoj,

napriklad u Czech On Line (Volny) patrne ano, uvadeji to na svych strankach
(http://www.vol(tec)cz/cgi-bin/pricelist/cz) , ovsem pouze zakladni 64k rychlost.
Vzhledem k tomu, ze 56k modemem se da v prumeru pripojit na rychlosti cca 50k,
tak nevidim v ISDN zadnou velkou vyhodu. Snad jen to, ze je to jediny zpusob
jak u monopolu docilit nejake zarucene vlastnosti linky pro datovy prenosy.

> 2. Jake koncove zarizeni mam pozadovat po Telecomu, aby pripjeni PC k
> internetu vyslo co nejlevneji.

Kombinace Telecom - ISDN a "nejlevneji" nejde moc k sobe ;-). Pokud to chces
pro firmu, tak bych se byt tebou nejdrive podival na pocitane bezdraty:
http://www.lupa(tec)cz/clanek.phtml?show=1301

Petr Vones, amatersky programator

Debug in design time

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2001 13:18:47

From: "Josef Zvonicek" <prosoft(zv)prosoft(tec)cz>
> Bohuzel musim pozivat PlayStation. Ale vyzkousim to pod NT. Nemuze to
> byttake tim, ze mam poze D5 PRO ane ENT?

Ahoj,

vzhledem k tomu, ze to chce nahravat VCLMid50 balicek tak asi ano. Zkus nejak
zjistit kde se tam bere.

Petr Vones, amatersky programator


Win ME

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2001 13:20:23

From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
> Mate nekdo praktizke zkusenosti s Windows ME?
> Jsou lepsi nez 98SE? Stabilnejsi? atd..

Ahoj,

Win95, 98 a Me jsou z tohoto hlediska temer naprosto stejne. Pokud potrebujes
spolehlivy system (na kterem ale nepujdou hrat vsechny mozne hry ;-) tak jsou
resenim NT, kde je spolehlivost zajistena zcela odlisnou koncepci jadra OS.
Zvysit 'spolehlivost' Win9x lze instalaci Merice systemovych prostredku, ktery
budes automaticky spoustet po startu Windows.

Petr Vones, amatersky programator

Funkcia v assemberi vracajuca string

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

From: "Peter Vlkovic" <vlkovic(zv)minv.sk>
> OK, ale ja som nehovoril o pascalovskych retazcoch,
> resp. o retazcovej konstante. Potrebujem vytvorit
> NOVY huge string a tento vratit v resulte.
> (bez nutnosti konverzii - ide mi o rychlost).

Ahoj,

zkus vice popsat ten problem, treba by to slo cele resit i jinak.

Petr Vones, amatersky programator


Qrep

[*] "Fait Ji��, ml." <fait(zv)jakl(tec)cz> - 29.1.2001 13:42:43

Je treba nastavit vlastnost TQuickReport.dataset (published) na dataset.

Jiri Fait
[mailto:fait(zv)jakl(tec)cz]
[mailto:ftsoft(zv)iol(tec)cz]

> -----Original Message-----
> From: Starka [mailto:starka(zv)ticketpro(tec)cz]
> Sent: Monday, January 29, 2001 12:21 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Qrep
>
>
> Dobry den,
> prosim pekne nevite nekdo proc se mi pri pouziti
> QReportu v Delphi 5 vytrvale vytvareji jen sestavy
> s jednim radkem na strance? Situace je takova:
> otevrena TTable, TQuickRep napojena na TTable,
> jeden detail band a na nem jeden TQRDBText napojeny
> na TTable. A pri prewiev i pri vlastnim tisku dostavam
> vytrvale jen jeden radek na jedne strance, coz pri
> poctu 490 radek je dost na nic. Jestli mi nekdo muzete
> pomoci, byl bych vam moc vdecny. Dekuji Jarka
>
>
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 5.1.2001
>

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


ExpressQuantumGrid

[*] delphi(zv)htkpro(tec)cz - 29.1.2001 13:52:26



>Ahoj,
>zajima me editace, jestli to tam je vyreseno nejak inteligentne. Jestli je
>mozno editovat v Gridu v pripade, ze Select je z vice tabulek apod. Myslim
>rozumne editovat, ne jako ve standardnim DBGridu.

Obavam se to prilis nesouvisi s gridem, ExpressGrid umoznuje editaci dat
primo v gridu a to velice efektni, ale to zda je mu podhozen dataset, ktery
je postaven jako join z vice tabulek nebo pouze z jedne s tim prilis
nesouvisi. Pouze snad pokud jde o moznost zakazani editace nekterych
sloupcu, coz lze zakazat na primo na urovni gridu.
Nicmene s ohledem na validaci dat a ergonomii porizovani je v mnoha
pripadech lepsi nechat editovat data ve zvlastnim formulari.
V posledni verzi ExpressGridu 3.0 je k dispozici sada komponent jak pro
editaci primo v gridu tak jejich obdoba pro editaci na formulari. Lze tak
dosahnout konzistentniho vzhledu aplikace.

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


>Zakaznik si to vymyslel, a ja mam zjistit, jestli to jde.. :-(
>
>S pozdravem
>Ota Maly
>
>PaPouch elektronika
>http://www.papouch.com
>
>> -----Original Message-----
>> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
>> delphi(zv)htkpro(tec)cz
>> Sent: Friday, January 26, 2001 5:47 PM
>> To: delphi-l(zv)fwd(tec)cz
>> Subject: Re: ExpressQuantumGrid
>>
>>
>>
>>
>> --- P�vodn� dopis
>> ----------------------------------------------------------
>> Datum: 26.01.2001 16:07
>> Od: ota.maly(zv)volny(tec)cz
>> Pro: Konference DELPHI (DELPHI), ...
>> V�c: Fw: ExpressQuantumGrid
>> ------------------------------------------------------------------
>> ----------
>> >Ahoj,
>> >mate nekdo zkusenosti s timto Gridem?
>> >Potreboval bych se zeptat na par veci, vyrobce nema trial a demo ma jen
>> >jako
>> >exe :(
>>
>> Tak se ptej, pouzivame prakticky vsechno od devexpress.
>>
>> S pozdravem
>> Jan Kadlecek
>> HTK Pro s.r.o.
>> www.dev-shop(tec)cz
>>
>>
>> >
>> >S pozdravem
>> >Ota Maly
>> >
>> >PaPouch elektronika
>> >http://www.papouch.com
>> >
>> >
>> >
>>
>
>

gif image

[*] Raul Endymion <raul(zv)raphael(tec)cz> - 29.1.2001 13:59:30

Dobr� den,

delal jste nekdo nekdy pomoci TGIFImage od
http://www.melander.dk/delphi/gifimage/
transparentni gif ?
Jde mi o jednoframovy obrazek ale na transparentnim pozadi a nevim
jak na to, poradte...


--
S pozdravem,
Raul
raul(zv)raphael(tec)cz

datum

[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 29.1.2001 14:16:56

result := Trunc(StrToDate(datum1)) <= Trunc(now()-1);

// Trunc odrizne casovou cast
// Cela cast je vlastne pocet dni
// Pokud ponechas pouze znamenko '=' zjistujes zda datum je vcera

Jan Skopovy

----- Original Message -----
From: "Raul Endymion" <raul(zv)raphael(tec)cz>
Subject: datum


> Dobr� den,
>
> jak nejjednoduseji zjistim, zda jedno datum je vcera ?

Preklad vlastniho balicku

[*] Jiri Hostinsky <hostinsky(zv)teska(tec)cz> - 29.1.2001 14:19:53

Ahoj,

uz se mi to stalo znova a docela me to rozciluje

Mam v D4 C/S vlastni balicek komponent, jeho adresar a cesty k jednotkam,
ktere vola, jsou v Environment Option, takze se preklada pri rebuildu
kazdeho projektu.
Cas od casu se mi ale stane, ze nejde prelozit jako balicek (i tam jsou
definovany vsechny potrebne cesty). To sice neni na okamzite harakiri nebo
novou instalaci Delfina, protoze projekty jedou dal, ale presto mi to vadi
(myslim, ze mimo balicek nejdou napr. pridavat property).
Preklad balicku konci tim, ze nezna globalni promennou z jednotky uvedene v
USES, ktera tam samozrejme je. Chyba asi nebude mezi mou zidli a klavesnici,
protoze staci vymenit deklaraci za jinou promennou teze volane jednotky
uvedenou o radek niz a obdobna chyba vznikne jinde (jina promenna, jina
volajici jednotka).

Nevite nekdo, co s tim ?

Jiri Hostinsky


D5 Prof a SQL Server pres BDE

[*] Bardon <bardon(zv)akord-soft(tec)cz> - 29.1.2001 14:25:47

Diky, o to se snazim take (koupil jsem je), ale projekt je moc velky a v
realnem case takovy prechod nezvladnu, tak hledam jinou cestu. Takze otazka
bohuzel trva.

-----P�vodn� zpr�va-----
Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
Odesl�no: 26. ledna 2001 19:30
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: D5 Prof a SQL Server pres BDE

From: "Bardon" <bardon(zv)akord-soft(tec)cz>
> Kdyz mum D5 Proffesional, tak se nemuzu prihlasit pres BDE k MS SQL (SQL
> link mam z D3 C/S). Co bych si musel dokoupit, kdybych chtel pristupovat
k
> MS SQL pres BDE z D5?

Ahoj,

mel by jsi si dokoupit nejake ADO komponenty (AdoExpress, Adonis ...) a na
BDE
pro pristup k SQL databazim rychle zapomenout.

Petr Vones, amatersky programator

ISDN a free internet

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 14:40:21

ahoj,

EuroISDN provozujeme asi 2 roky a k free poskytovateli se pripojit lze (z
Jablonce). Napriklad VOL pise ze ma v Jablonci n/N (v CB urcite taky) V90
linku. Moc to ale nedoporucuju, protoze se mi zda ze to u VOL,WOL vice
vyskakuje nebo chodi pomaleji nez u IOL pripadne NEXTRy.
Jako koncove zarizeni mame ustrednu SIEMENS2060(neni potreba pokud chces
pres ISDN jen serfovat) a kartu na i-net TELES SO 16.3 a chodi to pomerne
slusne (stabilne 7.5kB/s).

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Richard Valny
Sent: Monday, January 29, 2001 12:04 PM
To: delphi-l(zv)fwd(tec)cz
Subject: OT: ISDN a free internet


Omlouvam se za offtopic, ale nikde se mi nedari zjistit:
1. Pokud si poridim namisto klasickych linek EuroISDN od Telecomu, lze se
tudy pripojovat k free poskytovateli internetu?
(jedna se o Ceske Budejovice)
2. Jake koncove zarizeni mam pozadovat po Telecomu, aby pripjeni PC k
internetu vyslo co nejlevneji.

Dik a jeste jednou se omlouvam
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE
=========================================

Vzdaleny pristup k SQL Serveru

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 14:40:28

Ahoj,

nevim o jakou aplikaci se pokousis.
Kdyz bych napriklad potreboval vypisy z tabulek MSSQL serveru a nejake
jednoduchosti k tomu (vyhledavani, apod.), tak bych to resil pomoci ASPcek
(pokud je na serveru WinNT nebo Win2000), na to klientovi staci jen
MSExplorer a NIC vic, protoze se pristupuje na MSSQL na strane serveru a
naucit se ASPcka psat je otazka nekolika tydnu - pokud znas HTML jazyk.
Jinak (pokud nechces mit na klientech ADO apod.) musis resit komunikaci mezi
aplikacemi.

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Petr
Reichl
Sent: Thursday, January 25, 2001 9:58 AM
To: ListServ - Delphi (el. adresa)
Subject: Vzdaleny pristup k SQL Serveru


Dobry den,

resim nasledujici situaci a potreboval bych znat vas odborny nazor.

Mam SQL Server v siti na serveru. Na stejnem pocitaci je i aplikace, ktera s
SQL serverem komunikuje. Takto to funguje dobre, jak jinak. Problemem je,
pokud uzivatel z jineho pocitace v dane siti, bez ADO, ODBC driveru na svem
pocitaci, spusti ze sitoveho disku danou aplikaci.

Takto nejak bych si to predstavoval, aby to fungovalo. Je to mozne? Jde
pristupovat k ADO, pripadne primo k SQL Serveru, ktery je nainstalovan na
jinem pocitaci v siti?

S pozdravem,

Petr Reichl


Qrep

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 14:40:22

ahoj,

doporucuju zapojit udalost OnNeedData a v ni posouvat databazi po vetach az
do konce.

M.Jirman


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Starka
Sent: Monday, January 29, 2001 12:21 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Qrep


Dobry den,
prosim pekne nevite nekdo proc se mi pri pouziti
QReportu v Delphi 5 vytrvale vytvareji jen sestavy
s jednim radkem na strance? Situace je takova:
otevrena TTable, TQuickRep napojena na TTable,
jeden detail band a na nem jeden TQRDBText napojeny
na TTable. A pri prewiev i pri vlastnim tisku dostavam
vytrvale jen jeden radek na jedne strance, coz pri
poctu 490 radek je dost na nic. Jestli mi nekdo muzete
pomoci, byl bych vam moc vdecny. Dekuji Jarka


Win ME

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 14:40:24

ahoj,

Take sem testoval WinME a zastavam nazor ze to neni system na praci.
Nechodil mi tam starsi HW, zabira to podstatne vice mista na disku (to mi
ale moc nevadilo), jadro podobne W9x tak kdyz neco spadne je to stejne v ...
Chabou vyhodou muze byt snad jen to, ze tam je Explorer 5.5 a novejsi
DirectX a novejsi ovladace (precejen v tomhle jsou W98 podstatne starsi) a
taky trochu design "Ovladaciho panelu" a "Pruzkumniku" blizici se W2k. A
jsou tam taky hry po internetu s nekym jinym - uz rikam "system na hry".

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Bednar��k Dalibor
Sent: Monday, January 29, 2001 7:33 AM
To: forum
Subject: OT: Win ME


Ahoj, predem se omlouvam za OT.

Mate nekdo praktizke zkusenosti s Windows ME?
Jsou lepsi nez 98SE? Stabilnejsi? atd..
Pripadne jestli jsou nejake problemy s provozem Delphi ..

Predem diky

Dalibor

None

[*] Sl�va Roman <rsliva(zv)novahut(tec)cz> - 29.1.2001 15:05:16

Ahoj
Taky muzes pouzit

function Convert (Value : extended) : string
begin
result := FormatFloat("## ###,###",Value); // viz help
end;

Ahoj Roman


Debug in design time

[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 29.1.2001 15:17:06

Je to tak. Je potreba mit verzi ENT. Ten soubor se jmenuje vclmid50.dcp aje
v adresari LIB.Udajne je to MIDAS knihovna. Ale kde se mi tam bere odkaz to
ja nevim. Podle mne je to nekde natvrdo. Nenanpada te neco co s tim, kde by
mohl byt odkaz na to?
Prece nebudu k vuli trace(ovani) kupovat ENT verzi kdyz SQL, MIDAS,CORBA a
ostatni hruzy jsou mi na nic.
Dik ZVO.
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 29, 2001 1:18 PM
Subject: Re: Debug in design time


> From: "Josef Zvonicek" <prosoft(zv)prosoft(tec)cz>
> > Bohuzel musim pozivat PlayStation. Ale vyzkousim to pod NT. Nemuze to
> > byttake tim, ze mam poze D5 PRO ane ENT?
>
> Ahoj,
>
> vzhledem k tomu, ze to chce nahravat VCLMid50 balicek tak asi ano. Zkus
nejak
> zjistit kde se tam bere.
>
> Petr Vones, amatersky programator
>
>

Debug in design time

[*] Jirka Skladal <jirka.skladal(zv)seznam(tec)cz> - 29.1.2001 15:20:00

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj lidicky mam takovej dotazek.
Jak se mam v Inter Base dotazat na to jestli existuje dana tabulka? Nebo jak to mam vyresit, kdyz nevim jestli je vytvorena a potrebuju ji vytvorit.
Kdyz uz bude existovat a ja se ji pokusim vytvorit, tak me to zarve. A kdyz bych ji chtel pouze vyprazdnit a nebude vytvorena, tak to taky zarve. Tak jak vytvorit novou "cistou" tabulku dane struktury?

A jeste jeden poddotaz: jak se daji zpracovavat v Delphi pomoci tech komponent k IB chyby ktere zarve Inter Base20

Dekuji za odpoved. Jirka


Funkcia v assemberi vracajuca string

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 29.1.2001 15:32:10


> OK, ale ja som nehovoril o pascalovskych retazcoch,
> resp. o retazcovej konstante. Potrebujem vytvorit
> NOVY huge string a tento vratit v resulte.
> (bez nutnosti konverzii - ide mi o rychlost).

Tak si napis vlastni _NewANSIString treba takhle:

type
tANSIStringHeader = packed record
ashReference : dword;
ashLength : dword;
end;
const
nANSIStringHeaderSize = sizeof(tANSIStringHeader);

function _NewANSIString(aLength:integer): ANSIString; assembler;
asm
TEST EAX,EAX
JLE (zv)(zv)null
PUSH EDX
PUSH EAX
ADD EAX,nANSIStringHeaderSize+1
CALL SysGetMem
ADD EAX,nANSIStringHeaderSize
POP EDX
MOV [EAX-nANSIStringHeaderSize].tANSIStringHeader.ashLength,EDX
MOV [EAX-nANSIStringHeaderSize].tANSIStringHeader.ashReference,1
MOV byte ptr [EAX+EDX],0
POP EDX
JMP (zv)(zv)Done
(zv)(zv)null:
XOR EAX,EAX
(zv)(zv)Done:
MOV [EDX],EAX
end;

Funguje to podobne, jako SetLength() s tim, ze to vraci nove alokovany
ANSIString pres stack jako Result. Pouziti v Pascalu je napr.

var
Len: integer;
S: ANSIString;
begin
Len := 10;
S := _NewANSIString(Len);
end;

s tim, ze S ma delku 10 znaku, jejichz obsah neni definovan.


Bye, pf

SQL & Delphi 5

[*] Ladislav Danek <Ladislav.Danek(zv)DENWEL.CZ> - 29.1.2001 15:39:39

Dobry den,

potreboval bych vytvorit klienty pro MS SQL server. Stahnul jsem si
komponentu "SQL Query", lec nemuzu se s ni vubec pripojit k serveru.
Vite nekdo co s tim, pripadne jine reseni?

Dekuji

Danek L.

ISDN a free internet

[*] Mion <mion(zv)quick(tec)cz> - 29.1.2001 15:53:43

ISDN ma na 64k jednu podstatnou vyhodu - touto rychlosti funguje i
upload (remote webmasteri, jasejte), posilani posty a podobne. Analogovy
65k modem uploaduje pouze rychlosti 28k8, coz je uz dost velky rozdil.

P.S. - nejen u monopolu - jakykoliv poskytovatel analogoveho pripojeni
nebude nikdy plne zarucovat datove prenosy na analogovych linkach.

Mion



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

Ahoj,

napriklad u Czech On Line (Volny) patrne ano, uvadeji to na svych
strankach
(http://www.vol(tec)cz/cgi-bin/pricelist/cz) , ovsem pouze zakladni 64k
rychlost.
Vzhledem k tomu, ze 56k modemem se da v prumeru pripojit na rychlosti
cca 50k,
tak nevidim v ISDN zadnou velkou vyhodu. Snad jen to, ze je to jediny
zpusob
jak u monopolu docilit nejake zarucene vlastnosti linky pro datovy
prenosy.

> 2. Jake koncove zarizeni mam pozadovat po Telecomu, aby pripjeni PC k
> internetu vyslo co nejlevneji.

Kombinace Telecom - ISDN a "nejlevneji" nejde moc k sobe ;-). Pokud to
chces
pro firmu, tak bych se byt tebou nejdrive podival na pocitane bezdraty:
http://www.lupa(tec)cz/clanek.phtml?show=1301

Prepisovani textu v okne Watch

[*] Ales Martinik <amartinik(zv)artbrno(tec)cz> - 29.1.2001 15:59:29

Pokud mam v okne watch delsi retezec nebo record, prepisuje se mi obsah
porad
pres sebe, takze nakonec vidim temer cerny pas.
Mam D5 s update packem 1 a W2K. Problem zacal po nainstalovani SP1 pro W2K
nebo
MSIE 5.5. Vim, ze jde o pomstu MS, ale nedalo by se to nejak resit?
Stejna konfigurace na Win95 jede bez problemu (teda az na to, ze pri ladeni
obcas spadne,
jak to W95 delaji - crash every 2 hours).
Dekuji za radu
Ales Martinik

Restrukturalizace Paradox tabulky

[*] Radek Kala <kala(zv)atlas(tec)cz> - 29.1.2001 17:24:45

Zdravim,

potrebuji udelat restrukturalizaci Paradox tabulky. Z prikladu jsem
vycetl, jak udelat AddField a ChangeField. Bohuzel tam neni nic o
DROP field a veskere moje pokusy zklamaly.

Nemate nekdo po ruce (nebo mysi) kousek kodu, jak zrusit field z
tabulky pomoci DbiDoRestructure?

Diky


upgrade DAO

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 17:35:27

ahoj,

a co takhle mrknout do instalacek toho Exploreru s kterym ti to funguje, a
vzit si ten nakej DAO.cab primo odtamtud.

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin
Sent: Thursday, January 25, 2001 5:03 PM
To: delphi-l(zv)fwd(tec)cz
Subject: upgrade DAO


este raz by som chcel poprosit, ci by mi niekto nevedel povedat ktoru
aktualizaciu z microsoft.com pre W95 mam stiahnut aby mi fungoval program
pouzivajuci DAO komponenty od E. SALAYE. Pripaja sa na databazu Acces. Ak na
pocitac nainstalujem IE 5 tak slape. Ale nechcem tam davat IE. Hladal som
pod ADO aj DAo ale je tam viacero polziek.

Uzavreni pripojeni pres NMFTP

[*] JIM Design <jim.design(zv)iol(tec)cz> - 29.1.2001 17:35:20

ahoj,

na http://delphi-jedi.org/Jedi:JCLDOWNLOADS (doufam)
je pekny balik RAS komponent, ktere dovedou zjistit jendotliva probihajici
pripojeni a ukoncovat je.

M.Jirman

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ladislav Fitz
Sent: Monday, January 29, 2001 10:18 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Uzavreni pripojeni pres NMFTP


Dobry den

nevite nekdo jak nasilne z jineho programu uzavru spojeni s internetem
vytvorene pomoci NMFTP komponenty

predem diky za kazde nakopnuti

Prepisovani textu v okne Watch

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 29.1.2001 17:45:49

From: "Ales Martinik" <amartinik(zv)artbrno(tec)cz>
> Mam D5 s update packem 1 a W2K. Problem zacal po nainstalovani SP1 pro W2K
> nebo MSIE 5.5. Vim, ze jde o pomstu MS, ale nedalo by se to nejak resit?

Ahoj,

myslim ze nejde o pomstu ale o chybu ve Watch okne, me se to stavalo i Win95.
Bohuzel se mi nepodarilo najit presne situaci, kdy se to vzdy projevi.

Petr Vones, amatersky programator

OT Win ME

[*] Vladislav Cadsky <delphi(zv)cadsky(tec)cz> - 29.1.2001 18:02:08

Vzdyt je to jasne uz dlouho a konecne i microsoft to potvrdil, ze win9x jsou
jen herni konzole. Jedine NT na praci jsou vhodne.
http://www.microsoft.com/cze/windows/default.asp - rozdeleni Windows do
pr�ce, Windows pro dom�c� pou�it�.
Vlada

----- Original Message -----
From: "JIM Design" <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 29, 2001 2:40 PM
Subject: RE: Win ME


> ahoj,
>
> Take sem testoval WinME a zastavam nazor ze to neni system na praci.
> Nechodil mi tam starsi HW, zabira to podstatne vice mista na disku (to mi
> ale moc nevadilo), jadro podobne W9x tak kdyz neco spadne je to stejne v
...
> Chabou vyhodou muze byt snad jen to, ze tam je Explorer 5.5 a novejsi
> DirectX a novejsi ovladace (precejen v tomhle jsou W98 podstatne starsi) a
> taky trochu design "Ovladaciho panelu" a "Pruzkumniku" blizici se W2k. A
> jsou tam taky hry po internetu s nekym jinym - uz rikam "system na hry".
>
> M.Jirman
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Bednar��k Dalibor
> Sent: Monday, January 29, 2001 7:33 AM
> To: forum
> Subject: OT: Win ME
>
>
> Ahoj, predem se omlouvam za OT.
>
> Mate nekdo praktizke zkusenosti s Windows ME?
> Jsou lepsi nez 98SE? Stabilnejsi? atd..
> Pripadne jestli jsou nejake problemy s provozem Delphi ..
>
> Predem diky
>
> Dalibor
>
>
>

TTable komponenta versus SQL server 2000 (microsof

[*] Martin Macko, M-PRO s.r.o. <martinm(zv)m-pro(tec)cz> - 29.1.2001 17:14:11 -0000

Pri cachedUpdates je potreba ApplyUpdates a na tabulku pak asi jeste
Refresh.

_____

Martin MACKO,
M-PRO s.r.o.
U m�sta Chersonu 1595/1
tel.: +420 (35) 610 79 48,
610 72 31 a� 33

martinm(zv)m-pro(tec)cz
+420 (603) 48 39 40

_____



-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
vlada_ponechal(zv)post(tec)cz
Sent: Sunday, January 21, 2001 9:33 PM
To: delphi-l(zv)fwd(tec)cz
Subject: TTable komponenta versus SQL server 2000 (microsoft)


Zdar panove,
Chci vas pozadat o pomoc. Chci udelat ne moc slozitou aplikaci v D3 prof.
Mam server SQL
2000 ent. A za pomoci ODBC a BDE na nej pristupuji. Pouzivam pritom
komponentu TTable,
protoze se mi jiz predtim osvedcila (ne teda ze SQL serverem od MIc.)Narazil
jsem vsak na
problem. Pri vkladani a ukladani vet do tabulek mam dva stavy. Prikazem
table1.insert vlozim
vetu (ta se mi objevi i v dbgrid) ale po pouziti table1.post, se najednou
veta strati (i z
dbgrid). Kdyz tabulku restartuji, objevi se vsechny vety. Prisel jsem na
to, ze na to plati,
kdyz zapnu (true) cachedUpdates v komponente ttable. Problem, je v tom, ze
potom vsechno
funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se vrati do
vychoziho stavu.
Panove, nenapada Vas, cim to je? Me to pripada, jako kdyby to do tabulky
vubec neulozil nebo
v prvnim pripade spatna komunikace s SQL serverem...

Diky,

Vlada

Avast32 (VPS 4.12.2000): zprava neobsahuje virus


Avast32 (VPS 4.12.2000): zprava neobsahuje virus


current context v NetWare 4

[*] Kamil Muzika <muzikak(zv)hotmail(tec)com> - 29.1.2001 20:31:48

jak se da zjistit kontext uzivatele
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.

Qrep

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 29.1.2001 21:45:04

Ahoj

> prosim pekne nevite nekdo proc se mi pri pouziti
> QReportu v Delphi 5 vytrvale vytvareji jen sestavy
> s jednim radkem na strance? Situace je takova:
> otevrena TTable, TQuickRep napojena na TTable,
> jeden detail band a na nem jeden TQRDBText napojeny
> na TTable. A pri prewiev i pri vlastnim tisku dostavam
> vytrvale jen jeden radek na jedne strance, coz pri
> poctu 490 radek je dost na nic. Jestli mi nekdo muzete
> pomoci, byl bych vam moc vdecny. Dekuji Jarka

Neni mi uplne jasne, zda mas sestavu s 490 strankami nebo tvoje sestava obsahuje jednu
stranu s pouze jednim (aktualnim) radkem.

Pokud mas na kazde strance pouze jeden radek, pak zrejme mas v DetailBandu zapnuty prepinac
ForceNewPage nebo nektery jiny Band si vynucuje odstrankovani (predpokladam, ze tvuj
DetailBand ma "rozumnou" velikost).

Pokud tvoje sestava ma pouze jeden radek, pak nemas dobre nastavenou vlastnost Dataset u
TQuickRep komponenty.


Jinak - na tvorbu sestav existuje nekolik dobrych (ponekud vice vizualnich) end-user
generatoru zalozenych na QuickReportu: Napriklad QRDesigner na www.thds.de. Je sice
placeny, ale dobry.

Tomas


ExpressQuantumGrid na SQL

[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 29.1.2001 22:09:24

Ahoj

Minuly tyden tady byl nekolikrat zminen ExpressQuantumGrid z www.devexpress.com. Demo
soubor s malou PDX databazi vypada skutecne velmi zajimave.

Zajimalo by mne, jakym zpusobem se tato sada komponent chova pri pouziti SQL (napriklad
IBobjects+Interbase nebo neco+MSSQL).
Taky se mi zda, ze by komponenty mohly byt pomale pri vetsim poctu zaznamu v prohlizene
databazi (jakpak se to asi bude chovat pri 10000 nebo 100000 zaznamech v tabulce - treba i
s paradoxem) nebo pri praci na siti.

Ma s tim nekdo nejake prakticke zkusenosti ?
Prikladek s pouzitim by se taky hodil.

Diky

Tomas


IB6 - sumovanie pomocou GROUP BY

[*] Roland Turcan - RoTurSoft <rotursoft(zv)nextra.sk> - 29.1.2001 23:23:04

Zdravim.

Chcel by som vykovat nieco taketo

select substr(ucetucs,1,3),sum(prijem),sum(vydaj) from banvypis group by
substr(ucetucs,1,3)

ale nepaci sa mu funkcia za GROUP BY

Ako na to ?

Dakujem

Roland.

Restrukturalizace Paradox tabulky

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 29.1.2001 23:23:41

Ahoj,

> potrebuji udelat restrukturalizaci Paradox tabulky. Z prikladu jsem
> vycetl, jak udelat AddField a ChangeField. Bohuzel tam neni nic o
> DROP field a veskere moje pokusy zklamaly.

pouzi sql prikaz:

query1.sql.text:="alter table <tabulka> drop <pole>"
query1.execsql;

Pavol Stolc
pstolc(zv)sc.sknet.sk


IB6 - vytvorenie novej databazy

[*] Roland Turcan - RoTurSoft <rotursoft(zv)nextra.sk> - 30.1.2001 00:19:14

Zdravim.

Ako riesite vytvorenie novej databazy u zakaznika. Formou sql prikazov alebo
kopia temporary database ?

Dakujem.

Roland.

editace v gridu - opet

[*] Ren� Otisk - 30.1.2001 06:00:19

Otazka je, kdyz mas v Gridu nejaky slozity View...

Sroub

----- Original Message -----
From: Zbysek Hlinka <hlinka(zv)hlinka(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 26, 2001 10:52 AM
Subject: Re: editace v gridu - opet


> On 23 Jan 2001, at 14:46, Ota Maly wrote:
>
> > zakaznik se opet (a tvrdeji) ozval s tim, ze by chtel editaci v gridu.
> > Proto se ptam:
>
> Jestlize zakaznik pozaduje editaci v gridu (predpokladam tedy, ze
> je natolik odborne zdatny, ze vi, proc to chce :), pak bych radeji
> zvolil cestu napriklad pres StringGrid nebo neco podobneho, a
> celou komunikaci s databazi bych resil na pozadi pres ulozene
> procedury a SQL dotazy. Je to sice pracnejsi, ale daleko lepe se
> tak hlidaji pripadne kolize a vyjimky.
>
>
> S pozdravem
>
> Zbysek Hlinka
>
> http://www.hlinka(tec)cz http://www.slhaters(tec)cz
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ


IB6 - sumovanie pomocou GROUP BY

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 30.1.2001 07:31:39

ahoj,

zkus to spis takto:

SELECT
CAST(ucetucs AS CHAR(3)),
SUM(prijem),
SUM(vydaj)
FROM
banvypis
GROUP BY
CAST(ucetucs AS CHAR(3))

popripade:

SELECT
SUBSTR(ucetucs, 1, 3),
SUM(prijem),
SUM(vydaj)
FROM
banvypis
GROUP BY
1

ale nerucim za to...

dekuji PeC(zv)

CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz

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

Preklad vlastniho balicku

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 30.1.2001 07:52:47

On 29 Jan 2001, at 14:19, Jiri Hostinsky wrote:

> balicek nejdou napr. pridavat property). Preklad balicku konci tim, ze
> nezna globalni promennou z jednotky uvedene v USES, ktera tam
> samozrejme je. Chyba asi nebude mezi mou zidli a klavesnici, protoze
> staci vymenit deklaraci za jinou promennou teze volane jednotky
> uvedenou o radek niz a obdobna chyba vznikne jinde (jina promenna,
> jina volajici jednotka).

Nemas tam nahodou chybne krizene reference na unity? Pokud se
unity odvolavaji na sebe navzajem, a alespon jeden odkaz je v
sekci interface, muze se to takto chovat.


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Nastaveni

[*] Uniplet T�eb�� - elektronika - 30.1.2001 07:52:27

AHOJ

Mam nasledovny problem ve sve aplikaci pouzivam odesilani zprav a uzivatel musi vzdy po prvnim spusteni programu zadat port POP3 a nazev proxy, otazka zni jestli by se nedalo nejakym zpusobem zjistit tyto hodnoty pro nastaveni automaticky.

DIK


Nastaveni

[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 30.1.2001 08:08:13 met-1

> Mam nasledovny problem ve sve aplikaci pouzivam odesilani zprav a =
> uzivatel musi vzdy po prvnim spusteni programu zadat port POP3 a nazev =
> proxy, otazka zni jestli by se nedalo nejakym zpusobem zjistit tyto =
> hodnoty pro nastaveni automaticky.

A nebylo by resenim si pri prvnim zadavani tyto hodnoty ulozit do
nejakeho souboru? Pak by se pri kazdem dalsim spusteni programu
precetly pozadovane hodnoty z nej a nemuselo by se nic zadavat.

Jirka.

tiskove sestavy

[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 30.1.2001 09:25:14

> potreboval bych poradit nejaky nastroj pro tvorbu tiskovych sestav, jako
jsou
> katalogy zbozi i s fotkama.
> Fotky nejsou v databazi ale na disku, max. 35 fotek na A4, bezne 4-5
stranek.
> Nechci pouzit QR, zatim uvazuji nad Sineou...


Presne timto zpusobem pouzivam Sineu, nacitani obrazku pomoci funkce
definovane primo
v generatoru SINEA.

S pozdravem Heinisch Jiri


IB6 - sumovanie pomocou GROUP BY

[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 30.1.2001 09:50:21

Ahoj,
obavam se, ze to takhle neudelas. Pokud to potrebujes, pridej do tabulky
sloupec odpovidajici pozadovanemu retezci,
muzes si pomoci triggerama abys udrzel vazbu.

Zde je vypis z dokumentace k IB:
...
[GROUP BY col [COLLATE collation] [, col [COLLATE collation] .]
...

a z neho vyplyva, ze parametrem GroupBy musi byt sloupec a nikoliv value.
Mimochodem: nepomuze Ti ani substr(aaa,1,3) as neco ... group by neco.

Korektnejsi je (pokud jde o novou aplikaci), upravit datovy model,
protoze je zrejme postaven "nestastne".
Napriklad mam-li cislo zakazky "115505656" kde prvni dva znaky jsou divize,
dalsi dva typ vyrobku, dalsi znak priznak stavu a posledni ctyri znaky
poradove cislo zakazky,
tak je lepsi udelat ctyri polozky. Je to prehlednejsi a vykonnejsi
(presneji - optimalizovatelne).

Leos

> select substr(ucetucs,1,3),sum(prijem),sum(vydaj) from banvypis group by
> substr(ucetucs,1,3)
> ale nepaci sa mu funkcia za GROUP BY

IB6 - vytvorenie novej databazy

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 30.1.2001 09:53:09

Ahoj,
jednoznacne pres SQL. Kopirovat databazi urcite nevidim jako dobry napad.
Mam svuj skript, ktery po instalaci pustim a je to.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com

> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Roland Turcan - RoTurSoft
> Sent: Tuesday, January 30, 2001 12:19 AM
> To: Delphi CZ konferencia
> Subject: IB6 - vytvorenie novej databazy
>
>
> Zdravim.
>
> Ako riesite vytvorenie novej databazy u zakaznika. Formou sql
> prikazov alebo
> kopia temporary database ?
>
> Dakujem.
>
> Roland.
>
>

editace v gridu - opet

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 30.1.2001 10:04:19

On 30 Jan 2001, at 6:00, Ren� Otisk wrote:

> Otazka je, kdyz mas v Gridu nejaky slozity View...

No a? Tak nepouzijes primo StringGrid, ale nejaky schopnejsi.

> ----- Original Message -----
> From: Zbysek Hlinka <hlinka(zv)hlinka(tec)cz>
>
> > Jestlize zakaznik pozaduje editaci v gridu (predpokladam tedy, ze je
> > natolik odborne zdatny, ze vi, proc to chce :), pak bych radeji
> > zvolil cestu napriklad pres StringGrid nebo neco podobneho, a celou
> > komunikaci s databazi bych resil na pozadi pres ulozene procedury a
> > SQL dotazy. Je to sice pracnejsi, ale daleko lepe se tak hlidaji
> > pripadne kolize a vyjimky.


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Mirne OT: Resource editor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 30.1.2001 10:04:19

On 29 Jan 2001, at 12:25, Zdenek Drvota wrote:

> > > P.S. Nepochodil jsem u PM ani s pokusy pomoci jinak
> > > velmi uspesneho Lokalizatoru (Z.H.)
> >
> > A v cem byl problem? Prave jsem zkusil zlokalizovat
> > winpm-32.exe, verze 3.12c, Lokalizatorem verze 4.7, a nenarazil jsem
> > na zadny problem. Je ovsem nutne to delat pod NT nebo 2000, a
> > resourcy vrazit zpet do exe.
> >
> Byla to tusim verze PM 3.11 a Loc3Free na W2000.
> Stringy jsem prelozil a ulozil, ale PM uz nenastartoval,
> coz byla takova drobna zavada :-) (takze dalsich pokusu
> jsem zanechal)

:-))) Aha, tak to je zavada jasna, tudy to skutecne nejde. Je treba
pouzit novejsi verzi. Kdyby verze 3 umela vsechno, tak bych ji
nedaval do free.


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


None

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 30.1.2001 10:10:52

>Ahoj lidicky mam takovej dotazek.
Jak se mam v Inter Base dotazat na to jestli existuje dana tabulka? Nebo
jak to mam vyresit, kdyz nevim jestli je >vytvorena a potrebuju ji vytvorit.
Kdyz uz bude existovat a ja se ji pokusim vytvorit, tak me to zarve. A
kdyz bych ji chtel pouze vyprazdnit a nebude >vytvorena, tak to taky zarve.
Tak jak vytvorit novou "cistou" tabulku dane struktury?

*** Tabulky su ulozene v systemovej tabulke RDB$RELATIONS.
takze si mozes napisat SELECT podla toho ze do WHERE das RDB$RELATION_NAME =
TvojeTabulka a ked Ti nieco IB vrati tak tam je inak neni. ;-)
Alebo mozes pouzit Funkciu GetTableNames z komponenty TIBDatabase a prejst
ten zoznam ci tam je.> A jeste jeden poddotaz: jak se daji zpracovavat v Delphi pomoci tech
komponent k IB chyby ktere zarve Inter Base?

*** Ako to myslis? Napis presnejsie ak Ti nebude stacit nasledovne:

(pisem z hlavy, ...)
try
...
except
on E: EIBError do begin
case E.IBErrorCode of
isc_unavailable: EC := 'nejaky text';
else
EC := '';
end;
ShowMessage('Interbase error', EC, E);
end;

S pozdravom

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

Zapis do registru

[*] Jiri Kral <admin(zv)printo(tec)cz> - 30.1.2001 10:30:02

Mihl se tu dotaz jak ukladat nastaveni programu.
Do registru!

mozna nekomu pomuzou tyto 2 funkce


function td.ZapisDoReg(valname:string;value:string):boolean;
//nazev hodnoty v klici; hodnota
var Reg: TRegistry;
begin
try
Reg := TRegistry.Create;
Reg.RootKey:=HKey_CURRENT_USER;
result:=Reg.OpenKey('\Software\mojefirma',True);
//toto bud vytvori, nebo pouzije vetev mojefirma v sekci \Software
if result
then Reg.WriteString(valname,value);
finally
Reg.Free;
end;
end;

function td.CtiZReg(valname:string):string;
var Reg: TRegistry;
begin
try
Reg := TRegistry.Create;
Reg.RootKey:=HKey_CURRENT_USER;
Reg.OpenKey('\Software\mojefirma',False);
result:=Reg.ReadString(valname);
finally
Reg.Free;
end;
end;

nacitani hodnot spoustim v OnShow prislusneho formu
ukladani v OnHide, nebo na OnClick zaviraciho buttonku

nebojte se registru, je to ucinne a jednoduche
treba to nekomu pomuze

pokud nekdo vi, jak tyto funkce napsat lepe, rad se to dozvim

preji hezky zbytek zivota


==========================================================
Bc. Jiri Kral
administrator IT
tiskarna Printo, spol. s r.o.
e-mail: admin(zv)printo(tec)cz
mobil e-mail: jirka.kral(zv)click(tec)cz
ICQ# 15303940
PGP ID: 62B8BA3C (najdete na www.pgp(tec)cz)

Ekvivalent For Each v Delphi

[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 30.1.2001 11:04:31

Caute

Viem, ze z Vas malokto robi v Basicu, ale predsa:

existuje funkcia "for each" vo VB a potrboval by som jej ekvivalent v
delphi:

For Each obj In ThisDrawing.ModelSpace
If obj.EntityType = acBlockReference Then ...

Ide mi o to ze preberat sa v celom zozname kvoli urcitej skupine objektov,
je moc zdlhave...

Ale pochybujem asi, ze existuje take daco v Delphi...

Dik
P.

Ekvivalent For Each v Delphi

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 30.1.2001 12:01:07

A ty si myslis, ze VB se "neprohrabava" celym seznamem ? For Each je
pouze spojeni 2 prikazu:
For i := 0 To ControlCount - 1
if (Controls[i] is TEdit) then TEdit(Controls[i]).Text := ....

------

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

30.1.2001 Ing. Patrik Tesar :
> Caute

> Viem, ze z Vas malokto robi v Basicu, ale predsa:

> existuje funkcia "for each" vo VB a potrboval by som jej ekvivalent v
> delphi:

> For Each obj In ThisDrawing.ModelSpace
> If obj.EntityType = acBlockReference Then ...

> Ide mi o to ze preberat sa v celom zozname kvoli urcitej skupine objektov,
> je moc zdlhave...

> Ale pochybujem asi, ze existuje take daco v Delphi...

> Dik
> P.

Cestina v exportu dat na WWW

[*] Tom� Hol� - 30.1.2001 12:13:33

Toto je zprava ve formatu MIME obsahujmcm vmce hastm.


prosim o radu

snazim se napsat aplikaci, ktera uploaduje data na web, do MySQL databaze

data nacitam z dbf souboru, ktere maji kodovani CP 1250 pres ODBC driver Microsoft Visual FoxPro jako free table directory (jiny zpusob se nechytl)

a stranky pouzivaji nastaveni <META CONTENT="text/html" CHARSET="windows-1250">


pokud na svem PC, kde mam delphi pustim aplikaci, data se nactou a cestina je v poradku

ale jakmile to pustim na jinem PC cestina je zmrsena

nasel jsem 3 body kde se da nastavit kodovani cestiny
1. ODBC Visual Fox Pro setup - Collating sequence - mam nastaveno Machine
ale tohle mam pocit je pouze pro trideni
2. control panel - BDE administrator - LangDriver - zde mam nic nevyplneno
3. zminene nastaveni na WWW strankach pres CHARSET="windows-1250"

ted jsem ze zoufalstvi zkusil na jiny PC nainstalovat delphi, a opet bez uspechu, uz opravdu nevim, co s tim, prosim o radu, dekuji

Tomas Holy

Ekvivalent For Each v Delphi

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 30.1.2001 13:00:32

Ahoj,

neni to neco jako

For I:=0 To ComponentCount-1 Do
Begin
If (Components[I] as TControl).Parent=mySpecPanel 22 Then
(Components[I] as TControl).Enabled := True;
If Components[I] is TPubMaskEdit Then
Begin
(Components[I] as TPubMaskEdit).Text:='';
....atd..
End;
End;
??

Jaro B.

> -----P�vodn� zpr�va-----
> Od: Ing. Patrik Tesar [SMTP:tesar(zv)rainside.sk]
> Odesl�no: 30. I 2001 11:05
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Ekvivalent For Each v Delphi
>
> Caute
>
> Viem, ze z Vas malokto robi v Basicu, ale predsa:
>
> existuje funkcia "for each" vo VB a potrboval by som jej ekvivalent v
> delphi:
>
> For Each obj In ThisDrawing.ModelSpace
> If obj.EntityType = acBlockReference Then ...
>
> Ide mi o to ze preberat sa v celom zozname kvoli urcitej skupine
> objektov,
> je moc zdlhave...
>
> Ale pochybujem asi, ze existuje take daco v Delphi...
>
> Dik
> P.
>
>

Ekvivalent For Each v Delphi

[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 30.1.2001 13:04:36

Pokud je ten object TComponent, napr. TForm, tak pouzivam

for i := 0 to (Form1.ComponentCount - 1) do
if Form1.Components[i] is {napr.}TPanel then begin
...
(Form1.Components[i] as TPanel).{Property...}
...
end;

Michal Tiller

-----Original Message-----
From: Ing. Patrik Tesar [mailto:tesar(zv)rainside.sk]
Sent: Tuesday, January 30, 2001 11:05 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Ekvivalent For Each v Delphi


Caute

Viem, ze z Vas malokto robi v Basicu, ale predsa:

existuje funkcia "for each" vo VB a potrboval by som jej ekvivalent v
delphi:

For Each obj In ThisDrawing.ModelSpace
If obj.EntityType = acBlockReference Then ...

Ide mi o to ze preberat sa v celom zozname kvoli urcitej skupine objektov,
je moc zdlhave...

Ale pochybujem asi, ze existuje take daco v Delphi...

Dik
P.

None

[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 30.1.2001 13:16:03

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

Ja ty chyby osetruju stejne jako vsechny ostatni:

try
...
;;prece s IB
...
except
;;osetreni vyjimek
...
end;

a stejne tak bych asi resil to vyprazdneni:

try
;;'drop table'
except end;
try
;;'create table'
except
on E: Exception do begin
ShowMessage(E.Message);
end;
end;


Michal Tiller

-----Original Message-----
From: Jirka Skladal [mailto:jirka.skladal(zv)seznam(tec)cz]
Sent: Monday, January 29, 2001 3:20 PM
To: delphi-l(zv)fwd(tec)cz
Subject:


Ahoj lidicky mam takovej dotazek.
Jak se mam v Inter Base dotazat na to jestli existuje dana tabulka? Nebo
jak to mam vyresit, kdyz nevim jestli je vytvorena a potrebuju ji vytvorit.
Kdyz uz bude existovat a ja se ji pokusim vytvorit, tak me to zarve. A
kdyz bych ji chtel pouze vyprazdnit a nebude vytvorena, tak to taky zarve.
Tak jak vytvorit novou "cistou" tabulku dane struktury?

A jeste jeden poddotaz: jak se daji zpracovavat v Delphi pomoci tech
komponent k IB chyby ktere zarve Inter Base?

Dekuji za odpoved. Jirka


Nastaveni

[*] Zdenek Drvota <drvota-l(zv)zds(tec)cz> - 30.1.2001 13:35:03

Ahoj
### Jiri Novotny napsal dne 30 Jan 01, v 8:08 :
> > Mam nasledovny problem ve sve aplikaci pouzivam odesilani zprav a =
> > uzivatel musi vzdy po prvnim spusteni programu zadat port POP3 a nazev =
> > proxy, otazka zni jestli by se nedalo nejakym zpusobem zjistit tyto =
> > hodnoty pro nastaveni automaticky.
>
> A nebylo by resenim si pri prvnim zadavani tyto hodnoty ulozit do
> nejakeho souboru? Pak by se pri kazdem dalsim spusteni programu
> precetly pozadovane hodnoty z nej a nemuselo by se nic zadavat.

pisatel mel patrne na mysli PRI INSTALACI, nebo se mylim?
BTW na odesilani se pouziva SMTP a ne POP3, ten je jen na
prijem :-)

>
> Jirka.
>


--
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
--


Dialog pro vyber a vytvoreni adresare

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 30.1.2001 14:48:51

Ahoj,

potreboval bych vybrat adresar (neco jako SelectDirectory), ale s moznosti
jeho vytvoreni (avsak ne OldStyle !). Vite prosim nekdo, jak na to ?

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

editace v DBGridu (pres StringGrid)

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 30.1.2001 15:10:50

Ahoj,
resil jste nekdo editaci DB tabulek ve StringGridu?

Mam na mysli nejake univerzalnejsi reseni na urovni komponenty. Nehledam
hotovou vec, ale spis prakticke zkusenosti se synchronizaci datasetu se
StringGridem. Jeden programator v teto souvislosti rekl, ze kdyz tohle
slysi, tak kleje keltskym narecim (myslim, ze se pozna :-), tak bych chtel
slyset neco od nekoho, kdo ten opruz uz resil.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com


Win2000

[*] R�bert #ak - 30.1.2001 16:12:42


----- Original Message -----
From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
To: "forum" <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 24, 2001 8:38 AM
Subject: OT: Win2000


> Ahoj.
> Uz jsem to tady jednou psal, ale porad na to nemuzu prijit.
>
> Mam W2000 Prof. Sit je na NOVELLU, tedy SPX a Protokoly TCPIP pro inet.
> Mam nastaveny klient site Windows, ale nevidim okolni pocitace, jen ten
svuj
> a novelovske servery.
> Pritom okolni pocitace vidi me a prihlasi se i k tomu co sdilim.
>
> Nevite nekdo co s tim?
>
>
Mal som podobny problem na NT Workstation. Zacalo to vymenou sietovej karty.
Vsetci videli moj pocitac ale ja som nevidel ostatne pocitace.
Pritom fungoval ping.
Vyriesil som to tak, ze som odinstaloval sietove sluzby Computer Browser
a Workstation a znova ich nainstaloval.

Lokalni menu u souboru v Pruzkumnikovi

[*] Ing. Petr #vejda <lingvista(zv)lingvista(tec)cz> - 30.1.2001 17:03:21

D5 Prof, W2000, W98, WNT

Jak mohu programove do Pruzkumnika a vsude, kde se pracuje se souborem,
pridat do lokalniho menu na prave tlacitko svoji vlastni funkci.

Napr. chci, aby uzivatel, kdyz klepne pravym tlacitkem na soubor *.XYZ v
Pruzkumnikovi, se spustila moje vlastni aplikace s parametrem odpovidajicim
nazvu souboru.

Diky Petr Svejda

www.lingvista(tec)cz


Dialog pro vyber a vytvoreni adresare

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 30.1.2001 17:21:56

> potreboval bych vybrat adresar (neco jako SelectDirectory), ale s moznosti
> jeho vytvoreni (avsak ne OldStyle !). Vite prosim nekdo, jak na to ?

Neviem ci to je presne ono ale snad...:

http://www.delphifreestuff.com/mine/files/browsedr.zip

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


Dialog pro vyber a vytvoreni adresare

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 30.1.2001 17:39:14

Diky,

to je presne ono !

Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
> -----P�vodn� zpr�va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
> Pavol Kaka�ka
> Odesl�no: 30. ledna 2001 17:22
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Dialog pro vyber a vytvoreni adresare
>
>
> > potreboval bych vybrat adresar (neco jako SelectDirectory),
> ale s moznosti
> > jeho vytvoreni (avsak ne OldStyle !). Vite prosim nekdo, jak na to ?
>
> Neviem ci to je presne ono ale snad...:
>
> http://www.delphifreestuff.com/mine/files/browsedr.zip
>
> Pavol Kaka�ka
> kasix(zv)atlas(tec)cz
>
>

OT Re: ISDN a free internet

[*] Petr J�nsk� - 30.1.2001 17:41:45


----- Puvodn� zpr�va -----
Od: "Richard Valny" <Richard.Valny(zv)oku-st(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 29. ledna 2001 12:04
Predmet: OT: ISDN a free internet


> Omlouvam se za offtopic, ale nikde se mi nedari zjistit:
> 1. Pokud si poridim namisto klasickych linek EuroISDN od Telecomu, lze se
tudy pripojovat k free poskytovateli internetu?
> (jedna se o Ceske Budejovice)

Samozrejme a pokud ISP ma ISDN, tak garantovanou rychlosti 64K.
Dale pokud to ISP umoznuje, lze spojit oba B-kanaly na 128K, ale plati se 2x
poplatky Telecomu.

> 2. Jake koncove zarizeni mam pozadovat po Telecomu, aby pripjeni PC k
internetu vyslo co nejlevneji.

Lze si poridit ruzne balicky, ja mam od CT modem EICON Diva za 6.500,-
pak ma CT digitalni telefon lze pripojit PC
nebo pouze premenu linky za 999,- a poridit si zarizeni odjinud, ja
doporucuji modem, kvuli pripojeni analog telefonu
(lze soucasne telefonovat a surfovat), u interniho zarizeni pokud lze
pripojit telefon, nelze volat pri vypnutem PC.

ale vic informaci asi najdes na www.isdn(tec)cz nebo v CW c. 2001/3 je recenze
na ISDN zarizeni
jinak by se o tom dalo povidat hodiny


>
> Dik a jeste jednou se omlouvam
>
>
> =========================================
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-323 746
> 386 22 STRAKONICE
> =========================================
>
>

datum

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 30.1.2001 18:10:45

Ahoj,

jedn�-li se probl�m v Delphi:
-----------------------------------------
vzhledem k tomu, �e datum je oby�ejn� desetinn� ��slo a cel� ��st
reprezentuje po�et dn� od n�jak�ho po��tku (pro tento p��klad nen�
d�le�it�):

Unit System;
type TDateTime = type Double;

Sta�� tato ��sla od sebe ode��st a pokud je |v�sledek| v�t#� ne� 1.00, tak
uplynul +-den.
Jinak je mo�no na v�sledek uplatnit i fci:
procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word);
procedure DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word);

Jedn�-li se probl�m v datab�zi
--------------------------------------------
Existuje obdoba funkce datediff( co, date1, date2).

S pozdravem Pavel Lstiburek

-----P�vodn� zpr�va-----
Od: Ivan Virag [mailto:ivirag(zv)hopi(tec)cz]
Odesl�no: 29. ledna 2001 11:57
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: datum



Dobry den



Podle me je treba si za pomoci procedury DecodeDate z obou datumu
vygenerovat den a ty potom porovnat.



Ivan Virag



-----P�vodn� zpr�va-----
Od: Raul Endymion [SMTP:raul(zv)raphael(tec)cz]
Odesl�no: 29. I 2001 9:21
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: datum

Dobr� den,

jak nejjednoduseji zjistim, zda jedno datum je vcera ?
co takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < now;
end;

nebo takhle ?

function newday(Datum1 : String) : Boolean;
begin
result := StrToDate(datum1) < StrToDate(DateToStr(now)); {prevod
abych zjistil pouze datum z now a ne i hodinu apod.}
end;

dikes, jde mi ciste o to zjistit u aplikace ktera se pousti velice
casto jestli uz je dalsi den ci ne. (Datum1 je datum posledniho
spusteni)

--
S pozdravem,
Raul
raul(zv)raphael(tec)cz

Lokalni menu u souboru v Pruzkumnikovi

[*] ShiCola <P.Sikola(zv)sh.cvut(tec)cz> - 30.1.2001 19:13:10

a co treba tohle:

rr := TRegistry.Create;
try
if rr.OpenKey('*\Shell\Open\Command', true) then
begin
rr.WriteString('', Application.ExeName + ' %1'); {cesta k tvy
aplikaci vcerne parametru, %1 je vybrany soubor}
rr.CloseKey;
end;
if rr.OpenKey('*\Shell\Open', false) then
begin
rr.WriteString('', 'otevrit v XXXXX');
rr.CloseKey;
end;
except
end;


Petr Sikola


----- Original Message -----
From: "Ing. Petr �vejda" <lingvista(zv)lingvista(tec)cz>
To: "Konference Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, January 30, 2001 5:03 PM
Subject: Lokalni menu u souboru v Pruzkumnikovi


> D5 Prof, W2000, W98, WNT
>
> Jak mohu programove do Pruzkumnika a vsude, kde se pracuje se souborem,
> pridat do lokalniho menu na prave tlacitko svoji vlastni funkci.
>
> Napr. chci, aby uzivatel, kdyz klepne pravym tlacitkem na soubor *.XYZ v
> Pruzkumnikovi, se spustila moje vlastni aplikace s parametrem
odpovidajicim
> nazvu souboru.
>
> Diky Petr Svejda
>
> www.lingvista(tec)cz
>

Lokalni menu u souboru v Pruzkumnikovi

[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 30.1.2001 19:31:20

> Jak mohu programove do Pruzkumnika a vsude, kde se pracuje se
> souborem,
> pridat do lokalniho menu na prave tlacitko svoji vlastni funkci.
>
> Napr. chci, aby uzivatel, kdyz klepne pravym tlacitkem na
> soubor *.XYZ v
> Pruzkumnikovi, se spustila moje vlastni aplikace s parametrem
> odpovidajicim
> nazvu souboru.

tak teraz neviem. Ide o to pridat vlastnu polozku do menu na prave tlacitko

alebo o asiociaciu suboru s nejakou aplikaciou?
/LH


Cestina v exportu dat na WWW

[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 30.1.2001 19:38:22

>pokud na svem PC, kde mam delphi pustim aplikaci, data se nactou a cestina
je v poradku
>
>ale jakmile to pustim na jinem PC cestina je zmrsena
>
>nasel jsem 3 body kde se da nastavit kodovani cestiny
>1. ODBC Visual Fox Pro setup - Collating sequence - mam nastaveno Machine
>ale tohle mam pocit je pouze pro trideni
>2. control panel - BDE administrator - LangDriver - zde mam nic nevyplneno
>3. zminene nastaveni na WWW strankach pres CHARSET="windows-1250"
>
>ted jsem ze zoufalstvi zkusil na jiny PC nainstalovat delphi, a opet bez
uspechu, uz opravdu nevim, co s tim, prosim o radu, >dekuji

ono to nebude tou instalaciou Delphi.
Kedze neuvadzate o aky browser a OS ide, predpokladam ze o MSIE a Wirdos.
Treba pozriet ako je nastavene kodovanie cestiny v browsery - View/Encoding
...
Pripadne to moze mrsit OS na web serveri.
/LH

editace v DBGridu (pres StringGrid)

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 30.1.2001 20:06:25

On 30 Jan 2001, at 15:10, Ota Maly wrote:

> resil jste nekdo editaci DB tabulek ve StringGridu?
>
> Mam na mysli nejake univerzalnejsi reseni na urovni komponenty.
> Nehledam hotovou vec, ale spis prakticke zkusenosti se synchronizaci
> datasetu se StringGridem. Jeden programator v teto souvislosti rekl,
> ze kdyz tohle slysi, tak kleje keltskym narecim (myslim, ze se pozna
> :-), tak bych chtel slyset neco od nekoho, kdo ten opruz uz resil.

Pokud jedes nad SQL databazi, tak povazuji za vhodnejsi data
vycist do nejakeho bufferu, dataset zavrit, pak si v klidu delat
nejake zmeny, a v prihodny cas je narvat zpet do databaze pres
ulozenou proceduru. Pokud bude treba zjistit nejake zmeny v
databazi, lze se kdykoliv poptat.


S pozdravem

Zbysek Hlinka

http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


vztahy mezi Units - Access Violation

[*] Milan ��ek - 30.1.2001 20:44:37

ahoj,
narazil jsem na jeden problem: mam program s jednotkou Unit1, dale pak dalsu
unitu MainUnit. Nyni potrebuju z jednotky MainUnit pristupovat treba k
labelu na Form1 (Unit1). Resim to nasledovne:

v Unit1, sekce interface: uses Windows, Messages, SysUtils, Classes,
Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls, Mask,
Spin, Menus, MainUnit;

v MainUnit, sekce implementation: uses
Registry,Windows,SysUtils,Classes,Unit1;

Nyni z jednotky MainUnit pristupuju k objektum napr.: Form1.Label1...

Jednotka MainUnit obsahuje proceduru pro ukladani promenych do registru z
Form1

procedure SaveConfiguration; // registryKey - konstanta,
Chb-Checkbox,E-edit,SE-SpinEdit - vse na Form1
begin
Registr:=TRegistry.Create;
with Registr,Form1 do
try
RootKey:=HKEY_CURRENT_USER;
OpenKey('Software\'+RegistryKey,true);
WriteBool('ProxyEnable',ChB_ProxyEnable.checked);
WriteString('ProxyServer',E_ProxyServer.text);
WriteString('ProxyUser',E_ProxyUser.text);
WriteString('ProxyPassword',E_ProxyPassword.text);
WriteInteger('ProxyPort',SE_ProxyPort.value);
finally
CloseKey;
Free;
end;
end;

Tuto proceduru volam z OnClose Form1. Tento krok vyvola Access Viol. (chyba
neni specifikovana - jen adresa). Volam take obdobnou proceduru pri
Form1.Create - LoadConfiguration.

Muzete mi nekdo poradit??? Kde delam chybu. Jeste jedna podotazka: puvodne
jsem volal tyto 2 procedury z MainUnit - sekce initialization,
finalization - podle me se ale timto zpusobem zavolaji tyto funkce jeste
pred tim, nez se vytvori jednotlive prvky formulare.... Jak je to?

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

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


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


BACKUP

[*] WEB ATLAS - SUKY <suky(zv)atlas(tec)cz> - 30.1.2001 21:35:49

hledam nejaky informace o zalohovani na datove pasky a podobna zarizeni,
prosim poradte kam se kouknout. Predem diky.

Michal

IB6 - vytvorenie novej databazy

[*] Ivan Koz�k - 30.1.2001 12:39:23 -0800

Mozem sa opytat, v com vlastne spociva rozdiel (resp. vyhoda) ked db.
vytvorim SQL a medzi tym, ked ju prekopirujem? Moze to mat vyplyv na�pr. na
rychlost pristupu k datam, alebo rychlost pri otvarani databazy? Dik za
odpoved. Ivan Kozak

--------------
-----Original Message-----
From: Ota Maly <ota.maly(zv)volny(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 30. ledna 2001 3:25
Subject: RE: IB6 - vytvorenie novej databazy


>Ahoj,
>jednoznacne pres SQL. Kopirovat databazi urcite nevidim jako dobry napad.
>Mam svuj skript, ktery po instalaci pustim a je to.
>
>S pozdravem
>Ota Maly
>
>PaPouch elektronika
>http://www.papouch.com
>
>> -----Original Message-----
>> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
>> Roland Turcan - RoTurSoft
>> Sent: Tuesday, January 30, 2001 12:19 AM
>> To: Delphi CZ konferencia
>> Subject: IB6 - vytvorenie novej databazy
>>
>>
>> Zdravim.
>>
>> Ako riesite vytvorenie novej databazy u zakaznika. Formou sql
>> prikazov alebo
>> kopia temporary database ?
>>
>> Dakujem.
>>
>> Roland.
>>
>>

Mail

[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 30.1.2001 21:56:43

Ahoj,
prosim Vas, pomozte mi nekdo. Potrebuju odeslat mail, ale ani z napovedy nejsem moc moudry. muze mi nekdo polopaticky (a treba i s prikladem) tento problem vysvetlit? (treba i na soukr. adrese dmiroslav(zv)seznam(tec)cz)

dekuji

Mirek Drancak


FastNet Componenty

[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 30.1.2001 22:08:45

Dobry den,

pracoval nekdo z FastNet componentami? Konkretne s TNMHTTP? Jak lze pouzit:

NMHTTP1.Post(server, data)?

Kdyz enkoduje cela data, nelze tedy pouzit:

neco.php?q=trpaslek

nacez: server:='http://xxx(tec)cz/neco.php'
data:= 'q=trpaslek&b=cepice'

protoze ta komponenta enkoduje i "=" coz je pro www server naprosto
neprijatelne? Neni to nejaka vnitri chyba? A nebo nejde vypnout enkodovani?
Ze bych kodovani zajistil sam a jenom co je poterba...

Diky za pomoc...

Zdenek
---
Stejne jako bajny ptak Phoenix, i ja zas a znova vstavam z popela svych
proher.

Ekvivalent For Each v Delphi

[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 30.1.2001 22:22:49

Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
RE: Ekvivalent For Each v Delphi for i:=0 to ModSpace.Count-1 do begin
if ModSpace.Item(i).EntityType=acBlockReference then begin
Application.ProcessMessages;
BlockRef[z]:=ModSpace.Item(i) as AcadBlockReference;

Takto to robim, ale prave to je sposob taky, ze musim prejst vsetky objecty
v DWG vykrese
ktory ich ma niekedy aj 10 000, co zabere X casu a je to pomale...

vo VB je sposob "for each obj in XX" ktora pracuje nejakym zahanym sposobom
tak, ze vrati iba konkretne
objekty zadefinovaneho typu...
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Bene# Jaroslav
Sent: Tuesday, January 30, 2001 1:01 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Ekvivalent For Each v Delphi


Ahoj,

neni to neco jako

For I:=0 To ComponentCount-1 Do
Begin
If (Components[I] as TControl).Parent=mySpecPanel_22 Then
(Components[I] as TControl).Enabled := True;
If Components[I] is TPubMaskEdit Then
Begin
(Components[I] as TPubMaskEdit).Text:='';
....atd..
End;
End;
??

Jaro B.

-----P�vodn� zpr�va-----
Od: Ing. Patrik Tesar [SMTP:tesar(zv)rainside.sk]
Odesl�no: 30. I 2001 11:05
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Ekvivalent For Each v Delphi

Caute

Viem, ze z Vas malokto robi v Basicu, ale predsa:

existuje funkcia "for each" vo VB a potrboval by som jej ekvivalent v
delphi:

For Each obj In ThisDrawing.ModelSpace
If obj.EntityType = acBlockReference Then ...

Ide mi o to ze preberat sa v celom zozname kvoli urcitej skupine
objektov,
je moc zdlhave...

Ale pochybujem asi, ze existuje take daco v Delphi...

Dik
P.

current context v NetWare 4

[*] Luk� Gallina <johndelphi(zv)atlas(tec)cz> - 30.1.2001 22:28:28

Ahoj,
nekde na webu Novellu jsou komponenty pro praci s NDSkou a klientem...
kdybys to nemohl najit tak Ti to nekde zpristupnim (posli mi mail)...ma to
cca 2.5 MB ale nevim zda mam novou verzi :)

S pozdravem
Lukas Gallina

----- Original Message -----
From: "Kamil Muzika" <muzikak(zv)hotmail.com>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 29, 2001 8:31 PM
Subject: current context v NetWare 4


> jak se da zjistit kontext uzivatele
> _________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
>

Ekvivalent For Each v Delphi

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

From: "Ing. Patrik Tesar" <tesar(zv)rainside.sk>

Ahoj,

> RE: Ekvivalent For Each v Delphi for i:=0 to ModSpace.Count-1 do begin
> if ModSpace.Item(i).EntityType=acBlockReference then begin
> Application.ProcessMessages;
^^^^^^^^^^^^^^^^^^^^^^^^^^^
toto prvni problem, v 99% pripadu je zpracovani zprav jinde nez v hlavni
smycce aplikace neopodstatnene a vyvolavanici problemy.

> BlockRef[z]:=ModSpace.Item(i) as AcadBlockReference;

Dale. Pokud je ModSpace.Item[] vlastnost/metoda, ktera vraci nejaky objekt ze
seznamu, tak si jej v prvnim volani uloz do lokalni promenne a tuto pouzij v
dalsim volani o par radek nize. Take se snaz eliminovat pouziti operatoru AS,
ktere je casove pomerne narocne a pokud presne vis co delas i zbytecne.

Petr Vones, amatersky programator

Mail

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 22:53:45

From: "Mirek" <dmiroslav(zv)seznam(tec)cz>
> prosim Vas, pomozte mi nekdo. Potrebuju odeslat mail, ale ani z napovedy
> nejsem moc moudry. muze mi nekdo polopaticky (a treba i s prikladem) tento
> problem vysvetlit? (treba i na soukr. adrese dmiroslav(zv)seznam(tec)cz)

Ahoj,

zkus to blize popsat, moznosti je vice a zalezi na tom co potrebujes. Jestli
i posilat prilohy, zdali pouze pres SMTP nebo vychoziho postovniho klienta
atd..

Petr Vones, amatersky programator


Ukonceni Capture programu

[*] Gadourek <gadourek(zv)centrum(tec)cz> - 30.1.2001 22:58:48

Ahoj,

snazil jsem se ze sveho programu vyvolat a ukoncit capture program pro snimani videa pomoci karty AV MASTER 2000.
Vyvolani probehlo bez problemu, ale po ukonceni nesel capture program opet vyvolat a hlasil, ze drive je jiz pouzivan.
Vyzkousel jsem funkce:
ShellExecute + PostMessage(hwnd,WM QUIT,0,0);
Thread
i componentu Petra Vones TPvExecThread.
Nejspise to souvisi s kartou AV MASTER, ktera je dost komplikovana. Nemate nekdo co s tim.

Diky Petr Gadourek


Preinstalovani Delphi 4

[*] Gadourek <gadourek(zv)centrum(tec)cz> - 30.1.2001 23:03:20

Ahoj,

potreboval bych preinstalovat Delphi 4 na jiny pocital se vsemi komponentami. Jde to udelat abych vse nemusel opet instalovat?

Diky Petr Gadourek


FastNet Componenty

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:07:51

From: "Zdenek Janish" <medusa(zv)brajan(tec)cz>
> pracoval nekdo z FastNet componentami? Konkretne s TNMHTTP? Jak lze pouzit:

Ahoj,

myslim, ze vetsina kdo pracovala s FastNet komponentami da radeji prednost
WinShoes (http://delphree.clexpert.com/pages/app_WINSHOES.htm)

Petr Vones, amatersky programator


Ekvivalent For Each v Delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:18:06

From: "Michal Tiller" <Michal.Tiller(zv)oskarmobil(tec)cz>
> Pokud je ten object TComponent, napr. TForm, tak pouzivam
>
> for i := 0 to (Form1.ComponentCount - 1) do
> if Form1.Components[i] is {napr.}TPanel then begin
> ...
> (Form1.Components[i] as TPanel).{Property...}
> ...
> end;

Ahoj,

toto je ale pomerne neefektivni zapis kodu. Efektivejsi zapis muze vypadat
treba takto:

procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
C: TComponent;
begin
for I := 0 to ComponentCount - 1 do
begin
C := Components[I]; // komponentu ulozime do lok.promenne
if C is TPanel then // pokud je odvozena od TPanel ...
TPanel(C).Caption := IntToStr(I); // ... tak muzeme primo pretypovat
end;
end;

pro zajimavost pak srovnej prelozeny kod s puvodnim zapisem:

procedure TForm1.Button2Click(Sender: TObject);
var
I: Integer;
C: TComponent;
begin
for I := 0 to ComponentCount - 1 do
if Components[I] is TPanel then
(Components[I] as TPanel).Caption := IntToStr(I);
end;

V tomto prikladu se samozrejme nejedna o nijak vyrazny rozdil, ovsem ve
slozitejsich pripadech to jiz muze znamenat pozorovatelny narust vykonu.

Petr Vones, amatersky programator

Preinstalovani Delphi 4

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:20:10

From: "Gadourek" <gadourek(zv)centrum(tec)cz>
> potreboval bych preinstalovat Delphi 4 na jiny pocital se vsemi
> komponentami. Jde to udelat abych vse nemusel opet instalovat?

Ahoj,

bohuzel vicemene nejde.

Petr Vones, amatersky programator


Nastaveni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:23:29

From: "Uniplet T�eb�� - elektronika" <elektronika(zv)uniplet(tec)cz>
> Mam nasledovny problem ve sve aplikaci pouzivam odesilani zprav a uzivatel
musi vzdy po prvnim spusteni programu zadat port POP3 a nazev proxy, otazka
zni jestli by se nedalo nejakym zpusobem zjistit tyto hodnoty pro nastaveni
automaticky.

Ahoj,

Pokud uzivatel pouziva IE, tak lze zjistit nastaveni proxy serveru. Ohledne
SMTP serveru je to uz horsi, kazdy klient si to uklada po svem, navic uzivatel
muze pouzivat vice uctu apod. Jina moznost je zpravu posilat prostrednictvnim
vychoziho postovniho klienta pomoci SimpleMAPI. Nemas tak sice plnou kontrolu
nad celym procesem odesilani, ale usetris si praci s nastavovanim.

Petr Vones, amatersky programator


Debug in design time

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:40:12

From: "Josef Zvonicek" <prosoft(zv)prosoft(tec)cz>
> Je to tak. Je potreba mit verzi ENT. Ten soubor se jmenuje vclmid50.dcp aje
> v adresari LIB.Udajne je to MIDAS knihovna. Ale kde se mi tam bere odkaz to

Ahoj,

to je nejake zvlastni. Zkousel jsem to ted s D4.03 Prof a fungovalo to bez
problemu (zadny vclmid40 apod. tam neni). Zkus se podivat na instalacni CD do
adresare RunImage, jestli tam ten soubor taky mas.

Petr Vones, amatersky programator


vztahy mezi Units - Access Violation

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.1.2001 23:44:49

From: "Milan #ݿek" <cizek.milan(zv)seznam(tec)cz>
> procedure SaveConfiguration; // registryKey - konstanta,
> Chb-Checkbox,E-edit,SE-SpinEdit - vse na Form1
> begin
> Registr:=TRegistry.Create;
> with Registr,Form1 do
> try
> RootKey:=HKEY_CURRENT_USER;
> OpenKey('Software\'+RegistryKey,true);
> WriteBool('ProxyEnable',ChB_ProxyEnable.checked);
> WriteString('ProxyServer',E_ProxyServer.text);
> WriteString('ProxyUser',E_ProxyUser.text);
> WriteString('ProxyPassword',E_ProxyPassword.text);
> WriteInteger('ProxyPort',SE_ProxyPort.value);
> finally
> CloseKey;
> Free;
> end;
> end;
>
> Tuto proceduru volam z OnClose Form1. Tento krok vyvola Access Viol. (chyba
> neni specifikovana - jen adresa). Volam take obdobnou proceduru pri

Ahoj,

ta konstrukce je ponekud neprehledna. Tipoval bych, ze se ti mozna zavola
Form1.Free misto Registr.Free ve finally bloku. Nekdy je dobre to s temi with
tolik neprehanet.

Petr Vones, amatersky programator

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