Archív konference Delphi

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

Types of actual and formal var parameters must be

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 2.4.2002 23:05:00

From: "Roland Turcan" <rolo(zv)sedas.sk>
> procedure RestoreFormPosition(var Form:TForm;GUID:string);
>
> to je OK ale ak skusim na forme
>
> RestoreFormPosition(Self,GUID); tak mi hlasi:

Nemuzes predavat Self jako var parametr, je nutne pouzit promennou.

Petr Vones

Terminateprocess her na geforce

[*] <korin.delphi(zv)centrum(tec)cz> - 02.4.2002 23:25:44

Nevim jestli mi tu bude nekdo schopny odpovedet,
kdyz nasilne vypnu hru na Geforce ( pomoci wm_close a pote
terminateprocess ) tak pote nejde spustit zadny program
pouzivajici DX. Tento problem jde vyresit resnutim pocitace, ale
to neni reseni.. :). Mate nekdo lepsi napad? :-)

--------------------
Nov� vyhled�va� pro �esk� internet www.WebFast(tec)cz - prost� najde ...

Terminateprocess her na geforce

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

From: <korin.delphi(zv)centrum(tec)cz>
> Nevim jestli mi tu bude nekdo schopny odpovedet,
> kdyz nasilne vypnu hru na Geforce ( pomoci wm_close a pote
> terminateprocess ) tak pote nejde spustit zadny program
> pouzivajici DX. Tento problem jde vyresit resnutim pocitace, ale
> to neni reseni.. :). Mate nekdo lepsi napad? :-)

Pouziti TerminateProcess muze vest k nedefinovatelnym stavum (predevsim na
Win9x). Aplikaci je nutno ukoncit korektne, WM_CLOSE by melo stacit.

Petr Vones


Re[2]: Zmena caption

[*] JSDelphi <jsdelphi(zv)atlas(tec)cz> - 3.4.2002 00:34:34

> From: "Michal �indler" <sindler(zv)identity-cs.com>
> To: <delphi-l(zv)clexpert(tec)cz>
> Subject: Re[2]: Zmena caption

Podarilo se mi to vyresit pres takovou "cunarnu", ale funguje to na 100%.

Jan Skopovy

procedure TForm1.ZmenCaption;
var
List: PPropList;
i, j, Size, Count: Integer;
PropInfo: PPropInfo;
Component: TComponent;
begin
for i := 0 to ComponentCount -1 do
begin
Component := Components[i];
Count := GetPropList(Component.ClassInfo, tkAny, nil);
Size := Count * Sizeof(Pointer);
GetMem(List, Size);
Count := GetPropList(Component.ClassInfo, tkAny, List);
for j := 0 to Count - 1 do
begin
PropInfo := List^[j];
if not (PropInfo^.PropType^.Kind in tkMethods) then
if PropInfo^.Name = 'Caption' then
begin
TLabel(Component).Caption := 'Hotovo'; // Hezka prasarna, ale
funguje !!!
Break;
end;
end;
FreeMem(List);
end;
end;

Screen saver - obe obrazovky

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 00:36:51

From: "Vit Jurasek" <delphi(zv)obecpohori(tec)cz>
> Jak ve screen saveru zjistim, ze je vice monitoru? Vsechny setrice od

Podivej se na Screen.Monitors a MonitorCount

Petr Vones


Soubory v adresari

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 00:42:05

From: "Viktor Marek" <viktor(zv)mbox.vol(tec)cz>
> Chtel bych se jeste zeptat jak to zaonacit aby se do ComboBoxu dostal jen
> nazev souboru bez extendru?

procedure TForm1.Button2Click(Sender: TObject);
var
FilesList: TStringList;
I: Integer;
begin
FilesList := TStringList.Create;
try
if BuildFileList('*.pas', faArchive or faReadOnly, FilesList) then
for I := 0 to FilesList.Count - 1 do
ComboBox1.Items.Add(PathExtractFileNameNoExt(FilesList[I]));
finally
FilesList.Free;
end;
end;

nebo

procedure TForm1.Button2Click(Sender: TObject);
var
I: Integer;
begin
if BuildFileList('*.pas', faArchive or faReadOnly, ComboBox1.Items) then
with ComboBox1.Items do
for I := 0 to Count - 1 do
Strings[I] := PathExtractFileNameNoExt(Strings[I]);
end;

Petr Vones


Zmena caption

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 00:49:01

From: "JSDelphi" <jsdelphi(zv)atlas(tec)cz>
> Podarilo se mi to vyresit pres takovou "cunarnu", ale funguje to na 100%.

Korektne by to mohlo vypadat treba takhle:

uses
TypInfo;

procedure TForm1.Button2Click(Sender: TObject);
const
NewCaption = '123';
var
I: Integer;
PropInfo: PPropInfo;
C: TComponent;
begin
for I := 0 to ComponentCount - 1 do
begin
C := Components[I];
PropInfo := GetPropInfo(C, 'Caption');
if (PropInfo <> nil) and (PropInfo^.PropType^.Kind = tkLString) then
SetStrProp(C, PropInfo, NewCaption);
end;
end;

Petr Vones


Zjisteni jazyka

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 01:09:51

From: "David Kraina" <DKx(zv)seznam(tec)cz>
> kdyz pry jazyk urcitym jinym oknum nejde nastavit, jde alepon nejak
> zjistit oznaceni jazyka aktualniho - mam aplikaci jako panel, a
> potrebuji kdyz se prepnu na jakekoliv okno, at ukaze to EN nebo CZ

Z dotazu neni uplne jasne jestli se jedna o LCID (thread) nebo HKL (rozlozeni
klavesnice), spise jde asi o ten druhy pripad.

uses
JclLocales;

var
KeybLayouts: TJclKeyboardLayoutList;

procedure TForm1.Timer1Timer(Sender: TObject);
var
Wnd: HWND;
ThreadID: DWORD;
KeybLayout: TJclKeyboardLayout;
begin
Wnd := GetForegroundWindow; // napriklad

if Wnd <> 0 then
begin
ThreadID := GetWindowThreadProcessId(Wnd, nil);
KeybLayout := KeybLayouts.ItemFromHKL[GetKeyboardLayout(ThreadID)];
end
else
KeybLayout := nil;

if KeybLayout <> nil then
Label1.Caption := KeybLayout.LocaleInfo.ISOAbbreviatedLangName
else
Label1.Caption := '';
end;

initialization
KeybLayouts := TJclKeyboardLayoutList.Create;

finalization
FreeAndNil(KeybLayouts);

end.

Petr Vones


EOleSysError

[*] Ondrej Krsko <krsko(zv)gjh.sk> - 3.4.2002 00:18:39

http://www.microsoft.com/data/

> DAO je nainstalovane verzia 3.5 ale mozno mu to nestaci, kde sa da
stiahnut
> novsie ?

zmena proxy serveru v nastaveni internetu

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

From: "Tomas Vida" <vida(zv)uniware(tec)cz>
> potrebuju zmenit adresu a cislo portu proxy serveru, ktere je v
> ovladacim panelu "Moznosti Internetu / Nastaveni mistni site" na Win2k.

Pomoci API funkce InternetSetOption - INTERNET_OPTION_PROXY

Petr Vones


Pridanie tlacitka do TEditu

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 3.4.2002 04:29:49

Podivej se na KEdit
http://www.kopr(tec)cz/delphi/index.htm

>
> Tvorim si potomka od TEdit ale nedari sa mi priradit TSpeedButton k editu,
> ale nie do jeho oblasti, ale aby sa to spravalo ako by bol button tesne
> vedla editu ale v designtime a v aplikacii bola jedna komponenta.

Ukladanie a obnova pozicii ChildFormu

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 3.4.2002 06:43:29

Nemas tam jeste trebars IniStorage a to ti prepise Position?

Sroub
> ----- Original Message -----
> From: "ing. Pavel Zilinec" <zilinec(zv)email(tec)cz>
> > A nemuze byt problem v tom, ze mas WindowState napr. na Maximized
> > apod?
> > Ja kdyz si pamatuji, tak si pamatuji i stav WindowState, pze mohl mit
> > maximalizovane a potom by nebylo vhodne mu to nastavit jinak.
>
> > > v OnClose si zapisem
> > > Left,Top,Width,Heigth do registry
> >
> > > A onCreate formu si nacitam ak existuju a ukladam do property formu.
> Heigth
> > > a Width sa pekne nastavuje ale Left a Top si robit co chce.
> > > Je sice pravda, ze Top je take ako v registry ale pri zobrazeni formu
to
> je
> > > tak ako on chce. Skusal som obnovenie dat ak do OnShow, ale ani tam to
> > > nefunguje. Ak to dam zase do OnActivate tak vidiet ako poskakuje okno.
> Ako
> > > na to ?
>
> Zaujimave je to, ze ked som tie moje obnovovacie procedury skusal na
cistom
> projekte tak to fungovalo a ked som to skusil implementovat do mojej
> aplikacie tak to blbne. Aplikacia je MDI ale nejde to ani na MDIchilde v
> projekte ani na modalnych oknach v tom istom projekte. A nic tam proste
> nerobim, co by mohlo modifikovat. Nieco sa tam este po onShow musi udiat
do
> zmeni Left a Top. Sirka a vyska je OK.
>
> TRoland.

Pointer na TBitmap?

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 3.4.2002 06:46:49

Ing. Jiri SOKOL dne 3 Apr 2002 v 7:30:

> resim jeden problem. Mam x bitmap. Vytvorim si proto x TBitmap a do
> nich priradim ty me bitmapy.
>
> Existuje zpusob, jak si zapamatovat na ty vytvorene TBitmapy ukazatel?
...
>
> Zkousel jsem TListy (TComponentList, TList, TObjectList), ale zadny se
> neda pouzit. Nedelali jste nekdo neco podobneho?

Ahoj,

a v cem je problem pri pouziti tList nebo tObjectList?
Vzdyt pomoci tList.Add muzes vytvorene tBitmap-y do seznamu pridavat, a pozdeji pak napr.
Bitmap:=tBitmap(List[7]) zase pouzivat...

Karel Rys

Pointer na TBitmap?

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

Ahoj,

resim jeden problem. Mam x bitmap. Vytvorim si proto x TBitmap a do nic=
h
priradim ty me bitmapy.

Existuje zpusob, jak si zapamatovat na ty vytvorene TBitmapy ukazatel?
Chystam se provadet s temi bitmapami ruzne kousky a tak je nechci porad=

nacitat.
Pak budu delat neco jako:
image.picture.assign(TBitmap(ukazatel))
form.canvas(TBitmap.(ukazatel).Canvas)
atd.

Zkousel jsem TListy (TComponentList, TList, TObjectList), ale zadny se =
neda pouzit.
Nedelali jste nekdo neco podobneho?

Diky
Jirka

______________________________________________________________________
Halina Pawlowska a televizni rybicky na internetu http://www.rybicky.co=
m


Pointer na TBitmap?

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 03.4.2002 08:06:15

> Ahoj,
>
> a v cem je problem pri pouziti tList nebo tObjectList?
> Vzdyt pomoci tList.Add muzes vytvorene tBitmap-y do seznamu pridavat,=
a pozdeji pak napr.
> Bitmap:=3DtBitmap(List[7]) zase pouzivat...
>
> Karel Rys

Ahoj,
zkousel jsem toto:
var
BtmList:TList;
temp:TBitmap;
begin
temp:=3DTBitmap.Create;
BtmList.Add(temp);
end;

Delphi kod prelozi, ale pri pouziti to nahlasi vyjimku:
"Acces violation at address 00413AC7 in module 'Project1.exe'.Read of a=
ddress
FFFFFFFF."

Tak jsem to prave vyresil. Omlouvam se,ze jsem vas otravoval. Chyba byl=
a v tom,
ze jsem pri Form.Create zapomnel udelat BtmList:=3DTList.Create;
Uz to funguje.

Dekuji

Jirka

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


IB/FB a replikace

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 3.4.2002 08:15:58

> Nevim. Pouzivame IB Replicator Firebird, jedna licence stoji cca 10tis.
Mam pocit,
> ze pri trose snahy to muze byt fungovaci na takove pripady jako je
centrum+x
> pobocek pokud (jak jsem psal drive) se uz pri navrhu databaze s replikaci
pocita.
> Kdyz tech pobocek bude cca 10, tak za 100tis bych do programovani
vlastniho
> replikacniho sw tedy nesel.

To mas pravdu ja take, ne. Ale pokud firma koupi tvuj soft jako jednu
multilicenci, s tim, ze ma x - pobocek a ty mas prodanych treba 20 takovych
instalaci, tak jsou to lehke pocty.

> > nemluvim o masivnim prenosu dat (10 MB SQL prikazu z jednoho serveru),
> > u ktereho IB Replikator nevykazoval dobre vysledky.
> A neni to spise odvisle od toho, po jakych "dratech" a jak casto se
replikace aktivuje?
> Samozrejme kdyz v centru jsou tisice transakci za den a replikace se
pousti jednou
> za den v noci s pripojenim po vytacene lince, tak to nebude nic moc, pokud
ale
> replikacni server bude mit pripojeni pres pevne linky a bude olizovat
pozadavky
> rekneme kazdych pet minut, tak by to mohlo jet temer nepozorovatelne.

Problem je v tom, ze tento velky objem dat se objevi narazove po spusteni
ruznych zaverek, potom Ti prubezne synchronozovani neni nic platne a to
nevim jestli si se dival jak uklada do logu IB Replikator. Kazde schema ma
svoji sadu triggeru a to bych pak v replikacnim logu na centrale mel vsechno
x krat a napr. 10 triggeru (vlastne krat 3) na kazde tabulce neni zrovna
idealni. No a s linkami je to vzdy tezke. Donutit zakazniky koupit modem a
platit jen telefonni poplatek je vzdy jednodusi. A jen tak mimochodem,
myslel jsem, ze cilem replikace je prave presunout synchronizaci databazi na
dobu, kdy nikdo nepracuje, aby to uzivatele nezdrzovalo, pokud jim toto
zpozdeni nevadi. Pokud ano, pak je treba asi budovat podstatne drazsi on
line system.

OLE Excel

[*] Michal <delphi-konference(zv)bcpraha(tec)com> - 3.4.2002 08:22:03

Ahoj,

NumberFormat musi odpovidat aktualnimu narodnimu nastaveni, tzn. pokud
mas jako des. oddelovac , a ne . tak tam musis mit 0,00 atd.
Je to podle me pekna pitomost, daleko lepsi by byl pevny format, ale
bohuzel.

Michal

> Ahoj, muzete mne prosim nekdo postrcit dopredu ?
>
> ====
> ExcelApp := CreateOleObject('Excel.Application');
> .
> .
> Sheet.Columns[1].ColumnWidth := 10;
> Sheet.Cells[1,4] := FieldByName('cena').AsFloat;
> Sheet.Cells[1,4].NumberFormat := '#,##0.00';
> =====
>
> Excel nastartuje, nasypu data a posledni radek kodu vyhodi chybu:
"Neni
> mozne nastavit vlastnost NumberFormat tridy Range." Why?
>
> Potom mi neni jasne, jak se da pracovat s konstantami Excelu,
napriklad
> zarovnani dat v bunce (xlCenter, xlLeft, xlRight). Delphi se k nim
> pochopitelne nezna, cili asi musim nekde splasit jejich hodnotu a
> nadeklarovat je ?
>
> (W2k, D5Prof, Excel2k)
>
> Moc dekuji
>
> Mirecek
> mailto:miroslav.evjak(zv)seznam(tec)cz

OLE Excel

[*] Josef A. Cerny <delphi(zv)atlascon(tec)cz> - 3.4.2002 08:23:57

