Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
DBF soubory
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 18.1.2001 09:43:35
Ahoj,
lze to zjistit primo z hlavicky DBF souboru, kde je informace o poctu vet
ulozena ve 4 bytech pocinaje od pateho bytu.
Napriklad takto:
Function DBFRecordCount(_DBFName:String):Integer;
Var F:File;
begin
AssignFile(F,_DBFName);
Reset(F,1);
Seek(f,4);
BlockRead(F,Result,4);
CloseFile(F);
end;
S pozdravem Pavel Koukal.> From: "Mirek Drejeek" [mailto:drejcek(zv)schkocr(tec)cz]
> Subject: DBF soubory
>
> Zdravim,
> mam tady par dotazu ohledne DBF souboru.
> 1. s kolika zaznamy lze jeste efektivne pracovat? Kdyz jsem zkousel soubor
se 150.000 zaznamy, tak lze rici, ze se tento soubor otevrel okamzite (asi
po > trech sekundach), ale pak jsem chtel vypsat pocet zaznamu
(Table1.RecordCount) a tady jsem narazil na problem, ne ze by se to
nezobrazilo, ale trvalo to > neunosne dlouho, asi dvacet sekund. Pomoci SQL
dotazu byl cas stejny. Lze toto cislo zjistit nejakym rychlejsim zpusobem?
> 2. Pri pouziti DBGridu se zobrazuje scrollbar. Ale ten ma bohuzel pouze
tri polohy. To je dost nesikovne. Lze s tim neco udelat? Uz jednou jsem zde
videl > reseni, ale to mi nepomohlo.
> Predem dekuji za jakoukoli odpoved.
> S pozdravem
> Mirek Drejcek.Archivace souboru
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 18.1.2001 09:58:09
Cau,
uz sem se ptal ale zeptam se radci jeste jednou. Nevi nekdo o nejake komponente ktera umi komprimovat soubory do zip, rar nebo tak neceho. Potreboval bych aby to bylo free bez nutnosti pouziti dll zipu nebo neceho podobne. Neni dulezite to jenom zkomprimovat ale i dekomprimovat soubory zabalene napr. ve winzip8.
Mockrat dekuji Ladap
progr. TAPI
[*] iturcan(zv)gamo.sk - 18.1.2001 10:01:36
Ahoj lidi,
mam napisane komponenty na modemovu komunikaciu, tieto su postavene nad
TAPI rozhranim.
Mensi problem mi nastal pri pouzivani TAPI rozhrania na platforme Win2000.
Pri inicializovani Line, volam funkciu
LineInitializeex ((zv)fLineApp, MainInstance, LineCallback, '',
FNumDevs,fversion,liex)
tato funkcia bezi o.k. avsak po precitani poctu dostupnych zariadeni
(FNumDevs) dostanem cislo 4. A prave to je problem pretoze na danom PC mam
nainstalovany len 1 modem.
Toto sposobuje problemy , pretoze ak sa odkazem na cislo>1 tak dostanem
chybovu hlasku "incompatible version"
(ako fversion do procedury som skusal dat verziu TAPI 2 aj TAPI 3)
Ma niekto ideu ako dostat spravne cislo poctu funkcnych TAPI zariadeni
Dakujem
Ivan Turcan
TreeView & Icon
[*] Ji�� Ko�ara - 18.1.2001 10:25:31
Nevite prosim, zda se daji nejak nastavovat icony v Treeview bez pouziti
ListImage?
Pazout
Editor pro Delphi
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 18.1.2001 10:36:37
> > Ahoj,
> >
> > nemate nekdo tip na editor pro D5 (nejlepe na vlastni
> klavesnici otestovany)
> > ? Predstavoval bych si neco jako CodeRush, ale aby k tomu
> byla trial verze,
> > at nekupuji zajice v pytli :-)
>
> Mam CodeRush otestovany na vlastni klavesnici - skoro 4 roky provozu.
> Zatim to byl nejlepsi zajic, ktereho jsem kdy koupil :-)
> V pripade nespokojenosti plati "money back guarantee", demo neni a asi
> nebude.
Dobra,
nevi nekdo, kde se to da v Cesku sehnat (z Eagle bych to umel...) ?
Diky za info
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Aku databazu pouzit !!!???
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 18.1.2001 10:38:14
> Pokud to bude skutecne asi pro 10000 zaznamu, tak by stacil DBF nebo
> DB soubor, cili dBase, foxka, nebo paradox. Mirek Drejcek.
>
Urcite by stacil. Na zaklade mych zkusenosti bych ale i v tomto
pripade pouzil IB. Pracoval jsem s DBAse, s Paradoxem od verze
3.5 pro DOS v podstate az dodnes. Nove verze programu jsem
zacal delat pod IB (pristup pres IBX, stoji vsak za zvazeni i IBO) a
pouzil bych ho dnes i pro nesitove aplikace. Duvodu je pro to dost:
1. nemam zadne starosti s budoucim rozsirenim programu (jak na
sitovou verzi, tak pri zvetsenem objemu dat nebo funkcnosti)
2. snaz a lepe a jednoduseji zajistim veskerou logiku prace s daty,
zabudovane mechanizmy mi usnadni snadneji a bezpecneji zajistit
integritu dat
3. i kdyz se mi podarilo v podstate vyresit kontrolu a automaticke
opravy poskozenych databazovych souboru, jsem velmi rad, ze
nemusim obdobne problemy vubec resit. Kdo zazil na vlastni kuzi,
tak mi da jiste za pravdu.
4. I kdyz Paradox (a pod.) byva v obdobnych pripadech obcas
rychlejsi nez IB, rada operaci muze byt i pri 10000 zaznamech
radove pomalejsi nez u databaze s architektirou CS.
5. do vedlejsi ulice mohu (mozna) dojet spolehlive Trabantem, proc
vsak nejet Mercedesem, jsou-li oba za stejne penize
6. .....
Zdravi Jiri Binder
Excel a Delphi
[*] azeleny(zv)csas(tec)cz - 18.1.2001 11:05:44
Podivejte se do Archivu, uz to tady bylo.
Pro hledani pouzijte treba "Excel.Application"
Na webu Borlandu jsem k tomuto tematu nasel nejaky ukazkovy soubor, bohuzel
si nepamatuji kde, ale v archivu konference to uz mockrat bylo.
a.
Jo a jeste by se mohlo hodit XLConst.pas (nevi kde, akdesi jsem to pouzil,
akorat to ne a ne najit...) budete-li chtit delat grafy a jine podobne veci.
Jinak kratka ukazka, doufam tam nebude moc chyb:
globani promenna
V: Variant;
procedure TForm1.Button1Click(Sender: TObject);
begin
V := CreateOleObject('Excel.Application');
V.Visible := True;
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
if not VarIsEmpty(V) then
V.Quit;
end;
Pak se podivejte jak se pracuje s Visual Basic for Applications, tenm hel je
u M$ Opcie professional tusim.
Jo a s XLS95 to chodit nebude, potrebujete alepon XLS97
Fuj to jsem se rozkecal :-)
a.
-----------------------------------------------------------------------
Ales Zeleny (OK1UUE)
Ceska sporitelna a.s.
Na Perstyne 1
Praha 1
113 98
Czech republic
Email: azeleny(zv)csas(tec)cz
tel: +420 2 24995 236
-----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.
> Dobry den,
>
> mam nasledujici problem:
>
> Potrebuji napsat program, ktery bude
> a) chytat data z RS232
> b) davat je do Excelovsky tabulky.
>
> Cast a) jsem zvladl celkem snadno.
>
> S casti b) bych potreboval poradit. Rad bych pouzil COM
> objekty z Delphi 5.
> Nejsem moc kovany v COM programovani (resp. nikdy jsem to
> nedelal), ale dal
> jsem dohromady asi toto:
>
> ExApp.Connect;
> ExApp.Visible[0] := True; //nevim co je "lcid"
> za parametr, tak
> jsem tam dal provizorne 0
> ExApp.WorkBooks.Add (EmptyParam,0);
> ExBook.ConnectTo (ExApp.ActiveWorkbook);
>
> ExSheet.ConnectTo(ExBook.Worksheets[1]) //tohle mi nejde prelozit
>
> ExSheet.Cells[1,1].Value:=12345 //tohle uz vubec nejde
>
> Nejspis je to velmi naivni pokus.
> Neporadil byste mi nekdo jak otevrit Excel a vytvorit si
> jeden list, na kter
> y si budu pristupovat jako do pole?
>
> Mockrat dekuji
>
> Tomas Folprecht
>
>
>
> *************************************************
> Ing. Tomas Folprecht
> APK - Software
> Spanielova 1298
> Praha 6 -Repy
> CZECH REPUBLIC
>
> tel.: +420 - 2 - 3022091
>
> tomas(zv)apkfolprecht(tec)cz
> www.apkfolprecht(tec)cz
>
> *************************************************
> Seznam SQL serveru v siti
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 18.1.2001 11:07:56
Lze nejak zobrazit jmena vsech SQL serveru v siti?
Dik.
PR
Archivace
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 18.1.2001 11:14:23
Ahoj,
ja pouzivam komponentu ZipMaster. Je free a umi i disk spanning. Ma
dokonce i CZ resource.
Je tady: http://www.geocities.com/SiliconValley/Orchard/8607/
Ales
> -----Original Message-----
> From: Parizsky Ladislav [mailto:parizsky(zv)access-it(tec)cz]
> Sent: Wednesday, January 17, 2001 2:26 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Archivace
>
>
> Cau,
> nevi nekdo o nake komponente ktera umi komprimovat do zip,
> arj, nebo tak neco ale aby to bylo free.
>
> Dik Ladap
>
> problikavani
[*] brant(zv)dcomm(tec)cz - 18.1.2001 11:19:02
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
1. Vykresleni nekolika obrazku do jednoho: Staci si vygenerovat pri
FormCreate vhodne velkou bitmapu (Bitmap:=TBitmap.Create), nezapomen ji pri
skonceni uvolnit, do ni nakreslit to, co potrebujes (z disku, z resourcu
apod.) a na OnPaint formu ji napriklad pomoci CopyRect okopirovat na Canvas
toho formu. Muzes pro kazdy obrazek zvlast pouzit nekolik bitmap a ty na
OnPaint kreslit postupne v patricnem poradi.
2. V podstate totez (vygenerovat pri FormCreate bitmapu 50*50 pix.), do ni
vlozit ten obrazek a pak na OnPaint pomoci CopyRect postupne kopirovat na
jednotlive pozice. Staci na to dva vnorene cykly. Bohuzel ted nemohu najit
ten kod, ale nic to neni.
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7
Tenhle probl�m jsem �e#il tak� ned�vno. Pokud je na Form p��li# obr�zk�,
blikaj�(objevuj� se obr�zky, kter� by nem�li b�t vid�t). Je t�eba obr�zky
vykreslit do 1 obr�zku. Jak, to nev�m. To je tak� m� ot�zka... Nap��klad m�m
jist� podklad(50x50pixel�)a ten bych cht�l m�t navazuj�c� na sebe na Form v
�seku 0..4000x0..4000 pixel�
DBF soubory
[*] Kriz Pavel, TDS <tds(zv)volny(tec)cz> - 18.1.2001 11:37:36
> lze to zjistit primo z hlavicky DBF souboru, kde je informace o poctu vet
> ulozena ve 4 bytech pocinaje od pateho bytu.
Je to ale pocet platnych i zrusenych zaznamu.
Pavel Kriz
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Koukal Pavel
> Sent: Thursday, January 18, 2001 9:44 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: DBF soubory
Oznaceni komponenty za behu
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 18.1.2001 11:38:15
Zdravim vsechny v konferenci,
obracim se na vas s jednim problemem.
Potrebuji aby se mi pri behu aplikace chovaly komponenty jako pri navrhu.
Napriklad bych mel formular a na nem par labelu, editu apod. Kdyz na nektery
z nich kliknu, tak potrebuji aby se oznacil stejne jako pri navrhu v delphi
(oramoval se). Stejne tak aby slo vybrat vice komponent najednou tazenim
mysi. Dobrym prikladem je napr. plocha ve Windows a na ni ikony.
Resil jste to jiz nekdo nebo existuje nejaka komponenta podobna panelu,
ktera by to obstaravala ?
Predem dekuji moc za pripadne odpovedi.
S pozdravem Pavel Koukal.
Child-okno MDI applikace jako nezavisla cast
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 18.1.2001 11:40:01
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Mam MDI aplikaci, kde kazde child-okno obsahuje nejakou IB_Query.
Pokud v nejakem child-okne spustim query, ktera trva napr. 10 min., zamrzne
cela applikace a nelze pracovat ani s jinym child-oknem.
Je nejak mozne zaridit, aby kazde okno bezelo zvlast v necem (session,
theard, ci co?), jako by bylo kazde child-okno zvlastni aplikace?
Nevim, co je theard, ci session atd., ale predpokladam, ze neco takoveho by
to mohlo umet.
Dekuju moc za kazdou radu.
S pozdravem, Michal Tiller
Michal.Tiller(zv)oskarmobil.Cz :o)
RF Support Coordinator, OSKAR, RF - Engineering
+420 (02) 7117 1388, +420 (0608) 011 327
Excel a Delphi
[*] Ing. Ji�� Vojtek <j vojtek(zv)del(tec)cz> - 18.1.2001 12:06:07
Ja jsem kdysi neco podobneho resil, bohuzel nasel jsem uz pouze trosky kodu.
Snad Ti alespon trosku pomuzou
procedure Tform1.Pripoj;
Var
begin
ExcelApplication1.connect;
ExcelApplication1.Visible[0]:=False;
ExcelApplication1.Workbooks.Open(JmenoSouboru,false,false,EmptyParam,'',fals
e,false,EmptyParam,
EmptyParam,false,false,EmptyParam,false,0);
ExcelWorksheet1.ConnectTo(ExcelApplication1.ActiveWorkbook.ActiveSheet
as _worksheet);
end;
Procedure Tform1.Odpoj;
Begin
ExcelApplication1.ActiveWorkbook.Saved[0]:=true; -TO JE ABY SE FURT
NEPTAL, ZE PROVEDL ZMENY A JESTLI MA ULOZIT (neuklada, jen nastavi priznak)
ExcelApplication1.Quit;
ExcelApplication1.Disconnect;
End;
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Tomas
Folprecht
Sent: Thursday, January 18, 2001 9:30 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Excel a Delphi
Dobry den,
mam nasledujici problem:
Potrebuji napsat program, ktery bude
a) chytat data z RS232
b) davat je do Excelovsky tabulky.
Cast a) jsem zvladl celkem snadno.
S casti b) bych potreboval poradit. Rad bych pouzil COM objekty z Delphi 5.
Nejsem moc kovany v COM programovani (resp. nikdy jsem to nedelal), ale dal
jsem dohromady asi toto:
ExApp.Connect;
ExApp.Visible[0] := True; //nevim co je "lcid" za parametr, tak
jsem tam dal provizorne 0
ExApp.WorkBooks.Add (EmptyParam,0);
ExBook.ConnectTo (ExApp.ActiveWorkbook);
ExSheet.ConnectTo(ExBook.Worksheets[1]) //tohle mi nejde prelozit
ExSheet.Cells[1,1].Value:=12345 //tohle uz vubec nejde
Nejspis je to velmi naivni pokus.
Neporadil byste mi nekdo jak otevrit Excel a vytvorit si jeden list, na kter
y si budu pristupovat jako do pole?
Mockrat dekuji
Tomas Folprecht
*************************************************
Ing. Tomas Folprecht
APK - Software
Spanielova 1298
Praha 6 -Repy
CZECH REPUBLIC
tel.: +420 - 2 - 3022091
tomas(zv)apkfolprecht(tec)cz
www.apkfolprecht(tec)cz
*************************************************Ladeni v design time
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 18.1.2001 12:21:25
Ahoj,
ma nekdo vyzkouseno ladeni v design time? Zkousel jsem to podle
nejakych rad pres remote debugging, ale moc jsem neuspel.
Jiri Binder
Nalezeni chyby
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 18.1.2001 12:21:25
Ahoj
Prosim lze nejak rozume nalezt misto misto chyby z informace
AV... at address xxxxx in modul yyy.bpl ?
Muj balicek na kterem ted kutim mi zacal delat to, ze po
prekompilaci hodi uvedenou chybu. Po restarovani Delphi bezi vse
normalne ani v design time ani v runtime zadna chyba. Udela to i
kdyz ho prekompiluji po marginalnich upravach. (D5+UP1 NT40 i
W2k). Nemate nekdo nejakou radu kde hledat? Obcas se mi neco
takoveho prihodilo jiz drive, ale pouze obcas a ne opakovane po
kazde rekompilaci.
Diky Jiri Binder
Popup menu a klav. zkratky
[*] Jan Krizek <krizek(zv)krizkules(tec)cz> - 18.1.2001 12:36:39
Nemam na mysli urychlovaci klavesy vyznacene podtrzenim.
Ale jde mi o nasledujici. Kdyz do PopupMenu pridam TItemMenu s propertou Shortcut = Del nebo taky Ctrl+V, Ctrl+C. Tak pak mi nefunguje klavesa Del v TEdit komponente, ktera s tim PopupMenu vubec nesouvisi. Krome toho, ze je na stejnym TForm.
Reseni je pro me dvoji.
Bud odstranim tu chybu, tedy v TEdit zmacknuti klavesy smaze pismenko, i kdyz v popupmenu je Del prideleno TMenuItem.
Nebo se mi povede do property TMenuItem.Caption nastavit text tak, aby mi to napsalo nasledujici :
+--------------------+
| Smazat Del |
| Editovat Ctrl+F3 |
+--------------------+
a pritom mel property Shortcut prazdnou.
V resource se to zapsalo "Smazat\tDel", ale nevim jak v object inspectoru v delphi tam narvat tabelator a ani nevim zda by to pomohlo.
Odpoved na to druhe by se mi hodila, protoze bych rad mel v main menu posledni polozku :
Ukoncit Alt+F4
Alt+F4 nelze pridelit k Shortcut.
Honza +
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Milan Tome#
> Sent: Thursday, January 18, 2001 7:38 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Popup menu a klav. zkratky
>
>
> Do Caption napis pred pismeno, ktere ma byt klavesovou zkratkou znak &
> (ampersand)
>
> Milan Tomes
>
>
HP 4000
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 18.1.2001 12:37:17
Hledal bych v definici jazyka PCL5e u HP. Pomoci PCL napriklad volim,
kam ma vystupovat papir.
Milan Dvo��k wrote:
>
> Nevite nekdo jak programove zvolit, ze ktereho zdroje papiru se ma
> tisknout na tiskarne HP4000?
> Milan Dvorak
> dvorak(zv)gymzn(tec)cz
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Dotaz na rozmisteni ikon na pracovni plose
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 18.1.2001 12:38:35
Na to je dobry napriklad program "EZ Desk", ale bohuzel nevim, kde jsem
ho sehnal.
Ji�� G�th wrote:
>
> Ahoj,
> mel bych dotaz.
> Nevite nekdo, kde jsou uschovane posice icon na pracovni plose ve WINDOWS?
> Obcas se mi stane, ze se mi icony nejak nemile preskupi a ja bych si chtel
> jejich puvodni nastaveni ulozit.
>
> Jiri Goth
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
progr. TAPI
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 18.1.2001 12:48:24
a je tam nainstalovany SP ?
-----Original Message-----
From: iturcan(zv)gamo.sk [mailto:iturcan(zv)gamo.sk]
Sent: Thursday, January 18, 2001 10:02 AM
To: delphi-l(zv)fwd(tec)cz
Subject: progr. TAPI
Ahoj lidi,
mam napisane komponenty na modemovu komunikaciu, tieto su postavene nad
TAPI rozhranim.
Mensi problem mi nastal pri pouzivani TAPI rozhrania na platforme Win2000.
Pri inicializovani Line, volam funkciu
LineInitializeex ((zv)fLineApp, MainInstance, LineCallback, '',
FNumDevs,fversion,liex)
tato funkcia bezi o.k. avsak po precitani poctu dostupnych zariadeni
(FNumDevs) dostanem cislo 4. A prave to je problem pretoze na danom PC mam
nainstalovany len 1 modem.
Toto sposobuje problemy , pretoze ak sa odkazem na cislo>1 tak dostanem
chybovu hlasku "incompatible version"
(ako fversion do procedury som skusal dat verziu TAPI 2 aj TAPI 3)
Ma niekto ideu ako dostat spravne cislo poctu funkcnych TAPI zariadeni
Dakujem
Ivan Turcan
TreeView & Icon
[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 18.1.2001 12:58:12
Muzes si je kreslit s�m pomoc� OwnerDraw.... ale co si budeme pov�dat,
stejne je dobr� je m�t ulozen� v ImageListu :-)
Ales
> Nevite prosim, zda se daji nejak nastavovat icony v Treeview
> bez pouziti
> ListImage?Seznam SQL serveru v siti
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 18.1.2001 13:07:55
> Lze nejak zobrazit jmena vsech SQL serveru v siti?
Seznam Microsoftich SQL serveru by mel jit pomoci funkce
NetServerEnum s SV_TYPE_SQLSERVER, viz SDK.
Daniel
------------------------------------------------------
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added
Editor pro Delphi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 18.1.2001 13:13:14
Ahoj,
Ji�� Foldyna wrote:
>
> Dobra,
>
> nevi nekdo, kde se to da v Cesku sehnat (z Eagle bych to umel...) ?
nejspise to nelze sehnat jinak, nez primo od ES. Take jsem to drive
zkousel, ale ES pravdepodobne nema zajem o prodej prostrednictvim
dalsich obchodniku.
Jen jeste upozornuji, ze ve Win9x jsou problemy s nedostatkem zdroju,
takze pokud je pouzivas a nechces prejit na NT/2000, nebudes asi tak
stastny, jak bys mohl byt ...
> Diky za info
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
rozdil mezi VIRTUAL a DYNAMIC
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 18.1.2001 13:15:12
Zdravim vsechny,
chci se zeptat na veci okolo %subj%. Ruzne v literature jsem se dozvedel, ze
se jedna o dva ruzne zpusoby volani metod - staticky a dynamicky. Z
prelozeneho kodu programu mi je jasny, ze DYNAMIC se vola ponekud
komplikovaneji jeste pres nejakou dalsi tabulku. Neni mi vsak jasny proc
vlastne DYNAMIC vznikl (pamatuji si, kdyz jeste nebyl). Jake jsou vyhody a
nevyhody obou? Jak se rozhodnout, kdy ktery pouzit?
diky
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
Seznam SQL serveru v siti
[*] RDocekal(zv)csas(tec)cz - 18.1.2001 13:16:24
Mrkni na API fci NetServerEnum s parametrem servertype = SV_TYPE_SQLSERVER.
Mam vyzkousene, funguje. Lze pouzit pouze na NT 3.1 a vyssich. Nepodporovano
na Win9x a ostatnich nadstavbach DOSu.
S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
> -----Original Message-----
> From: Petr Reichl [mailto:p.reichl(zv)gmc.net]
> Sent: Thursday, January 18, 2001 11:08 AM
> To: ListServ - Delphi (el. adresa)
> Subject: Seznam SQL serveru v siti
>
>
> Lze nejak zobrazit jmena vsech SQL serveru v siti?
>
> Dik.
>
> PR
> CoolForm a Mask
[*] brant(zv)dcomm(tec)cz - 18.1.2001 13:20:01
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Patrne delas neco spatne. Bohuzel uz tu komponentu nemam, hral jsem si s ni
na minulem pracovisti, ale vzpominam si, ze se musi vygenerovat soubor s
takovou podivnou priponou (snad xip nebo tak nejak a myslim ze z nej se
generuji hranice regionu pro ten form), aby to slapalo. Nakreslil jsem si
tehdy z tlustsich car prasatko, pouzil tu komponentu a skrz pruhledne telo
prasatka slo v pohode treba kliknout na ikonu apod. Kolegove z C++ bledli
zavisti, jak se da neco udelat bez jedine radky kodu :-)))
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7
-----Original Message-----
From: milan 2(zv)sose-sou(tec)cz [mailto:milan 2(zv)sose-sou(tec)cz]
Sent: Thursday, January 18, 2001 9:08 AM
To: delphi-l(zv)fwd(tec)cz
Subject: CoolForm a Mask
Cauky lidi,
stahnul jsem si s torry.ru komponentu zvanou CoolForm (o tej zde byla
pred casem mala zminka) ... udajne ma umet to, ze kdyz se na ni umisti
lbovolna bitmapa a vybere se na ni transparentni barva, pak formular ma umet
zachovat tvar bitmapy a tudiz nebude obdelnikovy ci elipticky, ale klidne i
nepravidelny .... no a to je problem
... proste mi to nejak nefacha tak, jak by melo :(((
... sice se mi zobrazi bitmapa tak, ze neni videt barva navolena jako
transparentni, ale i tak formular porad zachovava tvar obdelniku s tou
zmenou, ze na sobe ma navolenou bitmapu.
.... pochopil jsem spatne funkci teto komponenty a chci po ni neco, co
neumi a nebo to delam blbe ?
Pokud nekdo mate zkusenosti s touto komponentou, budu rad za kazdou pomoc
... treba i zasl�ani maleho nezkompilovaneho demicka .
S pozdravem MIlan
=============
Milan S.
Informacni technologie
SOSE-SOU Usti n/L
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.225 / Virov� b�ze: 107 - datum vyd�n�: 22.12.2000
Dotaz na rozmisteni ikon na pracovni plose
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 18.1.2001 13:49:45
Jestli to nepotrebujes resit pres Delphi, pouzivam free programek IconLock - bezi na W9x i WinNT/2K
http://hotfiles.zdnet.com/cgi-bin/texis/swlib/hotfiles/info.html?fcode=0010UO&b=pcm
Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
----- Original Message -----
From: "Ji�� G�th" <jiri_goth(zv)gordic(tec)cz>
Subject: Dotaz na rozmisteni ikon na pracovni plose
> Ahoj,
> mel bych dotaz.
> Nevite nekdo, kde jsou uschovane posice icon na pracovni plose ve WINDOWS?
> Obcas se mi stane, ze se mi icony nejak nemile preskupi a ja bych si chtel
> jejich puvodni nastaveni ulozit.
>
> Jiri Goth
>
>Optimalizace Exe
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 13:51:26
From: "bc.Jaromir SVOBODA" <svoboda(zv)okfas(tec)cz>
Ahoj,
> Jak optimalizovat vysledne EXE? Pri kompilaci konzolove aplikace by vysledne
> EXE melo byt co nejrychlejsi a nejmensi, ale predevsim by v tele nemely byt
Ujisti se, ze mas v Project | Options -> Compiler zaskrtlou volbu Optimization
(coz je vychozi nastaveni)
> videt zadne pouzite funkce a stringy. Staci nejak vhodne nastavit
To je slozitejsi, importovane funkce se systemu budou viditelne, stringy by
jsi musel nejakym zpusobem zakodovat. K cemu ale ta tajemnost, kdo bude chtit
tak stejne rozkoduje temer cokoliv.
V souvislosti s tim bych chtel take varovat pred pouzitim ruznych zazrazcnych
EXE kompresoru. Vysledny efekt je (krom mensi fyzicke velikosti souboru, cehoz
lze ale dosahnout komprimaci a rozbalenim pri instalaci) horsi nez u bezneho
souboru, protoze princip techto kompresoru jde zcela proti architekture OS.
Petr Vones, amatersky programator
Nalezeni chyby
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 14:03:19
From: "Jiri Binder" <j.binder(zv)albacon(tec)cz>
> Prosim lze nejak rozume nalezt misto misto chyby z informace
> AV... at address xxxxx in modul yyy.bpl ?
Ahoj,
spust aplikaci s tim balickem z Delphi a pak pomoci Search | Find Error
hledej tu adresu. Nezapomen, ze je v hexadecimalnim tvaru a je treba pred ni
napsat $
Petr Vones, amatersky programator
Nalezeni chyby
[*] Milink Otakar <otam(zv)tdat(tec)cz> - 18.1.2001 14:04:26
Ahoj
Mne to dela pokud mam otevreny projekt, ktery tento design balicek
pouziva. Projekt zavru, otevru balicek udelam zmeny, kompilace a ... AV
je tu. Mam pocit, ze se to zhorsilo po aplikaci update packu 1, ale
muze to byt klidne i necim jinym...
Resim to restartem Delphi pred zmenou balicku (:-(
Jinak zmeny, ktere neovlivnuji design mode, delam primo v prislusne
jednotce s komponentou a balicek ani neotviram...
s pozdravem Otakar Milink
P.S. Mam Win2000 ...
>
> Ahoj
> Prosim lze nejak rozume nalezt misto misto chyby z informace
> AV... at address xxxxx in modul yyy.bpl ?
>
> Muj balicek na kterem ted kutim mi zacal delat to, ze po
> prekompilaci hodi uvedenou chybu. Po restarovani Delphi bezi vse
> normalne ani v design time ani v runtime zadna chyba. Udela to i
> kdyz ho prekompiluji po marginalnich upravach. (D5+UP1 NT40 i
> W2k). Nemate nekdo nejakou radu kde hledat? Obcas se mi neco
> takoveho prihodilo jiz drive, ale pouze obcas a ne opakovane po
> kazde rekompilaci.
>
> Diky Jiri Binder Ladeni v design time
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 14:12:55
From: "Jiri Binder" <j.binder(zv)albacon(tec)cz>
> ma nekdo vyzkouseno ladeni v design time? Zkousel jsem to podle
> nejakych rad pres remote debugging, ale moc jsem neuspel.
Ahoj,
Mozna by pomohlo 'How can I debug a package wizard?':
http://www.gexperts.org/opentools/
Petr Vones, amatersky programator
problikavani
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 18.1.2001 14:14:23
>Tenhle probl�m jsem �e#il tak� ned�vno. Pokud je na Form p��li# obr�zk�,
>blikaj�(objevuj� se obr�zky, kter� by nem�li b�t >vid�t). Je t�eba obr�zky
>vykreslit do 1 obr�zku. Jak, to nev�m. To je tak� m� ot�zka...
>Nap��klad m�m jist� podklad(50x50pixel�)a ten bych cht�l m�t navazuj�c� na sebe
>na Form v �seku 0..4000x0..4000 pixel�
Mas namysli neco takoveho?
procedure TForm.FormPaint(Sender: TObject);
var
X, Y, W, H: LongInt;
begin
with Bitmap do begin
W := Width;
H := Height;
end;
with TForm(Sender) do
begin
Y := 0;
while Y < Height do begin
X := 0;
while X < Width do begin
Canvas.Draw(X, Y, Bitmap);
Inc(X, W);
end;
Inc(Y, H);
end;
end;
end;
Jinak ohledne toho kresleni obrazku do obrazku je jednoduche napr.:
mit na plose jeden TImage a vsechny bitmapy pouze jako TBitmap. Pak pomoci metod
Draw, CopyRect reagovat na prislusne zpravy a aktualizovat obsah v TImage...
Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
DBF soubory
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 18.1.2001 14:15:32
Hmm, to je pravda. Na to jsem zapomnel. Potom tedy nezbyva nic jineho nez
jit po vetach a zjistovat jestli nejsou deleted. Samozrejme potom doba
potrebna pro recordcount bude narustat umerne s velikosti souboru.
Rychle napsana funkce by vypadala takto:
Function DBFRecordCount(_DBFName:String):Integer;
Var F:File;
RecNo:Integer;
NumRec:LongInt;
Offset:Word;
RecLen:Word;
Mark:Char;
begin
Result := 0;
AssignFile(F, _DBFName);
Reset(F, 1);
Seek(F, 4);
BlockRead(F, NumRec, 4);
BlockRead(F, Offset, 2);
BlockRead(F, RecLen, 2);
For RecNo := 0 to NumRec-1 do
begin
Seek(F,Offset + RecNo*RecLen);
BlockRead(F, Mark, 1);
// * - deleted row
If Mark <> '*' then
Result := Result + 1;
end;
CloseFile(F);
end;
Melo by to byt rychlejsi nez TTable.RecordCount. Nevim, zda by bylo
rychlejsi nahrat cely soubor do pameti a delat seek v pameti nez na disku,
asi ano.
Pokud by to chtel nekdo delat, postup na zjisteni poctu vet z DBF souboru je
z teto funkce snad jasny.
S pozdravem Pavel Koukal.> From: Kriz Pavel, TDS [mailto:tds(zv)volny(tec)cz]
> Sent: Thursday, January 18, 2001 11:38 AM
>
>
>
> > lze to zjistit primo z hlavicky DBF souboru, kde je
> informace o poctu vet
> > ulozena ve 4 bytech pocinaje od pateho bytu.
>
> Je to ale pocet platnych i zrusenych zaznamu.
>
> Pavel Kriz
>
>
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> > Behalf Of Koukal Pavel
> > Sent: Thursday, January 18, 2001 9:44 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: RE: DBF soubory
> CoolForm a Mask
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 18.1.2001 14:16:01
> Cauky lidi,
> stahnul jsem si s torry.ru komponentu zvanou CoolForm (o tej zde byla
> pred casem mala zminka) ... udajne ma umet to, ze kdyz se na ni umisti
> lbovolna bitmapa a vybere se na ni transparentni barva, pak formular ma umet
> zachovat tvar bitmapy a tudiz nebude obdelnikovy ci elipticky, ale klidne i
> nepravidelny .... no a to je problem
>
> ... proste mi to nejak nefacha tak, jak by melo
(
>
> ... sice se mi zobrazi bitmapa tak, ze neni videt barva navolena jako
> transparentni, ale i tak formular porad zachovava tvar obdelniku s tou
> zmenou, ze na sobe ma navolenou bitmapu.
>
> .... pochopil jsem spatne funkci teto komponenty a chci po ni neco, co
> neumi a nebo to delam blbe ?
>
> Pokud nekdo mate zkusenosti s touto komponentou, budu rad za kazdou pomoc
> ... treba i zasl�ani maleho nezkompilovaneho demicka .
Nevim odkud si tu komponentu stahnul, ale jestli si dobre pamatuju, tak se nejdriv musela z te bitmapy vytvorit maska a priklad tam na to byl i se zdrojakem a ukazkovou bitmapou.
Roman
OOOOOOOOOOOOOOOO
O icq #84229702
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO
Child-okno MDI applikace jako nezavisla cast
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 14:16:50
From: "Michal Tiller" <Michal.Tiller(zv)oskarmobil(tec)cz>
> Mam MDI aplikaci, kde kazde child-okno obsahuje nejakou IB_Query.
> Pokud v nejakem child-okne spustim query, ktera trva napr. 10 min., zamrzne
> cela applikace a nelze pracovat ani s jinym child-oknem.
> Je nejak mozne zaridit, aby kazde okno bezelo zvlast v necem (session,
> theard, ci co?), jako by bylo kazde child-okno zvlastni aplikace?
> Nevim, co je theard, ci session atd., ale predpokladam, ze neco takoveho by
> to mohlo umet.
Ahoj,
priklad na SQL dotazy v threadu najdes v Demos\Db\BkQuery, ovsem pro BDE. Co
se tyce IBX, tak tady je 'IBX Threading example':
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=15450
Petr Vones, amatersky programator
kde najdu popis IO Errors ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 14:26:44
From: "�u#ka R�bert" <spravca(zv)lumen.sk>
> Prosim mohli by ste ich poslat aj mne tie Win32 error.
Ahoj,
v Delphi helpu hledej tema 'I/O errors'.
Petr Vones, amatersky programator
TJvMail vs Exchange
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 14:39:38
From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> zkousim experimentovat s komponentou TJvMail z JEDI VCL a nemuzu poslat
> zadny mail pres nasi Exchange. Vzdy se mi dojde mail od Exchange serveru
> ze je prijemce neznamy, i kdyz adresa skutecne existuje.
Ahoj,
zkus prosim misto komponenty TJvMail pouzit novejsi tridu TJclEmail z JCL
(http://delphi-jedi.org/Jedi:JCLDOWNLOADS), coz je vicemene totez, akorat
to neni 'klikaci', takze to lze pouzit i v mensi aplikaci aniz by zbytecne
narostla o komponentovy balast. Ohledne problemu s odesilanim, zkus pred
adresu doplnit STMP:, tedy: SMTP:nekdo(zv)nekde.abc . Pokud to presto nepujde,
tak se prosim ozvi na muj mail, dik.
Petr Vones, amatersky programator
DBF soubory
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 18.1.2001 14:48:49
Toto tak uplne nechapu,
platnych a zrusenych zaznamu, to znamena, ze kdyz smazu nejaky zaznam, tak se na tomto miste cislo nezmensi?
Mel bych tady jeste jeden dotaz: pri pouziti jednoducheho SQL dotazu select * from tabulka.dbf order by sloupec1 se mi zobrazi nejaky vysledek.
Muzete mi ale nekdo poradit jak co nejjednoduseji dostat toto poradi do puvodni tabulky?
S pozdravem
Mirek Drejcek
*********** REPLY SEPARATOR ***********
On 18.1.2001 at 11:37 Kriz Pavel, TDS wrote:
>> lze to zjistit primo z hlavicky DBF souboru, kde je informace o poctu vet
>> ulozena ve 4 bytech pocinaje od pateho bytu.
>
>Je to ale pocet platnych i zrusenych zaznamu.
>
>Pavel Kriz
>
>
>> -----Original Message-----
>> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
>> Behalf Of Koukal Pavel
>> Sent: Thursday, January 18, 2001 9:44 AM
>> To: delphi-l(zv)fwd(tec)cz
>> Subject: RE: DBF soubory
Editor pro Delphi
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 18.1.2001 14:57:23
http://www.shareware(tec)cz/cenik.php3, Po mem dotazu to uz zaradili do
ceniku
Ji�� Foldyna wrote:
>
> > > Ahoj,
> > >
> > > nemate nekdo tip na editor pro D5 (nejlepe na vlastni
> > klavesnici otestovany)
> > > ? Predstavoval bych si neco jako CodeRush, ale aby k tomu
> > byla trial verze,
> > > at nekupuji zajice v pytli :-)
> >
> > Mam CodeRush otestovany na vlastni klavesnici - skoro 4 roky provozu.
> > Zatim to byl nejlepsi zajic, ktereho jsem kdy koupil :-)
> > V pripade nespokojenosti plati "money back guarantee", demo neni a asi
> > nebude.
>
> Dobra,
>
> nevi nekdo, kde se to da v Cesku sehnat (z Eagle bych to umel...) ?
>
> Diky za info
>
> Ing. Jiri Foldyna
> mailto:jiri.f(zv)avizo(tec)cz
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Ako zistit spustene Delphi IDE
[*] Martin Matou�ek A <matousek.martin(zv)atlas(tec)cz> - 18.1.2001 15:11:00
----- Original Message -----
From: "Martin Matou#ek" <martin_m(zv)ceis(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 18, 2001 10:05 AM
Subject: Re: Ako zistit spustene Delphi IDE
> V�t#ina komponent tzv. trial ( funguj� pouze p�i spu#ten�m IDE ),
kter�
> jsem "zkoumal", funguj� takov�m zp�sobem , �e kontroluj� v�skyt oken
Delphi
> tzn. ( Object Inspector, Project Manager, ... )
>
> Martin Matou#ek
>
> ----- Original Message -----
> From: "Martin Ocenas" <matko(zv)proces.sk>
> To: "Konferencia Deplhi" <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, January 17, 2001 3:00 PM
> Subject: Ako zistit spustene Delphi IDE
>
>
> > Uz o tom bola debeta, ale nemozem to najst. Ako zistim, ze je spusteny
> > program z Delphi, pripadne, ze je spustene Delphi IDE.
> >
> > Dik
> >
> > Martin
> >
>SMS
[*] #u�ka R�bert <spravca(zv)lumen.sk> - 18.1.2001 16:01:10
Ktoru komponentu mam pouzit a ako ju obsluzit na to aby som mohol z
aplikacie posielat SMS. Prosim pribalte alebo nejako popiste kod ako sa to
robi, hlavne co sa tyka post metody a jej parametrou. Ako do nej vpisem tie
informacie o ppp number atd. ci je to ako jeden retazec alebo ako. PROSIM O
POMOC a RADU.
DAKUJEM
TJvMail vs Exchange
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 18.1.2001 16:05:12
> -----Original Message-----
> From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
> To: Konference Delphi
> Subject: Re: TJvMail vs Exchange
>
> > zkousim experimentovat s komponentou TJvMail z JEDI VCL a
> nemuzu poslat
> > zadny mail pres nasi Exchange. Vzdy se mi dojde mail od
> Exchange serveru
> > ze je prijemce neznamy, i kdyz adresa skutecne existuje.
>
> narostla o komponentovy balast. Ohledne problemu s
> odesilanim, zkus pred
> adresu doplnit STMP:, tedy: SMTP:nekdo(zv)nekde.abc . Pokud to
Nazdar,
je to presne ono. Stacilo doplnit pred adresu SMTP a uz to jede. Muze mi
tu nekdo rict, proc to tak je?
Ales
TJvMail vs Exchange
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 16:16:34
From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> je to presne ono. Stacilo doplnit pred adresu SMTP a uz to jede. Muze mi
> tu nekdo rict, proc to tak je?
Ahoj,
ve specifikaci SimpleMAPI to tak je. Jenze, pri testovani to s nekterymi
klienty nefungovalo. Pokud to nekdo muze zkusit napriklad s Netscape Mail nebo
OE4, tak se mi prosim ozvete jak to dopadlo, diky. V dalsi verzi TJclEmail to
bude jiz opraveno.
Petr Vones, amatersky programator
Oznaceni komponenty za behu
[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 18.1.2001 16:53:17
Ano existuje na to DreamDesigner na http://www.dream-com.com
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Koukal Pavel
> Sent: Thursday, January 18, 2001 11:38 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Oznaceni komponenty za behu
>
>
> Zdravim vsechny v konferenci,
>
> obracim se na vas s jednim problemem.
> Potrebuji aby se mi pri behu aplikace chovaly komponenty jako pri navrhu.
> Napriklad bych mel formular a na nem par labelu, editu apod. Kdyz
> na nektery
> z nich kliknu, tak potrebuji aby se oznacil stejne jako pri
> navrhu v delphi
> (oramoval se). Stejne tak aby slo vybrat vice komponent najednou tazenim
> mysi. Dobrym prikladem je napr. plocha ve Windows a na ni ikony.
> Resil jste to jiz nekdo nebo existuje nejaka komponenta podobna panelu,
> ktera by to obstaravala ?
>
> Predem dekuji moc za pripadne odpovedi.
> S pozdravem Pavel Koukal.
>
> rozdil mezi VIRTUAL a DYNAMIC
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 16:54:29
From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
> chci se zeptat na veci okolo %subj%. Ruzne v literature jsem se dozvedel, ze
> se jedna o dva ruzne zpusoby volani metod - staticky a dynamicky. Z
> prelozeneho kodu programu mi je jasny, ze DYNAMIC se vola ponekud
> komplikovaneji jeste pres nejakou dalsi tabulku. Neni mi vsak jasny proc
> vlastne DYNAMIC vznikl (pamatuji si, kdyz jeste nebyl). Jake jsou vyhody a
> nevyhody obou? Jak se rozhodnout, kdy ktery pouzit?
Ahoj,
dynamic je mirne pomalejsi nez virtual a duvod vzniku bylo zmenseni velikosti
VMT tabulek (ktere se zvetsuji s kazdou virtual metodou). Dynamic jsou vhodne
u metod, kde se nepredpoklada ze se budou volat prilis casto (napriklad reakce
na stisk tlacitka a podobne).
Petr Vones, amatersky programator
Ztracena posta
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 18.1.2001 16:58:21
Zdravim,
----- Original Message -----
From: "L. ZITA" <konference(zv)sales(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 17, 2001 8:15 PM
Subject: Re: Ztracena posta
> Ahoj.
> Posta se mi v OE nikdy neztratila, ale asi 6 hodin jsem si stahoval
dialupem
> konferenci o w2k abych si v ni mohl hledat offline a za tyden byla fuc.
> Pritom jsem vypnul vsechny ty udrzby a podobne legracky....
>
tohle dela v Moznosti|udrzba checkbox: odstranovat diskuzni prispevky x dnu
po stazeni. Taky se mi stalo to same, po odznaceni toho checkboxu uz ne.
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
Ztracena posta
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 18.1.2001 17:05:52
Zdravim,
----- Original Message -----
From: "Miroslav Novosad" <mirnov(zv)atlas(tec)cz>
To: "Delphi forum" <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, January 16, 2001 12:51 PM
Subject: OT: Ztracena posta
>
> Pripoustim, ze jsem neco zmastil, protoze jsem chtel nastavit
> prihlasovaci skript, a jsem nez zjistil, ze je to stejne jako v NT4,
> napsal jsem i soucasnou cestu k uziv. profilu, ale adresar, plocha a
> vubec vse, co je v profilu se nezmenilo, tak je mi divne, ze by to melo
> nejaky vliv a ze by, kdyz uz, "premazl cistym" jenom postu.
>
No, na ty uzivatelsky profily je treba davat bacha, protoze voni ty w2k
udrzujou pro kazdy uzivatelsky profil extra slozku se zpravama pro OE. Takze
je mozny, ze ty zpravy tam mas, akorat v jinym profilu. Tohle nevim jestli
bylo v NT4, v tech jsem OE nikdy nepouzival.
mrkni do slozky (mam cs lokalizaci w2k):
C:\Documents and Settings\<uzivatel>\Local Settings\
Data aplikac�\Identities\<identityGUID>\Microsoft\Outlook Express
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
Import knihovny SQLDMO
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 18.1.2001 17:38:37
Zdravim,
snazim se naimportovat SQLDMO knihovnu z SQL Serveru, ale kdyz dam
Project/Import Type Library a vyberu Microsoft SQLDMO Object Library a
stisknu bud Create Unit nebo Install... tak to hlasi, ze objekt TDatabase uz
existuje.
To znamena, ze nemohu naimportovat tuto knihovnu? Muzete mi prosim poradit
jak na to?
PR
SMS
[*] brant(zv)dcomm(tec)cz - 18.1.2001 18:17:39
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
U nas vyvijime aplikaci, kde se pres SMS a ve spojeni se specialnim HW (GSM
modem + GPS)uskutecnuje sledovani polohy. Umime i posilat SMS, ale chce to
na strane pocitace GSM modem, coz neni levna zalezitost. Ale snad by to slo
obejit tim, ze se posle e-mail na adresu nejakeho toho serveru, ktery to
odeslani umi udelat (blize napr. www.eurotel(tec)cz), ovsem je tu otazka
spolehlivosti. Komponent na posilani mailu je spousta, napr. na
www.torry.ru.
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7
-----Original Message-----
From: �u#ka R�bert [mailto:spravca(zv)lumen.sk]
Sent: Thursday, January 18, 2001 4:01 PM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: SMS
Ktoru komponentu mam pouzit a ako ju obsluzit na to aby som mohol z
aplikacie posielat SMS. Prosim pribalte alebo nejako popiste kod ako sa to
robi, hlavne co sa tyka post metody a jej parametrou. Ako do nej vpisem tie
informacie o ppp number atd. ci je to ako jeden retazec alebo ako. PROSIM O
POMOC a RADU.
DAKUJEM
kde najdu popis IO Errors ?
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 18.1.2001 18:25:09
Me taky prosim.
Dekuji Ladap
>>> spravca(zv)lumen.sk 17.1.01 19:24 >>>
Prosim mohli by ste ich poslat aj mne tie Win32 error.
Dakujem
S pozdravom Robert Suska
dBASE IV 2.0 kodovani index rozdil mezi TTable a T
[*] Martin Macko, M-PRO s.r.o. <martinm(zv)m-pro(tec)cz> - 18.1.2001 18:02:44 -0000
pokud na ni pristupujes pres BDE a alias je potreba u aliasu nastavit
LangDriver, pokud jen pres BDE ne pomoci aliasu tak nastavit LangDriver u
drivers/native/dbase v nastaveni, popr. jeste v system/init
_____
Martin MACKO,
M-PRO s.r.o.
U m�sta Chersonu 1595/1
tel.: +420 (35) 610 79 48,
610 72 31 a� 33
martinm(zv)m-pro(tec)cz
+420 (603) 48 39 40
_____
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
OlivaJiri(zv)seznam(tec)cz
Sent: Wednesday, January 17, 2001 9:44 PM
To: delphi-l(zv)fwd(tec)cz
Subject: dBASE IV 2.0 kodovani index rozdil mezi TTable a TQuery
mam D5, W98, a v tom DBF tabulku, ktera je v kodovani dBASE CSY cp852, vse
se zobrazuje naprosto v poradku, az na jednu vec
ta tabulka ma index string (jen velke pismena UpperCase)+cislo, pri tomto
setrideni (mozna je to obecna vlastnost, jeste nevim)
pri prohlizeni pres TTable to tridi v podstate spravne, az na to ze #, � tj.
velka pismena s diakritikou jsou a� jako posledni, na konci seznamu, ne jako
bych cekal napr. R a po nem � (r s hackem), je az za Z, stejne treba dlouhe
U
za pomoci TQuery pri dotazu SELECT pres ty dve polozky to tridi spravne, tj.
pismeno a za nim totez pismeno s hackem, popripade carkou
Nevim cim to muze byt, nesetkal se nekdo s timto nebo podobnym problemem,
poradte prosim, myslim ze to bude nejaka prkotina, bohuzel mne nic nenapada,
diky
Jiri Oliva
Avast32 (VPS 4.12.2000): zprava neobsahuje virus
Avast32 (VPS 4.12.2000): zprava neobsahuje virus
Delphi 5 & MS Word
[*] Marek Soukup <msoukup(zv)btt(tec)cz> - 18.1.2001 19:06:27
Haj hou,
ja to delam takhle:
type
TfrmTiskFaktura = class (TForm)
..
WordApp: TWorldApplication;
..
end;
procedure NejakaProceduraNeboFunkce;
var
OLETemplate: OLEVariant;
begin
Path:= ExtractFilePath (Application.ExeName)+'Dots\';
{spusteni wordu - tady chybi testovani existence wordu a spusteni atd.}
WordApp.Connect;
OLETemplate:= Path+AktSablona;
{tady zalezi na tom, jestli ma ten Word byt viditelny nebo ne}
WordApp.Visible:= false;
WordApp.Documents.Add (OLETemplate, EmptyParam);
WordApp.Selection.GoTo_( OLEWhat, EmptyParam, EmptyParam, OLEBookmark);
WordApp.Selection.TypeText (FakturaOznac);
end;
Jmena funkci beru z word97.pas, kterej je u Delphi a pres Word, kde
zaznamenavam makro a pak se divam na kod.
S pozdravem
MS
> muze te mi prosim poslat priklad na "komunikaci" s Wordem. Jde mi
> v podstate
> o to, ze potrebuji otevrit dokument, vyhledat a zmenit casti textu,
> vytisknout a ulozit pod jinym jmenem. Priklad by mi velice pomohl...
> RichEdit je pekny ale neumi obrazky, tabulky a pod...
>
> Dekuji
>
> Zdenek
SMS
[*] Ji�� H�sek - 18.1.2001 20:00:35
Ja pouzivam komponentu z FastNet - NMSMTP, ktere jsou standartni vybava D5
Enterprise. A jsem spokojeny. Ale skus mozna Synapsi. O ni se v konferenci
dost pise, takze adresu najdes nekde ve starsich prispevcich. A jestli te
zajima format adresy tak na Paegas je to +42%s(zv)sms.paegas(tec)cz kde %s je cislo
prijemce i s predvolbou a na Eurotel by to melo byt 0042%s(zv)sms.eurotel(tec)cz.
Jiri Hysek
Jak se pos�laj� SMS p��mo z Delphi?
_____________________________________________________________________
Hled�n� lid� a jejich e-mail�: http://www.lide(tec)cz
dBASE IV 2.0 kodovani index rozdil mezi TTable a T
[*] OlivaJiri(zv)seznam(tec)cz - 18.1.2001 20:56:13
Diky za pomoc, mam nastaveny DEFAULT DRIVER DBASE a LANGUAGE DRIVER dBASE
CSY cp852 jak pro nativni ovladac tak i pro system/init, odkazuji se pres
vytvoreny alias, tam se da nastavit akorat DEFAULT DRIVER DBASE, ten je tam
taky, tim to pravdepodobne nebude, zkousel jsem uz snad vsechny mozne
kombinace jako driver foxPro a lang. driver dbase, s tim mym nastavenim si
myslim ze je spravne, cestina se zobrazuje naprosto korektne, tak jak ma byt
problem zkusim popsat jeste jednou:
ta tabulka ma pro zjednoduseni treba polozky P1 - string[1] a P2 string[1],
ma index P1+P2
kdyz nastavim tento index v TTable, setridi se to takto treba
B
C
D
R
Z
R s hackem
C s hackem
to je to spatne, kdyz udelam v TQuery SELECT P1,P2 ORDER BY P1,P2 udela to
tohle
B
C
C s hackem
D
R
R s hackem
Z
to si myslim ze je spravne, proc je to jednou tak a pak jinak? jak donutim
TTable aby to tridila stejne jako TQUERY, nebo v cem je rozdil v pristupu k
indexum?
diky za jakykoliv napad, jde mi z toho rozum stat
Jirka
****************************************************************************
**
Ja jsem mel podobny problem, prehodil jsem kodovani na FoxPro Win1250 (nebo
tak nejak) a razeni je spravne.
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
pokud na ni pristupujes pres BDE a alias je potreba u aliasu nastavit
LangDriver, pokud jen pres BDE ne pomoci aliasu tak nastavit LangDriver u
drivers/native/dbase v nastaveni, popr. jeste v system/init
_____
Martin MACKO,
M-PRO s.r.o.
U m�sta Chersonu 1595/1
tel.: +420 (35) 610 79 48,
610 72 31 a� 33
martinm(zv)m-pro(tec)cz
+420 (603) 48 39 40
****************************************************************************
**
Subject: dBASE IV 2.0 kodovani index rozdil mezi TTable a TQuery
mam D5, W98, a v tom DBF tabulku, ktera je v kodovani dBASE CSY cp852, vse
se zobrazuje naprosto v poradku, az na jednu vec
ta tabulka ma index string (jen velke pismena UpperCase)+cislo, pri tomto
setrideni (mozna je to obecna vlastnost, jeste nevim)
pri prohlizeni pres TTable to tridi v podstate spravne, az na to ze #, � tj.
velka pismena s diakritikou jsou a� jako posledni, na konci seznamu, ne jako
bych cekal napr. R a po nem � (r s hackem), je az za Z, stejne treba dlouhe
U
za pomoci TQuery pri dotazu SELECT pres ty dve polozky to tridi spravne, tj.
pismeno a za nim totez pismeno s hackem, popripade carkou
Nevim cim to muze byt, nesetkal se nekdo s timto nebo podobnym problemem,
poradte prosim, myslim ze to bude nejaka prkotina, bohuzel mne nic nenapada,
diky
Jiri Oliva
CoolForm a Mask
[*] Ji�� H�sek - 18.1.2001 22:01:21
Cau,
Melo stacit dat do picture nejaky obrazek a po kliknuti na Mask se ti obevi
okno s tim obrazkem. Tam si muzes zmenit transparentni barvu a pak kliknes
na tu fajfku (nevim, jak bych to jinak nazval - proste d�# OK). Pockas az
vytvori maska a okno se zavre. To je vse. Aspon me to funguje.
Jiri Hysek
> Cauky lidi,
> stahnul jsem si s torry.ru komponentu zvanou CoolForm (o tej zde byla
> pred casem mala zminka) ... udajne ma umet to, ze kdyz se na ni umisti
> lbovolna bitmapa a vybere se na ni transparentni barva, pak formular ma
umet
> zachovat tvar bitmapy a tudiz nebude obdelnikovy ci elipticky, ale klidne
i
> nepravidelny .... no a to je problem
>
> ... proste mi to nejak nefacha tak, jak by melo
(
>
> ... sice se mi zobrazi bitmapa tak, ze neni videt barva navolena jako
> transparentni, ale i tak formular porad zachovava tvar obdelniku s tou
> zmenou, ze na sobe ma navolenou bitmapu.
>
> .... pochopil jsem spatne funkci teto komponenty a chci po ni neco, co
> neumi a nebo to delam blbe ?
>
> Pokud nekdo mate zkusenosti s touto komponentou, budu rad za kazdou pomoc
> ... treba i zasl�ani maleho nezkompilovaneho demicka .
>
> S pozdravem MIlan
>
> =============
> Milan S.
> Informacni technologie
> SOSE-SOU Usti n/L
>
Dotaz na rozmisteni ikon na pracovni plose
[*] Marek Eichler <marek.eichler(zv)atlas(tec)cz> - 18.1.2001 22:04:16
Zdravim,
tak tohle je vyreseno s popisem i se zdrojovym kodem (sice v C, ale to snad
tak nevadi) v knize Windows pro pokrocile a experty od Jeffrey Richtera
(nakladatelstvi Computer press)
S pozdravem Marek Eichler
----- Original Message -----
From: "Ji�� G�th" <jiri_goth(zv)gordic(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 18, 2001 8:49 AM
Subject: Dotaz na rozmisteni ikon na pracovni plose
> Ahoj,
> mel bych dotaz.
> Nevite nekdo, kde jsou uschovane posice icon na pracovni plose ve WINDOWS?
> Obcas se mi stane, ze se mi icony nejak nemile preskupi a ja bych si chtel
> jejich puvodni nastaveni ulozit.
>
> Jiri Goth
>Dotaz na rozmisteni ikon na pracovni plose
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 22:31:05
From: "Marek Eichler" <marek.eichler(zv)atlas(tec)cz>
> tak tohle je vyreseno s popisem i se zdrojovym kodem (sice v C, ale to snad
> tak nevadi) v knize Windows pro pokrocile a experty od Jeffrey Richtera
Ahoj,
pravda, je to priklad na pouziti hook funkci, bohuzel do Delphi se tohle dost
spatne prepisuje, protoze RTL na tohle neni prilis dobre navrzena. Zasadni
problem byl sice odstranen v D5, ale stale jsou s tim i jine problemy, alespon
dle ohlasu v borland.public.delphi.winapi newsech. Mimochodem, ta kapitola ma
naprosto uzasny cesky preklad: Naockovani knihovny pomoci zavesu oken ;-))
Petr Vones, amatersky programator
Import knihovny SQLDMO
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 22:45:23
From: "Petr Reichl" <p.reichl(zv)gmc.net>
> snazim se naimportovat SQLDMO knihovnu z SQL Serveru, ale kdyz dam
> Project/Import Type Library a vyberu Microsoft SQLDMO Object Library a
> stisknu bud Create Unit nebo Install... tak to hlasi, ze objekt TDatabase uz
> existuje.
Ahoj,
clanek o SQL DMO v Delphi najdes tady, je tam popsan i problem s importem:
http://www.delphizine.com/features/2000/06/di200006jp_f/di200006jp_f.asp
Petr Vones, amatersky programator
TreeView & Icon
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 22:53:32
From: "Ji�� Ko�ara" <pazout(zv)sport(tec)cz>
> Nevite prosim, zda se daji nejak nastavovat icony v Treeview bez pouziti
> ListImage?
Ahoj,
vicemene nedaji, pouziti TImageListu je ale vcelku snadne, v cem je problem ?
Petr Vones, amatersky programator
Aktivace SpeedButton
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 22:59:12
From: "Petr Reichl" <p.reichl(zv)gmc.net>
> pouzivam nekolik SpeedButtonu s tim, ze vzdy muze byt zamackly jenom jeden
> nebo zadny. Kdyz kliknu mysi na jednoho z nich tak se zamackne ... v
> poradku, aktivuju-li ovsem tento button shortcutem (&Ahoj), tak se button
> nezamackne. Zkousel jsem to pomoci
Ahoj,
podivej se na vlastnost GroupIndex, nicmene misto TSpeedButtonu bych spis
pouzil TToolBar.
Petr Vones, amatersky programator
TWinControl a spotreba systemovych zdroju
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.1.2001 23:01:15
From: "Petr Adasek" <petr.adasek(zv)iol(tec)cz>
> Vim, ze to reseni je koncepcne ponekud silene (proto to resim),
> ale tajne jsem doufal, ze by mozna bylo resenim napsat si vlastni
> komponentu na bazi TControl.
Ahoj,
obavam se, ze to neni reseni (nezkousel jsem ale nic podobneho). Bude asi
lepsi to prepsat nejakym lepsim zpusobem.
Petr Vones, amatersky programator
Zmena vysky riadku v TDBGrid
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 18.1.2001 23:07:50
Zdravim.
Ako zmenim vysku riadku v DBGrid ?
Dakujem.
roland.LiteStep vvm
[*] Hurricane <hurricane(zv)quick(tec)cz> - 18.1.2001 23:11:08
Zdravim
Tento muj dotaz ohledne LiteStepu primo souvisi s Delphi. Jde o to, ze kazda
(i ta nejjednodussi - pouze cisty Form) aplikace napsana v Delphi 3 (ty mam
ja, jak v jinejch nevim) i D3 samotny si nejak nerozumi s
VirtualDesktopManagerem. ( proste virtualni desktopy ) a Task Managerem. Pri
pouziti Explorer.exe jako shellu tento problem neni, pouze v LiteStepu. Kdyz
problematickou aplikaci spustim, normalne se objevi TaskButton, ale neoznaci
se jako vybrany, i kdyz je aplikace aktivni. Kdyz jsem na jinem desktopu a
kliknu na TaskButon z jineho desktopu, nekdy se to prepne, ale vetsinou ne.
Vypada to, jako by DesktopManager kazdemu oknu pridal property s cislem
virtualniho desktopu, ale aplikacim z Delphi ne, nebo jako by to nejak
nepochopily. Jeste kdyz kliknu pravym mysim zlacitkem, na malou chvilku se
TaskButton selectne a vyskoci i PopupMenu, ale hned to zase zmizi. Obtizne
se to vysvetluje, chtelo by to videt. Netusite nekdo, cim by to mohlo byt,
nebo jestli existuje komponenta, ktera udela aplikaci kompatibilni s timto
Desktop Managerem.
Diky vsem, kdo poradi
Hurricane
Data z kamery
[*] Hurricane <hurricane(zv)quick(tec)cz> - 18.1.2001 23:16:57
Zdravim
Delka kabelu se omezuje ze dvou duvodu. Za prve kvuli chytani ruseni zvenku
a od ostatnich zil. A za druhe kvuli utlumu ve vedeni (vlastnimu odporu
dratu). Netvrdim, ze to bude fungovat, ale kdyz vezmes kvalitni jednozilove
kvalitne stinene kabliky a vyrobis si z nich USB kabel, mozna by to mohlo
jit. ALE NEZARUCUJU TO.
P. S.: Me se podarilo spojit dve PC 25m dlouhym LPT kabelem. IMHO se udava
jako maximum 7m.
Hurricane
----- Original Message -----
From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
To: "forum" <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, January 17, 2001 11:04 AM
Subject: Data z kamery
> Ahoj
>
> Mam kameru na USB rozhrani, tou bych chtel sledovat prostor, ktery je
> vzdalen 20 metru.
> Bohuzel, docetl jsem se, ze USB muze mit max. delku 5 m.
> Nevite nekdo jak by se to dalo resit?
>
> Dekuji
>
>
>Neprazdne premenne.
[*] Roland Turcan \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 18.1.2001 23:27:52
Zdravim.
Vytvaram okno cez Application.CreateForm a v nom je definovany zaznam typu
Record s roznymi typy poli. Pokial po FreeAndNil(Okno) okno uvolnim a
nasledne ho potom vytvorim, stane sa ze premenne obsahuju data z minuleho
pouzitia okna. Co s tym ? Mam stale pri vytvoreni zadavat
with Zaznam do
begin
Cislo:=0;
Text:='';
...
end;
alebo existuje aj nejake rozumnejsie riesenie ?
Dakujem.
roland.Popup menu a klav. zkratky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.1.2001 04:13:11
From: "Jan Krizek" <krizek(zv)krizkules(tec)cz>
> Ale jde mi o nasledujici. Kdyz do PopupMenu pridam TItemMenu s propertou
Shortcut = Del nebo taky Ctrl+V, Ctrl+C. Tak pak mi nefunguje klavesa Del v
TEdit komponente, ktera s tim PopupMenu vubec nesouvisi. Krome toho, ze je na
stejnym TForm.
Ahoj,
to je logicke, protoze shortcut ma vetsi 'prioritu'. Nebylo by jednodussi
zvolit nejaky jiny, ktery nekoliduje s ovladanim TEdit komponenty ? Jinak v
nouzi by to mohlo jit resit i takto, ovsem nutno vyzkouset v kontextu cele
aplikace:
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled:
Boolean);
begin
with Msg do
if (message >= WM_KEYFIRST) and (message <= WM_KEYLAST) and
(Screen.ActiveControl is TCustomEdit) then
begin
TranslateMessage(Msg);
DispatchMessage(Msg);
Handled := True;
end;
end;
Petr Vones, amatersky programator
kde najdu popis IO Errors ?
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 19.1.2001 06:36:27
Vsichni kdo chcou program, kter� v�m vyp�se popis chyby v cestine, tak si ho
st�hnete na adrese http:\\pjsoft.kgb(tec)cz\errorcodes.zip.
Petr Jur�k, Spr�vce s�te
COMET System s.r.o.
1.M�je 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
----- Original Message -----
From: "Parizsky Ladislav" <parizsky(zv)access-it(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, January 18, 2001 6:25 PM
Subject: RE: kde najdu popis IO Errors ?> Me taky prosim.
>
> Dekuji Ladap
>
> >>> spravca(zv)lumen.sk 17.1.01 19:24 >>>
>
> Prosim mohli by ste ich poslat aj mne tie Win32 error.
>
> Dakujem
>
> S pozdravom Robert Suska
>
>
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 05.01.01
BDE a MS Acces 2000
[*] Pavel Lavicka <plavicka(zv)mbox.vol(tec)cz> - 19.1.2001 07:16:10
Ahoj vsichni,
nevite nekdo, zda existuje nativni driver pro Microsoft Acces 2000 pro BDE.
Pouzivam BDE verze 5.11 a ten umi primo pracovat pouze s datbazi ve formatu
MS Acces 97. Vim ze bych mohl pouzit napr. ODBC, ale nechce se mi kvuli tomu
prepisovat aplikaci. Diky za kazdou radu a preji hezky den.
Pavel Lavicka
MP3
[*] Ing. Ji�� Vojtek <j vojtek(zv)del(tec)cz> - 19.1.2001 07:17:25
Pokud mas nainstalovany konec ci mas novejsi windows tak to umi i stokrat
proklinany TmediaPlayer. Ja jsem to tak delal. Prehraval jsem skladby
jakmile mi je nekdo soupnul do adresare at slo o Wav nebo mp3. Pokud chces
muzu Ti to poslat. Jiri Vojtek.
PS. Jinak na Torry je spousta komponent ktere to umi i bez TmediaPlayeru
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ondrej Skipala
Sent: Thursday, January 18, 2001 7:45 AM
To: delphi-l(zv)fwd(tec)cz
Subject: MP3
Nev�te n�kdo zda-li je mo�n� a jak p�ehr�t v Delphi skladbu form�tu MP3?
_____________________________________________________________________
Jak� bude po�as�? http://pocasi.seznam(tec)cz
Popup menu a klav. zkratky
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 19.1.2001 08:09:59
Mozes nastavit caption danej polozky
menu v OnCreate napriklad:
mClose.Caption := mClose.Caption + #9'Alt+F4';
Vlkovic
> Odpoved na to druhe by se mi hodila, protoze bych
> rad mel v main menu posledni polozku :
>
> Ukoncit Alt+F4
>
> Alt+F4 nelze pridelit k Shortcut.
>MP3
[*] KadaneM(zv)sdc.pce.cdrail(tec)cz - 19.1.2001 08:23:17
N�kde na Torry v oblasti Plug-In je popis plug-in� do WinAmpu jak vstupn�ch
tak i v�stupn�ch.Zkou#el jsem to a sta�ej� ti jen dv� dll knihovny a nemus�#
m�t nainstalovan� ��dny codec na MP3.
Mirek K.
-----Original Message-----
From: Ondrej Skipala [mailto:OSkip(zv)seznam(tec)cz]
Sent: Thursday, January 18, 2001 7:45 AM
To: delphi-l(zv)fwd(tec)cz
Subject: MP3
Nev�te n�kdo zda-li je mo�n� a jak p�ehr�t v Delphi skladbu form�tu MP3?
_____________________________________________________________________
Jak� bude po�as�? http://pocasi.seznam(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 5.1.2001
progr. TAPI
[*] iturcan(zv)gamo.sk - 19.1.2001 09:04:38
samozrejme.
Cele to spociva v tom ze pokial mi fn. LineInitializeEx vrati pocet
zariadeni 4 tak na niektorych zariadeniach pri zistovani informacii pomocou
fn. LineGetDevCaps to vrati chybu:
lineGetDevCaps: The application requested an API version or version range
that is either incompatible or
cannot be cupported by the Telephony API implementation and/or
corresponding service provider
riesim to tak ze zariadenie ignorujem. Stale ma vsak zaujima preco ten stav
nastal a to aj pri pouziti TAPI 3, takze som to poslal na Microsoft a
uvidim co oni na to
Ivan Turcan
Sula Milos
<milos.sula(zv)o To: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
ku-su(tec)cz> cc:
Sent by: Subject: RE: progr. TAPI
owner-delphi-
l(zv)fwd(tec)cz
18.01.2001
12:48
Please
respond to
delphi-l
a je tam nainstalovany SP ?
-----Original Message-----
From: iturcan(zv)gamo.sk [mailto:iturcan(zv)gamo.sk]
Sent: Thursday, January 18, 2001 10:02 AM
To: delphi-l(zv)fwd(tec)cz
Subject: progr. TAPI
Ahoj lidi,
mam napisane komponenty na modemovu komunikaciu, tieto su postavene nad
TAPI rozhranim.
Mensi problem mi nastal pri pouzivani TAPI rozhrania na platforme Win2000.
Pri inicializovani Line, volam funkciu
LineInitializeex ((zv)fLineApp, MainInstance, LineCallback, '',
FNumDevs,fversion,liex)
tato funkcia bezi o.k. avsak po precitani poctu dostupnych zariadeni
(FNumDevs) dostanem cislo 4. A prave to je problem pretoze na danom PC mam
nainstalovany len 1 modem.
Toto sposobuje problemy , pretoze ak sa odkazem na cislo>1 tak dostanem
chybovu hlasku "incompatible version"
(ako fversion do procedury som skusal dat verziu TAPI 2 aj TAPI 3)
Ma niekto ideu ako dostat spravne cislo poctu funkcnych TAPI zariadeni
Dakujem
Ivan Turcan
Install Shield problem s D5
[*] #u�ka R�bert <spravca(zv)lumen.sk> - 19.1.2001 09:19:06
Ked naprogramujem nejaky databazovy program pod D5 Enterprise a urobim z
toho instalacku v Install Shield-e pribalenom na tom CD kde je D5 a po
nainstalovani vytvorenej instalacky na iny pocitac kde nie je nainstalovane
D5 mi jednoducho vyhlasi Access Violation a program nesputim, pokial ale
nenainstalujem BDE z D5 CD na to PC kde instalujem ten program. Co je s
tym??? Neviete niekto?
Dakujem
S pozdravom,
------------------------------------------------
R�bert �u#ka, spr�vca siete
R�dio Lumen, Bansk� Bystrica
Slovensk� republika
www.lumen.sk
spravca(zv)lumen.sk
088/41 25 739 kl.14
------------------------------------------------
DBF soubory
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 19.1.2001 09:20:09
Pouzij index, poradi vet v DB neni definovano a ani neni dobre se na to
spolehat.
Index vlastne obsahuje poradi, v jakem mas cist vety z DB, aby vyhovovaly
urcitemu
poradi (Ve skutecnosti je to kapanek slozitejsi, ale pro pohopeni vyznamu
by to melo stacit).
Slavek
PS: Pokud na tom trvas, tak vytvor novou tabulku a pomoci BatchCopy to tam
prenes.
>
> Toto tak uplne nechapu,
> platnych a zrusenych zaznamu, to znamena, ze kdyz smazu nejaky zaznam,
tak se na tomto miste cislo nezmensi?
>
> Mel bych tady jeste jeden dotaz: pri pouziti jednoducheho SQL dotazu
select * from tabulka.dbf order by sloupec1 se mi zobrazi nejaky vysledek.
> Muzete mi ale nekdo poradit jak co nejjednoduseji dostat toto poradi do
puvodni tabulky?DBF soubory
[*] Radek Janu� FSG <janus(zv)foresta(tec)cz> - 19.1.2001 09:27:43
Ahoj marne zkousim bojovat s prevodem DBF kamenika do Windowsu
Mam DBF tabulkuz Foxky v kameniku a potreboval byl prevest jeji data do
win1250.
Tabulka obsahuje i Blop pole cili potreboval bych je prevest vcetne nich.
Zkousel jsem ruzne prevadece z internetu ale bez vetsich uspechu. Nevite
nekdo jak na to ?
Diky moc radek
informace o .exe souboru
[*] Tom� =?ISO-8859-1?Q?V�tek <tvitek(zv)centrum(tec)cz> - 19.1.2001 09:43:18
Potreboval bych zjistit informace o .exe souboru (zda se jedna o DOS nebo Win aplikaci, pokud jsou ulozene informace o verzi tak i ty).
Tomas Vitek
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
CoolForm a Mask
[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 19.1.2001 09:47:55
Ahoj,
ja osobne pouzivam coolform pomerne casto a nemam s tim zadne problemy.
Postup je nasledujici: nejprve nahrajes bitmapu do coolformu. Potom
zamacknes mask. Pravym tlacitkem oznacis maskovanou barvu a kliknes na
fajfku. Pak masker zavres, zkompilujes a fungujes :))
Jestli budes mit nejaky problem, napis.
Batex
PS: Zkousel jsem to na rychlo instalnout do D5Prof, ale tam mi to hodilo
fuuuru erroru. V D3 to fakci bez problemu :)> Cauky lidi,
> stahnul jsem si s torry.ru komponentu zvanou CoolForm (o tej zde byla
> pred casem mala zminka) ... udajne ma umet to, ze kdyz se na ni umisti
> lbovolna bitmapa a vybere se na ni transparentni barva, pak formular ma
umet
> zachovat tvar bitmapy a tudiz nebude obdelnikovy ci elipticky, ale klidne
i
> nepravidelny .... no a to je problem
>
> ... proste mi to nejak nefacha tak, jak by melo :(((
>
> ... sice se mi zobrazi bitmapa tak, ze neni videt barva navolena jako
> transparentni, ale i tak formular porad zachovava tvar obdelniku s tou
> zmenou, ze na sobe ma navolenou bitmapu.
>
> .... pochopil jsem spatne funkci teto komponenty a chci po ni neco, co
> neumi a nebo to delam blbe ?
>
> Pokud nekdo mate zkusenosti s touto komponentou, budu rad za kazdou pomoc
> ... treba i zasl�ani maleho nezkompilovaneho demicka .
>
> S pozdravem MIlan
>
> =============
> Milan S.
> Informacni technologie
> SOSE-SOU Usti n/L
Data z kamery
[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 19.1.2001 09:54:36
> AHOJ,
>
> problem s kamerou by sel resit pomoci specialnich kamer, ktere maji
> integrovany vysilac
> pro prenos dat v pasmu 2,4GHz (dosah cca 30 - 40m). Tyto kamery mame
> rozjednane na dovoz z USA a pozor
> cena do 3500Kc za jednu kameru. Plus nejaka castka za prijimaci jednotku -
> cca 4000Kc (k jedne prijimaci jednotce lze pripojit vice
> jednotlivych kamer.
> Osobni zkusenosti zatim nemame, ale v pripade zajmu muzeme urychlit
dodavku
> testovaciho vzorku.
> Otazkou je, zda tech pozadovanych 20m je ve volnem prostoru nebo v budove
?
>
> M.Blazek
Ahoj,
Pan Blazek mi svym prispevkem vnuknul jeste jeden napad. V nekolika
firmach s elektronikou jsem videl prodavat kamery (CB i bar) , ke kterym se
dal koupit taky televizni modulator s vysilacem. Dosah tohoto zarizeni je
cca 50m a signal lze naladit na jakem koliv televizoru se zapadni normou.
Pokud pouzijes TV kartu v PCdle cele to koupis cca za 5000,- Kc a muzes s
tim softwareove pracovat. Pokud bys mel zajem o kontakt na firmu, ktera to
prodava, ozvi se.
Batex
DBF soubory
[*] Koukal Pavel <Pavel.Koukal(zv)pvt(tec)cz> - 19.1.2001 09:59:51
Kdyz se smaze zaznam z DBF tabulky, tak ten zaznam tam fyzicky stale je ale
je oznacen jako smazany. Kazdy zaznam v DBF souboru ma prvni byte rezervovan
pro identifikaci zda je smazan ci nikoliv.
Pokud tam je hvezdicka ($2A), tak je smazan a pokud tam je mezera ($20) tak
je zaznam platny. Pro fyzicky vymaz vsech smazanych vet je treba potom
zavolat "pack". Coz neni nic jineho nez ze se vytvori novy soubor, kam se
zkopiruji vsechny platne zaznamy.
Pack udelas napr. takto:
Table1.Exclusive := True; // musi byt exclusive
Table1.Open;
DBIPackTable(Table1.DBHandle, Table1.Handle, PChar(Table1.TableName),
szDBASE, TRUE); // podrobneji viz help
Tedy kdyz smazes nejaky zaznam v DBF a neudelas jeste pack, tak se pocet
zaznamu v hlavicce DBF nezmeni.
S pozdravem Pavel Koukal
> From: "Mirek Drejeek" [mailto:drejcek(zv)schkocr(tec)cz]
> Sent: Thursday, January 18, 2001 2:49 PM
> To: Konference Delphi
> Subject: RE: DBF soubory
>
>
> Toto tak uplne nechapu,
> platnych a zrusenych zaznamu, to znamena, ze kdyz smazu
> nejaky zaznam, tak se na tomto miste cislo nezmensi?
> Kopirovani vice souboru
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 19.1.2001 10:01:15
Cau,
Jak by jste v Delphi resily tento dosovskej prikaz:
Copy C:\Dokumenty\prace*.doc C:\Dokumenty\Zal
diky moc za radu
Ladap
informace o .exe souboru
[*] azeleny(zv)csas(tec)cz - 19.1.2001 10:19:24
Podivej se na strukturu VS_VERSION_INFO (nebo tak nejak) a prilehle API fce
(VerQuerValue()...).
Jsou na to komponenty, nebo se podivej do JCL.
Jednou z informaci je i platrforma, pro kterou dany soubor je.
a.
> -----Original Message-----
> From: "Tom�1V�tek" [mailto:tvitek(zv)centrum(tec)cz]
> Sent: Friday, January 19, 2001 9:43 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: informace o .exe souboru
>
>
> Potreboval bych zjistit informace o .exe souboru (zda se
> jedna o DOS nebo Win aplikaci, pokud jsou ulozene informace o
> verzi tak i ty).
>
> Tomas Vitek
>
> K chatov�n� je tu http://www.XChat(tec)cz
> Zalozte si svuj mail na http://mail.centrum(tec)cz
> tisk obrazku v sestavach Sinea
[*] Petr Ma��k <rtepema(zv)mbox.vol(tec)cz> - 19.1.2001 10:21:30
Zdravim,
vyskytl se mi problem. V editaci sestavy zaradim obrazek BMP ( do oddilu
zacatek sestavy, v jinych oddilech je to stejne). Ten se pri editaci
zobrazuje spravne, pokud provedu Preview, je misto obrazku cerny ctverecek.
Totez je i pri tisku. Mam Delphi 3.02, generator 3.39r z 8.3.2000. Nemohu
prijit na to, kde je problem.
Predlohu sestavy vytvarim dynamicky pri vyvolani editace nebo pri tisku z
memo pole tabulky tTisky (paradox tabulka)
function TfTisky.SestavaNactiPredlohu(Sender: TSestava): Boolean;
begin
...
Sender.Predloha.Assign(tTisky.FieldByName('PREDLOHA') as TMemoField);
..
end;
Vse ostatni pri tisku funguje, jen ty obrazky...
Petr Ma��k
rtepema(zv)mbox.vol(tec)cz
SMS
[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 19.1.2001 10:32:30
Ahoj,
souhlasim se vsemi odpovedmi a ted navic pridam jeste jednu:
Myslim, ze existuje mnohem jednodussi zpusob (a hlavne levnejsi) nez pouziti
gsm brany. Samozrejmne nelze zarucit 100% spolehlivost. Jedna se vlastne o
to, ze aplikace posle protokolem http odkaz na stranky gsm bran jednotlivych
operatoru. Pro posilani pouzivam komponendu HTTPClient z balicku Indy. Eurotel :
http://www2.eurotel(tec)cz/sms/index.html
c_aTMzMGlzZWg3ZFpJMg=OmayjqDaCDYAAFAjbqE
c_aTN5dWhCM3hPTWlNLg=none
c_aTNnUE1vdzh1QnppQQ= predvolba (601,602... bez nuly !)
n_number= cislo prijemce (123456)
n_email= email odesilatele
c_aTN5dWhCM3hPTWlNLg=none
c_aTNiL3FTMGRESTZyZw= typ zpravy (sms-klasicka sms / show-jen
ukazat na display)
c_aTN5cXBLMHp1OGNKaw=text
c_aTM2bGFHWmNpd2NNSQ=Odeslat zpr�vu
c_aTNWSllXZUtyMDhXNg= napsano zanku (0)
c_aTNnbUtSSG53VGMzUQ= zbyva znaku (750)
c_aTNLNm13WlVESVA5cw= rozdeleno do (1)
Paegas:
http://sms.paegas(tec)cz/cgi-bin/sms/wwwsms a parametry:
prefix= predvolba (0603)
number= cislo (944965)
email= mail odesilatele
mtype=1 (tak to nevim, ale je tam jednicka)
text= text zpravy
submit=Odeslat
cntr1= pocet volnych znaku (713)
key=462646
c5e626c5268627c546
66268f27e627072606
c6c6068f27e6270726
2646c6068fa9ed4f2d
8d8d2ce586c5060405
6cedad0e2c8e2d4c8dac6704a96a29a804a6c5a66704ea2dcd8cedee6e04270725
(zase nejaky CRC)
cntr2= pocet napsanych znaku (64) // celkem centr1+centr2=777
U Paegasu je ale jeste
jeden problem a sice: skript si hlida IP, ze ktereho prichazi zadost na
poslani sms a nedovoli poslat vice nez jednu sms za asi 90 sekund. To budes
muset osetrit. Jinak to chodi bezvadne :))
Oskar: popis najdes v mem nekterem predchozim prizpevku
K tomu ppp... To ppp se chova jako nejaky CRC ale ne kodu,
ktery posilas, nybrz kodu ktery je na www a v tom php skriptu. Php se
neustale meni a vylepsuje a tim kodem ppp se zarucuje zpetna kompatibilita,
aby se v pripade nejakych chyb dal ten stary skript jednoduse obnovit pouze
zmenou toho ppp z webu. Ten ppp nema zadnou rozumnou souvislost s tim, co
vidis ty. Ma jen nejake souvislosti prave s tim php skriptem na serveru. Z
toho vyplyva - nedelej si z toho hlavu... proste, az to prestane fungovat
(az ten kod zmeni ) zmenis ho taky :))) a bude to o5 funkcni :))) Me to teda
fungue bez chyby - pouzivam to k preposlani prave zaregistrovaneho nicku na
mem chatu :)
Ted jeste trosku teorie k tvorbe odkazu neboli simulace formulaze z
metodou post:
nejdrive samozrejme vlozime adresu stranky na webu napr.
http://www.server(tec)cz/sms.php . Dale nasleduje otaznik (?) a pokracuji
jednotlive promenne, ktere se posilaji oddelene amperstandem (&). Dejme
tomu, ze posilame nasledujici tri promenne:
jmeno=Peter
prijmeni=Lukacs
telefon=0608700114
Vysledny odkaz bude vypadat nasledovne:
http://www.server(tec)cz/sms.php?jmeno=Peter&prijmeni=Lukacs&telefon=0608700114
. Jednoduche :)) Problem vsak muze nastat, kdyz prenasime delsi text
obsahujici jine znaky nez pismena bez diakritiky a cisla. Dejme tomu, ze
potrebujeme prenest nasledujici text: "Ahoj, m�m r�d Delphi a konferenci
:))" Bude vypadat takto:
Ahoj%2C+m%E1m+r%E1d+Delphi+a+konferenci+%3A%29%29
Z toho je zrejme, ze doslo k nahrade znaku. A sice: mezery ( ) se prenaseji
jako plus (+), carka (,) jako (%2C) atd... Obecne plati, ze se nepovolene
znaky prenaseji jako znak procenta a hexadecimalni kod toho daneho znaku.
napr: male a s carkou (�) nahradime (%E1).
Doufam, ze jsem odpovedel na vsechny polozene dotazy. Jestli se snad
najde jeste nejaky problem, napiste.
Batex
None
[*] Milan Dvo��k <Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz> - 19.1.2001 10:40:44
> Ahoj marne zkousim bojovat s prevodem DBF kamenika do Windowsu
> Mam DBF tabulkuz Foxky v kameniku a potreboval byl prevest jeji data do
> win1250.
> Tabulka obsahuje i Blop pole cili potreboval bych je prevest vcetne nich.
> Zkousel jsem ruzne prevadece z internetu ale bez vetsich uspechu. Nevite
> nekdo jak na to ?
>
> Diky moc radek
>
>
>
Nevim jak DBF, ale DB se da delat tak, ze si zalozis novou tabulku
stejme struktury jako v kameniku, pouze LangDriver bude Windows1250 a
pak "superaplikaci" v Delphi to presypes z jedne do druhe (nevim
jestli to jde BatchMove, urcite to pujde proskanovanim a
AppendRecordem).
P.S. Nezapomen psat subjekt
Milan Dvorak
dvorak(zv)gymzn(tec)cz
Debug in design time
[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 19.1.2001 11:01:39
Mam nasledujici dotaz.
Je mozne abych mohl ladit (nastavit si break point) svou vlastni componentu, kdyz ji z tool boxu umistim na formular a menim si vlastnosti?
Kdyz si componentu vytvorim na formulari dynamicky tak to funguje bohuzel spravne. A nejsem schopen zjistit kde je problem?
PROSOFT Kromeriz s.r.o.
Soudni 1293
KROMERIZ 767 01
Czech Republic
tel/fax 0420 (0)634 333545
GSM: 0420 (0)608 887070
GSM 0420 (0)608 887071
e-mail: prosoft(zv)prosoft(tec)cz
Funkcia v assemberi vracajuca string
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 19.1.2001 11:10:51
Ahoj,
potreboval by som poradit, ako v assemblerovskej
funkcii vratit string.
Nieco na sposob:
FUNCTION Action: string; assembler;
ASM
...
vytvorenie noveho retazca
pozadovana akcia s retazcom
priradenie retazca do Result
...
END;
Pozeral som v zdrojaku SYSTEM.PAS, ako funguje praca
s retazcami v assemblerovskych rutinach, chcel som
vyuzit napriklad _NewAnsiString, ale kompilator ma
k tejto funkcii nepusti (je pri nej poznamka len pre
ladiacke ucely!?).
Mimochodom, aky je vyznam identifikatora "_" na
zaciatku nazvu niektorych rutin v tejto unite?.
Pri prehladavani zdrojakov k Delphi (D3) som
nikde nenasiel implementaciu assemblerovskej
funkcie vracajucej string - naozaj to v Delphi
nie je mozne?
Vlkovic
Vyroba fontu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 19.1.2001 11:13:20
Ahoj
mam dva dotazy:
1/ Potrebuji *.TTF font prilinkovat k EXE, za behu EXE ho zaregistrovat
a po ukonceni programu ho odregistrovat. Jak se to, prosim, da udelat?
2/ Mam font, ktery je ve ctyrech oddelenych souborech
(Thin,Bold,Italic,ItalicBold); jak z techto souboru udelam jeden?
Dekuji
Jaro B.TImage a podporovane formaty !
[*] Jan Grman <janog(zv)pluto.elf.stuba.sk> - 19.1.2001 11:28:14
Ahoj.
Na zobrazovanie obrazkov roznych formatov pouzivam komponent TImage.
Vie robit:
- BMP, WMF, EMF - standardne (ak sa nemylim)
- JPG, JPEG (ak sa pouziva jpeg a registruju sa pripony pre triedu
TJPEGImage)
- GIF (ak sa pouziva RxGif a registruje sa pripona pre triedu TGIFImage)
Otazka: Existuju dalsie taketo triedy aj pre zobrazovanie inych formatov ?
TIFF, PCX, TGA, ....
Vdaka za odpovede.
janog(zv)pluto.elf.stuba.sk, Delphi 5
SMS
[*] #u�ka R�bert <spravca(zv)lumen.sk> - 19.1.2001 11:44:12
Najde sa dobra dusa a posle mi fragment zdrojaku kde sa pise ako sa
konektnut na server SMS a ako mu poslat ten gulas aby poslal SMS ??? napr
cez oscar alebo mtnsms, napr. cez komponentu FastNet - NMSMTP. Neviem ju
obsluzit. PROSIIIIIM.
Dakujem
Cteni dat z externiho programu
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 19.1.2001 11:48:55
Cau
potreboval bych poradit jak z externiho programu vycucnu data z listboxu v
Delphi. Je mozne nejak zjistit napr handle toho listboxu a dotazat se ho ?
dik
TWinControl a spotreba systemovych zdroju (pro P.
[*] Petr Adasek <petr.adasek(zv)iol(tec)cz> - 19.1.2001 11:48:02
> Ahoj,
> obavam se, ze to neni reseni (nezkousel jsem ale nic podobneho). Bude asi
> lepsi to prepsat nejakym lepsim zpusobem.
>
> Petr Vones, amatersky programator
>
Ahoj,
Uz se stalo - rozhodl jsem se nakonec pro kompletni prepracovani aplikace.
Napsal jsem si par komponent na bazi TGraphicControl, ktere mi svymi
vlastnosti postacuji a uplne zmenil filosofii zobrazovani a obsluhy tech
grafickych objektu.
Vysledek se dostavil cca po tydnu prace - problemy se syst. zdroji jsou
minulosti a i zobrazovani je rychlejsi.
Da se tedy rici ze pripad TWinControl je uzavren :))
TOBE DIKY za vyznamne prispeni k tomu, ze jsem se dokopal k prepsani
toho paskvilu do formy, za kterou se myslim nemusim stydet :))
Petr Adasek
---
Odchoz� zpr�va neobsahuje zn�m� viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 5.1.2001
Sietova prevadzka s BDE
[*] mms(zv)host.sk - 19.1.2001 11:57:25
Ahojte,
(ospravedlnte trochu dlhsi prispevok)
Mam aplikaciu, povodne urobenu na tabulkach paradox, ale pomocou komponent
Query miesto table. Teraz chcem tuto aplikaciu pouzivat s Interbase (s BDE
cez SQL Link).
Chel som v nej vyhladat slabe miesta a pripadne ich prerobit.
Ked som ju skusal na lokalnom serveri tak to bolo take rychle ze som
nestacil zaznamenat nic.
Tak som databazu umiestnil na server, ktory je v internete a pripajam sa k
nemu s touto aplikaciou cez inetrnet
pomocou telefonickeho pripojenia.
A tu je problem - otvaranie Query, ktore potom zobrazim v DBGridoch (mam 8
tabuliek v databazi) trva niekolko minut (podotykam ze tabulky su este
prazdne - ziadne udaje tam nie su).
Pritom ale modem pracuje na plny vykon aj smerom von aj smerom dovnutra. Ked
sa pozriem podrobnejsie na to co sa na linke deje tak smerom do pocitaca
pride cca. 400KB udajov.
To by ale nebolo to najhorsie.
Ked vsak vo formulari chcem otvorit nejaky dbkombobox,dblookupcombobox,
alebo stlacim + na DBNavigatore tak sa vzdy niekolko minut deje to iste -
modem sa ide zavarit.
Ja som si myslel ze komponenta Query pracuje tak, ze na server sa posle par
bytov - dotaz SQL, potom to server spracuje a posle mi tie zaznamy, ktore
zodpovedaju tomu dotazu. Cize aj modem by mal odoslat smerom tam par bytov a
prijat len tych par, alebo vela bytov co tvoria zaznamy vysledku dotazu
Ked skusam pustit aplikaciu co som robil na MySQL server pomocou komponent
ZEOS, tak tam to tak funguje, ze modem blikne pri odosielani dotazu, potom
je chvilu ticho a potom uz idu data sem.
Pouzivam komponenty Query s komponentami UpDateSQL, mam nastavene
CacheUpdate=True , na formulari mam dbgrid a dbnavigator, v Query pri
udalosti BeforePost volam ApllyUpDates (takze query sa mi sprava rovnako
ako keby som pracoval s tabulkou).
Ta sietova prevadzka mi nejde do hlavy, ak takto mohutne komunikuje SQL link
cez BDE v sieti tak vlastne jedna z hlavnych vyhod SQL serverov - mensia
zataz siete - je v pripade pouzitia SQL linku a BDE potlacena .
Ked sa pripojim pomocou ODBC tak je to to iste. Tak si myslim ze to asi
sposobuje samotne BDE.
Nemam niekde nieco spatne nastavene?
Ved BDE SQL Linky pre SQL databazy okrem Interbase su sucastou Delphi
Enterprise z toho vyplyva ze by to mal byt plnohodnotny nastroj nie?
Install Shield problem s D5
[*] SSOU Vodochody s.r.o. <ssouvodochody(zv)mbox.vol(tec)cz> - 19.1.2001 12:25:31
Nevim jak v D5 a jeho Install Shieldu, ale v D2 se musi pri generovani
obrazu disket zaskrtnout volba, ze ma byt BDE soucasti instalacnich disket
programu, nebot databaze provozovana pres BDE bez BDE chodit nebude ;o)))
VW
----- Original Message -----
From: �u#ka R�bert <spravca(zv)lumen.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 19, 2001 9:19 AM
Subject: Install Shield problem s D5
> Ked naprogramujem nejaky databazovy program pod D5 Enterprise a urobim z
> toho instalacku v Install Shield-e pribalenom na tom CD kde je D5 a po
> nainstalovani vytvorenej instalacky na iny pocitac kde nie je
nainstalovane
> D5 mi jednoducho vyhlasi Access Violation a program nesputim, pokial ale
> nenainstalujem BDE z D5 CD na to PC kde instalujem ten program. Co je s
> tym??? Neviete niekto?
>
> Dakujem
>
> S pozdravom,
>
> ------------------------------------------------
> R�bert �u#ka, spr�vca siete
> R�dio Lumen, Bansk� Bystrica
> Slovensk� republika
> www.lumen.sk
> spravca(zv)lumen.sk
> 088/41 25 739 kl.14
> ------------------------------------------------
>
>Predani komponenty do metody OLE objektu
[*] Ing. Jaroslav Sipek <jaroslav.sipek(zv)idea(tec)cz> - 19.1.2001 12:25:12
Ahoj,
nemohl by mi nekdo poradit jak prepsat nasledujici VB kod do Delphi.
Jde mi o to, jak mam predat Text1 (komponeneta TextBox) v metode SetOutput.
V Delphi pouzivam TEdit.
Upozornuju predem, ze Edit1.Text ani Edit1.Handle nefunguje.
Sice se to korektne prelozi, spusti a probehne, ale v Editu se mi neobjevi
to co tiskne metoda PrintData. Ve VB to probehne OK.
VB:
Private Sub Command1_Click()
Dim obj As Object
Set factory = CreateObject("CacheObject.Factory")
factory.Connect (factory.ConnectDlg())
factory.SetOutput Text1
Set obj = factory.Static("%IOS.Test")
obj.PrintData
End Sub
Delphi:
factory := CreateOleObject('CacheObject.Factory');
factory.Connect(factory.ConnectDlg);
factory.SetOutput(Edit1) ????????????????????
obj := Factory.New('%IOS.Test');
obj.PrintData;
...
Pro upresneni: CacheObject.Factory je objekt, pres ktery se napojuji do
databaze.
Kdyz pak v databazi pouziju prikaz Write, tak by se mi mel prislusny text
vypsat
prave do Editu, ktery se preda v metode SetOutput.
Diky
Jaroslav Sipek
e-mail: jaroslav.sipek(zv)idea(tec)cz
None
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 19.1.2001 12:47:03
> Nevim jak DBF, ale DB se da delat tak, ze si zalozis novou tabulku
> stejme struktury jako v kameniku, pouze LangDriver bude Windows1250 a
> pak "superaplikaci" v Delphi to presypes z jedne do druhe (nevim
> jestli to jde BatchMove, urcite to pujde proskanovanim a
> AppendRecordem).
>
A pokud mas pripad nejakeho atypickeho kodovani cestiny, tak muzes zakazat
automatickou konervzi kodovani (nastavenim Transliterate := False; u
prislusneho pole) a u poli typu string a memo si provest konverzi ve vlastni
rezii.
T.
Kopirovani vice souboru
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 19.1.2001 12:55:03
skusil bych: CopyFile('C:\Dokumenty\prace*.doc',
'C:\Dokumenty\Zal\prace*.doc');
nebo
DIR := 'C:\Dokumenty';
FileListBox.Directory := DIR
FileListBox.Filter := 'prace*.doc';
for i := 0 to (FileListBox.Items.Count - 1) do
CopyFile(DIR + '\' + FileListBox.Items[i], DIR + '\Zal\' +
FileListBox.Items[i]);
S pozdravem Michal Tiller
-----Original Message-----
From: Parizsky Ladislav [mailto:parizsky(zv)access-it(tec)cz]
Sent: Friday, January 19, 2001 10:01 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Kopirovani vice souboru
Cau,
Jak by jste v Delphi resily tento dosovskej prikaz:
Copy C:\Dokumenty\prace*.doc C:\Dokumenty\Zal
diky moc za radu
Ladap
Kopirovani vice souboru
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 19.1.2001 13:22:52
Resil bych to asi takto :
var
sr : TSearchRec;
if (findfirst('cesta\*.doc', faAnyFile, sr)) then
repeat
CopyFile(sr.Name, 'druhacesta' + ExtractFileName ( sr.Name), false);
until ( findfirst(sr));
Petr Jur�k, Spr�vce s�te
COMET System s.r.o.
1.M�je 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
----- Original Message -----
From: "Parizsky Ladislav" <parizsky(zv)access-it(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 19, 2001 10:01 AM
Subject: Kopirovani vice souboru
> Cau,
> Jak by jste v Delphi resily tento dosovskej prikaz:
>
> Copy C:\Dokumenty\prace*.doc C:\Dokumenty\Zal
>
> diky moc za radu
>
> Ladap
>
>
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.226 / Virov� b�ze: 108 - datum vyd�n�: 05.01.01
Sietova prevadzka s BDE
[*] azeleny(zv)csas(tec)cz - 19.1.2001 13:37:26
DDV,
doporucuji, zapomente na BDE, pokud chcete pouzit IB, pripadne hledejte jine
nativni komponenty pro ostatni servery.
Chcete-li vedet, co se vlastne posila, pak pouzijte SQL monitor a uvidite,
co vsechno se vlastne pres ten modem taha - obsluha bufferovaneho datsetu je
narocna protoze SQL servery jsou nativne jednosmerne.
Doporucuji si nastavit v BDE administratoru SchemaCashe directory - usetrite
tim dotazy na struktury tabulek - natahnou se jednou a pak se to jiz necedi
pres modem. Samozrejme je to nutne promazat, pokud se zmeni struktura
databaze, pripadne existuji ruzna nastaveni v BDE, ktera si uz bohuzel davno
nepamatuji.
BDE je vyborny produkt, bohuzel se psatnym zadanim.
Snaha o takra univerzalni zapouzdreni cehokoliv vede nakonec k obrovske
vnitrni rezii a mnohde k neefektivnosti.
Snad to alespon trochu pomuze!
a.
-----------------------------------------------------------------------
Ales Zeleny (OK1UUE)
Ceska sporitelna a.s.
Na Perstyne 1
Praha 1
113 98
Czech republic
Email: azeleny(zv)csas(tec)cz
tel: +420 2 24995 236
-----------------------------------------------------------------------
Due to technical difficulties tomorrow has been postponed indefinitely.
> -----Original Message-----
> From: mms(zv)host.sk [mailto:mms(zv)host.sk]
> Sent: Friday, January 19, 2001 11:57 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Sietova prevadzka s BDE
>
>
> Ahojte,
> (ospravedlnte trochu dlhsi prispevok)
> Mam aplikaciu, povodne urobenu na tabulkach paradox, ale
> pomocou komponent
> Query miesto table. Teraz chcem tuto aplikaciu pouzivat s
> Interbase (s BDE
> cez SQL Link).
> Chel som v nej vyhladat slabe miesta a pripadne ich prerobit.
> Ked som ju skusal na lokalnom serveri tak to bolo take rychle ze som
> nestacil zaznamenat nic.
> Tak som databazu umiestnil na server, ktory je v internete a
> pripajam sa k
> nemu s touto aplikaciou cez inetrnet
> pomocou telefonickeho pripojenia.
> A tu je problem - otvaranie Query, ktore potom zobrazim v
> DBGridoch (mam 8
> tabuliek v databazi) trva niekolko minut (podotykam ze tabulky su este
> prazdne - ziadne udaje tam nie su).
> Pritom ale modem pracuje na plny vykon aj smerom von aj
> smerom dovnutra. Ked
> sa pozriem podrobnejsie na to co sa na linke deje tak smerom
> do pocitaca
> pride cca. 400KB udajov.
>
> To by ale nebolo to najhorsie.
> Ked vsak vo formulari chcem otvorit nejaky
> dbkombobox,dblookupcombobox,
> alebo stlacim + na DBNavigatore tak sa vzdy niekolko minut
> deje to iste -
> modem sa ide zavarit.
> Ja som si myslel ze komponenta Query pracuje tak, ze na
> server sa posle par
> bytov - dotaz SQL, potom to server spracuje a posle mi tie
> zaznamy, ktore
> zodpovedaju tomu dotazu. Cize aj modem by mal odoslat smerom
> tam par bytov a
> prijat len tych par, alebo vela bytov co tvoria zaznamy
> vysledku dotazu
>
> Ked skusam pustit aplikaciu co som robil na MySQL server
> pomocou komponent
> ZEOS, tak tam to tak funguje, ze modem blikne pri odosielani
> dotazu, potom
> je chvilu ticho a potom uz idu data sem.
>
> Pouzivam komponenty Query s komponentami UpDateSQL, mam nastavene
> CacheUpdate=True , na formulari mam dbgrid a dbnavigator, v Query pri
> udalosti BeforePost volam ApllyUpDates (takze query sa mi
> sprava rovnako
> ako keby som pracoval s tabulkou).
>
> Ta sietova prevadzka mi nejde do hlavy, ak takto mohutne
> komunikuje SQL link
> cez BDE v sieti tak vlastne jedna z hlavnych vyhod SQL
> serverov - mensia
> zataz siete - je v pripade pouzitia SQL linku a BDE potlacena .
>
> Ked sa pripojim pomocou ODBC tak je to to iste. Tak si myslim
> ze to asi
> sposobuje samotne BDE.
>
> Nemam niekde nieco spatne nastavene?
>
> Ved BDE SQL Linky pre SQL databazy okrem Interbase su sucastou Delphi
> Enterprise z toho vyplyva ze by to mal byt plnohodnotny nastroj nie?
>
>
> Sietova prevadzka s BDE
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.1.2001 13:41:36
From: <mms(zv)host.sk>
> Mam aplikaciu, povodne urobenu na tabulkach paradox, ale pomocou komponent
> Query miesto table. Teraz chcem tuto aplikaciu pouzivat s Interbase (s BDE
> cez SQL Link).
Ahoj,
ackoli se v databazich prilis nevyznam, tak myslim ze pouziti BDE na SQL
databazi neni prilis stastny napad. Navic v pripade IB existuji i nativni
komponenty (IBX), ktere jsou soucasti D5. Tusim ze je lze stahnout i pro
starsi verze Delphi, ale to bude vedet spis Pavel Cisar.
Petr Vones, amatersky programator
None
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 19.1.2001 13:44:31
Ahoj
Pod .DBF by to melo fungovat taky.
Jaromir Cermak
-----Original Message-----
From: Milan Dvo��k [mailto:Dvorak.Ucitel.GYMNAZIUM(zv)gymzn(tec)cz]
Sent: Friday, January 19, 2001 10:41 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re:
> Ahoj marne zkousim bojovat s prevodem DBF kamenika do Windowsu
> Mam DBF tabulkuz Foxky v kameniku a potreboval byl prevest jeji data do
> win1250.
> Tabulka obsahuje i Blop pole cili potreboval bych je prevest vcetne nich.
> Zkousel jsem ruzne prevadece z internetu ale bez vetsich uspechu. Nevite
> nekdo jak na to ?
>
> Diky moc radek
>
>
>
Nevim jak DBF, ale DB se da delat tak, ze si zalozis novou tabulku
stejme struktury jako v kameniku, pouze LangDriver bude Windows1250 a
pak "superaplikaci" v Delphi to presypes z jedne do druhe (nevim
jestli to jde BatchMove, urcite to pujde proskanovanim a
AppendRecordem).
P.S. Nezapomen psat subjekt
Milan Dvorak
dvorak(zv)gymzn(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.217 / Virov� b�ze: 102 - datum vyd�n�: 1.12.2000
None
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 19.1.2001 13:48:39
Uz to tady bylo parkrat rozebirane. Ja to delam pomoci tabulky, kterou posilam.
Mirek Drejcek.
*********** REPLY SEPARATOR ***********
On 19.1.2001 at 9:27 Radek Janu# FSG wrote:
>Ahoj marne zkousim bojovat s prevodem DBF kamenika do Windowsu
>Mam DBF tabulkuz Foxky v kameniku a potreboval byl prevest jeji data do
>win1250.
>Tabulka obsahuje i Blop pole cili potreboval bych je prevest vcetne nich.
> Zkousel jsem ruzne prevadece z internetu ale bez vetsich uspechu. Nevite
>nekdo jak na to ?
>
>Diky moc radek
Const Ascii: array[1..30] of Char='iaezrcse
yundtouCZSAIREUEYTODNU';
Latin2: arra
y[1..30] of Char='������������Ȏ�������ݍ�
���';
Kamenik: array[1..30] of Char='�
�����霾�����������ɣ����';
Window
s: array[1..30] of Char='���װ����������#��##
�###ޏˤ�#';
Vyroba fontu
[*] Krska Vit <v_krska(zv)del(tec)cz> - 19.1.2001 13:57:06
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Vyroba fontupomoci apin AddFontResource font zaregistrujes a pomoci
RemoveFontResource zase odregistrujes
Ing. Vit Krska
vit.krska(zv)del(tec)cz
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Benes Jaroslav
Sent: Friday, January 19, 2001 11:13 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Vyroba fontu
Ahoj
mam dva dotazy:
1/ Potrebuji *.TTF font prilinkovat k EXE, za behu EXE ho zaregistrovat a
po ukonceni programu ho odregistrovat. Jak se to, prosim, da udelat?
2/ Mam font, ktery je ve ctyrech oddelenych souborech
(Thin,Bold,Italic,ItalicBold); jak z techto souboru udelam jeden?
Dekuji
Jaro B.
Sietova prevadzka s BDE
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 19.1.2001 14:01:51
> Ja som si myslel ze komponenta Query pracuje tak, ze na server sa
> posle par
> bytov - dotaz SQL, potom to server spracuje a posle mi tie zaznamy, ktore
> zodpovedaju tomu dotazu. Cize aj modem by mal odoslat smerom tam
> par bytov a
> prijat len tych par, alebo vela bytov co tvoria zaznamy vysledku dotazu
Tady tohlete chovani lze ovlivnit parametrem "SQLQRYMODE" v nastaveni
databaze v BDE. Myslim, ze by nastavenim na LOCAL slo BDE presvedcit, ze by
SQL dotazy provadelo lokalne...
T.
tisk obrazku v sestavach Sinea
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 19.1.2001 14:08:01
From: "Petr Ma��k" <rtepema(zv)mbox.vol(tec)cz>
>
> vyskytl se mi problem. V editaci sestavy zaradim obrazek BMP ( do oddilu
> zacatek sestavy, v jinych oddilech je to stejne). Ten se pri editaci
> zobrazuje spravne, pokud provedu Preview, je misto obrazku cerny
ctverecek.
> Totez je i pri tisku. Mam Delphi 3.02, generator 3.39r z 8.3.2000. Nemohu
> prijit na to, kde je problem.
>
> Predlohu sestavy vytvarim dynamicky pri vyvolani editace nebo pri tisku z
> memo pole tabulky tTisky (paradox tabulka)
>
Odkud je volana ta editace, z vyvojoveho prostredi,
nebo z bezici aplikace?
Odkud je obrazek nacitan, ze souboru na disku,
nebo take z databaze jako predloha?
Pokud ze souboru, je spravne nastavena cesta?
Jak vypada ten obrazek, jak je velky, jakou barevnou
hloubku, nema nahodou cerny levy horni roh?
Delaji to vsechny obrazky, nebo jen ten jeden?
Dela to i v aplikacich, ktere nepouzivaji nacitani
predlohy z databaze?
Asi by bylo nejjednodussi udelat jednoduchou
aplikaci demonstrujici chybu a poslat ji primo
na Sineu.
Vaclav Krmela
Kopirovani vice souboru
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 19.1.2001 14:09:18
Ahoj
v RxLib je v jednotce FileUtil Copy i MoveFile.
Viz.
procedure CopyFile(const FileName, DestName: string;
ProgressControl: TControl);
procedure CopyFileEx(const FileName, DestName: string;
OverwriteReadOnly, ShellDialog: Boolean; ProgressControl: TControl);
procedure MoveFile(const FileName, DestName: TFileName);
procedure MoveFileEx(const FileName, DestName: TFileName; ShellDialog:
Boolean);
{$IFDEF RX D4}
function GetFileSize(const FileName: string): Int64;
{$ELSE}
function GetFileSize(const FileName: string): Longint;
{$ENDIF}
function FileDateTime(const FileName: string): TDateTime;
function HasAttr(const FileName: string; Attr: Integer): Boolean;
function DeleteFiles(const FileMask: string): Boolean;
function DeleteFilesEx(const FileMasks: array of string): Boolean;
function ClearDir(const Path: string; Delete: Boolean): Boolean;
function NormalDir(const DirName: string): string;
function RemoveBackSlash(const DirName: string): string;
function ValidFileName(const FileName: string): Boolean;
function DirExists(Name: string): Boolean;
procedure ForceDirectories(Dir: string);
function FileLock(Handle: Integer; Offset, LockSize: Longint): Integer;
{$IFDEF RX D4} overload; {$ENDIF}
{$IFDEF RX D4}
function FileLock(Handle: Integer; Offset, LockSize: Int64): Integer;
overload;
{$ENDIF}
function FileUnlock(Handle: Integer; Offset, LockSize: Longint):
Integer;
{$IFDEF RX D4} overload; {$ENDIF}
{$IFDEF RX D4}
function FileUnlock(Handle: Integer; Offset, LockSize: Int64): Integer;
overload;
{$ENDIF}
function GetTempDir: string;
function GetWindowsDir: string;
function GetSystemDir: string;
function BrowseDirectory(var AFolderName: string; const DlgText: string;
AHelpContext: THelpContext): Boolean;
{$IFDEF WIN32}
function BrowseComputer(var ComputerName: string; const DlgText: string;
AHelpContext: THelpContext): Boolean;
function ShortToLongFileName(const ShortName: string): string;
function ShortToLongPath(const ShortName: string): string;
function LongToShortFileName(const LongName: string): string;
function LongToShortPath(const LongName: string): string;
procedure CreateFileLink(const FileName, DisplayName: string; Folder:
Integer);
procedure DeleteFileLink(const DisplayName: string; Folder: Integer);
{$ENDIF WIN32}
{$IFNDEF RX D3}
function IsPathDelimiter(const S: string; Index: Integer): Boolean;
{$ENDIF}
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Michal Tiller [SMTP:Michal.Tiller(zv)oskarmobil(tec)cz]
> Odesl�no: 19. I 2001 12:55
> Komu: 'delphi-l(zv)fwd(tec)cz'; 'parizsky(zv)access-it(tec)cz'
> P�edm�t: RE: Kopirovani vice souboru
>
>
> skusil bych: CopyFile('C:\Dokumenty\prace*.doc',
> 'C:\Dokumenty\Zal\prace*.doc');
>
> nebo
>
> DIR := 'C:\Dokumenty';
> FileListBox.Directory := DIR
> FileListBox.Filter := 'prace*.doc';
> for i := 0 to (FileListBox.Items.Count - 1) do
> CopyFile(DIR + '\' + FileListBox.Items[i], DIR + '\Zal\' +
> FileListBox.Items[i]);
>
> S pozdravem Michal Tiller
>
> -----Original Message-----
> From: Parizsky Ladislav [mailto:parizsky(zv)access-it(tec)cz]
> Sent: Friday, January 19, 2001 10:01 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Kopirovani vice souboru
>
>
> Cau,
> Jak by jste v Delphi resily tento dosovskej prikaz:
>
> Copy C:\Dokumenty\prace*.doc C:\Dokumenty\Zal
>
> diky moc za radu
>
> Ladap
> Funkcia v assemberi vracajuca string
[*] iturcan(zv)gamo.sk - 19.1.2001 14:27:11
samozrejme ze to je mozne, vid priklad:
function MyAction:pchar;assembler;
asm
mov eax,offset (zv)(zv)s
ret
(zv)(zv)s: db 'toto je retazec'
db 0
end;
Odporucam pouzivat v Assembleri pointre a nie si zbytocne komplikovat zivot
z pascal retazcami. Vystup si uz jednoducho prekonvertujes napr. string
(MyAction), strPas (MyAction),...
daj si pozor na parametre, popis predavania najdes v dokumentacii Delphi
Ivan Turcan
Peter Vlkovic
<vlkovic(zv)minv To: delphi-l(zv)fwd(tec)cz
.sk> cc:
Sent by: Subject: Funkcia v assemberi vracajuca string
owner-delphi-
l(zv)fwd(tec)cz
19.01.2001
11:10
Please
respond to
delphi-l
Ahoj,
potreboval by som poradit, ako v assemblerovskej
funkcii vratit string.
Nieco na sposob:
FUNCTION Action: string; assembler;
ASM
...
vytvorenie noveho retazca
pozadovana akcia s retazcom
priradenie retazca do Result
...
END;
Pozeral som v zdrojaku SYSTEM.PAS, ako funguje praca
s retazcami v assemblerovskych rutinach, chcel som
vyuzit napriklad _NewAnsiString, ale kompilator ma
k tejto funkcii nepusti (je pri nej poznamka len pre
ladiacke ucely!?).
Mimochodom, aky je vyznam identifikatora "_" na
zaciatku nazvu niektorych rutin v tejto unite?.
Pri prehladavani zdrojakov k Delphi (D3) som
nikde nenasiel implementaciu assemblerovskej
funkcie vracajucej string - naozaj to v Delphi
nie je mozne?
Vlkovic
SMS
[*] Brano Vislocky <delphi(zv)jdsoftware.sk> - 19.1.2001 14:45:18
na adrese zekiller.skytech.org najdes program sendsms pre linux aj windows a
mali by tam byt aj zdrojaky ( v C-cku, samozrejme ). Mozno ti to pomoze
Brano
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> �u#ka R�bert
> Sent: Friday, January 19, 2001 11:44 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: SMS
>
>
> Najde sa dobra dusa a posle mi fragment zdrojaku kde sa pise ako sa
> konektnut na server SMS a ako mu poslat ten gulas aby poslal SMS ??? napr
> cez oscar alebo mtnsms, napr. cez komponentu FastNet - NMSMTP. Neviem ju
> obsluzit. PROSIIIIIM.
>
> Dakujem
>SMS
[*] Peter Luk�cs <batex(zv)astrafren(tec)cz> - 19.1.2001 14:52:03
Vidim, ze uz zacinas byt zoufaly :)) tak tady to je:
na formulari jsou pouze dve mema a tlacitko s timto zdrojakem:
begin
NMHTTP1.InputFileMode := FALSE;
NMHTTP1.OutputFileMode := FALSE;
NMHTTP1.ReportLevel := Status_Basic;
NMHTTP1.Get('http://www.oskarmobil(tec)cz/cz/sms/send.php3?ppp=97957367028
72:17e38be77cb2b9e43967ecb48f7ea8df&part1=TEXT&number=XXXXXX&mynumber=YY
YYYY');
Memo1.Text := NMHTTP1.Body;
Memo2.Text := NMHTTP1.Header;
If NMHTTP1.CookieIn <> '' then
ShowMessage('Cookie:'+#13#10+NMHTTP1.CookieIn);
end;
Toto posle jednu ! sms na tel. XXXXXX z podpisem cisla YYYYYY s telickem
TEXT. Mema muzes vynechat a zustane Ti tam jenom tlacitko. Jednoduche ne ?
Batex
PS: Jestli chces, poslu kompletni priklad.
> Najde sa dobra dusa a posle mi fragment zdrojaku kde sa pise ako sa
> konektnut na server SMS a ako mu poslat ten gulas aby poslal SMS ??? napr
> cez oscar alebo mtnsms, napr. cez komponentu FastNet - NMSMTP. Neviem ju
> obsluzit. PROSIIIIIM.
>
> Dakujem
SMS cez MTNSMS
[*] #u�ka R�bert <spravca(zv)lumen.sk> - 19.1.2001 17:00:51
Nechtiac som si to vymazal prosim kto to mate poslite to este raz.
DAKUJEM
S pozdravom,
------------------------------------------------
R�bert �u#ka, spr�vca siete
R�dio Lumen, Bansk� Bystrica
Slovensk� republika
www.lumen.sk
spravca(zv)lumen.sk
088/41 25 739 kl.14
-------------------------------------------------
Nalezeni chyby
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 19.1.2001 17:35:37
> From: "Jiri Binder" <j.binder(zv)albacon(tec)cz>
> > Prosim lze nejak rozume nalezt misto misto chyby z informace
> > AV... at address xxxxx in modul yyy.bpl ?
>
> spust aplikaci s tim balickem z Delphi a pak pomoci Search | Find
> Error hledej tu adresu. Nezapomen, ze je v hexadecimalnim tvaru a je
> treba pred ni napsat $
> Petr Vones, amatersky programator
Diky za radu. Ja jsem to vzdy zkousel takto hledat, ovsem ne pri
spustenem programu. Co je to vubec za adresu? Ja jsem se
domnival, ze je to nejaka relativni adresa mista instrukce v exe a
nenapadlo me, ze program musi bezet.
Jiri Binder
informace o .exe souboru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.1.2001 18:00:36
From: "Tom�#V�tek" <tvitek(zv)centrum(tec)cz>
> Potreboval bych zjistit informace o .exe souboru (zda se jedna o DOS nebo
> Win aplikaci, pokud jsou ulozene informace o verzi tak i ty).
Ahoj,
v JCL (http://delphi-jedi.org/Jedi:JCLDOWNLOADS) je funkce GetFileExeType,
ohledne version info pak trida TJclFileVersionInfo.
Petr Vones, amatersky programator
Kopirovani vice souboru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.1.2001 18:06:23
From: "Parizsky Ladislav" <parizsky(zv)access-it(tec)cz>
> Jak by jste v Delphi resily tento dosovskej prikaz:
>
> Copy C:\Dokumenty\prace*.doc C:\Dokumenty\Zal
Ahoj,
pomoci SHFileOperation
Petr Vones, amatersky programator
Nalezeni chyby
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 19.1.2001 18:14:38
From: "Jiri Binder" <j.binder(zv)albacon(tec)cz>
> Diky za radu. Ja jsem to vzdy zkousel takto hledat, ovsem ne pri
> spustenem programu. Co je to vubec za adresu? Ja jsem se
> domnival, ze je to nejaka relativni adresa mista instrukce v exe a
> nenapadlo me, ze program musi bezet.
Ahoj,
je to adresa v adresovem prostoru procesu, kde je dany soubor nahran. Zpetne
lze pak ziskat informaci o tom, ktery soubor to je a pripadne nalezt i misto
ve zdrojaku. Podobne funguje napriklad vyhledani jmena funkce, unitu, cisla
radku v aplikaci pokud vznikne vyjimka, pomoci JclDebug z JCL nebo obdobnych
nastroju. Takto muzes lokalizovat chybu ve svem programu, pokud k tomu dojde
za 'ostreho' behu u zakaznika, ulozit do logu, nechat si odeslat mailem atd..
Petr Vones, amatersky programator
Zasifrovan string v tabulce paradoxu.
[*] vlada_ponechal(zv)post(tec)cz - 19.1.2001 19:56:07
Zdar panove.
Mel bych dotaz ohledne sifrovani stringu v tabulce paradoxu. Pouzivam v lokalu viceuzivatelsky vstup a ukladam to do tabulky paradoxu. Problem je v tom, ze si to kazdy muze precist, kdyz tabulku otevre prohlizecem.
1.) Existuje moznost sifrovat primo v tabulce text tak, aby se nedal precist?
2.) Pokud ne, nemate nejaky priklad sifrovani textu? Nejaky zdrojak programku, ktery to dela.
Delam to jednoduse, uzivatel vklada heslo do editu a obsah editu se potom porovnava s fieldem v tabulce.
Mam D3 prof.
Diky,
Vlada
Ako zistit spustene Delphi IDE
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 19.1.2001 22:36:16
Ahoj,
kdesi se pise toto (neovereno):
Sometimes you may want to find out weather the Delphi IDE is
running. You can use the following function:
function IsDelphiRunning : boolean;
begin
Result:= FindWindow('TAppBuilder', nil) > 0);
end;
This function will return a value of TRUE if the IDE is running or
FALSE, otherwise.
This is very helpful, if you only want someone to use your
shareware component from inside the Delphi IDE.
Slavek
> Uz o tom bola debeta, ale nemozem to najst. Ako zistim, ze je spusteny
> program z Delphi, pripadne, ze je spustene Delphi IDE.
>
> Dik
>
> Martin
>
Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------
Zasifrovan string v tabulce paradoxu.
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 19.1.2001 22:39:44
Ahoj,
sifrovat muzes text jako takovy a pak ho dat do tabulky jiz zasifrovany
(zpusobu uz to problehlo nekolik (desitek)). Stejne tak ale muzes zaheslovat
tabulku celou a pristup k ni bude pouze pres heslo. Ovsem toto je dobre tak
leda pro ochranu pred babickou, protoze ta vetsinou nezna universalni heslo
(jIGGAe). Jak to udelat najdes treba tu:
http://atrey.karlin.mff.cuni(tec)cz/~rk/delphiparadox.shtml
Slavek
> Zdar panove.
> Mel bych dotaz ohledne sifrovani stringu v tabulce paradoxu. Pouzivam v lokalu viceuzivatelsky vstup a ukladam to do tabulky paradoxu. Problem je v tom, ze si to kazdy muze precist, kdyz tabulku otevre prohlizecem.
> 1.) Existuje moznost sifrovat primo v tabulce text tak, aby se nedal precist?
> 2.) Pokud ne, nemate nejaky priklad sifrovani textu? Nejaky zdrojak programku, ktery to dela.
>
> Delam to jednoduse, uzivatel vklada heslo do editu a obsah editu se potom porovnava s fieldem v tabulce.
>
> Mam D3 prof.
>
> Diky,
>
> Vlada
>
Setrete vodou. Sprchujte se s pritelem/pritelkyni.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------
Aktualizace
[*] Ber�nek Pavel <Pavel.0(zv)worldonline(tec)cz> - 19.1.2001 23:05:14
Ahoj,
mel bych jeden problem a sice, ze bych rad aby se mi zaktualizovalo jedno
pole (datumove) ve vsech zaznamech v databazi na hodnotu aktualniho data.
Zkousel jsem to pres komponentu BachMove, ale vubec nevim jak na to.
Poradite prosim ?
Pavel Beranek
Kopirovani vice souboru - Dekuji
[*] Parizsky Ladislav <parizsky(zv)access-it(tec)cz> - 20.1.2001 10:32:15
Zkousel sem ty nejlehci rady copyfile nefunguje proto sem skusil SHFileOperation a je to tam. :)
Mockrat dekuji Ladap
Zasifrovan string v tabulce paradoxu.
[*] M. Winkler <m.winkler(zv)seznam(tec)cz> - 20.1.2001 12:12:32
Ahoj
zkus tohle:
function Crypt(Action, Src, Key : String) : String;
var
KeyLen : Integer;
KeyPos : Integer;
offset : Integer;
dest : string;
SrcPos : Integer;
SrcAsc : Integer;
TmpSrcAsc : Integer;
Range : Integer;
UpperCase : Char;
begin
dest:='';
KeyLen:=Length(Key);
KeyPos:=0;
SrcPos:=0;
SrcAsc:=0;
Range:=256;
if Action = 'E' then // encrypt
begin
Randomize;
offset:= Random(Range);
dest:= format('%1.2x',[offset]);
for SrcPos := 1 to Length(Src) do
begin
SrcAsc:=(Ord(Src[SrcPos]) + offset) MOD 255;
if KeyPos < KeyLen then KeyPos:= KeyPos + 1 else KeyPos:=1;
SrcAsc:= SrcAsc xor Ord(Key[KeyPos]);
dest:=dest + format('%1.2x',[SrcAsc]);
offset:=SrcAsc;
end;
end;
if Action = 'D' then // decrypt
begin
offset:=StrToInt('$'+ copy(src,1,2));
SrcPos:=3;
repeat
SrcAsc:=StrToInt('$'+ copy(src,SrcPos,2));
if KeyPos < KeyLen Then KeyPos := KeyPos + 1 else KeyPos :=
1;
TmpSrcAsc := SrcAsc xor Ord(Key[KeyPos]);
if TmpSrcAsc <= offset then
TmpSrcAsc := 255 + TmpSrcAsc - offset
else
TmpSrcAsc := TmpSrcAsc - offset;
dest := dest + chr(TmpSrcAsc);
offset:=srcAsc;
SrcPos:=SrcPos + 2;
until SrcPos >= Length(Src);
end;
Crypt:=dest;
end;
KDE:
Action: E ... encrypt
D... decrypt
Source: to, co chces zakodovat/odkodovat
Key: retezec kodovaciho klice
Neni to nic moc, ale pro normalni ucely mi to vzdy stacilo.
Je to docela rychle.
M. Winkler
----- Original Message -----
From: <vlada_ponechal(zv)post(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, January 19, 2001 7:56 PM
Subject: Zasifrovan string v tabulce paradoxu.> Zdar panove.
> Mel bych dotaz ohledne sifrovani stringu v tabulce paradoxu. Pouzivam v
lokalu viceuzivatelsky vstup a ukladam to do tabulky paradoxu. Problem je v
tom, ze si to kazdy muze precist, kdyz tabulku otevre prohlizecem.
> 1.) Existuje moznost sifrovat primo v tabulce text tak, aby se nedal
precist?
> 2.) Pokud ne, nemate nejaky priklad sifrovani textu? Nejaky zdrojak
programku, ktery to dela.
>
> Delam to jednoduse, uzivatel vklada heslo do editu a obsah editu se potom
porovnava s fieldem v tabulce.
>
> Mam D3 prof.
>
> Diky,
>
> Vlada
>SMS
[*] Ji�� H�sek - 20.1.2001 14:24:45
NMSMTP1.host:='smtp.seznam(tec)cz' // samozrejme tam muzes dat i jiny
postovni server
NMSMTP1.UserID:='Uzivatel' // spravne uzivatelske jmeno
NMSMTP1.Postmessage.
NMSMTP1.PostMessage.ToAddress.add('+42cislo(zv)sms.paegas(tec)cz'); // nebo
0042cislo(zv)sms.eurotel(tec)cz, oskar zatim pres mejl tuto sluzbu neposkytuje
NMSMTP1.Postmessage.fromaddress:= 'tvuj mejl'
NMSMTP1.PostMessage.FromName:='jmeno';
NMSMTP1.postmessage.Subject:='predmet';
NMSMTP1.postmessage.body.add('text');
NMSMTP1.Connect;
NMSMTP1.SendMail; // tohle muzes dat do NMSMTPOnConnect
NMSMTP1.Disconnect; // a tohle zase do NMSMTPOnSucces
Psal jsem to z hlavy, tak�e jsem mo�n� na n�co zapom�l, ale snad by to
takhle mohlo fungovat...
S pozdravem Ji�� H�sek
> Najde sa dobra dusa a posle mi fragment zdrojaku kde sa pise ako sa
> konektnut na server SMS a ako mu poslat ten gulas aby poslal SMS ??? napr
> cez oscar alebo mtnsms, napr. cez komponentu FastNet - NMSMTP. Neviem ju
> obsluzit. PROSIIIIIM.
>
> Dakujem
>MS Acces a Delphi
[*] Pavel Lavicka <plavicka(zv)mbox.vol(tec)cz> - 20.1.2001 16:04:05
Vazeni kolegove
v soucasne dobe pisu databazovou aplikaci, ve ktere pouzivam MS Acces 97 a
pristup pres native driver BDE. Mnoho informaci o pouziti teto databaze ve
spojeni s Delphi jsem jiz vycetl z archivu konference, presto bych
potreboval vedet jeste nektere veci, ktere jsem tam nenasel:
1. Co je potreba nastavit v BDE, chci-li zajistit k databazi bezproblemovy
sitovy pristup?
2. Jakym zpusobem je mozno z Delphi provadet opravu databaze - existuje
nejaka obdoba funkci DBEngine.RepairDatabase a DBEngine.CompactDatabase z
vnitrniho jazky Accesu?
3. Vyzaduje Acces nejakou pravidelnou udrzbu - obnovovani indexu,
komprimovani databaze atd?
Za pripadne odpovedi predem dekuji a preji mnoho uspechu ve Vasi cinnosti.
Pavel Lavicka
MS Acces a Delphi
[*] Erik Salaj <winsoft(zv)napri.sk> - 20.1.2001 17:43:41
> v soucasne dobe pisu databazovou aplikaci, ve ktere pouzivam MS Acces 97 a
> pristup pres native driver BDE. Mnoho informaci o pouziti teto databaze ve
> spojeni s Delphi jsem jiz vycetl z archivu konference, presto bych
> potreboval vedet jeste nektere veci, ktere jsem tam nenasel:
>
> 1. Co je potreba nastavit v BDE, chci-li zajistit k databazi bezproblemovy
> sitovy pristup?
Nepouzit BDE ale ADO alebo DAO komponenty.
> 2. Jakym zpusobem je mozno z Delphi provadet opravu databaze - existuje
> nejaka obdoba funkci DBEngine.RepairDatabase a DBEngine.CompactDatabase z
> vnitrniho jazky Accesu?
Pomocou DAO alebo JRO, pozri http://www.cybermagic.co.nz/winsoft/daofaq.htm,
http://www.cybermagic.co.nz/winsoft/adofaq.htm
> 3. Vyzaduje Acces nejakou pravidelnou udrzbu - obnovovani indexu,
> komprimovani databaze atd?
Komprimacia databazy (u Jet 4.0 je to zaroven aj kontrola a oprava databazy)
je raz za cas potrebna, pretoze inak velkost Access databazy iba narasta.
Erik
Video
[*] stepan hamouz <hamik(zv)cbox(tec)cz> - 20.1.2001 20:13:10
----- Original Message -----
From: "Vaclav Krmela" <krmela(zv)ustinadorlici(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, January 07, 2001 10:10 AM
Subject: Re: Video
> From: "stepan hamouz" <hamik(zv)cbox(tec)cz>
>
> > Moje karta komprimaci podporuje ,ale nev�m jak j� pou��t dialog
Komprese
> > Vide mi nab�dne
> > pouze upln� sn�mky bez komprese a ve struktu�e AVICOMPRESSOPTIONS sem na
> nic
> > tak� nep�i#el.
> > Mo�n� �e by mi sta�ila i SW komprimace ,ale m�m podobn� probl�m -nevi
jak
> > ��kou pou��t.
>
> Dialog volany funkci WM_CAP_DLG_VIDEOCOMPRESSION
> neni dialogem digitalizacni karty, ale je dialogem Windows.
> V tomto dialogu se vybiraji jednotlive SW kompresni kodeky
> instalovane v systemu Windows jako zarizeni na kompresi videa.
> Z tohoto dialogu je mozne i jednotlive nastavovat parametry
> kazdeho tohoto kodeku, pokud to ten ktery kodek umoznuje.
> V tomto dialogu je drobna chybicka, po rozbaleni Combo boxu
> je nulova vyska jeho seznamu polozek. Klavesami Up/Down
> lze ale mezi jednotlivymi polozkami prechazet.
>
> Pokud digitalizacni karta ma svoji vlastni HW podporu
> komprese, je prednostne pouzita komprese HW a
> SW kodeky se jiz neuplatni. V tom pripade jsou
> v dialogu WM_CAP_DLG_VIDEOCOMPRESSION
> nabizeny pouze zarizeni bez dalsi komprese.
>
> Nastaveni HW komprese je nutne provest pomoci ovladace
> konkretni karty. K tomu slouzi dialogy
> WM_CAP_DLG_VIDEOFORMAT
> WM_CAP_DLG_VIDEOSOURCE
> WM_CAP_DLG_VIDEODISPLAY
> Ne vsechny karty musi nabizet vsechny tyto dialogy.
> Zda konkretni ovladac karty nabizi konkretni dialog
> lze predem zjistit pomoci funkce
> WM_CAP_DRIVER_GET_CAPS
> Nastaveni HW komprese bych hledal nejspise na prvnim
> z uvedenych dialogovych oken.
>
> Oba popisovane zpusoby komprese se uplatni
> pouze pri snimani plynuleho videa, nikoliv pri grabovani
> statickych snimku. Staticke snimky budou asi vzdy
> grabovany bez komprese do DIB.
>
> > Jo a ktomu zhor#en� kvality doch�z� d�ky spr�v� SendMessage (cwnd,
> > WM_CAP_GRAB_FRAME, 0, 0);
>
> Znovu opakuji, ze samotne pouziti funkce
> WM_CAP_GRAB_FRAME nemuze vest ke zhorseni
> kvality snimku. Pokud ke zhorseni dochazi, musi byt
> pricina jinde.
>
> > > > Ukl�d�m to asi takhle
> > > > SendMessage (cwnd, WM_CAP_GRAB_FRAME, 0, 0);
> > > > BitBlt(Image2.Canvas.Handle, 0, 0, Image2.Width, Image2.Height,
> > > > GetDC(cwnd), 0, 0, SRCCOPY);
> > > >
> > > > -Nap�ed p�ekop�ruji obraz do Komponenty "Image2"
> > > > a potom ho ukl�d�m, ale u� jako p�ekop�rovan� m� #patnou
> > > > kvalitu(p�i ulo�en� se je#t� zhor#�).
>
> Pricinu bych hledal na dvou mistech
> - v nastaveni barevne hloubky displeje, pokud jsou zkreslovany barvy
> - v nastaveni velikosti snimaciho okna, pokud je nedostatecne
> rozliseni snimku
>
> Znovu doporucuji zkusit funkci WM_CAP_FILE_SAVEDIB,
> ktera ulozi snimek do souboru v originalni barevne hloubce
> a velikosti, nastavene v dialozich digitalizacni karty.
>
> Vaclav Krmela
>
>
>
Ahoj.
Jo funkci WM_CAP_FILE_SAVEDIB jsem teda vyskou#el ,ale ta ulo�� pouze jeden
Frame?!?
a j� pot�ebuju celou sekvenci.
A m�li jste pravdu k tomu zhor#en� kvality doch�zelo d�ky #pa#n� nastavene
velikosti okna.
M�jte se mnou pros�m strpen� jsem za��te�n�k.
D�k.
Ham�k.Zmena MDI okna na modalni
[*] Jan Kirchner <imconr(zv)volny(tec)cz> - 20.1.2001 23:35:29
Zdravim priznivce DELPHI.
mam dotaz zda lze MDI okno zmenit na modalni a zpet.
Potrebuji v jistem okamziku (v prubehu konunikace s RS-232) zajistit aby
okno bylo modalni a po ukonceni komunikace je zase dat do normalniho stavu.
Po pravde receno nevim jak na to a prepnout okno na modalni asi nejde.
Poradite mi nekdo?
Diky
J.Kirchner
Stay on Top
[*] Jan Kirchner <imconr(zv)volny(tec)cz> - 20.1.2001 23:40:53
Zobraz okno jako mod�ln�. Pokud ale jiz mas okno zobrazene, tak to bych sam
rad vedel jak na to.
Jestli to vyresis tak napis.
Jan Kirchner
imcon(zv)mbox.vol(tec)cz
----- Original Message -----
> From: "Ondrej Skipala" <OSkip(zv)seznam(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Saturday, January 13, 2001 7:59 PM
> Subject: Stay on Top
>
>
> Nev�te n�kdo zda-li existuje n�jak� vlastnost, aby n�kter� form z�stala
> st�le naho�e, pokud je zobrazen�? a to i v p��pad� �e kliknete na n�jakou
> jinou nebo n�kterou novou zobraz�te?
>
> P�edem d�kuji za odpov��.
> _____________________________________________________________________
> Mapy Prahy, Brna a #ech najdete na http://www.mapy(tec)cz
>
>
>Stay on Top
[*] Adam Feistner <feistna(zv)volny(tec)cz> - 21.1.2001 13:05:05
Ve vlastnosti FormStyle (najdes to v Object Inspectoru) je take volba fsStayOnTop - v D4 mam tuseni, v D5 to je. Adam Feistner
feistna(zv)volny(tec)cz
www.volny(tec)cz/feistna/cz.htm
----- Original Message -----
From: "Jan Kirchner" <imconr(zv)volny(tec)cz>
Subject: re:Stay on Top
> Zobraz okno jako mod�ln�. Pokud ale jiz mas okno zobrazene, tak to bych sam
> rad vedel jak na to.
> Jestli to vyresis tak napis.
>
>
> Jan Kirchner
> imcon(zv)mbox.vol(tec)cz
>
>
> ----- Original Message -----
> > From: "Ondrej Skipala" <OSkip(zv)seznam(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Saturday, January 13, 2001 7:59 PM
> > Subject: Stay on Top
> >
> >
> > Nev�te n�kdo zda-li existuje n�jak� vlastnost, aby n�kter� form z�stala
> > st�le naho�e, pokud je zobrazen�? a to i v p��pad� �e kliknete na n�jakou
> > jinou nebo n�kterou novou zobraz�te?
> >
> > P�edem d�kuji za odpov��.
> > _____________________________________________________________________
> > Mapy Prahy, Brna a #ech najdete na http://www.mapy(tec)cz
> >
> >
> >
>
>TTable komponenta versus SQL server 2000 (microsof
[*] vlada_ponechal(zv)post(tec)cz - 21.1.2001 22:33:29
Zdar panove,
Chci vas pozadat o pomoc. Chci udelat ne moc slozitou aplikaci v D3 prof. Mam server SQL
2000 ent. A za pomoci ODBC a BDE na nej pristupuji. Pouzivam pritom komponentu TTable,
protoze se mi jiz predtim osvedcila (ne teda ze SQL serverem od MIc.)Narazil jsem vsak na
problem. Pri vkladani a ukladani vet do tabulek mam dva stavy. Prikazem table1.insert vlozim
vetu (ta se mi objevi i v dbgrid) ale po pouziti table1.post, se najednou veta strati (i z
dbgrid). Kdyz tabulku restartuji, objevi se vsechny vety. Prisel jsem na to, ze na to plati,
kdyz zapnu (true) cachedUpdates v komponente ttable. Problem, je v tom, ze potom vsechno
funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se vrati do vychoziho stavu.
Panove, nenapada Vas, cim to je? Me to pripada, jako kdyby to do tabulky vubec neulozil nebo
v prvnim pripade spatna komunikace s SQL serverem...
Diky,
Vlada
ARP tabulka Windows2000 serveru...
[*] vlada_ponechal(zv)post(tec)cz - 21.1.2001 22:45:19
Zdar panove,
Za pomoci ARP tabulky serveru chci ziskavat informace o IP addresach a MAC addresach.
1.) Nevite jak dlouho drzi Server Windows2000 v pameti informace v ARP?
2.) Jak se da tato hodnota zvysit treba na 30 minut?
3.) KOlik hodnot muze maximalne byt v ARP tabulce?
Diky,
Vlada
TTable komponenta versus SQL server 2000 (microsof
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 22.1.2001 06:35:22
Pokud pou��v�# SQL tak p�edpokl�d�m �e pou��v�# i transakce. Transakce budou
asi tv�j "probl�m". Na za��tku programu napi# Transaction1.StartTransaction
a poka�d� kdy� provede# Post mus�# zm�ny uplatnit pomoc�
Transaction1.CommitRetaining (pokud chce# zru#it operaci napi#
Transaction.RollbackRetaining).
Petr Jur�k, Spr�vce s�t�
COMET System s.r.o.
1.M�je 1220
756 61 Ro�nov pod Radho#t�m
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
----- Original Message -----
From: <vlada_ponechal(zv)post(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, January 21, 2001 10:33 PM
Subject: TTable komponenta versus SQL server 2000 (microsoft)> Zdar panove,
> Chci vas pozadat o pomoc. Chci udelat ne moc slozitou aplikaci v D3 prof.
Mam server SQL
> 2000 ent. A za pomoci ODBC a BDE na nej pristupuji. Pouzivam pritom
komponentu TTable,
> protoze se mi jiz predtim osvedcila (ne teda ze SQL serverem od
MIc.)Narazil jsem vsak na
> problem. Pri vkladani a ukladani vet do tabulek mam dva stavy. Prikazem
table1.insert vlozim
> vetu (ta se mi objevi i v dbgrid) ale po pouziti table1.post, se najednou
veta strati (i z
> dbgrid). Kdyz tabulku restartuji, objevi se vsechny vety. Prisel jsem na
to, ze na to plati,
> kdyz zapnu (true) cachedUpdates v komponente ttable. Problem, je v tom,
ze potom vsechno
> funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se vrati do
vychoziho stavu.
> Panove, nenapada Vas, cim to je? Me to pripada, jako kdyby to do tabulky
vubec neulozil nebo
> v prvnim pripade spatna komunikace s SQL serverem...
>
> Diky,
>
> Vlada
>
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.227 / Virov� b�ze: 109 - datum vyd�n�: 17.01.01
kodovani dbf a excel
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 22.1.2001 07:26:04
Ahoj
v souvislosti s timhle bych se chtel docel zeptat jak v Delphi(4) vytvorit
paradox nebo dbase tabulku pres BDE a Table.CreateTable tak, aby kdyz ji
otevru v excelu se mi spravne zobrazovalo kodovani. Prestoze v langdriver
mam nastaveno kodovani win1250 tak mi to excel zobrazi proste blbe. Je chyba
v excelu nebo v BDE nebo ve me ?
dik
-----Original Message-----
From: Tomas Vladik [mailto:tom.vladik(zv)swadvice(tec)cz]
Sent: Friday, January 19, 2001 12:47 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: > Nevim jak DBF, ale DB se da delat tak, ze si zalozis novou tabulku
> stejme struktury jako v kameniku, pouze LangDriver bude Windows1250 a
> pak "superaplikaci" v Delphi to presypes z jedne do druhe (nevim
> jestli to jde BatchMove, urcite to pujde proskanovanim a
> AppendRecordem).
>
A pokud mas pripad nejakeho atypickeho kodovani cestiny, tak muzes zakazat
automatickou konervzi kodovani (nastavenim Transliterate := False; u
prislusneho pole) a u poli typu string a memo si provest konverzi ve vlastni
rezii.
T.
TTable komponenta versus SQL server 2000 (microsof
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 22.1.2001 08:03:24
> Zdar panove,
> Chci vas pozadat o pomoc. Chci udelat ne moc slozitou aplikaci v D3
> prof. Mam server SQL
> 2000 ent. A za pomoci ODBC a BDE na nej pristupuji. Pouzivam pritom
> komponentu TTable,
> protoze se mi jiz predtim osvedcila (ne teda ze SQL serverem od
> MIc.)Narazil jsem vsak na problem. Pri vkladani a ukladani vet do
> tabulek mam dva stavy. Prikazem table1.insert vlozim
> vetu (ta se mi objevi i v dbgrid) ale po pouziti table1.post, se
> najednou veta strati (i z dbgrid). Kdyz tabulku restartuji, objevi se
> vsechny vety. Prisel jsem na to, ze na to plati, kdyz zapnu (true)
> cachedUpdates v komponente ttable. Problem, je v tom, ze potom
> vsechno
> funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se
> vrati do vychoziho stavu.
> Panove, nenapada Vas, cim to je? Me to pripada, jako kdyby to do
> tabulky vubec neulozil nebo v prvnim pripade spatna komunikace s SQL
> serverem...
Pokud vim, tak se nejak takto chova i query. Nepomohlo by po
postu jeste zavolat Table1.Refresh?
David
ARP tabulka Windows2000 serveru...
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 22.1.2001 08:28:57
> Zdar panove,
> Za pomoci ARP tabulky serveru chci ziskavat informace o IP addresach a MAC >addresach.
> 1.) Nevite jak dlouho drzi Server Windows2000 v pameti informace v ARP?
> 2.) Jak se da tato hodnota zvysit treba na 30 minut?
> 3.) KOlik hodnot muze maximalne byt v ARP tabulce?
tady je zminka o WinNT - primo o Win200 jsem nenasel
http://msdn.microsoft.com/library/winresource/dnwinnt/S7BFF.HTM
Zdravi
D. Toman
kodovani dbf a excel
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 22.1.2001 08:33:07
Excell standardne (aspon u DBF tabulek pocita s kodovanim Latin 2
CP852)
22.1.2001 Sula Milos :
> Ahoj
> v souvislosti s timhle bych se chtel docel zeptat jak v Delphi(4) vytvorit
> paradox nebo dbase tabulku pres BDE a Table.CreateTable tak, aby kdyz ji
> otevru v excelu se mi spravne zobrazovalo kodovani. Prestoze v langdriver
> mam nastaveno kodovani win1250 tak mi to excel zobrazi proste blbe. Je chyba
> v excelu nebo v BDE nebo ve me ?
> dik
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
kodovani dbf a excel
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 22.1.2001 08:39:48
> Ahoj
> v souvislosti s timhle bych se chtel docel zeptat jak v Delphi(4) vytvorit
> paradox nebo dbase tabulku pres BDE a Table.CreateTable tak, aby kdyz ji
> otevru v excelu se mi spravne zobrazovalo kodovani. Prestoze v langdriver
> mam nastaveno kodovani win1250 tak mi to excel zobrazi proste
> blbe. Je chyba
> v excelu nebo v BDE nebo ve me ?
> dik
Toz si vyzkousej zkonvertovat Excelovskou tabulku do DBF formatu a pak se
podivej, jake ma ta tabulka kodovani a dalo by se predpokladat, ze takove
kodovani predpoklada i pri opacnem prevodu (muze to byt napriklad dosovska
stranka 852 ...)
T.
Zmena MDI okna na modalni
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 22.1.2001 09:13:39
Asi bych to udelal takhle
procedure TempModalMDIChild(Okno: TForm);
begin
Okno.FormStyle := fsNormal;
Okno.Hide;
//Okno.Hide; tam byt mozna nemusi,
//nevim jestli jde zavolat ShowModal,
//kdyz okno neni Hide.
Okno.ShowModal;
Okno.FormStyle := fsMDIChild;
end;
S pozdravem Michal Tiller
-----Original Message-----
From: Jan Kirchner [mailto:imconr(zv)volny(tec)cz]
Sent: Saturday, January 20, 2001 11:35 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Zmena MDI okna na modalni
Zdravim priznivce DELPHI.
mam dotaz zda lze MDI okno zmenit na modalni a zpet.
Potrebuji v jistem okamziku (v prubehu konunikace s RS-232) zajistit aby
okno bylo modalni a po ukonceni komunikace je zase dat do normalniho stavu.
Po pravde receno nevim jak na to a prepnout okno na modalni asi nejde.
Poradite mi nekdo?
Diky
J.Kirchner
Dynamicka pole
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 22.1.2001 09:24:11
Ahoj,
narazil jsem v souvislosti s dynamickymi poli na problem s jejich predavanim
odkazem, viz nasledujici fragment kodu.
TVyberItem = record
ID : integer;
ESID : integer; // id vyberu
SigId : integer;
Oznaceni : string;
Nazev : string;
UstrId : integer;
end;
TVyberItemArray = array of TVyberItem;
PVyberItemArray = ^TVyberItemArray;
procedure Pokus2(var Pole : TVyberItemArray);
begin
SetLength(Pole, 10000);
end;
procedure Pokus2a(Pole : PVyberItemArray);
begin
SetLength(Pole^, 10000);
end;
procedure Pokus1;
var
NL : TVyberItemArray;
begin
SetLength(NL, 0);
procedure Pokus2(NL); // <<<<<< toto mi havaruje na vyjimku v user32.dll
procedure Pokus2a((zv)NL); // <<<<<< toto mi spolehlive funguje
end;
Vzdycky jsem si myslel, ze pri predavani parametru odkazem se predava
pointer na parametr, ale tady to asi nejak nefunguje. Mate nekdo tuseni,
proc tomu tak je ? (z toho, co jsem nasel v helpu to podle mne nijak
nevyplyva).
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
TTable komponenta versus SQL server 2000 (microsof
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 22.1.2001 09:26:45
> kdyz zapnu (true) cachedUpdates v komponente ttable. Problem, je
> v tom, ze potom vsechno
> funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se
> vrati do vychoziho stavu.
Prostuduj si v manualu vyznam CachedUpdates ("kapitolka Working with cached
updates" v helpu), doporucuji rovnez podivati se na: ApplyUpdates method,
CancelUpdates, CommitUpdates method ...
T.
_______________________________
Tom�# Vlad�k
vladik(zv)swadvice(tec)cz
ICQ# 101763081
CASE nastroj
[*] Libor Stujan <listuj(zv)centrum(tec)cz> - 22.1.2001 10:13:28
Zdravim vsechny,
a mam dotazek. Postupne prichazim na to, ze bez dobre analyzy
neni mozne dobre udelat aplikaci, a hlavne ji potom dale
udrzovat. Takze moje otazka zni, jake nastroje pouzivate (pokud
to neni tajne) a pripadne nejaky dobry tip.
Zatim by mi stacil uplne jednoduchy nastroj, kde bych mohl
sledovat vyvoj, tj. navrh trid a jejich vazeb. Pokud o necem
takovem vite tak vas prosim o zaslani adresy ke stazeni. Jestli
to navic bude free (treba omezenim jen na 5 trid) tim lip.
Uspesny den a at se vam dari
*****************
Libor Stujan
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
**************
K chatov�n� je tu http://www.XChat(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Outlook - ulohy
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 22.1.2001 10:28:05
Ako mozem nejake naplanovane ulohy (z mojej databazy) dostat do
Outlook-u , respektive
ako mozem vytvorit v ulohu (programovo).kopirovanie suboru
[*] Martin <geoplan(zv)pp.sinet.sk> - 22.1.2001 10:33:30
Toto je zprava ve formatu MIME obsahujmcm vmce hastm.
ako mozem v D5 s kodu kopirovat subor ?
Martin
pomala aplikace v D5
[*] RNDr. Milan Vor�sek <vorisek(zv)igtt(tec)cz> - 22.1.2001 10:45:01
Ahoj,
kdyz spustim aplikaci z IDE, probiha viditelne pomaleji
a kdyz se ji pokusim ukoncit nebo jen prerusit, vse zatuhne
a jsem schopny jen shodit Delphi.
Kdyz tuto aplikaci spustim samostatne, je vse O.K.
Kdyz pracuji v D3 je vse OK i v IDE.
Program obsahuje cca 50 potomku TWinControl,
BDE ani zadne databazove komponenty nepouzivam,
je to ve Win 2000, 64 MB RAM.
Muze mi nekdo rici, kterym smerem patrat?
Diky.
M.Vorisek Nove ODBCe - blokove operacie
[*] Lubo Fule <fule(zv)sct.sk> - 22.1.2001 11:02:47
Uz je na svete nova verzia ODBCe (http://www.sct.sk/~fule/ODBCe/ODBCe.exe).
Pribudla podpora blokovych operacii (insert, update a pod.), teda je mozne
napriklad "zainsertovat" viac riadkov naraz (podrobnosti v popis.txt -
ParamsetSize, ParamsetIndex, ParamsetProcessing, ParamsetProcessed,
ParamsetStatus, ParamsetIgnore).
L.
kopirovanie suboru
[*] M. Winkler <m.winkler(zv)seznam(tec)cz> - 22.1.2001 11:11:11
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Ahoj
z DSR:
Procedure FileCopy( Const sourcefilename, targetfilename: String );
var
S,T: TFileStream;
begin
S := TFileStream.Create( sourcefilename, fmOpenRead );
try
T := TFileStream.Create( targetfilename, fmOpenWrite or fmCreate );
try
T.CopyFrom(S, S.Size ) ;
finally
T.Free;
end;
finally
S.Free;
end;
end;
M. Winkler
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, January 22, 2001 10:33 AM
Subject: kopirovanie suboru
ako mozem v D5 s kodu kopirovat subor ?
Martin
Aktualizace
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 22.1.2001 11:16:16
> mel bych jeden problem a sice, ze bych rad aby se mi zaktualizovalo jedno
> pole (datumove) ve vsech zaznamech v databazi na hodnotu aktualniho data.
> Zkousel jsem to pres komponentu BachMove, ale vubec nevim jak na to.
Zkus to spis pres TQuery pomoci SQL prikazu SET.
T.
_______________________________
Tom�# Vlad�k
vladik(zv)swadvice(tec)cz
ICQ# 101763081
CASE nastroj
[*] M. Winkler <m.winkler(zv)seznam(tec)cz> - 22.1.2001 11:16:07
Ahoj,
http://www.casestudio.com/rksoft
M.Winkler
----- Original Message -----
From: "Libor Stujan" <listuj(zv)centrum(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 22, 2001 10:13 AM
Subject: CASE nastroj
> Zdravim vsechny,
>
> a mam dotazek. Postupne prichazim na to, ze bez dobre analyzy
> neni mozne dobre udelat aplikaci, a hlavne ji potom dale
> udrzovat. Takze moje otazka zni, jake nastroje pouzivate (pokud
> to neni tajne) a pripadne nejaky dobry tip.
>
> Zatim by mi stacil uplne jednoduchy nastroj, kde bych mohl
> sledovat vyvoj, tj. navrh trid a jejich vazeb. Pokud o necem
> takovem vite tak vas prosim o zaslani adresy ke stazeni. Jestli
> to navic bude free (treba omezenim jen na 5 trid) tim lip.
>
> Uspesny den a at se vam dari
>
>
> *****************
> Libor Stujan
> listuj(zv)centrum(tec)cz
> ^^^^^^^^^^^^^^^^^
> SW development
> ^^^^^^^^^^^^^^^^^
> **************
>
> K chatov�n� je tu http://www.XChat(tec)cz
> Zalo�te si sv�j mail na http://mail.centrum(tec)cz
>TTable komponenta versus SQL server 2000 (microsof
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 22.1.2001 11:17:51
On 21 Jan 2001, at 22:33, vlada_ponechal(zv)post(tec)cz wrote:
> Chci vas pozadat o pomoc. Chci udelat ne moc slozitou aplikaci v D3
> prof. Mam server SQL
> 2000 ent. A za pomoci ODBC a BDE na nej pristupuji. Pouzivam pritom
> komponentu TTable,
> protoze se mi jiz predtim osvedcila (ne teda ze SQL serverem od
> MIc.)Narazil jsem vsak na problem. Pri vkladani a ukladani vet do
> tabulek mam dva stavy. Prikazem table1.insert vlozim
> vetu (ta se mi objevi i v dbgrid) ale po pouziti table1.post, se
> najednou veta strati (i z dbgrid). Kdyz tabulku restartuji, objevi se
> vsechny vety. Prisel jsem na to, ze na to plati, kdyz zapnu (true)
> cachedUpdates v komponente ttable. Problem, je v tom, ze potom
> vsechno
> funguje, ale pouze naoko. Kdyz restatuji tabulku vsechny zmeny se
> vrati do vychoziho stavu.
> Panove, nenapada Vas, cim to je? Me to pripada, jako kdyby to do
> tabulky vubec neulozil nebo v prvnim pripade spatna komunikace s SQL
> serverem...
Napada. Jednak postup s TTable proti MS SQL je nespravny,
podstatne vhodnejsi je TQuery pouzite tak, ze zmeny se posilaji
pomoci SQL prikazu (volanim ExecSQL), nebo jeste lepe pomoci
ulozene procedury. Jednak je v BDE chyba, ktera se tam tahne uz
odnepameti, takze jeste lepsi je porozhlednout se po jinych
komponentach, ktere BDE vubec nepouzivaji. Nebo po kazde
zmene tabulku zavrit a znovu otevrit.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
CASE nastroj
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 22.1.2001 11:24:30
Case Studio od rksoft. Ceny m�rn� (i pro dom�c�ho kutila), pou�it�
snadn�, jak dokumenta�n� v�stupy tak vazba na generov�n�
datab�z� r�zn�ch syst�m� vyhovuj�c�, pom�r cena/v�kon a
podpora v�robce zcela bezkonkuren�n�.
On 22 Jan 2001, at 10:13, Libor Stujan wrote:
Datum odesl�n�: Mon, 22 Jan 2001 10:13:28 +0100
Od: "Libor Stujan" <listuj(zv)centrum(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Po�tovn� prog.: Centrum Mail 1.0
V�c: CASE nastroj
Odpov�� kam: delphi-l(zv)fwd(tec)cz
> Zdravim vsechny,
>
> a mam dotazek. Postupne prichazim na to, ze bez dobre analyzy
> neni mozne dobre udelat aplikaci, a hlavne ji potom dale
> udrzovat. Takze moje otazka zni, jake nastroje pouzivate (pokud
> to neni tajne) a pripadne nejaky dobry tip.
>
> Zatim by mi stacil uplne jednoduchy nastroj, kde bych mohl
> sledovat vyvoj, tj. navrh trid a jejich vazeb. Pokud o necem
> takovem vite tak vas prosim o zaslani adresy ke stazeni. Jestli
> to navic bude free (treba omezenim jen na 5 trid) tim lip.
>
> Uspesny den a at se vam dari
>
>
> *****************
> Libor Stujan
> listuj(zv)centrum(tec)cz
> ^^^^^^^^^^^^^^^^^
> SW development
> ^^^^^^^^^^^^^^^^^
> **************
>
> K chatov�n� je tu http://www.XChat(tec)cz
> Zalo�te si sv�j mail na http://mail.centrum(tec)cz
Z.Kalhous
CASE nastroj
[*] Jirka Skladal <jirka.skladal(zv)seznam(tec)cz> - 22.1.2001 11:27:07
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Mel bych takovy dotaz:
Zacal jsem pracovat s InterBase a potrebuju do nej narat pomerne dost dat a strasne dlouho to trva.
Kdyz to cpu do SQL serveru, tak to trva par vterin a do InterBase to trva klidanko 5 min. Nevite cim to je? IB dela kazdou operaci s transakcema, ne? Nejde to nejak vypnout?
Diky za pomoc. Jirka
CASE nastroj
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 22.1.2001 12:47:31
ahoj,
my pouzivame CaseStudio2 od Radima Kunze. je to docela dobry, neuztale
to vylepsu a okamzite reaguje na pripominky. na pandore ma pro
pripominky a dotazy konferenci. spokojenost.
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Aktualizace
[*] Ren� Otisk - 22.1.2001 13:01:15
Pres TQuery: Update Tabulka Set Sloupec = '1.1.2001'
Sroub
> Ahoj,
>
> mel bych jeden problem a sice, ze bych rad aby se mi zaktualizovalo jedno
> pole (datumove) ve vsech zaznamech v databazi na hodnotu aktualniho data.
> Zkousel jsem to pres komponentu BachMove, ale vubec nevim jak na to.
> Poradite prosim ?
>
>
> Pavel Beranek