Archív konference Delphi

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

Ziskani seznamu DNS serveru z nastaveni pocitace

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 18.4.2003 20:26:10

> nevite nekdo jak ziskat seznam DNS serveru, ktere je v nastaveni TCP/IP
> protokolu prvi sitove karty daneho pocitace? No pravda ten seznam
> sitovek na systemech W9x taky dokupy nedam (na NT se da prokousat
> vystupem ipconfig.exe). Predem diky za radu.

Pres Synapsi. Konkretne funkce GetDNS z unity SynaMisc.pas


--
Lukas Gebauer.

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

Porovnani C# Standard a Delphi Proffesional WAS:Bu

[*] Erik Salaj <info(zv)winsoft.sk> - 18.4.2003 17:13:41

>Je C# Standard srovnatelne s Delphi Proffesional co se tyka databazove
konektivity a tvorby komponent,
>nebo je to jen orezana verze, podobne jako Delphi Personal, bez moznosti
komercniho sireni vyslednych
>aplikaci a bez DB komponent ?

http://msdn.microsoft.com/vcsharp/productinfo/faq/default.asp

http://msdn.microsoft.com/vcsharp/howtobuy/choosing.asp

Erik


Chyba pri operaci Post

[*] Vlastimil Bardo� <bardon(zv)akord-soft(tec)cz> - 18.4.2003 17:01:44

S Oraclem neporadim, ale kdyby to bylo na MS SQL, tak bych napsal do =
tech triggeru SET NOCOUNT ON na zacatek a SET NOCOUNT OFF na konec. =
Pokud to tam nen=ED, tak se ADO zlobi...

-----Original Message-----
From: Petr Barto=B9 [mailto:p.bartos(zv)softdec(tec)cz]
Sent: Friday, April 18, 2003 4:02 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Chyba pri operaci Post


Mam 3 tabulky. Uvedu priklad jejich pouziti.

V prvni mam seznam zamestnancu, v druhe seznam deti kazdeho zamestnance =
a
nakonec ve treti je seznam zajmu kazdeho ditete.

Vazby:
ZAMESTNANCI-DETI (1:N)
DETI-ZAJMY (1:N).

Primarni klice:
ZAMESTNANCI (slozeny klic o peti sloupcich)
DETI (PK zamestnance + ID_DITE)
ZAJMY (PK zamestnance + ID_DITE + ID_ZAJEM)

Dale mam 2 trigry. Jeden nad ZAMESTNANCI, ktery updatuje primarni klic =
DETI
a dryhu nad DETI, ktery updatuje primarni klic ZAJMY.

Pokud vyvolam edit tabulky ZAMESTNANCI v okmaziku, kdy z aplikace
vyfiltrovan jeden zaznam, pak to vse probehne korektne. Pokud mam =
tabulku
ZAMESTNANCI vyfiltrovanou napr na 100 zamestnancu a jednoho z nich =
edtuji,
pak pri POST mi to hlasi:

"Multiple-step operation generates errors. Check each status value."

Diky za rady,
Petr


----- Original Message -----
From: "Jakub Dusek" <delphi(zv)corexpert.com>
To: "Petr Barto=B9" <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, April 18, 2003 1:48 PM
Subject: Re: Chyba pri operaci Post


> Tuhle hlasku to hlasi celkem casto a pri ruznych chybach, cili ta ti
> moc k odhaleni nepomuze :) Chtelo by to blizsi udaje. Me to hlasi tu
> samou hlasku napriklad pokud v selektu zapomenu dat na moc dlouhy
> podselect alias.
>
> Jakub Dusek
>
> ------------------------------------
> Web : http://www.corexpert.com
> Phone : +420 604 615 795
> Icq : 86063232
> ------------------------------------
> Sms GateKeeper - komfortni odesilani
> sms zprav pro platformu Windows
> ------------------------------------
>
> Friday, April 18, 2003, 1:13:37 PM, you wrote:
>
> PB> Ahojky.
>
> PB> Mam tabulku s daty, tu edituji a pri Post mi Delphi vyhodi chybu:
>
> PB> Project raised exception class EOleException with message
"Multiple-step
> PB> operation generates errors. Check each status value." ...
>
> PB> Setkal jste se nekdo s touto hlaskou pri operaci Post?
>
> PB> S tabulkou delam psi kusy, ale to sem ted nepatri. Potreboval bych
spis
> PB> vedet proc asi je hlaska takova a takova.
>
> PB> Diky Petr
>
> PB> DB Oracle 8.1, pouzivam Ado komponenty, D5Prof.
>
>

Chyba pri operaci Post

[*] Petr Barto� <p.bartos(zv)softdec(tec)cz> - 18.4.2003 16:01:34

Mam 3 tabulky. Uvedu priklad jejich pouziti.

V prvni mam seznam zamestnancu, v druhe seznam deti kazdeho zamestnance a
nakonec ve treti je seznam zajmu kazdeho ditete.

Vazby:
ZAMESTNANCI-DETI (1:N)
DETI-ZAJMY (1:N).

Primarni klice:
ZAMESTNANCI (slozeny klic o peti sloupcich)
DETI (PK zamestnance + ID_DITE)
ZAJMY (PK zamestnance + ID_DITE + ID_ZAJEM)

Dale mam 2 trigry. Jeden nad ZAMESTNANCI, ktery updatuje primarni klic DETI
a dryhu nad DETI, ktery updatuje primarni klic ZAJMY.

Pokud vyvolam edit tabulky ZAMESTNANCI v okmaziku, kdy z aplikace
vyfiltrovan jeden zaznam, pak to vse probehne korektne. Pokud mam tabulku
ZAMESTNANCI vyfiltrovanou napr na 100 zamestnancu a jednoho z nich edtuji,
pak pri POST mi to hlasi:

"Multiple-step operation generates errors. Check each status value."

Diky za rady,
Petr


----- Original Message -----
From: "Jakub Dusek" <delphi(zv)corexpert.com>
To: "Petr Barto�" <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, April 18, 2003 1:48 PM
Subject: Re: Chyba pri operaci Post


> Tuhle hlasku to hlasi celkem casto a pri ruznych chybach, cili ta ti
> moc k odhaleni nepomuze :) Chtelo by to blizsi udaje. Me to hlasi tu
> samou hlasku napriklad pokud v selektu zapomenu dat na moc dlouhy
> podselect alias.
>
> Jakub Dusek
>
> ------------------------------------
> Web : http://www.corexpert.com
> Phone : +420 604 615 795
> Icq : 86063232
> ------------------------------------
> Sms GateKeeper - komfortni odesilani
> sms zprav pro platformu Windows
> ------------------------------------
>
> Friday, April 18, 2003, 1:13:37 PM, you wrote:
>
> PB> Ahojky.
>
> PB> Mam tabulku s daty, tu edituji a pri Post mi Delphi vyhodi chybu:
>
> PB> Project raised exception class EOleException with message
"Multiple-step
> PB> operation generates errors. Check each status value." ...
>
> PB> Setkal jste se nekdo s touto hlaskou pri operaci Post?
>
> PB> S tabulkou delam psi kusy, ale to sem ted nepatri. Potreboval bych
spis
> PB> vedet proc asi je hlaska takova a takova.
>
> PB> Diky Petr
>
> PB> DB Oracle 8.1, pouzivam Ado komponenty, D5Prof.
>
>

Rychlost aplikace

[*] Tvrz Miroslav <Miroslav.Tvrz(zv)merlin(tec)cz> - 18.4.2003 15:40:00

http://www.prodelphi.de/indexpd.htm - ja ho pouzivam pod
D7 a nemuzu si ztezovat

MI'RA

-----Original Message-----
From: Pavel Poles [mailto:xCony(zv)seznam(tec)cz]
Sent: Friday, April 18, 2003 3:08 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Rychlost aplikace
> Na to potrebujes profiler, jeden velmi dobry a zadarmo
> je GPProfile, vrele doporucuji:

Funguje pod Delphi 7? Mne se to nejak nedari....

Pavel Poles

Ziskani seznamu DNS serveru z nastaveni pocitace

[*] Pavel Hlub�k <hlubik(zv)dashofer(tec)cz> - 18.4.2003 15:38:08

Zdravim

nevite nekdo jak ziskat seznam DNS serveru, ktere je v nastaveni TCP/IP
protokolu prvi sitove karty daneho pocitace? No pravda ten seznam
sitovek na systemech W9x taky dokupy nedam (na NT se da prokousat
vystupem ipconfig.exe). Predem diky za radu.

Pavel Hlubik
hlubik(zv)dashofer(tec)cz

Rychlost aplikace

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.4.2003 15:23:20

> > Na to potrebujes profiler, jeden velmi dobry a zadarmo
> > je GPProfile, vrele doporucuji:
>
> Funguje pod Delphi 7? Mne se to nejak nedari....

Asi ne, alespon na te webove strance je D2-5 :-(
Ale osobne nechapu proc by nemohl byt protoze
se jedna o instrumentacni profiler, ktery ti do kodu
umi pridat do kazde metody a procedury obalku
pro zapis logu. Leda by object pascal v D7 mel
nejake syntakticke zvlastnosti kterym by parser
v profileru nerozumel(?).

Ja GPProfile pouzivam pod D5 a vzdy k plne
spokojenosti.

Martin Schayna


Rychlost aplikace

[*] Pavel Poles <xCony(zv)seznam(tec)cz> - 18.4.2003 15:08:04


> Na to potrebujes profiler, jeden velmi dobry a zadarmo
> je GPProfile, vrele doporucuji:

Funguje pod Delphi 7? Mne se to nejak nedari....

Pavel Poles

Zjisteni bezici ulohy

[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 18.4.2003 14:33:33

Handle1:=3DShellExecute(0, 'open', PChar(FileName), nil, nil, =
SW_SHOWNORMAL);=20
mi vrati handle aplikace nebo DDE serveru, kter=FD byl spusten. Lze =
nejak z=20
Handle1 zjistit, zda aplikace jeste bezi?? (IsWindow nepomaha).

S pozdravem Vaclav Riha


OT: Nativni kod v C# (Bylo: RE: Porovnani C# Stand

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.4.2003 14:26:03

Puvodni zprava ze dne 18.4.2003:

> Omlouvam se za tenhle offtopic, ale koukam, ze se tu pohybujou lidi, kteri o .NET neco vi. Ja jsem prolezal web a hledal nejaky konfery ci stranky, ale to co jsem chtel vedet jsem nenasel.
> Takze, lze programy v C# (nebo vubec pod .NET studiem) prelozit primo do windowsacky nativni binarky? Mam na mysli exe soubor, ktery pobezi i bez toho frameworku.
> Mam takovy dojem, ze jsem kdysi davno nekde zahlid hlasku jako ze to snad jde v C++ .NET, ale jak je to u toho C# ? A pokud to jde, umi to i ta Standard verze?

Jen pro informaci, soucasne s touto konferenci Delphi bezi take
nedavno zalozena konference DotNet na adrese dotnet-l(zv)clexpert(tec)cz.

Blizsi informace na http://www.clexpert(tec)cz/konference/

Petr Zahradnik, pocitacovy expert

==========================================================
Petr Zahradnik, Computer Laboratory


web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz

==========================================================

caption u vice prvku

[*] Ing. J�n Kuch�r PhD. <kuchar(zv)unicodesys(tec)cz> - 18.4.2003 13:40:11

a jak z PropInfo vytahnu text v tom captionu


----- Original Message -----
From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, April 18, 2003 12:53 PM
Subject: Re: caption u vice prvku


>>
>
> Jde to s vyuzitim RTTI informaci:
>
> uses
> TypInfo;
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> I: Integer;
> PropInfo: PPropInfo;
> begin
> for I := 0 to ComponentCount - 1 do
> begin
> PropInfo := GetPropInfo(Components[I].ClassInfo, 'Caption');
> if (PropInfo <> nil) then ...
>
> end;
> end
>
> --
> Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz

OT: Nabidka prace

[*] Martin Burle <mburle2(zv)volny(tec)cz> - 18.4.2003 14:28:19

Zdravim vsechny,

hledame programatora Delphi, IB/FB vyhodou, pouze do TPP, misto prace -
K.Vary.

Pripadne nabidky prosim na prace.delphi(zv)centrum(tec)cz.

Martin Burle


Chyba pri operaci Post

[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 18.4.2003 13:48:37

Tuhle hlasku to hlasi celkem casto a pri ruznych chybach, cili ta ti
moc k odhaleni nepomuze :) Chtelo by to blizsi udaje. Me to hlasi tu
samou hlasku napriklad pokud v selektu zapomenu dat na moc dlouhy
podselect alias.

Jakub Dusek

------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------

Friday, April 18, 2003, 1:13:37 PM, you wrote:

PB> Ahojky.

PB> Mam tabulku s daty, tu edituji a pri Post mi Delphi vyhodi chybu:

PB> Project raised exception class EOleException with message "Multiple-step
PB> operation generates errors. Check each status value." ...

PB> Setkal jste se nekdo s touto hlaskou pri operaci Post?

PB> S tabulkou delam psi kusy, ale to sem ted nepatri. Potreboval bych spis
PB> vedet proc asi je hlaska takova a takova.

PB> Diky Petr

PB> DB Oracle 8.1, pouzivam Ado komponenty, D5Prof.

Porovnani C# Standard a Delphi Proffesional WAS:Bu

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

From: "Jon�s Marian" <Jonas(zv)komercpoj(tec)cz>
> Je C# Standard srovnatelne s Delphi Proffesional co se tyka databazove

Je to spise neco mezi Delphi Professional a Enterprise.

> nebo je to jen orezana verze, podobne jako Delphi Personal, bez moznosti

V zadnem pripade, navic na ni muzes koupit i upgrade MSDN subscription.

Petr Vones

Re[2]: caption u vice prvku

[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 18.4.2003 14:01:03

Dalsi moznost je vytvorit si potomka TControl, vytahnout property do
public a komponenty pretypovat:

TCaptionControl = class(TControl)
public
property Caption;
end;

for i := 0 to ComponentCount - 1 do
if Components[i] is TControl then
TCaptionControl(Components[i]).Caption := 'caption';

Jakub Dusek

------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------

Friday, April 18, 2003, 12:53:40 PM, you wrote:

iJF> 18.4.2003 "Ing. J�n Kuch�r PhD.":
>> caute

>> mam na formu X ruznejch komponent, ktere maji i nemaji vlastnost caption a
>> potreboval bych co nejjednoduseji
>> projit vsechny komponenty ktere maji vlastnost caption a porovnat jejich
>> caption s nejakym textem, jak to udelat bez
>> toho abych musel prochazet solo tlacitka, label,panel .... ?


iJF> Jde to s vyuzitim RTTI informaci:

iJF> uses
iJF> TypInfo;

iJF> procedure TForm1.Button1Click(Sender: TObject);
iJF> var
iJF> I: Integer;
iJF> PropInfo: PPropInfo;
iJF> begin
iJF> for I := 0 to ComponentCount - 1 do
iJF> begin
iJF> PropInfo := GetPropInfo(Components[I].ClassInfo, 'Caption');
iJF> if (PropInfo <> nil) then ...

iJF> end;
iJF> end

Rychlost aplikace

[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 18.4.2003 13:09:51

> nevite nekdo o nejakem zpusobu jak zjistovat rychlost
> jednotlivych casti zdrojoveho kodu? Mam na mysli neco
> co by mi ve zdrojaku napriklad vypsalo, ze provedeni
> tehle radky trvalo 35 msec a podobne....

Napriklad pomoci unity PvStopper Petra Vonese
pouzivaji QueryPerformace funkce z WinAPI.

Daniel
-------------------------------------------------------
Scanning complete: NO intelligent life form in range.

Rychlost aplikace

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 18.4.2003 13:19:17

----- Original Message -----
From: "Pavel Poles" <xCony(zv)seznam(tec)cz>
> nevite nekdo o nejakem zpusobu jak zjistovat rychlost
> jednotlivych casti zdrojoveho kodu? Mam na mysli neco
> co by mi ve zdrojaku napriklad vypsalo, ze provedeni
> tehle radky trvalo 35 msec a podobne....

Na to potrebujes profiler, jeden velmi dobry a zadarmo
je GPProfile, vrele doporucuji:
http://17slon.com/gp/gpprofile/index.htm

vetsina odkazu pro download uz neexistuje, jediny ktery
mi zatim funguje je
http://www-ai.ijs.si/MarkoBohanec/gp/gpprf133.exe

Martin Schayna

OT: Nativni kod v C# (Bylo: RE: Porovnani C# Stand

[*] Da�a Petr <Petr.Dana(zv)pvt(tec)cz> - 18.4.2003 13:29:47

Zdravim,
Omlouvam se za tenhle offtopic, ale koukam, ze se tu pohybujou lidi, =
kteri o .NET neco vi. Ja jsem prolezal web a hledal nejaky konfery ci =
stranky, ale to co jsem chtel vedet jsem nenasel.
Takze, lze programy v C# (nebo vubec pod .NET studiem) prelozit primo do =
windowsacky nativni binarky? Mam na mysli exe soubor, ktery pobezi i bez =
toho frameworku.
Mam takovy dojem, ze jsem kdysi davno nekde zahlid hlasku jako ze to =
snad jde v C++ .NET, ale jak je to u toho C# ? A pokud to jde, umi to i =
ta Standard verze?

Diky

Petr

Rychlost aplikace

[*] Petr Palicka <palicka(zv)aginfo(tec)cz> - 18.4.2003 13:35:02

myslim si, ze touzis po profileru.
mam za to, ze jsem jeden pro delphi
videl na http://sf.net , ale jistej
si nejsem. ah tak, tak google mi tvrdi,
ze je to tady: http://www.prodelphi.de/

:o)

peca

Nativni kod v C# (Bylo: RE: Porovnani C# Standard.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 18.4.2003 13:41:21

From: "Da�a Petr" <Petr.Dana(zv)pvt(tec)cz>
> Takze, lze programy v C# (nebo vubec pod .NET studiem) prelozit primo do
> windowsacky nativni binarky? Mam na mysli exe soubor, ktery pobezi i bez
> toho frameworku.

Jiste ze ne, stejne tak jako spustitelne soubory pro Windows nepobezi na
pocitaci kde nejsou instalovane Windows. Ten framework (.NET runtime co ma cca
20MB instalaci) je prave tim "operacnim systemem".

Petr Vones

Chyba pri operaci Post

[*] Petr Barto� <p.bartos(zv)softdec(tec)cz> - 18.4.2003 13:21:05

Ahojky.

Mam tabulku s daty, tu edituji a pri Post mi Delphi vyhodi chybu:

"Project raised exception class EOleException with message "Multiple-step
operation generates errors. Check each status value." ..."

a za ni nasleduje ta sama s rozdilem class EDatabaseError

"Project raised exception class EDatabaseError with message "Multiple-step
operation generates errors. Check each status value." ..."

Setkal jste se nekdo s touto hlaskou pri operaci Post?

S tabulkou delam psi kusy, ale to sem ted nepatri. Potreboval bych spis
vedet proc asi je hlaska takova a takova.

Diky Petr

DB Oracle 8.1, pouzivam Ado komponenty, D5Prof.

caption u vice prvku

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 18.4.2003 12:53:40

MTguNC4yMDAzICJJbmcuIErhbiBLdWNo4XIgUGhELiI6DQo+IGNhdXRlDQoNCj4gbWFtIG5hIGZv
cm11IFggcnV6bmVqY2gga29tcG9uZW50LCBrdGVyZSBtYWppIGkgbmVtYWppIHZsYXN0bm9zdCBj
YXB0aW9uIGENCj4gcG90cmVib3ZhbCBieWNoIGNvIG5lamplZG5vZHVzZWppDQo+IHByb2ppdCB2
c2VjaG55IGtvbXBvbmVudHkga3RlcmUgbWFqaSB2bGFzdG5vc3QgY2FwdGlvbiBhIHBvcm92bmF0
IGplamljaA0KPiBjYXB0aW9uIHMgbmVqYWt5bSB0ZXh0ZW0sIGphayB0byB1ZGVsYXQgYmV6DQo+
IHRvaG8gYWJ5Y2ggbXVzZWwgcHJvY2hhemV0IHNvbG8gdGxhY2l0a2EsIGxhYmVsLHBhbmVsIC4u
Li4gPw0KDQoNCkpkZSB0byBzIHZ5dXppdGltIFJUVEkgaW5mb3JtYWNpOg0KDQp1c2VzDQogIFR5
cEluZm87DQoNCnByb2NlZHVyZSBURm9ybTEuQnV0dG9uMUNsaWNrKFNlbmRlcjogVE9iamVjdCk7
DQp2YXINCiAgSTogSW50ZWdlcjsNCiAgUHJvcEluZm86IFBQcm9wSW5mbzsNCmJlZ2luDQogIGZv
ciBJIDo9IDAgdG8gQ29tcG9uZW50Q291bnQgLSAxIGRvDQogIGJlZ2luDQogICAgUHJvcEluZm8g
Oj0gR2V0UHJvcEluZm8oQ29tcG9uZW50c1tJXS5DbGFzc0luZm8sICdDYXB0aW9uJyk7DQogICAg
aWYgKFByb3BJbmZvIDw+IG5pbCkgdGhlbiAuLi4NCg0KICBlbmQ7DQplbmQNCg0KLS0gDQpKYW4g
RmlhbGENCm1haWx0bzpqYW4uZmlhbGFAaW9sLmN6


Chyba pri operaci Post

[*] Petr Barto� <p.bartos(zv)softdec(tec)cz> - 18.4.2003 13:13:37

Ahojky.

Mam tabulku s daty, tu edituji a pri Post mi Delphi vyhodi chybu:

Project raised exception class EOleException with message "Multiple-step
operation generates errors. Check each status value." ...

Setkal jste se nekdo s touto hlaskou pri operaci Post?

S tabulkou delam psi kusy, ale to sem ted nepatri. Potreboval bych spis
vedet proc asi je hlaska takova a takova.

Diky Petr

DB Oracle 8.1, pouzivam Ado komponenty, D5Prof.

Chyba pri operaci Post

[*] Delphin <delphin(zv)post(tec)cz> - 18.4.2003 13:34:16

> Project raised exception class EOleException with message "Multiple-step
> operation generates errors. Check each status value." ...

Jedna se s nejvetsi pravdepodobnosti o dotaz, ktery ADO neumi updatovat.
Mozne reseni:
1) View
2) Updatovat rucne.

Rychlost aplikace

[*] Pavel Poles <xCony(zv)seznam(tec)cz> - 18.4.2003 12:46:06

Zdravim,

nevite nekdo o nejakem zpusobu jak zjistovat rychlost
jednotlivych casti zdrojoveho kodu? Mam na mysli neco
co by mi ve zdrojaku napriklad vypsalo, ze provedeni
tehle radky trvalo 35 msec a podobne....

Dik za odpovedi

Pavel Poles

caption u vice prvku

[*] Ing. Pavel �ilinec����)b����ȧ~�� - 18.4.2003 12:47:47