> Excel nastartuje, nasypu data a posledni radek kodu vyhodi chybu: "Neni
> mozne nastavit vlastnost NumberFormat tridy Range." Why?

Ja tam sypu data z promennych dle formatu.
Cisla z Extended, datumy z TDateTime, apod. Pak Excel sam nastavuje
spravny format bunek.

> zarovnani dat v bunce (xlCenter, xlLeft, xlRight). Delphi se k nim

Pouzivam unitu Exceltlb.pas k Excelu 8.0, kde jsou nadeklarovane konstanty
xlHAlignCenter = -4108;
xlHAlignCenterAcrossSelection = 7;
xlHAlignDistributed = -4117;
xlHAlignFill = 5;
xlHAlignGeneral = 1;
xlHAlignJustify = -4130;
xlHAlignLeft = -4131;
xlHAlignRight = -4152;

A asi jeste tisic dalsich.

Josef Cerny

Divne chovani D5 (Access volation)

[*] Vagner Pavel <Vagner(zv)ceps(tec)cz> - 3.4.2002 07:36:03

Zdravim,
stava se taky nekomu, ze se cas od casu zblazni Delphi a pri otevrenem
projektu a najeti na tlacitka v nastrojovych panelech Delphi to hazi( ale ne
vzdy) Access volation at .... . Kdyz restartnu W, tak je to zas ok. Nevim,
zdali je to podstatne, ale v tom projektu mam toolbar. D5 Ent/W98.
Dik Pavel


ako vykreslit form na stred ?

[*] Petr Kuklik <Petr.Kuklik(zv)seznam(tec)cz> - 03.4.2002 08:48:45

No, jestli dobre rozumim problemu, pak by melo fungovat nasledujici

1/ nastavim Width, Height
2/ a az ted nastavim Position :=3D poScreenCenter;

Petr

> >
> > > zdravim,
> > >
> > > ako zabezpecim aby sa my formulare zobrazovali na stred obrazovky=
v
> > > hocijakom rozliseni ? Ja mam 1600x1200 ale ak to pustim na 1024x7=
60 tak
> sa
> > > my to vykresli v rohu a musim to posunut vzdy po spusteni.
> >
> >
> >
>
>

______________________________________________________________________
Jake bude pocasi? http://pocasi.seznam(tec)cz


OLE Excel

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 3.4.2002 09:06:47

From: Josef A. Cerny [mailto:delphi(zv)atlascon(tec)cz]
Pouzivam unitu Exceltlb.pas k Excelu 8.0, kde jsou nadeklarovane konstanty

A kde je mozno tu unitu nalezt ?

Pavel

Windows XP + Delphi 5

[*] Petr Urban <p.urban(zv)worldonline(tec)cz> - 3.4.2002 09:08:02

Ja osobne pracuji pod Windows XP s Delphi 5 a probelmy nemam zcela zadne.
Aplikace, ktere jsem drive vytvoril pod Delphi 5, ale na Windows 98 funguji
take bez problemu. Vsechno testuji i na rade jinych systemu na jinych
strojich ve skole a i tam jede vse bez problemu. Jediny problem, ktery jsem
mel za tech nekolik let s Delphi 5 (nevim ale jestli to byla chyba Delphi 5
nebo systemu) je, ze jsem v jedne aplikaci pouzil standardni WinApi funkci
pro omezeni plochy pohybu kurzoru (ted si z hlavy nevzpomin jak se
jmenovala), aplikaci prelozil pod Windows 2000, vse jelo tak jak melo, ale
jakmile jsem to spustil pod Windows 98, tak se po provedeni operace kurzor
zaseknul a nesel rozjet. Pritom v helpu je napsano jasne ze tuto funkci
prodporuji vsechny systemy.

Petr Urban

=================================
Petr Urban, V�B - TU Ostrava
P.Urban(zv)WorldOnLine.Cz
=================================

----- Original Message -----
From: "Jon� Mari�n" <Jonas(zv)komercpoj(tec)cz>
To: "Delphi Konference (el. adresa)" <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, March 28, 2002 6:32 PM
Subject: Windows XP + Delphi 5


> Ahoj,
>
> asi mne ceka preklopeni aplikace, ktera bezi na Windows 9x a Windows 2000
na
> Windows XP, aplikace je psana v Delphi 5, pouziva pouze standartni
> komponenty + QuickReport a Synapsi.
>
> Necekaji mne problemy v souvislosti s D5, nebudu muset jit na D6 ?
>
> Marian


Pointer na TBitmap?

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 3.4.2002 09:11:56

Pouzivam TList na uchovavani mnohem komplikovanejsich objektu a funguje =
to.
Mozna je tvuj problem v tom, ze pri cteni pointeru ze seznamu zapominas =
na
pretypovani, napriklad

var Bitmap: TBitmap;

for i:=3D 0 to BitmapList.Count - 1 do
begin
Bitmap:=3D TBitmap(BitmapList.Items[i]);
... tady udelej co potrebujes...
end;

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant=20
ICQ #68652380

D&COMM s.r.o.
Korunova=E8n=ED 6
170 00 Praha 7

> resim jeden problem. Mam x bitmap. Vytvorim si proto x TBitmap a do =
nich
> priradim ty me bitmapy.
>=20
> Existuje zpusob, jak si zapamatovat na ty vytvorene TBitmapy =
ukazatel?
> Chystam se provadet s temi bitmapami ruzne kousky a tak je nechci =
porad=20
> nacitat.
> Pak budu delat neco jako:
> image.picture.assign(TBitmap(ukazatel))
> form.canvas(TBitmap.(ukazatel).Canvas)
> atd.
>=20
> Zkousel jsem TListy (TComponentList, TList, TObjectList), ale zadny =
se
neda pouzit.
> Nedelali jste nekdo neco podobneho?
>=20


OLE Excel

[*] Jarda Jirava <listuj(zv)centrum(tec)cz> - 03.4.2002 09:31:17

Zdravim,

co se tyka konstant.

Muzes pouzit bud jiz zminovanou tlb.pas a nebo, pokud si
otevres excel a editor VBA kodu, tak po stisknuti klavesy F2 se
ti objevi Object Browser. Tady si muzes najit vsechno potrebne.

Zdravim a preji prijemny den

Jarda

*****************
Jarda Jirava
(zv)
LiStuj
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
*****************

--------------------
�ena v centru pozornosti na http://zena.centrum(tec)cz

Types of actual and formal var parameters must be

[*] Roland Turcan <rolo(zv)sedas.sk> - 3.4.2002 10:12:23


From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
> > From: "Roland Turcan" <rolo(zv)sedas.sk>
> > procedure RestoreFormPosition(var Form:TForm;GUID:string);
> >
> > to je OK ale ak skusim na forme
> >
> > RestoreFormPosition(Self,GUID); tak mi hlasi:
>
> Nemuzes predavat Self jako var parametr, je nutne pouzit promennou.

Ale ked tam dam meno formu ani tak mi to nezozerie.

TRoland.

MDI Aplikace

[*] ales.pavel(zv)popron(tec)cz - 3.4.2002 10:22:37

Tak resim jeste jeden problem...
Kdyz udelam MDI tak nejak nemohu vykrejtovat zadnou class p=F8i show =
nebo
create childformu,
neporadite mi lidicky? Samyyy access violation...
Asi jsem tu MDI blbe pochopil...
Ales Pavel
Technical Specialist
Popron Consulting - Your System Integrator=20
HW-25 let,SW-D6 Ent W2000


Types of actual and formal var parameters must be

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 3.4.2002 10:25:20

> > > procedure RestoreFormPosition(var Form:TForm;GUID:string);
> > >
> > > to je OK ale ak skusim na forme
> > >
> > > RestoreFormPosition(Self,GUID); tak mi hlasi:
> >
> > Nemuzes predavat Self jako var parametr, je nutne pouzit promennou.
>
> Ale ked tam dam meno formu ani tak mi to nezozerie.
>

rikal promennou a ne nazev, ale nemas nahodou ten formular jineho typu nez
tForm napr. tForm1 potombys to musel volat spis
RestoreFormPosition(tForm(Self),GUID);

IB a rychlost count & RAMDISK

[*] Miroslav_Cipel(zv)rubena.cgs(tec)cz - 3.4.2002 10:36:43




podivej se na http://www.superspeed.com


M.

OLE Exceltlb.pas

[*] Josef A. Cerny <delphi(zv)atlascon(tec)cz> - 3.4.2002 10:39:50

>> Pouzivam unitu Exceltlb.pas k Excelu 8.0, kde jsou nadeklarovane
konstanty
>
> A kde je mozno tu unitu nalezt ?
>

Myslim, ze v adresari Imports prislusne verze Delphi.

Josef Cerny

lock/unlock PC

[*] Tomas Skoda <delphi(zv)jdsoftware.sk> - 3.4.2002 10:41:09

Chtel bych se zeptat, jestli nahodou nekdo nevite, ci je posilana nejaka
zprava
pri zamykani a odemykani PC (ne ukonceni Windows). Nebo jak jinak by se dala
tato udalost v programu odchytit.

Dik za pomoc

Petr Jezek


Acceleratory

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 3.4.2002 10:53:52

Ahoj,

v aplikacich hojne pouzivam acceleratory - podtrzene pismenko
napr. v Caption buttonu. Standardne je treba pouzit ALT + podtrzene
pismeno. To je OK.
Pokud ale focus ma komponenta, ktera nemuze prijimat text
(checkbox, dbgrid s rowselect=true apod.), vyvola prislusnou akci i
samotny stisk pismena - bez ALT. Tomu potrebuji zabranit. Vite
nekdo jak?

Diky.

David Lebeda


OLE Exceltlb.pas

[*] Michal <delphi-konference(zv)bcpraha(tec)com> - 3.4.2002 11:00:53

V delphi 5 je v adresari ocx\servers\, v imports\ jsou pouze dcu.
V delphi 3 neni vubec, musis si ji nechat vytvorit ze souboru excel.olb
z office.

Myslim si, ze ti ta unita nepomuze, protoze tam podle me nejsou
definovany zadne NumberFormaty.

Michal

>
> Myslim, ze v adresari Imports prislusne verze Delphi.
>
> Josef Cerny

Sluzby Win2000 - Uzamceni stanice=>ICQ status N/A

[*] Milan Cizek <Cizek.Milan(zv)seznam(tec)cz> - 03.4.2002 11:02:18

> Potreboval bych trochu nakopnout spravnym smerem. Rad bych si udelal
> Service Application, ktera by pri uzamceni stanice pod W2K provedla
> ihned prepnuti spusteneho ICQ do My Status Extended Away.
>
> Nemate nekdo z takovymto ovladanim ICQ zkusenosti?

ahoj,
podivej se na www.torry.net, kdysi jsem tam videl unity s prekladem
deklaraci funkci (DLL a API) pro obsluhu ICQ. Mozna bych se taky
podival primo na stranky ICQ...

http://www.torry.net/internetother.htm

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

______________________________________________________________________
Vylepsete svuj prohlizec Internetu na http://software.seznam(tec)cz/listick=
a


Je tiskarna graficka?

[*] <tks(zv)mail(tec)cz> - 03.4.2002 12:09:06

Jak muzu zjistit, jestli je tiskarna graficka, nebo text-only. Pokud je text-only, musim totiz konvertovat cestinu do kodove stranky, ktera je nastavena v tiskarne (kamenicky atd.). A toto samozrejme nemuzu, pokud tisknu ma grafickou tiskarnu.

Dik

---------------------------------------
Nav�tivte http://www.globalsearch(tec)cz/ !

Types of actual and formal var parameters must be

[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 3.4.2002 12:09:57

> > > > procedure RestoreFormPosition(var Form:TForm;GUID:string);
>=20
> rikal promennou a ne nazev, ale nemas nahodou ten formular=20
> jineho typu nez
> tForm napr. tForm1 potombys to musel volat spis
> RestoreFormPosition(tForm(Self),GUID);
>=20
>=20

To pretypovani u VAR parametru je to co prave nejde - podle me staci
zrusit to var pred Form:TForm - neocekavam, ze uvnitr tenhle formular
vytvaris a jiny duvod predavat objekt odkazem neni.

Honza +

Pohyblivy object po kompilaci,tisk tohoto objektu

[*] ales.pavel(zv)popron(tec)cz - 3.4.2002 12:14:58

Timhle mohu rozpohybovat nektere komponenty

const kSC_DragMove =3D $F012 ;

begin
ReleaseCapture(); // obnov=ED windowsovsk=FD 'mouse input procesing'
Panel1.Perform(WM_SYSCOMMAND, kSC_DragMove, 0); //p=F8esune panel

end;

Muzete me blbeckovi vysvetlit proc nejde treba TLabel, ceho to musi byt
potomek aby to slo,zjistil jste nekdo cim to? Mam nejisty dojem ze to =
musi
byt nejaky API objekt a pro ten to plati nebo ne? Label asi objekt jako
takovy asi neni.

Jak vlastne tiskne QReport objekty typu TPanel, TEdit potreboval bych =
to
vedet, zkousel jste to nekdo? Nemam tu tiskarnu...:-)

Ales Pavel
Technical Specialist
Popron Consulting - Your System Integrator=20
HW-25 let,SW-D6 Ent W2000


Types of actual and formal var parameters must be

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 3.4.2002 12:30:34

To pretypovani u VAR parametru je to co prave nejde - podle me staci
> zrusit to var pred Form:TForm - neocekavam, ze uvnitr tenhle formular
> vytvaris a jiny duvod predavat objekt odkazem neni.


ja to skouse v D5 a slo mi to (prave s tim tForm)

Ukladanie a obnova pozicii ChildFormu

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 3.4.2002 12:37:37

> Zaujimave je to, ze ked som tie moje obnovovacie procedury
> skusal na cistom
> projekte tak to fungovalo a ked som to skusil implementovat do mojej
> aplikacie tak to blbne. Aplikacia je MDI ale nejde to ani na
> MDIchilde v
> projekte ani na modalnych oknach v tom istom projekte. A nic
> tam proste
> nerobim, co by mohlo modifikovat. Nieco sa tam este po onShow
> musi udiat do
> zmeni Left a Top. Sirka a vyska je OK.
>
Ahoj,
mozna je to mimo misu, ale ja jsem problemy s nastavovanim pozice formu
resil taky. Nakonec jsem zjistil, ze musim u formu nastavit
Position=poDesigned, jinak se mi posunul... Kde se to deje, jsem uz
nezkoumal.

Zdravim

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

Zjistit odpor ma pres COM1 pomoci delphi

[*] Petr Urban <p.urban(zv)worldonline(tec)cz> - 3.4.2002 13:02:11

Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.=

Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze sot=
va
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod De=
lphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to udelat.=
Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z=EDskejte po=E8=EDta=E8! Je to GEni=E1ln=EC jednoduch=E9! http://www.gen=
ius(tec)cz

Chovani IDE pri zavreni programu

