Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
OT: Odinstalovani Active Directory
[*] David Mensik <mensikd(zv)seznam(tec)cz> - 6.8.2001 15:06:06
Reinstal - stejne pokud odinstalujes AD, tak prijdes o vsechny uzivatele
apod.
Ozon
Datum a Excel
[*] Str�n�k Franti�ek - 6.8.2001 15:20:48
Pratele, mam nasledujici problem.
V programu uzivatel vyplnuje datum pomoci napr. komponenty dbDateEdit.
Program dale umoznuje prevest tyto udaje do Excelu.
Vse pracuje vyborne az na pripady, kdy uzivatel tuto datovou polozky
nevyplni. V dbGridu toto situaci umim osetrit, ale po exportu tabulky do
Excelu se v prislusne bunce Excelu objevi hodnota "30.12.1899" . Co s
tim ???? Chci, aby v teto polozce po exportu v tomto pripade nic nebylo
.
W98 / Delphi 5 / Excel97 - popr. 2000
Diky za rady a pomoci
Franti#ek STR#N#K
mailto:FSTRANIK(zv)CPOJ.CZ
Podminak datumu
[*] Skala Tomas <alcatraz(zv)atlas(tec)cz> - 6.8.2001 15:24:37
To bych nedoporucoval. Protoze porovnavat dva floaty na rovnost je
dobry tak akorat na prusvich. I kdyz se bude zdat, ze jsou stejny, tak
podminka bude false. Uz jsem se s tim potkal. Je to zpusobeny praci
s pohyblivou des.carkou a s jejim vyjadrenim (M*(2^E) - nebo jak).
Tomas Skala
> -----Original Message-----
> From: Josef A. Cerny [SMTP:delphi(zv)atlascon(tec)cz]
>
> Anebo ve vhodnou chvili po FormCreate nastav vsem komponentam typu
> TDateTimePicker Time na 0.
> OT: IE a prohlizeni zdroje
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 6.8.2001 15:38:30
Uz jsem to nasel. Je to v klici
HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\View Source Editor\Editor Name
Staci doplnit jmeno programu.
Problem je v tom, ze klic od "View source Editor" tam normalne vubec neni.
A pokud tam neni, spousti se NotePad :-(
Jinak ten klic pro editaci tam normalne samozrejme je. Ale neni to pro
zobrazeni zdroje na prave tlacitko.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
6.8.2001 Milan #��ek:
> a nebude to primo v registrech nekde u IE? V moznostech nastaveni IE
> si muzes zvolit program pro editaci, ale nevim, jestli je to to, co
> potrebujes.Datum a Excel
[*] Josef A. Cerny <delphi(zv)atlascon(tec)cz> - 6.8.2001 16:36:18
>Excelu se v prislusne bunce Excelu objevi hodnota "30.12.1899" . Co s
>tim ???? Chci, aby v teto polozce po exportu v tomto pripade nic nebylo
Prenaset datum do Excelu jen je-li > 0.
Josef Cerny
OT: Odinstalovani Active Directory
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 6.8.2001 16:44:46
> Reinstal - stejne pokud odinstalujes AD, tak prijdes o vsechny uzivatele
> apod.
Tech je jenom 20, to je prace na chvili (vctene prehazeni pristupovych prav)
a po reinstalaci mne to stejne ceka. Ale toho softu, automatickeho spousteni
uloh, nastavovani..., to je na dva dny (nejmene)
Ludek
SelectDirectory
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 6.8.2001 16:50:28
Ahoj,
casto pouzivam funkci
function SelectDirectory(const Caption: string; const Root:
WideString; out Directory: string): Boolean;
zajimalo by me zda lze nejak nastavit adresar, ktery by byl na zacatku
vybrany a strom k nemu rozbaleny (ne Root).
Koukal jsem se, ze vevnitr se vola funkce ShBrowseForFolder, ale ani u
te jsem nenasel zadny takovy parametr.
Honza +
D5Prof
Compilace v C++Builderu
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 6.8.2001 16:57:38
Zdravim,
delam vetsi projekt v C++Builderu 5 a pripadne mi, ze pri kompilaci (ne
build) bere prilis mnoho souboru (a pak to trva) - i co se nezmenily,
ani nic v includovanych souborech. Jednou se mi dokonce stalo, ze jsem
pouze otevrel jiny soubor pres Ctrl + mys a chtel projekt znovu spustit
( zmacknu F9 ) a ona zacala kompilace spousty souboru.
Nevite co mu muze vadit (napr. nevadi, ze mam par .pas souboru primo v
projektu?) Mate s tim podobne zkusenosti? Docela mi vadi, kdy zmena v
jednom cpp zpusobi kompilaci spousty jinych, kdyz C/C++ ma docela jasne
definovane zavyslosti souboru pri kompilaci a linkovani.
Honza +Odinstalovani Active Directory
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 6.8.2001 17:04:22
Zdravim.
Situace je takova :
havaroval radic disku a ja tedy vse obnovil ze zalohy , pak jsem asi nejak
poskodil NTDS ale udelal jsem si (radsi bych si prerazil ruku)
"cerstvou" zalohu. Pak jsem vypnul odnes do firmy a pri restartu mi to
hlasilo nenapravitelne poskozeny NTDS tak jsem ho obnovil ze zalohy (ale tam
holt uz byl to bylo spatne).
Takze : data (dokumenty ,databaze a pod.) mam
Data z AD jsou asi nenavratne pryc.
System jinak jede v poradku (jak se zda).
Pouze mne to neprihlasi a zene mne to obnovit AD ktery asi nijak neobnovim a
v rezimu obnoveni mne to zase nenecha odinstalovat AD.
Jde mi o to abych nemusel znovu instalovat a nastavovat vsechny softy. (ze
jich neni malo) a tak bych chtel servr "ponizit" na normalni server a pak
znvu nainstalovat AD znovu znovu nastavit uzivatele, politiku atd. (je jich
malo).
Hlvne mi jde o to zachovani SW jednak kvuli casove tisni a jendak i proto,
ze je tam jeden soft kterej mi bode muset prijet instalovat sam autor az z
Opavy a to nebude jen tak hned.
Predem dik za radu.
Ludek
P.S. Chtel jsem to poslat mimo konferenci ale nevim ktery z tri mailu
pouzit. Tak sorry.
----- Original Message -----
From: "Robert Suska" <robert(zv)korak.sk>
......
>
> S pozdravom Mato
>
> ASE MCP Martin Vlkovic
> mvlkovic(zv)euromail.sk
> bystrica(zv)solve.sk
>
Identifikace souboru
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 6.8.2001 17:04:55
Ahoj,
potreboval bych jednoznacne identifikovat soubor - tedy mam dva nazvy a
potrebuji poznat zda se jedna o tentyz soubor a nejlepe i soubory na
sitovych discich. Kudy na to?
Dik Honza +IE a prohlizeni zdroje
[*] Hurricane <hurricane(zv)quick(tec)cz> - 6.8.2001 17:26:53
Zdravim
Ale je to tam, staci hledat. Me to funguje jen pres ten button Upravit (lze
nastavit jesti bude nebo nebude defaultni). Pres PopupMenu se mi to
nepodarilo. Mam na to takovouhle proceduru:
procedure TForm1.Uloz_Prohlizeni_v_MSIE;
var
Registry: TRegistry;
begin
Registry := TRegistry.Create;
if EditWithIE.Checked = true then
begin
Registry.RootKey := HKEY_CLASSES_ROOT;
Registry.OpenKey('.htm\OpenWithList', false);
Registry.OpenKey('TextEditor\shell\edit\command', true);
Registry.WriteString('',#34+ExtractFilePath(Application.ExeName)+'TextEditor
.exe" "%1"');
Registry.CloseKey;
if ImplicitEditWithIE.Checked = true then
begin
Registry.RootKey:=HKEY_CURRENT_USER;
Registry.OpenKey('Software\Microsoft\Internet Explorer\Default HTML
Editor',true);
Registry.WriteString('Description','TextEditor');
Registry.OpenKey('shell\edit\command', true);
Registry.WriteString('',#34+ExtractFilePath(Application.ExeName)+'TextEditor
.exe" "%1"');
Registry.CloseKey;
end;
end
else
begin
Registry.RootKey := HKEY_CLASSES_ROOT;
Registry.OpenKey('.htm\OpenWithList', false);
Registry.DeleteKey('TextEditor');
Registry.CloseKey;
Registry.OpenKey('Applications', false);
Registry.DeleteKey('TextEditor.exe');
Registry.CloseKey;
Registry.RootKey:=HKEY_CURRENT_USER;
Registry.OpenKey('Software\Microsoft\Internet Explorer',true);
Registry.DeleteKey('Default HTML Editor');
Registry.CloseKey;
Registry.OpenKey('Software\Microsoft\Shared', false);
Registry.DeleteKey('HTML');
Registry.CloseKey;
end;
end;
Jako vstupy jsou dva checkboxy (EditWithIE a ImplicitEditWithIE). Je v tom
obsazen i uninstal toho prirazeni (pri unchecked EditWithIE). Obcas se ale
stava, ze se to nejak prepise a prestane byt implicitni. Nevim proc to je,
kdyby se to podarilo zjistit neco vic, dej plz vedet, byl bych ti vdecnej.
Na zacatku a na konci cesty se ma davat ", kvuli dlouhym cestam, to snad
znas. Ted uz nevim proc, ale vim, ze z nejakeho duvodu to neslo napsat primo
jako "c:\program.exe" "%1", ale muselo to byt #34+c:\program.exe" "%1".
Hurricane
----- Original Message -----
> Jak programove zaregistrovat program, aby se spoustel misto
> Notepad.EXE pri prohlizeni zdroje v IE.
> V registrech jsem to marne hledal...
> Nechci programem fyzicky nahrazovat NOTEPAD.EXE (prejmenovani na
> NOTEPAD.EXE apod.)Rozsahlejsi DB aplikace
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 6.8.2001 18:03:06
> Ak ti trapi iba to ze budes mat pri variante A viac konekcii na databazu,
> tak to by som vyriesil nasledovne:
> 1. Ak jeden program startuje druhy tak preda mu aj vlastne meno a potom
sa
> automaticku uzavre.
> 2. Ak program ktory bol startovany z ineho programu - ma parenta - a
> skonci, tak automaticky zavola parent program.
To by slo, jenze pro vice otevrenych aplikaci (EXE-ovek) budu stejne mit
vice spojeni z jedineho pocitace a pravdepodobne i rezie serveru s
prihlasovanim bude znat oproti pouhemu startu transakce.
Leos
Rozsahlejsi DB aplikace
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 6.8.2001 18:08:28
> Ja osobne bych dal take prednost jiste variante A. Ale trochu jinak -
> namisto exacu bych z toho udelal COM moduly, lip se s nimi
> pracuje, a lze lepe vyresit vzajemnou komunikaci s hlavnim
No - ja bych skoro rekl, ze varianta s COM-y by si zaslouzila samostatnou
skupinu D.
Nejsem si ale jist zda by v mem pripade slo propojit IBOBJECTS a COM
(problemy by zrejme nastaly podobne jako u BDE).
Leos
Komponenta podobna TListView
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 6.8.2001 18:19:06
> > Shanim komponentu podobnou TListView, ktera by umoznovala neco
> > podobneho jako je tady na tom obrazku:
> > http://atrey.karlin.mff.cuni(tec)cz/~bla/komponenta.gif
> > Tedy kazdy zaznam krome jednotlivych policek obsahuje i jedno vetsi,
> > ktere je pod vsemi sloupcemi - viz ten obrazek
> > A potrebuji to pro Delphi 6, nekomercni vyuziti.
> To umi ExpressQuantumGrid (www.devexpress.com), ale to je
> komercni, takze to asi neni pro tebe...
*** No vzhledem k tomu, ze to je na moji diplomovou praci, tak do
toho penize cpat nechci :o) O necem jinem nevite?
Petr
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
`======----( icq: 73995087 )==--- -- -
Rozsahlejsi DB aplikace
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 6.8.2001 18:19:39
> mel jsem za to, ze Windows by si mely do pameti
> natahnout vzdy jen tu cast EXE, ktera je potreba? Pokud
> je tomu opravdu tak, prisla by mi varianta B jako
Ja si to myslim taky, mohl by to jeste nejaky zdejsi GURU potvrdit?
Priklad: aplikace.exe ma 100MB, na pocitaci Pentium 100 s 32MB RAM :-)) sedi
sekretarka, ktera ma otevrit jeden jediny formular (z tech 250) a v nem
celej den neco klapat. Formulare se musi vytvaret rucne a pri az pri jejich
vytvoreni by se aktivovali datove zdroje. Ja verim Windows ;-))))))) a
hlasuji ze ano :-)
Udrzbu te EXE a distribuci ted necham stranou, jde mi ciste o nazor na
systemove zpracovani.
Diky
Leos
Rozsahlejsi DB aplikace
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 6.8.2001 18:55:06
On 6 Aug 2001, at 12:39, Karel Rys wrote:
> > > > a) desitky vicemene samostatnych EXE souboru
> > > > b) jeden ohromny EXE soubor
> >
> > Mam program s asi stovkou vlastnich formularu podle varianty B, a
> > nemyslim, ze je nejsnaze udrzovatelny. Pri tehle velikosti mi to uz
> > cini docela problemy, a chystam se k prechodu na variantu A s
> > pouzitim COM.
>
> V cem mas problem s udrzovanim? (Abych se taky mel na co "tesit" :o))
Napriklad, ulohu mam rozdelenu z logickych duvodu na 3
programy, kazdy ma zcela jinou ulohu, sloucit dohromady je nelze.
Ale, nektere moduly jsou spolecne pro dva az tri programy. Zmena
v takovem modulu znamena prekompilovat i ty programy, kterych
se to tyka (beda, kdyz na to zapomenu :). Ted se mi dokonce
stalo, ze jeden modul je zakompilovan do dvou programu, ale je
treba ho dat i do toho tretiho, ve kterem se s tim nepocitalo. Navic
je to modul, do ktereho se nejcasteji saha.
Pravda, tohle asi nebude mit kazdy. Zkusem tedy zustat pouze u
jednoho programu. Tam se mi stava, ze obcas potrebuji pridat
novou sadu oken (napriklad zakaznici pozaduji nove funkce, nebo
novy typ prehledu). Jenze, ruzni uzivatele maji ruzna prava na vstup
do oken. Pro me to znamena, ze krome pridani oken musim vyresit
registraci nove sady v seznamu tlacitek (menu, ...), pres kterou se
dostane uzivatel k oknum, prideleni nejakeho jednoznacneho cisla,
pres ktere okna od sebe rozlisuji (obvykle Tag), dale musim vyresit
okno, kde se zadavaji prava k pristupum, dale volani okna pres
nejake univerzalni rozhrani.
> V aplikaci mam pres 250 formularu a zatim jsem nenarazil na zadne
> zvlastni potize. Resp. mohl bys prosim napsat, jake vyhody prinese
> pouziti COM oproti jednomu velkemu EXE?
Napriklad toto: moduly typu, o kterych pisu vyse, budu kompilovat
vzdy jen jednou. Pri potrebe vlozit ho do dalsiho programu proste
pripisu jen volani jeho rozhrani. Navic se stava, ze nektery uzivatel
urcite moduly vubec nepouziva, neni tedy treba, aby zabiraly misto
v pameti.
Vratme se opet k jednomu programu. Pokud rozdelim aplikaci na
logicke celky, tzn. pristup k databazi, spravu pristupovych prav,
jednotlive okruhy problemu pro zadavani, prehledy atp., pak si
mohu vytvorit v hlavnim programu vcelku "jednoduchou" spravu
modulu, ktera mi bude cely ansambl ridit. To znamena, ze program
se po svem startu rozhledne, ktere moduly ma k dispozici, podiva
se, jaka prava ma uzivatel, a pripoji pouze ty moduly, na ktere ma
uzivatel narok. Od nich ziska jednoznacnou identifikaci (GUID),
nazev, ikonku a pripadne dalsi informace, vytvori si menu, tlacitka
atp. Kdyz pridam novy celek, nemusim nijak zvlast resit jeho
zacleneni do systemu, protoze se bude umet zaclenit sam. V
jednom EXE musim o kazdem formulari (nebo logicke skupine
fomrularu) vedet predem (musim tedy doprogramovat volani podle
jmen atp.), v COM objektech musim mit definovane pouze nutne
komunikacni rozhrani, ale o formularich nemusim dopredu vedet
nic. O jejich existenci se mohu dozvedet az po spusteni programu.
Pak mi staci predat jim potrebne udaje, jako treba konektivitu k
databazi, a dale at se stara modul sam jak umi.
Nejvetsim problemem jsou asi rozhrani pro komunikaci s jinymi
programy. Zejmena se jedna o vystupy ode me a vstupy do
informacnich systemu zakaznika. Ty mohou byt u kazdeho
zakaznika jine, proto se delaji na miru. Zde se v podstate
samostatne objekty nedaji nejak _rozumne_ obejit.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56 (72 95 29 56); GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OT: S-JTSK
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 6.8.2001 19:42:17
ahoj lidi,
uz vic jak dve hodiny browsim ceskej net a shanim informace o S-JTSK
souradnicovym formatu. nemate nekdo nejaky uzitecny URL? potrebuju
hlavne orientaci souradnic. nacteny mapy mam spatne zorientovany
(otoceny o 90 stupnu) a nechci to jenom odhadem otocit. rad bych se
dobabral k "normovanemu" vysledku.
rovnez se prilezitostne preptam na format CIT, nemate nekdo popis? na
http://www.wotsit.org nic takovyho nejni :(.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
wwW.HofyLand.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/reistracia QRChart
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 6.8.2001 19:52:19
Ak v runtime robim TQRChart.Create - tak mi delphi zahlasi error, nieco
ohladne registracie.
Ak na formulari mam QRChart a potom chcem Create tak to je OK.
Co mam urobit - ako mam zaregistrovat QRChart ? Jan Tungli
email: jan.tungli(zv)seznam(tec)cz
tungli(zv)datapac.sk
Rozsahlejsi DB aplikace
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 6.8.2001 19:57:14
> Asi mas pravdu, je to spise vec zvyku. Ja jsem si behem nekolika pokusu a
> omylu na to pomerne zvykl taky.
>
> Uvolnujes ty moduly po nejake dobe ci po pouziti nebo je tam nechavas do
> konce aplikace?
> Ja hlidam zobrazeni formulare a pak je uvolnuji.
Mno... tak i tak. V aplikaci mam moznost nastavit 'na vykon/setreni pameti'.
Podle toho uvolnim balicek bud nakonci nebo: pro kazdy modul, ktery muze byt
sdileny, mam strukturu:
handle, citac... kdyz uvolnuju okno, snizim citac, je-li = 0, uvolnim modul... o
sdilene balicky se stara hlavni okno 'spravce'...
> Jak volas z formulare v ramci balicku jiny formular?
> Ja to delam takhle:
> (Application.FindComponent('PrvFrmForm2') as TForm).Show;
V ramci balicku i mimo balicek uplne stejne, jako kdyby nebyl v dynamicky
nahravanem balicku :-) (MujFormular.Show, nebo MujFormular.BringToFront)
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
S-JTSK
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 6.8.2001 20:00:05
Ahoj,
zkus se podivat do archivu konference
http://gama.fsv.cvut(tec)cz/gis-cz/
popr. se tam rovnou zeptat
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
> ahoj lidi,
>
> uz vic jak dve hodiny browsim ceskej net a shanim informace o S-JTSK
> souradnicovym formatu. nemate nekdo nejaky uzitecny URL? potrebuju
> hlavne orientaci souradnic. nacteny mapy mam spatne zorientovany
> (otoceny o 90 stupnu) a nechci to jenom odhadem otocit. rad bych se
> dobabral k "normovanemu" vysledku.
>
> rovnez se prilezitostne preptam na format CIT, nemate nekdo popis? na
> http://www.wotsit.org nic takovyho nejni :(.
>
> dekuji PeC(zv)
>
> CU onTheFutureOfMatrix
> MatriX.CyberSpace.Cz
> wwW.HofyLand.Cz
>
> /~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
> |[smtp:petr.palicka(zv)atlas(tec)cz]|
> |[smtp:peca(zv)email(tec)cz] |
> \~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
> Balicky, assert, velke fonty
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 6.8.2001 20:17:51
Delphi 6
Svou aplikaci jsem prelozil a vyzkousel na stroji bez delphi. No bylo
to fiasko, ale nasel jsem par zajimavych chyb (doufam, ze mi s nimi
pomuzete):
1) Velky fonty delaj problemy porad. Tedy aplikace je vyvijena na
stroji s nastavenymi malymi fonty. Po spusteni na stroji, kde jsou
velke fonty to dela psi kusy - vetsina formularu ma posuvnik, nektere
komponenty jsou nedostupne (typicky tlacitka OK a Cancel na spodni
casti formulare) a podobne. Nevite jak to osetrit??
2) Assert
pouzivam Assert a jsem z C++ Builderu zvyklej, ze kdyz se nesplni
podminka, tak se vypise prislusna hlaska a aplikace se ukonci... v
Delphi to tak neplati??? Poustel jsem exe mimo prostredi a hodne jsem
se divil ze to nic nedela ani to nepise chybove hlasky!
3) Balicky...ty snad nikdy poradne nepochopim.
Moje aplikace se sklada z Exe souboru a nekolika knihoven. Rozhrani
je mezi nimi je definovano za pomoci jednoho objektu, jehoz potomky
ty DLL knihovny implementuji. Zde byl problem, ze nefungovala metoda
InheritsFrom na urceni, z ceho je objekt odvozen, pokud se to volalo
mimo modul, kde byl tento objek vytvoren. To se nakonec vyresilo
balickem, ktery kazdy modul pouziva (v tom balicku je ten zakladni
objekt). Vse je OK. Problem nastal, kdyz jsem zjistil, ze aplikace
potrebuje vselike dalsi balicky (na stroji bez Delphi). Nelenil jsem
a vypnul jsem v nastaveni (jak exe tak dll knihoven) Build with
runtime packages. Velikost obeho nahle vzrostla (exe - 760 kb) :o)
ale uz jsem dalsi knihovny nepotreboval... problem byl, ze aplikace
nefungovala (tedy zase nefungovalo InheritsFrom), tak jsem zapnul
preklad s balicky a do seznamu balicku jsem dal pouze ten jeden
jediny, ktery obsahuje ten zakladni objekt. Velikost aplikace klesla
na 181 kb a neobesla se zase bez tech dalsich standardnich balicku.
Uz jsem z toho vazne jelen. jak to mam udelat, aby vsechny standardni
balicky byly prilinkovane v EXE a ten jeden se linkoval dynamicky????
Kdo mi to vysvetli?
Predem diky za odpovedi...
Petr
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
`======----( icq: 73995087 )==--- -- -
metody a dedicnost podruhe
[*] 3dimension <3dimension(zv)atlas(tec)cz> - 6.8.2001 20:54:48
Preju hezky den vsem,
jeste zadam o osvetleni situaci u dedenych metod.
Pokud chci udelat zminovaneho potomka TDirectoryListBoxu a potrebuju
predelat statickou metodu, ktera je protected nejde to potomek furt pouziva
puvodni. Podle knihy zacinam s Delphi by to melo fungovat. Pokud ale udelam
jinej priklad a udelam si nevizualni tridu a jejiho potomka a snazim se
upravit funkci, ktera je staticka a taky protected tak to bezi uplne v
pohode. Znamena to ze VCL se chova jinak?
B) pokud mam virtualni metodu a ja delam potomka a tuto metodu upravim
pouzije se vzdy nova? Ve zminovane publikaci totiz je psano ze prekladac
rozhodne, coz podle me souhlasi, ale pokud to tak je podle ceho rozhoduje,
je to podle tridy ?RXMemoryData
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 6.8.2001 21:23:09
Pracuje nekdo s komponentou RXMemoryData z balicku komponent RX a mohl by
poskytnout nejaky prikladek na pouziti teto komponenty. Zkousel jsem
proniknout do pribaleneho dema, ale jsem z toho tak trochu zmateny.
Diky za pomoc
Viktor Marek
viktor(zv)mbox.vol(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.265 / Virov� b�ze: 137 - datum vyd�n�: 18.7.2001
Free compiler
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 6.8.2001 21:31:18
Preji pekny den,
nepremysli Borland o vstricnem kroku, tedy uvolneni free radkoveho
prekladace pro Delphi/Kylix podobne jako tomu bylo v pripade
C++? Je smutne, ze dosud nic takoveho nebylo.
Diky za pripadne informace.
Slavek
Buh miluje ateisty. Neobtezuji ho svymi problemy.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------
Compilace v C++Builderu
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 6.8.2001 21:31:18
Ahoj,
mas pravdu, ze se CPPB chova ,,nejak divne``. Debata na toto
tema nedavno probehla (subject: Je C++ Builder smejd? -- ci tak
nejak). Osobne mam zkusenosti, ze kdyz vyhodis vse, co smrdi
zdrojovym kodem v pascalu (tedy prekladac ma k nim pristup a
tedy je pokazde kompiluje), je kompilace o neco rychlejsi, ale
porad to neni ono. Doufam, ze v dalsi verzi pujde o seriozni
prekladac.
Slavek
> delam vetsi projekt v C++Builderu 5 a pripadne mi, ze pri kompilaci (ne
> build) bere prilis mnoho souboru (a pak to trva) - i co se nezmenily,
> Honza +
Buh miluje ateisty. Neobtezuji ho svymi problemy.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------
Klavesova zkratka
[*] Martin Ben <martin.ben(zv)worldonline(tec)cz> - 6.8.2001 22:19:17
Proste napis do vlastnosti SortCut klavesouvou zkratku, kterou potrebujes.
Dodrzuj vsak konvenci Delphi, t.j. spojovat prepinace pomoci "+" (napr.
Alt+X, Shift+Alt+X). Ostatne, Alt-X ti object inspector nevezme.
Martin
PS: Vyzkousel jsem Alt+X, v D5Ent funguje.
Podminak datumu
[*] Martin Ben <martin.ben(zv)worldonline(tec)cz> - 6.8.2001 22:37:33
> Mam jeden, ale za to velky problem. Z ulozenych zaznamu vytahuju datum (je
> ulozeno jako string) a pote ho porovnavam s datume zadanym v
DateTimePickeru
> asi takto:
> if StrToDate(string) = DateTimePicker1.Date then
A co zkusit toto:
if DateToStr(DateTimePicker1.Date) = string then
Martin Ben
TTreeView.OnCustomDrawItem
[*] Petr =?iso-8859-2?q?E=B9ner?= <petr.esner(zv)atlas(tec)cz> - 6.8.2001 22:47:06
Ahoj,
> > stalo se uz nekomu, ze VCL nekdy predava handleru navesenemu na %subj%
> > chybny parametr Node? Nic sloziteho tam nedelam, jen potrebuji obarvit
> > nektere vetve, pripadne prepnout font a nekdy (nepodarilo se mi
> > vysledovat kdy) je ten handler zavolan s Node ukazujicim kamsi do prazdna
> > -> ma aplikace pada dost ostre na pusu.
>
> a mas nainstalovany SP1 pro D5?
Ted uz ne (mel jsem to asi mesic ale Delphi mi pad dost casto padal) ale
chodily mi bugreporty i kdyz jsem SP1 mel, takze tam problem nebude..
--
Petr E#ner
petr.esner(zv)atlas(tec)cz
Rozsahlejsi DB aplikace
[*] Martin Ben <martin.ben(zv)worldonline(tec)cz> - 6.8.2001 22:50:52
> Ak ti trapi iba to ze budes mat pri variante A viac konekcii na databazu,
> tak to by som vyriesil nasledovne:
> 1. Ak jeden program startuje druhy tak preda mu aj vlastne meno a potom
sa
> automaticku uzavre.
> 2. Ak program ktory bol startovany z ineho programu - ma parenta - a
> skonci, tak automaticky zavola parent program.
Ja bych to tak neresil. Co v pripade, ze se potrebujes, aby ti bezely oba
programy (volajici i volany) zaroven? Spise bych to resil vytvorenim jednoho
pripojeni k
DB (COM) a toto pripojeni by sdilely vsechny programy systemu.
Martin Ben
IconListbox
[*] Ji�� Baudys - 7.8.2001 00:38:35
Doporucuji
http://www.tmssoftware.com/
neni to sice free pro komercni ucely, ale funguje to fakt krasne a i koupi
se to vyplati.
Baudys
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Ing. Jozef Baranec
Sent: Monday, August 06, 2001 1:36 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: IconListbox
Vie mi niekto poradit vhodnu komponentu Listbox s obrazkami pripadne aj s
moznym formatovanim textu?
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.265 / Virov� b�ze: 137 - datum vyd�n�: 18.7.2001
BDE
[*] daniel.hrna(zv)sme(tec)cz - 7.8.2001 05:41:54
Ja pouzivam treba InnoSetup, zda se mi docela slusny (je i cesky), podporuje
BDE.
Pri instalaci BDE na klienta je treba ho zaregistrovat (regserv, ..). Pak by
melo byt aktivni po restartu. Blizsi info o prg. na primy e-mail.
D.
-----Original Message-----
From: Martin Kasman [mailto:martinkasman(zv)pobox.sk]
Sent: Sunday, August 05, 2001 1:51 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: BDE
Chcel by som si vytvorit vlastne instalacky programu spolu s instalaciou
BDE. Nechcem pritom vsak pouzit InstallShield. Co musim spravit, aby po
instalacii BDE aj BDE spravne fungovalo?
Vdaka za kazdu radu.
###########################################
Tato zprava byla oskenovana F-Secure Anti-Virem pro Microsoft Exchange.
Vice informaci na adrese http://www.F-Secure.com/Klavesova zkratka
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 7.8.2001 06:42:02
Taky se muzes podivat na funkce ShortCutToText a TextToShortCut
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
6.8.2001 Martin Ben:
> Proste napis do vlastnosti SortCut klavesouvou zkratku, kterou potrebujes.
> Dodrzuj vsak konvenci Delphi, t.j. spojovat prepinace pomoci "+" (napr.
> Alt+X, Shift+Alt+X). Ostatne, Alt-X ti object inspector nevezme.QRPreview
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 7.8.2001 06:45:30
QRPreview je komponenta, ktera zobrazuje nahled sestavy pred tiskem.
Je to ta bila plocha s par tlacitky, na ktere se ti ukaze report,
pokud zavolas QuckReport.Preview
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
6.8.2001 Martin Kasman:
> Vysvetlite mi prosim niekto dvoma vetami na co sluzi QRPreview.metody a dedicnost podruhe
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 7.8.2001 07:55:42
> Preju hezky den vsem,
> jeste zadam o osvetleni situaci u dedenych metod.
> Pokud chci udelat zminovaneho potomka TDirectoryListBoxu a potrebuju
> predelat statickou metodu, ktera je protected nejde to potomek furt pouziva
> puvodni. Podle knihy zacinam s Delphi by to melo fungovat. Pokud ale udelam
> jinej priklad a udelam si nevizualni tridu a jejiho potomka a snazim se
> upravit funkci, ktera je staticka a taky protected tak to bezi uplne v
> pohode. Znamena to ze VCL se chova jinak?
> B) pokud mam virtualni metodu a ja delam potomka a tuto metodu upravim
> pouzije se vzdy nova? Ve zminovane publikaci totiz je psano ze prekladac
> rozhodne, coz podle me souhlasi, ale pokud to tak je podle ceho rozhoduje,
> je to podle tridy ?
Ahoj
zkus poslat kousek kodu kde se o to snazis a ja se ti pokusim pomoct.
Jirka
Free compiler
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 7.8.2001 08:11:08
> nepremysli Borland o vstricnem kroku, tedy uvolneni free radkoveho
> prekladace pro Delphi/Kylix podobne jako tomu bylo v pripade
> C++? Je smutne, ze dosud nic takoveho nebylo.
> BUY C++BUILDER 5 GET DELPHI 4 FREE :-)))
http://www.borland.com/bcppbuilder/freedelphi.html
metody a dedicnost podruhe
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 7.8.2001 08:21:04
Ahoj
Rozdil mezi statickou a virtualni metodou je takovyto:
Predstav si ze mas dve tridy tridu TA a tridu TB=class(TA) jejiho potomka.
trida TA ma metody Met1(statickou) a Met2(virtualni). Predstav si ze obe dve
v TB predefinujes. Kdyz budes mit definovanou promenou A:TA pak muzes udelat
nasledujici A:=TB.Create(...). Do A muzes priradit libovolneho potomka TA.
Prekladac se v tomto pripade zachova takto:
Met 1: je staticka. Prekladac vi ze promena A je typu TA a zavola vzdy
TA.Met1. Jde o staticke rozhodovanivani pri prekladu.
Met2: je virtualni. Prekladac by mel generovat kod, ktery za behu vyhleda
prislusnou metodu. Zjisti ze promena A odkazuje na instanci tridy TB a v
tabulce virtualnich metod najde a vykona metodu TB.Met2. Je to vynikajici
vec, kdyz vim ze s jistou skupinou trid budu delat podobne akce. pak odlisne
casti muzu napsat do virtualnich metod a ty pouzit uz na predkovi v nejake
jine metode ktera obsahuje spolecny kod. Jaromir Cermak
-----Original Message-----
From: 3dimension [mailto:3dimension(zv)atlas(tec)cz]
Preju hezky den vsem,
jeste zadam o osvetleni situaci u dedenych metod.
Pokud chci udelat zminovaneho potomka TDirectoryListBoxu a potrebuju
predelat statickou metodu, ktera je protected nejde to potomek furt pouziva
puvodni. Podle knihy zacinam s Delphi by to melo fungovat. Pokud ale udelam
jinej priklad a udelam si nevizualni tridu a jejiho potomka a snazim se
upravit funkci, ktera je staticka a taky protected tak to bezi uplne v
pohode. Znamena to ze VCL se chova jinak?
B) pokud mam virtualni metodu a ja delam potomka a tuto metodu upravim
pouzije se vzdy nova? Ve zminovane publikaci totiz je psano ze prekladac
rozhodne, coz podle me souhlasi, ale pokud to tak je podle ceho rozhoduje,
je to podle tridy ?Autostart SQL serveru
[*] Ing. J�n Kuch�r <kuchar(zv)unicodesys(tec)cz> - 7.8.2001 08:25:17
> Ahoj,
>
> posilam to snad uz naposled, nevim proc, ale kdyz dam slovicko begin
> na zacatku radku do tela spravy tak mi to hned zaradi jako prilohu i
> kdyz zadnou naeposilam, takze se omlouvam a snad ted to pujde uz vporadku
>
>
> takze podrobneji, SQL server je nainstalovan bez SQL manazera a v programu
> je napsan nasledujici kod pro pripojeni k serveru :
>
> procedure pripoj(srv:string);
> var ees:_SQLServer;
> begin ees:=sqlserver.DefaultInterface;
> ees.Name:=srv;
> ees.LoginSecure:=true;
> sqlserver.ConnectTo(ees);
> end;
>
> kod se tvari ze je vporadku, nehlasi zadnou chybu a pak nasleduje
> nastaveni vlastnosti uz zmineneho autostartu a tam to v registry
> nahlasi tu chybu
>
>
>
SelectDirectory
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 7.8.2001 08:26:16
> function SelectDirectory(const Caption: string; const Root:
> WideString; out Directory: string): Boolean;
var InitDir : widestring;
function CallBackSelectDirectory (Wnd : HWND; uMsg : UINT; lParam, lpData :
LPARAM) : integer; stdcall;
var RootItemIDList : PItemIDList; IDesktopFolder : IShellFolder; Eaten,
Flags : LongWord;
begin
result:=0;
if (uMsg<>BFFM_INITIALIZED) then exit;
if (InitDir<>'') then
begin
SHGetDesktopFolder (IDesktopFolder);
RootItemIDList:=nil;
IDesktopFolder.ParseDisplayName (Application.Handle,nil,
POleStr(InitDir),Eaten,RootItemIDList,Flags);
if (RootItemIDList<>nil) then
PostMessage (Wnd,BFFM_SETSELECTION,0,longint(RootItemIDList));
end;
InitDir:='';
end;
function SelectDirectory (const Caption, Root, Init : string; var Directory
: string) : boolean;
var
WindowList: Pointer;
BrowseInfo: TBrowseInfo;
Buffer: PChar;
RootItemIDList, ItemIDList: PItemIDList;
ShellMalloc: IMalloc;
IDesktopFolder: IShellFolder;
Eaten, Flags: LongWord;
RRoot:widestring;
begin
Result := False;
Directory := '';
FillChar(BrowseInfo, SizeOf(BrowseInfo), 0);
if (ShGetMalloc(ShellMalloc) = S_OK) and (ShellMalloc <> nil) then
begin
Buffer := ShellMalloc.Alloc(MAX_PATH);
try
RootItemIDList := nil;
if Root <> '' then
begin
SHGetDesktopFolder(IDesktopFolder);
RRoot:=Root;
IDesktopFolder.ParseDisplayName(Application.Handle, nil,
POleStr(RRoot), Eaten, RootItemIDList, Flags);
end;
InitDir:=Init;
with BrowseInfo do
begin
hwndOwner := Application.Handle;
pidlRoot := RootItemIDList;
pszDisplayName := Buffer;
lpszTitle := PChar(Caption);
ulFlags := BIF_RETURNONLYFSDIRS;
lpfn:=CallBackSelectDirectory;
end;
WindowList := DisableTaskWindows(0);
try
ItemIDList := ShBrowseForFolder(BrowseInfo);
finally
EnableTaskWindows(WindowList);
end;
Result := ItemIDList <> nil;
if Result then
begin
ShGetPathFromIDList(ItemIDList, Buffer);
ShellMalloc.Free(ItemIDList);
Directory := Buffer;
end;
finally
ShellMalloc.Free(Buffer);
end;
end;
end;
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.265 / Virov� b�ze: 137 - datum vyd�n�: 18.7.2001
TIdHTTP a Cookie
[*] Filip Jirs�k <Filip.Jirsak(zv)centrum(tec)cz> - 7.8.2001 08:41:16
Jako HTTP hlavicku (HTTP header) poslat "Cookie: name1=value1; name2=value2;
..." Pokud potrebujete vedet, jak� cookie v�m server pos�l�, najdete je v
hlavick�ch "Set-Cookie:", kter� pos�l� server.
Filip Jirs�k
----- Original Message -----
From: "Petr Vaclavek" <bla(zv)atrey.karlin.mff.cuni(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, August 04, 2001 2:47 PM
Subject: TIdHTTP a Cookie
> Pomoci komoponenty TIdHTTP (zalozka Indy v Delphi6) ziskam z weboveho
> serveru obsah stranky.To je v pohode az do te chvile nez se do toho
> zapoji cookies. Dejme tomu Altavista - na jejich strankach se da
> nastavit jak ma vypadat stranka s vysledky (jake ma obsahovat udaje).
> No a pokud to nastavim, ulozi se to do Cookies. A kdyz potom v
> prohlizeci pozadam o stranku s vysledky, vypada uplne jinak, nez ta,
> o kterou pozadam z vlastni aplikace (ta proste nevyuzije Cookie).
> Takze jak pomoci TIdHTTP (pripadne jine podobne komponenty) predam
> serveru cookie s nastavenim a ziskam vyslednou stranku??
> Predem diky za odpoved (snad to neni moc zmatene)
>
> Petr
>
> --=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
> `======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
> `======----( read: http://www.swnet(tec)cz )=-- -- -
> `======----( icq: 73995087 )==--- -- -
>
>Co je tady spatne ??
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 7.8.2001 08:42:16
Ahoj, nevite nekdo, co tady mam spatne. Konci mi to s chybou Constant
expression expected na endu na konci dvojky.
Jeste mi to ani nefunguje tak jak bych chtel.
procedure TfrmSpecifikace.Specifikace(Sender: TObject);
begin
case NajdiTyp(Typ.Text) of
1: .............
2: if OvladaniS.Text = '' then
begin
frmHlavni.MsgDlg(Format(SpatnaPolozka,['Ovl�d�n�']),'Upozorn�n�',mtWarning,[
mbYes]);
Exit;
end
else if Kabel.Enabled = True then
if Kabel.Text = '' then
begin
frmHlavni.MsgDlg(Format(SpatnaPolozka,['Kabel']),'Upozorn�n�',mtWarning,[mbY
es]);
Exit;
end;
if frmHlavni.Ohrev = True then
begin
if Nastavec.Text = '' then
begin
frmHlavni.MsgDlg(Format(SpatnaPolozka,['N�stavec']),'Upozorn�n�',mtWarning,[
mbYes]);
Exit;
end
else if Vyfuk.Text = '' then
begin
frmHlavni.MsgDlg(Format(SpatnaPolozka,['V�fuk']),'Upozorn�n�',mtWarning,[mbY
es]);
Exit;
end;
end
else
begin
if Kryt.Text = '' then
begin
frmHlavni.MsgDlg(Format(SpatnaPolozka,['Kryt']),'Upozorn�n�',mtWarning,[mbYe
s]);
Exit;
end;
end; Tady to zkonci !!!!!!!!!!!!!!!!!!!!!!!!!!!
3: ;
end;
if not Assigned(frmVysVyber) then
begin
frmVysVyber := TfrmVysVyber.Create(Application);
frmVysVyber.Show;
end;
end;
Dik za pomoc.
====================================
Filip Hazuka
��pkova 363
L�zn� Bohdane�, 533 41
Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
====================================Balicky, assert, velke fonty
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 07.8.2001 09:20:25
> 3) jak to mam udelat, aby vsechny standardni
> balicky byly prilinkovane v EXE a ten jeden se linkoval dynamicky????
ahoj,
podle me toho nedocilis. Pokud prekladas projekt s balicky, vzdy bude
potreba minimalne vclX0.bpl, pripadne dalsi (zalezi co vsechno v
aplikaci pouzivas). Pokud prekladas bez balicku, bude vse v jednom
jedinem exe (vetsi velikosti), a nezbyde ti nic jinyho nez pouzit
klasicke dll. Jine moznosti asi nejsou...
S pozdravem Milan Cizek, D5 Ent
______________________________________________________________________
E-mail zdarma na cely zivot: http://email.seznam(tec)cz
naozaj tenky klient
[*] cis <cis(zv)atlas(tec)cz> - 7.8.2001 09:20:20
Hi,
obavam se, ze nemuzes pouzit DCOM pres internet. Provadel jsem s tim dlouhou
dobu pokusy a slo to pouze tak, ze v clintovi jsem musel pouzit misto
tDCOMconnection TSocketConnection a funguje to bezvadne. Jinak ves zustalo
stejne.
alda
----- Original Message -----
From: Miroslav Hrosso <hrossik(zv)nrsys.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, August 06, 2001 12:39 PM
Subject: Re: naozaj tenky klient
>
> ----- Original Message -----
> From: "David Mensik" <mensikd(zv)seznam(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Thursday, August 02, 2001 8:47 PM
> Subject: RE: naozaj tenky klient
>
>
> > Sorry za ten predchozi mail...:((
> > Co takhle pouzit www server, vzhled predelat do html, moduly prepsat do
> COM
> > a poustet to pod Windows + IIS?
> > Pak se muze pouzit libovolny html prohlizec (pokud vzhled bude HTML
nejaky
> > standard, dostatecne nizky, aby to zvladl i Netscape), vsechno vykonne
> > pobezi na serveru...
> >
> > Ozon
> >
>
> To by ma zaujimalo, ako nastvit COM/DCOM, aby isiel cez internet tak, aby
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 10.5.2001
Balicky, assert, velke fonty
[*] Pavol Kakacka <kakacka(zv)proca(tec)cz> - 7.8.2001 09:31:38
> > 3) jak to mam udelat, aby vsechny standardni
> > balicky byly prilinkovane v EXE a ten jeden se linkoval dynamicky????
>
> ahoj,
> podle me toho nedocilis. Pokud prekladas projekt s balicky, vzdy bude
> potreba minimalne vclX0.bpl, pripadne dalsi (zalezi co vsechno v
> aplikaci pouzivas). Pokud prekladas bez balicku, bude vse v jednom
> jedinem exe (vetsi velikosti), a nezbyde ti nic jinyho nez pouzit
> klasicke dll. Jine moznosti asi nejsou...
> S pozdravem Milan Cizek, D5 Ent
Ano urobit to ide, ale myslim ze lepsie je uvazovat o DLL, lepsie sa s tym
pracuje (samozrejm zalezi na potrebe). Na linkovanie balicku sluzi metoda
LoadPackage, na zistenie triedy objektov FindClass,..., viac v hlp.
Pavol Kakacka
KasiX(zv)atlas(tec)cz
Co je tady spatne ??
[*] Pavel Gazda <Pavel.Gazda(zv)seznam(tec)cz> - 7.8.2001 09:31:08
Pouzivej
begin
end
Ahoj, nevite nekdo, co tady mam spatne. Konci mi to s chybou Constant
expression expected na endu na konci dvojky.
Jeste mi to ani nefunguje tak jak bych chtel.
procedure TfrmSpecifikace.Specifikace(Sender: TObject);
begin
case NajdiTyp(Typ.Text) of
1: .............
2:
begin { !!!!!!!!!!!!!}
if OvladaniS.Text = '' then
begin
end;
{ ....... }
end; {!!!!!!!!!!!!!}
3: ;
end;
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 7.8.2001 09:49:59
ahoj lidi
jak je to s projekty vyvijenymi v Kylix OE je mi jasne,
ale co kdyz mam komercni projekt v D6, napsany pouze s pouzitim CLX a v
Kylix OE bych ho _pouze_ prelozil?
bylo by to poruseni licencnich podminek nebo ne (projekt by _nebyl_ open
source v zadnem pripade)?
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
wwW.HofyLand.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Co je tady spatne ??
[*] ing. Pavel Zilinec <zilinec(zv)email(tec)cz> - 7.8.2001 10:06:19
Kazda cast v case musi byt 'jeden' prikaz. U Tebe je sekce '2:' slozena
ze dvou IFu, takze proto Ti to hlasi chybu - staci to zavrit do
begin-end. Viz dole
------
ing. Pavel Zilinec
mailto:zilinec(zv)email(tec)cz
07.08.2001 Hazuka Filip:
> Ahoj, nevite nekdo, co tady mam spatne. Konci mi to s chybou Constant
> expression expected na endu na konci dvojky.
> Jeste mi to ani nefunguje tak jak bych chtel.
> procedure TfrmSpecifikace.Specifikace(Sender: TObject);
> begin
> case NajdiTyp(Typ.Text) of
> 1: .............
****************
2: begin
if OvladaniS.Text = '' then .....
****************
> 2: if OvladaniS.Text = '' then
> begin
> frmHlavni.MsgDlg(Format(SpatnaPolozka,['Ovl�d�n�']),'Upozorn�n�',mtWarning,[
> mbYes]);
> Exit;
> end
> else if Kabel.Enabled = True then
> if Kabel.Text = '' then
> begin
> frmHlavni.MsgDlg(Format(SpatnaPolozka,['Kabel']),'Upozorn�n�',mtWarning,[mbY
> es]);
> Exit;
> end;
> if frmHlavni.Ohrev = True then
> begin
> if Nastavec.Text = '' then
> begin
> frmHlavni.MsgDlg(Format(SpatnaPolozka,['N�stavec']),'Upozorn�n�',mtWarning,[
> mbYes]);
> Exit;
> end
> else if Vyfuk.Text = '' then
> begin
> frmHlavni.MsgDlg(Format(SpatnaPolozka,['V�fuk']),'Upozorn�n�',mtWarning,[mbY
> es]);
> Exit;
> end;
> end
> else
> begin
> if Kryt.Text = '' then
> begin
> frmHlavni.MsgDlg(Format(SpatnaPolozka,['Kryt']),'Upozorn�n�',mtWarning,[mbYe
> s]);
> Exit;
> end;
> end; Tady to zkonci !!!!!!!!!!!!!!!!!!!!!!!!!!!
****************
end;
****************
> 3: ;
> end;
> if not Assigned(frmVysVyber) then
> begin
> frmVysVyber := TfrmVysVyber.Create(Application);
> frmVysVyber.Show;
> end;
> end;
> Dik za pomoc.
> ====================================
> Filip Hazuka
> ��pkova 363
> L�zn� Bohdane�, 533 41
> Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
> ====================================
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 7.8.2001 10:17:01
----- Original Message -----
From: "Petr Palicka" <petr.palicka(zv)atlas(tec)cz>
> ahoj lidi
>
> jak je to s projekty vyvijenymi v Kylix OE je mi jasne,
> ale co kdyz mam komercni projekt v D6, napsany pouze s pouzitim CLX a v
> Kylix OE bych ho _pouze_ prelozil?
> bylo by to poruseni licencnich podminek nebo ne (projekt by _nebyl_ open
> source v zadnem pripade)?
Ahoj.
Selsky rozum mi rika, ze ne. Jedine by to bylo nekde jasne napsane, ze
zaroven s licenci na D6 ziskavas nejaka jina prava pro Kylix OE.
IHMO je jedno, jaky modul (IDE,Compiler) pro neco pouzivas, licencovano je
oboji najednou.
Ludek
OCX
[*] <volcik(zv)email(tec)cz> - 7.8.2001 10:55:43
Zdravim vsecky
Poradte mi, prosim, nekdo, jak mam odinstalovat nainstalovanou AktiveX componentu (konkretne PDF.OCX - AcrobatReader). Mam D5. Dekuji za kazdou radu. D.V.
---
** CREATED BY EMAIL.CZ **
http://www.email(tec)cz <--- Get Your Free Email
Thread v jine unite
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 07.8.2001 11:03:36
ahoj,
mam par zacatecnickych dotazu. Potrebuju vyrobit unitu, ktera bude
fungovat jako samostatny thread. V te unite je scanovani popup oken
IE a jejich odstrelovani - to uz tu bylo. Takze,
moje predstava: v hlavni unite (formu) mam checkbox, pokud jej
checknu, thread by se mel aktivovat (pri vypnuti deaktivovat). Dale
bych chtel nejakym posuvnikem nastavovat uroven priority. Asi by bylo
lepsi, aby se z hlavni unity volala nejaka procedura z te unity, kde
je thread (neco jako: startujthread,zavrithread,setpriority...).
1) jak mam udelat, aby ten thread hned neskoncil? Muzu si dovolit
pouzit nejakou nekonecnou smycku - to je asi blbost, pokud chci, aby
se to pri skonceni programu vsechno dobre uvolnilo :(
2) pokud vytvarim thread, jako parametr se uvadi true/false - muzete
mi nekdo objasnit rozdil? Z helpu jsem to moc dobre nepochopil.
Samozrejme by vse slo jednoduse, kdybych si mogl ten thread
nadefinovat v te hlavni unite, kde bych take volal vsechny ty funkce,
ale pocitam s pozdejsim prepisem te 'threadunity' do DLL popr.BPL,
takze potrebuju aby to bylo co nejvice nezavisle na hlavnim programu.
PS: pokud jsem totalne mimo a chci nemozne, pak se omlouvam. Thready
jsem dosud pouzival vzdy jen v hlavni unite.
S pozdravem Milan Cizek, D5
Ent
______________________________________________________________________
Poctenicko pro kazdy den: http://www.novinky(tec)cz
OCX
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 07.8.2001 11:07:22
> Zdravim vsecky
> Poradte mi, prosim, nekdo, jak mam odinstalovat nainstalovanou AktiveX componentu (konkretne PDF.OCX - AcrobatReader). Mam D5. Dekuji za kazdou radu. D.V.
Componnet-Import ActiveX-vyberes a das remove
S pozdravem Milan Cizek, D5
Ent
______________________________________________________________________
Vylepsete svuj prohlizec Internetu na http://software.seznam(tec)cz/listicka
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 7.8.2001 12:10:26
> Selsky rozum mi rika, ze ne.
me taky (ani by to nebylo slusne/eticke).
> Jedine by to bylo nekde jasne napsane, ze
> zaroven s licenci na D6 ziskavas nejaka jina prava pro Kylix OE.
spis by to melo byt vyslovne uvedeno u KxOE, nevim, jestli tam pisou o
vyvoji jako takovem a jestli zminuji i kompilaci.
stejne, kdy z to bude potreba, tak to do firmy koupime, zas tolik penez
to neni.
kazdopadne, jestli to chapu dobre, tak mnozina komponent OE a DE je
stejna, ze? tudiz treba jenom na zkousku by to melo jit bez problemu
(test, zda to vubec jde prelozit).
zajimalo by me, kolik lidi tady uz Kylix pouziva k necemu konkretnimu.
chtelo by to nejakou anketu u Borlandu.
Pavle? nechces to prosadit a dat sem info kde hlasovat?
za AG info
petr palicka
programator
zemedelska inzerce zdarma na
http://www.aginfo(tec)cz
Winbase602
[*] <bejcek(zv)centrum(tec)cz> - 07.8.2001 12:40:08
Ahoj kluci,mate nekdo zkusenost s Winbase602 v D5? Nepodarilo se
mi nainstalovat komponenty.Hlasi mi to ze chybi nejaka knihovna.
Neporadite mi?
Pripadne mi sdelte jak jste to delali vy.
Aldik Pavel amater vsech amateru
W98 D5 Ent
-----
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Toolbar
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 7.8.2001 12:53:09
Ahoj,
na nekolika instalacich se mi stalo, ze se mi ikony na TToolbaru sesypaly k
jedne strane. Nevite co s tim?
Neni na vine stary ComCtl32?
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
Thread v jine unite
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 07.8.2001 12:55:28
ahoj, takze jestli to bobre chapu, tak si treba hned v onCreate formu
ten thred vytvorim (v OnClose uvolnim). A teprve nekde - treba v akci
checkboxu si zavolam .resume nebo suspend. To je good :)
Muj puvodni dotaz byl smerovan tak, jestli je mozne cely ten thread
vytvorit v te druhe unite - treba ze bych si ho vytvoril v
initialization (zrusil ve finalization) a z te hlavni unity bych ho
jen ridil - suspend,resume,priority... Ono to asi tak urcite pujde,
problem byl v tom, ze sem ten thread mel v implementation.
Co myslis, ktere reseni je lepsi (prehlednejsi). Je to jedno ktere
pouziju?
Diky, uz to snad zvladnu
Milan Cizek, D5
Ent
______________________________________________________________________
Kam do kina ci divadla? http://kultura.seznam(tec)cz
Thread v jine unite
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 07.8.2001 13:25:36
a jeste jedna mala nejastnost. Pokud mi nekdo zavre program, zafola
se Thread.Free, on se automaticky ukonci (terminated)? Podle toho, co
jsem zkousel to vypada, ze jo. Ale je to tak spravne nebo ho to
odstreli natvrdo? Uvazuju moznost, ze thread stale probiha ve smycce
'while not Terminated' a zavolam Free.
Diky
S pozdravem Milan Cizek, D5
Ent
______________________________________________________________________
Nejenom anglicko-cesky slovnik: http://slovnik.seznam(tec)cz
Free komponanta formulare
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 7.8.2001 13:36:43
Ahoj,
nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular barvou,
ale s postupnym odstinovanim ?
Diky.
====================================
Filip Hazuka
��pkova 363
L�zn� Bohdane�, 533 41
Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
====================================OLE funkcie
[*] Roman Toda <toda(zv)digitaldocuments.org> - 7.8.2001 13:38:31
Ahoj
Pomozte mi najst ako vratit chybu z OLE objektu a ako ju u klienta
spracovat.
Skratka co vsetko sa da s tym HRESULTom urobit? Ja mam taky pocit, ze nic
moc. Potom ako riesite chyby ktore sa vyskytnu v OLE srv objekte? Ako sa o
nich dozvie klient?
Dik
Roman
Thread v jine unite
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 7.8.2001 14:04:30
V TThread.Destroy je zavolani Terminate, tedy staci volat jen Free.
Jeste jsem mirne kecal ohledne toho, ze Terminate ceka na ukonceni, to
pouze nastavi Terminated a az TThread.WaitFor ceka na ukonceni.
Honza +
> a jeste jedna mala nejastnost. Pokud mi nekdo zavre program, zafola
> se Thread.Free, on se automaticky ukonci (terminated)? Podle toho, co
> jsem zkousel to vypada, ze jo. Ale je to tak spravne nebo ho to
> odstreli natvrdo? Uvazuju moznost, ze thread stale probiha ve smycce
> 'while not Terminated' a zavolam Free.Free komponanta formulare
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 7.8.2001 14:23:27
> Ahoj,
> nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular barvou,
> ale s postupnym odstinovanim ?
Podivej se na komponenty Rx. Ve VclUtils je procedura GradientFill.
Pak uz staci jen predefinovat Paint u formulare spoustet ji tam.
Jirka
Brodcast
[*] Ing. Vladim�r R��i�ka���#��rF#v("#�� - 7.8.2001 14:35:26
Zdarec
potrebuji poslat Broadcastovou zpravu v ARP a jeste ke vsemu z Delphi 4.
jo a taky ochytit pripdnou odpoved na ni.
Pomuze mi nekdo ?
Diky moc.
Vladimir
D4,W98
kontakt na D.OM nebo jiny free UML
[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 7.8.2001 14:42:56
ahoj,
mate prosim nekdo aktualni kontakt na autory D.OM ?
Stranky Atos Origin
http://www.ii.atos-group.com/rhone-alpes/Dom/english/index.html jsou mimo
provoz.
Pripadne bych uvital i jiny vyzkouseny UML s vystupem do Delphi (ale max tak
do $500, takze Rational Rose aj. radsi ne...).
poradi nekdo?
diky Petr
Mohapl
Free komponanta formulare
[*] Ing. Vladim�r R��i�ka���#��rF#v("#�� - 7.8.2001 14:43:15
Myslim, ze komponenta neni treba ...
pomocna fce:
function AdjustColor(A : TColor; Factor : Real): TColor;
var
R,G,B : Byte;
begin
R := Round(GetRValue(ColorToRGB(A))*Factor);
G := Round(GetGValue(ColorToRGB(A))*Factor);
B := Round(GetBValue(ColorToRGB(A))*Factor);
Result := RGB(R,G,B);
end;
a do on paint formu:
procedure TForm1.FormPaint(Sender: TObject);
var a : Integer;
begin
With inherited Canvas do
begin
Pen.Style := psClear;
For a := 0 to ClientHeight div 2 do
begin
Brush.Color := AdjustColor(clBlue,1-(a*2/ClientHeight));
Rectangle(0,ClientHeight-a*2,ClientWidth+1,ClientHeight-a*2+3);
end;
end;
end;
Vladimir
D4,W98
----- Original Message -----
From: "Hazuka Filip" <filip.hazuka(zv)multivac(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 07, 2001 1:36 PM
Subject: Free komponanta formulare
> Ahoj,
> nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular
barvou,
> ale s postupnym odstinovanim ?
>
> Diky.
>
> ====================================
> Filip Hazuka
> ��pkova 363
> L�zn� Bohdane�, 533 41
> Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
> ====================================Ziskani cisla verze z programu
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 7.8.2001 14:48:57
Zdravim,
mate nekdo konretni postup ci nakopnuti, jak z RES (je to vubec v RES?)
ziskat informace o verzi programu (nazvu atd.), ktere nastavujete ve version
info? Diky za jakykoli smer. KER
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.264 / Virov� b�ze: 136 - datum vyd�n�: 2.7.2001
Free komponanta formulare
[*] Jaromir Svoboda, Bc. <jaromir.svoboda(zv)asei(tec)cz> - 7.8.2001 14:58:18
Hledej komponentu TGradient. Pracuje spolehlive.
Bohuzel ji nemam u sebe. Kdyz by bylo nejhure tak
mne napis.
Hodne zdaru.
Jaromir Svoboda
mailto:jaromir.svoboda(zv)asei(tec)cz
=================
Ahoj,
nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular barvou,
ale s postupnym odstinovanim ?
Diky.
Filip Hazuka
Ziskani cisla verze z programu
[*] Marek Muller <delphi-konference(zv)bcpraha(tec)com> - 7.8.2001 15:13:55
GetFileVersionInfoSize
GetFileVersionInfo
VerQueryValue
Marek Muller
-----Original Message-----
Zdravim,
mate nekdo konretni postup ci nakopnuti, jak z RES (je to vubec v RES?)
ziskat informace o verzi programu (nazvu atd.), ktere nastavujete ve version
info? Diky za jakykoli smer. KER
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2001 15:17:30
Haj hou!
On 7 Aug 2001,, Petr Palicka wrote:
> spis by to melo byt vyslovne uvedeno u KxOE, nevim, jestli tam pisou o
> vyvoji jako takovem a jestli zminuji i kompilaci.
Kylix OE ma specialne upraveny kompilator, ktery do GUI aplikaci
zahrne jednotku QOpenBanner (kterou jen tak mimochodem nejde
zmenit, ackoliv mate k dispozici zdrojaky pod GPL). Ta se postara
o zobrazeni splash screenu obsahujiciho informaci ze program je
GPL a byl vytvoren Kylixem.
> stejne, kdy z to bude potreba, tak to do firmy koupime, zas tolik penez
> to neni.
cca 8,000.-Kc
> kazdopadne, jestli to chapu dobre, tak mnozina komponent OE a DE je
> stejna, ze? tudiz treba jenom na zkousku by to melo jit bez problemu
> (test, zda to vubec jde prelozit).
Ne KOE nema databazove komponenty, INDY atd. Je tam je
baseclx a visualclx.
> zajimalo by me, kolik lidi tady uz Kylix pouziva k necemu konkretnimu.
> chtelo by to nejakou anketu u Borlandu.
>
> Pavle? nechces to prosadit a dat sem info kde hlasovat?
Navrzeno. Uvidime co z toho bude :-)
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.MS Outlook
[*] Gabika Polcova <gabika.polcova(zv)cnzp(tec)cz> - 7.8.2001 16:08:47
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
Dobry
prosim Vas da sa s Delphi 5 pristupovat k MS OUtlooku
ako ku COM objektu.
A ak ano, kde mozem ziskat zoznam vlastnosti a metod
cez ktore sa da outlook ovladat...
Dakujem
Gabika
dbgrid bug???
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 7.8.2001 16:13:12
Ahoj,
mam prazdny formular, umistim na nej TDBGrid /align:=Left, nejake tri Columns,
jeden z nich Visible:=false/ a TSplitter /align:=left/. Pokud v runtime pomoci
splitteru nastavim sirku Gridu tak, aby se nezobrazil horizontalni scrollbar,
ale pritom jeho sirka byla nejmensi mozna, pak a) objevi se Access violation ve
vcl40.bpl, nebo b) pri navratu do designu nelze otevrit Object Inspector z
duvodu Access violation ve vcl40.bpl, nebo c) pokud pouziju TRxDBGrid, aplikace
se zacykli s Access violation in module rxdb40.bpl.
Jsou-li vsechny Columns viditelne, je vse v poradku...
Deje se to i jinde?
Roman
D4, w95, rx2.75
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
Rozsahlejsi DB aplikace
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 7.8.2001 16:20:55
> > Jak volas z formulare v ramci balicku jiny formular?
> > Ja to delam takhle:
> > (Application.FindComponent('PrvFrmForm2') as TForm).Show;
> V ramci balicku i mimo balicek uplne stejne, jako kdyby nebyl v dynamicky
> nahravanem balicku :-) (MujFormular.Show, nebo MujFormular.BringToFront)
Hmm. Nemohl bys nastinit jak to delas? Ja tam mohu dat promenou pro
TCustomForm, ale tim stejne neziskam pristup k obsahu (Editum a dalsim
prvkum atd..) formulare. Takze se opet dostanu k FindComponent :-)))
Leos
Balicky, assert, velke fonty
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 7.8.2001 16:28:59
> > ahoj,
> > podle me toho nedocilis. Pokud prekladas projekt s balicky, vzdy bude
> > potreba minimalne vclX0.bpl, pripadne dalsi (zalezi co vsechno v
> > aplikaci pouzivas). Pokud prekladas bez balicku, bude vse v jednom
> > jedinem exe (vetsi velikosti), a nezbyde ti nic jinyho nez pouzit
> > klasicke dll. Jine moznosti asi nejsou...
> > S pozdravem Milan Cizek, D5 Ent
>
> Ano urobit to ide, ale myslim ze lepsie je uvazovat o DLL, lepsie sa s tym
> pracuje (samozrejm zalezi na potrebe). Na linkovanie balicku sluzi metoda
> LoadPackage, na zistenie triedy objektov FindClass,..., viac v hlp.
No, nevim ve ktere verzi Delphi to de, ale ve 4 urcite ne... alespon ne zadnym
me znamym dokumentovanym zpusobem. Pokud totiz vypnu Build with runtime
packages, tak si v aplikaci dynamicky nenahraju zadny balicek /pomoci
LoadPackage, i kdyz se nenahlasi zadna chyba, ci neco podobneho/.
Pokud misto balicku pouziju DLL, tak pri pouziti komponent VCL, budu mit VCL v
kazde DLL, ne? /:-) to je veta/
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
Free komponanta formulare
[*] skalsky(zv)oksystem(tec)cz - 7.8.2001 16:33:03
stahni si Gradient components and utilities z www.torry.ru
http://www.torry.net/interfacelite.htm
... jsou free a umej toho spoustu
... kdybys je nemohl najit, dej vedet .. poslu ti to ... ma to par kilo
Milan
delphi beginner
D3 - Ent., W98, IB6
ICQ #67571111
-----Original Message-----
From: Jiri Wendl, KSH-Data [mailto:wendl(zv)ksh-data(tec)cz]
Sent: Tuesday, August 07, 2001 2:23 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Free komponanta formulare
> Ahoj,
> nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular
barvou,
> ale s postupnym odstinovanim ?
Podivej se na komponenty Rx. Ve VclUtils je procedura GradientFill.
Pak uz staci jen predefinovat Paint u formulare spoustet ji tam.
Jirka
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.8.2001 16:40:46
Haj hou!
On 7 Aug 2001,, Petr Palicka wrote:
> zajimalo by me, kolik lidi tady uz Kylix pouziva k necemu konkretnimu.
> chtelo by to nejakou anketu u Borlandu.
>
> Pavle? nechces to prosadit a dat sem info kde hlasovat?
Anketa je on-line na http://shop.borland(tec)cz
Pokud chcete hlasovat, tak se budete muset sice prihlasit, ale na
oplatku jeden ze zucasnenych ziska Kylix Desktop zadarmo.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.OLE funkcie
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 7.8.2001 16:59:30
From: "Roman Toda" <toda(zv)digitaldocuments.org>
> Pomozte mi najst ako vratit chybu z OLE objektu a ako ju u klienta
> spracovat.
> Skratka co vsetko sa da s tym HRESULTom urobit? Ja mam taky pocit, ze nic
> moc. Potom ako riesite chyby ktore sa vyskytnu v OLE srv objekte? Ako sa o
> nich dozvie klient?
Jestli se nepletu tak je to tak, ze pokud je v implementaci OLE serveru u
metod mapovanych na metody interfacu uvedena direktiva safecall, tak se
pripadne vyjimky automaticky prevadeji na HRESULT.
Martin Schayna
KILIX: OE a kompilace D6 CLX komercniho projektu
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 7.8.2001 17:16:44
> Haj hou!
>
> On 7 Aug 2001,, Petr Palicka wrote:
>
> > zajimalo by me, kolik lidi tady uz Kylix pouziva k necemu konkretnimu.
> > chtelo by to nejakou anketu u Borlandu.
> >
> > Pavle? nechces to prosadit a dat sem info kde hlasovat?
>
> Anketa je on-line na http://shop.borland(tec)cz
> Pokud chcete hlasovat, tak se budete muset sice prihlasit, ale na
> oplatku jeden ze zucasnenych ziska Kylix Desktop zadarmo.
>
> Hodne zdaru
>
> Pavel Cisar <pcisar(zv)borland(tec)cz>
> Borland s.r.o.
To by ta adresa musela obcas fungovat :-))
Radim
Relativni cesta k souboru
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 07.8.2001 17:56:06
zdravim,
uzivatel si vybira pomoci OpenDialogu soubor. Ja bych ovsem potreboval cestu vybraneho souboru predelat do sitove podoby.
Napr: C:\ahoj.txt na \\PC1\disk_c\ahoj.txt.
Jde neco takoveho udelat?
Predem dekuji za jakoukoli radu.
S pozdravem
Mirek Drejcek.
OLE funkcie
[*] Roman Toda <toda(zv)digitaldocuments.org> - 7.8.2001 17:57:25
Hmmm. Ja robim OLE server vo VC++ :( a vobec sa z toho neviem vyhrabat.
Vynimku sa mi nedari preniest, tak som myslel, ze keby bol nejaky iny postup
posielania chyb ..
----- Original Message -----
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 07, 2001 4:59 PM
Subject: Re: OLE funkcie
> From: "Roman Toda" <toda(zv)digitaldocuments.org>
> > Pomozte mi najst ako vratit chybu z OLE objektu a ako ju u klienta
> > spracovat.
> > Skratka co vsetko sa da s tym HRESULTom urobit? Ja mam taky pocit, ze
nic
> > moc. Potom ako riesite chyby ktore sa vyskytnu v OLE srv objekte? Ako sa
o
> > nich dozvie klient?
>
> Jestli se nepletu tak je to tak, ze pokud je v implementaci OLE serveru u
> metod mapovanych na metody interfacu uvedena direktiva safecall, tak se
> pripadne vyjimky automaticky prevadeji na HRESULT.
>
> Martin Schayna
>
>Relativni cesta k souboru
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 7.8.2001 18:35:56
ExpandUNCFileName
From: "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz>
> Ja bych ovsem potreboval cestu vybraneho souboru predelat do sitove
podoby.
> Napr: C:\ahoj.txt na \\PC1\disk_c\ahoj.txt.
> Jde neco takoveho udelat?
Lepsi grafika pro aplikaci - free komponenty
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 7.8.2001 18:41:56
Ahoj,
premyslim ted nad tim, jak vylepsit moji aplikaci po graficke strance. Nejak
mi nestaci standardni komponenty Delphi. Nevite nekdo o nejakych, ktere jsou
free ? Potreboval bych lepsi grafiku formularu, tlacitek a mozna i
comboboxu. Mam Delphi 5 Professional.
Mnohokrat diky.
======================
Filip Hazuka
��pkova 363
L�zn� Bohdane�
E-mail: Filip.Hazuka(zv)uhk(tec)cz
Mobil: 0602/411 828
======================OT: IB a null
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 7.8.2001 19:20:05
Ahoj,
je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo testovani null
/neco jako nz(), iif()/? Potrebuju v poli, ktere je COMPUTED vypocist
"Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze byt null... :-(
Dik a sorry za OT
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
Problem s ActiveX na webu
[*] Milan =?iso-8859-2?Q?=A9orm?= <sorm(zv)pef.mendelu(tec)cz> - 7.8.2001 19:31:13
Dobry den.
Resim problem, jak zajistit spolupraci meho ActiveX prvku (OCX) se zbytkem
formulare na HTML strance. Potrebuji alespon jednu z moznosti:
1. dostat do ActiveX parametr "z venci", tj. napr. v ISAPI vygenerovat
cislo, ktere do ActiveX poslu (a pak si to cislo s daty poznacim treba v
databazi, to uz umim)
2. vratit z ActiveX parametr pri odeslani formulare (neni nutne formular
odeslat, to zajistim druhym tlacitkem, ale alespon predat) - tj. v
ActiveX si napr. vyplnim nejaky formular a jeho vysledek chci odeslat do
ISAPI aplikace
Diky moc za radu alespon v jednom problemu (tyden jsem nad tim jiz
probadal).
diky.
--milan sorm
Jakym zpusobem zavolat z ISAPI Word ci Excel
[*] Milan =?iso-8859-2?Q?=A9orm?= <sorm(zv)pef.mendelu(tec)cz> - 7.8.2001 19:33:42
Dobry den.
Dalsi problem, ktery mne velmi trapi, je otazka zavolani Excelu ci Wordu
(potrebuji DOC ci XLS z mych dat) z ISAPI aplikace - ze samostatne aplikace
mi to v Delphi 5 nedela potize (Servers i CreateOLEObject), ale z ISAPI mi
tento kod nepracuje.
Diky za radu
--milan sorm
Balicky, assert, velke fonty
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 7.8.2001 20:01:01
> > > 3) jak to mam udelat, aby vsechny standardni
> > > balicky byly prilinkovane v EXE a ten jeden se linkoval dynamicky????
> >
> > ahoj,
> > podle me toho nedocilis. Pokud prekladas projekt s balicky, vzdy bude
> > potreba minimalne vclX0.bpl, pripadne dalsi (zalezi co vsechno v
> > aplikaci pouzivas). Pokud prekladas bez balicku, bude vse v jednom
> > jedinem exe (vetsi velikosti), a nezbyde ti nic jinyho nez pouzit
> > klasicke dll. Jine moznosti asi nejsou...
> > S pozdravem Milan Cizek, D5 Ent
>
> Ano urobit to ide, ale myslim ze lepsie je uvazovat o DLL, lepsie sa s tym
> pracuje (samozrejm zalezi na potrebe). Na linkovanie balicku sluzi metoda
> LoadPackage, na zistenie triedy objektov FindClass,..., viac v hlp.
*** aha, asi jsem to spatne vysvetlil - ja pouzivam DLL knihovny.
Jenze se tam vyskytl problem: Kdyz v DLL knihovne vytvorim objekt B,
ktery je potomkem objektu A, tak v aplikaci nemam sanci zjistit Zda
B.InheritsFrom (A); -- jediny mozny zpusob, jak toto umoznit, je
vlozi definici objektu A do balicku, ktery bude pouzivat jak
aplikace, tak DLL knihovna.
A s tim prekladem s a bez balicku jsem chtel dosahnout toho, aby
vsechny potrebne balicky byly nalinkovany do EXE (DLL) a pouze tento
jeden ne.
Petr.
--=====[ PETR VACLAVEK ]====---- --- --- -- -- - -
`======----( visit: http://atrey.karlin.mff.cuni(tec)cz/~bla )=-- -
`======----( read: http://www.swnet(tec)cz )=-- -- -
`======----( icq: 73995087 )==--- -- -
OT: QReport (2 x)
[*] Martin Kasman <martinkasman(zv)pobox.sk> - 7.8.2001 20:45:36
(D5 ent)
Pretoze nikto neodpovedal pytam sa znovu. Je to pre mna velmi dolezite.
Ked nastavim Page.PaperSize na A4, tlac funguje bez problemov. No ked
nastavim na Custom a pritom rozmery stranky necham na A4, pri tlaci sa mi
zobrazi hlaska Printer selected is not Valid.
Vdaka za kazdu radu.
Toolbar
[*] Hurricane <hurricane(zv)quick(tec)cz> - 7.8.2001 21:24:01
Zdravim
Ano, temer urcite. Pokud je problem se zobrazovanim glyphu, tak za to muze
bud stara graficka S3 nebo comctl32.dll.
Hurricane
----- Original Message -----
> na nekolika instalacich se mi stalo, ze se mi ikony na TToolbaru sesypaly
> k
> jedne strane. Nevite co s tim?
> Neni na vine stary ComCtl32?Free compiler
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 7.8.2001 22:22:12
Ahoj,
to je jako podavat ziznivemu chleba. :-) Ale vazne, neexistuje
nejaka moznost free compilera pro uvedene platformy? Docela
bych to ocekaval, treba ze u Delphi bude pro Kylix a pod.
Slavek
> > nepremysli Borland o vstricnem kroku, tedy uvolneni free radkoveho
> > prekladace pro Delphi/Kylix podobne jako tomu bylo v pripade
> > C++? Je smutne, ze dosud nic takoveho nebylo.
> BUY C++BUILDER 5 GET DELPHI 4 FREE :-)))
> http://www.borland.com/bcppbuilder/freedelphi.html
Buh miluje ateisty. Neobtezuji ho svymi problemy.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------
Komponenta podobna TListView
[*] Petr =?iso-8859-2?q?E=B9ner?= <petr.esner(zv)atlas(tec)cz> - 7.8.2001 23:02:34
Ahoj,
> > > Tedy kazdy zaznam krome jednotlivych policek obsahuje i jedno vetsi,
> > > ktere je pod vsemi sloupcemi - viz ten obrazek
> > > A potrebuji to pro Delphi 6, nekomercni vyuziti.
> > To umi ExpressQuantumGrid (www.devexpress.com), ale to je
> > komercni, takze to asi neni pro tebe...
> *** No vzhledem k tomu, ze to je na moji diplomovou praci, tak do
> toho penize cpat nechci :o) O necem jinem nevite?
P. Vones mi tu nedavno doporucil komponentu TVirtualTreeView. Je to sice tree
ale muze fungovat i jako ListView. Pouzit se da na cokoliv, je hodne rychla,
podporuje hafo veci a je free.
http://www.lischke-online.de/VirtualTreeview.html
--
Petr E#ner
petr.esner(zv)atlas(tec)cz
Soubory s priponou .bdc - jeste jednou
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 7.8.2001 23:41:36
Ahoj,
hledal jsem vsechny odkazy, ktere jsem dostal a nenasel jsem rozumnou
odpoved na to co potrebuji. Nemate nekdo konkretni priklad toho, jak
vytvorit soubor s priponou .bdc a jak ho precist ? Pomerne na to specham a
nemohu nic nalezt.
Diky za pomoc.
======================
Filip Hazuka
��pkova 363
L�zn� Bohdane�
E-mail: Filip.Hazuka(zv)uhk(tec)cz
Mobil: 0602/411 828
======================S-JTSK
[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 7.8.2001 23:59:27
> uz vic jak dve hodiny browsim ceskej net a shanim informace o S-JTSK
> souradnicovym formatu. nemate nekdo nejaky uzitecny URL? potrebuju
> hlavne orientaci souradnic. nacteny mapy mam spatne zorientovany
> (otoceny o 90 stupnu) a nechci to jenom odhadem otocit. rad bych se
> dobabral k "normovanemu" vysledku.
Ahoj,
osy jsou +X na jih, +Y na zapad. Prvni se udava Y (v radu 400 000) pak X
(v radu 1 000 000).
Jinak se jedna o souradny system sity na miru CR a SR. Projekce na kuzel
posazeny na zmesenou referencni kouli s dotykovou kruznici podel byv.
Ceskoslovenska. Referencni koule tak na nasem uzemi protina kuzel ve
dvou kruznicich s nulovym delkovym zkreslenim, takze max. zkresleni ze
zobrazeni je u nas tusim 12 mm na 100 m, ale to bych si radsi overil.
Miroslav Novosad
mirnov(zv)atlas(tec)cz
Listview a centrovani
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 8.8.2001 00:26:34
Zdravim,
cim to, ze ListView odmita jine nastaveni Aligment sloupce nez taLeftJustify??? Chtel bych stredeny sloupec ve stylu
vsReport, zkousel jsem snad vsechno, i do archivu cucel a ono proste nic. Nevite nekdo? Dik.
Adam Feistner (D5Ent)
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
Rozsahlejsi DB aplikace
[*] ing. Pavel Zilinec <zilinec(zv)email(tec)cz> - 8.8.2001 05:48:02
Pokud jde o ty balicky, je to vcelku jednoduche.
V pripade tri balicku B1, B2, B3, kdy B3 vola neco z B1, tak je to
tak, ze B3 ma v Requires zahrnuty B1.dcp a v nejake te unite v B3, kde
chci pouzit ten formular, tak normalne do uses dam odkaz na unitu z B1
a pracuji s tim jako bych to mel ve svem balicku.
Balicek B1 staci kompilovat jen jednou bez ohledu na pocet zmen v B3,
ale pokud udelam v B1 'zasadni' zmenu (Zruseni nejake procedury,
unity, nove parametry funkce, ...), tak se musi prekompilovat i B3 (i
kdybych v nem zmenu neudelal nebo se zmena toho balicku ani nedotkla).
K tomu je dobre pouzit 'Borland project group', kde mam vsechny
balicky v poradi, jak musi byt kompilovany za sebou.
------
ing. Pavel Zilinec
mailto:zilinec(zv)email(tec)cz
07.08.2001 Leos Urban:
>> > Jak volas z formulare v ramci balicku jiny formular?
>> > Ja to delam takhle:
>> > (Application.FindComponent('PrvFrmForm2') as TForm).Show;
>> V ramci balicku i mimo balicek uplne stejne, jako kdyby nebyl v dynamicky
>> nahravanem balicku :-) (MujFormular.Show, nebo MujFormular.BringToFront)
> Hmm. Nemohl bys nastinit jak to delas? Ja tam mohu dat promenou pro
> TCustomForm, ale tim stejne neziskam pristup k obsahu (Editum a dalsim
> prvkum atd..) formulare. Takze se opet dostanu k FindComponent :-)))
> Leos
IB a null
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 8.8.2001 07:32:59
> je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo
> testovani null /neco jako nz(), iif()/?
> Potrebuju v poli, ktere je COMPUTED vypocist
> "Celkem"="Prijato"-"Vydano"
no, ja nic nenasel, ale nadeklarovali jsme potrebne polozky s default =
0, takze to potom spocita dobre. je to berlicka, ale funguje.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
wwW.HofyLand.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Free compiler
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 8.8.2001 07:43:30
> to je jako podavat ziznivemu chleba. :-) Ale vazne, neexistuje
> nejaka moznost free compilera pro uvedene platformy? Docela
> bych to ocekaval, treba ze u Delphi bude pro Kylix a pod.
>
Ja bych si tipl, ze to cekat nelze - on compiler asi nejde jen tak
odkuchnout od zbytku (balicky, knihovny) - vlastne by to znamenalo, ze
budes mit komplet nastroj, mimo IDE a jinych vizualnich nastroju ... A
pokud by to existovalo, tak by si lidi vyvinuli nejaky free IDE (neco jako
LAZARUS http://www.lazarus.freepascal.org/) a Borland by toho asi moc
neprodal ...
Takovej je zivot komercnich programatoru ...
T.
OT: IB a null
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 8.8.2001 07:46:30
On 7 Aug 2001, at 19:20, Roman wrote:
> Ahoj,
> je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo testovani
> null /neco jako nz(), iif()/?
Myslim ze ne. Leda by sis ji napsal.
Potrebuju v poli, ktere je COMPUTED
> vypocist "Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze
> byt null...
Hm. Kdysi kdesi jsem obcas cetl doporuceni omezit pouzivani
NULL, tj. definovat atributy jako NOT NULL. Drzim se toho a jsem
rad. NULL ma asi smysl povolit jen u atributu kdy vyznam "neni
znamo, definovano" ma logiku - napriklad datum uhrady u
neuhrazenych pohledavek. U mnozstvi prijato vydano ma asi spis
logiku "DEFAULT 0". No ale kdyz uz tam ty NULL mas a funkci ne
tak jelikoz mam rad ulozene procedury tak bych si select delal
select procedurou a v ni NULL na nulu prevedes celkem snadno.
Z.Kalhous
OT: QReport (2 x)
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 8.8.2001 07:51:34
> Pretoze nikto neodpovedal pytam sa znovu. Je to pre mna velmi
> dolezite. Ked nastavim Page.PaperSize na A4, tlac funguje bez
> problemov. No ked nastavim na Custom a pritom rozmery stranky necham
> na A4, pri tlaci sa mi zobrazi hlaska Printer selected is not Valid.
Nevim, jestli ta ma rada pomuze... Doporucoval bych testovat, zda
uzivatelsky rozmer papiru je rozmerove A4, a pokud je, namisto Custom
pouzit opravdu A4. Ta hlaska je sice divna, ale ja spis narazil na
problem, ze tiskarna Minolta pri nastaveni na Custom (trebaze
rozmerove A4) stranku nevytiskla, dokud uzivatel neodmackl na jejim
panelu, ze papir zadanych rozmeru je pripraven.
Karel Rys
OT: IB a null
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 08.8.2001 08:14:05
http://www.cvalde.com/document/computed_fields_conditional.htm
Roman wrote:
>
> Ahoj,
> je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo testovani null
> /neco jako nz(), iif()/? Potrebuju v poli, ktere je COMPUTED vypocist
> "Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze byt null... :-(
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
MS Outlook
[*] PeJaSoft <pejasoft(zv)pejasoft(tec)com> - 8.8.2001 08:15:13
Info najdes na MSDN nebo treba na www.delphi3000.com.
Taky to je hezky popsane tady:
http://www.djpate.freeserve.co.uk/AutoOutl.htm
S pozdravem
Petr Jarkovsky
pejasoft(zv)pejasoft.com
www.pejasoft.com
----- Original Message -----
From: Gabika Polcova
Dobry
prosim Vas da sa s Delphi 5 pristupovat k MS OUtlooku
ako ku COM objektu.
A ak ano, kde mozem ziskat zoznam vlastnosti a metod
cez ktore sa da outlook ovladat...
Dakujem
Gabika
Thread v jine unite
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 08:18:15
Dne 7.�srpen�2001, <delphi-l(zv)clexpert(tec)cz> napsal:
> V TThread.Destroy je zavolani Terminate, tedy staci volat jen Free.
>
> Jeste jsem mirne kecal ohledne toho, ze Terminate ceka na ukonceni, to
> pouze nastavi Terminated a az TThread.WaitFor ceka na ukonceni.
ahoj,
mne to ale nechce nejak fungovat. V druhe unite si vytvorim Thread:
type
TKillerThread = class(TThread)
protected
procedure Execute; override;
end;
var KillerThread: TKillerThread;
....
initialization
KillerThread:=TKillerThread.Create(true);
finalization
KillerThread.Free;
z hlavni unity:
KillerThread.Priority:=tpNormal;
if CheckBox2.Checked then KillerThread.Resume else
KillerThread.Suspend;
pokud je thread aktivni a odskrtnu checkbox, tak mi aplikace uplne
vytuhne. Nelze sni ani pohnout :(
Nevite co s tim? Dekuju
S pozdravem Milan Cizek,
D5Ent
______________________________________________________________________
Hledani lidi a jejich e-mailu: http://www.lide(tec)cz
Soubory s priponou .bdc - jeste jednou
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 08:30:08
> hledal jsem vsechny odkazy, ktere jsem dostal a nenasel jsem rozumnou
> odpoved na to co potrebuji. Nemate nekdo konkretni priklad toho, jak
> vytvorit soubor s priponou .bdc a jak ho precist ? Pomerne na to specham a
> nemohu nic nalezt.
ahoj,
co treba tady: http://www.halyava.ru/document/ind_form.htm
soubor: lingvofm.zip, je to rusky, tak nevim vcelku co tam je :((�
snad ti to pomuze
Milan Cizek, D5
Ent
______________________________________________________________________
Jak si stoji kurz koruny? http://kurzy.seznam(tec)cz
Chovani IDE - zahada
[*] L. Filip <lfilip(zv)lekis(tec)cz> - 8.8.2001 08:35:46
Stala se mi zvlastni vec. Pri pouzivani komponet TLabel nebo TDBLabel chci
jejich barvu pozadi zmenit na clWindow, v navrhu je vse v poradku, ale jak
se kouknu do DFM tak zapis o barve tam vubec neni. Tyka se to jen barvy
clWindow ostatni funguji v poradku. Po kompilaci se mi barva clWindow take
nezobrazi.
Neni mi jasne jakto ze se tohleto deje.
Setkal se s tim uz nekdo?
Diky za kazdou radu.Free compiler
[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 8.8.2001 08:39:14
Delphi ma samostatny radkovy kompiler, spust si dcc32.exe,
jinou otazkou je, jestli zadarmo nebo za penize.
Slavek
>
> Ja bych si tipl, ze to cekat nelze - on compiler asi nejde jen tak
> odkuchnout od zbytku (balicky, knihovny) - vlastne by to znamenalo, ze
> budes mit komplet nastroj, mimo IDE a jinych vizualnich nastroju ... A
> pokud by to existovalo, tak by si lidi vyvinuli nejaky free IDE (neco jako
> LAZARUS http://www.lazarus.freepascal.org/) a Borland by toho asi moc
> neprodal ...Lepsi grafika pro aplikaci - free komponenty
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 08:47:33
> premyslim ted nad tim, jak vylepsit moji aplikaci po graficke strance. Nejak
> mi nestaci standardni komponenty Delphi. Nevite nekdo o nejakych, ktere jsou
> free ? Potreboval bych lepsi grafiku formularu, tlacitek a mozna i
> comboboxu. Mam Delphi 5 Professional.
ahoj,
vyzkousel jsem celou radu skinovatelnych komponent. Jako nejlepsi se
mi zatim jevi Varian Skin Factory (varian-software.com). Je to cela
sada. Pochopitelne si pak musis veskere prvky sam namalovat.
V nove releasy bude i koncne novy TNotebook, a opravena chyba v
RadioButonu, kterou sem urgoval :)
S pozdravem Milan Cizek, D5
Ent
______________________________________________________________________
Poctenicko pro kazdy den: http://www.novinky(tec)cz
Relativni cesta k souboru
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 08.8.2001 08:50:27
Dekuji za radu, ale vysledek teto funkce: Cesta:=ExpandUNCFileName(OpenDialog1.FileName); kde soubor je c:\ahoj.txt
vychazi opet c:\ahoj.txt a ne \\PC1\disk_c\ahoj.txt
Takze tudy cesta nevede...
*********** REPLY SEPARATOR ***********
On 7.8.2001 at 18:35 Martin Schayna wrote:
>ExpandUNCFileName
Free komponanta formulare
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 08:51:44
> > Ahoj,
> > nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular barvou,
> > ale s postupnym odstinovanim ?
Primo v baliku BUpack je tato komponenta vcetne zdroje.
S pozdravem Milan Cizek, D5 Ent
______________________________________________________________________
Kam do kina ci divadla? http://kultura.seznam(tec)cz
Beoadcast - ze by zapadlo ?
[*] Ing. Vladim�r R��i�ka���#��rF#v("#�� - 8.8.2001 09:08:10
Zdarec
potrebuji poslat Broadcastovou zpravu v ARP a jeste ke vsemu z Delphi 4.
jo a taky ochytit pripadnou odpoved na ni.
Pomuze mi nekdo ?
Diky moc.
Vladimir
D4,W98
Lepsi grafika pro aplikaci - free komponenty
[*] skalsky(zv)oksystem(tec)cz - 8.8.2001 09:17:52
Mrkni na www.torry.ru - sekce VCL - Component Packs
FLATSTYLE Tcombobox&TEdit
FLATSTYLE components (package)
FUSION Pack
GRADIENT components & utilities
... jsou docela fajnove ...
Milan
delphi beginner
D3 - Ent., W98, IB6
ICQ #67571111
-----Original Message-----
From: Hazuka Filip [mailto:filip.hazuka(zv)multivac(tec)cz]
Sent: Tuesday, August 07, 2001 6:42 PM
To: 'delphi-l(zv)clexpert(tec)cz'
Subject: Lepsi grafika pro aplikaci - free komponenty
Ahoj,
premyslim ted nad tim, jak vylepsit moji aplikaci po graficke strance. Nejak
mi nestaci standardni komponenty Delphi. Nevite nekdo o nejakych, ktere jsou
free ? Potreboval bych lepsi grafiku formularu, tlacitek a mozna i
comboboxu. Mam Delphi 5 Professional.
Mnohokrat diky.
======================
Filip Hazuka
��pkova 363
L�zn� Bohdane�
E-mail: Filip.Hazuka(zv)uhk(tec)cz
Mobil: 0602/411 828
======================OT: QReport (2 x)
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 8.8.2001 09:23:28
Printer selected is not Valid.
Ty musis priradit printer:
if QuickRep1.QRPrinter.Destination<>qrdPrinter then
QuickRep1.PrinterSettings.PrinterIndex=QuickRep1.Printer.PrinterIndex;
Jan Tungli
email: jan.tungli(zv)seznam(tec)cz
tungli(zv)datapac.sk
http://www.tungli.host.sk (NEW SQL REPORT BUILDER)
http://www.nexus.hu/tungli
> -----P�vodn� zpr�va-----
> Od: Karel Rys [SMTP:delphi(zv)zas-me(tec)cz]
> Odesl�no: 8. august 2001 7:52
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: OT: QReport (2 x)
>
> > Pretoze nikto neodpovedal pytam sa znovu. Je to pre mna velmi
> > dolezite. Ked nastavim Page.PaperSize na A4, tlac funguje bez
> > problemov. No ked nastavim na Custom a pritom rozmery stranky necham
> > na A4, pri tlaci sa mi zobrazi hlaska Printer selected is not Valid.
>
> Nevim, jestli ta ma rada pomuze... Doporucoval bych testovat, zda
> uzivatelsky rozmer papiru je rozmerove A4, a pokud je, namisto Custom
> pouzit opravdu A4. Ta hlaska je sice divna, ale ja spis narazil na
> problem, ze tiskarna Minolta pri nastaveni na Custom (trebaze
> rozmerove A4) stranku nevytiskla, dokud uzivatel neodmackl na jejim
> panelu, ze papir zadanych rozmeru je pripraven.
>
> Karel Rys
Chovani IDE - zahada
[*] Skala Tomas <alcatraz(zv)atlas(tec)cz> - 8.8.2001 10:00:56
To je normalni. Property Color ma definovanou defaultni hodnotu clWindow
(zapis: "property Color:TColor read... write... default clWindow;"), tzn.
ze pokud tato property bude nabyvat teto hodnoty, tak se do DFM neuklada.
Pokud neni tato property zapsana v DFM pri nacitani z DFM, je pouzita definovana
defaultni hodnota.
Tomas Skala
> -----Original Message-----
> From: L. Filip [SMTP:lfilip(zv)lekis(tec)cz]
>
> Stala se mi zvlastni vec. Pri pouzivani komponet TLabel nebo TDBLabel chci
> jejich barvu pozadi zmenit na clWindow, v navrhu je vse v poradku, ale jak
> se kouknu do DFM tak zapis o barve tam vubec neni. Tyka se to jen barvy
> clWindow ostatni funguji v poradku. Po kompilaci se mi barva clWindow take
> nezobrazi.
> Neni mi jasne jakto ze se tohleto deje.
> Setkal se s tim uz nekdo?
>
> Diky za kazdou radu.Chovani IDE - zahada
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 8.8.2001 10:01:36
On 8 Aug 2001, at 8:35, L. Filip wrote:
> Stala se mi zvlastni vec. Pri pouzivani komponet TLabel nebo TDBLabel
> chci jejich barvu pozadi zmenit na clWindow, v navrhu je vse v
> poradku, ale jak se kouknu do DFM tak zapis o barve tam vubec neni.
> Tyka se to jen barvy clWindow ostatni funguji v poradku. Po kompilaci
> se mi barva clWindow take nezobrazi. Neni mi jasne jakto ze se tohleto
> deje. Setkal se s tim uz nekdo?
To je zcela v poradku, protoze v deklaraci property je defaul prave
clWindow. Default v deklaraci rika, ze se uvedena hodnota
neuklada do DFM.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56 (72 95 29 56); GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Broadcast
[*] Grind Crusher <Grind_Crusher(zv)DeathsDoor(tec)com> - 8.8.2001 10:01:33
Ja delam vyhradne v C a ASM. Tohle mam vyreseny, ale v C. Muzu poslat zdroj ale nevim jestli ti k necemu bude.
Grind Crusher
----------------------------------------
Zdarec
potrebuji poslat Broadcastovou zpravu v ARP a jeste ke vsemu z Delphi 4.
jo a taky ochytit pripadnou odpoved na ni.
Pomuze mi nekdo ?
Diky moc.
Vladimir
D4,W98
Relativni cesta k souboru
[*] <bejcek(zv)centrum(tec)cz> - 08.8.2001 10:01:29
vysledek teto funkce: Cesta:=ExpandUNCFileName
Was writen:
(OpenDialog1.FileName); kde soubor je c:\ahoj.txt
vychazi opet c:\ahoj.txt a ne \\PC1\disk_c\ahoj.txt
Takze tudy cesta nevede...
And Aldik na to:
Tak to udelej rucne a nahrad retezec ne?V pripade ze je vysledek
c:\neco
nahrad funkci GETPCNAME,ktera ti vrati jmeno pocitace v siti a
sup je to.
Nemelo by to byt tak tezke ne?
PS:
Take bych rad vedel jak to vyresit,ale instinkt mi rika,ze to asi
budes muset obejit takhle.
Aldik Pavel
D5 Ent W98 Zacatecnik s hlavou v oblacich
-----
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Relativni cesta k souboru
[*] Marek Muller <delphi-konference(zv)bcpraha(tec)com> - 8.8.2001 10:36:28
asi ti nezbyde nic jin�ho, ne� v pr�pade lok�ln�ch disku si to upravit s�m pomoc� API funkc�
GetVolumeInformation a GetComputerName
Marek Muller
-----Original Message-----
Dekuji za radu, ale vysledek teto funkce: Cesta:=ExpandUNCFileName(OpenDialog1.FileName); kde soubor je c:\ahoj.txt
vychazi opet c:\ahoj.txt a ne \\PC1\disk_c\ahoj.txt
Takze tudy cesta nevede...MS Outlook
[*] Jan #ebel�k <honza(zv)haes(tec)cz> - 8.8.2001 10:37:15
Odes�latel: Gabika Polcova <gabika.polcova(zv)cnzp(tec)cz>
>prosim Vas da sa s Delphi 5 pristupovat k MS OUtlooku
>ako ku COM objektu.
Urcite ano, stejne jako ke kazdemu COM Objektu
(CreateOLEObject, CreateCOMObject)
>A ak ano, kde mozem ziskat zoznam vlastnosti a metod
>cez ktore sa da outlook ovladat...
V Delphi (od verze 5) je pascalovsky interface
outlook8.pas, outlook2000.pas,
ty maji ale 17000 resp. 8000 radku bez komentare.
Zkus MSDN.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0601 203084]
=========================================Rozsahlejsi DB aplikace
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 8.8.2001 11:02:53
> Pokud jde o ty balicky, je to vcelku jednoduche.
> V pripade tri balicku B1, B2, B3, kdy B3 vola neco z B1, tak je to
> tak, ze B3 ma v Requires zahrnuty B1.dcp a v nejake te unite v B3, kde
> chci pouzit ten formular, tak normalne do uses dam odkaz na unitu z B1
> a pracuji s tim jako bych to mel ve svem balicku.
Bavime se porad o dynamicky nahravanych baliccich, tj. kdy exeovka zavola
LoadPackage?
Diky.
Leos
Chovani IDE - zahada
[*] Jir� Foldyna <jiri.f(zv)avizo(tec)cz> - 8.8.2001 11:36:19
> > Stala se mi zvlastni vec. Pri pouzivani komponet TLabel
> nebo TDBLabel
> > chci jejich barvu pozadi zmenit na clWindow, v navrhu je vse v
> > poradku, ale jak se kouknu do DFM tak zapis o barve tam vubec neni.
> > Tyka se to jen barvy clWindow ostatni funguji v poradku. Po
> kompilaci
> > se mi barva clWindow take nezobrazi. Neni mi jasne jakto ze
> se tohleto
> > deje. Setkal se s tim uz nekdo?
>
> To je zcela v poradku, protoze v deklaraci property je defaul prave
> clWindow. Default v deklaraci rika, ze se uvedena hodnota
> neuklada do DFM.
>
> S pozdravem
>
> Zbysek Hlinka
Ahoj,
to vubec neni v poradku, protoze Default barva v property editoru je
clBtnFace a pokud chci, aby label mel barvu clWindow, musim ji explicitne v
runtime nastavit, jinak zustane clBtnFace. Tohle tupe chovani podle mne
pochazi z default nastaveni property Color ve tride TControl, kde je jako
default clWindow a property editor to nebere v uvahu. Resim to tak, ze si u
labelu, kde chci mit barvu clWindow, nastavim tag a pri inicializaci
aplikace je pak vsechny obarvim. Ale je to pakarna. Delam s D5, takze v D6
uz je to mozna opravene.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Jak vytvorit package ??
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 8.8.2001 11:52:50
Ahoj,
potreboval bych poradit, jak vytvorit package, kdyz mam jenom pas soubory ?
Mam Delphi 5 Prof.
Diky za pomoc.
====================================
Filip Hazuka
��pkova 363
L�zn� Bohdane�, 533 41
Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
====================================Relativni cesta k souboru
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 8.8.2001 11:53:13
V napovede se pravi toto:
"...if the drive letter is mapped to a network resource instead of a local
drive with any directory and subdirectories in addition to the file name and
extension.".
Spise se mi zda, ze nemas namapovany disk nebo nemas nainstalovane na PC
spravne sitove prostredi.
Petr Svejda
Lingvista Backup - zalohovani s inteligenci
http://www.lingvista(tec)cz - stazeni programu Z D A R M A
> -----Original Message-----
> Dekuji za radu, ale vysledek teto funkce:
> Cesta:=ExpandUNCFileName(OpenDialog1.FileName); kde soubor je c:\ahoj.txt
> vychazi opet c:\ahoj.txt a ne \\PC1\disk_c\ahoj.txt
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.265 / Virov� b�ze: 137 - datum vyd�n�: 18.7.2001
OT: QReport (2 x)
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 8.8.2001 11:53:09
tady bych to videl spise na to, ze nemas nastaven ovladac tiskarny na Custom
(uzivatelsky format, pokud to dana tiskarna podporuje). Vzdy by mel
souhlasit format nastaveny v QR a format driveru tiskarny.
Petr Svejda
Lingvista Backup - zalohovani s inteligenci
http://www.lingvista(tec)cz - stazeni programu Z D A R M A
-----Original Message-----
> dolezite. Ked nastavim Page.PaperSize na A4, tlac funguje bez
> problemov. No ked nastavim na Custom a pritom rozmery stranky necham
> na A4, pri tlaci sa mi zobrazi hlaska Printer selected is not Valid.
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.265 / Virova baze: 137 - datum vydani: 18.7.2001
Autostart SQL serveru
[*] Ing. J�n Kuch�r <kuchar(zv)unicodesys(tec)cz> - 8.8.2001 11:56:02
> > Ahoj, ( zadna odezva na autostart SQL serveru pre SQL-DMO ? )
> >
> >
> > takze podrobneji, SQL server je nainstalovan bez SQL manazera a v
programu
> > je napsan nasledujici kod pro pripojeni k serveru :
> >
> > procedure pripoj(srv:string);
> > var ees:_SQLServer;
> > begin ees:=sqlserver.DefaultInterface;
> > ees.Name:=srv;
> > ees.LoginSecure:=true;
> > sqlserver.ConnectTo(ees);
> > end;
> >
> > kod se tvari ze je vporadku, nehlasi zadnou chybu ( ale nejsem si jist
> > ze je to to prave orechove ) a pak nasleduje
> > nastaveni vlastnosti uz zmineneho autostartu
> >
> > sqlserver.registry.autostartserver:=true
> >
> > a tam to v registry nahlasi chybu ze :
> > This server object REGISTRY is not connected
> >
> > takze nevim !!!OT: IB a null
[*] <bejcek(zv)centrum(tec)cz> - 08.8.2001 11:59:54
Roman wrote:
>
> Ahoj,
> je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo
testovani null
> /neco jako nz(), iif()/? Potrebuju v poli, ktere je COMPUTED
vypocist
> "Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze
byt null... :-(
Ja Aldik na to write:
IB neznam,ale jako v kazde DB...
Ja bych to resil spis tak,ze bych nastavil na pole not null a
default dal 0.
Tim se to vyresi asi nejlepe nemyslis,nevidim ale konktretni
situaci tak by ti to treba z nejakeho neznameho duvodu nemuselo
vyhovovati! Je tez mozne ze jsem dostatecne nepronikl do tveho
problemu.
Aldik Pavel
W98 D5 Ent Mlady a neklidny,veci neznaly....
-----
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
OT: IB a null
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 8.8.2001 12:04:18
A co takhle vyuzit UDF?
Sroub
> Roman wrote:
> > je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo
> testovani null
> > /neco jako nz(), iif()/? Potrebuju v poli, ktere je COMPUTED
> vypocist
> > "Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze
> byt null... :-(
>
> Ja Aldik na to write:
> IB neznam,ale jako v kazde DB...
> Ja bych to resil spis tak,ze bych nastavil na pole not null a
> default dal 0.
Chovani IDE - zahada ??
[*] L. Filip <lfilip(zv)lekis(tec)cz> - 8.8.2001 12:08:13
To je sice hezke ale ja bych potreboval tuto barvu zobrazit (clWindow) a at
ji tam nastavim nebo necham default stale ji tam nemohu dostat. Jde o to ze
kdyz dam TLabel na Form tak ma hned Color = clBtnFace (default = clWindow
???), tak ji tedy chci zmenit na clWindow a ono nic.
> To je normalni. Property Color ma definovanou defaultni hodnotu clWindow
> (zapis: "property Color:TColor read... write... default clWindow;"), tzn.
> ze pokud tato property bude nabyvat teto hodnoty, tak se do DFM neuklada.
> Pokud neni tato property zapsana v DFM pri nacitani z DFM, je pouzita
definovana
> defaultni hodnota.
>
> Tomas Skala
> >
> > Stala se mi zvlastni vec. Pri pouzivani komponet TLabel nebo TDBLabel
chci
> > jejich barvu pozadi zmenit na clWindow, v navrhu je vse v poradku, ale
jak
> > se kouknu do DFM tak zapis o barve tam vubec neni. Tyka se to jen barvy
> > clWindow ostatni funguji v poradku. Po kompilaci se mi barva clWindow
take
> > nezobrazi.
> > Neni mi jasne jakto ze se tohleto deje.
> > Setkal se s tim uz nekdo?
> >
> > Diky za kazdou radu.OT: IB a null
[*] <bejcek(zv)centrum(tec)cz> - 08.8.2001 12:13:10
Sroub wrote: A co takhle vyuzit UDF?
Tak tohle slysim poprve UDF co je to za potvoru :-) objasni
prosim amaterovi
Aldik Pavel
D5 W98 Amater vsech amateru,dalsi dukaz (viz vyse)
-----
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
OT: IB a null
[*] Ren� Otisk <otisk(zv)MISEL(tec)cz> - 8.8.2001 12:28:10
user-defined function, viz napoveda k InterBase
Sroub
> Tak tohle slysim poprve UDF co je to za potvoru :-) objasni IndexFieldNames u TADOQuery
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 8.8.2001 12:32:04
Zdravim,
mohl by mi nekdo rict, proc mi aplikace (D5) nevyhodi chybove hlaseni
(kompilator ani exe), kdyz pretypuju TADOQuery na TADOTable a odkazuji se na
property IndexFieldNames ? Obe komponenty vychazeji z TCustomADODataset,
pricemz ten tuhle property nema (nema ji ani TDataSet, ze kteryho vychazi) a
ma ji az TADOTable :-o
Pouzivam tvrdou konstrukci TADOTable(ADOQuery1).IndexFieldNames ...
Mozna jsem spatne hledal a poridim si brejle, ale pokud ne, je mi to fakt
divny. Hledal jsem i ve zdrojacich k VCL a nic....
end ohekzeh minarp a mevardzop S
arebmehcS naliM .rDCP
ERAWTFOSSIM
444449/8060 .let
zc.erawtfossim.www\\:ptth
Chovani IDE - zahada ??
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 8.8.2001 12:35:35
> To je sice hezke ale ja bych potreboval tuto barvu zobrazit
> (clWindow) a at
> ji tam nastavim nebo necham default stale ji tam nemohu
> dostat. Jde o to ze
> kdyz dam TLabel na Form tak ma hned Color = clBtnFace
> (default = clWindow
> ???), tak ji tedy chci zmenit na clWindow a ono nic.
Je to proto, ze si nastavuje property ParentColor na TRUE, presto ze je to v
design modu FALSE.
OT: strankovani v HTML/XML
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 8.8.2001 12:53:44
Helou!
Mam jeden problemek - vytvarim sestavy, u kterych potrebuju mit na kazde
strance hlavicku a paticku (potencialne se mohou pro kazdou stranku lisit).
Data vytvarim v podobe XML a pomoci XSL jsem je chtel zobrazovat v
prohlizeci. Doposud zadny problem, vse, tedy skoro vse funguje. Netusim, jak
zajistit, kdyz si da uzivatel v porhlizeci tisk od stranky do stranky
zajistit, aby se vytiskly opravdu prislusne stranky a ne od pulky jedne do
pulky dvacate. Psat vlastni editor/prohlizec se mi zatim nechce, proto se
ptam, zda jste nekdo uz neco podobneho neresil ci to neni resitelne nejak
jednoduseji, napr. prave pomoci XML (expert v nem nejsem).
Mate nekdo nejake nakopnuti? XML vytvarim programove v Delphi.
Diky, KER
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.264 / Virov� b�ze: 136 - datum vyd�n�: 2.7.2001
Thread v jine unite
[*] Jan #ebel�k <honza(zv)haes(tec)cz> - 8.8.2001 12:58:44
> Odes�latel: Milan #ݿek <Cizek.Milan(zv)seznam(tec)cz>
> 2) pokud vytvarim thread, jako parametr se uvadi true/false - muzete
> mi nekdo objasnit rozdil? Z helpu jsem to moc dobre nepochopil.
Je treba si uvedomit, ze ten thread existuje ve dvou odlisnych formach.
Jednak jako pascalovsky objekt TThread, jednak jako systemovy objekt thread, ktery bezi v ramci operacniho systemu.
Jestlize tedy konstruktor objektu vypada priblizne takto
constructor TMyThread.Create;
begin
inherited Create(false); // CreateSuspended
cosi...
cosi...
end;
mohlo by se teoreticky stat, ze se thread rozbehne jeste driv, nez se ukonci jeho konstruktor.
Proto je vzdycky lepe:
constructor TMyThread.Create;
begin
inherited Create(true); // CreateSuspended
cosi...
cosi...
Resume; // teprve ted se thread (ve smyslu windows spusti)
end;
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0601 203084]
=========================================Nevim si rady s napovedou a souborem s priponou .c
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 8.8.2001 12:58:53
Ahoj,
pro napovedu jsem zvolil nastroj Html Help Workshop, ale kdyz zkompiluji
projekt, tak mi z toho vyleze soubor s priponou .chm a v delphi, kdyz tam
pridavam help soubor, tak to po me chce soubor s priponou .hlp ? Jak to mam
vyresit ?
Poradte prosim.
====================================
Filip Hazuka
��pkova 363
L�zn� Bohdane�, 533 41
Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
====================================
Jak vytvorit package ??
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 13:03:52
Dne 8.�srpen�2001, <delphi-l(zv)clexpert(tec)cz> napsal:
> Ahoj,
> potreboval bych poradit, jak vytvorit package, kdyz mam jenom pas soubory ?
> Mam Delphi 5 Prof.
ahoj,
File-New-Package, pak si vlozis potrebne .pas.
S pozdravem milan Cizek, D5
Ent
______________________________________________________________________
E-mail zdarma na cely zivot: http://email.seznam(tec)cz
Chovani IDE - zahada
[*] Pavol Kakacka <kakacka(zv)proca(tec)cz> - 8.8.2001 13:08:22
> > > Stala se mi zvlastni vec. Pri pouzivani komponet TLabel
> > nebo TDBLabel
> > > chci jejich barvu pozadi zmenit na clWindow, v navrhu je vse v
> > > poradku, ale jak se kouknu do DFM tak zapis o barve tam vubec neni.
> > > Tyka se to jen barvy clWindow ostatni funguji v poradku. Po
> > kompilaci
> > > se mi barva clWindow take nezobrazi. Neni mi jasne jakto ze
> > se tohleto
> > > deje. Setkal se s tim uz nekdo?
> >
> > To je zcela v poradku, protoze v deklaraci property je defaul prave
> > clWindow. Default v deklaraci rika, ze se uvedena hodnota
> > neuklada do DFM.
> > Zbysek Hlinka
> to vubec neni v poradku, protoze Default barva v property editoru je
> clBtnFace a pokud chci, aby label mel barvu clWindow, musim ji explicitne
v
> runtime nastavit, jinak zustane clBtnFace. Tohle tupe chovani podle mne
> pochazi z default nastaveni property Color ve tride TControl, kde je jako
> default clWindow a property editor to nebere v uvahu. Resim to tak, ze si
u
> labelu, kde chci mit barvu clWindow, nastavim tag a pri inicializaci
> aplikace je pak vsechny obarvim. Ale je to pakarna. Delam s D5, takze v D6
> uz je to mozna opravene.
>
> Ing. Jiri Foldyna
Ano pakarna, ale da sa to vyriesit ked si urobis podedenu komponentu od
TLabel a tam si iba prepises property Color
private
fColor: TColor;
published
property Color: TColor read GetColor write SetColor;
procedure xxx.SetColor(Value: TColor);
inherited Color := Value;
fColor := Value;
end;
function GetColor: TColor
begin
Result := fColor;
end;
Pisem to z hlavy takze nieco na ten sposob...
Pavol Kakacka
KasiX(zv)atlas(tec)cz
OT: IB a null
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 8.8.2001 13:09:38
> > je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo
> > testovani null /neco jako nz(), iif()/?
> > Potrebuju v poli, ktere je COMPUTED vypocist
> > "Celkem"="Prijato"-"Vydano"
>
> no, ja nic nenasel, ale nadeklarovali jsme potrebne polozky s default =
> 0, takze to potom spocita dobre. je to berlicka, ale funguje.
Zapomel jsem uvest, ze "Prijato" a "Vydano" jsou taky computed, konkretne jde o
sumu prijatych/vydanych dokladu - jenze kdyz neni zadny vydajovy doklad, pak je
zde hodnota null a nastavit default na computed nejde...
Mno, tak at uz nejsem OT, vyresil sem to pres UDF:
type PDouble=^Double;
function nz(d:PDouble):double; export; stdcall;
begin
result:=d^;
end;
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
Rozsahlejsi DB aplikace
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 8.8.2001 13:13:39
>> V ramci balicku i mimo balicek uplne stejne, jako kdyby nebyl v dynamicky
>> nahravanem balicku :-) (MujFormular.Show, nebo MujFormular.BringToFront)
> Hmm. Nemohl bys nastinit jak to delas? Ja tam mohu dat promenou pro
> TCustomForm, ale tim stejne neziskam pristup k obsahu (Editum a dalsim
> prvkum atd..) formulare. Takze se opet dostanu k FindComponent :-)))
Aha, no jo, s dynamicky nahranym balickem to nepude :-)
/Ja dynamicky nahravam pouze moduly, ktere jsou samostane, ostatni balicky jsou
v sekci Requires.../
Sorry, jestli sem tu nekoho mystifikoval :-)
Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
OT: IB a null
[*] Jan #ebel�k <honza(zv)haes(tec)cz> - 8.8.2001 13:20:51
> Sroub wrote: A co takhle vyuzit UDF?
>
> Aldik Pavel
> Tak tohle slysim poprve UDF co je to za potvoru :-)
UDF - User Defined Function
1.
Funkci si zprogramujes v DLL.
2.
InterBase sdelis, �e takov� funkce existuje.
(DECLARE EXTERNAL FUNTION ...)
3.
Od toho okamziku muzes v IB tuto funkci volat
(v ulozenych procedurach, triggerech, selektech, ...)
Sila spociva v tom, ze omezene moznosti SQL jazyka jses schopen nahradit programovanim v "opravdickem" jazyce (C/C++, Pascal) a takove funkce bezne pouzivat uvnitr InterBase. Funkce UDF mohou tedy delat fakticky "cokoli".
Honza
Na kurzech mame priklady.
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0601 203084]
=========================================OT: IB a null
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 8.8.2001 13:27:34
> Tak tohle slysim poprve UDF co je to za potvoru :-) objasni
> prosim amaterovi
User Defined Function.
Muzes si napsat funkci v DLL, kterou bude Interbase volat napr. pro konverzi
nejakych hodnot. Ja to pouzivam pro konverzi BLOBu na varchar. Pri instalaci
IB se musis postarat o tuto DLL, jeji zaregistrovani v IB.
Koukni na www.ibphoenix.com, tam se o tom da najit nejake informace..
BTW: Reseni s NOT NULL a Default 0 se mi zda podstatne lepsi. UDFka v tomto
pripade resi nasledky, nikoli problem.
Ota Maly
IndexFieldNames u TADOQuery
[*] Jan #ebel�k <honza(zv)haes(tec)cz> - 8.8.2001 13:27:04
> Odes�latel: Milan Schembera <milan(zv)missoftware(tec)cz>
> mohl by mi nekdo rict, proc mi aplikace (D5) nevyhodi chybove hlaseni
> (kompilator ani exe), kdyz pretypuju TADOQuery na TADOTable a odkazuji se na
> property IndexFieldNames ?
>
> Pouzivam tvrdou konstrukci TADOTable(ADOQuery1).IndexFieldNames ...
>
No prave, to proto, ze pouzivas "tvrdou konstrukci".
Kdybys napsal (ADOQuery1 as TADOTable).IndexFieldNames, tak ti EXE vyhodi chybu (spatne pretypovani).
I kdyz ti to nehlasi chyby, stejne pochybuju o tom, ze by to mohlo fungovat.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0601 203084]
=========================================Problem s ActiveX na webu
[*] Alexandr #tefek <alex(zv)scova.vabo(tec)cz> - 8.8.2001 13:29:09
Cau,
Staci v tlb nadefinovat pro AcX novou property a potom ji v ramci skriptu
nastavovat ci cist (vyresi oba problemy)
Alexandr STEFEK
> Dobry den.
>
> Resim problem, jak zajistit spolupraci meho ActiveX prvku (OCX) se zbytkem
> formulare na HTML strance. Potrebuji alespon jednu z moznosti:
>
> 1. dostat do ActiveX parametr "z venci", tj. napr. v ISAPI vygenerovat
> cislo, ktere do ActiveX poslu (a pak si to cislo s daty poznacim treba
v
> databazi, to uz umim)
>
> 2. vratit z ActiveX parametr pri odeslani formulare (neni nutne formular
> odeslat, to zajistim druhym tlacitkem, ale alespon predat) - tj. v
> ActiveX si napr. vyplnim nejaky formular a jeho vysledek chci odeslat
do
> ISAPI aplikace
>
> Diky moc za radu alespon v jednom problemu (tyden jsem nad tim jiz
> probadal).
>
> diky.
> --milan sorm
Prohlizec souboru Access
[*] Str�n�k Franti�ek - 8.8.2001 13:43:26
Pratele, potrebuji hodit do dbGridu Accessovy soubor pouze pro
prohlizeni.
Cim to mohu nacist - nejlepe, abych nemusel nic doinstalovat atd. .....
?
Diky za rady
Franti#ek STR#N#K
mailto:FSTRANIK(zv)CPOJ.CZ
problem s IBEvent
[*] <vaclav.sykora(zv)accidis(tec)cz> - 8.8.2001 13:55:20
dobry den,
mam zvlastni problem s komponentou TIBEvent. mam ji umistenou spolu s
IBDatabase, IBTransaction + nejake IBQuery v datovem modulu DM
(:TDataModule). IBDatabase oteviram za behu programu v obsluze udalosti
OnCreate, IBEvent aktivuji pomoci IBEvent.Registered:= True ve stejne
metode. problem je v tom, ze pokud zaktivuji IBEvent, program se nekdy v
tomto miste zasekne, ale nenahlasi zadnou chybu. vypada to, jako kdyby
komunikoval s InterBasem. zvlastni je, ze se to stava jen nekdy (napr.
jednou program pustim, ale pak treba 5x za sebou ne). nevite nekdo co s tim?
s pozdravem, v. sykora
Chovani IDE - zahada
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 8.8.2001 14:03:28
On 8 Aug 2001, at 11:36, Jir� Foldyna wrote:
> > > Stala se mi zvlastni vec. Pri pouzivani komponet TLabel
> > nebo TDBLabel
> > > chci jejich barvu pozadi zmenit na clWindow, v navrhu je vse v
> > > poradku, ale jak se kouknu do DFM tak zapis o barve tam vubec
> > > neni. Tyka se to jen barvy clWindow ostatni funguji v poradku. Po
> > kompilaci
> > > se mi barva clWindow take nezobrazi. Neni mi jasne jakto ze
> > se tohleto
> > > deje. Setkal se s tim uz nekdo?
> >
> > To je zcela v poradku, protoze v deklaraci property je defaul prave
> > clWindow. Default v deklaraci rika, ze se uvedena hodnota neuklada
> > do DFM.
>
> to vubec neni v poradku, protoze Default barva v property editoru je
> clBtnFace a pokud chci, aby label mel barvu clWindow, musim ji
> explicitne v runtime nastavit, jinak zustane clBtnFace. Tohle tupe
> chovani podle mne pochazi z default nastaveni property Color ve tride
> TControl, kde je jako default clWindow a property editor to nebere v
> uvahu. Resim to tak, ze si u labelu, kde chci mit barvu clWindow,
> nastavim tag a pri inicializaci aplikace je pak vsechny obarvim. Ale
> je to pakarna. Delam s D5, takze v D6 uz je to mozna opravene.
Nezkoumal jsem to, ale myslim, ze bordel je spise v poradi
urcovani hodnot jednotlivych vlastnosti. Vypada to, jako by se barva
urcovala driv nez se nacte hodnota ParentColor.
Nejspis to probiha takto: pri Create je ParentColor = true. Proto se
priradi barva podkladu. Pak se ctou hodnoty z DFM, barva se
nenajde, proto se nezmeni, a ParentColor prichazi pozde. Pokud
by se prvni prirazeni barvy delo az po nacteni vsech hodnot z DFM,
mela by barva zustat na clWindow.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56 (72 95 29 56); GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Nevim si rady s napovedou a souborem s priponou .c
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 8.8.2001 14:14:12
> pro napovedu jsem zvolil nastroj Html Help Workshop, ale kdyz zkompiluji
> projekt, tak mi z toho vyleze soubor s priponou .chm a v delphi, kdyz tam
> pridavam help soubor, tak to po me chce soubor s priponou .hlp ?
From: Peter Below (TeamB) (100113.1101(zv)compuXXserve.com)
Subject: Re: HTML Help (*.chm)
Newsgroups: borland.public.delphi.vcl.components.using
Date: 2000/09/14
HTML Help as a context sensitive engine.
http://www.hyperact.com/DelphiStuff.html
http://www.informant.com/libs/delphi/3x/di9805rl.zip
http://www.igweb.pair.com HTML HELP Pack
http://www.helpware.net
http://www.ec-software.com/comppage.htm
Header translation at www.delphi-jedi.org
Peter Below (TeamB) 100113.1101(zv)compuserve.com)
No e-mail responses, please, unless explicitly requested!
Thread v jine unite
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 08.8.2001 14:24:06
> > Odes�latel: Milan #ݿek <Cizek.Milan(zv)seznam(tec)cz>
> > 2) pokud vytvarim thread, jako parametr se uvadi true/false - muzete
> > mi nekdo objasnit rozdil? Z helpu jsem to moc dobre nepochopil.
> mohlo by se teoreticky stat, ze se thread rozbehne jeste driv, nez se ukonci jeho konstruktor.
me to ale tuhne pri volani KillerThread.Suspend; A obcas treba az po
patem zavolani... (resume-suspend)
Milan Cizek, D5
Ent
______________________________________________________________________
Vylepsete svuj prohlizec Internetu na http://software.seznam(tec)cz/listicka
problem s IBEvent
[*] Pavol Kaka�ka <kakacka(zv)proca(tec)cz> - 8.8.2001 14:36:22
Pripojujes sa na server na Linuxu?
Pavol Kaka�ka
KasiX(zv)atlas(tec)cz
> mam zvlastni problem s komponentou TIBEvent. mam ji umistenou spolu s
> IBDatabase, IBTransaction + nejake IBQuery v datovem modulu DM
> (:TDataModule). IBDatabase oteviram za behu programu v obsluze udalosti
> OnCreate, IBEvent aktivuji pomoci IBEvent.Registered:= True ve stejne
> metode. problem je v tom, ze pokud zaktivuji IBEvent, program se nekdy v
> tomto miste zasekne, ale nenahlasi zadnou chybu. vypada to, jako kdyby
> komunikoval s InterBasem. zvlastni je, ze se to stava jen nekdy (napr.
> jednou program pustim, ale pak treba 5x za sebou ne). nevite nekdo co s
tim?
>
> s pozdravem, v. sykora
hook na dblclk
[*] dphi_forum(zv)proces.sk - 8.8.2001 14:37:57
> Cavte
> Prosim o radu.
> Potrebujem odchytit slovo ktore bolo prave oznacene v richedite
> doubleclickom.
> Musi to fungovat celom systeme preto som sa pokusal nainstalovat hook
> WH_CALLWNDPROCRET
> ale tam sa spravy mysi uz vobec neobjavuju.Preco ?
> Nemozem to jednoducho zavesit na HK_MOUSE lebo hook procedura sa vykonava
> este skor ako sa slovo oznaci.
> Diky
Peter
Tak po 3 dnoch si odpovedam sam, ale ak Vas to bude niekedy trapit aby ste
vedeli
da sa to napr. takto:
h := SetWindowsHookEx(WH_CALLWNDPROCRET,(zv)Proc,0,0);
function Proc(nCode: Integer;ProcessFlag: WParam; Data: LParam):
LRESULT;stdcall;
var
m: UINT;
w: WParam;
l: LParam;
p: TNMHDR;
begin
if nCode = HC_ACTION then
begin
Result := 1;
case TCWPRETSTRUCT(Pointer(Data)^).Message of
WM_NOTIFY:
begin
p := TNMHDR(Pointer(TCWPRETSTRUCT(Pointer(Data)^).lParam)^);
if p.code = EN_SELCHANGE then
begin
Zapis(p.hwndFrom);
end
end
end;
end;
if nCode < 0 then
Result := CallNextHookEx(h,nCode,ProcessFlag,Data);
end;
procedure Zapis(h: HWND);
var
x,l: LResult;
p: PChar;
CharRange: TCharRange;
begin
SendMessage(h, EM_EXGETSEL, 0, Longint((zv)CharRange));
x := CharRange.cpMax - CharRange.cpMin;
p := StrAlloc(x);
try
l := SendMessage(h,EM_GETSELTEXT,0,LParam(p));
....
finally
StrDispose(p);
end
end;
IB a null
[*] Roland Turcan <rotursoft(zv)kiwwi.sk> - 8.8.2001 14:41:16
IMHO toto nie je OT a najjednoduhsie je dat vsade kde sa robia vypocty
namiesto NULL ZERO a bude to bez problemov.
Roland
----- Original Message -----
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, August 07, 2001 7:20 PM
Subject: OT: IB a null
> Ahoj,
> je v IB6 /dialect 3/ nejaka funkce pro prevod null na 0 nebo testovani
null
> /neco jako nz(), iif()/? Potrebuju v poli, ktere je COMPUTED vypocist
> "Celkem"="Prijato"-"Vydano", pricemz jedna z tech hodnot muze byt null...
:-(
>
> Dik a sorry za OT
> Roman
> OOOOOOOOOOOOOOOO
> O sw.maurice(zv)cbox(tec)cz
> O http://kouzelne.misto(tec)cz
> OOOOOOOOOOOOOOOO
>problem s IBEvent
[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 8.8.2001 14:46:44
IBEvent je problemova kompoenta (nebo spise implementace event v IB celkove).
Jakou verzi IBX pouzivas, pokud mas starsi verzi (pred 4.5), tak udalost
on event prichazela z jineho threadu a bylo nutno si ji pres synchronizacni objekt
poslat do hlavniho threadu aplikace.
Pokud pouzivas iB5.x, tak nesmis pouzit pripojeni k DB pres TCP/IP,
jinak ti program pri ukoncovani zatuhne (problem gds32.dll).
Doporucuji si odkrokovat IBEnents a zjistit, kde to pada.
Ja pouzivam z historyckych duvodu pro Eventy samostatnou DB
(ta jedna konection mne neboli).
Slavek
> dobry den,
>
> mam zvlastni problem s komponentou TIBEvent. mam ji umistenou spolu s
> IBDatabase, IBTransaction + nejake IBQuery v datovem modulu DM
> (:TDataModule). IBDatabase oteviram za behu programu v obsluze udalosti
> OnCreate, IBEvent aktivuji pomoci IBEvent.Registered:= True ve stejne
> metode. problem je v tom, ze pokud zaktivuji IBEvent, program se nekdy v
> tomto miste zasekne, ale nenahlasi zadnou chybu. vypada to, jako kdyby
> komunikoval s InterBasem. zvlastni je, ze se to stava jen nekdy (napr.
> jednou program pustim, ale pak treba 5x za sebou ne). nevite nekdo co s tim?
>
> s pozdravem, v. sykora
> Problem s ActiveX na webu
[*] Milan =?iso-8859-2?Q?=A9orm?= <sorm(zv)pef.mendelu(tec)cz> - 8.8.2001 14:50:26
Wed, Aug 08, 2001 ve 01:29:09PM +0200 Alexandr �tefek napsal(a):
# Cau,
# Staci v tlb nadefinovat pro AcX novou property a potom ji v ramci skriptu
# nastavovat ci cist (vyresi oba problemy)
# Alexandr STEFEK
#
Diky. Ale jak tu property nastavim z HTML kodu ? Vzdyt pro tu <OBJECT>
znacku bych to musel nekde vyspecifikovat ?
--milan
problem s IBEvent
[*] <vaclav.sykora(zv)accidis(tec)cz> - 8.8.2001 15:00:23
pouzivam IB 6.0, program zamrzne prave u prikazu IBEvent.Registered:= True;
pokud krokuju, je vse v pohode!! ted jsem zkusil dat za tento prikaz proc
Sleep a kupodivu to bezi bez problemu (zatim).
s pozdravem, v. sykora
IBEvent je problemova kompoenta (nebo spise implementace event v IB
celkove).
Jakou verzi IBX pouzivas, pokud mas starsi verzi (pred 4.5), tak udalost
on event prichazela z jineho threadu a bylo nutno si ji pres synchronizacni
objekt
poslat do hlavniho threadu aplikace.
Pokud pouzivas iB5.x, tak nesmis pouzit pripojeni k DB pres TCP/IP,
jinak ti program pri ukoncovani zatuhne (problem gds32.dll).
Doporucuji si odkrokovat IBEnents a zjistit, kde to pada.
Ja pouzivam z historyckych duvodu pro Eventy samostatnou DB
(ta jedna konection mne neboli).
Slavek
> dobry den,
>
> mam zvlastni problem s komponentou TIBEvent. mam ji umistenou spolu s
> IBDatabase, IBTransaction + nejake IBQuery v datovem modulu DM
> (:TDataModule). IBDatabase oteviram za behu programu v obsluze udalosti
> OnCreate, IBEvent aktivuji pomoci IBEvent.Registered:= True ve stejne
> metode. problem je v tom, ze pokud zaktivuji IBEvent, program se nekdy v
> tomto miste zasekne, ale nenahlasi zadnou chybu. vypada to, jako kdyby
> komunikoval s InterBasem. zvlastni je, ze se to stava jen nekdy (napr.
> jednou program pustim, ale pak treba 5x za sebou ne). nevite nekdo co s
tim?
>
> s pozdravem, v. sykora
>Free komponanta formulare
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 8.8.2001 15:19:24
Inak ak potrbujete programovy interpreter - modifikovaneho pascalu - ja
mam na to unit.
Vie pracovat aj s delphi objektami. Ak poznate NSQLRB tak - tento
reportovaci nastroj je tiez programovatelny. Teraz chystam vydat novu verziu
NSQLRB -zajtra uz bude na webe s podrobnou dokumentaciou. NSQLRB ver. 2.1
ma radikalne zmeny a je velmi pruznim nastrojom. Jan Tungli
email: jan.tungli(zv)seznam(tec)cz
tungli(zv)datapac.sk
http://www.tungli.host.sk (NEW SQL REPORT BUILDER)
> -----P�vodn� zpr�va-----
> Od: Ing. Vladim�r R��i�ka [SMTP:ruzicka(zv)digitus(tec)cz]
> Odesl�no: 7. august 2001 14:43
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: Free komponanta formulare
>
> Myslim, ze komponenta neni treba ...
>
>
> pomocna fce:
> function AdjustColor(A : TColor; Factor : Real): TColor;
> var
> R,G,B : Byte;
> begin
> R := Round(GetRValue(ColorToRGB(A))*Factor);
> G := Round(GetGValue(ColorToRGB(A))*Factor);
> B := Round(GetBValue(ColorToRGB(A))*Factor);
> Result := RGB(R,G,B);
> end;
>
> a do on paint formu:
> procedure TForm1.FormPaint(Sender: TObject);
> var a : Integer;
> begin
> With inherited Canvas do
> begin
> Pen.Style := psClear;
> For a := 0 to ClientHeight div 2 do
> begin
> Brush.Color := AdjustColor(clBlue,1-(a*2/ClientHeight));
> Rectangle(0,ClientHeight-a*2,ClientWidth+1,ClientHeight-a*2+3);
> end;
> end;
> end;
>
> Vladimir
> D4,W98
>
> ----- Original Message -----
> From: "Hazuka Filip" <filip.hazuka(zv)multivac(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Tuesday, August 07, 2001 1:36 PM
> Subject: Free komponanta formulare
>
>
> > Ahoj,
> > nevite nekdo o nejake free komponente, ktera umi vyvabarvit formular
> barvou,
> > ale s postupnym odstinovanim ?
> >
> > Diky.
> >
> > ====================================
> > Filip Hazuka
> > ��pkova 363
> > L�zn� Bohdane�, 533 41
> > Tel: 0602/411 828, E-mail: Filip.Hazuka(zv)uhk(tec)cz
> > ====================================Relativni cesta k souboru
[*] "Grubhoffer Jind�ich" - 8.8.2001 15:34:12
> vysledek teto funkce: Cesta:=ExpandUNCFileName
> Was writen:
> (OpenDialog1.FileName); kde soubor je c:\ahoj.txt
> vychazi opet c:\ahoj.txt a ne \\PC1\disk c\ahoj.txt
> Takze tudy cesta nevede...
>
> And Aldik na to:
> Tak to udelej rucne a nahrad retezec ne?V pripade ze je vysledek
> c:\neco
> nahrad funkci GETPCNAME,ktera ti vrati jmeno pocitace v siti a
> sup je to.
> Nemelo by to byt tak tezke ne?
>
> PS:
> Take bych rad vedel jak to vyresit,ale instinkt mi rika,ze to asi
> budes muset obejit takhle.
>
Tezke to nen�, ale uplne jednoduche take ne. Aby to fungovalo spravne - tzn. aby to napr. k C:\AHOJ.TXT vratilo \\PC1\DISKC\AHOJ.TXT (pod takovym nazvem je ten soubor videt z ostatnich stanic v siti) tak je treba zjistit nejen jmeno pocitace, ale i pod jakym nazvem (nazvy) je dany disk (adresar) sdilen a porovnat cesty. Tato informace se najde na NT v HKLM\SYSTEM\CurrentControlSet\Services\LanmanServer\Shares a na Win9x v HKLM\Software\Microsoft\Windows\CurrentVersion\Network\LanMan.
Je#t� pozor na SUBSTnute disky ! Tam je t�eba nav�c zjistit jakemu adresari dany disk odpovida, coz lze na Win9x celkem snadno, ale jak to zjistit na NT to fakt nevim (nen� tu n�kdo kdo by vedel ?).
Vubec by nebylo spatne kdyby takova funkce byla primo v SysUtils, nebo alespon v JCL a vubec nejlepe ve Win32API (ale to asi hrozi nejmene :)
J.G.