Caption je definovan na TControl (a predpokladam, ze vsechny
komponenty, ktere Te zajimaji, vychazeji z tehoz).
Lze tedy jednoduse udelat porovnani:
if obj is TControl then TControl(obj).Caption ...

--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz

Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju

IJKP> caute

IJKP> mam na formu X ruznejch komponent, ktere maji i nemaji vlastnost caption a
IJKP> potreboval bych co nejjednoduseji
IJKP> projit vsechny komponenty ktere maji vlastnost caption a porovnat jejich
IJKP> caption s nejakym textem, jak to udelat bez
IJKP> toho abych musel prochazet solo tlacitka, label,panel .... ?


IJKP> DIK

caption u vice prvku

[*] Ing. J�n Kuch�r PhD. <kuchar(zv)unicodesys(tec)cz> - 18.4.2003 12:13:05

caute

mam na formu X ruznejch komponent, ktere maji i nemaji vlastnost caption a
potreboval bych co nejjednoduseji
projit vsechny komponenty ktere maji vlastnost caption a porovnat jejich
caption s nejakym textem, jak to udelat bez
toho abych musel prochazet solo tlacitka, label,panel .... ?


DIK

MoveWindow a Kylix (MDIapp)

[*] mstevlik(zv)gamo.sk - 18.4.2003 11:26:28

Caute
Viete mi ako nastavit v Kylixe poziciu MDIchild okna?
V klasickych Delphi som na to pouzival fciu MoveWindow
Dik za odpoved

Stevlik Marian
ISYS programator

GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
mail: mstevlik(zv)gamo.sk
tel: +421 48 4137935, 4132942
mobil: +412 905 462010
icq: 34893645

Porovnani C# Standard a Delphi Proffesional

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 18.4.2003 11:15:01

No ja chtel spis vedet, jestli se v tom daji delat i komercni aplikace, to
sem nejak nikde nenasel a nerad bych se to docetl az v license.doc ;-)

Roman

> Ne ze bych ti chtel kazit kseft, ale na www.cybex(tec)cz je to mozne ziskat za
> cenu pod tisicovku (zejmena teda pro ty, co uz maji zkusenosti s C# a
> nepotrebuji materialy ktere jinak najdou na netu). Uz jsem si to tam taky
> objednal.

> > Puvodni zprava ze dne 18.4.2003:
> >
> > > Btw. kdyz uz se tu resi C#, nevi nekdo jaky je rozdil mezi Vis. C#
.net
> > > Standard a Vis. C# .net Standard Promo (krom ceny)?
> >
> > Promo obsahuje normalni Visual C#.NET Standard 2002 plus ceskou knizku
> > Zaciname s C# a u me (tim myslim jako kdyz se to kupuje ode me) jeste
> > dalsi brozury od MS a take cedecko s ukazkami a zdrojaky a DVD s
> > dalsimi updaty apod.

Porovnani C# Standard a Delphi Proffesional

[*] Petr Langer <langer(zv)xdom(tec)cz> - 18.4.2003 10:56:21

Ne ze bych ti chtel kazit kseft, ale na www.cybex(tec)cz je to mozne ziskat za
cenu pod tisicovku (zejmena teda pro ty, co uz maji zkusenosti s C# a
nepotrebuji materialy ktere jinak najdou na netu). Uz jsem si to tam taky
objednal.

Petr Langer

----- Original Message -----
From: "Petr Zahradnik" <clexpert(zv)clexpert(tec)cz>
Subject: Re: Porovnani C# Standard a Delphi Proffesional WAS:Budoucnost
Delphi se (mozna) jmenuje Octane


> Puvodni zprava ze dne 18.4.2003:
>
> > Btw. kdyz uz se tu resi C#, nevi nekdo jaky je rozdil mezi Vis. C# .net
> > Standard a Vis. C# .net Standard Promo (krom ceny)?
>
> Promo obsahuje normalni Visual C#.NET Standard 2002 plus ceskou knizku
> Zaciname s C# a u me (tim myslim jako kdyz se to kupuje ode me) jeste
> dalsi brozury od MS a take cedecko s ukazkami a zdrojaky a DVD s
> dalsimi updaty apod.

Porovnani C# Standard a Delphi Proffesional WAS:Bu