[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 3.4.2002 13:06:28

Zdravim - tento dotaz minule nikdo nezodpovedel, proto ho zkusim jeste
jednou:

U nekolika programu se mi najednou zacala dit divna vec - spustim program (z
IDE), po nabehnuti ho uzavru a nasledne se Delphi zastavi (stopped), otevrou
CPU okno a vyhodi nasleduji warning:

application-defined exception (code 0xc0000008) at 0x77fa03bc
a radu 12 hex cisel

Pri uzavreni CPU okna a klavese F9 se toto opakuje jeste trikrat (aplikace
je stale "stopped") - stejny kod, stejna adresa, jen rada hex cisel se meni.
Nekdy po teto rade stisku F9 jiz nelze okno CPU zavrit - ani krizkem vpravo
nahore, ani z menu, ani z menu okna CPU (levy horni roh).

Pokud pouziji CTRL+F2, tak se IDE dostane rovnou do spravneho stavu.

Zkousel jsem smazat vsechny ne-PAS a ne-DPR soubory (DSK, DOF, DCU ...) -
bez vysledku. Dela to u nekolika programu, code a adresa jsou pro vsechny
stejne.

U nove vygenerovane aplikace a u nekterych jinych se toto neprojevuje.
Nejsem si vedom, ze bych menil jakekoliv nastaveni v Delphi, ani jsem
neinstaloval nove knihovny/experty.

D4.03 Pro + GExperts 1.00 + FreeVCS 2.2.1.0 (server MSSQL bezi na jinem
stroji)
Win 2k Pro CZ SP2

Nesetkal jste se s tim nekdy nekdo?

Diky
Mira Ondrisek

Chovani IDE pri zavreni programu

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 3.4.2002 13:14:17

Hledal bych uvolnovani objektu (i v pripadnych naloudovanych knihovnach). V
D3 mi slo vse OK po preklopeni do D5 mi tohle delalo taky -> blbe jsem
uvolnoval objekty...

Sroub
> Zdravim - tento dotaz minule nikdo nezodpovedel, proto ho zkusim jeste
> jednou:
>
> U nekolika programu se mi najednou zacala dit divna vec - spustim program
(z
> IDE), po nabehnuti ho uzavru a nasledne se Delphi zastavi (stopped),
otevrou
> CPU okno a vyhodi nasleduji warning:
>
> application-defined exception (code 0xc0000008) at 0x77fa03bc
> a radu 12 hex cisel
>
> Pri uzavreni CPU okna a klavese F9 se toto opakuje jeste trikrat (aplikace
> je stale "stopped") - stejny kod, stejna adresa, jen rada hex cisel se
meni.
> Nekdy po teto rade stisku F9 jiz nelze okno CPU zavrit - ani krizkem
vpravo
> nahore, ani z menu, ani z menu okna CPU (levy horni roh).
>
> Pokud pouziji CTRL+F2, tak se IDE dostane rovnou do spravneho stavu.
>
> Zkousel jsem smazat vsechny ne-PAS a ne-DPR soubory (DSK, DOF, DCU ...) -
> bez vysledku. Dela to u nekolika programu, code a adresa jsou pro vsechny
> stejne.
>
> U nove vygenerovane aplikace a u nekterych jinych se toto neprojevuje.
> Nejsem si vedom, ze bych menil jakekoliv nastaveni v Delphi, ani jsem
> neinstaloval nove knihovny/experty.
>
> D4.03 Pro + GExperts 1.00 + FreeVCS 2.2.1.0 (server MSSQL bezi na jinem
> stroji)
> Win 2k Pro CZ SP2
>
> Nesetkal jste se s tim nekdy nekdo?
>
> Diky
> Mira Ondrisek
>
>

Pohyblivy object po kompilaci,tisk tohoto objektu

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 3.4.2002 13:23:54

Musi mit vlastni handle okna, cili potomek TWinControl. Misto TLabel lze
tedy pouzit TStaticText.

Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

From: <ales.pavel(zv)popron(tec)cz>

Muzete me blbeckovi vysvetlit proc nejde treba TLabel, ceho to musi byt
potomek aby to slo,zjistil jste nekdo cim to? Mam nejisty dojem ze to musi
byt nejaky API objekt a pro ten to plati nebo ne? Label asi objekt jako
takovy asi neni.

Types of actual and formal var parameters must be

[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 3.4.2002 13:26:12

Mas pravdu (taky jsem si vyzkousel), tak to je dira v typove kontrole
Delphi, protoze kdyz udelam

procedure doForm( var novyForm : TForm );
begin
novyForm :=3D TForm.Create;
end;

var xForm : TForm1;

begin
doForm( TForm(xForm) );
end;

tak do promenne xForm : TForm1 dostanu TForm. Tedy zde se Delphi chova
jako poradne Cecko (pointer je vzdycky pointer). Ono tim pretypovanim
delas stejnou vec jako kdyz nekde napises xForm :=3D TForm1( =
TForm.Create
); A pokud v te funkci nemas Create, pak nepotrebujes tu promennou
predavat odkazem.

Podle me to nema smysl predavat objekt odkazem. Alespon ho netusim, tedy
krome funkce podobne s TApplication.CreateForm, kde se predava take typ,
ktereho formular je.

Honza +

> -----Original Message-----
> From: Ladislav Fitz [mailto:ladislav.fitz(zv)kodytek(tec)cz]
> Sent: Wednesday, April 03, 2002 12:31 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: 34. Types of actual and formal var parameters must be
> identical
>=20
>=20
> To pretypovani u VAR parametru je to co prave nejde - podle me staci
> > zrusit to var pred Form:TForm - neocekavam, ze uvnitr=20
> tenhle formular
> > vytvaris a jiny duvod predavat objekt odkazem neni.
>=20
>=20
> ja to skouse v D5 a slo mi to (prave s tim tForm)
>=20
>=20


chyba nove komponenty

[*] Jan�a��k Stanislav <jancarik(zv)hame(tec)cz> - 03.4.2002 13:34:23

Ahoj,
p�i t�to konstrukci dynamick�ho vytvo�en� komponenty TMemo2 se v�e chov�
norm�ln�

Memo2:=TMemo2.Create(Form1);
Memo2.Parent:=Form1;

asi jsi po vytvo�en� nep�i�adil formul�� do vlastnosti komponenty
Parent.

Zdrav�m
JaS

Zjistit odpor ma pres COM1 pomoci delphi

[*] Vagner Pavel <Vagner(zv)ceps(tec)cz> - 3.4.2002 13:00:50

1) trochu out, ale prime mereni analogovym velicin lze udelat pres game
port. Pokud by nevadil primy pristup na port (W95/98 ve W2000 si =
nehrabnes)
tak pres game,

1) mit nejkay udelatko ( napr s 555) ktery prevede odpor na zmenu =
stridy, ci
frekvence a to pak napocitat.
cau Vagy



-----Original Message-----
From: Petr Urban [mailto:p.urban(zv)worldonline(tec)cz]
Sent: Wednesday, April 03, 2002 1:02 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Zjistit odpor ma pres COM1 pomoci delphi


Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou =
aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze =
sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z=EDskejte po=E8=EDta=E8! Je to GEni=E1ln=EC jednoduch=E9! =
http://www.genius(tec)cz

Zjistit odpor ma pres COM1 pomoci delphi

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 3.4.2002 14:00:51

> P�edm�t: Zjistit odpor ma pres COM1 pomoci delphi
>
> Doufam, ze mi pomuzete s mym problemem. Mam v Delphi
> vytvorenou aplikaci.
> Potrebuji do ni ale dostat informace o odporu z COM1. Je mi
> jasne, ze sotva
> budu moci pripojit primo na nejaky kontakt COM1 odpor a
> doufat, ze pod Delphi
> sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim
> jak to udelat.Nebo
> nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
> k PC.

Ahoj,

hodne zalezi na pozadovane presnosti a rozsahu mereni. Pokud potrebujes
spise sledovat zmeny nez urcovat absolutni velikost, a muzes si velikost
odporu zvolit, zkus se podivat na joystick interface. Zakladni rozumy o
joysticks najdes napr. na:
http://www.epanorama.net/documents/joystick/index.html

Implementace obsluhy joysticku ve windows je obsazena v multimedia system,
unit tusim mmsystem.

Pokud potrebujes merit presne absolutni hodnoty, zkus nejaky multimetr s
RS-232 rozhranim. Obsluhu si ale nejspis budes muset napsat sam.

Zdravim

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

Instalace RX v Delphi 6

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 3.4.2002 14:08:06


Ahoj,

muzete mi prosim nekdo poradit s instalaci RX komponent v D 6 ? Je tam
sice README.TXT s popisem, ale nedari se mi.

Diky

Vasek


IB a UNICODE_FSS

[*] Jan Najvarek <conference.reader(zv)artin(tec)cz> - 3.4.2002 14:21:22

Zdravim,

poradte mi, prosim, jak korektne postavit Delphi aplikaci nad IB databazi v
kodovani UNICODE_FSS. Dival jsem se do archivu a nic kloudneho jsem
nenasel......

Jestli to chapu dobre, tak v parametrech pripojeni pres TIBDatabase musim
nastavit ctype=UNICODE_FSS pred samotnym pripojenim.

Jde mi o to, zda pro tuto aplikaci mohu pouzit klasicke DB komponenty - me
pokusy koncily hlaskou "Cannot transliterate characters between character
sets".

Jestlize na DB komponenty mohu zapomenout ne a musim vzdy stringy prevadet
rucne z a do Unicode, kde najdu metody pro tento prevod?

Diky

Jan Najvarek
ARTIN


