Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Update - Delete Record ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.10.1998 18:49:09
TUNGLI Jan wrote:
> Ako chces vidat update ked nie je unikatna polozka?
> Co zapises do where , a ked nic nezapises tak update ide na vsetky
> recordy. Porozmyslaj este raz.
Asi takto: Kdyz budu jeliman, zapomenu na "where" a mam o
zabavu postarano. Kdyz se mi do tabulky nacpou dve naprosto
stejne vety, ktere tam nemaji co delat, je na case zavest
jednoznacny index.
>
> TUNGLI Jan
> tungli(zv)pvt.sk
>
> ----------
> > Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> > Pre: delphi-l(zv)fwd(tec)cz
> > Predmet: Re: Update - Delete Record ?
> > D�tum: 28. okt�ber 1998 9:14
> >
> > TUNGLI Jan wrote:
> >
> > > Je nejako mozne cez TQUERY modifikovat a vymazat zaznam z tabulky, ked
> > > na tabulke nie je ziadny unikatny index (ani unikatna polozka) ? Viem
> > > TTABLE komponent to dokaze ale TQUERY neviem.
> >
> > update ... where ...
> > Obdobne s delete.
> >
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
COM port
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.10.1998 18:49:08
IKO wrote:
> Potrebujem poradit, ako by som sa vo Windowse napichol na COM
> port a odpocuval komunikaciu. Nieco ako HOOK. Ako na to?
>
Obavam se, ze to bude problem (ve 32 bitech). Wokna maji asi
nejak divne udelanou komunikaci, protoze se mi to nijak nepovedlo.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
COM port
[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 01.10.1998 18:52:59
Dne Sun, 01 Nov 1998 13:10:03 +0100 Petr Vones napsal:
> IKO wrote:
> >
> > Potrebujem poradit, ako by som sa vo Windowse napichol na COM
> > port a odpocuval komunikaciu. Nieco ako HOOK. Ako na to?
>
> Ahoj,
>
> Rekl bych, ze to nejde. A k cemu to vlastne potrebujes ?
Ale jo, pod NT to jde. Viz www.sysinternals.com, je tam PortMonitor.
Spickova vec.
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Delphi 4 is back ....
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.10.1998 18:57:19
Ahoj,
Vypada to, ze se Inprise nakonec prece jen vzpamatoval. Posledni Update Pack #2
jiz opravdu stoji za stazeni. Uz po nekolika prvnich hodinach lze rict, ze asi
opravdu zmizi vsechny ty hlaseni vyjimek v IDE a mizeni komponent z listy pri
nekterych operacich. Tez problem s umorne dlouhym spoustenim a ukoncovanim
aplikace spustene z IDE (predevsim pokud se pouzivali packages) je opraven.
Update je mozne pouzit i na puvodni verzi Delphi, neni tedy treba mit ten prvni
ktery za moc nestal. Soucasti updatu je i BDE 5.01.
Pred casem zde byla diskuze o tom, jestli ma cenu upgradovat na D4. Ted to jiz
vypada, ze ano ... :-)
--
Petr Vones, amatersky programator
P.S.
Pro dial-upisty: Nevahejte, stahujte rychle, za dva mesice budou mistni hovory
"jen" o 62.5% drazsi. Aneb, vse pro rozvoj Internetu ......Offtopic - modem
[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 01.10.1998 19:07:11
Pozor - offtopic!
Ahoj, mam takovej dotaz (a problem :-)
mam modem Well, kterej ale nepozdna, ze je linka obsazena (nevrati
BUSY). Pamatuju si, ze pred lety jsem mel Supru, ta to taky nepoznala,
nicmene existoval jeden inicializacni string, diky kterymu to potom byla
schopna poznat. Nemate nekdo obdobne zkusenosti z Wellama (nebo aspon
kde by se to v tom modemu melo doladit)?
Diky
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Offtopic - modem
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.10.1998 19:20:37
Kolar Lubor wrote:
>
> Pozor - offtopic!
> Ahoj, mam takovej dotaz (a problem :-)
> mam modem Well, kterej ale nepozdna, ze je linka obsazena (nevrati
> BUSY). Pamatuju si, ze pred lety jsem mel Supru, ta to taky nepoznala,
> nicmene existoval jeden inicializacni string, diky kterymu to potom byla
> schopna poznat. Nemate nekdo obdobne zkusenosti z Wellama (nebo aspon
> kde by se to v tom modemu melo doladit)?
> Diky
Ahoj,
Zkus se podivat do manualu nebo na Internetu na AT prikazy. Kazda firma to
ma jine. Ja mam napriklad SupraExpess 336 a ten to sice taky nepozna, ale
da se to nastavit takhle:
AT SC0=7 SC2=60 SC4=7 SC6=100 SC8=3
Funguje to dokonce i pro oba obsazovaci tony. Nejhure na tom obvykle byvaji
prave homologovane modemy, vetsinou stezi poznaji normalni obsazovaci ton
(hlavne ze si za tu homologaci nechaji zaplatit .....)
--
Petr Vones, amatersky programator
Poradi zaznamu v TQuery
[*] Jaro <jaro(zv)sinea(tec)cz> - 1.10.1998 19:25:46
Vedel by nekdo zda je mozne a pripadne jak fyzicky zmenit poradi zaznamu v
otevrenem TQeury?
Chtel bych dat moznost pomoci tlacitka pripadne Drag and drop prehazet
poradi zaznamu v DataSetu.
Zaznamy bych pak pred ulozenim ocisloval poradovym cislem podle naposledy
zmeneneho poradi tak,
aby se po naslednem Open (pri ORDER BY PorCislo)
otevrely serazeny stejne, jak byly naposledy zanechany.
Jaro
Insert string
[*] Miloslav Skacel <kastner(zv)infos(tec)cz> - 1.10.1998 20:19:08
>Nevite nekdo jak nejjednoduseji vlozit do TEdit na pozici kuzoru nejaky
>muj string. Tedy aby bylo jasno vlozit v editacnim poli treba doprostred
>nejakeho stringu muj vlastni string na zmacknuti tlacitka (treba do
>mailove adresy vlozit zavinac).
vlozi (zv) na pozici kurzoru, kdyz je cast textu vyselektovana nic nedela
with InplaceEditor do if SelLength=0 then begin
SendMessage(Handle,WM_CHAR,ord('(zv)'),0);
S pozdravem,
Miloslav Skacel
skacel(zv)kjsoft(tec)cz
http://www.kjsoft(tec)cz
Offtopic - modem
[*] Lubor Kolar <lubork(zv)tnet(tec)cz> - 01.10.1998 21:42:26
> Zkus se podivat do manualu nebo na Internetu na AT prikazy. Kazda firma to
> ma jine. Ja mam napriklad SupraExpess 336 a ten to sice taky nepozna, ale
> da se to nastavit takhle:
> AT SC0=7 SC2=60 SC4=7 SC6=100 SC8=3
To bylo u ty moji Supry taky. K tomu Wellu jsem manual uz ztratil, na
todle mi vraci error. Co je to ten prikaz ATSC?
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Packovani database
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 01.10.1998 22:50:37
Ahoj,
uz se to tu jednou resilo, ale bez uspokojiveho vysledku. Treba ale
jiz nekdo vi, jak na to : da se z programu v delphi zpackovat
(zkomprimovat) database MS Access ?
Vaclav Sazima
QReportPreview
[*] Roman Toda <normex(zv)mail.pvt.sk> - 01.10.1998 22:54:39
Skus vlastny preview. V OnPreview napis
procedure T_RepZoznamF.QuickRep1Preview(Sender: TObject);
begin
_RepPreview:=T_RepPreview.Create(Application);
_RepPreview.QRPreview.QRPrinter := TQRPrinter(Sender);
_RepPreview.Show;
end;
_RepPreview je okno s TQRPreview a mozes v nom pouzivat nasledovne a viac
QRPreview.QRPrinter.PrintSetup;
QRPreview.ZoomToFit;
QrPreview.ZoomToWidth;
QRPreview.Zoom := i; //integer v %
QrPreview.PageNumber:=i; //integer aktualna str.
QrPreview.PageNumber:=QrPreview.QRPrinter.PageCount; // na poslednu
QrPreview.QRPrinter.Print;
QrPreview.QrPrinter.ExportToFilter(TQRAsciiExportFilter.Create(FileName)); //
save as ASCII
QrPreview.QrPrinter.ExportToFilter(TQRHtmlExportFilter.Create(FileName)); //
save as HTML
--
rt
normex(zv)mail.pvt.sk; www.technickenormy.com
Normex - fulltext retrieval information system for technical standard
milank(zv)gratex.sk wrote:
> Pri zavolani Preview u QReportu sa automaticky zobrazi nastavenie Zoom To
> Width. Toto zobrazenie sice maximalne vyuzije sirku monitoru ale skresluje
> fonty a pri hustom popise sa texty prekryvaju. Pri obrazeni Zoom 100% je
> vsetko v poriadku. Poradte kto ma skusenosti ako nastartovat Preview priamo
> so zobrazenim 100%. V dfm so zistil ze buton vola metodu ZoomTo100Click, pri
> pokuse ju nejako zavolat OnPreview to neslo. Za kazdu radu D.
Offtopic - modem
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.10.1998 23:00:44
> > AT SC0=7 SC2=60 SC4=7 SC6=100 SC8=3
>
> To bylo u ty moji Supry taky. K tomu Wellu jsem manual uz ztratil, na
> todle mi vraci error. Co je to ten prikaz ATSC?
A nema to byt AT S0=7 ...?
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Direktiva kompilatoru
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 01.10.1998 23:47:19
Ahoj,
Direktivy kompilatoru ovlivnuji preklad. (napr. podmineny preklad,
zarovnavani dat, vlozeni textu ze souboru a spustu dalsiho. Kdyz si
das $ v rejstriku helpu, uvidis to. Syntaxe je {$directiva} a zadava
se to na zacarek unit. Nektere maji lokalni platnost a lze je menit
uvnitr codu nekolikrat, jine jsou globalni.
Vaclav Sazima
> Lubo Gabal wrote:
>
> zdravim
> mohla by mi , prosim , nejaka ochotna dusa vysvetlit co je to
> direktiva kompilatoru ?
> vopred vdaka
>
> Lubo Gabal
> zaciatocnik
Offtopic - modem
[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 01.10.1998 23:55:11
Dne Sun, 1 Nov 1998 23:00:44 +0100 Petr Zahradnik napsal:
> > > AT SC0=7 SC2=60 SC4=7 SC6=100 SC8=3
> >
> > To bylo u ty moji Supry taky. K tomu Wellu jsem manual uz ztratil, na
> > todle mi vraci error. Co je to ten prikaz ATSC?
>
> A nema to byt AT S0=7 ...?
To jsem si nabehl, ja to zkousel, ATS0=7 S2=7 atd., ale akorat jsem tim
zrusil ze LF je $10 apod., urcite to tak neni.
>
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Win API ShAppBarMessage
[*] Martin Lasevi� <ml_software(zv)email(tec)cz> - 2.10.1998 06:17:02
Nevim, dival jsem se do WIN32.HLP u D3 Profesional verze a je tam doslova
napsano v QuickInfo, ?e to NT nepodporuje ( pouze WIN 95). Takze , co to je
za help? Mame asi rozdilne informace.
IKS, Martin Lasevic - delfin z povolani
-----Puvodni zprava-----
Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
Odeslano: 1. listopadu 1998 13:42
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: Win API ShAppBarMessage
"Martin Lasevie" wrote:
>
> Ahoj vsichni,
>
> resim problem jak zaregistrovat vlastni toolbar tak, aby s jeho rozmery
pocitaly OS Win 95
> pri maximalizaci ostatnich oken ( obdoba panelu nastroju MS Office).
>
> Pri pohlidce archivu teto konference jsem narazil na info o funkci
ShAppBarMessage. Bohuzel ji nelze pouzit na Win NT.
Ahoj,
NT sice nemam takze to nemohu vyzkouset. V helpu se ale nepise o tom ze by
tato funkce nefungovala v NT, je tam psano:
[Now Supported on Windows NT]
--
Petr Vones, amatersky programator
Funkce BDE
[*] Martin Lasevi� <ml_software(zv)email(tec)cz> - 2.10.1998 06:25:46
A v helpu....
Martin Lasevic
-----Puvodni zprava-----
Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
Odeslano: 1. listopadu 1998 18:49
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: Funkce BDE
mbartone(zv)Synthesia(tec)cz wrote:
> nevite nekdo kde se da ziskat popis funkci BDE ?
>
...\DOC\bde.int
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
COM port
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 2.10.1998 07:15:02
>> Potrebujem poradit, ako by som sa vo Windowse napichol na COM
>> port a odpocuval komunikaciu. Nieco ako HOOK. Ako na to?
V Async Pro 16bit je na to utilitka i se zdrojakem jak na ni. V 32bit uz
neni,
ale podle mne to jde taky. Cely figl je postaveny na preregistrovani fci pro
komunikaci po seriaku.
Ale absolutne nejjednodussi je takova mala krabicka (kluci u nas vyrobili),
kterou se napichnes mezi prijimac a vysilac a treti vyvod das na svuj
pocitac. A pak uz jen nejaky terminal a kupu casu.
Martin
DDe pro DOS
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.10.1998 07:54:11
Petr Vones wrote:
> Jedina moznost by byla kdyby M$ rozsiril DOS o nejake sluzby ktere by to
> umoznovali, ale o nicem takovem nevim. Mel jsem kdysi podobny problem,
> potreboval jsem predavat kratke textove zpravy z DOSove aplikace. Byla
> totiz psana v TP5.5 a od jednoho unitu chybel zdrojak, takze to neslo
> prepsat :-( Nakonec jsem to vyresil pomerne prisernym zpusobem, ale
> funguje to. Zpravu ulozim do souboru (zjistim jestli jiz predtim
> neexistuje, pak cekam).
No, to nemusi byt v nekterych pripadech az tak priserne. Ja takto
napriklad predavam data, ktera se nesmi za (pokud mozno)
zadnych okolnosti ztratit. :-) Zpravy mezi programy ovsem
predavam pres handle (v ramci jednoho pocitadla).
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
DDe pro DOS
[*] rys(zv)zas-me(tec)cz - 2.10.1998 8:06:24
Dobry den,
delal jsem neco takoveho. Potreboval jsem ze sveho DOSovskeho programu
tisknout pres ovladace Windows. Napsal jsem kratky rezident (1 kB), ktery se
zavede z AUTOEXECu jeste pred spustenim Windows. Chce-li nekdo pres ty
Windows tisknout, musi v nich mit spusten (jiz klasicky Windowsovsky)
program, ktery ten tisk provadi. Pak si spusti ten DOSovy program.
Oba programy spolu komunikuji pres ten rezident. Ten obsahuje dve male
fronty - jedna pro posilani dat DOS -> WIN, druha zpet. Jejich delka byla
asi 80 B, uz nevim jiste, ale to neni problem zmenit. Vlastni tiskova data
jsem vzdy dal do nejakeho docasneho souboru a pak jsem tomu Windowsovskemu
programu vlastne jen poslal zpravu, kde to hledat. Pred tim ale ten
Windowsovsky program zase dokazal zjistit, ktere tiskarny jsou ve Windows
nastaveny a na jake rozliseni tisknou.
Jestli chcete, mohu Vam poslat zdrojak toho rezidentu a ten Windowsovsky
program, neni to ale moc dobre komentovane.
Karel Rys
>Nosek Libor wrote:
>>
>> Nevite nekdo je-li mozne vytvorit DDe operace v systemu D3 jako server a
TP7 jako klient >pro prenos dat mezi sebou.
>> Jde mi o to aby program v TP7 akceptoval data posilana z programu v D3 a
program v D3 >prijimal pomoci DDE data
>> z programu v TP7?
>> Za jakoukoli odpoved diky.
>
>Ahoj,
>
>Jedina moznost by byla kdyby M$ rozsiril DOS o nejake sluzby ktere by to
>umoznovali, ale o nicem takovem nevim. Mel jsem kdysi podobny problem,
>potreboval jsem predavat kratke textove zpravy z DOSove aplikace. Byla
>totiz psana v TP5.5 a od jednoho unitu chybel zdrojak, takze to neslo
>prepsat :-( Nakonec jsem to vyresil pomerne prisernym zpusobem, ale funguje
>to. Zpravu ulozim do souboru (zjistim jestli jiz predtim neexistuje, pak
>cekam). Ve Windows aplikaci pomoci FindFirstChangeNotification sleduji
>jestli v danem adresari nedoslo ke zmene a pokud se tam objevi ten soubor
>tak jej prectu a smazu. Neni to samozrejme nijak rychle, ale pro obcasne
>zpravy to funguje. Co se tyce te funkce FindFirstChangeNotification, tak
>v RxLib mas komponentu RxFolderMonitor ktera je na tom zalozena.
>
>--
> Petr Vones, amatersky programator
>
>
>Update - Delete Record ?
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 2.10.1998 08:14:49
Ano , ja som tiez zastancon relacnych databaz - ovsem robim program
DB view ktory a vediet pracovat s lubovolnou databazou , aj dbf .
Table komponenta bez problemu vie modifikovat zaznam na ktorom stojim.
Query iba vtedy ak mam nieco jednoznacny vo vete - ale predsa aj Query
by mohol mat vlastnost pracovat s vetou kde je zrovna databazovy kurzor.
Cudujem sa ze to nevie.
Je mozne ziskat nejako implicitny databazovy kurzor ?
TUNGLI Jan
tungli(zv)pvt.sk
----------
> Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: RE: Update - Delete Record ?
> D�tum: 1. november 1998 18:49
>
> TUNGLI Jan wrote:
>
> > Ako chces vidat update ked nie je unikatna polozka?
> > Co zapises do where , a ked nic nezapises tak update ide na vsetky
> > recordy. Porozmyslaj este raz.
>
> Asi takto: Kdyz budu jeliman, zapomenu na "where" a mam o
> zabavu postarano. Kdyz se mi do tabulky nacpou dve naprosto
> stejne vety, ktere tam nemaji co delat, je na case zavest
> jednoznacny index.
> >
> > TUNGLI Jan
> > tungli(zv)pvt.sk
> >
> > ----------
> > > Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> > > Pre: delphi-l(zv)fwd(tec)cz
> > > Predmet: Re: Update - Delete Record ?
> > > D�tum: 28. okt�ber 1998 9:14
> > >
> > > TUNGLI Jan wrote:
> > >
> > > > Je nejako mozne cez TQUERY modifikovat a vymazat zaznam z tabulky, ked
> > > > na tabulke nie je ziadny unikatny index (ani unikatna polozka) ? Viem
> > > > TTABLE komponent to dokaze ale TQUERY neviem.
> > >
> > > update ... where ...
> > > Obdobne s delete.
> > >
>
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz
> Tel.: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
Funkce BDE
[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 2.10.1998 08:15:46
na www Inprise pod sekci Developers jsou funkce popsany i s priklady
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
SQL Dotaz.
[*] Radek KALA <DELPHI(zv)betacontrol(tec)cz> - 2.10.1998 08:25:15
Pratele a kolegove, mam jeden dotaz kolem SQL.
Potrebuji udelat dotaz a nevim jak na to resim to dvema dotazama,
a vysledky toho druhyho taham do prvniho jako LookUp Field.
Snad by to slo i jednim, Nasleduje priklad tech dvou SQL
1 dotaz
-------------
select tab1.kod, Sum(tab1.pocet)
from tab1
2 dotaz
-------------
select tab1.kod, Sum(tab1.pocet)
from tab1
where tab1.cena > 1000.
Chci dostat jednu tabulku, ktera bude vypadat takto
Kod, SumofPocet, SumOfPocet1000.
Dekuji za napady.
( Pouzivam tabulky ve formatu Paradox a D4 Prof.) S pozdravem Radek KALA
BetaControl, s.r.o.
Mosteck� 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Offtopic - modem
[*] Roman LISZKA <liszak(zv)usa(tec)net> - 02.10.1998 08:26:45
Petr Vones wrote:
> Ahoj,
>
> Zkus se podivat do manualu nebo na Internetu na AT prikazy. Kazda firma to
> ma jine. Ja mam napriklad SupraExpess 336 a ten to sice taky nepozna, ale
> da se to nastavit takhle:
>
> AT SC0=7 SC2=60 SC4=7 SC6=100 SC8=3
>
> Funguje to dokonce i pro oba obsazovaci tony. Nejhure na tom obvykle byvaji
> prave homologovane modemy, vetsinou stezi poznaji normalni obsazovaci ton
> (hlavne ze si za tu homologaci nechaji zaplatit .....)
>
No ja mam SupraExpress 336i Voice PnP a stejne ani po techto prikazech
nepozna BUSY, ale o techto prikazech (spis registrech) neni v manualu
ani zminka. Bylo by mozny poslat odkaz, na tyto undokumented funkce,
hledal jsem, ani nic takoveho jsem nenasel.
> --
> Petr Vones, amatersky programator
--
================================================================
Ing. Roman LISZKA NewCom Trinec
mailto: newcom(zv)telecom(tec)cz Jablunkovska 241
tel.+fax.: +420 659 21018 739 61 Trinec 1
http://web.telecom(tec)cz/newcom Czech Republic
Dotaz
[*] Jan Pospisil <pospa(zv)students.zcu(tec)cz> - 2.10.1998 08:39:22
Zdravim vsechny
Mam drobny problem. V komponente TEdit bych chtel, aby se mi text
zarovnaval k pravemu okraji a jaksi tam postradam vlastnost Align.
Znate-li nekdo reseni byl bych vam za nej vdecny. J. Pospisil
Sdileni Pdox tabulek
[*] Jaroslav N�dhera <csh(zv)czn(tec)cz> - 2.10.1998 09:19:55
>Nejzakladnejsi vjeci je mit na VSECH pocitacich STEJNOU cestu v NET DIR.
>Opravdu naprosto shodnou - nejde o to, aby ukazovala na stejne misto, ale
>aby byla stejna. Cesta muze byt s pajplajnami nebo pres namapovany disk
>(\\server\c\sdileny nebo treba F:\DATA [IMHO jsou pipelines nejvhodnejsi])
>Dokonce se mi stavalo, ze hrala roli mala a velka pismena !!!
>Timhle bys to mel rozchodit, ale nemash ani zdaleka vyhrano, neb ti
zarucuju
>ze se budes cim dal tim casteji setkavat s hlaskami typu "Index is
corrupted
>..." apod. Existuje asi milion "zarucenych" rad jak se tohoto vyvarovat,
Moje zarucene rady jsou: Stahnout si opraveny soubor VREDIR.VDX od M$ - ve
verzich 4.00.1111 az 4.00.1114 byla chyba, ktera na siti zpusobovala
porusovani indexu (da se do adresare WINDOWS\SYSTEM), dale je nutne nastavit
v konfiguraci BDE LOCAL SHARE na TRUE, nastavit NET DIR podle pravidel
uvedenych vyse a pak je od porusovani indexu pokoj - uz jedeme rok asi 200
aplikaci, z nich asi 50 sitove a temer bez problemu. ("Temer" proto, protoze
nejake problemy jsou vzdy). Dobre je tez pred startem programu odmazat .LCK
soubory (pri regulernim ukonceni programu by se mely samy rusit). Pred
temito opatrenimi jsme se ale take velmi potili.
>
>Posledni vjec, jestli se chces zbavit problemu zapomen na Paradox v siti
;-(
>
Paradox v siti neni tak hrozny a da se s nim dobre zit.
J. Nadhera
Win API ShAppBarMessage
[*] SCT Softmaker, s.r.o. <sm(zv)sct(tec)cz> - 2.10.1998 09:34:07
No ono to taky funguje myslim az s tretim service packem.
Miroslav Mares
-----P�vodn� zpr�va-----
Od: Martin Lasevi� <ml_software(zv)email(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 2. listopadu 1998 8:29
P�edm�t: RE: (2x) Win API ShAppBarMessage
>Nevim, dival jsem se do WIN32.HLP u D3 Profesional verze a je tam doslova
>napsano v QuickInfo, ?e to NT nepodporuje ( pouze WIN 95). Takze , co to je
>za help? Mame asi rozdilne informace.
>
>IKS, Martin Lasevic - delfin z povolani
>
>-----Puvodni zprava-----
>Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
>Odeslano: 1. listopadu 1998 13:42
>Komu: delphi-l(zv)fwd(tec)cz
>Poedmit: Re: Win API ShAppBarMessage
>
>"Martin Lasevie" wrote:
>>
>> Ahoj vsichni,
>>
>> resim problem jak zaregistrovat vlastni toolbar tak, aby s jeho rozmery
>pocitaly OS Win 95
>> pri maximalizaci ostatnich oken ( obdoba panelu nastroju MS Office).
>>
>> Pri pohlidce archivu teto konference jsem narazil na info o funkci
>ShAppBarMessage. Bohuzel ji nelze pouzit na Win NT.
>
>Ahoj,
>
>NT sice nemam takze to nemohu vyzkouset. V helpu se ale nepise o tom ze by
>tato funkce nefungovala v NT, je tam psano:
>
>[Now Supported on Windows NT]
>
>--
> Petr Vones, amatersky programator
>
>Jak vytvorit index ?
[*] Petr Brant <pbrant(zv)softhome(tec)net> - 2.10.1998 09:43:57 -0000
Ahoj vsichni,
co se tyce databazi, jsem trapny a totalni zacatecnik, tak se prosim
nesmejte moc nahlas, az budete cist tento dotaz.
Spachal jsem kdysi program, kde se preklada jakesi specialni vyrazivo podle
slovniku coby tabulka DBF ve formatu FoxPro 2.5. Vsechno pracovalo OK, ale
najednou se stalo, za nekomu to zacalo prekladat chybne, i kdyz prislusne
vyrazy v databazi byly. Po nejakem laborovani jsem prisel na to, ze je
nakopnuty indexovy soubor, po reindexovani pomoci FoxPro vse bylo opet OK.
A ted ten dotaz: Lze reindexovat databazovou tabulku pomoci BDE ? Nasel
jsem sice v komponente TTable funkci AddIndex, ale ta slouzi k vytvoreni
indexu, kdezto ja uz index mam a chci jej pouze prekontrolovat a v pripade
potreby vytvorit. Bohuzel mi ani nic nerikaji pojmy primary index, unique
index apod.
Diky za vsechna nakopnuti, z databazi znam tak trochu SQL a komponenty
TTable a TQuery. Pouzivam D3 Standard.
********************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
********************************************************
Poradi zaznamu v TQuery
[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 2.10.1998 09:55:31
Tipnul bych si, �e nejlep�� cesta by byla p�es n�jak� Runtime property editor. Nicm�n� jednak si mysl�m, �e na Gridu je mo�n� drag and drop p�ehazovat slouce, d�le m�m odzkou�eno, �e funguje konstrukce:
DataSet.FieldByName('jmeno polozky 1').Index := 0 ;
DataSet.FieldByName('jmeno polozky 2').Index := 1 ;
DataSet.FieldByName('jmeno polozky 3').Index := 2 ;
DataSet.FieldByName('jmeno polozky 4').Index := 3 ;
No a s t�m u� se ur�it� d� ten probl�m n�jak vy�e�it.
-----P�vodn� zpr�va-----
Od: Jaro [SMTP:jaro(zv)sinea(tec)cz]
Odesl�no: 2. listopadu 1998 9:36
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Poradi zaznamu v TQuery
Vedel by nekdo zda je mozne a pripadne jak fyzicky zmenit poradi zaznamu v
otevrenem TQeury?
Chtel bych dat moznost pomoci tlacitka pripadne Drag and drop prehazet
poradi zaznamu v DataSetu.
Zaznamy bych pak pred ulozenim ocisloval poradovym cislem podle naposledy
zmeneneho poradi tak,
aby se po naslednem Open (pri ORDER BY PorCislo)
otevrely serazeny stejne, jak byly naposledy zanechany.
Jaro
Mainform.Showmodal
[*] reaia(zv)snt(tec)cz (REAiA CONSULTING, s. r. o.) - 2.10.1998 10:05:08
Jo. Omlouvam se za zamireni do slepe ulicky. Ano, problem je takovy, ze bych
chtel zamezit tomu, aby slo z aplikace prepnout do vymezeneho seznamu
urcitych jinych aplikaci (pripadne vubec nikam jinam). Nevim, jak na to.
Jiri Becvar
"Martin Lasevic" wrote:
> Znate nekdo efektivni zpusob, jak udelat hlavni form aplikace modalni ?
tj.
> s vlastnostmi jako Form.ShowModal ?
Ahoj,
a co ma byt cilem ? Modalni dialog ma vzdy vztah k ostatnim oknun aplikace.
Nejde ti spise o to, aby nebylo mozne v tu chvili prepinat mezi aplikacemi ?
--
Petr Vones, amatersky programator
Dotaz o Quick Reportu
[*] Radek KALA <DELPHI(zv)betacontrol(tec)cz> - 2.10.1998 10:14:26
Mam problem.
Pouzivam D4 Prof a novy QuickReport 3.03.
Pretahl jsem aplikaci z Delphi 2.0 a predelal jsem report a on
nefunguje tak jak bych chtel.
Popis mam v Detail bandu polozeny DBMemo ( DBRichtext ) a ono
ma nastaveno AutoStretch = True;
Kdyz se to tiskne tak se skutecne ten band natahne na potrebnou
delku, ale jeho okraje ( frame) se vytisknou kratke a neprodlouzi se.
V delphi 2 jsem se napojil na udalost BeforePrint a tam jsem se
zeptal na QRBand.Height a ono melo spravnou velikost ( spravnou
= pokazde jinou, dle velikosti mema ). V D4 je tato vlastnost porad
stejna. a to takova jaka byla v Designu. Co s tim ?????.
Dekuji za pozornost.
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
QReportPreview
[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 2.10.1998 10:21:32
Ten exportni filtr do HTML je ve ktere unite? Nejak ho nemuzu najit.
Mam QR 2.0k z D3. Ze by tady nebyl ?
Martin Dupal
-----P�vodn� zpr�va-----
Od: Roman Toda <normex(zv)mail.pvt.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 1. listopadu 1998 21:10
P�edm�t: Re: QReportPreview
>Skus vlastny preview. V OnPreview napis
>
>procedure T_RepZoznamF.QuickRep1Preview(Sender: TObject);
>begin
> _RepPreview:=T_RepPreview.Create(Application);
> _RepPreview.QRPreview.QRPrinter := TQRPrinter(Sender);
> _RepPreview.Show;
>end;
>
>_RepPreview je okno s TQRPreview a mozes v nom pouzivat nasledovne a viac
>
> QRPreview.QRPrinter.PrintSetup;
> QRPreview.ZoomToFit;
> QrPreview.ZoomToWidth;
> QRPreview.Zoom := i; //integer v %
> QrPreview.PageNumber:=i; //integer aktualna str.
> QrPreview.PageNumber:=QrPreview.QRPrinter.PageCount; // na poslednu
> QrPreview.QRPrinter.Print;
> QrPreview.QrPrinter.ExportToFilter(TQRAsciiExportFilter.Create(FileName));
//
>save as ASCII
> QrPreview.QrPrinter.ExportToFilter(TQRHtmlExportFilter.Create(FileName));
//
>save as HTML
Update - Delete Record ?
[*] Lubo Fule <fule(zv)sct.sk> - 2.10.1998 10:30:03
Este maly dodatok, aj TTable ti zmaze viac zaznamov ak nie su unikatne,
pretoze tak isto vygeneruje na vymazanie riadku SQL prikaz DELETE ... WHERE
... Inac sa to totiz v pripade standartneho SQL servra neda.
Insert string
[*] int001 <int001(zv)isnet.sk> - 2.10.1998 10:51:15
Jedna z moznosti ...
procedure TForm1.Button1Click(sender:TObject);
var s:string;
begin
s:=edit1.text;
insert('(zv)',s,pozicia); {pozri v helpe}
edit1.text:=s;
end;
Vlado amatersky programator, samouk
----------
> Odes�latel: Zdenek Petruj <zpetruj(zv)zebra(tec)cz>
> Komu: Delphi Konference (el. adresa) <delphi-l(zv)fwd(tec)cz>
> P�edm�t: Insert string
> Datum: 29. okt�ber 1998 12:37
>
> Nevite nekdo jak nejjednoduseji vlozit do TEdit na pozici kuzoru nejaky
> muj string. Tedy aby bylo jasno vlozit v editacnim poli treba doprostred
> nejakeho stringu muj vlastni string na zmacknuti tlacitka (treba do
> mailove adresy vlozit zavinac).
>
> S pozdravem
> Zdenek Petruj
> ____________________________
> adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
> Czech republic
> ____________________________
> tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
> e-mail: zpetruj(zv)zebra(tec)cz
> internet: http://www.zebra(tec)cz
>
> COM port
[*] int001 <int001(zv)isnet.sk> - 2.10.1998 11:01:10
Ahoj Ikino.
To sa ti tazko podari. Potreboval som nieco podobne a po 3 tyzdnoch som to vzdal.
Vlado.
----------
> Odes�latel: IKO <IKO(zv)kamarad(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: COM port
> Datum: 30. okt�ber 1998 21:27
>
> Potrebujem poradit, ako by som sa vo Windowse napichol na COM
> port a odpocuval komunikaciu. Nieco ako HOOK. Ako na to?
>
>
> IKO
> ikino(zv)pobox.sk
> http://freeweb.coco(tec)cz/IKO
SQL Dotaz.
[*] Kovac <kovac(zv)pvt.sk> - 2.10.1998 11:27:53
select t1.kod, Sum(t1.pocet) SumOfPocet, Sum(t2.pocet) SumOfPocet1000
from tab1 t1
left join tab1 t2
on t1.KLUC=t2.KLUC and t2.cena > 1000
group by t1.kod
Na tento join ale musis mat v tab1 jednoznacny KLUC.
-----Original Message-----
From: Radek KALA <DELPHI(zv)betacontrol(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 2. november 1998 9:03
Subject: SQL Dotaz.>Pratele a kolegove, mam jeden dotaz kolem SQL.
>Potrebuji udelat dotaz a nevim jak na to resim to dvema dotazama,
>a vysledky toho druhyho taham do prvniho jako LookUp Field.
>
>Snad by to slo i jednim, Nasleduje priklad tech dvou SQL
>
>1 dotaz
>-------------
>select tab1.kod, Sum(tab1.pocet)
>from tab1
>
>2 dotaz
>-------------
>select tab1.kod, Sum(tab1.pocet)
>from tab1
>where tab1.cena > 1000.
>
>Chci dostat jednu tabulku, ktera bude vypadat takto
>Kod, SumofPocet, SumOfPocet1000.
>
>Dekuji za napady.
>( Pouzivam tabulky ve formatu Paradox a D4 Prof.)
>
> S pozdravem Radek KALA
> BetaControl, s.r.o.
> Mosteck 15, 614 00
> tlf. : + 420 5 4532 1112 / 2413
> fax : + 420 5 4521 1501
> GSM : + 420 603 85 75 15
>Update - Delete Record ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.10.1998 11:46:38
TUNGLI Jan wrote:
> Ano , ja som tiez zastancon relacnych databaz - ovsem robim program
> DB view ktory a vediet pracovat s lubovolnou databazou , aj dbf .
> Table komponenta bez problemu vie modifikovat zaznam na ktorom stojim.
> Query iba vtedy ak mam nieco jednoznacny vo vete - ale predsa aj Query by
> mohol mat vlastnost pracovat s vetou kde je zrovna databazovy kurzor.
> Cudujem sa ze to nevie.
Jiste ze to jde, ale mam takovy nejasny pocit, ze puvodni dotaz se
prave tomuto chtel vyhnout.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
BDE Error
[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 2.10.1998 12:41:06
Jo, existuje. U mne se to vsak najednou zpravilo (za nekolik dnu) bez
meho vedomeho zasahu do formulare, tabulky, dane casti programu, atd.
Bylo to v Delphi3. Zkus pridat do tabulky nejakou neviditelnou
calculated polozku. Mozna pomuze.
S pozdravem
J. Nagy
NH-TRANS, spol. s r.o.
Podebradova 28
702 00 Ostrava
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz
> -----P�vodn� zpr�va-----
> Od: Petr Vale� [SMTP:Petr.Vales(zv)gopas(tec)cz]
> Odesl�no: 30. ��jna 1998 16:48
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: BDE Error
>
>
> Hmmm,
>
> hodnoty RecNo a RecordCount odpovidaji skutecnosti. Ja si osobne
> myslim, ze
> to bude nejake spatne nastaveni gridu. Ona ta tabulka je totiz
> pomerne
> velika...31 poli + 1 memo pole. Mne se to jeste nikdy nestalo a
> neznam
> nikoho komu by se to stalo ???
>
> Existuje nekdo takovy ???
>
> S pozdravem Petr
>
> > ----------
> > Od: Martin Lasevi�[SMTP:ml_software(zv)email(tec)cz]
> > Odesl�no: 30. ��jna 1998 16:25
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > P�edm�t: RE: BDE Error
> >
> > Tezko rict, muze to byt napr. hodnotou v RecNo prislusneho
> > DataSetu (
> > vetsi nez RecordCount), ale takhle na dalku nevim.
> >
> > -----Puvodni zprava-----
> > Od: Petr Vale? [SMTP:Petr.Vales(zv)gopas(tec)cz]
> > Odeslano: 30. oijna 1998 13:08
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > Poedmit: RE: BDE Error
> >
> > Ahoj,
> >
> > ne..pouzivam TDBGrid a kdyz prejdu na posledni polozku tak mi
> > to furt hlasi : "Data grid out of index"
> >
> > Nevite nekdo cim to muze byt ???
> >
> > Diik
> >
> > > ----------
> > > Od: Jioi Heinisch[SMTP:HeiJu(zv)sol(tec)cz]
> > > Odeslano: 27. oijna 1998 19:51
> > > Komu: delphi-l(zv)fwd(tec)cz
> > > Poedmit: Re: BDE Error
> > >
> > > ahoj
> > > nepouzivas nahodou DBGridSinea
> > >
> > >
> > > HeiJu
> > >
> > >
> > > -----Puvodni zprava-----
> > > Od: Petr Vale? <Petr.Vales(zv)gopas(tec)cz>
> > > Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
> > > Datum: 27. oijna 1998 16:07
> > > Poedmit: BDE Error
> > >
> > >
> > > >
> > > >Ahoj vsichni,
> > > >
> > > >Pouzivam tabulku formatu Paradox a pres TQuery a TDataSource
ji
> > > >mam
> > > >propojenou na Grid. Ovsem pri browsingu v tabulce mi najednou
> > > >program
> > > >zahlasi chybu :
> > > >
> > > >"Grid index out of range"
> > > >
> > > >Nevite prosim nekdo co s tim ???
> > > >
> > > >S pozdravem Petr
> > >
> >
Update - Delete Record ?
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 2.10.1998 12:52:01
Si na omile, mozem ti to ukazat ak chces. TTable vie pracovat s aktualnym curzorom databazy.
TUNGLI Jan
tungli(zv)pvt.sk
----------
> Od: Lubo Fule <fule(zv)sct.sk>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: RE: Update - Delete Record ?
> D�tum: 2. november 1998 10:30
>
> Este maly dodatok, aj TTable ti zmaze viac zaznamov ak nie su unikatne,
> pretoze tak isto vygeneruje na vymazanie riadku SQL prikaz DELETE ... WHERE
> ... Inac sa to totiz v pripade standartneho SQL servra neda.
>
>
> BDE Error
[*] Petr Vale� <Petr.Vales(zv)gopas(tec)cz> - 2.10.1998 13:58:17
Cauu,
ono de o to, ze ja tam mam sice memo, ale ne v tom gridu. Neni tam aby se
zobrazovalo. Tim to urcite neni. Napada mne jedina vec :(((
Odstranit vsechny ty "zasrany" gridy, ktery akorat zneprijemnujou praci.
Petr
> ----------
> Od: Martin Lasevi�[SMTP:ml_software(zv)email(tec)cz]
> Odesl�no: 31. ��jna 1998 8:15
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: BDE Error
>
> A nedela tam paseku to MEMO pole v GRIDU??????. Ono Delphi jsou Delphi a i
>
> ony majisve mouchy ( vcetne BDE). A to delame taky s PDOX. Jinak uz nevim.
>
> Ta hlaska spise odpovida tomu, ze nesedi indexy u property Colums. Takze
> opet ukazuje vse na to memo.
>
> Dej mi vedet, jak to pak dopadlo.
>
> Martin
>
>
>
> -----Puvodni zprava-----
> Od: Petr Vale? [SMTP:Petr.Vales(zv)gopas(tec)cz]
> Odeslano: 30. oijna 1998 16:48
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: RE: BDE Error
>
>
> Hmmm,
>
> hodnoty RecNo a RecordCount odpovidaji skutecnosti. Ja si osobne myslim,
> ze
> to bude nejake spatne nastaveni gridu. Ona ta tabulka je totiz pomerne
> velika...31 poli + 1 memo pole. Mne se to jeste nikdy nestalo a neznam
> nikoho komu by se to stalo ???
>
> Existuje nekdo takovy ???
>
> S pozdravem Petr
>
> > ----------
> > Od: Martin Lasevie[SMTP:ml_software(zv)email(tec)cz]
> > Odeslano: 30. oijna 1998 16:25
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > Poedmit: RE: BDE Error
> >
> > Tezko rict, muze to byt napr. hodnotou v RecNo prislusneho DataSetu (
> > vetsi nez RecordCount), ale takhle na dalku nevim.
> >
> > -----Puvodni zprava-----
> > Od: Petr Vale? [SMTP:Petr.Vales(zv)gopas(tec)cz]
> > Odeslano: 30. oijna 1998 13:08
> > Komu: 'delphi-l(zv)fwd(tec)cz'
> > Poedmit: RE: BDE Error
> >
> > Ahoj,
> >
> > ne..pouzivam TDBGrid a kdyz prejdu na posledni polozku tak mi
> > to furt hlasi : "Data grid out of index"
> >
> > Nevite nekdo cim to muze byt ???
> >
> > Diik
> >
> > > ----------
> > > Od: Jioi Heinisch[SMTP:HeiJu(zv)sol(tec)cz]
> > > Odeslano: 27. oijna 1998 19:51
> > > Komu: delphi-l(zv)fwd(tec)cz
> > > Poedmit: Re: BDE Error
> > >
> > > ahoj
> > > nepouzivas nahodou DBGridSinea
> > >
> > >
> > > HeiJu
> > >
> > >
> > > -----Puvodni zprava-----
> > > Od: Petr Vale? <Petr.Vales(zv)gopas(tec)cz>
> > > Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
> > > Datum: 27. oijna 1998 16:07
> > > Poedmit: BDE Error
> > >
> > >
> > > >
> > > >Ahoj vsichni,
> > > >
> > > >Pouzivam tabulku formatu Paradox a pres TQuery a TDataSource ji mam
> > > >propojenou na Grid. Ovsem pri browsingu v tabulce mi najednou program
> > > >zahlasi chybu :
> > > >
> > > >"Grid index out of range"
> > > >
> > > >Nevite prosim nekdo co s tim ???
> > > >
> > > >S pozdravem Petr
> > >
> >
> Image v TTabSetu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 2.10.1998 13:58:03
Ahoj, dovolim si polozit asi trivialni otazku. Nevite, prosim, nekdo, jak
vlozit do zalozky TTabSetu obrazek? Nekde jsem to videl a libilo se mi
oznaceni zalozek podobneho typu glypth-znackou pro rychlou orientaci.
Dekuji. Jaro B.Off topic : zpravy
[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 2.10.1998 14:35:44
Maly navrh. Zkuste se pri odpovidani podivat na puvodni zpravu. Ono se to
nabaluje a nabaluje (viz posledni Re: BDE error). Mozna by stacilo tam
ponechat jen tu posledni, popr. vycuc. Co vy na to ?
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informa�n� system pro n�poj��e
---------------------------------------------------------------
BDE Error vs MS Office
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 02.10.1998 14:46:47
Jen takova informace, ktera se treba nekomu nekdy sejde.
Tak mi ted na jedne masine zacalo blbnout BDE. Resp. pokud spustim
program v Delphi (pouzivajici BDE) tak nejde spustit aplikace MS Office
(Word, Excel). Pokud pustim napr. Excel tak naopak nelze pustit Delphi
aplikaci (BDE 4.51).
Tak jsem preinstaloval BDE a vse jede o.k. Problemy zacaly po vypadku
el. proudu.
Dekuji za pozornost a nashledanou ;)
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================BDE Error vs MS Office
[*] Petr Vale� <Petr.Vales(zv)gopas(tec)cz> - 2.10.1998 15:26:01
Ahoj,
to je zajimave, nicmene mne proud nevypad a BDE mi blbne stale. BDE
samozrejme preinstalovat mohu, ale kdo mi zaruci, ze dany vysledny produkt
bude bez problemu fungovat i u zakaznika. Kdysi jsem si BDE nemohl
vynachvalit, ale tedka mam s nim akorat potize od chyb, ktere nesmyslne
hlasi az po jeho silenou instalaci.
Petr
> ----------
> Od: Martin Kubecka[SMTP:martin.kubecka(zv)amenit(tec)cz]
> Odesl�no: 2. listopadu 1998 14:46
> Komu: DELPHI Distribution List
> P�edm�t: BDE Error vs MS Office
>
> Jen takova informace, ktera se treba nekomu nekdy sejde.
>
> Tak mi ted na jedne masine zacalo blbnout BDE. Resp. pokud spustim
> program v Delphi (pouzivajici BDE) tak nejde spustit aplikace MS Office
> (Word, Excel). Pokud pustim napr. Excel tak naopak nelze pustit Delphi
> aplikaci (BDE 4.51).
>
> Tak jsem preinstaloval BDE a vse jede o.k. Problemy zacaly po vypadku
> el. proudu.
>
> Dekuji za pozornost a nashledanou ;)
>
> Mac
> --
> ==============================================================
> = Ing. Martin Kubecka - Amenit s.r.o. =
> = Na Valech - budova Dytron, 741 01 Novy Jicin =
> = telefon: +420 603 265926 =
> = http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
> ==============================================================
> Sdileni Pdox tabulek
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.10.1998 16:34:23
Jednoznacne na VSECH stanicich. Zpomaleni by se nemelo konat.
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Miloslav Skacel [SMTP:kastner(zv)infos(tec)cz]
> Odesl�no: 02. �ervence 1998 13:16
> Komu: csh(zv)czn(tec)cz
> Kopie: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Sdileni Pdox tabulek
>
> Ahoj,
>
> rad bych se zeptal ja to myslis s
>
> BDE LOCAL SHARE = TRUE
> a/ na vsech stanicich?
> b/ pouze na stanici kde se fyzicky tabulky nalezaji?
>
> Pokud na vsech stanicich, tak to znamena radove zpomaleni na vsech
> stanicich.
> Podle helpu by to melo stacit na stanici s daty.
> Pri LOCAL SHARE = TRUE se provadi ihned zapis na disk a chova se to
> stejne
> jako kdyz mas LOCAL SHARE = FALSE a provadis pro vsechny tabulky
> FlushBuffers.
>
> S pozdravem,
> Miloslav Skacel
> skacel(zv)kjsoft(tec)cz
> http://www.kjsoft(tec)cz
>
> -----P�vodn� zpr�va-----
> Od: Jaroslav N�dhera <csh(zv)czn(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 2. listopadu 1998 11:43
> P�edm�t: Re: Sdileni Pdox tabulek
>
>
> >Moje zarucene rady jsou: Stahnout si opraveny soubor VREDIR.VDX od M$
> - ve
> >verzich 4.00.1111 az 4.00.1114 byla chyba, ktera na siti zpusobovala
> >porusovani indexu (da se do adresare WINDOWS\SYSTEM), dale je nutne
> nastavit
> >v konfiguraci BDE LOCAL SHARE na TRUE, nastavit NET DIR podle
> pravidel
> >uvedenych vyse a pak je od porusovani indexu pokoj - uz jedeme rok
> asi 200
> >aplikaci, z nich asi 50 sitove a temer bez problemu. ("Temer" proto,
> protoze
> >nejake problemy jsou vzdy). Dobre je tez pred startem programu
> odmazat .LCK
> >soubory (pri regulernim ukonceni programu by se mely samy rusit).
> Pred
> >temito opatrenimi jsme se ale take velmi potili.
>
> D2 a MSWord97, OLE
[*] Tom� Bart�k <beersoft(zv)beersoft(tec)cz> - 02.10.1998 16:50:55
Mne to chodi takhle:
var
Nazev : string;
MSWord.ActiveDocument.Bookmarks.Item(Nazev).Select;
Tomas
Leos Urban wrote:
> Ahoj,
> Mam problem s Delphi2 a MsWord 97.
> Kdyz chci vytahnout z Wordu Collection (tj urcity prvek, rekneme X-ty
> bookmark),
> vrati se mi chyba.
> Zde je muj kod:
>
> var
> MSWord: Variant;
> begin
> MSWord:=CreateOleObject('Word.Application');
> MSWord.visible := true;
> MSWord.documents.add('ks.dot');
> MSWord.ActiveDocument.Bookmarks('COMPANY').Select;
> // Error:"bookmarks" is not method
> MSWord.ActiveDocument.Bookmarks['COMPANY'].Select;
> // Error:"item" (?) is not property
> end;
>
> Toto je priklad z napovedy k MSWord Visual Basicu:
> ActiveDocument.Bookmarks("temp").Select
>
> Soubor 'ks.dot' existuje a bookmark 'COMPANY' je definovany.
>
> Prosim, prosim, nemate nekdo napad jak na to?
>
> Leos
Mainform.Showmodal
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.10.1998 16:53:52
Existuje prepinac, tusim SYSTEMMODAL, ale ted nevim, jestli to jde i na
user-defined. Zkus Win32 API help.
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: reaia(zv)snt(tec)cz [SMTP:reaia(zv)snt(tec)cz]
> Odesl�no: 02. listopadu 1998 10:05
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Mainform.Showmodal
>
> Jo. Omlouvam se za zamireni do slepe ulicky. Ano, problem je takovy,
> ze bych
> chtel zamezit tomu, aby slo z aplikace prepnout do vymezeneho seznamu
> urcitych jinych aplikaci (pripadne vubec nikam jinam). Nevim, jak na
> to.
> Jiri Becvar
>
>
> "Martin Lasevic" wrote:
> > Znate nekdo efektivni zpusob, jak udelat hlavni form aplikace
> modalni ?
> tj.
> > s vlastnostmi jako Form.ShowModal ?
>
> Ahoj,
>
> a co ma byt cilem ? Modalni dialog ma vzdy vztah k ostatnim oknun
> aplikace.
> Nejde ti spise o to, aby nebylo mozne v tu chvili prepinat mezi
> aplikacemi ?
>
> --
> Petr Vones, amatersky
> programator
>
> Partial BDE v Install Shield Express
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.10.1998 17:43:55
> Tak se zda, ze 'partial BDE installation' je nejlepsi cesta jak zneprijemnit
> uzivani programu s BDE.
Nastesti 32-bitove BDE je aspon mnohem lepsi nez bylo tenkrat 16-bitove,
protoze to byla uplna tragedie. BDE 5 zase ma samostatne knihovny, takze
funguje spolu s nizsimi verzemi...
Ale samozrejme, mnohem lepsi jsou nahrady BDE, ktere maji mimo vyse
uvedene take vyhodu v tom, ze se linkuji primo do EXE a nepotrebuji
dalsi DLL apod. Nerikam, ze je BDE na nic, nerikam, ze ho neumim
kvalitne nainstalovat, ale myslim si, ze kdyby Inprise vymyslel
neco chytrejsiho nez BDE, proste umel-li by to narvat do EXE, byli
by mu asi vsichni vdecni.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
Image v TTabSetu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.10.1998 18:24:19
Bene� Jaroslav wrote:
>
> Ahoj, dovolim si polozit asi trivialni otazku. Nevite, prosim, nekdo, jak
> vlozit do zalozky TTabSetu obrazek? Nekde jsem to videl a libilo se mi
> oznaceni zalozek podobneho typu glypth-znackou pro rychlou orientaci.
> Dekuji. Jaro B.
Ahoj,
Asi nejsnazsi cesta je Delphi 4, tam uz je to primo ve VCL :-)
Jinak, pokud mas starsi verzi Delphi, tak to muzes udelat takhle. Kazdy image
v imagelistu bude prirazen jedne zalozce.
uses
CommCtrl;
procedure SetTabControlImages(TabControl: TTabControl; ImageList: TImageList);
var
I: Integer;
TCItem: TTCItem;
begin
TCItem.mask := TCIF_IMAGE;
with TabControl do
begin
for I := 0 to Tabs.Count - 1 do
begin
TCItem.iImage := I;
SendMessage(Handle, TCM_SETITEM, I, Longint((zv)TCItem));
end;
SendMessage(Handle, TCM_SETIMAGELIST, 0, ImageList.Handle);
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
SetTabControlImages(TabControl1, ImageList1);
end;
--
Petr Vones, amatersky programator
Align v TEdit (Was:Dotaz)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.10.1998 18:44:15
Jan Pospisil wrote:
>
> Zdravim vsechny
>
> Mam drobny problem. V komponente TEdit bych chtel, aby se mi text
> zarovnaval k pravemu okraji a jaksi tam postradam vlastnost Align.
> Znate-li nekdo reseni byl bych vam za nej vdecny.
>
> J. Pospisil
Ahoj,
Problem je ze standartni ovl.prvek EDIT ve Windows nepodporuje zarovnanani
v jednoradkovem rezimu. Urcita moznost je pouzit neco podobneho jako je
treba TCurrencyEdit v RxLib kde sice pri editaci je text zleva doprava,
ale po opusteni se zarovna doprava.
--
Petr Vones, amatersky programator
COM port
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.10.1998 18:52:33
Martin Nedopil wrote:
> Ale absolutne nejjednodussi je takova mala krabicka (kluci u nas vyrobili),
> kterou se napichnes mezi prijimac a vysilac a treti vyvod das na svuj
> pocitac. A pak uz jen nejaky terminal a kupu casu.
Ano, to je to spravne reseni ! Zadne trapne programy, ale poctivy HW :-)
Ono to neni nijak slozite, staci proste jen ten smer ktery chces sledovat
pripojit na RxD volneho COMu (a samozrejme nezapomenout propojit i zem).
Pokud mas dva volne COMy, tak muzes sledovat komunikaci v obou smerech.
Potom uz jen za dlouhych zimnich veceru zkoumat co ze tam ty data vubec
znamenaji. Ja jsem si takhle kdysi uzil par peknych dni se snimacem derne
pasky ...... :-)
--
Petr Vones, amatersky programator
Offtopic - modem
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.10.1998 18:55:50
Roman LISZKA wrote:
> >
> No ja mam SupraExpress 336i Voice PnP a stejne ani po techto prikazech
> nepozna BUSY, ale o techto prikazech (spis registrech) neni v manualu
> ani zminka. Bylo by mozny poslat odkaz, na tyto undokumented funkce,
> hledal jsem, ani nic takoveho jsem nenasel.
Ja mam SupraExpress 336i Sp ASVD, ale tusim ze jsem to posilal i nekomu kdo
ma 336i V+ a tomu to take funguje. Neni ten tvuj model nahodou homologovany ?
Popis AT prikazu ti poslu.
--
Petr Vones, amatersky programator
QReportPreview
[*] Roman Toda <normex(zv)mail.pvt.sk> - 02.10.1998 20:03:32
qrhtml
Poslem v pripade zaujmu.
rt.
Martin Dupal wrote:
> Ten exportni filtr do HTML je ve ktere unite? Nejak ho nemuzu najit.
> Mam QR 2.0k z D3. Ze by tady nebyl ?
>
> Martin Dupal
>
--
Mgr. Roman Toda - developers center
normex(zv)mail.pvt.sk; www.technickenormy.com
Normex - fulltext retrieval information system for technical standard
BDE Error vs MS Office
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 02.10.1998 20:21:06
To mi pripomina jeste jeden problem s BDE. Pokud mam spusteny programek,
kam si pisu odpracovane hodiny tykajici se urciteho projektu vytvorenem
v BDE 4.51 a D3 (ackoliv ted uz mam nainstalovane jen D4) tak v D4
nenastartuju BDE (asi 5.0) dokud ten programek nevypnu. Nastesti BDE
obchazim :-) a nepouzivam.
Mac
Petr Vale� wrote:
> to je zajimave, nicmene mne proud nevypad a BDE mi blbne stale. BDE
> samozrejme preinstalovat mohu, ale kdo mi zaruci, ze dany vysledny produkt
> bude bez problemu fungovat i u zakaznika. Kdysi jsem si BDE nemohl
> vynachvalit, ale tedka mam s nim akorat potize od chyb, ktere nesmyslne
> hlasi az po jeho silenou instalaci.
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================Offtopic - modem
[*] Petr Ma��k - 2.10.1998 20:49:37
-----P�vodn� zpr�va-----
Od: Kolar Lubor <LuborK(zv)tnet(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 1. listopadu 1998 19:07
P�edm�t: Offtopic - modem
>Pozor - offtopic!
>Ahoj, mam takovej dotaz (a problem :-)
>mam modem Well, kterej ale nepozdna, ze je linka obsazena (nevrati
>BUSY). Pamatuju si, ze pred lety jsem mel Supru, ta to taky nepoznala,
>nicmene existoval jeden inicializacni string, diky kterymu to potom byla
>schopna poznat. Nemate nekdo obdobne zkusenosti z Wellama (nebo aspon
>kde by se to v tom modemu melo doladit)?
>Diky
>
>Lubor bIRDIE Kolar
>====================
>GSM Phone: +420-603-410019
>ICQ: 18587772
>
Zdravim,
mam modem WELL FM56 PC, t.j interni s K56Flex, upgrade na V. 90 zatim nem�m,
neb ho nepotrebuji. Pod W98 modem rozezna obsazovaci ton, prikladam aktivni
profil,
ten lze zjistit pomoci Hyperterminalu zadanim prikazu AT&V ktery vypise
vsechna nastaveni. Dulezity je aktivni profil. Podle nej se pozna, ktery
profil se prebira. Je-li v sekvenci &Y0, prebira se Stored profile 0, je-li
&Y1,
prebira se Stored profile 1.
Pokud je potreba udelat zmenu, prepise se prislusny vyraz a cely profil se
nakopiruje (v Heprterminalu) na konec zpravy z modemu (za OK), predradi se
AT a
ukonci se &Wn. N se nahradi 0, je-li v aktivnim profilu &Y0 bebo 1, je-li v
aktivnim profilu &Y1. Enterem se sekvence posle modemu.
AT&V
ACTIVE PROFILE:
B1 E1 L2 M1 N1 Q0 T V1 W0 X3 Y0 &C1 &D1 &G0 &J0 &K3 &Q5 &R1 &S0 &T5 &X0 &Y0
S00:000 S01:000 S02:043 S03:013 S04:010 S05:008 S06:002 S07:050 S08:002
S09:006
S10:014 S11:095 S12:050 S18:000 S25:005 S26:001 S36:007 S37:000 S38:020
S44:020
S46:138 S48:007 S95:000
Petr Ma��k, rtepema(zv)mbox.vol(tec)cz
BDE Error
[*] Roman Toda <normex(zv)mail.pvt.sk> - 02.10.1998 21:53:49
Povodny problem bol.
> > > > >Pouzivam tabulku formatu Paradox a pres TQuery a TDataSource ji mam
> > > > >propojenou na Grid. Ovsem pri browsingu v tabulce mi najednou program
> > > > >zahlasi chybu :
> > > > >
> > > > >"Grid index out of range"
Pred casom som mal aj ja tento problem. Riesil som ho takto.
Po kazdom Query.Open som dal Query.First.
A cuduj sa svete, prestalo to.
Ked Ti to pomoze, budem rad ked nie :(
Kazdopadne mi daj vediet.
--
rt
normex(zv)mail.pvt.sk; www.technickenormy.com
Normex - fulltext retrieval information system for technical standard
Registracni databaze
[*] Ing. Jaroslav K�e�ek - 2.10.1998 21:59:12
Staci Ctrl-Alt-Del vypnout program Explorer. On se znovu spusti a je to.
Jaroslav Krecek
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav K�e�ek
computer graphic & software development
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
e-mail: grafex(zv)iol(tec)cz or krecek(zv)iol(tec)cz
for short quick message use
jaroslav.krecek(zv)sms.paegas(tec)cz
phone: +420.603.226103
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 2. ��jna 1998 10:24
P�edm�t: Registracni databaze
>Dobry den, hned v uvodu mam dotaz do plena. Nevite, prosim, nekdo, jak
znovu
>nacist registracni databazi Win95 aniz bych musel restartovat Windows.
>Nektere programy bezne po instalaci svych komponent pozaduji restartovat
>pocitac.
>Jaro Benes
>
>PS. Dekuji Pavlovi za program k memu barevnemu kurzoru, ktery je ale i pres
>to porad cernobily.Jak vytvorit index ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.10.1998 22:14:55
Petr Brant wrote:
> A ted ten dotaz: Lze reindexovat databazovou tabulku pomoci BDE ? Nasel
> jsem sice v komponente TTable funkci AddIndex, ale ta slouzi k vytvoreni
> indexu, kdezto ja uz index mam a chci jej pouze prekontrolovat a v pripade
> potreby vytvorit. Bohuzel mi ani nic nerikaji pojmy primary index, unique
> index apod.
>
> Diky za vsechna nakopnuti, z databazi znam tak trochu SQL a komponenty
> TTable a TQuery. Pouzivam D3 Standard.
Ahoj,
Lze to udelat pomoci BDE API funkci dbiRegenIndexes nebo dbiRegenIndex. Ale
mam dojem ze v Standard verzi k nim nemas help nebo je tam nejake jine omezeni.
Tady je priklad.
procedure fDbiRegenIndexes(TblName: TTable);
begin
Check(DbiRegenIndexes(TblName.Handle));
end;
-- Petr Vones, amatersky programator
Sprava projektu
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 3.10.1998 07:23:53
Zdravim nejen delphackou programatorskou obec!
A hned s dotazeckem, zajimal by mne nejaky soft na spravu a udrzbu
projecktu, mam zkusenosti s MVSS, ale ten nepatri mezi nejlevnejsi pro
jednoho, natoz pro vice programatoru :-( (MS licence). Nemate nekdo
zkusenosti s necim alespon stejne dobrym, ale levnejsim :-))). Diky
Sdileni Pdox tabulek
[*] Jirka <Juraj.Nagy(zv)nh-trans(tec)cz> - 3.10.1998 08:18:50
Pokud pouzivas Novell a jenom jednu verzi BDE na vsech stanicich, tak
by se podle dokumentace nemuselo nastavovat Local Share na true.
Jinak Ti vrele doporucuji nastaveni udelat co nejdriv na vsech
stanicich. Pouze na stanici s tabulkama Ti to zarucene nestaci.
U nas jsme pouzivali program pouzivajici BDE 2.51 s datama (format
Paradox 5) na Novellu, Local share=false. Vsechno slo v pohode. Potom
se pridalo nekolik dalsich stanic, tam se (nepozornosti) nastavilo
Local Share=true a k tomu na nekterych stanicich se nainstaloval
program pouzivajici BDE 4 a cast dat z predchoziho programu. To Ti
nepreji, zjistovat puvod tech chyb, co se objevovali. Jednoduse to
vypadalo tak, ze si nektere stanice delaji se svoji vlastni kopii
tabulek (z Novellu) a jejich zmeny se vubec neprojevi jinde - a
naopak oni nevidi zmeny z jinych stanic. Samozrejme posledni bere
vse, takze po ukonceni prace zustalu v tabulkach hodnoty zpracovane
posledne odhlasenym uzivatelem. (To je radosti, kdyz se Te prijde
zeptat uzivatel, kde ma svych 250 vet zapsanych predchozi den :-))
Denne se nekolikrat objevili hlasky typu Index is out of date. Navic
najednou se objevili duplicitne hodnoty autoinkrement polozek - a s
tim si neporadi tak jednoduse ani Table repair, tabulky se vubec
nedali restrukturalizovat, atd... Secteno: dva tydny stopovani a
hledani pricin+dva dny prace (moji) a dva dny prestoju (cele firmy).
Ted mame vsude Local Share=true. Je to mnohem pomalejsi (alespon maji
uzivatele na co nadavat :-)), ale FUNGUJE TO bez problemu s datama.
> -----P�vodn� zpr�va-----
> Od: Miloslav Skacel [SMTP:kastner(zv)infos(tec)cz]
> Odesl�no: 2. �ervence 1998 13:16
> Komu: csh(zv)czn(tec)cz
> Kopie: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Sdileni Pdox tabulek
>
> Ahoj,
>
> rad bych se zeptal ja to myslis s
>
> BDE LOCAL SHARE = TRUE
> a/ na vsech stanicich?
> b/ pouze na stanici kde se fyzicky tabulky nalezaji?
>
> Pokud na vsech stanicich, tak to znamena radove zpomaleni na vsech
> stanicich.
> Podle helpu by to melo stacit na stanici s daty.
> Pri LOCAL SHARE = TRUE se provadi ihned zapis na disk a chova se to
> stejne
> jako kdyz mas LOCAL SHARE = FALSE a provadis pro vsechny tabulky
> FlushBuffers.
>
> S pozdravem,
> Miloslav Skacel
> skacel(zv)kjsoft(tec)cz
> http://www.kjsoft(tec)cz
>
QR + nastaveni tiskarny
[*] Ivo Herles <ivo.herles(zv)pvt(tec)cz> - 3.10.1998 09:01:31
Ahoj,
mam takovy drobny problemek s nastavenim tiskarny v QR.
Chtel bych si nekde v programu prednastavit tiskarnu a pote toto nastaveni
pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy to
bralo defaultni tiskarnu s defaultnim nastavenim.
Diky za namety.
S pozdravem,
Ivo HERLES
PVT, a. s., o. z. Chomutov
e-Mail: ivo.herles(zv)pvt(tec)cz
tel.: 0396/619216
Telnet komponenty
[*] Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz> - 3.10.1998 10:06:23
Hi,
pouzivate prosim nekdo nejake telnetovske komponenty ( TnEmulVT, Opwdlp a
pod. ) ?
Vasek
V�clav Lukes
E-mail: Vaclav.Lukes(zv)pvt(tec)cz
511247(zv)sms.paegas(tec)cz
Tel.: 0603-511247 QR + nastaveni tiskarny
[*] RADIK(zv)p15.monet(tec)cz - 3.10.1998 10:08:00
U nas to delame takhle (v D3):
Do listboxu dame seznam tiskarem:
ListBox1.Items:=Printer.Printers;
ListBox1.ItemIndex := Printer.PrinterIndex;
V tom si uzivatel vybere a pak je:
QRISRCForm:=TQRISRCForm.Create( Self );
QRISRCForm.PrinterSettings.PrinterIndex:=ListBox1.ItemIndex;
QRISRCForm.Print;
QRISRCForm.Free;
A to je vse, panove......
No abych rekl pravdu, myslim ze to neni z nasi hlavy, ale pochazi to z
FAQu, ktere jsou primo na QuSoft.com..... To neni spatny zdroj
informaci...... tak rikajic primo od pramene....
Ales
----------
Od: Ivo Herles
Komu: DELPHI Distribution List
P�edm�t: QR + nastaveni tiskarny
Datum: 3. listopad 1998 9:01
Ahoj,
mam takovy drobny problemek s nastavenim tiskarny v QR.
Chtel bych si nekde v programu prednastavit tiskarnu a pote toto
nastaveni
pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy
to
bralo defaultni tiskarnu s defaultnim nastavenim.
Diky za namety.
S pozdravem,
Ivo HERLES
PVT, a. s., o. z. Chomutov
e-Mail: ivo.herles(zv)pvt(tec)cz
tel.: 0396/619216
Sprava projektu
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 03.10.1998 10:35:51
V Delphi C/S je PVCS, ktery tohle umi. Pokud nemas C/S tak na webu se
nekde vali PVCS Version Manager 6.0. Trial verze ke stazeni zdarma,
ostra za nejake money.
Mac
Martin Bab�k wrote:
>
> Zdravim nejen delphackou programatorskou obec!
> A hned s dotazeckem, zajimal by mne nejaky soft na spravu a udrzbu
> projecktu, mam zkusenosti s MVSS, ale ten nepatri mezi nejlevnejsi pro
> jednoho, natoz pro vice programatoru :-( (MS licence). Nemate nekdo
> zkusenosti s necim alespon stejne dobrym, ale levnejsim :-))). Diky
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================Off-topics: detekce spustenych apps
[*] Ales Bukovsky <elidisp(zv)mbox.vol(tec)cz> - 03.10.1998 10:42:57
Zdravim,
a omlouvam se za mirne off-topics. Potreboval bych pod NT 4.0 detekovat
vsechny spustene aplikace, ale nevim jak na to (okna x procesy)?
-Ales Bukovsky-
QR + nastaveni tiskarny
[*] Stepan Cerny <chaosz(zv)geocities(tec)com> - 03.10.1998 10:52:50
Hojda,
pred nejakym casem jsem psal uzivatelsky preview, a resil jsem to nejak
taghle:
TQReport.BeforePrint
...
...
// tiskarna, PrinterSettings = objekt reportu
PrinterSettings.PrinterIndex := Printers.Printer.PrinterIndex;
// pocet kopii
PrinterSettings.Copies := Printers.Printer.Copies;
// velikost papiru
Height := Printers.Printer.PageHeight;
Width := Printers.Printer.PageWidth;
// orientace papiru
Page.Orientation := Printers.Printer.Orientation;
...
...
end;
Nastaveni tiskarny v preview
if PrinterSetup.Execute then QReport.Preview;
Snad je to fsechno, .... prece jenom je to uz nejaky patek....
Kdybych na neco zapomnel a nefungovalo to, tag mi zamajluj do klubu ...
;-)
--
Stepan "Chaosz" Cerny
tvoric of software
chaosz(zv)geocities.com
Ivo Herles wrote:
>
> Ahoj,
>
> mam takovy drobny problemek s nastavenim tiskarny v QR.
>
> Chtel bych si nekde v programu prednastavit tiskarnu a pote toto nastaveni
> pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy to
> bralo defaultni tiskarnu s defaultnim nastavenim.
>
> Diky za namety.
>
> S pozdravem,
>
> Ivo HERLES
> PVT, a. s., o. z. Chomutov
> e-Mail: ivo.herles(zv)pvt(tec)cz
> tel.: 0396/619216
Sprava projektu
[*] Marek Prokop <prokopsw(zv)czn(tec)cz> - 3.10.1998 11:01:35
CodeVault na adrese http://www.kestral.com.au.
Marek Prokop
On Tuesday, November 03, 1998 7:24 AM, Martin Bab�k
[SMTP:M.Babik(zv)mus(tec)cz] wrote:
> Zdravim nejen delphackou programatorskou obec!
> A hned s dotazeckem, zajimal by mne nejaky soft na spravu a udrzbu
> projecktu, mam zkusenosti s MVSS, ale ten nepatri mezi nejlevnejsi
> pro
> jednoho, natoz pro vice programatoru :-( (MS licence). Nemate nekdo
> zkusenosti s necim alespon stejne dobrym, ale levnejsim :-))). Diky
Vyvijeni komponent
[*] David Navara <sky(zv)kolej.mff.cuni(tec)cz> - 3.10.1998 11:01:40
Zdravim.
Pred tydnem jsem zacal psat komponenty. V Delphi jinak pisu uz dva roky.
Mam ale takove problemy jako:
- ze se mi nezavola constructor komponenty, ve kterem creatuji pole
TList nezbytna pro beh i v design modu
- ze nejsem schopen do comboboxu (v ObjectInspectoru) property
FieldName: String vyplnit vsechna pole nejakeho Datasetu, aby si mohl
designer vybrat, jako je tomu napr. u property TDBEdit.DataField: String
Zda se mi, ze jsem si neco neprecetl, ale v helpu ani ve zdrojacich jsem
odpoved nenasel. Neodkazete me, prosim, na nejake obsaznejsi dokumenty o
vyvoji komponent?
Dekuji David Navara
Sprava projektu
[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 03.10.1998 11:14:27
Martin Kubecka wrote:
> V Delphi C/S je PVCS, ktery tohle umi. Pokud nemas C/S tak na webu se
> nekde vali PVCS Version Manager 6.0. Trial verze ke stazeni zdarma,
> ostra za nejake money.
caves,
no neviem, ci su to zrovna "nejake money". asi ako pre koho. ale v kazdom
pripade by som radsej pouzival (a aj pouzivam) pvcs. robil som s obidvoma a
pvcs je oproti ss "nebe a dudy".
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
Adresar DLL
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 3.10.1998 12:32:56
Ahoj, prosim o radu. Je to trivialni dotaz, ale uz mi to nejak nemysli.
Nevite, prosim, nekdo jak jednoduse zjistit ze zavedeneho DLL (ze sekce
Initialization) odkud bylo DLL spusteno/zavedeno (tj. z jakeho adresare) ?
Moc dekuji. Jaro B.Vyvijeni komponent
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 3.10.1998 12:36:08
Vim ze tato rada te prilis nenadchne, ale mne se nejlepe osvedcilo
podivat se do zdrojaku original component.
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
> -----P�vodn� zpr�va-----
> Od: David Navara [SMTP:sky(zv)kolej.mff.cuni(tec)cz]
> Odesl�no: 3. November 1998 11:02
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Vyvijeni komponent
>
>
> Zdravim.
>
> Pred tydnem jsem zacal psat komponenty. V Delphi jinak pisu uz dva
> roky.
> Mam ale takove problemy jako:
> - ze se mi nezavola constructor komponenty, ve kterem creatuji pole
> TList nezbytna pro beh i v design modu
> - ze nejsem schopen do comboboxu (v ObjectInspectoru) property
> FieldName: String vyplnit vsechna pole nejakeho Datasetu, aby si mohl
> designer vybrat, jako je tomu napr. u property TDBEdit.DataField:
> String
>
> Zda se mi, ze jsem si neco neprecetl, ale v helpu ani ve zdrojacich
> jsem
> odpoved nenasel. Neodkazete me, prosim, na nejake obsaznejsi dokumenty
> o
> vyvoji komponent?
>
> Dekuji David Navara
Image v TTabSetu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 3.10.1998 12:41:44
Velmi dekuji za radu. Domnival jsem se, ze to jednoduse pujde jako
OwnerDraw, kde primo nakreslim obrazek na uvedene misto zalozky (vedle treba
nejaky text) a budu pripadne ukazovat vybranou a nevybranou zalozku odlisnym
obrazkem. Ale ouha, neumel jsem to udelat. Pri OnOwnerDraw zalozka nejak
nabobtnala a nechtela se nechat upravit (chyba nastaveni vychozich
parametru, nemam zadny funkcni priklad, kde bych se mohl poucit) a potomka,
kde bych vlozil glypth, taky udelat neumim. Tak pouziju Tvoje reseni. Jeste
jednou diky. Jaro B.
> -----P�vodn� zpr�va-----
> Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
> Odesl�no: 2. listopadu 1998 18:24
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Image v TTabSetu
>
>
>
> Bene� Jaroslav wrote:
> >
> > Ahoj, dovolim si polozit asi trivialni otazku. Nevite, prosim, nekdo,
> jak
> > vlozit do zalozky TTabSetu obrazek? Nekde jsem to videl a libilo se mi
> > oznaceni zalozek podobneho typu glypth-znackou pro rychlou orientaci.
> > Dekuji. Jaro B.
>
> Ahoj,
>
> Asi nejsnazsi cesta je Delphi 4, tam uz je to primo ve VCL :-)
>
> Jinak, pokud mas starsi verzi Delphi, tak to muzes udelat takhle. Kazdy
> image
> v imagelistu bude prirazen jedne zalozce.
>
> uses
> CommCtrl;
>
> procedure SetTabControlImages(TabControl: TTabControl; ImageList:
> TImageList);
> var
> I: Integer;
> TCItem: TTCItem;
> begin
> TCItem.mask := TCIF_IMAGE;
> with TabControl do
> begin
> for I := 0 to Tabs.Count - 1 do
> begin
> TCItem.iImage := I;
> SendMessage(Handle, TCM_SETITEM, I, Longint((zv)TCItem));
> end;
> SendMessage(Handle, TCM_SETIMAGELIST, 0, ImageList.Handle);
> end;
> end;
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> SetTabControlImages(TabControl1, ImageList1);
> end;
>
>
>
> --
> Petr Vones, amatersky programator
> Nevite co znamena
[*] Radek KALA <DELPHI(zv)betacontrol(tec)cz> - 3.10.1998 12:49:09
Prevedl jsem program z D3 do D4 a nekdy ( zatim nemam presne
vysledovany kdy) se to zblazni a pri vytvareni Datoveho modelu to
vyhodi vyjimku At and of table. ( Muze souviset s nastavenim BDE)
Nevite nekdo co to muze byt.
Diky
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
Adresar DLL
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 3.10.1998 13:08:28
Haj hou!
Podivej se do Win32 helpu na GetModuleHandle a GetModuleFileName.
>Ahoj, prosim o radu. Je to trivialni dotaz, ale uz mi to nejak nemysli.
>Nevite, prosim, nekdo jak jednoduse zjistit ze zavedeneho DLL (ze sekce
>Initialization) odkud bylo DLL spusteno/zavedeno (tj. z jakeho adresare) ?
>Moc dekuji. Jaro B.
HTH
QR + nastaveni tiskarny
[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 03.10.1998 13:14:31
Ahoj, Alesi.
Toto reseni jsem po boji odhalil take tak.
Mam ale stale jeste jeden problem, zkusim ho prihrat u tohoto tematu -
potrebuji dodatecny tisk
Saved-reportu *.qrp (to jeste taky umim) - hacek je v tom, ze pak neumim
tisknout
stranky OD - DO. Treba mas, Alesi, zkusenost i s timto ?
Nebo nekdo jiny ???????????
Uz jsem to tu jednou psal, nikdo se ale neozval.
Diky Zdenek G.
RADIK(zv)p15.monet(tec)cz wrote:
> U nas to delame takhle (v D3):
>
> Do listboxu dame seznam tiskarem:
> ListBox1.Items:=Printer.Printers;
> ListBox1.ItemIndex := Printer.PrinterIndex;
>
> V tom si uzivatel vybere a pak je:
> QRISRCForm:=TQRISRCForm.Create( Self );
> QRISRCForm.PrinterSettings.PrinterIndex:=ListBox1.ItemIndex;
> QRISRCForm.Print;
> QRISRCForm.Free;
>
> A to je vse, panove......
>
> No abych rekl pravdu, myslim ze to neni z nasi hlavy, ale pochazi to z
> FAQu, ktere jsou primo na QuSoft.com..... To neni spatny zdroj
> informaci...... tak rikajic primo od pramene....
>
> Ales
>
> ----------
> Od: Ivo Herles
> Komu: DELPHI Distribution List
> P�edm�t: QR + nastaveni tiskarny
> Datum: 3. listopad 1998 9:01
>
> Ahoj,
>
> mam takovy drobny problemek s nastavenim tiskarny v QR.
>
> Chtel bych si nekde v programu prednastavit tiskarnu a pote toto
> nastaveni
> pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy
> to
> bralo defaultni tiskarnu s defaultnim nastavenim.
>
> Diky za namety.
>
> S pozdravem,
>
> Ivo HERLES
> PVT, a. s., o. z. Chomutov
> e-Mail: ivo.herles(zv)pvt(tec)cz
> tel.: 0396/619216
--
====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech Republic
tel.: ++420-48-53 96 563, ++420-48-611 24 01, ++420-48-611 24 02
fax.: ++420-48-611 24 03
http://www.ipl(tec)cz
__________________________________________________________
Privat: Borovy vrch 289, 460 14 Liberec 13, Czech Republic
tel.: ++420-48-51 246 15
====================================================
Delphi programy - zrout pameti
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 3.10.1998 14:00:25
Zdravim,
Dokaze nekdo vysvetlit co presne zahrnuje hodnota Working Set zobrazovana
napr. v NT v Task Manageru - mela by vypovidat neco o alokaci pameti - a
hodne lidi se ji ridi pri posuzovani pametove narocnosti programu.
Ale zjistil sem zajimavou vec - Pokud minimalizuju aplikaci ktera ma napr.
5MB working set tak razem klesne na 500KB. A to ne jen aplikace v delphi.
Pry je to mozna tim ze si kazdy okno udrzuje v bitmape svuj obsah pro rychle
preklesleni a pri minimalizaci se to vse uvolni. ???
McLEI
QR + nastaveni tiskarny
[*] RADIK(zv)p15.monet(tec)cz - 3.10.1998 14:50:00
To jsem nedelal, ale zkus ty FAQy z QuSoftu (muzu ti je poslat pripadne
mailem) nebo je jeste stranka Bug&Fix pro QR, adresu jsem dal do odkazu
na www.delphi(tec)cz.
Ales
----------
Od: Zdenlk Glaser
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: QR + nastaveni tiskarny
Datum: 3. listopad 1998 13:14
Ahoj, Alesi.
Toto reseni jsem po boji odhalil take tak.
Mam ale stale jeste jeden problem, zkusim ho prihrat u tohoto tematu -
potrebuji dodatecny tisk
Saved-reportu *.qrp (to jeste taky umim) - hacek je v tom, ze pak neumim
tisknout
stranky OD - DO. Treba mas, Alesi, zkusenost i s timto ?
Nebo nekdo jiny ???????????
Uz jsem to tu jednou psal, nikdo se ale neozval.
Diky Zdenek G.
RADIK(zv)p15.monet(tec)cz wrote:
> U nas to delame takhle (v D3):
>
> Do listboxu dame seznam tiskarem:
> ListBox1.Items:=Printer.Printers;
> ListBox1.ItemIndex := Printer.PrinterIndex;
>
> V tom si uzivatel vybere a pak je:
> QRISRCForm:=TQRISRCForm.Create( Self );
> QRISRCForm.PrinterSettings.PrinterIndex:=ListBox1.ItemIndex;
> QRISRCForm.Print;
> QRISRCForm.Free;
>
> A to je vse, panove......
>
> No abych rekl pravdu, myslim ze to neni z nasi hlavy, ale pochazi to z
> FAQu, ktere jsou primo na QuSoft.com..... To neni spatny zdroj
> informaci...... tak rikajic primo od pramene....
>
> Ales
>
> ----------
> Od: Ivo Herles
> Komu: DELPHI Distribution List
> P�edm�t: QR + nastaveni tiskarny
> Datum: 3. listopad 1998 9:01
>
> Ahoj,
>
> mam takovy drobny problemek s nastavenim tiskarny v QR.
>
> Chtel bych si nekde v programu prednastavit tiskarnu a pote toto
> nastaveni
> pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale
vzdy
> to
> bralo defaultni tiskarnu s defaultnim nastavenim.
>
> Diky za namety.
>
> S pozdravem,
>
> Ivo HERLES
> PVT, a. s., o. z. Chomutov
> e-Mail: ivo.herles(zv)pvt(tec)cz
> tel.: 0396/619216
--
====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech
Republic
tel.: ++420-48-53 96 563, ++420-48-611 24 01, ++420-48-611 24 02
fax.: ++420-48-611 24 03
http://www.ipl(tec)cz
__________________________________________________________
Privat: Borovy vrch 289, 460 14 Liberec 13, Czech Republic
tel.: ++420-48-51 246 15
====================================================Adresar DLL
[*] Ivo Janal�k <janalik(zv)nam(tec)cz> - 3.10.1998 14:51:35
V sekci Initialization pri zavadeni DLL funguje ExtractFileDir(ParamStr(0)).
Ivo
Zo servra na klienta a opacne
[*] Administrator <Administrator(zv)rosoft.sk> - 3.10.1998 15:12:23
Potrebujem poradit:
Mam aplikaciu, ktoru by som rad prevadzkoval na vnutornej sieti.
Ma dve databanky a tie by som rad mal sucasne pristupne na 2 pocitacoch
sucasne.
Na jednom pocitaci (server) mam tu databanku aj program
Na druhom (klient) mam iba program a databanku chcem mat pristupnu zo
servra.
Nastavil som na klientovi alias na ten server a spustil program. Vsetko
ide.
Problem nastal, ked som to iste pustil na servri. Vypisal hlasku
"Exception EDBEngineError in module blabla.exe at 0007B0C2
Directory is controlled by other .NET file.
a cestu na *.lck subor "
Kde a co mam nastavit, aby mi to islo?
Patrik Tesar
ROSOFT
Zo servra na klienta a opacne
[*] Pavol Griga <paly(zv)sct.sk> - 3.10.1998 15:53:44
Nevie mi niekto poradit ako vygenerovat stlacenie klavies do dosovskej
aplikacie
z mojej aplikacie.
za radu vopred vdaka
Zo servra na klienta a opacne
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 3.10.1998 16:19:55
To se tady omila porad dokola !!
V BDEAdmin (BDE Configuration) mas stranku DRIVER a mezi ovladaci taky
PARADOX. Tak si na nej klikni. Vpravo se ti ukaze mrizka a jeden z
parametru je taky NET DIR. No, a tam musis napsat cestu k tomu souboru
(na serveru i klientu musi ukazovat na stejne misto - stejny soubor).
Nekteri zde tvrdi, ze tam musi byt i stejne pismenko disku a stejna
cesta......o tom se nebudu dohadovat, zas by me tady nekdo kamenoval
(jsou tu na to experti).
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Administrator [SMTP:Administrator(zv)rosoft.sk]
> Odesl�no: 03. listopadu 1998 15:12
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Zo servra na klienta a opacne
>
> Potrebujem poradit:
>
> Mam aplikaciu, ktoru by som rad prevadzkoval na vnutornej sieti.
> Ma dve databanky a tie by som rad mal sucasne pristupne na 2
> pocitacoch
> sucasne.
> Na jednom pocitaci (server) mam tu databanku aj program
> Na druhom (klient) mam iba program a databanku chcem mat pristupnu zo
> servra.
>
> Nastavil som na klientovi alias na ten server a spustil program.
> Vsetko
> ide.
> Problem nastal, ked som to iste pustil na servri. Vypisal hlasku
>
> "Exception EDBEngineError in module blabla.exe at 0007B0C2
> Directory is controlled by other .NET file.
> a cestu na *.lck subor "
>
> Kde a co mam nastavit, aby mi to islo?
>
> Patrik Tesar
> ROSOFT
Zo servra na klienta a opacne
[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 3.10.1998 16:27:42
>Mam aplikaciu, ktoru by som rad prevadzkoval na vnutornej sieti.
>Ma dve databanky a tie by som rad mal sucasne pristupne na 2 pocitacoch
>sucasne.
>Na jednom pocitaci (server) mam tu databanku aj program
>Na druhom (klient) mam iba program a databanku chcem mat pristupnu zo
>servra.
>
>Nastavil som na klientovi alias na ten server a spustil program. Vsetko
>ide.
>Problem nastal, ked som to iste pustil na servri. Vypisal hlasku
>
>"Exception EDBEngineError in module blabla.exe at 0007B0C2
>Directory is controlled by other .NET file.
>a cestu na *.lck subor "
>Kde a co mam nastavit, aby mi to islo?
Smazej vsechny LCK soubory, ktere pujdou.
Martin
Synchronizace pristupu k cizim souborum
[*] Milos Koutny <kou20um(zv)axpsu.fpf.slu(tec)cz> - 3.10.1998 17:28:25
Dobry den,
pracuji ve firme, ktera vyviji software na zakazku. S poslednim projektem
se objevil i problem, jak synchronizovat pristup k souborum jinych
aplikaci. Strucne nastinim situaci. Mym ukolem je vytvorit aplikaci, ktera
zverejni vysledky cinnosti jiz nekolik let pouzivaneho programu na
Internetu. Jedna se o namerene hodnoty urcitych velicin (mnozstvi oxidu
siry a dusiku v ovzdusi, mnozstvi ozonu apod.). Tato data se v 30-ti
minutovych intervalech se stahuji na jeden pocitac, ktery je pomoci
specialniho programu (oznacme ho Zdroj) zpracuje. Vystupem jsou textove
soubory. Pro kazdy den jeden, tzn. kazdy se 48x aktualizuje.
S prihlednutim na stavajici stav hw a sw, a nektere "speciality"
pouziteho web serveru, jsem postupoval takto: Vytvoril jsem aplikaci,
ktera bezi na stroji s web serverem. Ma dve casti. Prvni (Generator)
kontroluje v pravidelnych intervalech zda se zmenil nektery ze zdrojovych
souboru (textove soubory vytvorene Zdrojem). Pokud ano, takovy soubor se
analyzuje a vytvori se z neho html stranky a grafy, ktere pouziva druha
cast aplikace (Rozhrani). Mezi Generatorem a Rozhranim probiha IPC pomoci
semaforu a pametove mapovanych souboru (memory mapped files).
Konecne se dostavam k problemu. Pokud se Generator pokusi otevrit soubor
Zdroje, a neni uspesny (Zdroj ho prave pravuje), nachvili se uspi
(suspend) a pokusi se akci provest jeste nekolikrat. Pokud to ani pote
nevyjde, zaradi se soubor do seznamu adeptu na dalsi generovani, ktere
probehne za nekolik minut. Pokud ale Generator soubor uspesne otevrel a
cte ho, a prave v tom okamziku se jej Zdroj pokusi aktualizovat (tj.
soubor znovu vytvorit), nebude uspesny. Zdroj je bohuzel cizi aplikace pro
DOS (nyni bezi na Win95), pro kterou je takovy pokus fatalni.
Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere je
mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
Pokud jste se procetli az sem a neco Vas napada, prosim nevahejte a ozvete
se. Budu vdecny za jakykoliv navrh.
S pozdravem
Milos Koutny
kou20um(zv)fpf.slu(tec)cz
Vyvijeni komponent
[*] Michal ��ek����֫Ŭ?��e���n� - 3.10.1998 17:41:06
nebo je vinikajici pomucka Developer Guide ( DG.pdf )
na DELPHI CD, tam je taky spousta informaci..
-----Original Message-----
From: David Navara <sky(zv)kolej.mff.cuni(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 3. listopadu 1998 13:18
Subject: Vyvijeni komponent
>
> Zdravim.
>
> Pred tydnem jsem zacal psat komponenty. V Delphi jinak pisu uz dva roky.
>Mam ale takove problemy jako:
> - ze se mi nezavola constructor komponenty, ve kterem creatuji pole
>TList nezbytna pro beh i v design modu
> - ze nejsem schopen do comboboxu (v ObjectInspectoru) property
>FieldName: String vyplnit vsechna pole nejakeho Datasetu, aby si mohl
>designer vybrat, jako je tomu napr. u property TDBEdit.DataField: String
>
> Zda se mi, ze jsem si neco neprecetl, ale v helpu ani ve zdrojacich jsem
>odpoved nenasel. Neodkazete me, prosim, na nejake obsaznejsi dokumenty o
>vyvoji komponent?
>
> Dekuji David Navara
Vygenerovanie stlacenia klavies
[*] Pavol Griga <paly(zv)sct.sk> - 3.10.1998 17:59:33
Nevie mi niekto poradit ako vygenerovat stlacenie klavies do dosovskej
aplikacie
z mojej aplikacie.
za radu vopred vdaka
Delphi programy - zrout pameti
[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 03.10.1998 18:09:28
neviem teda co to je working set - v taskmanagere sa da celkom
dobre orientovat podla MemUsage v zalozke Processes -
ak tam taky stlpec nevidis, v menu "View|Select columns" si mozes
nastavit, ktore veci chces o jednotlivych procesoch vediet
--
Maj sa,
R.
Synchronizace pristupu k cizim souborum
[*] Michal ��ek����֫Ŭ?��e���n� - 3.10.1998 18:14:39
Zrejme jsem naivni, ale proc proste nevytvorit kopii toho souboru
a nechat Generator pracovat s nim ?
-----Original Message-----
From: Milos Koutny <kou20um(zv)axpsu.fpf.slu(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 3. listopadu 1998 18:55
Subject: Synchronizace pristupu k cizim souborum
>Dobry den,
>
>pracuji ve firme, ktera vyviji software na zakazku. S poslednim projektem
>se objevil i problem, jak synchronizovat pristup k souborum jinych
>aplikaci. Strucne nastinim situaci. Mym ukolem je vytvorit aplikaci, ktera
>zverejni vysledky cinnosti jiz nekolik let pouzivaneho programu na
>Internetu. Jedna se o namerene hodnoty urcitych velicin (mnozstvi oxidu
>siry a dusiku v ovzdusi, mnozstvi ozonu apod.). Tato data se v 30-ti
>minutovych intervalech se stahuji na jeden pocitac, ktery je pomoci
>specialniho programu (oznacme ho Zdroj) zpracuje. Vystupem jsou textove
>soubory. Pro kazdy den jeden, tzn. kazdy se 48x aktualizuje.
>
>S prihlednutim na stavajici stav hw a sw, a nektere "speciality"
>pouziteho web serveru, jsem postupoval takto: Vytvoril jsem aplikaci,
>ktera bezi na stroji s web serverem. Ma dve casti. Prvni (Generator)
>kontroluje v pravidelnych intervalech zda se zmenil nektery ze zdrojovych
>souboru (textove soubory vytvorene Zdrojem). Pokud ano, takovy soubor se
>analyzuje a vytvori se z neho html stranky a grafy, ktere pouziva druha
>cast aplikace (Rozhrani). Mezi Generatorem a Rozhranim probiha IPC pomoci
>semaforu a pametove mapovanych souboru (memory mapped files).
>
>Konecne se dostavam k problemu. Pokud se Generator pokusi otevrit soubor
>Zdroje, a neni uspesny (Zdroj ho prave pravuje), nachvili se uspi
>(suspend) a pokusi se akci provest jeste nekolikrat. Pokud to ani pote
>nevyjde, zaradi se soubor do seznamu adeptu na dalsi generovani, ktere
>probehne za nekolik minut. Pokud ale Generator soubor uspesne otevrel a
>cte ho, a prave v tom okamziku se jej Zdroj pokusi aktualizovat (tj.
>soubor znovu vytvorit), nebude uspesny. Zdroj je bohuzel cizi aplikace pro
>DOS (nyni bezi na Win95), pro kterou je takovy pokus fatalni.
>
>Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere je
>mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
>
>Pokud jste se procetli az sem a neco Vas napada, prosim nevahejte a ozvete
>se. Budu vdecny za jakykoliv navrh.
>
>
>S pozdravem
>
>Milos Koutny
>kou20um(zv)fpf.slu(tec)cz
>
student Michal Cizek <starxax(zv)molly.vabo(tec)cz>
UIN : 2460214
HP : http://freeweb.coco(tec)cz/starxax
Synchronizace pristupu k cizim souborum
[*] LuborK(zv)tnet(tec)cz (Kolar Lubor) - 03.10.1998 18:18:16
> Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere je
> mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
Nevim, nakolik to pujde, nemam zkusenosti s kooperaci DOS a Windows
aplikaci, ale pokud to dobre chapu, je potreba, aby DOS mohl soubor
kdykoliv otevrit pro zmeny, zatimco Windows generator jej potrebuje
obcas cist? Urcite jsi to uz zkousel, ale napadlo me zkusit ten
zdrojovy soubor (pochopil jsem, ze pres MMF spolupracuji Rozhrani a
Generator, nikoliv Generator a Zdroj) Generatorem otevrit jako sdileny
pro cteni, tim padem by pro ostatni aplikace mel byt jako sdileny pro
cteni/zapis. Mozna by tam byla nutna podpora ze Zdroje, aby ten soubor
oteviral jako Shared Write...
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
16bit aplik. v delphi 2?
[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 03.10.1998 18:26:01
nechcel som vyvolavat nejake boje - samozrejme ze
na tom CD je aj D1, islo len o to ako sa vyhnut instalovaniu
dalsieho BDE, zaberaniu miesta na disku atd. a aj tak
moct robit 16bit. aplik. pod D2(3,4..)
islo mi len o to, ci sa s tym uz niekto zaoberal...
a za vsetky odpovede samozrejme dakujem
--
Majte sa,
R.
Synchronizace pristupu k cizim souborum
[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 03.10.1998 18:32:16
a keby si sa pokusil si ten subor, ktory Zdroj vytvoril,
prekopirovat a otvarat az ten novy subor, o ktorom uz Zdroj nevie?
jediny problem je asi v tom kopirovani - ak prave vtedy Zdroj
dolezie s tym, ze chce zapisovat (t.j. zmazat a vytvorit)....
Milos Koutny wrote:
> Dobry den,
>
> pracuji ve firme, ktera vyviji software na zakazku. S poslednim projektem
> se objevil i problem, jak synchronizovat pristup k souborum jinych
> aplikaci. Strucne nastinim situaci. Mym ukolem je vytvorit aplikaci, ktera
> zverejni vysledky cinnosti jiz nekolik let pouzivaneho programu na
> Internetu. Jedna se o namerene hodnoty urcitych velicin (mnozstvi oxidu
> siry a dusiku v ovzdusi, mnozstvi ozonu apod.). Tato data se v 30-ti
> minutovych intervalech se stahuji na jeden pocitac, ktery je pomoci
> specialniho programu (oznacme ho Zdroj) zpracuje. Vystupem jsou textove
> soubory. Pro kazdy den jeden, tzn. kazdy se 48x aktualizuje.
>
> S prihlednutim na stavajici stav hw a sw, a nektere "speciality"
> pouziteho web serveru, jsem postupoval takto: Vytvoril jsem aplikaci,
> ktera bezi na stroji s web serverem. Ma dve casti. Prvni (Generator)
> kontroluje v pravidelnych intervalech zda se zmenil nektery ze zdrojovych
> souboru (textove soubory vytvorene Zdrojem). Pokud ano, takovy soubor se
> analyzuje a vytvori se z neho html stranky a grafy, ktere pouziva druha
> cast aplikace (Rozhrani). Mezi Generatorem a Rozhranim probiha IPC pomoci
> semaforu a pametove mapovanych souboru (memory mapped files).
>
> Konecne se dostavam k problemu. Pokud se Generator pokusi otevrit soubor
> Zdroje, a neni uspesny (Zdroj ho prave pravuje), nachvili se uspi
> (suspend) a pokusi se akci provest jeste nekolikrat. Pokud to ani pote
> nevyjde, zaradi se soubor do seznamu adeptu na dalsi generovani, ktere
> probehne za nekolik minut. Pokud ale Generator soubor uspesne otevrel a
> cte ho, a prave v tom okamziku se jej Zdroj pokusi aktualizovat (tj.
> soubor znovu vytvorit), nebude uspesny. Zdroj je bohuzel cizi aplikace pro
> DOS (nyni bezi na Win95), pro kterou je takovy pokus fatalni.
>
> Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere je
> mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
>
> Pokud jste se procetli az sem a neco Vas napada, prosim nevahejte a ozvete
> se. Budu vdecny za jakykoliv navrh.
>
> S pozdravem
>
> Milos Koutny
> kou20um(zv)fpf.slu(tec)cz
--
Maj sa,
R.
Mainform.Showmodal
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 03.10.1998 18:46:25
Ahoj,
prepnuti do jinych aplikaci zakazes takhle :
Procedure TMainForm.SetSecurityOn;
Var LDummy:LongInt;
Begin
LDummy:=0;
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, (zv)LDummy, 0);
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, (zv)LDummy, 0);
End;
Procedure TMainForm.SetSecurityOff;
Var LDummy:LongInt;
Begin
LDummy:=0;
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, (zv)LDummy, 0);
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, (zv)LDummy, 0);
End;
Zdroj : Tato konference
Vaclav Sazima
REAiA CONSULTING, s. r. o. wrote:
>
> Jo. Omlouvam se za zamireni do slepe ulicky. Ano, problem je takovy, ze bych
> chtel zamezit tomu, aby slo z aplikace prepnout do vymezeneho seznamu
> urcitych jinych aplikaci (pripadne vubec nikam jinam). Nevim, jak na to.
> Jiri Becvar
>
> "Martin Lasevic" wrote:
> > Znate nekdo efektivni zpusob, jak udelat hlavni form aplikace modalni ?
> tj.
> > s vlastnostmi jako Form.ShowModal ?
>
> Ahoj,
>
> a co ma byt cilem ? Modalni dialog ma vzdy vztah k ostatnim oknun aplikace.
> Nejde ti spise o to, aby nebylo mozne v tu chvili prepinat mezi aplikacemi ?
>
> --
> Petr Vones, amatersky programator
Vyvijeni komponent + Co nam Inprise taji ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 03.10.1998 19:03:12
David Navara wrote:
>
> Zdravim.
>
> Pred tydnem jsem zacal psat komponenty. V Delphi jinak pisu uz dva roky.
> Mam ale takove problemy jako:
> - ze se mi nezavola constructor komponenty, ve kterem creatuji pole
> TList nezbytna pro beh i v design modu
> - ze nejsem schopen do comboboxu (v ObjectInspectoru) property
> FieldName: String vyplnit vsechna pole nejakeho Datasetu, aby si mohl
> designer vybrat, jako je tomu napr. u property TDBEdit.DataField: String
>
> Zda se mi, ze jsem si neco neprecetl, ale v helpu ani ve zdrojacich jsem
> odpoved nenasel. Neodkazete me, prosim, na nejake obsaznejsi dokumenty o
> vyvoji komponent?
Ahoj,
No, to mas tezke. Asi nejlepsim zdrojem informaci jsou prave zdrojaky VCL,
pripadne dalsich komponent kterych mas plny Internet. Pak uz ti nezbyva nic
jineho nez vlastni tvorba.
K tem dotazum, ohledne toho prvniho, constructor komponenty se ti prece vola
vzdy. K tomu druhemu, nepises jako mas verzi Delphi, ale upozornil jsi tim na
jednu vec ktere take moc nerozumim. Pokud pojmenujes svoji vlastnost DataField
a bude typu string, tak pro ni je jiz zaregistrovan property editor ktery to
zaridi. Je napsan tak, ze hleda u komponenty vlastnost DataSource a pokud ji
najde tak pomoci DataSource.DataSet.GetFieldNames(List) vyplni seznam ktery ti
pak nabizi Object Inspector.
Jenze, tuto skutecnost si muzes overit v Delphi 2, kde mas zdrojaky property
editoru a registrace - DBREG.PAS, ale u Delphi 4 jsem nic takoveho nenasel.
Navic to neni ani popsane nikde v helpu, jedna se o TDataFieldProperty. Znamena
to snad, ze ti co maji D4 se ani nemohou podivat jak je tento property editor
napsany ? To je velmi zvlastni, hledal jsem vyskyt tohoto retezce v adresarich
Delphi, a u D2 jsem jej nasel ve vyse zminenem zdrojaku, ale v D4 jen v .bpl a
.dcp souboru.
--
Petr Vones, amatersky programator
QR + nastaveni tiskarny
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 03.10.1998 19:04:47
Ivo Herles wrote:
>
> Ahoj,
>
> mam takovy drobny problemek s nastavenim tiskarny v QR.
>
> Chtel bych si nekde v programu prednastavit tiskarnu a pote toto nastaveni
> pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy to
> bralo defaultni tiskarnu s defaultnim nastavenim.
Ahoj,
Tusim ze v nejake verzi QR byla prave tato chyba. Podivej se na jejich stranku
a stahni si nejnovejsi update.
--
Petr Vones, amatersky programator
Delphi programy - zrout pameti
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 3.10.1998 19:55:59
> neviem teda co to je working set - v taskmanagere sa da celkom
> dobre orientovat podla MemUsage v zalozke Processes -
> ak tam taky stlpec nevidis, v menu "View|Select columns" si mozes
> nastavit, ktore veci chces o jednotlivych procesoch vediet
Jo spatne sem se vyjadril - Working Set je to pojmenovany ve vsech ostatnich
analyzatorech jako pview, pviewer atd ..... v task manageru je to prave ten
sloupec MemUsage - takze vse co sem napsal plati pro to MemUsage - vcetne
toho ze je to podle me velmi zavadejici udaj ....
McLEI
disketa - Driveready
[*] Antonin Blatny <trest(zv)cesnet(tec)cz> - 3.10.1998 21:22:38
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Ahoj vsichni,
pred par dny se tady mluvilo na podobne tema, ale presto se ptam jeste vice konkretneji. Potreboval bych ve W95 a D2 pomoci nejake funkce rozlisit pripady, kdy:
a) v disketove jednotce neni disketa
b) v jednotce sice disketa je, ale neni naformatovana.
V uvedenych pripadech se funkce jako DirectoryExists chovaji stejne. Existuje nejaka blize urcujici chybova zprava?
Diky za pomoc.
Tonda.
Mgr. Anton�n Blatn�
trest(zv)cesnet(tec)cz
Synchronizace pristupu k cizim souborum
[*] Ing. Zdenek Sraier <sraierzd(zv)czn(tec)cz> - 3.10.1998 23:35:38
> Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere je
> mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
>
> Pokud jste se procetli az sem a neco Vas napada, prosim nevahejte a ozvete
> se. Budu vdecny za jakykoliv navrh.
>
>
> S pozdravem
>
> Milos Koutny
> kou20um(zv)fpf.slu(tec)cz
>
Zabyval jsem se podobnym problemem pred nejakou dobou.
Napadaji me tri reseni:
1. Jiz zminovane okopirovani zdrojoveho souboru
2. Pokud program ZDROJ soubor vzdy vytvari, bylo
by jeste rychlejsi zdrojovy soubor jenom prejmenovat.
3. Umistit soubory na Novella, a GENERATORu dat jenom prava na cteni,
tako varianta se osvedcila me.
S pozdravem Zdenek
--------------------------------------- E-Mail -------------------------
| Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne) |
| o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv) |
| ( o o) |--------------------- WWW --------------------------|
| (. .) | http://users(tec)czn(tec)cz/~sraierzd/ |
------------------------------------------------------------------------
| WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/ |
------------------------------------------------------------------------
QReport + DBMemo
[*] info(zv)saton(tec)cz (SATON Glass s.r.o.) - 3.10.1998 23:44:32
Zdravim,
uz jsem se parkrat ptal, ale musim se zeptat znovu, protoze se mi jeste
nepodarilo najit odpoved.
Mam QReportu 2.0k a D1. Chci tisknout DBMemo velke na 3 a vice stran. Pri
Preview se vse zobrazuje jak ma (hlavicka strany, memo, zapati), ale pri
tisku se memo rozleze az do uplneho konce strany ignorujice pri sve
rozpinavosti zapati. A ne ze by se zapati nesnazilo! To je tam taky. Jenze
tim padem je konec strany uplne necitelny.
Predem diky za kazdou informaci (i tu malilinkatou). Urcite vsichni
pochopite jak je tezke vysvetlovat zakaznikum ze hlavni bod jejich
zakoupeneho programu - tisk - nejede
(((((((((((((((
Lubomir Kupka
-------------------------------------------------------------------------------------------------------------
SATON Glass, s.r.o. - slu�by v oblasti programov�n� a v�po�etn� techniky
Klicperova 26, Brno, 628 00 �R
Tel.:+420 5 44217819 Fax.:+420 5 44217529
Mob:+420 603 429505
mail: info(zv)saton(tec)cz ICQ : 4747183
-------------------------------------------------------------------------------------------------------------
Spusteni jineho programu
[*] Hubert <mneu3246(zv)ss1000.ms.mff.cuni(tec)cz> - 3.10.1998 23:59:19
MP> Da se nejak udelat, aby program (v D2) spustil jiny program (jedna se mi
MP> o WinAMP) a jako parametr mu predal nazev souboru, ktery se ma otevrit
MP> (prehrat?). Ten nazev souboru by mohl byt fixni, natvrdo zapsany do
MP> zdrojaku.
MP> Jestli nekdo neco takoveho delal, diky predm za informaci.
No ja bych se chtel pripojit a potreboval bych jeste neco navic.
Potrebuju spustit 16-bit DOS aplikaci a pockat si az skonci. Po
skonceni potrebuju zjiskat navratovy kod aplikace. (Jelikoz spoustim
LHA neni treba nejaka komponenta jez umi LHA)?
Diky
None
[*] Hubert <mneu3246(zv)ss1000.ms.mff.cuni(tec)cz> - 4.10.1998 00:02:08
MF> Vedla seba, nieco ako dotaz v Accese. Napr mam jednu tabulku kde je polozka
MF> cislo cloveka a polozka telefon.
MF> V druhej tabulke je polozka cislo cloveka a meno.
MF> A ja chcem GRID kde budu vedla seba polozky napr. cislo cloveka, telefon a
MF> meno. A chcem aby sa vsetky polozky dali editovat a podla moznosti aby to
MF> bolo cez komponentu table, ak sa to neda tak cez SQL.
Zkus SQL:
SELECT TABLE1.*, TABLE2.*
FROM TABLE1 INNER JOIN TABLE2 ON TABLE1.CISLOCLOVEKA = TABLE2.CISLOCLOVEKA
Spusteni jineho programu
[*] Milan Sorm <xsorm(zv)informatics.muni(tec)cz> - 4.10.1998 01:51:57
Hubert Tue, Nov 03, 1998 at 11:59:19PM +0100 pise:
> skonceni potrebuju zjiskat navratovy kod aplikace. (Jelikoz spoustim
> LHA neni treba nejaka komponenta jez umi LHA)?
>
> Diky
>
na CD Svet Delphi dodavanem s Delphi 2 nebo 3 jich bylo dokonce nekolik.
ms.
-------------------------------------------------------------
Milan Sorm (aka John Popelnik) telefon: +420 5 41512348
FI MU, Botanicka 68a, Brno sorm(zv)informatics.muni(tec)cz
http://www.fi.muni(tec)cz/~sorm/ tel. domu: (05) 46211083
fingerprint: E4 78 1D A7 C5 2C F5 3F 83 A7 97 29 73 F7 17 63
Synchronizace pristupu k cizim souborum
[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 4.10.1998 06:28:06
Nedovedu si predstavit, jak by se pri cteni TEXTOVEHO souboru jednim
programem do nej dalo druhym programem zapisovat.
Prejmenovani mi pripada nejrychlejsi (rozhodne rychlejsi nez kopirovani) a
nejrozumejsi.
-----------------------------------------------------------------
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o.
INFOS - informacn� system pro n�poj�re
---------------------------------------------------------------
-----P�vodn� zpr�va-----
Od: Kolar Lubor <LuborK(zv)tnet(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 3. listopadu 1998 19:30
P�edm�t: Re: Synchronizace pristupu k cizim souborum
Generator, nikoliv Generator a Zdroj) Generatorem otevrit jako sdileny
pro cteni, tim padem by pro ostatni aplikace mel byt jako sdileny pro
cteni/zapis. Mozna by tam byla nutna podpora ze Zdroje, aby ten soubor
oteviral jako Shared Write...
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772
Synchronizace pristupu k cizim souborum
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 4.10.1998 07:03:41
> siry a dusiku v ovzdusi, mnozstvi ozonu apod.). Tato data se v 30-ti
> minutovych intervalech se stahuji na jeden pocitac, ktery je pomoci
> specialniho programu (oznacme ho Zdroj) zpracuje. Vystupem jsou textove
> soubory. Pro kazdy den jeden, tzn. kazdy se 48x aktualizuje.
Nazdar,
nepises v akych intervaloch Zdroj zpracuje data. Ak je v tom nejaka
pravidelnost,
mozno by islo orientovat sa podla datumu vytvorenia txt suboru. Napr.
priblizne
predpokladat cas jeho dalsej moznej zmeny a v tomto case (+-5 minut) tento
subor necitat. Alebo dovolit citanie iba ak txt subor nie je starsi ako
urceny cas
(15 minut). Alebo nejaka ina synchronizacia do tych 30 minutovych
intervalov.
Marek Repisky
mrepisky_zl(zv)zsnp.sk
Ukonceni cizi aplikace
[*] Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz> - 4.10.1998 07:58:20
Nevite nekdo, jak ukoncit z me aplikace (v D4) ukoncit jinou aplikaci?
Pavel Hojda
Skroupova 5
305 84 Plzen
tel.: 019/7035054
hojda(zv)mmp.plzen.city(tec)cz
Delphi programy - zrout pameti
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 4.10.1998 08:10:17
Hi,
working set ale existuje, viz API WIN32....
The working set of a process is the set of memory pages currently
visible to the process in physical RAM memory. These pages are resident
and available for an application to use without triggering a page fault.
The size of the working set of a process is specified in bytes. The
minimum and maximum working set sizes affect the virtual memory paging
behavior of a process.
A je na to samozrejme funkce, ktera muze working set zmenit. Takze pokud
se ti to meni pri zmenseni, neni to zadna zahada......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Michal Leinweber [SMTP:M.Leinweber(zv)sh.cvut(tec)cz]
> Odesl�no: 03. listopadu 1998 19:56
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Delphi programy - zrout pameti
>
> > neviem teda co to je working set - v taskmanagere sa da celkom
> > dobre orientovat podla MemUsage v zalozke Processes -
> > ak tam taky stlpec nevidis, v menu "View|Select columns" si mozes
> > nastavit, ktore veci chces o jednotlivych procesoch vediet
>
> Jo spatne sem se vyjadril - Working Set je to pojmenovany ve vsech
> ostatnich
> analyzatorech jako pview, pviewer atd ..... v task manageru je to
> prave ten
> sloupec MemUsage - takze vse co sem napsal plati pro to MemUsage -
> vcetne
> toho ze je to podle me velmi zavadejici udaj ....
>
> McLEI
ShellExecute, ShellExecuteEx
[*] Ing. Miroslav Ond��ek <bonnel(zv)telecom(tec)cz> - 4.10.1998 08:20:16
Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3 zavolat
default mail klienta
ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil, SW_SHOWNORMAL)
Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional) odmitaji tuto
funkci jako neznamy prikaz (undeclared identifier), stejne jako
ShellExecuteEx. Obe funkce jsou pritom popisovany ve Win32Api.HLP a ostatni
API volani (napr messageDlg apod.) projdou bez problemu.
Na vyse zminene funkce nejde ani CodeCompletion a ParametersCompletion.
Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
V cem delam chybu ?
Diky za pripadne odpovedi.
S pozdravem
Ing. Miroslav Ond��ek
Bonnel Technologie, s.r.o.
E-mail:
bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
internet: http://www.bonnel-tech.com
PGP podporov�no - ve�ejn� kl�� na na�� homepage
Synchronizace pristupu k cizim souborum
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 4.10.1998 08:24:18
Myslim, ze by se na to mohlo jit jeste i z jine strany.
Coz takhle tu cizi APP spoustet az z APP GENERATOR pouzitim funkce
CreateProcess a pak bych pozil zde zminene prejmenovani (ci okopirovani
souboru), pred kterym bych snizil prioritu zpracovani cizi APP na IDLE
pomoci SetPriorityClass.Pote opet zmenit na NORMAL.
Melo by to mit za nasledek, ze cizi APP nebude po dobu sveho procesu v
IDLE vykonavat zadnou cinnost (idealni by bylo SUSPEND, ale to neni k
dispozici)
Mozna by tato kombinace priorit a souborovych operaci mohla
pomoct........
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Ing. Zdenek Sraier [SMTP:sraierzd(zv)czn(tec)cz]
> Odesl�no: 03. listopadu 1998 23:36
> Komu: konference DELPHI
> P�edm�t: Re: Synchronizace pristupu k cizim souborum
>
> > Takze otazka zni, jakym zpusobem cist soubory jinych aplikaci, ktere
> je
> > mohou kdykoliv aktualizovat a nezpusobit tak jejich pad?
> >
> > Pokud jste se procetli az sem a neco Vas napada, prosim nevahejte a
> ozvete
> > se. Budu vdecny za jakykoliv navrh.
> >
> >
> > S pozdravem
> >
> > Milos Koutny
> > kou20um(zv)fpf.slu(tec)cz
> >
>
> Zabyval jsem se podobnym problemem pred nejakou dobou.
> Napadaji me tri reseni:
>
> 1. Jiz zminovane okopirovani zdrojoveho souboru
>
> 2. Pokud program ZDROJ soubor vzdy vytvari, bylo
> by jeste rychlejsi zdrojovy soubor jenom prejmenovat.
>
> 3. Umistit soubory na Novella, a GENERATORu dat jenom prava na cteni,
> tako varianta se osvedcila me.
>
>
> S pozdravem Zdenek
> --------------------------------------- E-Mail
> -------------------------
> | Zdenek Sraier | sraierzd(zv)czn(tec)cz (jednou denne)
> |
> | o__o | zdenek.sraier(zv)sms.paegas(tec)cz (max 160 zn. kdykoliv)
> |
> | ( o o) |--------------------- WWW
> --------------------------|
> | (. .) | http://users(tec)czn(tec)cz/~sraierzd/
> |
> ----------------------------------------------------------------------
> --
> | WWW Stranky Potapecske (SP) HTTP://www.byll(tec)cz/scuba/
> |
> ----------------------------------------------------------------------
> --
QReport + DBMemo
[*] user <TYSLIC(zv)vsps-su(tec)cz> - 4.10.1998 08:56:00
Nevim jestli Ti to pomuze, ale kdysi jsem mel take problemy s DBMemo
a resil jsem to tak, ze jsem na formular umistil QRDBLabel (nebo
jak se jmenuje) a u neho jsem nastavil vlastnost AutoSize a Strech na
true a vim ze jsem byl maximalne spokojeny. No za zkousku nic nedas,
doma se jeste jednou podivam jak jsem to presne resil, ted u sebe
nemam Delphi.
Hi Jirka
ShellExecute, ShellExecuteEx
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 4.10.1998 09:06:52
No jo, to ale taky musis vedet ve ktere unite jsou api funkce
deklarovany. Tyhle jsou v ShellAPI - tak to musis pridat do uses.
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
> -----P�vodn� zpr�va-----
> Od: Ing. Miroslav Ondxm9ek [SMTP:bonnel(zv)telecom(tec)cz]
> Odesl�no: 4. November 1998 08:20
> Komu: Delphi konference
> P�edm�t: ShellExecute, ShellExecuteEx
>
> Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3
> zavolat
> default mail klienta
>
> ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil,
> SW_SHOWNORMAL)
>
> Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional) odmitaji
> tuto
> funkci jako neznamy prikaz (undeclared identifier), stejne jako
> ShellExecuteEx. Obe funkce jsou pritom popisovany ve Win32Api.HLP a
> ostatni
> API volani (napr messageDlg apod.) projdou bez problemu.
> Na vyse zminene funkce nejde ani CodeCompletion a
> ParametersCompletion.
> Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
> V cem delam chybu ?
> Diky za pripadne odpovedi.
> S pozdravem
> Ing. Miroslav Ond��ek
> Bonnel Technologie, s.r.o.
>
> E-mail:
> bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
>
> internet: http://www.bonnel-tech.com
> PGP podporov�no - ve�ejn� kl�� na na�� homepage
>
> ShellExecute, ShellExecuteEx
[*] rado(zv)nnsk.sk - 4.10.1998 09:14:59
>Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3 zavolat
>default mail klienta
>
>ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil,
>SW_SHOWNORMAL)
>
[del]
>Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
>V cem delam chybu ?
>Diky za pripadne odpovedi.
Shus dat
uses ShellAPI;
Skusal som pod D 3.02
potom zavolas
ShellExecute(0, nil, ObjectPath, nil, nil, SW_NORMAL);
kde ObjectPath je trebars to tvoje mailto:adresa(zv)neco(tec)cz
(Pozor, je to PChar :-))
Zdravim,
Rado Benc
http://www.angelfire.com/me/BencRado
ShellExecute, ShellExecuteEx
[*] Daniel SICHTA <Sichta(zv)asset.sk> - 4.10.1998 09:16:24
Podla toho co si napisal tak tam mas privela parametrov !!!
HINSTANCE ShellExecute(
HWND hwnd, // handle to parent window
LPCTSTR lpOperation, // pointer to string that specifies
operation to perform
LPCTSTR lpFile, // pointer to filename string
LPTSTR lpParameters, // pointer to string that specifies
executable-file parameters
LPCTSTR lpDirectory, // pointer to string that specifies
default directory
INT nShowCmd // whether file is shown when opened
);
Ing. Daniel �ICHTA
* sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> -----Original Message-----
From: Ing. Miroslav Ondxm9ek [SMTP:bonnel(zv)telecom(tec)cz]
Sent: 4. november 1998 8:20
To: Delphi konference
Subject: ShellExecute, ShellExecuteEx
Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3
zavolat
default mail klienta
ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil,
SW_SHOWNORMAL)
Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional)
odmitaji tuto
funkci jako neznamy prikaz (undeclared identifier), stejne jako
ShellExecuteEx. Obe funkce jsou pritom popisovany ve
Win32Api.HLP a ostatni
API volani (napr messageDlg apod.) projdou bez problemu.
Na vyse zminene funkce nejde ani CodeCompletion a
ParametersCompletion.
Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
V cem delam chybu ?
Diky za pripadne odpovedi.
S pozdravem
Ing. Miroslav Ond��ek
Bonnel Technologie, s.r.o.
E-mail:
bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
internet: http://www.bonnel-tech.com
PGP podporov�no - ve�ejn� kl�� na na�� homepage
Ukonceni cizi aplikace
[*] David Navara <sky(zv)kolej.mff.cuni(tec)cz> - 4.10.1998 09:18:02
On Wed, 4 Nov 1998, Hojda Pavel wrote:
> Nevite nekdo, jak ukoncit z me aplikace (v D4) ukoncit jinou aplikaci?
>
> Pavel Hojda
Myslim, ze pokud nejak zjistis handle jejiho hlavniho okna, muzes tomu
hlavnimu oknu poslat WM_Close zpravu, ktera se ho pokusi zavrit (a treba
se to pak zepta na ulozit soubor?). Natvrdo zavirat be se snad dat nemelo.
David Navara
Delphi programy - zrout pameti
[*] David Navara <sky(zv)kolej.mff.cuni(tec)cz> - 4.10.1998 09:21:40
On Wed, 4 Nov 1998, [iso-8859-2] Martin Fron�k wrote:
> The working set of a process is the set of memory pages currently
> visible to the process in physical RAM memory. These pages are resident
> and available for an application to use without triggering a page fault.
> The size of the working set of a process is specified in bytes. The
> minimum and maximum working set sizes affect the virtual memory paging
> behavior of a process.
>
> Martin Fron�k
Zda se mi tedy, ze 'working set' jsou pak ty stranky virtualni pameti,
ktere jsou momentalne ve fyzicke RAM (ostatni stranky jsou na disku). A
pri minimalizaci okna se ocekava necinnost a system asi vyswapuje
RAM zbytecne blokovanou timto procesem.
David Navara
ShellExecute, ShellExecuteEx
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 4.10.1998 09:39:31
> Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3 zavolat
> default mail klienta
>
> ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil, SW_SHOWNORMAL)
>
> Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional) odmitaji tuto
> funkci jako neznamy prikaz (undeclared identifier), stejne jako
> ShellExecuteEx. Obe funkce jsou pritom popisovany ve Win32Api.HLP a ostatni
> API volani (napr messageDlg apod.) projdou bez problemu.
> Na vyse zminene funkce nejde ani CodeCompletion a ParametersCompletion.
> Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
> V cem delam chybu ?
A co takhle zkusit treba pridat nasledujici radek?
uses ShellApi
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917
ShellExecute, ShellExecuteEx
[*] Ing. Daniel Ficek <ficek(zv)hstech(tec)cz> - 04.10.1998 09:44:50
A mas v uses ShellAPI ?
Ing. Daniel Ficek
"Ing. Miroslav Ond��ek" wrote:
> Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3 zavolat
> default mail klienta
>
> ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil, SW_SHOWNORMAL)
>
> Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional) odmitaji tuto
> funkci jako neznamy prikaz (undeclared identifier), stejne jako
> ShellExecuteEx. Obe funkce jsou pritom popisovany ve Win32Api.HLP a ostatni
> API volani (napr messageDlg apod.) projdou bez problemu.
> Na vyse zminene funkce nejde ani CodeCompletion a ParametersCompletion.
> Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
> V cem delam chybu ?
> Diky za pripadne odpovedi.
> S pozdravem
> Ing. Miroslav Ond��ek
> Bonnel Technologie, s.r.o.
>
> E-mail:
> bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
>
> internet: http://www.bonnel-tech.com
> PGP podporov�no - ve�ejn� kl�� na na�� homepage
Sprava projektu
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 4.10.1998 10:03:05
Dik za upozorneni na PVCS, ale po dvou hodinach zkouseni (ktery programator
by cetl manual natoz help :-))) ) se mi nepodarilo zjistit (ani po te co
jsem se snizil k cinnosti obsazene v predchazejici zavorce), jak je to se
spravou projektu vice lidmi, kdo je ten kdo urcuje komu a k cemu dovoli
pristup atd.. Je to vubec v PVCS mozne? V opacnem pripade nechapu nadseni
uzivatele tohoto softu Lubose Dusanice. Co je nebe a co dudy? Dle mne je
PVCS nedoresene, rad se necham presvedcit o opaku. PVCS mam v CS verzi a
about 19k penez za MVSS se da take vyuzit jinak, ze? ;-))) Predem dik za
namety.
M&B
QR + nastaveni tiskarny
[*] Ivo Herles <ivo.herles(zv)pvt(tec)cz> - 4.10.1998 10:05:26
K podobnemu zaveru jsem take dospel. Bohuzel problem je jeste v necem jinem.
Nastinim situaci. Mam QR 2.0k, Delphi 3 C/S, Win NT WS 4.0 + SP3, dale mam
nainstalovane 2 tiskarny (0 - sitova, 1 - lokalni poskutnuta pro
sdileni-defaultni).
A ted problem:
Pokud zvolim PrinterIndex=0 (sitova), vse je OK. Ale pod zvolim 1
(lokalni-default) a neni v Printers 2x rve to pri tisku "Printer out of
index" vezme to pouze PrinterIndex=-1. Navic pokud se po vyberu tiskarny
podivam na Printers.Printer.PrinterIndex tak vraci PrinterIndex>1, pokud je
v Printers vybrana z tiskaren uvedena 2x. Pro vyber a nastaveni tiskarny
pouzivam standardni dialog (TPrintDlg, TPrinterSetupDlg).
S pozdravem,
Ivo HERLES
PVT, a. s., o. z. Chomutov
e-Mail: ivo.herles(zv)pvt(tec)cz
tel.: 0396/619216
NetMeeting: p53aph.chv.pvt(tec)cz
-----P�vodn� zpr�va-----
Od: Stepan Cerny <chaosz(zv)geocities.com>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 3. listopadu 1998 13:45
P�edm�t: Re: QR + nastaveni tiskarny
>pred nejakym casem jsem psal uzivatelsky preview, a resil jsem to nejak
>taghle:
>
>TQReport.BeforePrint
> ...
> ...
> // tiskarna, PrinterSettings = objekt reportu
> PrinterSettings.PrinterIndex := Printers.Printer.PrinterIndex;
> // pocet kopii
> PrinterSettings.Copies := Printers.Printer.Copies;
> // velikost papiru
> Height := Printers.Printer.PageHeight;
> Width := Printers.Printer.PageWidth;
> // orientace papiru
> Page.Orientation := Printers.Printer.Orientation;
> ...
> ...
>end;
>
>Nastaveni tiskarny v preview
> if PrinterSetup.Execute then QReport.Preview;
>
>Ivo Herles wrote:
>>
>> Ahoj,
>>
>> mam takovy drobny problemek s nastavenim tiskarny v QR.
>>
>> Chtel bych si nekde v programu prednastavit tiskarnu a pote toto
nastaveni
>> pouzit pri tisku (prohlizeni) reportu. Delal jsem ruzne pokusy, ale vzdy
to
>> bralo defaultni tiskarnu s defaultnim nastavenim.
ShellExecute, ShellExecuteEx
[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 4.10.1998 10:07:10
> Dodnes jsem zil v tom, ze nasledujicim prikazem mohu z Delphi 3 zavolat
> default mail klienta
> ShellExecute(Handle, nil, 'mailto:adresa(zv)neco(tec)cz', nil, nil,
SW_SHOWNORMAL)
> Ovsem jake bylo me prekvapeni, kdyz Delphi 3 (Professional) odmitaji tuto
> funkci jako neznamy prikaz (undeclared identifier), stejne jako
> ShellExecuteEx. Obe funkce jsou pritom popisovany ve Win32Api.HLP a
ostatni
> API volani (napr messageDlg apod.) projdou bez problemu.
> Na vyse zminene funkce nejde ani CodeCompletion a ParametersCompletion.
> Proste se D3 chovaji, jako by tyto API funkce neexistovaly.
Nazdar,
skus si do USES dopisat >> ShellAPI << ;)
Marek Repisky
mrepisky_zl(zv)zsnp.sk
QReport + DBMemo
[*] Radek KALA <delphi(zv)betacontrol(tec)cz> - 4.10.1998 10:34:45
From: "user" <TYSLIC(zv)vsps-su(tec)cz>
Organization: VOS a SPS Sumperk
To: delphi-l(zv)fwd(tec)cz
Date sent: Wed, 4 Nov 1998 08:56:00 +0000
Subject: Re: QReport + DBMemo
Send reply to: delphi-l(zv)fwd(tec)cz
Tak jsem to delal v DELPHI 2, ale v D4 s QR 3.03 to asi uz nejde.
Diky za znahu, snad se jeste nekdo ozve.
> Nevim jestli Ti to pomuze, ale kdysi jsem mel take problemy s DBMemo
> a resil jsem to tak, ze jsem na formular umistil QRDBLabel (nebo
> jak se jmenuje) a u neho jsem nastavil vlastnost AutoSize a Strech na
> true a vim ze jsem byl maximalne spokojeny. No za zkousku nic nedas,
> doma se jeste jednou podivam jak jsem to presne resil, ted u sebe
> nemam Delphi.
>
> Hi Jirka
>
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Mostecka 15, 614 00
tlf. : + 420 5 4532 1112 / 2413
fax : + 420 5 4521 1501
GSM : + 420 603 85 75 15
ShellExecute
[*] Ing. Miroslav Ond��ek <bonnel(zv)telecom(tec)cz> - 4.10.1998 10:47:54
Tak jo, jsem slepy jako patrona, ShellAPI je to spravne.
Diky moc, zas si jednou pripadam jako pitomec :-)
Ing. Miroslav Ond��ek
Bonnel Technologie, s.r.o.
E-mail:
bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
internet: http://www.bonnel-tech.com
PGP podporov�no - ve�ejn� kl�� na na�� homepage
Viditelnost formulare
[*] Michal ��ek����֫Ŭ?��e���n� - 4.10.1998 11:06:31
Zdravim
setkal jsem se prave se zajimavim problemem (chybickou ) v Delphi 4.
(nevim jak v nizsich verzich )
Vykonavam v programu casove narocnejsi operaci a pro zobrazeni
jejiho prubehu jsem si vytvoril jakysi ProgressForm. Problem vznika v
okamziku kdy minimalizuji aplikaci (MainForm) >> zmizi i ProgressForm ale
pokud
v okamziku kdy je MainForm minimalizovan zavolam ProgressForm.Close
nastavi se ProgressForm.Visible na False !! ALE !! pri obnoveni MainFormu se
obnovi i ProgressForm i kdyz ma vlastnost Visible=False.... >> zkratka
vznikne
viditelne okno s vlastnosti VISIBLE = FALSE.
Jedine co funguje je formular misto schovavani rusit a pak znovu vytvaret
... ale to
se mi nelibi.
Poradi mi nekdo ze zkusenejsich jak tuhle chybicku obejit ?
student Michal Cizek <starxax(zv)molly.vabo(tec)cz>
UIN : 2460214
HP : http://freeweb.coco(tec)cz/starxax
Vyvijeni komponent + Co nam Inprise taji ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.10.1998 11:12:37
Petr Vones wrote:
> David Navara wrote:
> > Pred tydnem jsem zacal psat komponenty. V Delphi jinak pisu uz dva
> > roky.
> > Mam ale takove problemy jako:
> > - ze se mi nezavola constructor komponenty, ve kterem creatuji pole
> > TList nezbytna pro beh i v design modu
> > - ze nejsem schopen do comboboxu (v ObjectInspectoru) property
> > FieldName: String vyplnit vsechna pole nejakeho Datasetu, aby si mohl
> > designer vybrat, jako je tomu napr. u property TDBEdit.DataField: String
>
> K tem dotazum, ohledne toho prvniho, constructor komponenty se ti prece
Je mozne, ze zapomnel napsat inherited Create...
> vola vzdy. K tomu druhemu, nepises jako mas verzi Delphi, ale upozornil
> jsi tim na jednu vec ktere take moc nerozumim. Pokud pojmenujes svoji
> vlastnost DataField a bude typu string, tak pro ni je jiz zaregistrovan
> property editor ktery to zaridi. Je napsan tak, ze hleda u komponenty
> vlastnost DataSource a pokud ji najde tak pomoci
> DataSource.DataSet.GetFieldNames(List) vyplni seznam ktery ti pak nabizi
> Object Inspector.
A co takhle zkusit deklaraci DataField:TDataSource?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Blikajici text
[*] TP+ <tpplus(zv)zasova(tec)cz> - 4.10.1998 12:29:40
Nazdarek,
rad bych se zeptal, jak udelat "blikajici" text (ekvivalent stareho "blink"
z pascalu).
Diky
Baluch
TP+Align v TEdit (Was:Dotaz)
[*] kelleon(zv)nnsk.sk - 4.10.1998 12:41:22
> -----Original Message-----
> > Mam drobny problem. V komponente TEdit bych chtel, aby se mi text
> > zarovnaval k pravemu okraji a jaksi tam postradam vlastnost Align.
> > Znate-li nekdo reseni byl bych vam za nej vdecny.
> >
> > J. Pospisil
> Problem je ze standartni ovl.prvek EDIT ve Windows
> nepodporuje zarovnanani
> v jednoradkovem rezimu. Urcita moznost je pouzit neco
> podobneho jako je
> treba TCurrencyEdit v RxLib kde sice pri editaci je text
> zleva doprava,
> ale po opusteni se zarovna doprava.
Tiez som cital vo Win32.hlp, ze ES_RIGHT atd. su platne len pre multiline
edit controls. Mam vsak napisany podobny komponent (je to currency edit) a
div sa svete, chodi to.
type
TMyEdit = class(TCustomEdit)
private
{ Private declarations }
FAlignment: TAlignment;
procedure SetAlignment(Value: TAlignment);
...
protected
{ Protected declarations }
procedure CreateParams(var Params: TCreateParams); override;
...
published
{ Published declarations }
property Alignment: TAlignment read FAlignment write SetAlignment;
...
end;
implementation
...
procedure TMyEdit.SetAlignment(Value: TAlignment);
begin
if FAlignment <> Value then
begin
FAlignment := Value;
RecreateWnd;
end;
end;
procedure TMyEdit.CreateParams(var Params: TCreateParams);
const
Alignments : array[TAlignment] of Longint = (ES_LEFT, ES_RIGHT,
ES_CENTER);
begin
inherited CreateParams(Params);
Params.Style := Params.Style or Alignments[FAlignment];
end;
Ondrej Kelle
kelleon(zv)nnsk.sk
Vyvijeni komponent + Co nam Inprise taji ?
[*] David Navara <dnav5337(zv)ss1000.ms.mff.cuni(tec)cz> - 4.10.1998 12:43:11
> Je mozne, ze zapomnel napsat inherited Create...
Ano, to jsem zapomnel. Jsem osel.
> > vlastnost DataSource a pokud ji najde tak pomoci
> > DataSource.DataSet.GetFieldNames(List) vyplni seznam ktery ti pak nabizi
> > Object Inspector.
To je presne, co jsem hledal. Ale nejak mi ze zdrojaku nedoslo, KTERA
funkce VYPLNI seznam, ktery pak nabizi ObjInspector. Nebo jak se
registruji property editory?
>
> A co takhle zkusit deklaraci DataField:TDataSource?
>
To neni, co chci. Je fakt, ze kdyz definujes 'property Editka: TEdit',
tak ti automaticky nabidne vsechny TEdity formulare. Ale ja si chci delat
uplne obecnou property a pouze jsem poukazal, ze DataField je String a
presto to nejak funguje.
Diky David Navara
ssh komponenta
[*] Milan Sorm <xsorm(zv)informatics.muni(tec)cz> - 4.10.1998 12:57:05
Chceme si na fakulte naportovat ssh do cestiny, avsak zdrojaky TTSSH jsou ve
Visual C, se kterym se neda pracovat. Proto jsem pojal myslenku, ze ssh
znovu naprogramuju v Delphi. Nechce se mi samozrejme programovat rozhrani k
ssh protokolu, proto shanim nejakou SSH komponentu pro Delphi nebo
C++Builder.
Nemate nekdo predstavu, kde by se neco takoveho dalo najit ? Uz to hledam
pres dva dny a prestava me to bavit.
Diky moc za ochotu
Milan Sorm
-------------------------------------------------------------
Milan Sorm (aka John Popelnik) telefon: +420 5 41512348
FI MU, Botanicka 68a, Brno sorm(zv)informatics.muni(tec)cz
http://www.fi.muni(tec)cz/~sorm/ tel. domu: (05) 46211083
fingerprint: E4 78 1D A7 C5 2C F5 3F 83 A7 97 29 73 F7 17 63
Sprava projektu
[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 04.10.1998 13:37:16
Martin Bab�k wrote:
> Dik za upozorneni na PVCS, ale po dvou hodinach zkouseni (ktery programator
> by cetl manual natoz help :-))) ) se mi nepodarilo zjistit (ani po te co
> jsem se snizil k cinnosti obsazene v predchazejici zavorce), jak je to se
> spravou projektu vice lidmi, kdo je ten kdo urcuje komu a k cemu dovoli
> pristup atd.. Je to vubec v PVCS mozne? V opacnem pripade nechapu nadseni
> uzivatele tohoto softu Lubose Dusanice. Co je nebe a co dudy? Dle mne je
> PVCS nedoresene, rad se necham presvedcit o opaku. PVCS mam v CS verzi a
> about 19k penez za MVSS se da take vyuzit jinak, ze? ;-))) Predem dik za
> namety.
>
> M&B
cau,
no hlavne by som si nezamienal pvcs s tym., co poskytuje delphi. v delphi je
iba niekolko funkcii z toho, co pvcs poskytuje.
1. samozrejme je mozna praca viacerych uzivatelov s pvcs - inak by to predsa
ani nemalo zmysel, kedze ten soft je urceny na spravu projektu a ten malokedy
tvori len jeden clovek (ak neberieme do uvahy aplikacie typu "hello word" :)) )
2. v pvcs je mozne vytvarat uzivatelov a zdruzovat ich do uzivtelskych skupin.
pre kazdu skupinu (uzivatela) je mozne nadefinovat pristupove prava - t.j. co
dany uzivatel smie s projektom robit. pri prihlaseni sa do pvcs potom uzivatel
uvidi v menu iba tie akcie, ktore ma povolene
3. identifikacia uzivatelov heslom je mozna niekolkymi sposobmi, ale v zasade
su najvyuzivanejsie 2 - prihlasovanie sa heslom a identifikacia sietou. pri
druhom sposobe je uzivatel automaticky identifikovany na zaklade svojho
prihlasenia sa do siete
4. uzivatelia, hesla a pristupy su zapisane v samostatnej pristupovej databaze,
ktora sa moze (nemusi) priradit k nejakemu projektu. to, co sa nachadza v
delphi cs vsak (zrejme ...) neobsahuje ziaden nastroj na spravu uzivatelov,
pretoze je to urcene len na lokalne pouzitie (imho).
5. najlepsim riesenim je stiahnut si z internetu (http://www.intersolv.com)
nejaku trial verziu pvcs a vyskusat si to vsetko na nej.
vot tak.
co sa tyka toho nadsenia :)). pracoval som na velkom projekte (>100 ludi), kde
sa vyuzival msss. v zakladnych rysoch poskytoval to, co pvcs, ale ... ale ked
som sa chcel vratit naspat a vytiahnut urcitu verziu (reviziu) projektu z
datumu x.y, nastavali problemy. uz vobec nehovorim o situacii, ked som
potreboval opravit tu verziu x.y. a vlozit ju do projektu na tom istom mieste
ako bocnu vetvu - napr. uzivatel hlasi chybu vo verzii 1.60 a ja uz vyvijam
verziu 1.71. ja potrebujem rychle opravit verziu 1.60 a dodat im (a vsetkym
ostatnym) verziu 1.06xxx - t.j. len patch tejto verzie. a potrebujem to
archivovat a viest o tom zaznamy a mat moznost vratit sa spat. alebo vytiahol
som si (check out) reviziu a robim na nej. uzivatel hlasi chybu programu a ja
viem, ze to je v tom module, ktory mam vytiahnuty, ale robil to niekto iny.
lenze ten "niekto" si tom nemoze vytiahnut a opravit; lebo ja mam reviziu
"locked". to mam moju reviziu vlozit do projektu nedorobenu? ... a tak dalej a
tak podobne. jednoducho msss je pekne farebny a ma priestorove ikony a ja
neviem co este, ale pvcs je jednoduchsi na ovladanie a poskytuje viacej
moznosti.
ps: mam silny pocit, ze pvcs lacnejsie nebude, skor naopak ... :(((
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
GetModuleUsage
[*] pacak(zv)pepa(tec)cz (PePa spol. s r.o. ) - 4.10.1998 13:38:51
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Ahoj,
m�m takov� probl�m.Pou�t�m extern� program p�es *.lnk pomoc� API funkce ShellExecute.
Pot�eboval bych,ale po�kat , a� se ten extern� program ukon��.Kdysi (D1) na to platila funkce
GetModuleUsage,ale v D3 u� nefuguje.Nev�te n�hodou n�kdo jak tuto funkci nahradit???
V n�pov�d� Win32 je u t�to funkce naps�no , �e se ji� nepou��v� - byla smaz�na.
D�ky v�em za pomoc.
Jirka Virt
Tisk obr�zku na klientovi
[*] Petr Bozek <bozek(zv)box(tec)cz> - 4.10.1998 13:50:44
Dobry den.
Potreboval bych poradit s nasledujicim problemem.
Mam na serveru bezici CGI exe, ktere vytvori obrazek a posle ho klientovi.
Potreboval bych, aby si klient mohl tento obrazek vytisknout.
Nevim, jestli pouzit ActiveX nebo jinou technologii.
Aplikace ma jet na IE 4.x
Pokud pouziji kod:
try
with Printer do
begin
BeginDoc; { start printing }
GLL_getView(session,Printer.canvas.Handle,W,H); // vykresli obrazek na
zadane HDC
EndDoc; { finish printing }
end;
except
writeln('Tisk nejede.');
end;
tisk probehne pouze na tiskarne pripojene k serveru.
Dekuji predem za vsechny podnety.
Petr Bozek
Blikajici text
[*] Dusanic Lubos <lubos(zv)iname(tec)com> - 04.10.1998 13:54:33
TP+ wrote:
> Nazdarek,
>
> rad bych se zeptal, jak udelat "blikajici" text (ekvivalent stareho "blink"
> z pascalu).
>
> Diky
> Baluch
> TP+
caves,
skus si zadefinovat novu komponentu odvodenu od tlabel a vytvorit si v nej
timer. na ontimer potom men farbu fontu komponenty - raz na farbu rodica
(hide), raz na vlastnu (show).
si myslim ...
--
lubos dusanic
mailto:lubos(zv)iname.com
http://www.geocities.com/SiliconValley/Haven/7613
Tisk obr�zku na klientovi
[*] Petr Bozek <bozek(zv)box(tec)cz> - 4.10.1998 13:57:48
Dobry den.
Potreboval bych poradit s nasledujicim problemem.
Mam na serveru bezici CGI exe, ktere vytvori obrazek a posle ho klientovi.
Potreboval bych, aby si klient mohl tento obrazek vytisknout.
Nevim, jestli pouzit ActiveX nebo jinou technologii.
Aplikace ma jet na IE 4.x
Pokud pouziji kod:
try
with Printer do
begin
BeginDoc; { start printing }
GLL_getView(session,Printer.canvas.Handle,W,H); //
vykresli obrazek na
zadane HDC
EndDoc; { finish printing }
end;
except
writeln('Tisk nejede.');
end;
tisk probehne pouze na tiskarne pripojene k serveru.
Dekuji predem za vsechny podnety.
Petr Bozek
Blikajici text
[*] Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 4.10.1998 14:06:29
Ahoj,
dej si na formular timer, nastav cas, spust ho a v obsluze OnTimer
napises:
Label1.Visible := not Label1.Visible;
Slavek
----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------------------------------------
On Wed, 4 Nov 1998, TP+ wrote:
> Nazdarek,
>
> rad bych se zeptal, jak udelat "blikajici" text (ekvivalent stareho "blink"
> z pascalu).
>
> Diky
> Baluch
> TP+
> QReport + DBMemo, reseni?
[*] info(zv)saton(tec)cz (SATON Glass s.r.o.) - 4.10.1998 14:11:45
Ono to ani jinak nejde. Tisknu to pres QRDBText. Rozdil je jen v tom, ze mam
nastaveny AutoSize na false, protoze v pripade true zatuhne pocitac. Asi se
mu nepodari to spocitat.
Ted jsem ale zjistil jinou vec. Programator, ktery to pachal, nacpal toto
memo do Bandu nastaveneho jako GroupHeader. Prehodil jsem to do Child tohoto
GroupHeadru a snad to funguje. Sice je stale rozdil poctu radku mezi Preview
a samotnou tiskovou sestavou, ale alespon se neprepisuje zapati. Vypada to,
ze to GroupHeader nezvlada.:-))
Jeste jednu otazku bych mel.
Zkousel jsem pouzit tisk jen vyberu stran, ale nic se nestalo. V helpu jsem
taky nenasel zadny odkaz na FirstPage a LastPage. Ma s tim nekdo zkusenosti?
Diky Lubomir Kupka
----------------------------------------------------------------------------
---------------------------------
SATON Glass, s.r.o. - sluzby v oblasti programov�n� a v�pocetn� techniky
Klicperova 26, Brno, 628 00 CR
Tel.:+420 5 44217819 Fax.:+420 5 44217529
Mob:+420 603 429505
mail: info(zv)saton(tec)cz ICQ :
4747183
----------------------------------------------------------------------------
---------------------------------
-----P�vodn� zpr�va-----
Od: user <TYSLIC(zv)vsps-su(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 4. listopadu 1998 9:18
P�edm�t: Re: QReport + DBMemo
Nevim jestli Ti to pomuze, ale kdysi jsem mel take problemy s DBMemo
a resil jsem to tak, ze jsem na formular umistil QRDBLabel (nebo
jak se jmenuje) a u neho jsem nastavil vlastnost AutoSize a Strech na
true a vim ze jsem byl maximalne spokojeny. No za zkousku nic nedas,
doma se jeste jednou podivam jak jsem to presne resil, ted u sebe
nemam Delphi.
Hi Jirka
Predefinovani funkce klaves
[*] Zdenek Haringer <milesoft(zv)mi.cesnet(tec)cz> - 4.10.1998 14:30:10
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Zdravim a prosim o radu.
Potreboval bych, aby kdyz uzivatel stiskne napr. na DBEditu sipku dolu,
misto tabulatoru, se presunul kurzor na nasledujici DBEdit. Zkousel jsem to
udelat pomoci funkce FindNextControl na udalosti OnKeyDown coz fungovalo,
ale problem je v tom, ze bych to takhle musel davat na vsechny DBEdity
formulare. Rovnez jsem se pokousel odvodit vlastni komponentu a v
constructoru priradit udalosti OnKeyDown
takovouto proceduru:
procedure TMyDBEdit.EditKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var W: TWinControl;
begin
if Key = 40 then
begin
W:=Sender as TWincontrol;
W:=FindNextControl(W,True,True,True);
end;
W.SetFocus;
end;
Problem je ale v tom, ze v tomto pripade FindNextControl stale vraci nil.
Nevite nekdo cim by to mohlo byt nebo neznate nejaky lepsi zpusob jak
predefinovat
funkci nejake klavesy?
Zden�k Haringer
Vyvijeni komponent + Co nam Inprise taji ?
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 4.10.1998 15:01:39
> funkce VYPLNI seznam, ktery pak nabizi ObjInspector. Nebo jak se
> registruji property editory?
>
.......
> To neni, co chci. Je fakt, ze kdyz definujes 'property Editka: TEdit',
> tak ti automaticky nabidne vsechny TEdity formulare. Ale ja si chci delat
> uplne obecnou property a pouze jsem poukazal, ze DataField je String a
> presto to nejak funguje.
RegisterPropertyEditor, viz treba
..\SOURCE\TOOLSAPI\dsgnintf.pas
Tom
Ukonceni cizi aplikace
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 4.10.1998 15:07:16
> Nevite nekdo, jak ukoncit z me aplikace (v D4) ukoncit jinou aplikaci?
{ H je handle cizi aplikace,
{ ziskam ho treba via FindWindow nebo z EnumerateWindows... }
PostMessage( H, WM_CLOSE, 0, 0 );
Samozrejme se to nepodari, pokud ta aplikace nedovoli zavrit okno
(kdyz na OnCloseQuery treba zobrazi dotaz, zda ulozit soubor etc.).
Tom
Viditelnost formulare
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 4.10.1998 15:09:19
> v okamziku kdy je MainForm minimalizovan zavolam ProgressForm.Close
> nastavi se ProgressForm.Visible na False !! ALE !! pri obnoveni MainFormu se
> obnovi i ProgressForm i kdyz ma vlastnost Visible=False.... >> zkratka
> vznikne
> viditelne okno s vlastnosti VISIBLE = FALSE.
A co treba
ProgressForm.OnShow:
begin
Hide
end;
??? Tom
>
> Jedine co funguje je formular misto schovavani rusit a pak znovu vytvaret
> ... ale to
> se mi nelibi.
>
> Poradi mi nekdo ze zkusenejsich jak tuhle chybicku obejit ?
>
>
> student Michal Cizek <starxax(zv)molly.vabo(tec)cz>
> UIN : 2460214
> HP : http://freeweb.coco(tec)cz/starxax
>
> QR + nastaveni tiskarny
[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 04.10.1998 15:26:31
Ahoj
ZG:- s tim jsem mel taky problem (zda se, ze v QR jich je mnohem vice - ale
nechci si stezovat, nic hezciho neznam).Stand. dialog jsem ale zavrhl, vyrobil
jsem si vlastni PrintersCombo, PageFrom, PageTo, Copies, ...
To Combo se da naplnit docela snadno. Pokud chces, mohu to zitra poslat, ted
musim letet domu.
Ivo Herles wrote:
> Pro vyber a nastaveni tiskarny pouzivam standardni dialog (TPrintDlg,
> TPrinterSetupDlg).
> Ivo HERLES
> PVT, a. s., o. z. Chomutov
> e-Mail: ivo.herles(zv)pvt(tec)cz
> tel.: 0396/619216
> NetMeeting: p53aph.chv.pvt(tec)cz
====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech Republic
tel.: ++420-48-53 96 563, ++420-48-611 24 01, ++420-48-611 24 02
fax.: ++420-48-611 24 03
http://www.ipl(tec)cz
__________________________________________________________
Privat: Borovy vrch 289, 460 14 Liberec 13, Czech Republic
tel.: ++420-48-51 246 15
====================================================
Predefinovani funkce klaves
[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 4.10.1998 15:33:34
Spis bys mel nastavit na formu keypreview na true a testovat klavesy
tam......
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Zdenek Haringer [SMTP:milesoft(zv)mi.cesnet(tec)cz]
> Odesl�no: 04. listopadu 1998 14:30
> Komu: Dellphi konference
> P�edm�t: Predefinovani funkce klaves
>
> Zdravim a prosim o radu.
> �
> Potreboval bych, aby kdyz uzivatel stiskne napr. na DBEditu sipku
> dolu,
> misto tabulatoru, se presunul kurzor na nasledujici DBEdit. Zkousel
> jsem to
> udelat pomoci funkce FindNextControl na udalosti OnKeyDown coz
> fungovalo,
> ale problem je v tom, ze bych to takhle musel davat na vsechny DBEdity
> formulare. Rovnez jsem se pokousel odvodit vlastni komponentu a v
> constructoru priradit udalosti OnKeyDown
> takovouto proceduru:
> �
> procedure TMyDBEdit.EditKeyDown(Sender: TObject; var Key: Word;
> ��������������� Shift: TShiftState);
> var W: TWinControl;
> begin
> ��� if Key = 40 then
> ��� begin
> ������ W:=Sender as TWincontrol;
> ������ W:=FindNextControl(W,True,True,True);
> ��� end;
> ��� W.SetFocus;
> end;
> �
> Problem je ale v tom, ze v tomto pripade FindNextControl stale vraci
> nil.
> Nevite nekdo cim by to mohlo byt nebo neznate nejaky lepsi zpusob jak
> predefinovat
> funkci nejake klavesy?
> �
> Zden�k Haringer
> Adresar DLL
[*] Va�k�� Martin <MVackar(zv)cpoj(tec)cz> - 4.10.1998 16:03:14
Prosim o radu, jak ve spustene DLL zjistit adresar, v nemz byla zavedena ?
Pouziti ParamStr(0) vyvola jmeno a cestu aplikace, ktera DLL zavedla, ale
nevrati adresar,
ze ktereho byla DLL zavedena.
Vyzkouseno v Delphi 3 vyvolano z casti Initialization modulu DLL.
Prosim o priklad s GetModuleHandle a GetModuleFileName.
Dekuji za odpoved. Jaro B.
jbenes(zv)cpoj(tec)cz
CreateBlobStream
[*] sula milos <crkstrobe(zv)geocities(tec)com> - 4.10.1998 16:17:45
Hi
potreboval bych poradit jak pouzivat fci CreateBlobStream
staci to nejak takto ?
Table1.Open;
Table1.Insert; //vlozi 1.zaznam
bs:=Table1.CreateBlobStream(Table1.FieldByName('BLOBF'),bmReadWrite);
bs.WriteBuffer(data,size);
Table.Post;
Table1.Insert; //vlozi 2.zaznam
bs:=Table1.CreateBlobStream(Table1.FieldByName('BLOBF'),bmReadWrite);
bs.WriteBuffer(data1,size1);
Table.Post;
Table.Close;
a nebo takto?:
Table1.Open;
bs:=Table1.CreateBlobStream(Table1.FieldByName('BLOBF'),bmReadWrite);
Table1.Insert; //vlozi 1.zaznam
bs.WriteBuffer(data,size);
Table.Post;
Table1.Insert; //vlozi 2.zaznam
bs.WriteBuffer(data1,size1);
Table.Post;
Table.Close;
a jak zrusim ten TStream?
staci zavolat bs.Destroy20
GetModuleUsage
[*] Vojtech Albrecht <supervisor(zv)unicontrols(tec)cz> - 4.10.1998 16:20:21
Podivej se na http://members.xoom.com/VASoftware/Vlastnit_tvorba.htm je
tam komponeta ktera to umi a je to Free
----------
Od: PePa spol. s r.o. [SMTP:pacak(zv)pepa(tec)cz]
Odesl�no: 4. listopadu 1998 13:38
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: GetModuleUsage
<<Soubor: ATT00005.txt>><<Soubor: ATT00006.html>>Sprava projektu
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 04.10.1998 17:40:13
Dusanic Lubos wrote:
> no neviem, ci su to zrovna "nejake money". asi ako pre koho.
Chtel jsem tim jen rict, ze to neni free a nevim kolik za to chteji ...
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================Ukonceni cizi aplikace
[*] V�clav Novotn� - 4.10.1998 18:41:59
Question:
How do I programmatically close another application?
Answer:
You can send the application a WM_QUIT message;
Example:
PostMessage(FindWindow(Nil, 'window caption'), WM_QUIT, 0, 0);
Where "window caption" is the caption of the window that you
are sending the message to.
Rada od Borlandu.
Venca
-----P�vodn� zpr�va-----
Od: Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz>
Komu: 'delphi(zv)pinknet(tec)cz' <delphi(zv)pinknet(tec)cz>
Datum: 4. listopadu 1998 8:15
P�edm�t: Ukonceni cizi aplikace
>Nevite nekdo, jak ukoncit z me aplikace (v D4) ukoncit jinou aplikaci?
>
>
>Pavel Hojda
>Skroupova 5
>305 84 Plzen
>tel.: 019/7035054
>hojda(zv)mmp.plzen.city(tec)cz
>Predefinovani funkce klaves
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 04.10.1998 18:54:15
> Zdenek Haringer wrote:
>
> Zdravim a prosim o radu.
>
> Potreboval bych, aby kdyz uzivatel stiskne napr. na DBEditu sipku dolu,
> misto tabulatoru, se presunul kurzor na nasledujici DBEdit. Zkousel jsem to
> udelat pomoci funkce FindNextControl na udalosti OnKeyDown coz fungovalo,
> ale problem je v tom, ze bych to takhle musel davat na vsechny DBEdity
Ahoj,
To ale prece muzes udelat tak, ze si oznacis vsechny Edity na formulari a pak
jim priradis stejnou udalost ktera muze vypadat nejak takhle:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_UP:
SelectNext(TWinControl(Sender), False, True);
VK_DOWN:
SelectNext(TWinControl(Sender), True, True);
end;
end;
> formulare. Rovnez jsem se pokousel odvodit vlastni komponentu a v
> constructoru priradit udalosti OnKeyDown
> takovouto proceduru:
>
> procedure TMyDBEdit.EditKeyDown(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> var W: TWinControl;
> begin
> if Key = 40 then
> begin
> W:=Sender as TWincontrol;
> W:=FindNextControl(W,True,True,True);
> end;
> W.SetFocus;
> end;
>
> Problem je ale v tom, ze v tomto pripade FindNextControl stale vraci nil.
> Nevite nekdo cim by to mohlo byt nebo neznate nejaky lepsi zpusob jak
> predefinovat
> funkci nejake klavesy?
Pokud vytvaris novou komponentu tak by si v ni nemel prirazovat udalost, ktera
je viditelna v navrhu. Misto toho musis prepsat metodu ktera tuto udalost vola.
V tvem pripade je to KeyDown. Cele by to pak mohlo vypadat takhle:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComCtrls;
type
TMyEdit = class(TEdit)
protected
procedure KeyDown(var Key: Word; Shift: TShiftState); override;
end;
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
{ TMyEdit }
type
TWinControlHack = class(TWinControl);
procedure TMyEdit.KeyDown(var Key: Word; Shift: TShiftState);
var
Form: TCustomForm;
begin
inherited KeyDown(Key, Shift);
Form := GetParentForm(Self);
if Form <> nil then
case Key of
VK_UP:
TWinControlHack(Form).SelectNext(Self, False, True);
VK_DOWN:
TWinControlHack(Form).SelectNext(Self, True, True);
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
begin
for I := 1 to 10 do
with TMyEdit.Create(Self) do
begin
Parent := Self;
Top := I * 25;
end;
end;
end.
--
Petr Vones, amatersky programator
Vyvijeni komponent + Co nam Inprise taji ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 04.10.1998 18:59:27
David Navara wrote:
> > > vlastnost DataSource a pokud ji najde tak pomoci
> > > DataSource.DataSet.GetFieldNames(List) vyplni seznam ktery ti pak nabizi
> > > Object Inspector.
>
> To je presne, co jsem hledal. Ale nejak mi ze zdrojaku nedoslo, KTERA
> funkce VYPLNI seznam, ktery pak nabizi ObjInspector. Nebo jak se
> registruji property editory?
Pomoci RegisterPropertyEditor. Muzes pouzit i ten hotovy TDataFieldProperty a
trochu si jej upravit.
--
Petr Vones, amatersky programator
Align v TEdit (Was:Dotaz)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 04.10.1998 19:00:17
kelleon(zv)nnsk.sk wrote:
> Tiez som cital vo Win32.hlp, ze ES_RIGHT atd. su platne len pre multiline
> edit controls. Mam vsak napisany podobny komponent (je to currency edit) a
> div sa svete, chodi to.
Zase nam lhali ..... :-)
--
Petr Vones, amatersky programator
Vyvijeni komponent + Co nam Inprise taji ?
[*] Marian Jonas <jonas(zv)jia(tec)czn(tec)cz> - 4.10.1998 19:01:59
> To neni, co chci. Je fakt, ze kdyz definujes 'property Editka: TEdit',
>tak ti automaticky nabidne vsechny TEdity formulare. Ale ja si chci delat
>uplne obecnou property a pouze jsem poukazal, ze DataField je String a
>presto to nejak funguje.
>
> Diky David Navara
>
Pokud chces plne ridit objekt inspektor pri zadavani property, musis
nejprve vytvorit potomka od TPropertyEditor a deklarovat prinejmensim:
function AllEqual: Boolean - pouziva se kdyz uzivatel vybere vice komponent
a je treba zjistit jestli jsou vsechny hodnoty stejne
function GetValue: string - funkce vraci stringovou hodnotu, ktera
reprezentuje hodnotu property
procedure SetValue(const Value: string) - procedura se pouziva pri zapisu
hodnoty property
Pro editaci slozitejsich property napr. TFont, TColor je mozne prepsat
metodu Edit, v ni pak lze vytvorit novy formular s editaci property. Takze
po dvojim kliknutim na property se objevi formular s editaci.
Pak staci uz jen editor zaregistrovat v procedure Register:
RegisterPropertyEditor(TypeInfo(TColor),
// typ property (string, trida...)
TMojeKomponenta,
// komponenta ke ktere priradime editor
'BackColor',
// nazev property, ktery je v deklaraci komponenty
TMujColorProperty)
// trida odvozena od TPropertyEditor
podrobnosti lze najit v Delphi\Source\Toolsapi\Dsgnintf.Pas nebo
v napovede pod heslem TPropertyEditor, bohuzel jsem nikde nenasel
Property Editor pro FieldName :-((
Marian Jonas
jonas(zv)jia(tec)czn(tec)cz
Viditelnost formulare
[*] Michal ��ek����֫Ŭ?��e���n� - 4.10.1998 19:01:22
-----Original Message-----
From: Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 4. listopadu 1998 17:01
Subject: Re: Viditelnost formulare
>> v okamziku kdy je MainForm minimalizovan zavolam ProgressForm.Close
>> nastavi se ProgressForm.Visible na False !! ALE !! pri obnoveni MainFormu
se
>> obnovi i ProgressForm i kdyz ma vlastnost Visible=False.... >> zkratka
>> vznikne
>> viditelne okno s vlastnosti VISIBLE = FALSE.
> A co treba
> ProgressForm.OnShow:
> begin
> Hide
> end;> ??? Tom
takhle jednoduse to bohuzel nejde. Ten ProgressForm na .Hide proste
nereaguje.
Zapomel jsem jeste napsat ze ten ProgressForm je fsStayOnTop
a v tom zrejme vznika ten problem.
Nicmene resenim se jevi moznost abych misto volal jen
ProgressForm.Hide
musim volat :
ProgressForm.Hide;
ProgressForm.FormStyle:=fsNormal;
ProgressForm.FormStyle:=fsStayOnTop;
pak je vsechno v poradku a FormProgress se pak jiz neobjevi.
Nicmene se mi to zda byt hloupa chyba ktera se spatne objevuje ...
s diky Michal
>>
>> Jedine co funguje je formular misto schovavani rusit a pak znovu vytvaret
>> ... ale to
>> se mi nelibi.
>>
>> Poradi mi nekdo ze zkusenejsich jak tuhle chybicku obejit ?
>>
>>
>> student Michal Cizek <starxax(zv)molly.vabo(tec)cz>
>> UIN : 2460214
>> HP : http://freeweb.coco(tec)cz/starxax
>>
>>Synchronizace pristupu k cizim souborum
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 04.10.1998 19:06:23
Marek Repisk� wrote:
> Nazdar,
>
> nepises v akych intervaloch Zdroj zpracuje data. Ak je v tom nejaka
> pravidelnost,
> mozno by islo orientovat sa podla datumu vytvorenia txt suboru. Napr.
> priblizne
> predpokladat cas jeho dalsej moznej zmeny a v tomto case (+-5 minut) tento
> subor necitat. Alebo dovolit citanie iba ak txt subor nie je starsi ako
> urceny cas
> (15 minut). Alebo nejaka ina synchronizacia do tych 30 minutovych
> intervalov.
Treba to synchronizovat prave podle tech zmen. Pokud budes sledovat zmenu souboru,
(pomoci FindFirstChangeNotification) tak vis ze po te zmene se nejaky cas urcite
nestane dalsi zmena. V tu chvili soubor prejmenujes, zkopirujes ci otevres.
--
Petr Vones, amatersky programator
Vyvijeni komponent + Co nam Inprise taji ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 04.10.1998 19:32:14
Marian Jonas wrote:
> podrobnosti lze najit v Delphi\Source\Toolsapi\Dsgnintf.Pas nebo
> v napovede pod heslem TPropertyEditor, bohuzel jsem nikde nenasel
> Property Editor pro FieldName :-((
To je prave to, co nekterym z nas Inprise zatajil. Napriklad v Delphi 2 Dev je
jeho plny zdrojovy kod.
--
Petr Vones, amatersky programator
off
[*] Ji�� Heinisch - 4.10.1998 19:41:29
To mas dobry
Co jsem v konferenci tak si tak pripadam furt
HeiJu
-----P�vodn� zpr�va-----
Od: Ing. Miroslav Ond��ek <bonnel(zv)telecom(tec)cz>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 4. listopadu 1998 13:54
P�edm�t: Re: ShellExecute
>Tak jo, jsem slepy jako patrona, ShellAPI je to spravne.
>
>Diky moc, zas si jednou pripadam jako pitomec :-)
>
> Ing. Miroslav Ond��ek
> Bonnel Technologie, s.r.o.
>
>E-mail:
>bonnel-ondrisek(zv)telecom(tec)cz - v�voj software
>
>internet: http://www.bonnel-tech.com
>PGP podporov�no - ve�ejn� kl�� na na�� homepage
>
>
>