[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 18.4.2003 10:41:56

A jeste bych se zeptal na cenu Tebou avizovaneho C# Promo... :)))

S pozdravem

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

> Promo obsahuje normalni Visual C#.NET Standard 2002 plus ceskou knizku
> Zaciname s C# a u me (tim myslim jako kdyz se to kupuje ode me) jeste
> dalsi brozury od MS a take cedecko s ukazkami a zdrojaky a DVD s
> dalsimi updaty apod.
>
> Petr Zahradnik, pocitacovy expert


komponenta listview

[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 18.4.2003 10:04:08

zdravim konferu

nevite nekdo o nejake trochu promakanejsim ListView. Potreboval
bych neco do mail clienta (Ve stylu OE, nebo the bat). diky moc

--
Best regards,

Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp

Porovnani C# Standard a Delphi Proffesional WAS:Bu

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.4.2003 10:22:12

Puvodni zprava ze dne 18.4.2003:

> Btw. kdyz uz se tu resi C#, nevi nekdo jaky je rozdil mezi Vis. C# .net
> Standard a Vis. C# .net Standard Promo (krom ceny)?

Promo obsahuje normalni Visual C#.NET Standard 2002 plus ceskou knizku
Zaciname s C# a u me (tim myslim jako kdyz se to kupuje ode me) jeste
dalsi brozury od MS a take cedecko s ukazkami a zdrojaky a DVD s
dalsimi updaty apod.

Petr Zahradnik, pocitacovy expert

==========================================================
Petr Zahradnik, Computer Laboratory


web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz

==========================================================

Porovnani C# Standard a Delphi Proffesional WAS:Bu

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 18.4.2003 10:12:54

Btw. kdyz uz se tu resi C#, nevi nekdo jaky je rozdil mezi Vis. C# .net
Standard a Vis. C# .net Standard Promo (krom ceny)?

Roman

>Je C# Standard srovnatelne s Delphi Proffesional co se tyka databazove
konektivity a tvorby komponent,
>nebo je to jen orezana verze, podobne jako Delphi Personal, bez moznosti
komercniho sireni vyslednych
>aplikaci a bez DB komponent ?

>Marian

>> najlepsie je stiahnut si zdarma z internetu .NET SDK a vyskusat si to
>> (sucastou je kompletna dokumentacia, riadkovy prekladac C# aj
>> debugger).
>> Alebo si kupit za 2000,- Sk Visual C#.NET Standard, to je vlastne
>> take vylepsene Delphi Enterprise pre C#.
>>
>> Erik

Assign

[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 18.4.2003 08:01:39

Assign pomerne casto pouzivam, protoze si hodne vytvarim vlastni objekty.
Je to dobra metoda, bohuzel prilis zakryva sve schopnosti (bez dokumentace
nevite c s cim jde dohromady a zdokumentovana prakticky neni, takze se
vychazi z letitych zkusenosti). Pokud potrebujes naucit nove kousky pouzij
k napr. tomu virtualni metodu AssignTo (zada si to vytvorit novou tridu)
nebo nahradni metodu AssignToTable.

Jinak, cca pred tydnem tady proletl dotaz na vlozeni obrazku z TPicture do
clipboardu. Staci jeden prikaz:

Clipboard.Assign(Picture)
nebo zpet
Picture.Assign(Clipboard)

S pozdravem Vaclav Riha

-----Puvodni zprava-----
Zdravim vespolek,

proc nemohu udelat toto:

1.Mam v DataModule vytvoren MyTable typu TTable a prirazenymi propertys
2. Udelam MyTable1 := TTable.Create(self)
3. MyTable1.Assign(MyTable) ----- Za behu krici, ze namuze priradit
TTable
na TTable ?

Nechalu. Proc to nejde a jak to resit ? Rozhodne nemohu udelat MyTable1 :=
MyTable.

Diky za nakopnuti

Zdenek R

Padani aplikace behem zavirani MDI oken

[*] �ejka Pavel <cejka(zv)proteco(tec)cz> - 18.4.2003 08:54:19

> A zmizi ta chyba, kdyz se odstrani volani Get/SetMenuItemInfo, pripadne i
ta
> obsluha vlastnich zprav ?

To nevim, nezkousel jsem. Vyzkousim. Muzes mi, jen naznacit, kde muze
vznikat problem?

Dik Pavel


Seznam vsech oken aplikace

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 18.4.2003 08:41:14

Nevite nekdo, jak zjistim seznam vsech oken (formularu), ktere patri =
spustene aplikaci? V seznamu Screen.Forms totiz nejsou formulare =
vytvorene z dll knihovny. Ale napriklad pri minimalizaci hlavniho okna =
aplikace se minimalizuji i ty vytvorene v dll a pri ukonceni aplikace se =
take uvolni. Takze nekde ta informace byt musi, jen nevim kde.=20

Marek Dostal

Spustit aplikaci jen jednou

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 18.4.2003 07:55:53

18.4.2003 Milan Tomes:
>> Je to uplne rovnaka pravdepodobnost, ako ze sa stretnu nazvy mutexov.
>> Len idiot by nechal triedu TForm1.

> S timto bych si dovolil nesouhlasit. Standardne se napriklad trida meho
> hlavniho formulare jmenuje Tf_Main.

Ale urcite pak netestujes jednu instanci pomoci FindWindow() :-)

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


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Eichler Marek <Marek.Eichler(zv)access-it(tec)cz> - 18.4.2003 08:10:45

Zdravim,

>> Neni treba psat zadnou knihovnu, o to tu jde. WinForms uz jsou tou
knihovnou.
>> Pokud si snad nekdo mysli, ze by necim jako VCL.NET obesel nutnost
psat a
>> hlavne si osvojit uplne jine prostredi (ktere jsou opravdu
rozsahle), tak se
>> hluboce myli.
>
>Tim jsem myslel prepsat hlavicky do Pascalu a v Delphi mit listu s
>komponentami WinForms.

Jestli se nemylim, tak assembly v .NET jsou samopopisne, takze neni
treba prepisovat zadne hlavickove soubory.

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

S pozdravem Marek Eichler

Budoucnost Delphi se (mozna) jmenuje Octane

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 18.4.2003 07:33:08

17.4.2003 Petr Vones:
> From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
>> Pokud by to tak bylo, bylo by to v poradku. Jenze to by chtelo zahodit
>> VCL a napsat knihovnu nad WinForms jako dalsi balik vizualnich

> Neni treba psat zadnou knihovnu, o to tu jde. WinForms uz jsou tou knihovnou.
> Pokud si snad nekdo mysli, ze by necim jako VCL.NET obesel nutnost psat a
> hlavne si osvojit uplne jine prostredi (ktere jsou opravdu rozsahle), tak se
> hluboce myli.

Tim jsem myslel prepsat hlavicky do Pascalu a v Delphi mit listu s
komponentami WinForms.

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


Porovnani C# Standard a Delphi Proffesional WAS:Bu

[*] Jon�s Marian <Jonas(zv)komercpoj(tec)cz> - 18.4.2003 07:45:17

Je C# Standard srovnatelne s Delphi Proffesional co se tyka databazove =
konektivity a tvorby komponent,
nebo je to jen orezana verze, podobne jako Delphi Personal, bez moznosti =
komercniho sireni vyslednych=20
aplikaci a bez DB komponent ?

Marian=20
=20
> najlepsie je stiahnut si zdarma z internetu .NET SDK a vyskusat si to
> (sucastou je kompletna dokumentacia, riadkovy prekladac C# aj=20
> debugger).
> Alebo si kupit za 2000,- Sk Visual C#.NET Standard, to je vlastne
> take vylepsene Delphi Enterprise pre C#.
>=20
> Erik

Spustit aplikaci jen jednou

[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 18.4.2003 07:48:05

> > Co kdyz se potkas s jinym oknem, ktereho hlavni trida
> > se jmenuje stejne ?
>
> Je to uplne rovnaka pravdepodobnost, ako ze sa stretnu nazvy mutexov.
> Len idiot by nechal triedu TForm1.
>
> vmlich

S timto bych si dovolil nesouhlasit. Standardne se napriklad trida meho
hlavniho formulare jmenuje Tf_Main.

S pozdravem

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


Spustit aplikaci jen jednou

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 18.4.2003 07:39:02

17.4.2003 Viliam Mlich:
> Problem neni pri vytvarani, ale pri ruseni. Resp. pri NEzruseni. Keby
> si niekedy pouzival homebanking KB M-worst, vedel by si, o com
> hovorim. Program pre komunikaciu s bankou pouzival ten samy mutex, ako
> program pre zobrazenie vypisu. A oba tie programy mali tendenciu
> zmrznut. Ked to urobil jeden, uz neslo pustit ani druhy. Jedine
> restartovat. Pritom vsetko ostatne fungovalo.

Dobre, ale tohle je vec, kdy je spatne napsany program. To s vhodnosti
mutexu nema nic spolecneho. je to stejny pripad, jako kdyby jsi psal 2
programy a oba mely stejnou hlavni tridu okna, kterou budes testovat v
FindWindow()
A ohledne uvolneni Mutexu tu uz psal Petr Vones. Je treba uvolnit
Handle (jeden radek v programu). Pak muze program padat kolikrat chce
a pobezi to v poradku.

>>> Optimalna je varianta s vyhladanim handle hlavneho

>> Co kdyz se potkas s jinym oknem, ktereho hlavni trida
>> se jmenuje stejne ?

> Je to uplne rovnaka pravdepodobnost, ako ze sa stretnu nazvy mutexov.
> Len idiot by nechal triedu TForm1.

Pokud pro jmeno mutexu pouziji GUID, mam jistotu, ze se mi to nepotka.
Ale pouzij GUID pro tridu okna. Jak se ti s tim bude pracovat ?

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


Progress

[*] Jiri Hoffmayer <parsys(zv)digitus(tec)cz> - 17.4.2003 22:10:02

Diky za namety,
zrovna jsem onemocnel, takze az se k tomu dostanu neco z toho vyzkousim...
Jirka


OT: Pozastaveni planovace uloh

[*] David Kraina <DKx(zv)Seznam(tec)cz> - 17.4.2003 21:43:23

Dobry den,
omlouvam se za otazku "mimo misu", ale ptam se za C++ kolegu, jak lze
(treba pomoci API) pozastavit a opet spustit planovac uloh ? Bylo by take
fajn, nejdrive zjistit jeho hodnotu. CIL: Instalator

S pozdravem

===================================================

David Kraina, DKx
-------------------------------
Vedouci vyvojarskeho tymu MX-3, programator

http://DKx.on.to
http://MX-3.w3.to

===================================================

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Hruban Ale� Ing. <ales hruban(zv)alisys(tec)cz> - 17.4.2003 21:34:53


> Borland se patrne snazi tuto vec "zamlcet" a naservirovat vyvojarum
nejakou
> snazsi "kompatibilni" cestu, ktera ale nikam nevede. I kdyby se stala
VCL.NET
> realitou a byla nejak pouzitelna, nikdo pro ni nebude vyvijet =
komponenty,
> protoze by byly pro svet .NETu (mimo Delphi) nepouzitelne a tudiz by
nemelo
> smysl je psat.


Je to vec nazoru. Sam osobne vim, ze zpetna kompatibilita je moc pekna =
vec,
ale bohuzel v hodne pripadech i na skodu. Nakonec, pokud chcete udrzet
stavajici aplikace v chodu mate k dispozici stavajici prostredi. A pokud
budete psat nove aplikace, muze se kazdy rozhodnout v cem chce =
pokracovat.=20
Zni to drsne, ale mam takovou zkusenost. Druha vec je, ze s odstupem =
clovek
vidi, ze by u nekterych v=ECci napsal kod mnohem efektivneji, nez v =
okamziku
vzniku tohoto kodu. Vim, ze je s tim spojeno mnoho pr=E1ce, ale to uz =
tak
byva. To je vse pouze muj nazor.=20
Ales

Start SQL Server

[*] Erik Salaj <info(zv)winsoft.sk> - 17.4.2003 20:47:04

> Vsiml jsem si, ze Adonis obsahuje soubor SQLDMO.DCU. Hledal jsem v
napovede
> Adonis, ale nenasel jsem zadny popis SQL-DMO. (Adonis mame koupeny bez
> zdrojaku - nemohu se do nich podivat....) Mohl bych poprosit o radu, kde
> sehnat popis ? Jake jsou moznosti ?

SQLDMO je kniznica COM objektov pre MS SQL management,
t.j. umoznuje programovo robit na MS SQL serveri vsetko to, co je
mozne robit interaktivne v Enterprise Manageri.

SQLDMO.DCU je len importovana typova kniznica, v Delphi je
mozne si ju priamo importovat, pripadne mozem poslat importovany
SQLDMO.PAS z Adonisu.

Popis SQLDMO je sucastou dokumentacia MS SQL servera.

> Obsahuje SQL-DMO take nejslabsi verze sql serveru MSDE ?

ano, SQLDMO je redistribuovatelna s MSDE

> Co vsechno muzu pomoci SQL-DMO naprogramovat ? (Jde treba zalohovat,
> vytvaret, modifikovat, mazat databaze.... a treba i jine veci... ?)

ano, umoznuje to. Zalohovanie sa da dokonca urobit aj so zobrazovanim
priebehu operacie. Mam asi 10 roznych prikladov na SQLDMO, poslem
kazdemu, kto ma o to zaujem. Nejake priklady mame aj na Adonis
FAQ stranke na http://www.winsoft.sk/adofaq.htm

Erik


Stavova informacia vzdy navrchu

[*] Mirko Zibolen ml. <mzibolen(zv)enelux.sk> - 17.4.2003 21:23:55

Dobry den prajem,

potreboval by som uzivatelovi stale vypisovat kratku informaciu, ktora
nebude za ziadnych okolnosti prekryta. Ani jedno z rieseni poriadne
nefunguje ...

1, formular so StayOnTop - v pripade fullscreen hier je skoro vzdy
prekryty

2, kreslenie priamo na Canvas okna z GetDesktopWindow - v pripade
fullscreen hier to neznesitelne blika, ked obrazovku prekreslujem ja aj
hra, skusal som to obmedzit zvysenim priority procesu atd., ale nic
rozumneho som nevymyslel

3, NEJAKO zabranit ostatnym aplikaciam (aj tym zakernym fullscreen :-((
kreslit na urcitu cast obrazovky (PAGE_NOACCES??) - aby som mohol pouzit
bod 2 a neblikalo to tak sialene. Neviem to spravit, neviem, ci sa to da
...

4, NEJAKO pomocou sprav Windowsu - zabranenie prekreslovania okna
(SendMessage()), idealne nejako jeho casti ??? To je nahly napad

Dakujem za kazdy navrh, nasmerovanie

Delphi-student Mirko Zibolen

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Erik Salaj <info(zv)winsoft.sk> - 17.4.2003 20:47:03

> Dekuju za varovani, technologii .NET dosud neznaje, zaradoval jsem se pri
cteni, ze pripadny
> prechod bude prave diky tomu pomerne bezbolestny...
>
> Doporucil byste prosim nekdo vhodny zdroj informaci o .NET? Idealne nejaky
polopaticky, neb dosud
> to znam opravdu jen z doslechu. Ovsem zase by to mohlo byt tak obsahle,
abych po nastudovani take
> dokazal opovrnout resenim, ktere Borland avizoval ;-) Cz i En.

najlepsie je stiahnut si zdarma z internetu .NET SDK a vyskusat si to
(sucastou je kompletna dokumentacia, riadkovy prekladac C# aj debugger).
Alebo si kupit za 2000,- Sk Visual C#.NET Standard, to je vlastne
take vylepsene Delphi Enterprise pre C#.

Erik


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Erik Salaj <info(zv)winsoft.sk> - 17.4.2003 20:47:06

> Co je na tom ale horsi, ze jak pro Win32 tak pro .NET verzi ma byt nove
IDE.
> Kdyz se podivame na to, jak Borland flaka cca posledni tri verze Delphi,
kde
> se misto oprav chyb pridavaji sporne technologie (WebSnap) a Enterprise
verze
> zaplacne 3rd party komponentami tak to opravdu nevypada dobre.

ta hlavna inovacia a konkurencna vyhoda, ak som dobre pochopil,
by mala spocivat v "model driven development", co je ale znacne
sporna zalezitost, takze uvidime ako to dopadne. Ja som v tomto
smere ale velmi skepticky.

Erik

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Erik Salaj <info(zv)winsoft.sk> - 17.4.2003 17:32:59

> Borland se patrne snazi tuto vec "zamlcet" a naservirovat vyvojarum
nejakou
> snazsi "kompatibilni" cestu, ktera ale nikam nevede. I kdyby se stala
VCL.NET
> realitou a byla nejak pouzitelna, nikdo pro ni nebude vyvijet komponenty,
> protoze by byly pro svet .NETu (mimo Delphi) nepouzitelne a tudiz by
nemelo
> smysl je psat.

kompatibilita s VCL je totiz jeden z mala dovodov ako presvedcit
hlavne existujucich Delphi programatorov aby aj v .NET stale
pouzivali Delphi a nepresli na konkurencny Visual C#. Je to
ale znacne pochybny pristup, hlavne z dlhodobeho hladiska.
Ovela lepsie riesenie a je dost mozne, ze aj jednoduchsie
ako budovat VCL v .NET by bol podla mna program, ktory
by existujuce VCL Delphi aplikacie (zdrojove kody)
konvertoval (aspon ciastocne) na WinForms programy
(najlepsie C#). Predpokladam, ze taketo programy
sa casom aj objavia.

Erik


Spustit aplikaci jen jednou

[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 17.4.2003 17:52:58

>> Hlavne sa vyhni pouzitiu mutexov.

> A proc by se mel Mutexu vyhybat ?
> MyMutex:=CreateMutex(nil, False, 'PSPadMutex');

Problem neni pri vytvarani, ale pri ruseni. Resp. pri NEzruseni. Keby
si niekedy pouzival homebanking KB M-worst, vedel by si, o com
hovorim. Program pre komunikaciu s bankou pouzival ten samy mutex, ako
program pre zobrazenie vypisu. A oba tie programy mali tendenciu
zmrznut. Ked to urobil jeden, uz neslo pustit ani druhy. Jedine
restartovat. Pritom vsetko ostatne fungovalo.

>> Optimalna je varianta s vyhladanim handle hlavneho

> Co kdyz se potkas s jinym oknem, ktereho hlavni trida
> se jmenuje stejne ?

Je to uplne rovnaka pravdepodobnost, ako ze sa stretnu nazvy mutexov.
Len idiot by nechal triedu TForm1.

bye
vmlich

Unit, ktery boura kompilator

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.4.2003 17:53:36

Na D5E me to tady pada.

Pavel

> From: Petr Brant [mailto:brant(zv)dcomm(tec)cz]
> Ahoj vespolek, zacal jsem psat novy projekt a kompilator Delphi zacal
> uspesne padat (AV v dcc50.dll). Kdyz uz jsem propadal
> zoufalstvi a chystal
> se reinstalovat, napadlo me projekt zkompilovat na jinem
> pocitaci a ejhle,
> pada to take. A na jinem rovnez. Muzete to prosim take zkusit
> zkompilovat?

Unit, ktery boura kompilator

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.4.2003 17:55:27

Na D7E me to nepada !

Pavel

> From: Petr Brant [mailto:brant(zv)dcomm(tec)cz]
> Ahoj vespolek, zacal jsem psat novy projekt a kompilator Delphi zacal
> uspesne padat (AV v dcc50.dll). Kdyz uz jsem propadal
> zoufalstvi a chystal
> se reinstalovat, napadlo me projekt zkompilovat na jinem
> pocitaci a ejhle,
> pada to take. A na jinem rovnez. Muzete to prosim take zkusit
> zkompilovat?

Unit, ktery boura kompilator

[*] Redlich Software <RedlichDaniel(zv)seznam(tec)cz> - 17.4.2003 16:52:43

>Ahoj vespolek, zacal jsem psat novy projekt a kompilator Delphi zacal
>uspesne padat (AV v dcc50.dll). Kdyz uz jsem propadal zoufalstvi a =
chystal
>se reinstalovat, napadlo me projekt zkompilovat na jinem pocitaci a =
ejhle,
>pada to take. A na jinem rovnez. Muzete to prosim take zkusit =
zkompilovat?
>Netusite, v cem je zakopany pes?

>D5Pro + SP, WinXP.


V D6 SP2 to kompiluje i provadi v poradku.

Dan

Unit, ktery boura kompilator

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 17.4.2003 16:24:47

Ahoj vespolek, zacal jsem psat novy projekt a kompilator Delphi zacal
uspesne padat (AV v dcc50.dll). Kdyz uz jsem propadal zoufalstvi a =
chystal
se reinstalovat, napadlo me projekt zkompilovat na jinem pocitaci a =
ejhle,
pada to take. A na jinem rovnez. Muzete to prosim take zkusit =
zkompilovat?
Netusite, v cem je zakopany pes?

D5Pro + SP, WinXP.

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

D&COMM s.r.o.
Korunova=E8n=ED 6
Praha 7
tel. +420724007234

unit CommNMCTypes;

interface

type
String1 =3D string[1];
String3 =3D string[3];
String10 =3D string[10];
String18 =3D string[18];

function Build101Packet( ProtVersion: String3;
AccountNr: string10;
Password: String10;
RepProxFlag: string1 =3D '0';
SendOnlyFlag: string1 =3D '0';
Reserved: String18 =3D '000000000000000000'): =
string;


implementation

function Build101Packet( ProtVersion: String3;
AccountNr: string10;
Password: String10;
RepProxFlag: string1{ =3D '0'};
SendOnlyFlag: string1{ =3D '0'};
Reserved: String18{ =3D =
'000000000000000000'}):
string;
begin
Result:=3D '{' + ProtVersion + AccountNr + Password + RepProxFlag +
SendOnlyFlag + Reserved + '}';
end;

end.

Ako vyradit nepotrebne unity?

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 17.4.2003 16:49:47


----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
>
> Problem je ale daleko slozitejsi, muzes mit v projektu unit, ze ktereho
> nepouzivas zadne symboly a presto je dulezity, napriklad ve sve
initialization
> sekci registruje novy graficky format apod.

Ahoj.
To je samozrejme pravda, ale o takovemhle unitu bys mel vedet a pokud o nem
nevis je IMHO lepsi kdyz ti ho expert vyradi uz behem ladeni programu.
Takze pro beznou praci by to mohlo byt ulehceni.

Ludek

Unit, ktery boura kompilator

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

From: "Petr Brant" <brant(zv)dcomm(tec)cz>
> String1 = string[1];

Asi bych pouzival normalni (Ansi)stringy misto ShortStringu, bude to
rychlejsi, jednodusi (a prelozi se to v Delphi 5 ;-) V Delphi 7 to jde
prelozit bez problemu.

Petr Vones

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.4.2003 16:18:31

> From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
> From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> > Pokud by to tak bylo, bylo by to v poradku. Jenze to by
> chtelo zahodit
> > VCL a napsat knihovnu nad WinForms jako dalsi balik vizualnich
>
> Neni treba psat zadnou knihovnu, o to tu jde. WinForms uz
> jsou tou knihovnou.
> Pokud si snad nekdo mysli, ze by necim jako VCL.NET obesel
> nutnost psat a
> hlavne si osvojit uplne jine prostredi (ktere jsou opravdu
> rozsahle), tak se
> hluboce myli.
>
> Borland se patrne snazi tuto vec "zamlcet" a naservirovat
> vyvojarum nejakou
> snazsi "kompatibilni" cestu, ktera ale nikam nevede. I kdyby
> se stala VCL.NET
> realitou a byla nejak pouzitelna, nikdo pro ni nebude vyvijet
> komponenty,
> protoze by byly pro svet .NETu (mimo Delphi) nepouzitelne a
> tudiz by nemelo
> smysl je psat.
>
> Strucne tedy:
> Narozdil od Win32 API je rozhrani mezi aplikaci a "systemem"
> objektove, takze
> jej neni treba dale obalovat ruznymi VCL nebo MFC. Naopak by
> to bylo i zcela
> nezadouci, protoze .NET umoznuje opravdove vyuziti komponent,
> bez ohledu na to
> v jakem prostredi byly napsane. Jakykoli dalsi bazmek typu
> VCL.NET by zpusobil
> ze by vznikl kod nekompatibilni s tim co pouzivaji ostatni,
> diky zavislosti na
> dalsim zbytecnem frameworku (VCL.NET) nad jiz existujicim (WinForms).

Neco podobneho udelal i Microsoft s VB.NET, kde existuji i objekty (cely
namespace)
pro "kompatibilitu v VB6. Vesmes jde jen o aliasy stavajicich objektu.
Pricemz, rozdil mezi VB6 a VB.NET je tak velky, ze predstavu, ze by slo
nejak "bezpracne" prevest projekty z VB6 do VB.NET nema ani Microsoft.

Pavel

Padani aplikace behem zavirani MDI oken

[*] �ejka Pavel <cejka(zv)proteco(tec)cz> - 17.4.2003 15:49:19



> > Nemohl by jsi mi poradit co to muze zpusobovat? Na co se zamerit. Tato
> > aplikace byla puvodne napsana jako 16-bitova v Deplhi 1 a v podstate se
> > jenom prevedla na 32-bitovou ( Delphi 6 prof ) bez nejakych vetsich zmen
ve
> > stavbe aplikace.
>
> Aha, pouziva ciste jen VCL (to znamena zadne komponenty od jinych vyrobcu)
a
> nejsou tam zadne prime volani Win32 API nebo obsluha zprav ?
>

Ano pouziva pouze VCL a Tvoje komponenty AsyncFree. A pro MDI okna je
prepsana procedura WndProc pro obsluhu vlastnich zprav aplikace. Prime
volani Win32 API skoro neni ( krome GetFileVersionInfo, GetMenuItemInfo,
SetMenuItemInfo, CreateMutex ).

Pavel


Padani aplikace behem zavirani MDI oken

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

From: "�ejka Pavel" <cejka(zv)proteco(tec)cz>
> prepsana procedura WndProc pro obsluhu vlastnich zprav aplikace. Prime
> volani Win32 API skoro neni ( krome GetFileVersionInfo, GetMenuItemInfo,
> SetMenuItemInfo, CreateMutex ).

A zmizi ta chyba, kdyz se odstrani volani Get/SetMenuItemInfo, pripadne i ta
obsluha vlastnich zprav ?

Petr Vones

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 15:42:48

From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> Pokud by to tak bylo, bylo by to v poradku. Jenze to by chtelo zahodit
> VCL a napsat knihovnu nad WinForms jako dalsi balik vizualnich

Neni treba psat zadnou knihovnu, o to tu jde. WinForms uz jsou tou knihovnou.
Pokud si snad nekdo mysli, ze by necim jako VCL.NET obesel nutnost psat a
hlavne si osvojit uplne jine prostredi (ktere jsou opravdu rozsahle), tak se
hluboce myli.

Borland se patrne snazi tuto vec "zamlcet" a naservirovat vyvojarum nejakou
snazsi "kompatibilni" cestu, ktera ale nikam nevede. I kdyby se stala VCL.NET
realitou a byla nejak pouzitelna, nikdo pro ni nebude vyvijet komponenty,
protoze by byly pro svet .NETu (mimo Delphi) nepouzitelne a tudiz by nemelo
smysl je psat.

Strucne tedy:
Narozdil od Win32 API je rozhrani mezi aplikaci a "systemem" objektove, takze
jej neni treba dale obalovat ruznymi VCL nebo MFC. Naopak by to bylo i zcela
nezadouci, protoze .NET umoznuje opravdove vyuziti komponent, bez ohledu na to
v jakem prostredi byly napsane. Jakykoli dalsi bazmek typu VCL.NET by zpusobil
ze by vznikl kod nekompatibilni s tim co pouzivaji ostatni, diky zavislosti na
dalsim zbytecnem frameworku (VCL.NET) nad jiz existujicim (WinForms).

Petr Vones

Graficka Data

[*] Marek Hradil <marekhr(zv)benefitcz(tec)cz> - 17.4.2003 15:49:01

Zdravim,

Stojim pred problemem vytvorit system zpracovavajici graficka data.
Podminkou je, aby data mohla byt porizena ve standardnim CAD prostredi
napr. nejakou geodetickou kancelari. Tato data by se mela uzivateli
zobrazovat s moznosi programove modifikace, napr vybarveni casti vykresu
jinou barvou na zaklade dat z jine DB, pripane po kliknuti na urzitou
cast zobrazit vykres s detaily tykajici se pouze teto logicke casti
apod.

Resenim zrejme je pouzit nejaky stand. CAD format (DXF) a zakoupit
nejakou komponentu, ktera by tyto moznosti mela. Nebo me nekdo nakopnete
jinym smerem. Pripominam ze vykresy budou udrzovat jine firmy - tudiz
standardni prostredi.

Diky

Marek Hradil

Budoucnost Delphi se (mozna) jmenuje Octane

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.4.2003 15:20:04

MTcuNC4yMDAzIFZsYXN0aW1pbCBCYXJkb/I6DQo+IEEgamFrIG1hbSByb3p1bWV0IHRvbXVobGU/
DQoNCj4gT2N0YW5lIHdpbGwgaW5jbHVkZSBmdWxsIERlbHBoaSBsYW5ndWFnZSBzdXBwb3J0IGZv
ciBidWlsZGluZyAxMDAlDQo+IHB1cmUgLk5FVCBhcHBsaWNhdGlvbnMuIFRoaXMgd2lsbCBpbmNs
dWRlIGludGVncmF0ZWQgdmlzdWFsDQo+IGRldmVsb3BtZW50IGZvciB0aGUgZW50aXJlIC5ORVQg
ZnJhbWV3b3JrIGluY2x1ZGluZyBXaW5kb3dzIEZvcm1zLA0KPiBBU1AuTkVUIFdlYkZvcm1zIGFu
ZCBXZWIgU2VydmljZXMsIGFuZCBBRE8uTkVULg0KDQo+IEhsYXZuZSB0byAiaW5jbHVkaW5nIFdp
bmRvd3MgRm9ybXMuLi4iIE1pIHRvIHRvdGl6IHByaXBhZGEsIGpha28NCj4ga2R5YnkgY2h0ZWxp
IHpwcmlzdHVwbml0IFdpbkZvcm1zIHogRGVscGhpIGpha28gYWx0ZXJuYXRpdnUgayBWQ0wuDQo+
IEFzaSBqc2VtIHRvIHNwYXRuZSBwb2Nob3BpbC4NCg0KUG9rdWQgYnkgdG8gdGFrIGJ5bG8sIGJ5
bG8gYnkgdG8gdiBwb3JhZGt1LiBKZW56ZSB0byBieSBjaHRlbG8gemFob2RpdA0KVkNMIGEgbmFw
c2F0IGtuaWhvdm51IG5hZCBXaW5Gb3JtcyBqYWtvIGRhbHNpIGJhbGlrIHZpenVhbG5pY2gNCmtv
bXBvbmVudC4gQWxlIHRvaG8gc2UgdSBCb3JsYW5kdSwga3Rlcnkgc2UgZHJ6aSBzdGFsZSB6cGV0
bmUNCmtvbXBhdGliaWxpdHkgdGV6a28gZG9ja2FtZSAgOi0oDQoNCi0tIA0KSmFuIEZpYWxhDQpt
YWlsdG86amFuLmZpYWxhQGlvbC5jeg==

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.4.2003 15:25:19

On 17 Apr 2003 at 15:06, Vlastimil Bardo� wrote:

> Octane will include full Delphi language support for building 100%
> pure .NET applications. This will include integrated visual
> development for the entire .NET framework including Windows Forms,
> ASP.NET WebForms and Web Services, and ADO.NET.
>
> Hlavne to "including Windows Forms..."

Windows forms jsou soucasti .NET. Pokud bude umet Delphi pracovat
_primo_ bez nejakych transformaci s .NET knihovnami, bude to OK.
Jestli k tomu bude zapotrebi delat nejake transformace (jako v
pripade *.h), pak Borlandum pomahej Buh.

> Mi to totiz pripada, jako kdyby chteli zpristupnit WinForms z Delphi
> jako alternativu k VCL. Asi jsem to spatne pochopil.

Nevim, jak to planuji. Kazdopadne se vsichni pripravte na to, ze
nejlepsi zpusob prevodu aplikace do .NET bude jeji nove napsani.

Jen tak na okraj - kdo planuje nejakou novou aplikaci nebo verzi s
tim, ze ji v dohledne dobe (do cca 2 let) bude chtit i pod .NET, pak
doporucuji ji zacit psat v .NET rovnou.

S pozdravem

Zbysek Hlinka


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Eichler Marek <Marek.Eichler(zv)access-it(tec)cz> - 17.4.2003 14:35:10

Zdravim,

>>> pvones(zv)mbox.vol(tec)cz 04/17 1:19 odp. >>>
>>From: "Karel Rys" <delphi(zv)zas-me(tec)cz>
>> Doporucil byste prosim nekdo vhodny zdroj informaci o .NET? Idealne
nejaky
>
> http://www.microsoft.com/net/
> http://arstechnica.com/paedia/n/net/net-1.html
> http://www.haes(tec)cz/d2003/delphidotnetlinks.htm
>
>Petr Vones

jeste bych doplnil http://dotnet.microsoft(tec)cz/

S pozdravem Marek Eichler


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Vlastimil Bardo� <bardon(zv)akord-soft(tec)cz> - 17.4.2003 15:06:45

A jak mam rozumet tomuhle?

Octane will include full Delphi language support for building 100% pure =
.NET applications. This will include integrated visual development for =
the entire .NET framework including Windows Forms, ASP.NET WebForms and =
Web Services, and ADO.NET.

Hlavne to "including Windows Forms..."
Mi to totiz pripada, jako kdyby chteli zpristupnit WinForms z Delphi =
jako alternativu k VCL. Asi jsem to spatne pochopil.

-----Original Message-----
From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
Sent: Thursday, April 17, 2003 1:16 PM

Nicmene opravdu doporucuji se nenechat zlakat touto veci ktera opravdu =
nikam
nevede. S novou platformou prichazeji i nove knihovny trid a to nikdo =
nezmeni,
takze nova "VCL" se jmenuje WinForms.

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 14:34:58

From: "Slavek Rydval" <konference(zv)rydval(tec)cz>
> *****A jeste bych doplnil uvedenou vetu (a uvedl na pravou miru subject), ze
> budoucnost Delphistu se nejmenuje Octane, ale Visual Studio .NET 2003, ktere
> na cesky trh oficialne dojde 24. dubna, tedy za tyden.

Proto jsem do subjectu dal to "mozna" :-) Sam jsem byl prekvapen co vsechno
nabizi i takove Visual C# .NET Standard za cenu cca 1300 Kc (promo akce MS) v
porovnani s Delphi, nemluve o moznosti upgrade na MSDN subscription.

Na druhe strane dejme Borlandu jeste (posledni ?) sanci, treba necim prekvapi.

Petr Vones

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Slavek Rydval <konference(zv)rydval(tec)cz> - 17.4.2003 13:29:33

From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>

> Nicmene opravdu doporucuji se nenechat zlakat touto veci ktera
> opravdu nikam nevede. S novou platformou prichazeji i nove knihovny
> trid a to nikdo nezmeni, takze nova "VCL" se jmenuje WinForms.
*****A jeste bych doplnil uvedenou vetu (a uvedl na pravou miru subject), ze
budoucnost Delphistu se nejmenuje Octane, ale Visual Studio .NET 2003, ktere
na cesky trh oficialne dojde 24. dubna, tedy za tyden.

Slavek Rydval

> Petr Vones

---------------------
http://www.rydval(tec)cz
slavek(zv)rydval(tec)cz
---------------------

Ako vyradit nepotrebne unity?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 13:46:43

From: "Ludek ZITA" <konference(zv)sales(tec)cz>
> A nesel by napsat nejaky IDE expert ?

Nevim jestli je tohle ten spravny zpusob. Unity ktere nejsou potreba totiz
pouhou chybou pri prekladu neodhalis. Ten princip ktery navrhujes by sel
napsat i daleko rozumeji nez jen postupnym odebiranim unitu a urcite na to
existuji i nejake nastroje.

Problem je ale daleko slozitejsi, muzes mit v projektu unit, ze ktereho
nepouzivas zadne symboly a presto je dulezity, napriklad ve sve initialization
sekci registruje novy graficky format apod.

Petr Vones

Firebird primary key a recreate

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 17.4.2003 13:51:10

> From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> > Kdyz se podivas na ten uvodni mejl, tak pri create tam ty dva zaznamy
> nedas
> > (coz je prave z duvodu duplicitniho primarniho klice). Pokud udelas
> > recreate, tak uz je tam das.
>
> Ano mas pravdu nieco tam nesedi. Z povodneho mailu som mal dojem, ze si
> myslis, ze tam ostal zaznam z povodnej tabulky.
> Lauko.

No, prave ze pokud tam ten zaznam neni, udelas pouze create, commit,
recreate, commit, tak primarni klic se chova tak jak ma, ale pokud tam uz
neco pred recreate bylo, tak se to pak chova blbe. Proto se na to ptam,
jestli to je nejaka nova vlastnost, anebo mam problem v gdb /tedy ve vetsine
gdb :-)/

Roman
==============================
http://kouzelne.misto(tec)cz

Re[2]: Firebird primary key a recreate

[*] Roland Turcan <rolo(zv)sedas.sk> - 17.4.2003 14:09:03

<<< 17. 4. 2003 14:07 - Lauko Stefan "laukosw(zv)naex.sk" >>>
LS> ----- Original Message -----
LS> From: "Roman" <sw.maurice(zv)seznam(tec)cz>
>> Kdyz se podivas na ten uvodni mejl, tak pri create tam ty dva zaznamy
LS> nedas
>> (coz je prave z duvodu duplicitniho primarniho klice). Pokud udelas
>> recreate, tak uz je tam das.

LS> Ano mas pravdu nieco tam nesedi. Z povodneho mailu som mal dojem, ze si
LS> myslis, ze tam ostal zaznam z povodnej tabulky.
LS> Lauko.
-------------------------------------------
My answer:
----------
Skusal som to na FB 1.5 RC1 a je to OK.

Skuste tento skript v ISQL:


CREATE DATABASE "c:\test.gdb" USER "sysdba" PASSWORD "masterkey";

CREATE TABLE "POKUS"
(
"ID" integer not null,
"POKUS" varchar(30),
PRIMARY KEY ("ID")
);

COMMIT;

INSERT INTO pokus VALUES (1,'prvy zaznam');

COMMIT;

RECREATE TABLE "POKUS"
(
"ID" integer not null,
"POKUS" varchar(30),
PRIMARY KEY ("ID")
);

COMMIT;

INSERT INTO pokus VALUES (1,'druhy zaznam');

INSERT INTO pokus VALUES (1,'treti zaznam');

commit;

select * from pokus;

COMMIT;

drop database;


--
Best regards, TRoland


DSPack a video overlay

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 17.4.2003 13:15:22

Ahoj,
nevite nekdo, jak s DSPackem 2.3 (nebo i jinak, ale ne s technologii
VFW) dosahnout zobrazeni ziveho videa v overlay rezimu? Potrebuji mit na
monitoru co nejkvaliynejsi obraz.
Vaclav Sazima

knihovna pro spojnice mezi dvema body

[*] Petr Langer <langer(zv)xdom(tec)cz> - 17.4.2003 14:02:12

Ahojte,
nevite nekdo o nejake komponente (i s zdrojakem) pro nakresleni spojnice
mezi dvema body na obrazovce a to pomoci ruznych typu, jako napr.
ortogonalni, ortogonalni s oblymi rohy, bezier, atd... idealni by bylo aby
to byl objekt do ktereho se pridavaji na spojnici body pomoci kterych bych
tu krivku upravoval.

Diky,
Petr Langer


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 13:19:43

From: "Karel Rys" <delphi(zv)zas-me(tec)cz>
> Doporucil byste prosim nekdo vhodny zdroj informaci o .NET? Idealne nejaky

http://www.microsoft.com/net/
http://arstechnica.com/paedia/n/net/net-1.html
http://www.haes(tec)cz/d2003/delphidotnetlinks.htm

Petr Vones

Padani aplikace behem zavirani MDI oken

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

From: "�ejka Pavel" <cejka(zv)proteco(tec)cz>
> Nemohl by jsi mi poradit co to muze zpusobovat? Na co se zamerit. Tato
> aplikace byla puvodne napsana jako 16-bitova v Deplhi 1 a v podstate se
> jenom prevedla na 32-bitovou ( Delphi 6 prof ) bez nejakych vetsich zmen ve
> stavbe aplikace.

Aha, pouziva ciste jen VCL (to znamena zadne komponenty od jinych vyrobcu) a
nejsou tam zadne prime volani Win32 API nebo obsluha zprav ?

Petr Vones

SQL a padesataky

[*] Vlastimil Zden�k <delphi(zv)gestore(tec)cz> - 17.4.2003 13:41:04

Zdravim vsechny a prosil bych o radu
Vzhledem k tomu, ze se chystaj zrusit mensi penize jak padesataky, nastava
tu jeden problem - jak na SQL serveru napsat v SELECTu zaokrouhleni prave na
padesataky....
Prictenim a zaokrouhlenim nakonec pozadovaneho zaokrouhleni dosahnu, ALE
neni primo nejaka fce na SQL ktera toto umi? Nebo nevite o nejakem "cistem"
reseni tohoto zaokrouhleni?

Diky moc za radu
Vlasta

D5Ent, SQL 7.0, 2000

Ako vyradit nepotrebne unity?

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 17.4.2003 13:40:12

----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> > daju sa z delphi zdrojakov z "uses" vyhodit tie unity ktore su
> > nepotrebne?
> Daji. Ja to delam otrocky, jednu po druhe zkousim zakomentarovat
> a prelozit to bez ni. Otrocina, ale na neprilis velkych projektech nebo

Ahoj.
A nesel by napsat nejaky IDE expert ?
Neco jako :
for i := 0 to Uses.Count -1 do
begin
Zakomentuj(Uses[i]);
if NEJDEPrelozit then Odkomentuj(Uses[i]);
end;
Nikdy jsem zadneho IDE experta nepsal takze nevim jestli je to vubec realne.


Ludek

Firebird primary key a recreate

[*] Lauko Stefan <laukosw(zv)naex.sk> - 17.4.2003 12:59:39


----- Original Message -----
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> Kdyz se podivas na ten uvodni mejl, tak pri create tam ty dva zaznamy
nedas
> (coz je prave z duvodu duplicitniho primarniho klice). Pokud udelas
> recreate, tak uz je tam das.

Ano mas pravdu nieco tam nesedi. Z povodneho mailu som mal dojem, ze si
myslis, ze tam ostal zaznam z povodnej tabulky.
Lauko.

Budoucnost Delphi se (mozna) jmenuje Octane

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

From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>
> Dotaz byl asi nepresne polozen, ale v A rikaji toto: vrsek VCL v
> podstate zustane, uvnitr toho bude implementovan .NET. Coz je

Tahle varianta by jeste byla ta lepsi, jinak receno je sice v praxi take uplne
k nicemu ale byl to alespon .NET, jenze ta soucasna co je u Delphi.NET preview
prekladace nema dokonce s .NETem vubec nic spolecneho.

Nicmene opravdu doporucuji se nenechat zlakat touto veci ktera opravdu nikam
nevede. S novou platformou prichazeji i nove knihovny trid a to nikdo nezmeni,
takze nova "VCL" se jmenuje WinForms.

Petr Vones

Start SQL Server

[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 17.4.2003 12:56:33

> Dekuji Erikovi za priklad a za odkaz...
> O SQL-DMO nevim skoro nic.... Napadlo me nekolik otazek:
>
> Vsiml jsem si, ze Adonis obsahuje soubor SQLDMO.DCU. Hledal jsem v
napovede
> Adonis, ale nenasel jsem zadny popis SQL-DMO. (Adonis mame koupeny bez
> zdrojaku - nemohu se do nich podivat....) Mohl bych poprosit o radu, kde
> sehnat popis ? Jake jsou moznosti ?
>
> Obsahuje SQL-DMO take nejslabsi verze sql serveru MSDE ?
> Co vsechno muzu pomoci SQL-DMO naprogramovat ? (Jde treba zalohovat,
> vytvaret, modifikovat, mazat databaze.... a treba i jine veci... ?)
>
> Dekuji moc za odpoved...
> Martin

Nainportuj si v Delphi->Project->Import Type Library knihovnu sqldmo.dll
(Microsoft SQLDMO Object Library (version 8.0), ktera je soucasti MS SQL
Serveru. Help je v sqldmo80.hlp. Tento import vygeneruje unit
SQLDMO_TLB.PAS.
Petr

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 17.4.2003 13:05:26

Zbysek Hlinka dne 17 Apr 2003 v 12:56:

> Dotaz byl asi nepresne polozen, ale v A rikaji toto: vrsek VCL v
> podstate zustane, uvnitr toho bude implementovan .NET. Coz je
> splacanina nejhrubsiho zrna, a velice durazne varuji kazdeho, kdo by
> se chtel pokusit to pouzit, aby to nedelal. Pokud to prece jen nekdo
> zkusi, pak at neplace, byl varovan. :-)

Dekuju za varovani, technologii .NET dosud neznaje, zaradoval jsem se pri cteni, ze pripadny
prechod bude prave diky tomu pomerne bezbolestny...

Doporucil byste prosim nekdo vhodny zdroj informaci o .NET? Idealne nejaky polopaticky, neb dosud
to znam opravdu jen z doslechu. Ovsem zase by to mohlo byt tak obsahle, abych po nastudovani take
dokazal opovrnout resenim, ktere Borland avizoval ;-) Cz i En.

Karel Rys


Budoucnost Delphi se (mozna) jmenuje Octane

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.4.2003 12:56:13

On 17 Apr 2003 at 12:03, Tom Beran wrote:

> > Jak jsem to pochopil, tak nebude prepsana VCL s pouzitim .NET
> > objektu, ale bude to ta splacanina, ktera do pure .NET
> > aplikace zalinkuje VCL.
>
> No tak to snad nebude - viz. QA
>
> VCL for .NET is a large subset of the most common classes in VCL for
> Win32. ...
> In many cases, Delphi source code that operates on VCL classes and
> functions should recompile with minimal changes; in some cases with no
> changes at all. VCL for .NET is a large subset of VCL; therefore, most
> but not all VCL classes will exist in VCL for .NET.

Dotaz byl asi nepresne polozen, ale v A rikaji toto: vrsek VCL v
podstate zustane, uvnitr toho bude implementovan .NET. Coz je
splacanina nejhrubsiho zrna, a velice durazne varuji kazdeho, kdo by
se chtel pokusit to pouzit, aby to nedelal. Pokud to prece jen nekdo
zkusi, pak at neplace, byl varovan. :-)

S pozdravem

Zbysek Hlinka


Assign - nazor na nej

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 17.4.2003 12:39:10

----- Original Message -----
From: "Ing. Zden�k �ezn��ek" <reznicek(zv)pce(tec)cz>
> 1.Mam v DataModule vytvoren MyTable typu TTable a prirazenymi propertys
> 2. Udelam MyTable1 := TTable.Create(self)
> 3. MyTable1.Assign(MyTable) ----- Za behu krici, ze namuze priradit
TTable
> na TTable ?
>
> Nechalu. Proc to nejde a jak to resit ? Rozhodne nemohu udelat MyTable1 :=
> MyTable.

Chce to trochu teorie:
Metoda Assign je obecna metoda pro kopirovani obsahu z jedne instance
potomka TPersistent do druhe instance, nejcasteji stejne tridy ale to neni
pravidlo. Zakladni implementace neni zadna, resp. vyskoci EConvertError.
Pokud chces Assign pouzivat, musis si ho pokazde znovu implementovat,
typicky tak ze kopiruje do sve instance data z jine instance sve vlastni
tridy. Ve VCL se to trochu pouziva, ale ne vzdy takze se na to u vetsiny
trid rozhodne nelze spolehnout, kde to typicky funguje spolehlive jsou tridy
jako TStringList, TCollection apod., ale TDataSet a potomci si na to
vubec nehraji (mozna take proto ze neni jasne co je obsahem TDataSetu
-- struktura? vlastnosti? data?).

Kazdopadne Assign / AssignTo ma ve VCL velky potencial ktery ale
zustava nevyuzit (alespon v D5).

Doporucuji ti napsat si vlastni jednoduchou proceduru napr.
MyAssignDataset(ASource, ADest: TDataSet)
kterou budes vzdycky pouzivat a ve ktere si napises vse potrebne co
od zkopirovani datasetu ocekavas a specialne pro ty potomky
TDataSetu ktere pouzivas (TTable, TIBTable apod).

Martin Schayna

Priklad s AT prikazy pro mobil

[*] Robert <rpvp(zv)vagnerplast(tec)cz> - 17.4.2003 12:32:32

Pekny den vsem...

Nemate nekdo prikladek na posilani AT+C prikazu do
mobilu prez COM port? Konkretne predavani parametru
jako napr. SMS apod.

1000-ere diky

R. Plzak

Urychlenie presunu v dbgride, loknutie ostatnych d

[*] Miroslav Vav��n <mirun(zv)forcom(tec)cz> - 17.4.2003 12:35:50

Zkus pouzit Timer a udalosti OnBeforeScroll u datasetu napojeneho na DBGrid.
Do udalosti Timer.OnTimer si napis pripojeni child Datasetu a vypnuti
Timeru.
V OnBeforeScroll child Datasety odpojis, resetnes a zapnes Timer (nastav jej
na nejakou rozumnou hodnotu, napr 0.5sec).
Po uplynuti doby nastavene v Timeru se child Datasety pripoji a Timer se
vypne.
Vysledkem je, ze uzivatel muze jezdit v DBGridu jak se mu zlibi, a child
Datasety se pripoji az kdyz se zastavi na urcitou dobu na nejakem recordu.

Mirun

----- Original Message -----
From: "Vlko II." <vlko(zv)zilina.net>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, April 13, 2003 6:22 PM
Subject: Urychlenie presunu v dbgride, loknutie ostatnych datasetov?> Mam taky mensi problem, pretoze sa snazim urychlit program beziaci na
> databaze a je tam dost poloziek a na formulari sa nachadza dbgrid a nad
nim
> su edity, v ktorych sa edituju
> polozky. Dbgrid a edity maju spolocny dataset. Dalej su tam rozne
> dblookupedity, ktore
> sa odkazuju na dalsie datasety a tu je problem, ked chcem rychlo skrolovat
> v dbgride,
> tak musim tieto ostatne datasety pozatvarat aby sa zbytocne v nich
> referencie nevyhladavali.
> Ale pretoze, ked tabulku zavriem, tak ju musim nasledne aj otvorit, a to
> trosku trva, nedali
> by sa tie ostatne datasety nejakym sposobom locknut proti posunu?
>
> dosial to mam takto
>
> procedure TfEvidFaktury.ZDBGrid1Enter(Sender: TObject);
> begin
> //pozatvaram tabulky napr
> datamod.qZmluvy.Close;
> end;
>
> procedure TfEvidFaktury.ZDBGrid1Exit(Sender: TObject);
> begin
> //otvorim tabulky
> datamod.qZmluvy.Open;
> end;
>
> dbGrid sa napr odkazuje na tabulku qFaktury
> v ktorej je polozka IDZmluva a ta je cez tDBLookupCombo prepojena na
> qZmluvy
> Kym neuzavriem takto tabulku tak na pomalsich strojoch to trosku trva.
> Nedala by sa ta teda tabulka qZmluvy nejakym sposobom locknut proti
pohybu?
>
> Komponenty na db su zeos a server bezi na PostgreSQL - len pre
informaciu:)
>
> Vopred dakujem
>
> Vlko
>
>
>
> --
>
>
> --------------
> vlko_(zv)pobox.sk
>
>
>

Form vytvoreny v DLL

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 17.4.2003 12:25:46

V dll knihovne vytvorim formular a zobrazim ho jako nemodalni. Jak mohu =
v hlavni aplikaci zjistit seznam takto vytvorenych formularu. V seznamu =
screen.forms je nemam. Do dll knihovny si predavam handle aplikace, =
ktery v dll knihovne priradim do application.handle a formular vytvarim =
Create(Application). Asi to vsak nestaci, co je potreba jeste predat?

Marek Dostal

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 12:28:55

From: "ing. Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> Jak jsem to pochopil, tak nebude prepsana VCL s pouzitim .NET objektu,
> ale bude to ta splacanina, ktera do pure .NET aplikace zalinkuje VCL.

Jiste, ktera je nepouzitelna pro cokoli. Nastesti VCL.NET (at jiz ten Win32
paskvil pres P/Invoke nebo lepsi reseni pres .NET tridy s pouzitim class
helpers) vlastne nikdo k nicemu v .NETu nepotrebuje ;-)

Co je na tom ale horsi, ze jak pro Win32 tak pro .NET verzi ma byt nove IDE.
Kdyz se podivame na to, jak Borland flaka cca posledni tri verze Delphi, kde
se misto oprav chyb pridavaji sporne technologie (WebSnap) a Enterprise verze
zaplacne 3rd party komponentami tak to opravdu nevypada dobre.

Petr Vones

Spustit aplikaci jen jednou

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.4.2003 11:52:16

From: "Viliam Mlich" <mlich1(zv)volny(tec)cz>
> Moznosti je plno. Hlavne sa vyhni pouzitiu mutexov. To je globalny
> objekt, ktory zostane existovat ked program skonci nenormalne bez jeho
> zrusenia a potom pomoze jedine restart celeho pocitaca. :-(

Use the CloseHandle function to close the handle. The system closes the handle
automatically when the process terminates. The mutex object is destroyed when
its last handle has been closed.

Petr Vones

Budoucnost Delphi se (mozna) jmenuje Octane

[*] Tom Beran <tfuzzy(zv)atlas(tec)cz> - 17.4.2003 12:03:55

> Jak jsem to pochopil, tak nebude prepsana VCL s pouzitim .NET
> objektu, ale bude to ta splacanina, ktera do pure .NET
> aplikace zalinkuje VCL.

No tak to snad nebude - viz. QA

VCL for .NET is a large subset of the most common classes in VCL for
Win32.
...
In many cases, Delphi source code that operates on VCL classes and
functions should recompile with minimal changes; in some cases with no
changes at all. VCL for .NET is a large subset of VCL; therefore, most
but not all VCL classes will exist in VCL for .NET.

T.

dbExpress, FireBird - zalozeni a zruseni tabulky

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 17.4.2003 11:55:31

> zkus pri otevirani a zavirani datasetu pouzivat metody Open a Close;
> tedy misto:
> SimpleDataSet1.Active:=3Dtrue;
> SimpleDataSet1.Active:=3Dfalse;
> pouzit
> SimpleDataSet1.Open;
> SimpleDataSet1.Close;


To bohuzel nebude ono, nebot viz. unit db.pas z VCL:

procedure TDataSet.Open;
begin
Active :=3D True;
end;

procedure TDataSet.Close;
begin
Active :=3D False;
end;

Spustit aplikaci jen jednou

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.4.2003 11:14:19

17.4.2003 Viliam Mlich:
> Moznosti je plno. Hlavne sa vyhni pouzitiu mutexov. To je globalny
> objekt, ktory zostane existovat ked program skonci nenormalne bez jeho
> zrusenia a potom pomoze jedine restart celeho pocitaca. :-(

A proc by se mel Mutexu vyhybat ?
Pri testovani
MyMutex:=CreateMutex(nil, False, 'PSPadMutex');
if GetLastError<>ERROR_ALREADY_EXISTS then
//spustim
else
//nespustim

Vubec ti nevadi, jestli aplikace spadne nebo ne. Zadny restart neni
potreba. Proste se vytvoreni mutexu podari, pokud jej aplikace
neblokuje nebo nepodari a aplikace bezi.

> Optimalna je varianta s vyhladanim handle hlavneho okna - mozes mu
> hned dat aj fokus. Vadi to len pri ladeni z IDE, ale to neni ziaden
> problem, stejne mas v programe na ladenie spustu vsuviek {$IFDEF
> Debug}, tak jedna moze byt aj {$IFNDEF Debug}

Tohle bych jako optimalni variantu nepovazoval :-(
Co kdyz se potkas s jinym oknem, ktereho hlavni trida se jmenuje
stejne ? A hledani pomoci titulku je casto nepouzitelne, protoze v
titulku se zobrazuji krome jmena programu i dalsi informace. Treba v
MDI aplikaci i jmeno aktivniho okna apod.

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


Assign

[*] Ing. Zden�k �ezn��ek - 17.4.2003 11:18:30

Zdravim vespolek,

proc nemohu udelat toto:

1.Mam v DataModule vytvoren MyTable typu TTable a prirazenymi propertys
2. Udelam MyTable1 := TTable.Create(self)
3. MyTable1.Assign(MyTable) ----- Za behu krici, ze namuze priradit TTable
na TTable ?

Nechalu. Proc to nejde a jak to resit ? Rozhodne nemohu udelat MyTable1 :=
MyTable.

Diky za nakopnuti

Zdenek R

Divny textovy soubor

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.4.2003 11:17:22

17.4.2003 Petr Slaby:
> Ahoj,

MK>>> mam takovy problem: narazil jsem na takovyhle podobny soubory s trochu
MK>>> divnou strukturou ktera vypada zhruba takhle:
MK>>> ?W i n d o w s R e g i s t r y E d i t o r V e r s i o n 5 . 0 0 ?
> [snip]
MK>>> Nevite prosim nekdo co s tim? Potreboval bych bud nejakou utilitku ktera to
MK>>> prekonvertuje do normalniho textoveho formatu,

> Je to normalni textovy soubor, ale je ulozen v UniCode. Doporucuji
> otevrit v nejakem textovem editoru (Word, WordPad, Notepad, atd...) a
> ulozit jako standardni text.

Ale hlavne se to pak nepokousej jako obycejny text importovat zpet.
Protoze pokud bude na zacatku uvedena Version 5.x, bude chtit Unicode
format.

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


Start SQL Server

[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 17.4.2003 11:11:58

Dekuji Erikovi za priklad a za odkaz...
O SQL-DMO nevim skoro nic.... Napadlo me nekolik otazek:

Vsiml jsem si, ze Adonis obsahuje soubor SQLDMO.DCU. Hledal jsem v napovede
Adonis, ale nenasel jsem zadny popis SQL-DMO. (Adonis mame koupeny bez
zdrojaku - nemohu se do nich podivat....) Mohl bych poprosit o radu, kde
sehnat popis ? Jake jsou moznosti ?

Obsahuje SQL-DMO take nejslabsi verze sql serveru MSDE ?
Co vsechno muzu pomoci SQL-DMO naprogramovat ? (Jde treba zalohovat,
vytvaret, modifikovat, mazat databaze.... a treba i jine veci... ?)

Dekuji moc za odpoved...
Martin

Budoucnost Delphi se (mozna) jmenuje Octane

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.4.2003 11:03:41

Jak jsem to pochopil, tak nebude prepsana VCL s pouzitim .NET objektu,
ale bude to ta splacanina, ktera do pure .NET aplikace zalinkuje VCL.

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

16.4.2003 Petr Vones:
> Open Letter to the Delphi Community
> http://bdn.borland.com/article/0,1410,29951,00.html

> Delphi 8 bude, ale ...

> Petr Vones


Soubor BMP

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.4.2003 10:57:16

RG9wb3JjdWppIFRGaWxlU3RyZWFtIGEgbmFjaXRhdCBCeXRlIC0NClJlYWRCdWZmZXIoTmVjb0J5
dGUsIDEpOw0KYSBkbyBkcnVoZWhvIFRGaWxlU3RyZWFtIHphcGlzb3ZhdCB1eiBqYWtvIENoYXIs
IGt0ZXJ5IGRvc3RhbmVzIHRyZWJhDQpwb21vY2kgZnVua2NlIEhleCgpDQoNCi0tIA0KSmFuIEZp
YWxhDQptYWlsdG86amFuLmZpYWxhQGlvbC5jeg0KDQoxNi40LjIwMDMgIkluZy4gSmFuIER1YnNr
/SAtIFN0cm9q7XJuYSBQ4WxhdmEiOg0KPiBQb3RyZWJ1amkgc291Ym9yICouYm1wIG5hIGRpc2t1
IHByZXZlc3QgZG8gZm9ybWF0dSBUWFQgdGFrIHplIGplZG5vdGxpdmUNCj4gYnl0eSBidWRvdSB2
IEhFWCBmb3JtYXR1LiBBYnljaCBhbGUgbW9obCBwcm92ZXN0IHR1dG8ga29udmVyemksDQo+IHBv
dHJlYnVqaSB2ZWRldCwgdiBqYWtlbSBmb3JtYXR1IGplIHB1dm9kbmkgemRyb2ogLSB0ZWR5IGJp
biwgZGVjLCBoZXgNCj4gbmVibyBqYWsuIEphayB0byB0ZWR5IHByb3Zlc3QuIE5hY2l0YXQgemUg
c291Ym9ydSAqLmJtcCBkYXRhIGpha28gd29yZCwNCj4gZHdvcmQgbmVibyBu7GNvIGppbmVobywg
YWJ5Y2ggdG8gcGFrIHByZXZlZGwuDQoNCj4gRGlrIHphIHJhZHUNCg0KIA==

OT: Mail client

[*] Tomas Hustava <tommyx(zv)zoznam.sk> - 17.4.2003 08:36:31 ut

Cau,

nemas pretaktovany procak, alebo nieco podobne??? :-) Pretoze mne ten
outlook chodi no problem... ani nie je not responding.

T.

----- Original Message -----
From: "Robert Suska" <suskar(zv)seznam(tec)cz>
To: delphi-l(zv)clexpert(tec)cz
Sent: Wed, 16 Apr 2003 09:22:47 +0200
Subject: OT: Mail client

> Ahojte!
>
> Ospravedlnujem sa za OT ale chcem vediet ktory mail klient by vedel
> nahradit
> Mircosoft Outlook 2002 SP2 aj s funkciou ze vie rozdelovat postu do
> jednotlivych priecinkov podla adresy odkial mail prisiel? Jedna sa o to
> ze
> ked necham Outlook spusteny v liste tak po cca 10 min je v Task Managery
> NOT
> Responding a nepomoze nic len end task a znovu ho spustit. Nainstaloval
> som
> aj vsetky updaty a nic stale to robi.
>
> P.S. poznam dost mail clientov len som neskusal ich funkcie a momentalne
> pre
> nedostatok casu riesim svoj problem cez Vas.
>
> Dakujem za pomoc a pochopenie
>
> S pozdravom,
>
> ****************************************
> Robert Suska
> KORAK SLOVAKIA s.r.o.
> Horna 52
> 974 01 Banska Bystrica
> www.korak.sk robert(zv)korak.sk
> Network administrator, Delphi programmer
> My site: www.sefino.globus.sk
> ****************************************
>

Firebird primary key a recreate

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 17.4.2003 10:32:20

> > > Ahoj,
> > > ked tam vkladas 2 zaznamy preco by tam nemali byt? Alebo som nieco
> > > nepochopil?
> > > Lauko
> >
> > No, ale ony maji oba stejnou hodnotu primarniho klice, to je normalni?
> >
>
> RECREATE TABLE "POKUS"
> (
> "ID" integer not null UNIQUE,
> "POKUS" varchar(30)
> );
> Takto tam druhy zaznam s rovnakym ID nedas.
> Lauko.

Nejak ti tam chybi ten primarni klic ;-) a ten je snad od toho, aby
jednoznacne identifikoval zaznam.

Kdyz se podivas na ten uvodni mejl, tak pri create tam ty dva zaznamy nedas
(coz je prave z duvodu duplicitniho primarniho klice). Pokud udelas
recreate, tak uz je tam das.

Roman
==============================
http://kouzelne.misto(tec)cz

Firebird primary key a recreate

[*] Lauko Stefan <laukosw(zv)naex.sk> - 17.4.2003 10:06:44


----- Original Message -----
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
> > > RECREATE TABLE "POKUS"
> > > (
> > > "ID" integer not null,
> > > "POKUS" varchar(30),
> > > PRIMARY KEY ("ID")
> > > );
> > >
> > > COMMIT;
> > >
> > > INSERT INTO pokus VALUES (1,'sdfsdf');
> > > INSERT INTO pokus VALUES (1,'kjdkjf');
> > >
> > > COMMIT;
> > >
> > > Mate tam oba zaznamy? Ja jo (zkouseno na 2 ruznych DB).
> > > Tak nevim, ale k cemu je teda recreate?
> >
> > Ahoj,
> > ked tam vkladas 2 zaznamy preco by tam nemali byt? Alebo som nieco
> > nepochopil?
> > Lauko
>
> No, ale ony maji oba stejnou hodnotu primarniho klice, to je normalni?
>

RECREATE TABLE "POKUS"
(
"ID" integer not null UNIQUE,
"POKUS" varchar(30)
);
Takto tam druhy zaznam s rovnakym ID nedas.
Lauko.

dbExpress, FireBird - zalozeni a zruseni tabulky

[*] V�t Krska����+?��$g�^��3 - 17.4.2003 10:03:14

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

Komponenty dbExpress, databaze FireBird 1.0.0.2:
mam problem, kdyz zalozim tabulku, otevru ji, neco s ni delam, zavru ji a
chci ji zrusit, tak nelze. Zkousel jsem to obalit transakci, abych to mohl
commitnout, ale ruseni tabulky skonci vyjimkou: "unsucessfull metadata
update object AAA1 is in use". Bez transakce to nehodi hlasku, ale tabulka
se nezrusi. Viz. nasledujici kod:

//zalozim tabulku AAA1
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('create table AAA1 (a1 varchar(1),a2 varchar(2))');
SQLQuery1.ExecSQL(true);

//otevru tabulku AAA1
SimpleDataSet1.Active:=true;

//tady pouzivam AAA1

//uzavru AAA1
SimpleDataSet1.Active:=false;

//rusim AAA1
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('drop table AAA1');
SQLConnection1.StartTransaction(TD);
SQLQuery1.ExecSQL(true); //tady to skonci vyse
uvedenou vyjimkou
SQLConnection1.Commit(TD);


Nevite nekdo, v cem by mohl byt problem, co je potreba udelat, aby to
fungovalo?

Marek Dostal

zkus pri otevirani a zavirani datasetu pouzivat metody Open a Close;
tedy misto:
SimpleDataSet1.Active:=true;
SimpleDataSet1.Active:=false;
pouzit
SimpleDataSet1.Open;
SimpleDataSet1.Close;

vitek

dbExpress, FireBird - zalozeni a zruseni tabulky

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 17.4.2003 09:02:37

Komponenty dbExpress, databaze FireBird 1.0.0.2:=20
mam problem, kdyz zalozim tabulku, otevru ji, neco s ni delam, zavru ji =
a chci ji zrusit, tak nelze. Zkousel jsem to obalit transakci, abych to =
mohl commitnout, ale ruseni tabulky skonci vyjimkou: "unsucessfull =
metadata update object AAA1 is in use". Bez transakce to nehodi hlasku, =
ale tabulka se nezrusi. Viz. nasledujici kod:

//zalozim tabulku AAA1
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('create table AAA1 (a1 varchar(1),a2 varchar(2))');
SQLQuery1.ExecSQL(true);

//otevru tabulku AAA1
SimpleDataSet1.Active:=3Dtrue;
=20
//tady pouzivam AAA1

//uzavru AAA1
SimpleDataSet1.Active:=3Dfalse;

//rusim AAA1
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('drop table AAA1');
SQLConnection1.StartTransaction(TD);
SQLQuery1.ExecSQL(true); //tady to skonci =
vyse uvedenou vyjimkou
SQLConnection1.Commit(TD);


Nevite nekdo, v cem by mohl byt problem, co je potreba udelat, aby to =
fungovalo?

Marek Dostal

Divny textovy soubor

[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 17.4.2003 09:06:11

Michal Kuncl, <mailto:spider_x(zv)quick(tec)cz>:
MK> mam takovy problem: narazil jsem na takovyhle podobny soubory s trochu
MK> divnou strukturou ktera vypada zhruba takhle:
MK> ?W i n d o w s R e g i s t r y E d i t o r V e r s i o n 5 . 0 0 ?
[snip]
MK> Nevite prosim nekdo co s tim? Potreboval bych bud nejakou utilitku ktera to
MK> prekonvertuje do normalniho textoveho formatu,

Zkus PSPad, http://pspad.zde(tec)cz, ten umi ruzne konverze a formaty.

------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
W2K/SP2, D5Ent/UP1

Re[2]: Divny textovy soubor

[*] Petr Slaby <petr.slaby(zv)i(tec)cz> - 17.4.2003 09:33:15

Ahoj,

MK>> mam takovy problem: narazil jsem na takovyhle podobny soubory s trochu
MK>> divnou strukturou ktera vypada zhruba takhle:
MK>> ?W i n d o w s R e g i s t r y E d i t o r V e r s i o n 5 . 0 0 ?
[snip]
MK>> Nevite prosim nekdo co s tim? Potreboval bych bud nejakou utilitku ktera to
MK>> prekonvertuje do normalniho textoveho formatu,

Je to normalni textovy soubor, ale je ulozen v UniCode. Doporucuji
otevrit v nejakem textovem editoru (Word, WordPad, Notepad, atd...) a
ulozit jako standardni text.

Petr

Ako vyradit nepotrebne unity?

[*] Tom Beran <tfuzzy(zv)atlas(tec)cz> - 17.4.2003 08:56:41

> daju sa z delphi zdrojakov z "uses" vyhodit tie unity ktore
> su nepotrebne? Ono ked som raz vlozil daku komponentu do

No , asi nejspis rucne. Automatizovat to je docela problem, ale neco
maji tady http://opedit.home.att.net/opxperts.htm


T.

Firebird primary key a recreate

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 17.4.2003 09:32:05

> > RECREATE TABLE "POKUS"
> > (
> > "ID" integer not null,
> > "POKUS" varchar(30),
> > PRIMARY KEY ("ID")
> > );
> >
> > COMMIT;
> >
> > INSERT INTO pokus VALUES (1,'sdfsdf');
> > INSERT INTO pokus VALUES (1,'kjdkjf');
> >
> > COMMIT;
> >
> > Mate tam oba zaznamy? Ja jo (zkouseno na 2 ruznych DB).
> > Tak nevim, ale k cemu je teda recreate?
>
> Ahoj,
> ked tam vkladas 2 zaznamy preco by tam nemali byt? Alebo som nieco
> nepochopil?
> Lauko

No, ale ony maji oba stejnou hodnotu primarniho klice, to je normalni?

Roman
==============================
http://kouzelne.misto(tec)cz

Firebird primary key a recreate

[*] Lauko Stefan <laukosw(zv)naex.sk> - 17.4.2003 08:42:19


----- Original Message -----
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
>
> CREATE TABLE "POKUS"
> (
> "ID" integer not null,
> "POKUS" varchar(30),
> PRIMARY KEY ("ID")
> );
>
> COMMIT;
>
> INSERT INTO pokus VALUES (1,'sdfsdf');
>
> COMMIT;
>
> RECREATE TABLE "POKUS"
> (
> "ID" integer not null,
> "POKUS" varchar(30),
> PRIMARY KEY ("ID")
> );
>
> COMMIT;
>
> INSERT INTO pokus VALUES (1,'sdfsdf');
> INSERT INTO pokus VALUES (1,'kjdkjf');
>
> COMMIT;
>
> Mate tam oba zaznamy? Ja jo (zkouseno na 2 ruznych DB).
> Tak nevim, ale k cemu je teda recreate?

Ahoj,
ked tam vkladas 2 zaznamy preco by tam nemali byt? Alebo som nieco
nepochopil?
Lauko

Ako vyradit nepotrebne unity?

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 17.4.2003 08:41:15

> daju sa z delphi zdrojakov z "uses" vyhodit tie unity ktore su
> nepotrebne?

Daji. Ja to delam otrocky, jednu po druhe zkousim zakomentarovat
a prelozit to bez ni. Otrocina, ale na neprilis velkych projektech nebo
dela-li prubezne, je to jedna cesta.

David Lebeda

Ako vyradit nepotrebne unity?

[*] Peter Turcan <peter.turcan(zv)centrum.sk> - 17.4.2003 08:32:04

ahojte

daju sa z delphi zdrojakov z "uses" vyhodit tie unity ktore su
nepotrebne?
Ono ked som raz vlozil daku komponentu do formy, potom ju zmazem a
uses zostane s tym, ze mi dotiahne aj nepotrebne resources.

dakujem
Peter

tvorba PDF vystupu

[*] Michel Rabadi <michel(zv)asex(tec)cz> - 17.4.2003 08:15:32

-----Original Message-----
>From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Jiri Baudys
>Sent: Wednesday, April 16, 2003 7:55 PM

>PDF neni tak jednoduchej format. Jedin� realne ktere funguje je tisk na PS
>tisk�rnu a nasledne zpracovani Acrobat Destilerem, neni to sice zadarmo,
ale
>funguje to. Samozrejme i tady jsou problemy s fonty atd., ale alespon zde
>funguje ceska diakritika - nic jineho jsem nenasel.
>Jirka

Co se tyce prevodu PS -> PDF je jedno free reseni popsano tady:
http://www.zive.sk/H/TestCentrum/Ar.asp?ARI=105303&CAI=2176&EXPS=%22PDF%2A%2
2
Pripoustim, ze je to ponekud kostrbate, ale vysledky jsou asi nejlepsi (z
principu), co jsem videl, vcetne diakritiky.

Michel


Spustit aplikaci jen jednou

[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 17.4.2003 08:09:00

> jak se da udelat, aby nebylo mozne aplikaci
> spustit vicekrat jak jednou...

Moznosti je plno. Hlavne sa vyhni pouzitiu mutexov. To je globalny
objekt, ktory zostane existovat ked program skonci nenormalne bez jeho
zrusenia a potom pomoze jedine restart celeho pocitaca. :-(

Optimalna je varianta s vyhladanim handle hlavneho okna - mozes mu
hned dat aj fokus. Vadi to len pri ladeni z IDE, ale to neni ziaden
problem, stejne mas v programe na ladenie spustu vsuviek {$IFDEF
Debug}, tak jedna moze byt aj {$IFNDEF Debug}

bye
vmlich

Padani aplikace behem zavirani MDI oken

[*] �ejka Pavel <cejka(zv)proteco(tec)cz> - 17.4.2003 07:35:06

> > stava se mi obcas, ze aplikace spadne s nasledujici chybou:
> > Aplikace NECO zp�sobila neplatnost str�nky
> >
> > v modulu USER.EXE na adrese 0011:0000095f.
>
> Tohle bude neco ve zpracovani ikon a podobne, protoze je to 16ti bitove.
> Nedochazeji na tom pocitaci GDI zdroje ?
>
> Petr Vones
>

Myslim si, ze ne. Mel jsem pri provozu teto aplikace zapnuty meric
prostredku, a pouzite prostredky nestouply nad 90%.
Nemohl by jsi mi poradit co to muze zpusobovat? Na co se zamerit. Tato
aplikace byla puvodne napsana jako 16-bitova v Deplhi 1 a v podstate se
jenom prevedla na 32-bitovou ( Delphi 6 prof ) bez nejakych vetsich zmen ve
stavbe aplikace.
P.S. : Ta chybova hlaska je vzdy stejna i na ruznych pocitacich z WIN9x.


Dik Pavel


Shockwave flash OCX

[*] Tomas Bradle <t.bradle(zv)worldonline(tec)cz> - 17.4.2003 00:59:04

Zdravim vsechny,

nema nekdo prakticke zkusenosti s OCX komponentou (%subj%) na prehravani
*.SWF z Macromedia Flash ? Potreboval bych zjistit kdyz dojede animace,
abych na ni mohl zareagovat.

diky
Tomas Bradle
t.bradle(zv)worldonline(tec)cz


Budoucnost Delphi se (mozna) jmenuje Octane

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

Open Letter to the Delphi Community
http://bdn.borland.com/article/0,1410,29951,00.html

Delphi 8 bude, ale ...

Petr Vones

Start SQL Server

[*] Erik Salaj <info(zv)winsoft.sk> - 16.4.2003 22:17:02

> potreboval bych poradit, jak z Delphi aplikace nastartovat MS SQL Server
> 2000 kdyz zjistim, ze je server stopnuty.
> Pouzivam Delphi 5 prof. a Adonis.

tu je priklad restartovania (cize druha polovica kodu je startovanie ;-) )

uses SQLDMO;

with CoSQLServer.Create do
begin
LoginSecure := True;
Connect(SQLServerName, EmptyParam, EmptyParam);

Stop;
Disconnect;

// wait until server stops
while Status <> SQLDMOSvc_Stopped do
Sleep(100);

Start(True, SQLServerName, EmptyParam, EmptyParam);

ShowMessage('Server restarted');
end;

Erik

Firebird primary key a recreate

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 14.4.2003 11:36:17

Takova mala zajimavost ve FB1 pro Win:

CREATE TABLE "POKUS"
(
"ID" integer not null,
"POKUS" varchar(30),
PRIMARY KEY ("ID")
);

COMMIT;

INSERT INTO pokus VALUES (1,'sdfsdf');

COMMIT;

RECREATE TABLE "POKUS"
(
"ID" integer not null,
"POKUS" varchar(30),
PRIMARY KEY ("ID")
);

COMMIT;

INSERT INTO pokus VALUES (1,'sdfsdf');
INSERT INTO pokus VALUES (1,'kjdkjf');

COMMIT;

Mate tam oba zaznamy? Ja jo (zkouseno na 2 ruznych DB).
Tak nevim, ale k cemu je teda recreate?

Roman
- - - - - - - - - - - - - - - - - - - - -
http://kouzelne.misto(tec)cz/

IB/FB pouziti exception

[*] Pavel Malinsky <spiderland(zv)iol(tec)cz> - 16.4.2003 21:12:06

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Roland Turcan
>
> PM> nejaky jiny(nebo doplnujici) text. Je to mozne
> PM> nebo text hlaseni musi byt natvrdo?
>

> Tato forma ako je momentalne exception v IB/FB spravene sa ani mne
> nepaci. Ja si to robim tak, ze si exception pomenuvavam napr. ERR001,

OK, jenomze me slo o to, abych si mohl do te hlasky dat treba
ID zaznamu na kterem to selhalo. Jak je videt FB 1.5 uz to asi resi:).
(Sice jsem to jeste nezkousel...).

S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
=====================================
GSM: 602 652 203


tvorba PDF vystupu

[*] Jiri Baudys <konference(zv)duplikace(tec)cz> - 16.4.2003 19:55:10


PDF neni tak jednoduchej format. Jedin� realne ktere funguje je tisk na PS
tisk�rnu a nasledne zpracovani Acrobat Destilerem, neni to sice zadarmo, ale
funguje to. Samozrejme i tady jsou problemy s fonty atd., ale alespon zde
funguje ceska diakritika - nic jineho jsem nenasel.


Jirka


TreeView s dvojbarevnym podkladem

[*] Vita J. <delphi(zv)obecpohori(tec)cz> - 16.4.2003 19:15:55

----- Original Message -----
From: <dphi_forum(zv)proces.sk>
> a co tak pouzit dva krat TreeView vedla seba?

To je to co nechci. Maji byt dva svisle stejne siroke pruhy vedle sebe s
ruznou barvou jako pozadi treeview. Vazne nikdo netusi jak na to?
Diky


tvorba PDF vystupu

[*] Ondrej Krsko <ondrej.krsko(zv)zoznam.sk> - 16.4.2003 18:47:48

Zabudol som napisat, ze najlepsie by bolo nieco zdarma, popripade pre istotu
aj so zdrojakom (alebo by som uz chcel toho privela?)

> > nasiel som zopar kniznic/unitov/komponent na tvorbu PDF.
> > Skor, ako nejaky pouzijem, by ma zaujimalo, co pouzivate vy a s cim
> > mate dobre skusenosti.
> >
> > Nejake "advanced" funkcie mi netreba, staci formatovany text, rozne
> > fonty a ciary na tvorbu tabuliek, pripadne nejaky vlozeny obrazok.
>
> Ahoj,
>
> www.pdf995.com
>
> Je to vlastne tiskarna, pomoci pdfedit se da nastavit, aby vystup vzdy
davala do urciteho souboru,
> ze ktereho ji aplikace prevezme. Zdarma (s reklamou) nebo za 10 USD bez
reklamy. Zvlada fonty s
> diakritikou.
>
> Karel Rys

Divny textovy soubor

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.4.2003 17:52:36

On 16 Apr 2003 at 17:36, Michal Kuncl wrote:

> mam takovy problem: narazil jsem na takovyhle podobny soubory s trochu
> divnou strukturou ktera vypada zhruba takhle:
>
> ?W i n d o w s R e g i s t r y E d i t o r V e r s i o n 5 .

Nejspis bude v unicode.

S pozdravem

Zbysek Hlinka


Divny textovy soubor

[*] Michal Kuncl <spider_x(zv)quick(tec)cz> - 16.4.2003 17:36:24

Zdravim konferu,
mam takovy problem: narazil jsem na takovyhle podobny soubory s trochu
divnou strukturou ktera vypada zhruba takhle:

?W i n d o w s R e g i s t r y E d i t o r V e r s i o n 5 . 0 0 ?
?
[ H K E Y _ C U R R E N T _ U S E R \ S o f t w a r e \ A l t a p \ S e r v
a
?
[ H K E Y _ C U R R E N T _ U S E R \ S o f t w a r e \ A l t a p \ S e r v
a
?
[ H K E Y _ C U R R E N T _ U S E R \ S o f t w a r e \ A l t a p \ S e r v
a
" M a s k s " = " * . * " ?
" C o m m a n d " = " " ?
" A r g u m e n t s " = " " ?
" I n i t i a l D i r e c t o r y " = " " ?
" T y p e " = d w o r d : 0 0 0 0 0 0 0 1 ?

Kdyz ho nactu v notepadu, tak vypada normalne. Ale kdyz se ho pokusim nacist
bud dosovym edit.exe nebo do tmemo a do tlistboxu (coz hlavne potrebuju) tak
ten text vypada tak, ze jednotlive znaky jsou pokladane nejakymi jinymi.
Nevite prosim nekdo co s tim? Potreboval bych bud nejakou utilitku ktera to
prekonvertuje do normalniho textoveho formatu, nebo nejak to nacist do vyse
uvedenych komponent.

Diky za pomoc

Spider_X


tvorba PDF vystupu

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 16.4.2003 17:53:07

Ondrej Krsko dne 16 Apr 2003 v 17:26:

> nasiel som zopar kniznic/unitov/komponent na tvorbu PDF.
> Skor, ako nejaky pouzijem, by ma zaujimalo, co pouzivate vy a s cim
> mate dobre skusenosti.
>
> Nejake "advanced" funkcie mi netreba, staci formatovany text, rozne
> fonty a ciary na tvorbu tabuliek, pripadne nejaky vlozeny obrazok.

Ahoj,

www.pdf995.com

Je to vlastne tiskarna, pomoci pdfedit se da nastavit, aby vystup vzdy davala do urciteho souboru,
ze ktereho ji aplikace prevezme. Zdarma (s reklamou) nebo za 10 USD bez reklamy. Zvlada fonty s
diakritikou.

Karel Rys


Progress

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 16.4.2003 18:04:26

----- Original Message -----
From: "Jiri Hoffmayer" <parsys(zv)digitus(tec)cz>
> Uplne bozi by bylo, kdybych mohl nejak prinutit aplikaci zpracovavat pouze
> zpravy urcene tomu oknu s progresem a ostatek zahazovat.

Ja pouzivam misto Application.ProcessMessages s uspechem tohle,
ale zpracovavam pouze zpravy WM_PAINT pro obnovovani obsahu
"cekaciho" okna, pro zpracovani vsech zprav by to muselo byt asi
mnohem komplexnejsi:

procedure TWaitWinForm.ProcessOwnMessages;
var
Msg: TMsg;
begin
while PeekMessage(Msg, Self.Handle, 0, 0, PM_REMOVE) do begin
// budeme zpracovavat pouze vlastni zpravy a to pouze pro prekreslovani
if Msg.Message = WM_PAINT then
begin
TranslateMessage(Msg);
DispatchMessage(Msg);
end;
end;
end;

Martin Schayna

tvorba PDF vystupu

[*] Ondrej Krsko <ondrej.krsko(zv)zoznam.sk> - 16.4.2003 17:26:15

Ahojte,

nasiel som zopar kniznic/unitov/komponent na tvorbu PDF.
Skor, ako nejaky pouzijem, by ma zaujimalo, co pouzivate vy a s cim mate
dobre skusenosti.

Nejake "advanced" funkcie mi netreba, staci formatovany text, rozne fonty a
ciary na tvorbu
tabuliek, pripadne nejaky vlozeny obrazok.

S pozdravom
Ondrej Krsko

tvorba PDF vystupu

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 16.4.2003 17:51:50

----- Original Message -----
From: "Ondrej Krsko" <ondrej.krsko(zv)zoznam.sk>
> nasiel som zopar kniznic/unitov/komponent na tvorbu PDF.
> Skor, ako nejaky pouzijem, by ma zaujimalo, co pouzivate vy a s cim mate
> dobre skusenosti.
>
> Nejake "advanced" funkcie mi netreba, staci formatovany text, rozne fonty
a
> ciary na tvorbu
> tabuliek, pripadne nejaky vlozeny obrazok.

Vyzkousej si zda podporuji vsechny narodni znaky, to je totiz
hlavni problem vsech free PDF knihoven -- format PDF (nabaleny)
je relativne jednoduchy ale nepodporuje nativne vsechny
"nabodenicka", musi se to resit sekci s fonty, coz vetsina
free knihoven neumi. Umi to napr. komercni llPDFLib od
http://www.llion.net/

Martin Schayna

Divny textovy soubor

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 16.4.2003 17:59:39

----- Original Message -----
From: "Michal Kuncl" <spider_x(zv)quick(tec)cz>
> Kdyz ho nactu v notepadu, tak vypada normalne. Ale kdyz se ho pokusim
nacist
> bud dosovym edit.exe nebo do tmemo a do tlistboxu (coz hlavne potrebuju)
tak
> ten text vypada tak, ze jednotlive znaky jsou pokladane nejakymi jinymi.

je to v Unicode, bud to musis zkonvertovat do Ansi nebo
pouzit nejake controly, ktere podporuji Unicode (nedavno
jsem na to na inetu narazil, ale uz nevim kde).

Martin Schayna

Dokumentace k Firebirdu

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.4.2003 17:32:20

Haj hou!

On 15 Apr 2003 at 17:09, Pavel Bare� wrote:

> Nemate prosim nekdo dokumentaci k novym funkcim Firebirdu ?
> Kde se da sehnat ?

Pro FB 1.0 je to v ReleaseNotes.pdf nebo v PDF knihach na IBP Developer's
CD. Pro FB 1.5 je zatim jen What's New v distribucnim baliku. Jinak to bud=
e
vsechno popsano v knize u Computer Pressu (IB 6.0, 6.5 a 7.0, a FB 1.0 a 1=
.5).

S pozdravem
Pavel Cisar

Navidenou na Prvni Evropske Firebird Konferenci - Kveten 2003,
Fulda, Nemecko
http://www.firebird-conference.com

Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


IB/FB pouziti exception

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.4.2003 17:32:19

Haj hou!

On 16 Apr 2003 at 15:47, Pavel Malinsky wrote:

> v databazi FB mam nadefinovanou exception,
> ale bylo by mi vhod, kdyby slo pri volani
> teto vyjimky treba v ulozene procedure ji predat
> nejaky jiny(nebo doplnujici) text. Je to mozne
> nebo text hlaseni musi byt natvrdo?

Tohle dovoluje az novy Firebird 1.5 (prave byl uvolnen Release Candidate 1).

S pozdravem
Pavel Cisar

Navidenou na Prvni Evropske Firebird Konferenci - Kveten 2003,
Fulda, Nemecko
http://www.firebird-conference.com

Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


IB/FB pouziti exception

[*] Petr Palicka <palicka(zv)aginfo(tec)cz> - 16.4.2003 17:38:58

ahoj,

zadat text hlasky pri volani vyjimky uvnitr SP
umi az FB 1.5.

peca

Oracle pres ADO a typ NUMBER(3)

[*] Ivan Virag <lgcvirag(zv)iol(tec)cz> - 16.4.2003 16:58:40

Ja jsem to zkousel a dela mi to u number(n) to same pro n <10. Pro n>=10 to
funguje v poradku. Zatim to nechapu... (D7 Arch)

Ivan Virag

-----Original Message-----
From: On Behalf Of Jakub Dusek
Subject: Oracle pres ADO a typ NUMBER(3)


Zdravim,
v Oraclu mam v tabulce pole typu NUMBER(3), pokud do nej dam zapornou
hodnotu (coz typ umoznuje) a dotazu se na ni pres ADO tak mi to vrati
absolutni hodnotu toho cisla co tam je... Pres BDE to funguje ok.
Jakub Dusek


IB/FB pouziti exception

[*] Roland Turcan <rolo(zv)sedas.sk> - 16.4.2003 16:57:13

<<< 16. 4. 2003 16:52 - Pavel Malinsky "spiderland(zv)iol(tec)cz" >>>
PM> Ahoj,

PM> v databazi FB mam nadefinovanou exception,
PM> ale bylo by mi vhod, kdyby slo pri volani
PM> teto vyjimky treba v ulozene procedure ji predat
PM> nejaky jiny(nebo doplnujici) text. Je to mozne
PM> nebo text hlaseni musi byt natvrdo?

-------------------------------------------
My answer:
----------
Tato forma ako je momentalne exception v IB/FB spravene sa ani mne
nepaci. Ja si to robim tak, ze si exception pomenuvavam napr. ERR001,
ERR005,... a do textu si davam jej nazov + nejaky text aby som na prvy
pohlad na exception videl, ze k comu je to pripojene. Na klientovi
odchytim vynimku, v kotorej pomocou POS hladam text a podla toho
vypisujem hlasenie.

CREATE EXCEPTION ERR008 'ERR008 sprievodny text, ktory je len pre moju
informaciu'

if Pos('ERR008', E.Message) > 0 then
begin
ErrorMessage(2020, mtError);
Result := 2020;
end;
--
Best regards, TRoland


Literatura k FB

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.4.2003 16:40:25

Haj hou!

On 14 Apr 2003 at 19:21, J=E1n Harman wrote:

> Dotaz pro Pavla Cisare:
>
> Neslo by tu knihu predem objednat, zeby nam (kdo by chtel) ji po vydani
> zaslali na dobirku? Abychom nato nemuseli porad myslet. Navic se nevi pr=
esne
> kdy to bude.

Mno, meli by mi dat vedet az to vyjde (a poslat autorske vytisky). Takze d=
am
vedet v tehle konferenci a na nasem webu. Predpokladam, ze CP ma zasilkovo=
u
sluzbu. Pokud ne, tak se podle zajmu muzeme domluvit ze to zajemcum koupim=

a poslu na dobirku.

S pozdravem
Pavel Cisar

Navidenou na Prvni Evropske Firebird Konferenci - Kveten 2003,
Fulda, Nemecko
http://www.firebird-conference.com

Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


enum v typove knihovne

[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 16.4.2003 16:38:27

Preji hezky den.

Rad bych se zeptal jestli jde ovlivnit typ vyctoveho typu v typove knihovne.

Pokud nadeklaruju naprilad v TLB typ:

typedef enum tagTxColor
{
clBlack = 0,
...
clWhite = 16777215
} TxColor;

Tak je TxColor defacto 4bajtovy znamenkovy integer
a clBlack atd jsou vlastne konstanty.

Potreboval bych ale abych mohl ovlivnit jakeho bude TxColor typu
v mem pripade nezmenkovy integer.

Lze toho nejakym zpusobem v D5 ENT dosahnout?

Duvod je nasledujici:
mam rozhrani s property typu OLE_COLOR coz je vlastne DWORD
a chtel bych ji zmenit na vyctovy typ TxColor ktery je ale vlastne Integer.

Vlastni problem je v tom ze nas program umoznuje vykonavani VBScriptu
a pokud uzivatel v drivejsi verzi pouzil
XY.Color = 2147483663 ' (hex: 8000000F)
nastavila se barva clBtnFace

Po zmene na TxColor to ale hodi vyjimku "preteceni"
Kdyz se to zmeni ve skriptu na
XY.Color = -2147483633 ' (hex opet: 8000000F)
tak to jede, ale pak neni nas program zpetne kompatibilni :-)

Kdybychom ale nadeklarovali vyctovy typ TxColor jako DWORD tak by to jelo...


Dekuji za rady

Tomas Bihary


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

Re[2]: Start SQL Server

[*] Vit Tichy <vitek(zv)softok(tec)cz> - 16.4.2003 16:17:05

Joha Martin,

M> Muzes mi poslat nejaky odkaz, kde bych se mohl podivat na SQL-DMO objekty.

http://www.delphi32.co.yu/preuzeti_tekstovi/exploiting_sql_server_1.htm

a hledej neco okolo: SQLDMO_TLB.pas

--
vt


Progress

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

From: "Jiri Hoffmayer" <parsys(zv)digitus(tec)cz>
> Jak zajistit, aby vsechny ostatni zrovna zobrazene formulare (a nevim,
> ktere
> to muzou v dane chvili byt) byly nepristupne i kdyz musim v prubehu volat

Zobrazit ten dialog jako modalni

> Application.ProcessMessages, kvuli tlacitku Storno?

Nemusis, pouze si tim pridelas problemy. Typicky by takovy kod mel bezet v
samostatnem threadu a hlavni thread bude jen pro GUI.

> Zkratka aby se to chovalo podobne jako modalni okno s tim rozdilem, ze po
> otevreni by aplikace mohla pokracovat ve vykonavani kodu (modalni okno mmj.
> neumoznuje aby uzivatel zavrel aplikaci pomoci praveho tlacitka na dolnim
> windowsovskem panelu, cemuz pouhe FormParent.Enabled := False nezabrani).

Tohle pak budes muset zvlast osetrit nebo naopak prepracovat logiku aplikace
tak, aby to nemuselo bezet modalne, jen se zakazaly nektere akce ktere v te
dobe nemohou byt spusteny.

> Uplne bozi by bylo, kdybych mohl nejak prinutit aplikaci zpracovavat pouze
> zpravy urcene tomu oknu s progresem a ostatek zahazovat.

Zpravy zahazovat nemuzes.

Petr Vones

Oracle pres ADO a typ NUMBER(3)

[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 16.4.2003 16:25:37

Zdravim,
v Oraclu mam v tabulce pole typu NUMBER(3), pokud do nej dam zapornou
hodnotu (coz typ umoznuje) a dotazu se na ni pres ADO tak mi to vrati
absolutni hodnotu toho cisla co tam je... Pres BDE to funguje ok.
Pripojuju se z Delphi 6 Professional. Nesetkal se nekdo s podobnym
problemem?

Jakub Dusek

------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------

Progress

[*] Delphin <delphin(zv)post(tec)cz> - 16.4.2003 16:05:25

> Jak zajistit, aby vsechny ostatni zrovna zobrazene formulare (a nevim,
> ktere
> to muzou v dane chvili byt) byly nepristupne i kdyz musim v prubehu volat
> Application.ProcessMessages, kvuli tlacitku Storno?

pomoci screen.FormCount a screen.Forms nastavit u ostatnich oken Enabled na
false.

Progress

[*] Jiri Hoffmayer <parsys(zv)digitus(tec)cz> - 16.4.2003 15:57:42

Dobry den vsem,
potreboval bych poradit s malickosti,

v jakemkoli okamziku v me aplikaci se muze spustit jedna z procedur s touto
strukturou:

OpenMyProgress; //otevre formular s TGauge a tlacitkem Storno
Do
Delej neco;
Obnovuj progress a kontroluj zda uzivatel nestisl Storno (vola
Application.ProcessMessages);
Loop;
CloseMyProgress;

Jak zajistit, aby vsechny ostatni zrovna zobrazene formulare (a nevim,
ktere
to muzou v dane chvili byt) byly nepristupne i kdyz musim v prubehu volat
Application.ProcessMessages, kvuli tlacitku Storno?

Zkratka aby se to chovalo podobne jako modalni okno s tim rozdilem, ze po
otevreni by aplikace mohla pokracovat ve vykonavani kodu (modalni okno mmj.
neumoznuje aby uzivatel zavrel aplikaci pomoci praveho tlacitka na dolnim
windowsovskem panelu, cemuz pouhe FormParent.Enabled := False nezabrani).

Uplne bozi by bylo, kdybych mohl nejak prinutit aplikaci zpracovavat pouze
zpravy urcene tomu oknu s progresem a ostatek zahazovat.

Dekuji za radu
Jirka

IB/FB pouziti exception

[*] Pavel Malinsky <spiderland(zv)iol(tec)cz> - 16.4.2003 15:47:14

Ahoj,

v databazi FB mam nadefinovanou exception,
ale bylo by mi vhod, kdyby slo pri volani
teto vyjimky treba v ulozene procedure ji predat
nejaky jiny(nebo doplnujici) text. Je to mozne
nebo text hlaseni musi byt natvrdo?

S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
=====================================
GSM: 602 652 203


Soubor BMP

[*] Pavel Gazda <pavel_gazda(zv)dataint(tec)cz> - 16.4.2003 15:41:07

> Potrebuji soubor *.bmp na disku prevest do formatu TXT tak ze jednotlive
> byty budou v HEX formatu.

Tak to udelej. :)

Vezmi byte, preved na hex, ... a znova.


Pavel
placeny amater


Cteni REG_MULTI_SZ polozky z registru

[*] Ale� Va���ek�����"q��y�&���w�3 - 16.4.2003 15:35:18

Kdyby to nekoho zajimalo, reseni je zde:
http://www.swissdelphicenter.ch/torry/showcode.php?id=3D1431

Ales

> -----Original Message-----
> From: Ale=B9 Va=B9=ED=E8ek=20
>=20
> Ahoj,
>=20
> potrebuju precist urcitou polozku z registru, ktera je typu=20
> REG_MULTI_SZ (podle regedit.exe), ovsem program mi pada na=20
> hlasce "Invalid data type for 'InstalledInstances'" v unite=20
> Registry a fce ReadString. Kdyz si necham vratit typ polozky=20
> pomoci GetDataType dostanu rdUnknown. Znamena to tedy, ze=20
> pomoci delphi tuto polozku neprectu?
> D5Pro SP2.

ADMIN: OT: Co je s mailom?

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.4.2003 15:25:48

Puvodni zprava ze dne 16.4.2003:

> ahojte
> neviem ci mam len ja taky problem, ale z konfery mi chodia maily so
> skoro 2 hodinovym zdrzanim. v hlavicke mailu je:

> co to ten server ananke(tec)czechia.com drzi tie maily tak dlho???

> mate aj vy take problemy?

> Peter

> ps. chodia mi najprv odpovede a potom otazky...

NAPOMENUTI ADMINISTRATORA - TOHLE TU NEMA CO DELAT, PROBLEMY SI
DISKUTUJ SE SVYM POSKYTOVATELEM NEBO SE MNOU.

Petr Zahradnik, pocitacovy expert

==========================================================
Petr Zahradnik, Computer Laboratory


web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz

==========================================================

Cteni REG_MULTI_SZ polozky z registru

[*] Ale� Va���ek�����"q��y�&���w�3 - 16.4.2003 15:14:07

Ahoj,

potrebuju precist urcitou polozku z registru, ktera je typu REG_MULTI_SZ =
(podle regedit.exe), ovsem program mi pada na hlasce "Invalid data type =
for 'InstalledInstances'" v unite Registry a fce ReadString. Kdyz si =
necham vratit typ polozky pomoci GetDataType dostanu rdUnknown. Znamena =
to tedy, ze pomoci delphi tuto polozku neprectu?
D5Pro SP2.

procedure TForm1.Button1Click(Sender: TObject);
var R : TRegistry;
begin
R :=3D TRegistry.Create(KEY_READ);
try
try
R.RootKey :=3D HKEY_LOCAL_MACHINE;

if R.OpenKey('Software\Microsoft\Microsoft SQL Server\', False) =
then
begin
ShowMessage(R.ReadString('InstalledInstances'));
R.CloseKey;
end;
except
on E : Exception
do ShowMessage(E.Message);
end;
finally
R.Free;
end;
end;

Ales

Soubor BMP

[*] Peter Surovy <psurovy(zv)uevora.pt> - 16.4.2003 14:24:44

Ahoj
----- Original Message -----
From: "Ing. Jan Dubsk� - Stroj�rna P�lava" <dubsky(zv)s-palava(tec)cz>
Sent: Wednesday, April 16, 2003 2:02 PM
> potrebuji vedet, v jakem formatu je puvodni zdroj - tedy bin, dec, hex

-- tie data su bud "0" alebo "1" :-)
mozes ich citat po urcitych usekoch napr po WORD- och a podobne
ale to musis vediet ako su tam ulozene(t.j.kolko bitov je rezervovanych na 1
hodnotu
R alebo G alebo B) to totiz zavisi od farebnej
hlbky .. no a toto info najdes v hlavicke bmp
ak mas microsoft SDK tam je podrobny popis
ak nie :

"bV5BitCount" 2bytova(WORD) hodnota ulozena na offsete 28 bytov od
zaciatku filu .. malo by to byt asi vsade rovnake ale je lepsie si to
skontrolovat
v tom SDK .

PS

Soubor BMP

[*] Ing. Jan Dubsk� - Stroj�rna P�lava <dubsky(zv)s-palava(tec)cz> - 16.4.2003 15:02:10

Potrebuji soubor *.bmp na disku prevest do formatu TXT tak ze jednotlive
byty budou v HEX formatu. Abych ale mohl provest tuto konverzi,
potrebuji vedet, v jakem formatu je puvodni zdroj - tedy bin, dec, hex
nebo jak. Jak to tedy provest. Nacitat ze souboru *.bmp data jako word,
dword nebo n=ECco jineho, abych to pak prevedl.

Dik za radu

Spustit aplikaci jen jednou

[*] Peter Turcan <peter.turcan(zv)centrum.sk> - 16.4.2003 14:09:38

Ahoj Rumcajs-konfera,

Dnes, (16. apr�l 2003, 11:42:13), si vypustil :

Rk> jak se da udelat, aby nebylo mozne aplikaci spustit vicekrat jak jednou...

na torry.net su na to komponenty...
a aj inde.

robi sa to cez muttexy, je to (asi) najspolahlivejsie.
Peter

Start SQL Server

[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 16.4.2003 14:34:54

| Podivej se na SQL-DMO objekty. Pomoci nich jde kompletne ovladat SQL
server.
|
| Ales

Muzes mi poslat nejaky odkaz, kde bych se mohl podivat na SQL-DMO objekty.
Diky Martin

OT: Co je s mailom?

[*] Peter Turcan <peter.turcan(zv)centrum.sk> - 16.4.2003 14:23:21

ahojte
neviem ci mam len ja taky problem, ale z konfery mi chodia maily so
skoro 2 hodinovym zdrzanim. v hlavicke mailu je:

>From delphi-l-owner(zv)clexpert(tec)cz Wed Apr 16 14:15:19 2003
Received: from ananke(tec)czechia.com ([62.168.63.232]:47621 "EHLO clexpert(tec)cz")
by mail.centrum.sk with ESMTP id <S742891AbTDPMPB> convert rfc822-to-8bit;
Wed, 16 Apr 2003 14:15:01 +0200
Received: from clexpert(tec)cz [212.80.88.217] by ananke(tec)czechia.com with ESMTP
(SMTPD32-7.07) id A01140132; Wed, 16 Apr 2003 12:27:29 +0200
Received: from Spooler by clexpert(tec)cz (Mercury/32 v3.32) ID MO00025D;
16 Apr 03 12:27:29 +0200
Received: from spooler by clexpert(tec)cz (Mercury/32 v3.32); 16 Apr 03 12:27:13 +0200

co to ten server ananke(tec)czechia.com drzi tie maily tak dlho???

mate aj vy take problemy?

Peter

ps. chodia mi najprv odpovede a potom otazky...

Re[2]: Form feed/load/park/ tiskarny

[*] Vladimir Nikel <vladimir.nikel(zv)post(tec)cz> - 16.4.2003 14:05:46

jeste upresnim: graficky rezim potrebuju. esc sekvence k tiskarne mam,
potrebuju je jenom nejak pouzit s pri tisku pres tprinter objekt.

VN.
<==============Original message text===============

>Ahoj,
>pouzi RawPrint (tlaci v textovom rezime a mozes pouzit esc sekvencie) najdes
>to na DSP.
>Lauko.


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