----- Original Message -----
From: "Petr Urban" <p.urban(zv)worldonline(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, April 03, 2002 1:02 PM
Subject: Zjistit odpor ma pres COM1 pomoci delphi


Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z�skejte po��ta�! Je to GEni�ln� jednoduch�! http://www.genius(tec)cz


IB a UNICODE_FSS

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 3.4.2002 14:22:21

A nebude problem v tom, ze ten parametr se jmenuje lc_ctype ???

S pozdravem

Milan Tomes
mailto:Milan.Tomes(zv)haida(tec)cz

> Jestli to chapu dobre, tak v parametrech pripojeni pres TIBDatabase musim
> nastavit ctype=UNICODE_FSS pred samotnym pripojenim.
> Jan Najvarek


D6 - Examples - PrgrsBar

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 03.4.2002 14:24:33

Ahoj,

chtel jsem si ozivit zpusob vytvoreni, prace a zruseni thredu. Mrknul
jsem do Delphi\Help\Examples\PrgrsBar na jeden priklad, ktery se
na to vztahuje.

Z nejakeho duvodu se mi pri provadeni prikazu SYNCHRONIZE(); vzdy kousn=
e
program.

Je chyba v delphi?

Dik Jirka

D6trial,
W95OSR2

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


Zjistit odpor ma pres COM1 pomoci delphi

[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 3.4.2002 14:26:11

Nektere lepsi multimetry (jedna z jejich funkci je mereni odporu) maji
moznost pripojeni k PC pres seriovou linku. Dnes budou mit jiz vesmes
ovladace pro Windows. Mozna bodou mit i nejaky popis komunikace pres seriove
rozhrani.

Ing. Jan Dvorak

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Urban
> Sent: Wednesday, April 03, 2002 1:02 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Zjistit odpor ma pres COM1 pomoci delphi
>
>
> Cau chlapi.
>
> Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
> Potrebuji do ni ale dostat informace o odporu z COM1. Je mi
> jasne, ze sotva
> budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat,
> ze pod Delphi
> sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
> udelat.Nebo
> nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
> k PC.
>
> Diky za kazkou radu.
>
> Petr Urban
>
>
> _________________________________________________________
> Z�skejte po��ta�! Je to GEni�ln� jednoduch�! http://www.genius(tec)cz
>
>

Instalace RX v Delphi 6

[*] David Kraina <DKx(zv)seznam(tec)cz> - 03.4.2002 14:26:32

Ahoj,
ne v=B9echny bal=EDky v RX jsou komponenty kter=E9 vid=ED=B9, a pro D6=

existuje n=ECkde na netu patch.

> muzete mi prosim nekdo poradit s instalaci RX komponent v D 6 ? Je ta=
m
> sice README.TXT s popisem, ale nedari se mi.


______________________________________________________________________
Co davaji v TV? http://tv.seznam(tec)cz


Zjistit odpor ma pres COM1 pomoci delphi

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 3.4.2002 14:27:27

Na MFFUK je doc. RNDr. Leos Dvorak, CSc. (za spravnost titulu nerucim)
Leos.Dvorak(zv)mff.cuni(tec)cz, ktery pripojuje k PC vsechno mozne, dokonce =
vyvinul
system ISES pro mereni vseho mozneho, zkus ho kontaktovat. Jen doufam, =
ze si
nepletu s nekym jinym.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant=20
ICQ #68652380

D&COMM s.r.o.
Korunova=E8n=ED 6
170 00 Praha 7

>=20
> > P=F8edm=ECt: Zjistit odpor ma pres COM1 pomoci delphi
> >
> > Doufam, ze mi pomuzete s mym problemem. Mam v Delphi
> > vytvorenou aplikaci.
> > Potrebuji do ni ale dostat informace o odporu z COM1. Je mi
> > jasne, ze sotva
> > budu moci pripojit primo na nejaky kontakt COM1 odpor a
> > doufat, ze pod Delphi
> > sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim
> > jak to udelat.Nebo
> > nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
> > k PC.
>=20
>=20
> hodne zalezi na pozadovane presnosti a rozsahu mereni. Pokud =
potrebujes
> spise sledovat zmeny nez urcovat absolutni velikost, a muzes si =
velikost
> odporu zvolit, zkus se podivat na joystick interface. Zakladni rozumy =
o
> joysticks najdes napr. na:
> http://www.epanorama.net/documents/joystick/index.html
>=20
> Implementace obsluhy joysticku ve windows je obsazena v multimedia =
system,
> unit tusim mmsystem.
>=20
> Pokud potrebujes merit presne absolutni hodnoty, zkus nejaky =
multimetr s
> RS-232 rozhranim. Obsluhu si ale nejspis budes muset napsat sam.

Zjisteni jazyka - upresneni

[*] David Kraina <DKx(zv)seznam(tec)cz> - 03.4.2002 14:31:04

Slo mi o to, abych moji aplikaci nahradil internat.exe. Proste bych
potreboval zjistit aktualni jazykove rozlozeni klavesnice aplikace na
poredi, a urcitou klavesovou zkratkou ji rozlozeni
zmenit.

______________________________________________________________________
WWW stranky zdarma na http://www.sweb(tec)cz


naplnenie editboxu davkou

[*] martin_delphi(zv)terminal.sk - 03.4.2002 14:34:20

Zdravim,

v okne mam niekolko edit boxov pomenovanych max_temp_1.......max_temp_40
je mozne v nejakom cykle ich naplnit?

nieco ako

for a:=1 to 40 do
max_temp_[a].caption:=inttost(a);
^^^

Martin


Types of actual and formal var parameters must be

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 3.4.2002 14:35:03

Necetl jsem to uplne cele, ale ja toto resim predanim parametru bez typu,
pokud tedy potrebuji zmenit i odkaz na vytvoreny formular:

procedure TStAppCore.CreateForm(FormClass: TFormClass; var Form);
begin
TForm (Form) := FormClass.Create (Application);
SetFormDefaultParams (TForm (Form));
end;

Pak do promenne Form muzes dat jakykoliv typ, i kdyz je var.

Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

----- Original Message -----
From: "Jan Krizek" <krizek(zv)vitasw(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, April 03, 2002 1:26 PM
Subject: RE: 34. Types of actual and formal var parameters must be identical


Mas pravdu (taky jsem si vyzkousel), tak to je dira v typove kontrole
Delphi, protoze kdyz udelam

procedure doForm( var novyForm : TForm );
begin
novyForm := TForm.Create;
end;

var xForm : TForm1;

begin
doForm( TForm(xForm) );
end;

tak do promenne xForm : TForm1 dostanu TForm. Tedy zde se Delphi chova
jako poradne Cecko (pointer je vzdycky pointer). Ono tim pretypovanim
delas stejnou vec jako kdyz nekde napises xForm := TForm1( TForm.Create
); A pokud v te funkci nemas Create, pak nepotrebujes tu promennou
predavat odkazem.

Podle me to nema smysl predavat objekt odkazem. Alespon ho netusim, tedy
krome funkce podobne s TApplication.CreateForm, kde se predava take typ,
ktereho formular je.

Honza +

> -----Original Message-----
> From: Ladislav Fitz [mailto:ladislav.fitz(zv)kodytek(tec)cz]
> Sent: Wednesday, April 03, 2002 12:31 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: 34. Types of actual and formal var parameters must be
> identical
>
>
> To pretypovani u VAR parametru je to co prave nejde - podle me staci
> > zrusit to var pred Form:TForm - neocekavam, ze uvnitr
> tenhle formular
> > vytvaris a jiny duvod predavat objekt odkazem neni.
>
> ja to skouse v D5 a slo mi to (prave s tim tForm)
>
>

Chovani IDE pri zavreni programu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 14:36:45

From: "Miroslav Ondrisek" <ondrisek(zv)atlas(tec)cz>
> U nekolika programu se mi najednou zacala dit divna vec - spustim program (z
> IDE), po nabehnuti ho uzavru a nasledne se Delphi zastavi (stopped), otevrou
> CPU okno a vyhodi nasleduji warning:
>
> D4.03 Pro + GExperts 1.00 + FreeVCS 2.2.1.0 (server MSSQL bezi na jinem
> stroji)

Zkusil bych nejdrive pokusne odstranit ty IDE experty. Pokud se chovani
nezmeni tak muze byt problem napriklad v nejake DLL ktera se natahuje s
aplikaci, napada me treba spatny driver tiskarny (typicky HP).

Petr Vones


Re[2]: Vypnuti monitoru a sporic - Vones

[*] David Kraina <DKx(zv)seznam(tec)cz> - 03.4.2002 14:36:21

1)
:-)(, zaj=EDmav=E1 odpoved, ale pointa byla jina. Slo mi o prava ci
prikaz jakym se pod NT vypne monitor a jak se pod NT zapne sporic.
Zdratka 2 dotazy v jednom do jedne velke aplikace.

2)
Hodne jsem slysel o vasi knize 1001 tipu + triku v Delphi. Nemate ji
zpracovanou nekde na netu ? Asi nejspis ne, a proto kolik je
doporucovana cena ?

> Pokud vypnes monitor tak asi nema smysl zapinat sporic, ne ?


______________________________________________________________________
Halina Pawlowska a televizni rybicky na internetu http://www.rybicky.co=
m


Zjistit odpor ma pres COM1 pomoci delphi

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 14:41:12

From: "Petr Urban" <p.urban(zv)worldonline(tec)cz>
> Potrebuji do ni ale dostat informace o odporu z COM1.

Nejjednodusi je koumpit nejaky multimetr co ma vystup na seriovy port, format
dat si budes muset ale zjistit potom sam. V uvahu by sice jeste pripadal i
game port, ale to se hodi jen pro urcity rozsah hodnot a vysledky jsou velmi
nepresne, hodi se to spis na orientacni mereni teploty termistorem.

Petr Vones


Zjistit odpor ma pres COM1 pomoci delphi

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 3.4.2002 14:42:43

Ahoj,
pokud by to nemusel byt prave COM port, tak to jde docela dobre pres =
game
port, ten je primo analogovy a Win ho moc nekontroluji staci pouzit fce =
z
API.
Musi-li to byt COM a jde o mereni sepnuto/rozepnuto tak to jde bez HW, =
pouze
pomoci signalu COM portu, ale s WNT a 2000 ( a asi i XP) jsou problemy.
Ma-li to byt presnejsi bude to chtit nejaky A/D prevodnik se serivym
vystupem nebo v kombinaci s posuvnym registrem.=20
Onda jsem videl cca dve knizky, ktere se zabyvaly vyuzitim portu v PC.

Pavel


Subject: Zjistit odpor ma pres COM1 pomoci delphi


Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou =
aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze =
sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z=EDskejte po=E8=EDta=E8! Je to GEni=E1ln=EC jednoduch=E9! =
http://www.genius(tec)cz

Divne chovani D5 (Access volation)

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

From: "Vagner Pavel" <Vagner(zv)ceps(tec)cz>
> stava se taky nekomu, ze se cas od casu zblazni Delphi a pri otevrenem
> projektu a najeti na tlacitka v nastrojovych panelech Delphi to hazi( ale ne
> vzdy) Access volation at .... . Kdyz restartnu W, tak je to zas ok. Nevim,
> zdali je to podstatne, ale v tom projektu mam toolbar. D5 Ent/W98.

Predpokladam ze mas instalovan UpdatePack #1 (pokud ne, tak to rychle udelej),
dale by mohl byt problem v chybnem ovladaci graficke karty ci krajne nevhodne
nastavene barevne hloubce (idealni je 32bit High Color) nebo take v nejak
porusene instalaci Windows. Dalsi moznost by mohla byt jeste nejaky spatne
napsany IDE expert ci komponenta ktera nejak odchytava zpravy.

Petr Vones


Instalace RX v Delphi 6

[*] <ivan.virag(zv)aliatel(tec)cz> - 3.4.2002 14:49:47

A co se nedari? Jediny problem v posledni verzi RxLib je, ze po prvni =
casti instalace (nakopirovani souboru do ciloveho adresare) je potreba =
ze souboru RxResExp.pas vyhodit jeden radek z vnitrni sekce USES a to =
ten, kde je

{$IFDEF RX_D4} ImgList {$ENDIF}=20

Direktiva RX_D4 je pro Delphi 6 nastavena a dochazi tam k dvojite =
deklaraci, protoze unita ImgList je v tomto souboru deklarovana i ve =
vnejsi sekci USES. Potom se da postupovat presne podle navodu.

Ivan Virag

> -----Original Message-----
> From: LUKES V=E1clav [mailto:lukes(zv)ans(tec)cz]
> Sent: 3. dubna 2002 14:08
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Instalace RX v Delphi 6
>=20
>=20
>=20
> Ahoj,
>=20
> muzete mi prosim nekdo poradit s instalaci RX komponent v D 6 ? Je tam
> sice README.TXT s popisem, ale nedari se mi.
>=20
> Diky
>=20
> Vasek
>=20


naplnenie editboxu davkou

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 3.4.2002 14:51:27

var
Comp: TComponent;
i: integer;
begin
for i := 1 to 40 do
begin
Comp := nazevformu.findComponent('max_temp_'+IntToStr(i));
if assigned(Comp) then
with Comp as TEdit do
.
.
.
end;
end;

S pozdravem

Milan Tomes
mailto:Milan.Tomes(zv)haida(tec)cz

> v okne mam niekolko edit boxov pomenovanych max_temp_1.......max_temp_40
> je mozne v nejakom cykle ich naplnit?
> Martin


SELECT vystupom ulozenej procedury

[*] Slavomir Cekel <cekel(zv)noves.sk> - 3.4.2002 14:52:50

Zdravim ...

moze byt select vystupom ulozenej procedury ?

Prikladik pomoze ...

Slavo


Zjistit odpor ma pres COM1 pomoci delphi

[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 3.4.2002 14:56:54

A co takhle pou=BE=EDt k m=EC=F8en=ED odporu game port. Joystick jsou =
vlastn=EC dva potenciometry.

S pozdravem V=E1clav =D8=EDha

-----P=F9vodn=ED zpr=E1va-----
Od: Petr Urban [SMTP:p.urban(zv)worldonline(tec)cz]
Odesl=E1no: 3. dubna 2002 13:02
Komu: delphi-l(zv)clexpert(tec)cz
P=F8edm=ECt: Zjistit odpor ma pres COM1 pomoci delphi

Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou =
aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze =
sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod =
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to =
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z=EDskejte po=E8=EDta=E8! Je to GEni=E1ln=EC jednoduch=E9! =
http://www.genius(tec)cz


Zjisteni instalace SQLDMO

[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 3.4.2002 15:28:22

Ahoj,

jak programove zjistim, zda jsou na pocitaci nainstalovane SQLDMO
objekty?=20
A pokud ne, jak je nainstaluju? Myslel jsem, ze SQLDMO obsahuje MDAC,
ale neni tomu tak.

Ales


IB a UNICODE_FSS

[*] Jan Najvarek <conference.reader(zv)artin(tec)cz> - 3.4.2002 15:31:11

Omlouvam se, to byla jen chyba kopirovani .... ten parametr nastavuji pres
dialog TIBDatabase, takze tam chyba nebude...

Zapomel jsem popsat prostredi ..D5 Profi, IBX 4.42, IB 6.01

Jan Najvarek

----- Original Message -----
From: "Milan Tome�" <milan.tomes(zv)haida(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, April 03, 2002 2:22 PM
Subject: RE: IB a UNICODE_FSS


> A nebude problem v tom, ze ten parametr se jmenuje lc_ctype ???
>
> S pozdravem
>
> Milan Tomes
> mailto:Milan.Tomes(zv)haida(tec)cz
>
> > Jestli to chapu dobre, tak v parametrech pripojeni pres TIBDatabase
musim
> > nastavit ctype=UNICODE_FSS pred samotnym pripojenim.
> > Jan Najvarek
>

Korektni zavreni formu behem OnActivate

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 3.4.2002 15:44:04

Ahoj vsem, mam takovyto problem: form zjistuje pri OnActivate ruzne
skutecnosti a pokud nevyhovuji podminkam, zobrazi se dialog s oznamenim =
a
form by se mel zavrit. Jenze v ramci OnActivate nefunguje ani Close, =
ani
SendMessage(Handle, WM_CLOSE, 0, 0). Resim to (zatim) pres Timer, ale =
to mi
nepripada zrovna koser. Nevite nekdo?

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant=20
ICQ #68652380

D&COMM s.r.o.
Korunova=E8n=ED 6
170 00 Praha 7


Korektni zavreni formu behem OnActivate

[*] Male�ek Ond�ej <ondrej.malecek(zv)radom-cz(tec)cz> - 3.4.2002 15:54:13

Nestacilo by PostMessage( Handle, WM_CLOSE, 0, 0), pripadne
ostMessage( Handle, WM_USER + xxx, 0, 0) a v obsluze volat Close ??

Ondrej

> -----P�vodn� zpr�va-----
> Ahoj vsem, mam takovyto problem: form zjistuje pri OnActivate ruzne
> skutecnosti a pokud nevyhovuji podminkam, zobrazi se dialog s oznamenim a
> form by se mel zavrit. Jenze v ramci OnActivate nefunguje ani Close, ani
> SendMessage(Handle, WM_CLOSE, 0, 0). Resim to (zatim) pres Timer,
> ale to mi
> nepripada zrovna koser. Nevite nekdo?

Modem

[*] dphi_forum(zv)proces.sk - 3.4.2002 15:55:58

Nazdarek...

Chcel by som sa spytat, ci niekto neviete nejaku adresu na API, alebo
kniznicu cez ktoru sa da komunikovat s FaxModemom ZYxel ISDN,
chcel by som si nieco take spravit ako CLIP na pocitaci, alebo zavolanie
dotycneho cez pocitac
Diky moc

Michal

naplnenie editboxu davkou

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.4.2002 15:56:29

Taky moznost je nastavit si potrebny TAG u editu a pak to projet
cyklem:

for i := 0 to ControlsCount - 1 do
if (Controls[i] is TEdit) and TEdit(Controls[i]).Tag > 0 then
TEdit(Controls[i]).Text := IntToStr(Tag);

Dalsi moznost je udelat si pole EditArray: Array[1..40] of TEdit,
Pak nekde v Create hlavniho formu do pole priradit jednotlive edity a
pak k nim muzes pristupovat pres EditArray[Index].Text := ...


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

3.4.2002 martin_delphi(zv)terminal.sk:
> Zdravim,

> v okne mam niekolko edit boxov pomenovanych max_temp_1.......max_temp_40
> je mozne v nejakom cykle ich naplnit?

> nieco ako

> for a:=1 to 40 do
> max_temp_[a].caption:=inttost(a);
> ^^^

> Martin

Korektni zavreni formu behem OnActivate

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 16:00:10

From: "Petr Brant" <brant(zv)dcomm(tec)cz>
> Ahoj vsem, mam takovyto problem: form zjistuje pri OnActivate ruzne
> skutecnosti a pokud nevyhovuji podminkam, zobrazi se dialog s oznamenim a

Nebylo by lepsi to zjistovat nekde jinde ?

Petr Vones


SELECT vystupom ulozenej procedury

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 3.4.2002 16:01:46

V jakem SQL server a co je rozumeno vystupem ?
1. procedura vraci recordset
2. proceduru je mozno pouzit v klauzuli FROM


Pro MSSQL:
1. ANO bez omezeni verze,
2. od verze 8.0 (2000) ANO, ale ne procedura, ale funkce

Pavel

From: Slavomir Cekel [mailto:cekel(zv)noves.sk]
moze byt select vystupom ulozenej procedury ?
Prikladik pomoze ...
Slavo


SELECT vystupom ulozenej procedury

[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 3.4.2002 16:08:03

ahoj,

jak kde. v IB/FB muze.
priklad:

create procedure xyz(i integer) returns (x integer)
as
begin
x:=i;
while x > 0 do
begin
suspend;
x = x - 1;
end
end

volas jako:
select
x
from
xyz(100)

dekuji PeC(zv)

SELECT vystupom ulozenej procedury

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 3.4.2002 16:14:35

> moze byt select vystupom ulozenej procedury ?
IB6-Samozrejme. Treba prikaz suspend v SP. Obzvlaste u komplikovanejsich vyberu
to ma podle me jednu dost velkou vyhodu - je to pod kontrolou, jak si tu proceduru
napisu, tak bude chodit a necekaji me zaludnosti vnitrni optimalizace.
Z.Kalhous


TActionMainMenuBar

[*] <ivan.virag(zv)aliatel(tec)cz> - 3.4.2002 16:14:40

Zdravim.

V %subj% potrebuji udelat vedlejsi menu (Jako je v Delphi IDE File-> =
New). Nadefinuji si akce v ActionManageru pro hlavni vetev a dragnu to =
na %subj% a pres Items property polozky "New" si nadefinuji vedlejsi =
menu, ktere se mi v IDE zobrazi. Kazde "Item" v podrizene vetvi priradim =
jeji vlastni akci. Nadrazene polozce "New" nepriradim nic. Po spusteni =
je vsechno pristupne az na polozku "New". Vsechno mam nastaveno na =
Enabled. Prosim o radu. Dekuji.

Ivan Virag


Zjistit odpor ma pres COM1 pomoci delphi

[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 3.4.2002 16:35:22

Pokud budes trvat na COM, tak muzes pouzit princip nabijeni
a vybijeni kondenzatoru a merit cas.
Mereni casu na PC pod windows neni moc presny, doporucuji
si zvednou prioritu procesu na HIGH.
Budes k tomu potrebovat nekolik diod a jeden kvalitni kondik
a jeden "presny" odpor.
S moc velou presnosti nepocitej.
JoyStick je dobra alternativa pro mali rozsah hodnot, podivej na
napriklad do AT helpu ne funkci INT, mohlo by to fungovat i pod
WinNT, ale nejsem si jist.
Rozsah je 8 bitu.

Slavek


Zjistit odpor ma pres COM1 pomoci delphi

[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 3.4.2002 16:39:17

Komunikace probiha vetsinmou ACII na 9600.
Ovladace asi tezko, neni co ovladat.
Co jsem videl, tak to vraci retezec znaku konstatni delky ukonceny
CR. Precist s portu a rozparsovat je tak na 15 radku kodu.

Slavek

> Nektere lepsi multimetry (jedna z jejich funkci je mereni odporu) maji
> moznost pripojeni k PC pres seriovou linku. Dnes budou mit jiz vesmes
> ovladace pro Windows. Mozna bodou mit i nejaky popis komunikace pres seriove
> rozhrani.
>
> Ing. Jan Dvorak


Ukladanie a obnova pozicii ChildFormu

[*] Roland Turcan <rolo(zv)sedas.sk> - 3.4.2002 17:13:52


----- Original Message -----
From: "Jiri Foldyna" <jiri.f(zv)avizo(tec)cz>
> > Zaujimave je to, ze ked som tie moje obnovovacie procedury
> > skusal na cistom
> > projekte tak to fungovalo a ked som to skusil implementovat do mojej
> > aplikacie tak to blbne. Aplikacia je MDI ale nejde to ani na
> > MDIchilde v
> > projekte ani na modalnych oknach v tom istom projekte. A nic
> > tam proste
> > nerobim, co by mohlo modifikovat. Nieco sa tam este po onShow
> > musi udiat do
> > zmeni Left a Top. Sirka a vyska je OK.
> >
> Ahoj,
> mozna je to mimo misu, ale ja jsem problemy s nastavovanim pozice formu
> resil taky. Nakonec jsem zjistil, ze musim u formu nastavit
> Position=poDesigned, jinak se mi posunul... Kde se to deje, jsem uz
> nezkoumal.

Este stale pouzivam FormPlacement z RX a to vie super save a restore aj ked
mam nastavene ScreenCenter a to aj chcem nechat tak. Ale skusal som pozriet
RX zdrojak, tak je to
strasne komplikovane a vela veciam tam nerozumiem. A navyse potrebujem
dorobit dalsie veci ktore su ciastocne riesene v RX.

TRoland.

D6 - Ukazkovy pr. z helpu - PrgrsBar vyuz. Threads

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 03.4.2002 17:27:14

Ahoj,

chtel jsem si ozivit zpusob vytvoreni, prace a zruseni thredu. Mrknul
jsem do Delphi\Help\Examples\PrgrsBar na jeden priklad, ktery se
na to vztahuje.

Z nejakeho duvodu se mi pri provadeni prikazu SYNCHRONIZE(); vzdy kousn=
e
program.

Je chyba v delphi? Nejsem autorem kodu, takze to asi nebude jen v synta=
xi.

Dik Jirka

D6trial,W95OSR2

______________________________________________________________________
WWW stranky zdarma na http://www.sweb(tec)cz


D6 - Ukazkovy pr. z helpu - PrgrsBar vyuz. Threads

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 17:35:41

From: "Ing. Jiri SOKOL" <JS-delphi(zv)seznam(tec)cz>
> chtel jsem si ozivit zpusob vytvoreni, prace a zruseni thredu. Mrknul
> jsem do Delphi\Help\Examples\PrgrsBar na jeden priklad, ktery se na to
> vztahuje.
>
> Z nejakeho duvodu se mi pri provadeni prikazu SYNCHRONIZE(); vzdy kousne
> program.
>
> Je chyba v delphi? Nejsem autorem kodu, takze to asi nebude jen v syntaxi

Chyba bude pravdepodobne v tvem kodu. Znamena to ze ti nefunguje ani ten
priklad nebo jen tvuj kod ?

Petr Vones


Korektni zavreni formu behem OnActivate

[*] Roland Turcan <rolo(zv)sedas.sk> - 3.4.2002 17:42:25


> > -----P�vodn� zpr�va-----
> > Ahoj vsem, mam takovyto problem: form zjistuje pri OnActivate ruzne
> > skutecnosti a pokud nevyhovuji podminkam, zobrazi se dialog s oznamenim
a
> > form by se mel zavrit. Jenze v ramci OnActivate nefunguje ani Close, ani
> > SendMessage(Handle, WM_CLOSE, 0, 0). Resim to (zatim) pres Timer,
> > ale to mi
> > nepripada zrovna koser. Nevite nekdo?
>
Skus do OnShow dat toto:

PostMessage (Handle, WM_CLOSE, 0,0);

Sposobi to take bliknutie formu, ale zavrie ho.

TRoland.

Zjistit odpor ma pres COM1 pomoci delphi

[*] Josef <sip(zv)atlas(tec)cz> - 03.4.2002 19:54:50

Pokud trvate na seriovem portu tak asi nejjednodussi reseni bude nejaky A/D=
prevodnik na I2C a
zkusit napsat obsluhu ovladanim jednotlivych bitu serioveho portu. Jde to=
bez problemu i pod
W2K a XP. Jsou na komponenty ale bude to cele asi pomale a taky mozna bude=
problem s napajenim
ale to by slo zrejme vyresit...|Cau chlapi.
|
|Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
|Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze=
sotva
|budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
|Delphi
|sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
|udelat.Nebo
|nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
|k PC.
|
|Diky za kazkou radu.
|
|Petr Urban
|
|

Zjistit odpor pres COM1 pomoci delphi

[*] Petr Urban <p.urban(zv)worldonline(tec)cz> - 3.4.2002 20:27:53

Diky za radu. Nad tim jsem uz ale taky premyslel. Problem je v tom, ze ja to
potrebuji vytvorit tak, aby se to dalo pouzit na jakemkoliv stroji a
prevazne na notebooku. Ale gameport neni standardni. Ale jeste jednou diky.

Petr Urban
=================================
Petr Urban, V�B - TU Ostrava
P.Urban(zv)WorldOnLine.Cz
=================================


----- Original Message -----
From: "Vaclav Riha - Soft Consult" <vaclav_riha(zv)softconsult(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, April 03, 2002 2:56 PM
Subject: RE: Zjistit odpor ma pres COM1 pomoci delphi


A co takhle pou��t k m��en� odporu game port. Joystick jsou vlastn� dva
potenciometry.

S pozdravem V�clav ��ha

-----P�vodn� zpr�va-----
Od: Petr Urban [SMTP:p.urban(zv)worldonline(tec)cz]
Odesl�no: 3. dubna 2002 13:02
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: Zjistit odpor ma pres COM1 pomoci delphi

Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z�skejte po��ta�! Je to GEni�ln� jednoduch�! http://www.genius(tec)cz

Free kodek pro prenos videa

[*] Kralik Michal <xkrali07(zv)stud.fee.vutbr(tec)cz> - 3.4.2002 20:37:50

Zdravim,
nemohl by mi nekdo dat tip na free (i pro komercni vyuziti) videokodek pro
prenos obrazu (videotelefon, videokonference).
Dekuji.
MK

Free kodek pro prenos videa

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 20:43:27

From: "Kralik Michal" <xkrali07(zv)stud.fee.vutbr(tec)cz>
> nemohl by mi nekdo dat tip na free (i pro komercni vyuziti) videokodek pro
> prenos obrazu (videotelefon, videokonference).

Co treba pouzit NetMeeting ?

Petr Vones


Windows XP + Delphi 5

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 20:45:14

From: "Petr Urban" <p.urban(zv)worldonline(tec)cz>
> zaseknul a nesel rozjet. Pritom v helpu je napsano jasne ze tuto funkci
> prodporuji vsechny systemy.

Pokud to byl Win32 API help z Delphi tak ten vubec nepouzivej, je 5 let stary
a jsou v nem nesmysly. Stahni si Platform SDK nebo pouzivej MSDN Online.

Petr Vones


Chovani IDE pri zavreni programu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 21:07:05

From: "Martin Nedopil" <martin.nedopil(zv)hon(tec)cz>
> j� pozoruji stejn� symptomy.
> Win2000 CZ (��dn� SP), D6 Prof.

Temi SP bych rozhodne zacal.

> P�i ukon�en� aplikace sko�� do CPU, p�i Ctrl-F2 se korektn� uzav�e.

Podivej se v okne Debug Windows | Modules jake knihovny jsou v tom procesu
natazene, jestli tam neni napriklad driver tiskarny apod. Stava se to pokazde
nebo je u nekterych aplikaci ?

Petr Vones


Free kodek pro prenos videa

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 3.4.2002 21:11:05

> From: Kralik Michal
>
> nemohl by mi nekdo dat tip na free videokodek pro
> prenos obrazu (videotelefon, videokonference).

Co zkusit Windows Media Encoder?
Je k tomu SDK s dokumentaci,
da se to snadno naimportovat do Delphi
a da se tim udelat online i offline komprese,
stejne jako zive vysilani do site:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmencode/ht
m/sdkoverview.asp

Vaclav Krmela


Zjisteni jazyka - upresneni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 21:11:39

From: "David Kraina" <DKx(zv)seznam(tec)cz>
> Slo mi o to, abych moji aplikaci nahradil internat.exe. Proste bych
> potreboval zjistit aktualni jazykove rozlozeni klavesnice aplikace na
> poredi, a urcitou klavesovou zkratkou ji rozlozeni zmenit.

To neni tak jednoduche, internat.exe na to pouziva systemove hooky protoze
funkce ActivateKeyboardLayout nema parametr pro ThreadID a je nutne ji spustit
v kontextu daneho threadu. Osobne nevidim duvod proc nepouzivat internat.exe,
klavesove zkratky lze nastavit v systemu. Ovladani aplikaci by melo byt pokud
mozno konzistentni.

Petr Vones


Vybrany radek v DBGridu

[*] tomsir1.edu(zv)mail.cez(tec)cz - 3.4.2002 21:13:17


Cau,

potreboval bych poradit, jak muzu urcit poradi vysviceneho radku v DBGridu
... snazil jsem se hledat v helpu, ale to nikam nevedlo :O((
Jedna se mi o nasledujici :

mam TQuery -> TDataSource -> TDBGrid

po kliku na DBGrid mi vyskoci formular, ve kterem zadam/opravim nejake
udaje, potom udelam refresh te Query a chtel bych oznacit stejny radek jako
pred refreshem ... zrejme pomoci TQuery.MoveBy ... ovsem nevim o kolik :O
((((


Diky za pomoc
Radek

Terminateprocess her na geforce

[*] <korin.delphi(zv)centrum(tec)cz> - 03.4.2002 21:29:41

From: <korin.delphi(zv)centrum(tec)cz>
> Nevim jestli mi tu bude nekdo schopny odpovedet,
> kdyz nasilne vypnu hru na Geforce ( pomoci wm_close a pote
> terminateprocess ) tak pote nejde spustit zadny program
> pouzivajici DX. Tento problem jde vyresit resnutim pocitace, ale
> to neni reseni.. :). Mate nekdo lepsi napad? :-)

>Pouziti TerminateProcess muze vest k nedefinovatelnym stavum >
(predevsim na
>Win9x). Aplikaci je nutno ukoncit korektne, WM_CLOSE by melo
>stacit.

>Petr Vones

Nestaci, napriklad u Halfu Counter-Strike se te hra zepta jestli
ji chces opravdu ukoncit... :-) Potrebuji ji ukoncit za kazdou
cenu.

Ivan Novotn�

ps : Kdyz uz jsme u toho, nevite nekdo jaky je rozdil mezi
wm_quit a wm_close?


--------------------
Nov� vyhled�va� pro �esk� internet www.WebFast(tec)cz - prost� najde ...

Ordinalni typ

[*] Bayer <jaroslav.bayer(zv)quick(tec)cz> - 3.4.2002 21:32:07

Ahoj.
Potreboval bych vedet tri vlastnosti datoveho typu, aby mohl byt pravem
nazyvan ordinalnim. Nasel jsem ale jen dva.
1. Mel by mit nasledovnika a predchudce
2. Mel by mit konecny pocet clenu
3. ??????????????????????? - ten neznam
Dik Jarda


Ordinalni typ

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

From: "Bayer" <jaroslav.bayer(zv)quick(tec)cz>
> Potreboval bych vedet tri vlastnosti datoveho typu, aby mohl byt pravem
> nazyvan ordinalnim. Nasel jsem ale jen dva.

viz Object Pascal Language Guide - Chapter 5, Ordinal Types

Petr Vones


Divna cestina v RichEditu na WinNT4

[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 3.4.2002 21:59:10

Ahoj,

mam v programu nejake povidani zobrazene RichEditem. U me na Win2k je to
OK, ale na WinNT 4 jsou z nekterych ceskych znaku ctverecky. Urcite je
mezi nimi "Z" (s hackem:-) ), ale "z" se zobrazi spravne. Bylo jich
vice, ale vsechny si nepamatuju:-( To by ale na problemu nemelo nic
menit.
Vite cim to?

(Font Tahoma, RichEdit.CharSet = easteurope_charset)

Miroslav Novosad
mirnov(zv)atlas(tec)cz

Vypnuti monitoru a sporic - Vones

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

From: "David Kraina" <DKx(zv)seznam(tec)cz>
> Slo mi o prava ci prikaz jakym se pod NT vypne monitor a jak se pod NT zapne
> sporic.

Podivej se na zpravy SC_MONITORPOWER a SC_SCREENSAVE. Priklad:

SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_SCREENSAVE, 0);

Petr Vones


Modem

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

From: <dphi_forum(zv)proces.sk>
> Chcel by som sa spytat, ci niekto neviete nejaku adresu na API, alebo
> kniznicu cez ktoru sa da komunikovat s FaxModemom ZYxel ISDN,
> chcel by som si nieco take spravit ako CLIP na pocitaci, alebo zavolanie

Patrne pomoci CAPI: http://home.t-online.de/home/Peter.Zwosta/capiidx.htm

Petr Vones


Acceleratory

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.4.2002 22:25:31

From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> v aplikacich hojne pouzivam acceleratory - podtrzene pismenko
> napr. v Caption buttonu. Standardne je treba pouzit ALT + podtrzene
> pismeno. To je OK.
> Pokud ale focus ma komponenta, ktera nemuze prijimat text
> (checkbox, dbgrid s rowselect=true apod.), vyvola prislusnou akci i
> samotny stisk pismena - bez ALT. Tomu potrebuji zabranit. Vite

http://delphi(tec)cz/soubor.asp?rok=2001&mesic=jun&den=27&soubor=dlfaaaaj.htm

Petr Vones


Resource editor

[*] Martin Pesava <jimx(zv)volny(tec)cz> - 4.4.2002 00:17:52

Ahojda lidi,

nevite negdo, kde sehnat nejaky dobry %SUBJ%. Zkousel jsem ten, co
je u LCC, ten, co se dodaval s Borland Pascalem 7, a jeste nejake
dalsi, ale zadny mi nevyhovuje a nebo ne zrovna nejlip funguje. Budu
rad, za kazdou radu.

Jo a jeste jsem se chtel zeptat. Pomoci nejakyho "Symantec Resource
Studio" (ktery mi celkem vyhovuje) jsem udelal .RC soubor, ve kterem
byly i preddefinovane hodnoty COMBOBOXu. Kdyz jsem tento soubor
prekompiloval do .RESu a prilinkoval ke svemu programu, tak se dialog
sice zobrazi, ale comba jsou prazdna. Je potreba jeste nejak ty data z
RESu natahovat?

Momentalne zdrojak vypada takto:

program SetupDialog;
uses windows, messages;
{$R SetupDialog.res}
function DialogProc(hwndDlg:HWND; uMsg:UINT; WP:wParam; LP:lParam):Boolean; stdcall;
begin
if uMsg=WM_COMMAND then begin
case LOWORD(WP) of
IDOK : EndDialog(hwndDlg,IDOK);
IDCancel : EndDialog(hwndDlg,IDCancel);
end;
Result:=True;
end else Result:=False;
end;

begin
case DialogBox(HINSTANCE,MAKEINTRESOURCE(100),0,(zv)DialogProc) of
IDOK : MessageBox(0,PChar('OK'),PChar('pokus'),0);
IDCancel : MessageBox(0,PChar('Cancel'),PChar('pokus'),0);
end;
end.


--
Martin mailto:jimx(zv)volny(tec)cz

Resource editor

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.4.2002 00:32:46

From: "Martin Pesava" <jimx(zv)volny(tec)cz>
> nevite negdo, kde sehnat nejaky dobry %SUBJ%. Zkousel jsem ten, co

Dobry nevim, ale na instalacnim CD s Delphi 5 a 6 mas Resource Workshop. Je uz
sice dost outdated ale na jednoduche veci porad staci.

> Jo a jeste jsem se chtel zeptat. Pomoci nejakyho "Symantec Resource
> Studio" (ktery mi celkem vyhovuje) jsem udelal .RC soubor, ve kterem
> byly i preddefinovane hodnoty COMBOBOXu. Kdyz jsem tento soubor
> prekompiloval do .RESu a prilinkoval ke svemu programu, tak se dialog
> sice zobrazi, ale comba jsou prazdna. Je potreba jeste nejak ty data z
> RESu natahovat?

Asi by bylo dobre videt obsah toho .RC souboru. V zasade hodnoty by jsi tam
mel potom pridat programove.

Petr Vones

Re[2]: Resource editor

[*] Martin Pesava <jimx(zv)volny(tec)cz> - 4.4.2002 00:59:39



--

> From: "Martin Pesava" <jimx(zv)volny(tec)cz>

> Dobry nevim, ale na instalacnim CD s Delphi 5 a 6 mas Resource Workshop. Je uz
> sice dost outdated ale na jednoduche veci porad staci.
Hm, mam D6 Personal Edititon, takze bez CD :((

> Asi by bylo dobre videt obsah toho .RC souboru. V zasade hodnoty by jsi tam
> mel potom pridat programove.

Mno je tam:

DLG_SETUP DLGINIT
BEGIN
// Control ID: IDC_COMBOBOX1
3003, 0x0403, 3, 0
0x3231, "\x00"
3003, 0x0403, 3, 0
0x3631, "\x00"
// Control ID: IDC_COMBOBOX2
3004, 0x0403, 2, 0
0x0031
3004, 0x0403, 2, 0
0x0032
0
END


a jeste, kdyz uz ... tak jsem se chtel zeptat ... jednou jsi tu uvadel
najekej prikladek programu ve win32api ... at hledam jak hledam,
nemuzu nalezt. Mohl bych poprosit o zopakovani :)

--
Best regards,
Martin mailto:jimx(zv)volny(tec)cz

Resource editor

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.4.2002 01:09:54

From: "Martin Pesava" <jimx(zv)volny(tec)cz>
> Mno je tam:
>
> DLG_SETUP DLGINIT

Tak to jsem nikde nenasel.

> a jeste, kdyz uz ... tak jsem se chtel zeptat ... jednou jsi tu uvadel
> najekej prikladek programu ve win32api ... at hledam jak hledam,
> nemuzu nalezt. Mohl bych poprosit o zopakovani :)

ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Api/DelphiDays99_Prezentace.zip

Petr Vones

Divna cestina v RichEditu na WinNT4

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.4.2002 01:48:23

From: "Miroslav Novosad" <mirnov(zv)atlas(tec)cz>
> mam v programu nejake povidani zobrazene RichEditem. U me na Win2k je to
> OK, ale na WinNT 4 jsou z nekterych ceskych znaku ctverecky. Urcite je
> mezi nimi "Z" (s hackem:-) ), ale "z" se zobrazi spravne. Bylo jich
> vice, ale vsechny si nepamatuju:-( To by ale na problemu nemelo nic
> menit.

Jaka je tam verze RICHEDIT20.DLL knihovny a IE ?

Petr Vones

Chovani IDE pri zavreni programu

[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 4.4.2002 06:00:24

JustInTime nepouzivam...
Divne je, ze se to zacalo dit "najednou" a jen u nekterych aplikaci. Mam
podezreni, jestli to nedela posledni verze FlashFileru, ale kdyz udelam
novou aplikaci, ktera ho obsahuje, tak to nedela. Nejsem schopen to presne
vysledovat, ale prijde mi, ze to dela pri zavreni DataModule...

Mira
> -----Original Message-----
> From: Martin Nedopil [mailto:martin.nedopil(zv)hon(tec)cz]
> Sent: Wednesday, April 03, 2002 2:45 PM
> To: delphi-l(zv)clexpert(tec)cz
> Cc: ondrisek(zv)atlas(tec)cz
> Subject: Re: Chovani IDE pri zavreni programu
>
>
> Ahoj,
>
> M��e to souviset s JustInTime Debuggerem? Vzpom�n�m si, �e
> se m� p�i instalaci neptal, jestli chci nahradit Watsona.

TActionMainMenuBar

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 4.4.2002 06:30:32

Pokud si definujes akci a nema nastaveno nic v OnExecute, je proste
disabled. V techto pripadech nema smysl pro menu akci prirazovat.

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

3.4.2002 ivan.virag(zv)aliatel(tec)cz:
> V %subj% potrebuji udelat vedlejsi menu (Jako je v Delphi IDE File-> New). Nadefinuji si akce v ActionManageru pro hlavni vetev a dragnu to na %subj% a pres Items property polozky "New" si
> nadefinuji vedlejsi menu, ktere se mi v IDE zobrazi. Kazde "Item" v podrizene vetvi priradim jeji vlastni akci. Nadrazene polozce "New" nepriradim nic. Po spusteni je vsechno pristupne az na
> polozku "New". Vsechno mam nastaveno na Enabled. Prosim o radu. Dekuji.

Vybrany radek v DBGridu

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 4.4.2002 06:37:43

Na tohle potrebujes nejakou jednoznacnou identifikaci zaznamu (i
nekolik poli). Pak staci tento zaznam vyhledat a nastavit se na nej

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

3.4.2002 tomsir1.edu(zv)mail.cez(tec)cz:
> potreboval bych poradit, jak muzu urcit poradi vysviceneho radku v DBGridu
> ... snazil jsem se hledat v helpu, ale to nikam nevedlo :O((
> Jedna se mi o nasledujici :

mam TQuery ->> TDataSource -> TDBGrid

> po kliku na DBGrid mi vyskoci formular, ve kterem zadam/opravim nejake
> udaje, potom udelam refresh te Query a chtel bych oznacit stejny radek jako
> pred refreshem ... zrejme pomoci TQuery.MoveBy ... ovsem nevim o kolik :O

Jak schovat Hlavni panel

[*] Miroslav Kortus <delphi(zv)nemocnice-vs(tec)cz> - 4.4.2002 06:45:58

Ahoj.
No ja jsem to vycetl na www.zive(tec)cz Tipy a triky v Delphi dil 4.
Na mem pocitaci to funguje. Mam W98 D3S.
Pokud jsem Ti odpovedel neco jineho pak se omlouvam.

Mira

OT: NOVELL nastaveni casu

[*] Hol�k Martin <martin.holik(zv)vytahy(tec)com> - 4.4.2002 06:48:40

Potrebuji na NOVELL NETWARE 4.11 nastavit syst�mov� �es pros�m pora�te mi
jak to mam proboha udelat.

Dekuji

Marin Hol�k
martin.holik(zv)vytahy.com
V�TAHY s.r.o.
Vrchoveck� 216
594 29 Velk� Mezi����

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

JCL Debug

[*] Libor Junek, KSH-Data <junek(zv)ksh-data(tec)cz> - 4.4.2002 07:12:06

Ahoj
snazim se rozchodit JclDebug pro logovani aplikace. Nechci pouzivat preklad
pomocnych informaci do externich souboru (map,jdbg). Chtel bych primo
prilinkovat tyto informace k exe. Nainstaloval jsem si JclDebug experta a
zaskrtnul "Insert JCL Debug data" a tim si myslim ze se to bude
prilinkovavat. Velikost exe souboru se pri prekladu s "Insert JCL Debug
data" nebo bez se nemeni takze bude asi problem v tom ze ty informace
neuklada. Kdyz zavolam s "Insert JCL Debug data"

GetLocationInfoStr(Caller(0),False,True,True)

tak mi to vrati pouze adresu proc a ne jeji nazev. Funguje to pouze kdyz si
dam v linkeru prekladat s MAP file. Delam neco spatne?

Predem dik
Libor

Chovani IDE pri zavreni programu

[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 4.4.2002 07:16:52

Problem je v tom, ze ti experti jsou tam uz roky... S aplikaci se zadna DLL
ani BPL nenatahuje, je to single EXE. Drivery tiskarny mam taky stejne uz
dva roky. Najednou jsem u nekterych aplikaci zjistil, ze po zavreni (kdyz
jsou spusteny z Delphi F9) se to takto divne chova. Je-li aplikace spustena
solo, zavre se korektne (alespon zdanlive ;-) ). Rekl bych, ze se to deje
pri uvolnovani DataModulu, ale kdyz necham krokovat OnDestroy, je vse v
poradku az k "end" - a pak to vyhodi ty vyjimky a ladici okna.

Mira Ondrisek


> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Vones
> Sent: Wednesday, April 03, 2002 2:37 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Chovani IDE pri zavreni programu
>
> >
> > D4.03 Pro + GExperts 1.00 + FreeVCS 2.2.1.0 (server MSSQL bezi na jinem
> > stroji)
>
> Zkusil bych nejdrive pokusne odstranit ty IDE experty. Pokud se chovani
> nezmeni tak muze byt problem napriklad v nejake DLL ktera se natahuje s
> aplikaci, napada me treba spatny driver tiskarny (typicky HP).
>
> Petr Vones
>
>

JCL Debug

[*] Libor Junek, KSH-Data <junek(zv)ksh-data(tec)cz> - 4.4.2002 07:19:24

Jeste jsem zapomel napsat co pouzivam. D6 prof UP2, JCL 1.2, W2000 prof


Ahoj
snazim se rozchodit JclDebug pro logovani aplikace. Nechci pouzivat preklad
pomocnych informaci do externich souboru (map,jdbg). Chtel bych primo
prilinkovat tyto informace k exe. Nainstaloval jsem si JclDebug experta a
zaskrtnul "Insert JCL Debug data" a tim si myslim ze se to bude
prilinkovavat. Velikost exe souboru se pri prekladu s "Insert JCL Debug
data" nebo bez se nemeni takze bude asi problem v tom ze ty informace
neuklada. Kdyz zavolam s "Insert JCL Debug data"

GetLocationInfoStr(Caller(0),False,True,True)

tak mi to vrati pouze adresu proc a ne jeji nazev. Funguje to pouze kdyz si
dam v linkeru prekladat s MAP file. Delam neco spatne?

Predem dik
Libor

Vybrany radek v DBGridu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.4.2002 07:19:05

Pripadne pokud tazatel pouziva Interbasi, pak misto tQuery pouzit tIBDataSet, protoze ten umi
zaktualizovat onen jeden meneny radek a neni nutne ani nacitat vsechny radky, ani hledat ten
puvodni...

Karel Rys

ing. Jan Fiala dne 4 Apr 2002 v 6:37:

> Na tohle potrebujes nejakou jednoznacnou identifikaci zaznamu (i
> nekolik poli). Pak staci tento zaznam vyhledat a nastavit se na nej
>
> --
> ing. Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz
>
> 3.4.2002 tomsir1.edu(zv)mail.cez(tec)cz:
> > potreboval bych poradit, jak muzu urcit poradi vysviceneho radku v
> > DBGridu ... snazil jsem se hledat v helpu, ale to nikam nevedlo :O((
> > Jedna se mi o nasledujici :
>
> mam TQuery ->> TDataSource -> TDBGrid
>
> > po kliku na DBGrid mi vyskoci formular, ve kterem zadam/opravim
> > nejake udaje, potom udelam refresh te Query a chtel bych oznacit
> > stejny radek jako pred refreshem ... zrejme pomoci TQuery.MoveBy ...
> > ovsem nevim o kolik :O
>
>
>

OT: NOVELL nastaveni casu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.4.2002 07:20:49

Hol�k Martin dne 4 Apr 2002 v 6:48:

> Potrebuji na NOVELL NETWARE 4.11 nastavit syst�mov� �es pros�m pora�te
> mi jak to mam proboha udelat.

Slouzi k tomu prikaz SET TIME.
Popr. si dej HELP SET TIME.
Je dulezite nesplest format (oddelovace).

Karel Rys

IB a UNICODE_FSS

[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 4.4.2002 07:25:41

A ta databaze (respektive tabulka ci sloupec) je taky vytvorena s UNICODE_FSS?
Pak to musi fungovat.
> Omlouvam se, to byla jen chyba kopirovani .... ten parametr nastavuji
> pres dialog TIBDatabase, takze tam chyba nebude...
> > A nebude problem v tom, ze ten parametr se jmenuje lc_ctype ???
> > > Jestli to chapu dobre, tak v parametrech pripojeni pres
> > > TIBDatabase musim
> > > nastavit ctype=UNICODE_FSS pred samotnym pripojenim.
> > > Jan Najvarek

Z.Kalhous

Chovani IDE pri zavreni programu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 4.4.2002 07:45:48

From: "Miroslav Ondrisek" <ondrisek(zv)atlas(tec)cz>

> dva roky. Najednou jsem u nekterych aplikaci zjistil,
> ze po zavreni (kdyz jsou spusteny z Delphi F9) se to takto divne
> chova. Je-li aplikace spustena solo, zavre se korektne
(alespon zdanlive ;-)

Rekl bych, ze se podobne chyby objevuji v pripade, ze se pri ukoncovani
aplikace odkazes na jiz zrusenou instanci nejakeho
globalniho objektu (napr. trace logu apod.)

Pokud pouzivas INITIALIZATION/FINALIZATION sekce,
byva chyba casto tam z duvodu nespravneho poradi
v jakem se moduly inicializuji a ukoncuji, ktere
je dano poradim v uses klauzuli, takze dost neprehledny
proces.

Takze pokud mas od vseho zdrojovky, prosel bych
life-cycle vsech globalnich objektu, ktere dereferujes
ve FINALIZATION sekcich popr. Destruktorech
popr. OnDestroy eventech.


HTH, pf


Acceleratory

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 4.4.2002 08:13:50

> From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> > v aplikacich hojne pouzivam acceleratory - podtrzene pismenko
> > napr. v Caption buttonu. Standardne je treba pouzit ALT + podtrzene
> > pismeno. To je OK. Pokud ale focus ma komponenta, ktera nemuze
> > prijimat text (checkbox, dbgrid s rowselect=true apod.), vyvola
> > prislusnou akci i samotny stisk pismena - bez ALT. Tomu potrebuji
> > zabranit. Vite
>
> http://delphi(tec)cz/soubor.asp?rok=2001&mesic=jun&den=27&soubor=dlfaaaaj.
> htm
>

Ahoj,

v uvedenem prispevku se pise o obsluze zpravy CM_DialogChar. Co to je? Uvedeny
kod mi nejde prelozit a v helpu se o zadne podobne zprave nepise.

D5E.

Dik.

David Lebeda

Divne chovani D5 (Access volation)

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 4.4.2002 08:19:42

> From: "Vagner Pavel" <Vagner(zv)ceps(tec)cz>
> > stava se taky nekomu, ze se cas od casu zblazni Delphi a pri
> > otevrenem projektu a najeti na tlacitka v nastrojovych panelech
> > Delphi to hazi( ale ne vzdy) Access volation at .... . Kdyz
> > restartnu W, tak je to zas ok. Nevim, zdali je to podstatne, ale v
> > tom projektu mam toolbar. D5 Ent/W98.
>

Jo, taky mi to obcas dela. Ale celkem zridka, takze se s tim da zit.

David Lebeda

RichEdit pod Win2000 a Win98

[*] Petr Kuklik <Petr.Kuklik(zv)seznam(tec)cz> - 04.4.2002 08:29:53

DD,
mam nasledujici problem. Z databaze ctu do RichEditu (TRichEdit)
data ve formatu RTF a pomoci funkce SetSelTextBuf je v RichEditu
spojuji. Jednotliva data oddeluji vlozenim #13#10. Pod Win2000 SP2
vidim texty spravne, cervena je cervena apod. Jenze pod Win98 vidim
text i s formatovacimi znaky (asi takhle
{\rtf1\ansi\ansicpg1250\deff0{\fontt ...}). Zkousel jsem pouzit
RichEdit98 a stejnym zpuseb ho plnit. Zde prozmenu vidim formatovaci
znaky i pod Win2000. Je to chyba moje nebo ve windows? A jak se ji
zbavit?

Petr Kuklik

Delphi 5 Prof SP1
Win2000
SP2

______________________________________________________________________
Co davaji v TV? http://tv.seznam(tec)cz

Spousteni Delphi

[*] Kral Jirka jr. <jirka(zv)ispot(tec)cz> - 4.4.2002 08:33:15

Pri otvirani Delphi 6 (E) i bez projektu mi ta potfora hlasi
"Access violation at adr. 00417BCE in delphi32.exe. Read of address
0000023C."
mozna ze by pohohlo nejake file smazat ale zatim jsem neodhalil, ktere...
mate nekdo nejaky napad? (delphi32.exe neberu jako reseni ;-))

J.

Spousteni Delphi

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.4.2002 08:42:24

Kral Jirka jr. dne 4 Apr 2002 v 8:33:

> Pri otvirani Delphi 6 (E) i bez projektu mi ta potfora hlasi
> "Access violation at adr. 00417BCE in delphi32.exe. Read of address
> 0000023C." mozna ze by pohohlo nejake file smazat ale zatim jsem
> neodhalil, ktere... mate nekdo nejaky napad? (delphi32.exe neberu jako
> reseni ;-))

Ahoj,

jednou jsem takhle musel mazat soubory, ve kterych si Delphi ukladaji info o posledne otevrenem
souboru, rozlozeni oken apod. Nazvy souboru nevim (? .DSK), zkusil bych patrat podle datumu
posledni zmeny.

Karel Rys

RichEdit pod Win2000 a Win98

[*] Hr�a Daniel <Daniel.Hrna(zv)sme(tec)cz> - 4.4.2002 08:53:53

Toto jsem resil tim ze, si detekuji system PC.
Pak jsem rozdelil zpracovani tisku zvlaste pro XP, 2k - pres RTF
formatovani a pro Win9x, NT4 pak klasicky jako RichEdit1.Strings.Add ...

Pracuje spolehlive a bez chyb.
Dan


-----Original Message-----
From: Petr Kuklik [mailto:Petr.Kuklik(zv)seznam(tec)cz]
Sent: Thursday, April 04, 2002 8:30 AM
To: Delphi Konference
Subject: RichEdit pod Win2000 a Win98


DD,
mam nasledujici problem. Z databaze ctu do RichEditu (TRichEdit)
data ve formatu RTF a pomoci funkce SetSelTextBuf je v RichEditu
spojuji. Jednotliva data oddeluji vlozenim #13#10. Pod Win2000 SP2
vidim texty spravne, cervena je cervena apod. Jenze pod Win98 vidim
text i s formatovacimi znaky (asi takhle
{\rtf1\ansi\ansicpg1250\deff0{\fontt ...}). Zkousel jsem pouzit
RichEdit98 a stejnym zpuseb ho plnit. Zde prozmenu vidim formatovaci
znaky i pod Win2000. Je to chyba moje nebo ve windows? A jak se ji
zbavit?

Petr Kuklik

Delphi 5 Prof SP1
Win2000
SP2

______________________________________________________________________
Co davaji v TV? http://tv.seznam(tec)cz

Zjistit odpor ma pres COM1 pomoci delphi

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 4.4.2002 09:00:29

Nekde jsem minulej tyden cetl o mereni napeti pres COM, byl tam
pripojeni nejaky A/D prevodnik a stalo tak do 100 Kc. Myslim
vyroba, Neni to komercni zarizeni. To by ti mohlo pomoci, Jestli
chces tak napis a ja to vyhledam a poslu

>
> Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou
> aplikaci. Potrebuji do ni ale dostat informace o odporu z COM1. Je mi
> jasne, ze sotva budu moci pripojit primo na nejaky kontakt COM1 odpor
> a doufat, ze pod Delphi sezenu na to prostredky. Ale nesetkal se nekdo
> z vas s tim jak to udelat.Nebo nemate nekdo schema obvodu, ktery by
> meril odpor a dal se pripojit k PC.
>
> Diky za kazkou radu.
>
> Petr Urban


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

x OleContainer

[*] Votipka Vaclav <Vaclav.Votipka(zv)merlin(tec)cz> - 4.4.2002 09:02:03

Preposilam dotaz od kolegy:

-----P�vodn� zpr�va-----
Od: Rydval Kv�toslav

Preji vsem pekneho dne,

(D5Ent, W2kProfCZSP2)

dam si na formular dva Ole kontejnery a pomoci Insert object do toho
vlozim dva Wordove dokumenty. Oba kontejnery se aktivuji na focus
(AutoActivate = aaGetFocus). Projekt spustim, aktivuje se prvni word.
To je vo pohode, pisu si text, klikam si v nem atd. Ovsem pokud
aktivuji druhy kontejner, tak v nem take pisu, klikam si v nem, ale
kdyz se prepnu zpet na prvni, tak v nem si jiz vubec nic nenapisu!
Nefunguji v nem klavesy, ale treba mys je v pohode. Psat jiz muzu
pouze v tom prvnim.

Co je spatne?

Diky za kazde info.

Slavek

Obdoba prikazu ping

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 4.4.2002 09:03:55

To by stacilo ne? Potrebuju vedet pouze, eli se tam neco deje, tedy eli je
IP adresa dostupna.

> Servus vsem,
> chtel bych napsat maly program, ktery by fungoval,
jako
> bych neustale psal prikaz <ping IP_adresa> s tim, ze podle odpovedi by
> program rozhodoval, zde je Internet dostupny. Nikdy sem ale nic s
napojen�m
> na internet nedelal, nemate nekdo s tim zkusenosti?

Nevim jak pod Windows, ale cekal bych ze ping vraci status kod, podle
ktereho se da poznat, zda se ping povedl nebo ne.

Take se da obvykle zadat pocet pingu, ktere se maji provest.


---------------------------------------------------------------------------
Vladim�r Michl <Vladimir.Michl(zv)hlubocky.del(tec)cz>
Del a.s., Stroj�rensk� 38, ���r nad S�zavou
pobo�ka Olomouck� 355, Hlubo�ky-Mari�nsk� �dol�
tel: +420 68 5353548, fax: +420 68 5352364
http://hlubocky.del(tec)cz



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

Pocitani s NULL

[*] Zdenek Brejsa <prog(zv)hjsoft(tec)cz> - 4.4.2002 09:04:36

Ahoj,
potreboval bych poradit s SQL na IB
mam dva numericke sloupce, ktere od sebe v SELECT odecitam (vznikne novy
sloupec). Druhy muze mit hodnotu NULL a pokud to tak je, pak je vysledek
taky NULL, ale ja potrebuju aby se to zachovalo jako 0. Da se to nejak
vyresit v SELECTu ?

predem diky za pomoc

S uctou Brejsa Zdenek - Programator
HJ-SOFT s.r.o., Hradebni 3, 56301 Lanskroun

Chovani IDE pri zavreni programu

[*] Karel Cibulka <KCibulka(zv)seznam(tec)cz> - 04.4.2002 09:08:32

Ahoj,

co takhle vyzkouset jestli se ta aplikace opravdu korektne chova i
bez IDE? Zkus to prohnat MemProofem, ktery dokaze odchytit problemy s
alokovanim/dealokovanim pameti a par chyb se tim naslo i ve VCL :-)

http://www.automatedqa.com/downloads/memproof.asp

K.C.

> Ahoj,
>
>
> P�i ukon�en� aplikace sko�� do CPU, p�i Ctrl-F2 se korektn�
> uzav�e.
>
> M��e to souviset s JustInTime Debuggerem? Vzpom�n�m si, �e
> se m� p�i instalaci neptal, jestli chci nahradit Watsona.
>
> Martin

______________________________________________________________________
Jak si stoji kurz koruny? http://kurzy.seznam(tec)cz

Zjistit odpor ma pres COM1 pomoci delphi

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 4.4.2002 09:10:23

Muzes
a, Pouzivat casove konstanty s RC clenem, kde C (kondenzator) ma konstatni
hodnotu. Jakmile dosahne napeti na C potrebne urovne pro preklopeni stavu,
prectes to na vstupu COMu.

b, Pouzit AD prevodnik s komunikaci pres RS232

Vice najdes v knize Vyuziti rozhrani v PC (jsou dve verze, jedna starsi pod
DOS, druha novejsi pro Delphi a VisualBasic + prilozene CD s priklady).

Servus Rumcajs

Cau chlapi.

Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze sotva
budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
Delphi
sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
udelat.Nebo
nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
k PC.

Diky za kazkou radu.

Petr Urban



_________________________________________________________
Z�skejte po��ta�! Je to GEni�ln� jednoduch�! http://www.genius(tec)cz



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

Pocitani s NULL

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 4.4.2002 09:17:21

v ulozene procedure bych dal nasledujici. Syntaxi si musis opravit dle IB,
protoze ted mam projekt a hlavu zrovna prepnutou na MS SQL.

CREATE PROCEDURE odecti
RETURNS (_col1 integer, _col2 integer, _rozdil integer)
...
for select col1, col2
from table
into :_col1, :_col2
do
begin
if (_col1 is null or _col2 is null) then
_rozdil = 0
else
_rozdil = :_col1 - :_col2;
suspend;
end;
...

Sroub
> potreboval bych poradit s SQL na IB
> mam dva numericke sloupce, ktere od sebe v SELECT odecitam (vznikne novy
> sloupec). Druhy muze mit hodnotu NULL a pokud to tak je, pak je vysledek
> taky NULL, ale ja potrebuju aby se to zachovalo jako 0. Da se to nejak
> vyresit v SELECTu ?

OLE propojeni mezi Delphi 5 a Excel 7

[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 4.4.2002 08:21:28

Ahoj lidicky,

prepisuji kus kodu z VisualFoxpro, ktery neco zapisuje do Excelu do Delphi.
Puvodni kod je :
XLS = CreateObject('Excel.Application')
XLS.Visible=1

prepsal jsem to do Delphi takhle :

var
XLS: variant;

procedure A;
begin
XLS:=CreateOleObject('Excel.Application')
XLS.Visible:=true;
end;

Kdyz spustim Delphi verzi tak mi to na radku XLS.Visible vyhodi vyjimku
EOLESysError s hlaskou "Na serveru doslo k vyjimce", kdyz si to zkusim ve
Foxpro na stejnem pocitaci, tak to funguje. Neporadite mi nekdo co delam
blbe ?

Diiik Marian

Obdoba prikazu ping

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 4.4.2002 09:26:21

No ja ti nevim jestli se ti chce volat jiny program a resit s tim
spousty opicaren...

...to ti pripada jednodusi nez vzit Synapsi, pridat si do projektu do
uses unitu PingSend a pak uz jen zavolat jednu jediou funkci?

function PingHost(const Host: string): Integer;

.. ta ti vrati bud cas PINGU v ms, nebo -1, kdyz neco selhalo. nejak
mne nenapada, jak by to slo delat jeste snadneji....

> To by stacilo ne? Potrebuju vedet pouze, eli se tam neco deje, tedy
> eli je IP adresa dostupna.

> Nevim jak pod Windows, ale cekal bych ze ping vraci status kod, podle
> ktereho se da poznat, zda se ping povedl nebo ne.
> Take se da obvykle zadat pocet pingu, ktere se maji provest.


-- Lukas Gebauer.

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

DBGrid+ScrollBar+Multiselect

[*] Vlastimil Zden�k <gestore(zv)wo(tec)cz> - 4.4.2002 09:29:04

Zdravim, chlapici
Prosil bych o dve rady:
1, jak se zbavim vertikalniho scrollbaru v dbgridu (TCustomGrid.ScrollBars
:= ssNone; nefunguje - nezna ScrollBars)
2, Lze v DBGridu oznacovat radky jako v pruzkumnikovi? (shift+klik mysi
oznaci souvislou radu, ctrl+klik mysi oznaci vybrane soubory)

Diky za kazdou radu
Vlasta

Chovani IDE pri zavreni programu

[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 4.4.2002 09:35:35

Hm, rekl bych, ze nebudes daleko od pravdy, asi by to tedy mohlo souviset s
pripadnymi zmenami ve FlashFileru (+- od te doby se to deje). Je na ten
life-cycle nejaky automatismus v Delphi nebo se to musi projit pesky (D4.03
Pro)? Uz jsem zkousel vyhodit celou OnDestroy v datamodulu, jestli tam nemam
nejake spatne poradi s tim, ze by to mohlo zacit vykazovat nejakou jinou
chybu, ale nepomohlo to.

Kazdopadne diky za nazor a radu

Mira Ondrisek


> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On

> Takze pokud mas od vseho zdrojovky, prosel bych
> life-cycle vsech globalnich objektu, ktere dereferujes
> ve FINALIZATION sekcich popr. Destruktorech
> popr. OnDestroy eventech.
>

Spousteni Delphi

[*] Kral Jirka jr. <jirka(zv)ispot(tec)cz> - 4.4.2002 09:51:45

> jednou jsem takhle musel mazat soubory, ve kterych si Delphi
> ukladaji info o posledne otevrenem
> souboru, rozlozeni oken apod. Nazvy souboru nevim (? .DSK),
> zkusil bych patrat podle datumu
> posledni zmeny.

presne to jsem udelal a problem zustal. Obavam se jestli to nebude v necem
zakernejsim. Podle me, kdyz to jen nenajde soubor nemuze to zpusobit
Acc.viol....
Prekontroloval jsem i user dpk a je tam vse ok.

J.

IB a UNICODE_FSS podruhe

[*] Jan Najvarek <conference.reader(zv)artin(tec)cz> - 4.4.2002 10:16:53

Samozrejmne, ze databaze je v UNICODE_FSS.

Moje otazka zni:
Provadi TIBDatabase ci TIBDataset automatickou konverzi z Unicode do
win1250? Jestli ne, tak to fungovat nemuze, proste bych nemohl pouzivat DB
komponenty a prekodovat bych to musel rucne. Jestli tu konverzi dela, pak
by to fungovat melo, neni mi jasne, odkud by vedel, na jake kodovani to
prevest - ze by vzal z Windows?

Vim, ze tady nekteri lide tady UNICODE_FSS pouzivaji, tak mi prosim poradte.

Diky

Jan Najvarek
ARTIN


>A ta databaze (respektive tabulka ci sloupec) je taky vytvorena s
UNICODE_FSS?
>Pak to musi fungovat.

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

> Zdravim,
>
> poradte mi, prosim, jak korektne postavit Delphi aplikaci nad IB databazi
v
> kodovani UNICODE_FSS. Dival jsem se do archivu a nic kloudneho jsem
> nenasel......
>
> Jestli to chapu dobre, tak v parametrech pripojeni pres TIBDatabase musim
> nastavit lc_ctype=UNICODE_FSS pred samotnym pripojenim.
>
> Jde mi o to, zda pro tuto aplikaci mohu pouzit klasicke DB komponenty - me
> pokusy koncily hlaskou "Cannot transliterate characters between character
> sets".
>
> Jestlize na DB komponenty mohu zapomenout ne a musim vzdy stringy prevadet
> rucne z a do Unicode, kde najdu metody pro tento prevod?
>
> Diky
>
> Jan Najvarek
> ARTIN
>
>
> ----- Original Message -----
> From: "Petr Urban" <p.urban(zv)worldonline(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Wednesday, April 03, 2002 1:02 PM
> Subject: Zjistit odpor ma pres COM1 pomoci delphi
>
>
> Cau chlapi.
>
> Doufam, ze mi pomuzete s mym problemem. Mam v Delphi vytvorenou aplikaci.
> Potrebuji do ni ale dostat informace o odporu z COM1. Je mi jasne, ze
sotva
> budu moci pripojit primo na nejaky kontakt COM1 odpor a doufat, ze pod
> Delphi
> sezenu na to prostredky. Ale nesetkal se nekdo z vas s tim jak to
> udelat.Nebo
> nemate nekdo schema obvodu, ktery by meril odpor a dal se pripojit
> k PC.
>
> Diky za kazkou radu.
>
> Petr Urban
>
>
> _________________________________________________________
> Z�skejte po��ta�! Je to GEni�ln� jednoduch�! http://www.genius(tec)cz
>
>
>

Relativni url -> Absolutni url a adresar v soubore

[*] Emresz Tom� <Tomas.Emresz(zv)bsp(tec)cz> - 4.4.2002 10:16:21

Zdravim,
mam dva problemy.
1) Neni nejaka funkce (nebo knihovna apod apod) ktery bych predal adresu url jako treba
http://www.seznam(tec)cz
http://localhost/
http://www.seznam(tec)cz/zd/index.html

a odkaz, ktery na teto strance najdu, muze byt relativni
/images/image1.gif
../index.html
cesta/cesta/index.html apod
nebo absolutni
http://www.rafs(tec)cz

a tato funkce by mi vratila adresu absolutni
http://www.seznam(tec)cz/images/image1.gif
http://www.rafs(tec)cz
http://www.seznam(tec)cz/cesta/cesta/index.html

?? Poradite nekdo ?

2) Druhy problem spociva v souborech wab, je to adresar outlook expresu a ja bych potreboval nejake api, ci knihovny pro pristup k datum v tomto souboru, potrebuju tam zapsat data, vytvorit slozku apod.


Diky moc

Tomas Emresz
email.: tomas.emresz(zv)bsp(tec)cz

JCL Debug

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 4.4.2002 10:17:58


----- Original Message -----
From: "Libor Junek, KSH-Data" <junek(zv)ksh-data(tec)cz>
> Jeste jsem zapomel napsat co pouzivam. D6 prof UP2, JCL 1.2, W2000 prof
>
> Ahoj
> snazim se rozchodit JclDebug pro logovani aplikace. Nechci pouzivat preklad
> pomocnych informaci do externich souboru (map,jdbg). Chtel bych primo
> prilinkovat tyto informace k exe. Nainstaloval jsem si JclDebug experta a
> zaskrtnul "Insert JCL Debug data" a tim si myslim ze se to bude
> prilinkovavat. Velikost exe souboru se pri prekladu s "Insert JCL Debug
> data" nebo bez se nemeni takze bude asi problem v tom ze ty informace
> neuklada. Kdyz zavolam s "Insert JCL Debug data"
>
> GetLocationInfoStr(Caller(0),False,True,True)
>
> tak mi to vrati pouze adresu proc a ne jeji nazev. Funguje to pouze kdyz si
> dam v linkeru prekladat s MAP file. Delam neco spatne?

Ja teda nepouzivam toho experta ale delam to externim programkem
ktery spoustim v kompilacni davce pro zkompilovani distribucni verze.
Pro bezne ladeni v IDE programove zjistitelny callstack nepotrebuji,
to je vyhodne az pri problemech u klientu.
Do toho programku jsem prebral kod z experta, ktery doplnuje debug
informace z MAP filu do EXE a DLL/BPL. Takze si myslim ze je
nutne kompilovat s MAP filem, ktery ale po prilinkovani debug informaci
uz neni potreba.

Martin Schayna

nastavenie focusu

[*] mato <mato.tino(zv)inmail.sk> - 4.4.2002 10:20:25

zdravim,

ako v D5 v kode urobim takutu vec :
potrebujem zistim ktora komponenta ma focus ulozit to do premennej / ale do
akej/ potom ide nejakykod pri ktorom sa aj zmeni focus a potom nastavit
focus na komponentu ktora ho mala na zaciatku / z premennej ?/

vdaka

Aplikace SynaSer

[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 4.4.2002 10:22:41

Pro program obsluhy psychologickeho testu Ciselny ctverec pod Windows (DOS
verze byla dokoncena pred 7 lety) se pokousim pouzit unit SynaSer. Jde o
jednoduchou aplikaci, kdy je pozadovan prijem byte, mereni casu prijeti,
zpracovani, signalizace a vyhodnoceni. Pouzivam tuto programovou konstrukci:

Ser: TBlockSerial;
....
Ser:= TBlockSerial.Create;
Ser.RaiseExcept:= True;
try
Ser.DTR:= false;
Ser.RTS:= false;
Ser.Connect('COM2',19200,8,'N',0,false,true);
repeat
if Ser.CanReadEx(0) then
begin
b:= Ser.RecvByte(25) and $7F;
....
Testuje se, zda je mozno prevzit prijaty byte funkci CanReadEx nebo take
CanRead a pak je prebiran. Stava se, ze trebaze test moznosti prevzeti
projde, byte nelze prevzit do specifikovane doby 25 ms a je vytvorena
vyjimka Communication Error 9997: Timeout during operation. Jsou me
predpoklady o funkci CanReadEx, resp. CanRead spravne nebo jak bych mel
testovat moznost prevzeti byte?

Druhy dotaz mam na nastavovani signalu DTR a RTS; ty pouzivam pro akustickou
signalizaci pres HW testovaciho pripravku. Nastaveni logickych promennych
prirozene nema vliv na stav signalovych linek. Jakou funkci ci proceduru je
treba zavolat, aby se signaly DTR a RTS nastavily podle logickych
promennych?

Me dotazy jsou adresovany predevsim autorovi, budu vsak vdecen vsem, kdoz
poradi. Dekuji.

Ing. Jan Dvorak

Vybrany radek v DBGridu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.4.2002 10:25:59

Ben, Martin (CAP, GCF) dne 4 Apr 2002 v 10:55:

> Pro editaci zaznamu pouzij TBookmark - vice v helpu

Mam dojem, ze pokud Query zavre a znovu otevre, Bookmark nebude fungovat, alespon u tIBQuery mi v
tomto pripade nefungoval.

Karel Rys


>
> > -----Original Message-----
> > From: tomsir1.edu(zv)mail.cez(tec)cz [mailto:tomsir1.edu(zv)mail.cez(tec)cz]
> >
> > potreboval bych poradit, jak muzu urcit poradi vysviceneho
> > radku v DBGridu
> > ... snazil jsem se hledat v helpu, ale to nikam nevedlo :O((
> > Jedna se mi o nasledujici :
> >
> > mam TQuery -> TDataSource -> TDBGrid
> >
> > po kliku na DBGrid mi vyskoci formular, ve kterem zadam/opravim
> > nejake udaje, potom udelam refresh te Query a chtel bych oznacit
> > stejny radek jako pred refreshem ... zrejme pomoci TQuery.MoveBy ...
> > ovsem nevim o kolik :O
>

DBGrid+ScrollBar+Multiselect

[*] tomsir1.edu(zv)mail.cez(tec)cz - 4.4.2002 10:39:43



odstraneni scrollbaru :

http://community.borland.com/article/0,1410,15874,00.html



Vlastimil Zden�k <gestore(zv)wo(tec)cz>(zv)clexpert(tec)cz on 04.04.2002 09:29:04

Odpov�zte pros�m - delphi-l(zv)clexpert(tec)cz

Odesl�no k�m: delphi-l-owner(zv)clexpert(tec)cz


Komu: "Delphi" <delphi-l(zv)clexpert(tec)cz>
Kopie:
P�edm�t: DBGrid+ScrollBar+Multiselect


Zdravim, chlapici
Prosil bych o dve rady:
1, jak se zbavim vertikalniho scrollbaru v dbgridu (TCustomGrid.ScrollBars
:= ssNone; nefunguje - nezna ScrollBars)

D6 - Ukazkovy pr. z helpu - PrgrsBar vyuz. Threads

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

>
> Chyba bude pravdepodobne v tvem kodu. Znamena to ze ti nefunguje ani ten
> priklad nebo jen tvuj kod ?
>
> Petr Vones
>
Ne, jen jsem se chtel podivat, jak to funguje, tak jsem chtel spustit ten ukazkovy
project z Helpu. Nefunguje. Aplikace zamrza. Kdyz jsem si to krokoval, tak jsem zjistil,
ze to zamrzne vzdy u provadeni SYNCHRONIZE();

Nevim proc by ukazkovy priklad nemel chodit. Proto jsem se ptal, jestli to ostatnim dela taky
-> tudiz by mohlo jit o chybu v D6trial a nebo jestli to dela jen mi a v tom pripade nevim
proc.

Jiri Sokol

D6trial, W95OSR2

______________________________________________________________________
Reklama:
Hledani lidi a jejich e-mailu: http://www.lide(tec)cz

Vybrany radek v DBGridu

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 4.4.2002 10:55:33

Pro editaci zaznamu pouzij TBookmark - vice v helpu

Martin Ben


> -----Original Message-----
> From: tomsir1.edu(zv)mail.cez(tec)cz [mailto:tomsir1.edu(zv)mail.cez(tec)cz]
>
> potreboval bych poradit, jak muzu urcit poradi vysviceneho
> radku v DBGridu
> ... snazil jsem se hledat v helpu, ale to nikam nevedlo :O((
> Jedna se mi o nasledujici :
>
> mam TQuery -> TDataSource -> TDBGrid
>
> po kliku na DBGrid mi vyskoci formular, ve kterem zadam/opravim nejake
> udaje, potom udelam refresh te Query a chtel bych oznacit
> stejny radek jako
> pred refreshem ... zrejme pomoci TQuery.MoveBy ... ovsem
> nevim o kolik :O

Obdoba prikazu ping

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 4.4.2002 11:01:26

Na tohle pouzivam Synapsi, je to velmi jednoduche a pracuje to bez problemu.


RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant
ICQ #68652380

D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7


> To by stacilo ne? Potrebuju vedet pouze, eli se tam neco deje, tedy eli je
> IP adresa dostupna.
>
> > Servus vsem,
> > chtel bych napsat maly program, ktery by fungoval,
> jako
> > bych neustale psal prikaz <ping IP_adresa> s tim, ze podle odpovedi by
> > program rozhodoval, zde je Internet dostupny. Nikdy sem ale nic s
> napojen�m
> > na internet nedelal, nemate nekdo s tim zkusenosti?
>
> Nevim jak pod Windows, ale cekal bych ze ping vraci status kod, podle
> ktereho se da poznat, zda se ping povedl nebo ne.
>
> Take se da obvykle zadat pocet pingu, ktere se maji provest.
>
>

Probliknuti pri zmene obr. v TImage

[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 04.4.2002 11:08:58

Ahoj,

v programu pouzivam "pohyblivy" obrazek. Proste, kdyz uzivatel zajede myskou nad
oblast TImage dojde k rozpohybovani zpusobem, ze v tom TImage zacnu menit z resource
bitmapy. Vse funguje, ale obcas to problikne.
Napada me, ze to probliknuti bude asi z toho duvodu, ze pri fyzickem vykreslovani
obrazovky dojde ke zmene, ktera vyvola samzani neco jako metodu clear a pak dosazeni
noveho bmp, zrovna kdyz je paprsek u vykreslovani toho zmineneho image a to zpusobi
to blikani resp. probliknuti.
Jde toto nejak vyresit? Treba nejak zjistit kde zrovna paprsek je nebo nejak zabranit
prekresleni toho image v dobe, kdy se fyzicky vykresluje na obrazovce.
Mozna je ma uvaha s tim paprskem spatna, takze pokud s tim blikanim mate nekdo nejake
zkusenosti, rad si je prectu.

Diky za napad

Jiri
Sokol

______________________________________________________________________
Reklama:
Poctenicko pro kazdy den: http://www.novinky(tec)cz

IB a UNICODE_FSS podruhe

[*] Alex Cherednichenko <cherednichenko(zv)wo(tec)cz> - 4.4.2002 11:10:01

Hi, Jan !
you wrote:

JN> Provadi TIBDatabase ci TIBDataset automatickou konverzi z Unicode do
JN> win1250?

Ne.

JN> Jestli ne, tak to fungovat nemuze

Spravna odpoved.

JN> , proste bych nemohl pouzivat DB komponenty a prekodovat bych to musel
JN> rucne. Jestli tu konverzi dela, pak by to fungovat melo, neni mi jasne,
JN> odkud by vedel, na jake kodovani to prevest - ze by vzal z Windows?
JN> Vim, ze tady nekteri lide tady UNICODE_FSS pouzivaji, tak mi prosim
JN> poradte.

Podivajse na http://home.ccci.org/wolbrink/tntmpd/delphi_unicode_controls_project.htm


Best regards, Alex Cherednichenko.

Chovani IDE pri zavreni programu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 4.4.2002 11:13:12

From: "Miroslav Ondrisek" <ondrisek(zv)atlas(tec)cz>

> Je na ten life-cycle nejaky automatismus v Delphi nebo se to musi
> projit pesky (D4.03> Pro)?

Podpora v Delphi je asi jen Project Browser s cross-referencemi, kde vsude
se objekt pouziva. Zbytek pak pesky.

Taky by se dal asi pouzit nejaky memory debugger napr. memproof jak
navrhoval Karel Cibulka, ale aby to k necemu vedlo, musel bys mit nejspis od
vseho zdrojovky.> Uz jsem zkousel vyhodit celou OnDestroy v datamodulu,
> jestli tam nemam nejake spatne poradi s tim,

Vzhledem k tomu, zes puvodne psal, ze to spadne az po exitu z handleru
OnDestroy, tak to nejspis znamena, ze se to stane pri
ukoncovani Delphi frameworku a tak bych to hledal spis v te
inicializaci/finalizaci.

HTH, pf

OT: undelete RWcka

[*] Martin Pesava <jimx(zv)volny(tec)cz> - 4.4.2002 11:22:33

Ahojda lidi, tak se mi podarilo smazat si RWcko plny celkem
dulezitejch dat, nevite nekdo, jak by se ty data daly obnovit??? Jde
to vubec ... mazal jsem to v Neru QuickErasem ... predem dik za rady

--
Martin mailto:jimx(zv)volny(tec)cz

Probliknuti pri zmene obr. v TImage

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 4.4.2002 11:38:12

Pokud se pri tom prekreslovani pouziva API funkce BitBlt, ktera se provadi
pri zatemnovacim impulsu, tak by to blikat nemelo. Je otazka, jestli to
nesouvisi s tim pohybem mysi. Misto OnMouseMove by se melo pouzit
CM_MOUSEENTER, pokud to nepouzivas.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant
ICQ #68652380

D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7

> v programu pouzivam "pohyblivy" obrazek. Proste, kdyz uzivatel zajede
myskou nad
> oblast TImage dojde k rozpohybovani zpusobem, ze v tom TImage zacnu menit
z resource
> bitmapy. Vse funguje, ale obcas to problikne.
> Napada me, ze to probliknuti bude asi z toho duvodu, ze pri fyzickem
vykreslovani
> obrazovky dojde ke zmene, ktera vyvola samzani neco jako metodu clear a
pak dosazeni
> noveho bmp, zrovna kdyz je paprsek u vykreslovani toho zmineneho image a
to zpusobi
> to blikani resp. probliknuti.
> Jde toto nejak vyresit? Treba nejak zjistit kde zrovna paprsek je nebo
nejak zabranit
> prekresleni toho image v dobe, kdy se fyzicky vykresluje na obrazovce.
> Mozna je ma uvaha s tim paprskem spatna, takze pokud s tim blikanim mate
nekdo nejake
> zkusenosti, rad si je prectu.
>

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