Archív konference Delphi

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

Synapse

[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 15.1.2005 18:18:41

Jestli to chapu spravne, tak je ten otevren jen pro cteni
(fmOpenRead), ale zapisuje se do nej vysledek HTTP requestu.

Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
odesilani smsek, vizitek, log a melodii, snadna integrace do Vaseho IS
=> Sms GateKeeper, Sms GateKeeper Service

======================================================================
Saturday, January 15, 2005, 6:10:38 PM, you wrote:

IKV> Avsak skonci to na chybu --Stream write error--. Pouzivam Delphi
IKV> 7 a Synapse Release 34. Kde robim chybu ? Dakujem za pomoc

IKV> Ing. Keder Vladimir


Synapse

[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 15.1.2005 18:10:38

Ahoj

Potrebujem uploadovat subor na web a pouzil som nasledujuci kod


function HttpPostBinary(const URL: string; const Data: TStream):Boolean;
var
HTTP: THTTPSend;
begin
HTTP := THTTPSend.Create;
try
if frmMain.grpProxy.ItemIndex= 1 then
begin
HTTP.ProxyHost := frmMain.eProxyHost.Text;
HTTP.ProxyPort := frmMain.eProxyPort.Text;
end;
if frmMain.bxAutentifikacia.Checked= True then
begin
HTTP.ProxyUser := frmMain.eProxyUser.Text;
HTTP.ProxyPass := frmMain.eProxyPass.Text;
end;

HTTP.Document.CopyFrom(Data, 0);
HTTP.MimeType := 'Application/octet-stream';
Result := HTTP.HTTPMethod('POST', URL);
Data.Seek(0, soFromBeginning);
Data.CopyFrom(HTTP.Document, 0); <------------- Stream write
error
finally
HTTP.Free;
end;
end;


function TfrmMain.SendToServer(ServerFile, LocalFile: string): boolean;
var _StreamFile: TFileStream;
begin
try
_StreamFile:= TFileStream.Create(LocalFile, fmOpenRead or
fmShareDenyWrite);
result:= HttpPostBinary(ServerFile, _StreamFile);
finally
FreeAndNil(_StreamFile);
end;
end;


ServerFile= 'http://www.stranka.sk/subor.txt';
LocalFile= 'c:\subor.txt';

Avsak skonci to na chybu --Stream write error--. Pouzivam Delphi 7 a Synapse
Release 34. Kde robim chybu ? Dakujem za pomoc

Ing. Keder Vladimir


Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 15.1.2005 17:38:36

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Zahradnik
> Sent: Saturday, January 15, 2005 5:07 PM
>
> Ne o tolik? No to teda o dost rychlejsi. ... ale predtim jsem mel PIII 450

> MHz a bylo to tedy dost znatelne.

A muzes mi rict, v jake verzi .NET to pises? Mam vedle stejnou sunku jako
ty, dal jsem tam WinForm aplikaci napsanou v .NET 1.1 a slape slusne.
Natolik slusne, ze me ani nenapadlo se zabyvat rozdilem rychlosti oproti
VCL. Rozdil byl patrny ve verzi 1.0, ale 1.1 je uz dost slusna, v prevazne
vetsine pripadu. Mozna bude rozdil v RAMeti, na te sunce mam 256 MB.

> > Aha, takze mas pro Delphi k dispozici nastroj pro
> generovani potomka
> > DataSetu ...
>
> Ja se bez toho v Delphi dokazu obejit a dokazi bez toho
> udelat funkcni projekt.

Funkcni projekt lze udelat i ve FoxPro, to neni argument. Ja to take dokazu
udelat v Delphi, ale po tom, co jsem _dostatecne_ poznal moznosti a nastroje
ve VS + .NET, uz to NECHCI!!! delat v Delphi, ani za zlate prase. Chapes ten
rozdil? :-)))

> > Osobne povazuji za velkou chybu, kdyz nekdo prenasi svoje
> zvyky prace
> > s databazi z Delphi do .NET. Sice to jde, ale neni to spravne.
>
> Database design na SQL Serveru musi byt zcela nezavisly na
> aplikaci, ktera s nim pracuje.

To je snad jasne. Presto komfort prace s daty na urovni GUI je v .NET
nejmene o tridu lepsi nez ve VCL. Spis bych rekl tak o tridy tri...

> Jiste a potrebujes tam mit rozjezdovou drahu...

Ne, staci mi jen motor a ovladani k nemu.

> Vidis, ja treba tu malou aplikaci ani udrzovat nebudu muset.
> Udelam, prodam, necham tak. Nemam problem.

Jiste, drobnosti na jedno pouziti take neudrzuju. Ale aplikaci prodanou vice
zakaznikum, nebo pokud uzivatel prijde s dlasimi pozadavky, udrzovat musim.
V .NET lze napsat aplikaci tak, aby byla dobre udrzovatelna, snaze nez v
Delphi.

> > Prijed se nekdy podivat na skoleni .NET (treba ti da Honza nejakou
> > zajimavou nabidku :), a popovidej si s lidmi, proc tam
> jezdi, a s cim
> > odjizdeji. Sam pak uvidis...
>
> Zbysku, Zbysku, ja jsem delal ASP.NET aplikace, kdyz ty jsi
> jeste nevedel, co to .NET vubec znamena :-) Koho myslis, ze
> ses asi ptal, kdyz jsi s tim ASP.NET sam zacinal? :-)

Ja mel za to, ze se ted bavime o WinForms aplikacich se zretelem na DB. Nebo
snad ne? Pouzivat Delphi pro webove aplikace doufam dnes uz nikoho
nenapadne...

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Delphi2005 versus Delphi7

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.2005 17:06:33

Puvodni zprava ze dne 15.1.2005:

> Hahaha, distribucni verze .NET ma 23.5 mega. Takze je to
> skousnutelne i pro toho, kdo je pripojen pres telefon.

Neni to zkousnutelne pro kazdeho a 2,5 MB vs. 23 MB = 10x tolik.

> Nebo si koupi nejaky casopis, kde je to na CD. Nebo si napise o CD
> Microsoftu. Nebo ....

... nebo se na to vykasle a pouzije jiny programek, ktery je maly a
nepotrebuje stahovat 23 MB z internetu nebo kupovat casopisy... a
hlavne to pak na jeho Pentiu 166 MHz bude rychlejsi...

> V Delphi je to sice o neco rychlejsi, ale ne o tolik, ze by se to
> dalo postavit jako rozhodujici kriterium.

Ne o tolik? No to teda o dost rychlejsi. Jiste, ze na svem P4 3 GHz mi
to pripada podobne, ale predtim jsem mel PIII 450 MHz a bylo to tedy
dost znatelne. A nerikej mi, ze kazdy ma P4/3GHz/1GB RAM jako ja ted.

> A hezci? Hezke je to stejne, protoze vespod bezi stejne jadro,
> zalezi jen na dostupnosti prislusnych komponent.

A ta dostupnost pro .NET proste neni. Existuji pouze dva velke baliky
vizualnich komponent (Component One a Infragistic) za opravdu velmi
nerozumne penize s prihlednutim k jejich kvalite. Navic bez zdrojovych
kodu, coz je znacna nevyhoda. Zpetna dekompilace neni idealnim
resenim. Pak jsou komponenty typu Developer Express, ktere by byly na
lepsi urovni, ovsem zase jsou to jen fragmenty, stale ne kompletni
sada, a navic nejsou k dispozici pro vsechny cilove platformy
(WinForms, ASP.NET, CF.NET).

> V .NET WinForms mohu udelat naprosto stejne GUID jako ve VCL.
> Dokonce i komponent je uz k dispozici dost.

To nemas pravdu.

> Aha, takze mas pro Delphi k dispozici nastroj pro generovani potomka
> DataSetu na zaklade vizualniho navrhu datove struktury, ktery ti
> umozni zadat i indexy a referencni vazby, tento DataSet pak napojis
> na grid a editacni komponenty? Ktery ti umozni snadne prelevani dat
> mezi DB a tim DataSetem? Pokud tohle nemas, pak ti neco
> _podstatneho_ z .NET uniklo.

Ja se bez toho v Delphi dokazu obejit a dokazi bez toho udelat funkcni
projekt.

> Osobne povazuji za velkou chybu, kdyz nekdo prenasi svoje zvyky
> prace s databazi z Delphi do .NET. Sice to jde, ale neni to spravne.

Database design na SQL Serveru musi byt zcela nezavisly na aplikaci,
ktera s nim pracuje. At jiz je psana v Delphi nebo .NET nebo CF.NET
nebo s ni pracujes pres konzolu SQL...

> Ja si myslim, ze kdyz znas problem a Delphi a .NET, ze dokazes
> predem rict, v cem je to lepsi.

Ale ne generalne bez znalosti problemu.

> Ano, kladka, to je ono. Trakar kladku nema. K Trabantu pripevnim
> spagat, a ty cihly si vytahnu. A je to. :) Stejne je to mezi Delphi
> a .NET - Delphi nema tu zatracenou kladku. Proto novy domek stavim
> zasadne s Trabantem.

Jiste a potrebujes tam mit rozjezdovou drahu, abys mohl jezdit sem a
tam, potrebujes pomocnika, protoze sam bys nevedel, kdy uz zastavit
nebo ti ten barak spadne na hlavu, a jeste ti bude trabant porad
smrdet pod nos, jak s nim budes porad pendlovat sem a tam. Ja si
koupim tu kladku bez trabanta a nebo to tam hodim trakarem...

> Ja je sice potrebuju psat ted, ale za dva roky je budu muset
> udrzovat a pripadne dal rozvijet. Proto ten horizont presahujici
> umolousany dnesek.

Vidis, ja treba tu malou aplikaci ani udrzovat nebudu muset. Udelam,
prodam, necham tak. Nemam problem.

> .NET ten potencial ma. U Lokalizatoru to treba videt neni, ale u
> Dochazky uz ano.

Nikdo nerika, ze nema potencial. Ale proc ho pouzivat tam, kde je
horsi?

> Hehe. Prvni verzi Dochazky jsem psal v D1, a pouzil jsem licenci k
> sireni Interbase. Super. Pak v D2 tuto licenci Borland odrizl (tohle
> jim do smrti nezapomenu), a ja jsem ZURIL, protoze jsem muse program
> downgradovat na Paradox. Jenze tato situace v pripade .NET tu dnes
> uz neni.

Takze jsi ji predelaval z D1 do D2 a pak do SQL a ted do .NET. Zacinal
jsi 4x a proc by tedy nekdo nemohl zdimat DOS zakazniky a pak zacit
rovnou na D3 a zdimat zakazniky a pak zacit na .NET 2 treba? Neni
dulezite, co pouzivas, ale jestli to vydelava. Proto to delas.

> Prijed se nekdy podivat na skoleni .NET (treba ti da Honza nejakou
> zajimavou nabidku :), a popovidej si s lidmi, proc tam jezdi, a s
> cim odjizdeji. Sam pak uvidis...

Zbysku, Zbysku, ja jsem delal ASP.NET aplikace, kdyz ty jsi jeste
nevedel, co to .NET vubec znamena :-) Koho myslis, ze ses asi ptal,
kdyz jsi s tim ASP.NET sam zacinal? :-)

> Jisteze .NET neni lek na vsechno. Vtip je ale v tom, ze .NET prave
> dobre pokryva tu tridu aplikaci, pro ktere je ve Win32 Delphi
> nejlepsi.

To neni tak docela pravda. Spoustu veci v .NET (zatim?) neudelas.

> Nebudu, protoze k Trabantu lze privazat snuru.

To je pravda, to lze privazat i k oslovi :-) Ale nevidel jsem na
stavbach osly ani trabanty :-)

Petr Zahradnik, pocitacovy expert

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


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

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

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 15.1.2005 16:28:30

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Zahradnik
> Sent: Saturday, January 15, 2005 1:48 PM
>
> Windows XP nemaji vsichni. Trapny programek v Delphi ma
> klidne 2,5 mega, ale porad lepe se to stahne nez .NET
> Framework, pricemz desktop aplikace v Delphi je rychlejsi a hezci.

Hahaha, distribucni verze .NET ma 23.5 mega. Takze je to skousnutelne i pro
toho, kdo je pripojen pres telefon. Nebo si koupi nejaky casopis, kde je to
na CD. Nebo si napise o CD Microsoftu. Nebo ....

http://www.microsoft.com/downloads/details.aspx?FamilyID=262d25e3-f589-4842-
8157-034d1e7cf3a3&displaylang=cs

V Delphi je to sice o neco rychlejsi, ale ne o tolik, ze by se to dalo
postavit jako rozhodujici kriterium. A hezci? Hezke je to stejne, protoze
vespod bezi stejne jadro, zalezi jen na dostupnosti prislusnych komponent.

> Vetsina beznych destop aplikaci je silne zavisla na
> vizualnich komponentach. Jednoduse proto, ze GUI je vetsina
> bezne aplikace. Kdyz nejvetsim problemem .NET jsou prave
> nedostatky GUI, pak je to zcela zasadni. Troufam si rici, ze
> bezna desktop aplikace stoji a pada s GUI.

V .NET WinForms mohu udelat naprosto stejne GUID jako ve VCL. Dokonce i
komponent je uz k dispozici dost.

> Ja nemam problem napsat v Delphi databazovou aplikaci.

Ja uz ano. :) Duvody pisu jinde.

> Databazova logika je stejne v SQL Serveru, takze desktop je
> opet jen GUI. A GUI lepe udelam v Delphi, protoze mam lepsi
> komponenty nez pro .NET.

Aha, takze mas pro Delphi k dispozici nastroj pro generovani potomka
DataSetu na zaklade vizualniho navrhu datove struktury, ktery ti umozni
zadat i indexy a referencni vazby, tento DataSet pak napojis na grid a
editacni komponenty? Ktery ti umozni snadne prelevani dat mezi DB a tim
DataSetem? Pokud tohle nemas, pak ti neco _podstatneho_ z .NET uniklo.

> A nemam problem s tim, ze kdykoliv si vzpomenu, prevedu
> databazovou aplikaci z Delphi pod .NET, protoze databazova
> logika v SQL Serveru zustane ta stejna a zmenim jen to GUI...
> az prijde den, kdy mi to pripadne lepsi. Nemam ani problem
> mit nad stejnymi daty desktop klienta v Delphi a zaroven pod
> .NET weboveho klienta nebo treba windows service ci webservice...

Osobne povazuji za velkou chybu, kdyz nekdo prenasi svoje zvyky prace s
databazi z Delphi do .NET. Sice to jde, ale neni to spravne.

> Jasne. A muj nazor je ten, ze nic neni cerne nebo bile, nikdy
> neni predem jasne, ze bude lepsi Delphi a nebo .NET.

Ja si myslim, ze kdyz znas problem a Delphi a .NET, ze dokazes predem rict,
v cem je to lepsi.

> No trosku jsi to prirovnani prekroutil. Vis, ty jsi stale
> jezdil jen po dvorku, protoze nejsi mezinarodni preprava,

Jestlize budu mezinarodni preprava, pak nebudu uvazovat v intencich trakar -
Trabant.

> ale
> stavis si treba domecek, garaz nebo kadibudku. Ted jde o to,
> ze tim trabantem muzes jezdit od plotu ke stavbe a nebo si
> neco privezt i kousek dal s mensim usilim. Jenze jaksi na
> vyvezeni cihel do patra po drevenem mustku tim trabantem asi
> nevyjedes. Tam ti bude trabant uplne naprd a muze to byt
> klidne DELUXE provedeni se vstrikovacim motorem a klimatizaci
> :-) Je ti uplne jedno, jakou ma akceleraci, protoze budes
> potrebovat ten trakarek nebo kolecko. A nebo zjistis, ze
> oboji je uplne na nic a potrebujes spis kladku.

Ano, kladka, to je ono. Trakar kladku nema. K Trabantu pripevnim spagat, a
ty cihly si vytahnu. A je to. :) Stejne je to mezi Delphi a .NET - Delphi
nema tu zatracenou kladku. Proto novy domek stavim zasadne s Trabantem.

> > Dany moment je pro me nejmene horizont jednoho roku smerem do
> > budoucnosti, ale spis vice.
>
> No tim spise - ja potrebuji psat aplikace ted a ne za dva roky.

Ja je sice potrebuju psat ted, ale za dva roky je budu muset udrzovat a
pripadne dal rozvijet. Proto ten horizont presahujici umolousany dnesek.

> Jenze to neni vubec o tom, co je zrovna v rozmachu. Je to o
> tom, co je na trhu prodejne. Nema zadny smysl jit do novych
> technologii jen proto, ze jsou nove. Musi to vzdy mit nejaky
> uzitek a musi se to zaplatit.

.NET ten potencial ma. U Lokalizatoru to treba videt neni, ale u Dochazky uz
ano.

> Kdyz ty jsi mi rekl tenhle pribeh, tak ja ti take reknu jeden
> pribeh z doby, kdy jeste windows snad ani nebyly v plnem
> rozmachu :-) Tenkrat jeden mistni podnikatel zakladal
> prodejnu a protoze mel dost penez a chtel to mit suprove, tak
> nasadil carove kody. Investoval penize do super skladoveho a
> pokladniho systemu, vsechno jelo na pocitace a carove kody.
> Byl tady uplne prvni, kdo to mel, opravdu super novinka.
> No a jak myslis, ze to dopadlo? Po nekolika mesicich se
> umlatil sam sebou. ...

Hehe. Prvni verzi Dochazky jsem psal v D1, a pouzil jsem licenci k sireni
Interbase. Super. Pak v D2 tuto licenci Borland odrizl (tohle jim do smrti
nezapomenu), a ja jsem ZURIL, protoze jsem muse program downgradovat na
Paradox. Jenze tato situace v pripade .NET tu dnes uz neni.

Prijed se nekdy podivat na skoleni .NET (treba ti da Honza nejakou zajimavou
nabidku :), a popovidej si s lidmi, proc tam jezdi, a s cim odjizdeji. Sam
pak uvidis...

> A o tom to cele je. Zpatky k .NET - ja sam .NET propaguji
> velmi mnoho a ty to dobre vis. Ovsem stale tvrdim, ze .NET
> neni lek na vsechno a nema smysl protlacovat ho za kazdou
> cenu tam, kde je v soucasne dobe lepsi pouzit Delphi.

Jisteze .NET neni lek na vsechno. Vtip je ale v tom, ze .NET prave dobre
pokryva tu tridu aplikaci, pro ktere je ve Win32 Delphi nejlepsi.

> Navic software typu dochazka se nevyviji 10 let.
> Kdyz znas problematiku, napises to za cloveko mesice
> kompletne.

Nenapises, ale to je fuk.

> Jenze s trakarem vyjedes i do patra, ale pro trabant na to
> potrebujes jeste vytah za dva miliony, takze trabanta nechas
> dole a budes nosit cihly na zadech a nadavat,

Nebudu, protoze k Trabantu lze privazat snuru.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

V cem zacit psat DB aplikaci WAS: Delphi2005 versu

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.2005 15:50:27

Puvodni zprava ze dne 15.1.2005:

> zrovna se chystame programovat docela velkou DB aplikaci a stojime
> pred rozhodnutim jakou platformu pro vyvoj zvolit.

Pokud je to "docela velka DB aplikace", pak tam bude zcela jiste
nejaky rozumny SQL Server, tj. predpokladam MS SQL Server. Takze
nejprve navrhnete poradne tu databazi jako takovou, tj. udelejte
kvalitni database design, vse ulozene procedury, triggery, proste
veskera prace s daty v SQL Serveru.

Pak je zcela jedno, v cem udelas front end. A zrovna tak rychle ho
zmenis. A ziskas tim dostatek casu na rozhodnuti a na nauceni .NET.
Proste zacni tim database designem.

Petr Zahradnik, pocitacovy expert

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


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

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

V cem zacit psat DB aplikaci WAS: Delphi2005 versu

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 15.1.2005 15:34:24

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Ales
> Sent: Saturday, January 15, 2005 12:28 PM
>
> zrovna se chystame programovat docela velkou DB aplikaci a
> stojime pred rozhodnutim jakou platformu pro vyvoj zvolit.
> Nemame velke zkusenosti s .NETem a tak se zatim vice
> priklanime pro delphi... Ale jak to tady tak ctu, tak nevim
> nevim... Melo by jit o klasickou Win32 nebo WinForms aplikaci.
> Muzes mi Zbysku prozradit, jak dlouho ti trvalo, nez jsi do
> .NET frameworku proniknul natolik, ze pro tebe neni problem
> sednout a napsat aplikaci stejne rychle jako v delphi (resp.
> uz nepremyslis jak to v .NETu udelas, ale proste sednes a
> napises to, protoze uz mas zazite nove postupy?). Mam totiz
> obavu z toho, ze nez budeme schopni zacit psat kvalitni kod
> pod .NETem, ubehne spousta casu, ktery kdybysme vyuzili pro
> programovani aplikace v delphi, budem ji mit pomalu napsanou...

Hehe. Nez jsem se naucil efektivne pracovat v .NET, trvalo mi to nekolik
mesicu (cca 9? :). Jenze to jsem se ucil sam, delal jsem spoustu chyb, zadne
rozumne skoleni v te dobe tu jeste dohromady nebylo. Na skoleni se sice
nenaucis programovat perfektne hned, ale slusne skoleni te postrci tak, ze
muzes usetrit az nekolik tydnu az mesicu tapani.

Dnes, ze zpetneho pohledu, bych uz DB aplikaci v Delphi NEZACINAL ani
omylem, a to i kdyby se jednalo o nejakou drobotinu na tyden prace. Proste z
principu, v .NET je prace s daty na zcela jine kvalitativni urovni. Ovsem
nikoliv v Delphi .NET, tam je to stale bes a utrpeni, ale ve Visual Studiu
(ktere take neni dokonale, ale co uz...). Nevim, kolik se zmenilo v D2005
proti D8, ale na tohle bych proste uz nesazel, D8 je dle meho totalni
propadak, zejmena co se tyka prace s db. Ruce pryc od toho. Seznam se s tim,
co nabizi VS, porovnej si to s D2005, a pak si vyber. Pokud snad pujdes na
skoleni, pak vetsinou uvidis VS (krome Borlandu).

Vzhledem k tomu, ze .NET te patrne stejne jednou nemine, neni o cem
premyslet. Je lepsi odbyt si to martyrium prechodu ted nez pozdeji, si
myslim. Dnes je pro me daleko horsi napsat db aplikaci v Delphi, protoze tam
musim resit a obchazet problemy, ktere jsou v .NET vyresene velice
elegantne.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

V cem zacit psat DB aplikaci WAS: Delphi2005 versu

[*] Winsoft <winsoft(zv)netkosice.sk> - 15.1.2005 15:32:23

> zrovna se chystame programovat docela velkou DB aplikaci a stojime pred
> rozhodnutim jakou platformu pro vyvoj zvolit. Nemame velke zkusenosti s
> .NETem a tak se zatim vice priklanime pro delphi... Ale jak to tady tak
ctu,
> tak nevim nevim... Melo by jit o klasickou Win32 nebo WinForms aplikaci.
> Muzes mi Zbysku prozradit, jak dlouho ti trvalo, nez jsi do .NET
frameworku
> proniknul natolik, ze pro tebe neni problem sednout a napsat aplikaci
stejne
> rychle jako v delphi (resp. uz nepremyslis jak to v .NETu udelas, ale
proste
> sednes a napises to, protoze uz mas zazite nove postupy?). Mam totiz obavu
z
> toho, ze nez budeme schopni zacit psat kvalitni kod pod .NETem, ubehne
> spousta casu, ktery kdybysme vyuzili pro programovani aplikace v delphi,
> budem ji mit pomalu napsanou...

u velkej DB aplikacie by som jednoznacne uprednostnil .NET.
Investicie potrebne pre prechod na tuto platformu sa u vecsich
projektoch urcite vratia. Je spusta veci, ktore Delphi a Win32
jednoducho nezvladaju. Typicky priklad su web aplikacie/sluzby
a programovanie mobilnych zariadeni. Tam sa uz dnes .NET
jednoznacne presadilo. Dalsia verzia .NET, ktora bude hotova
tento rok, ma podstatne prepracovane GUI (a aj spustu inych
vyznamnych vylepseni, napr. genericke typy) a preto bude
IMHO prelomova aj v oblasti klasickych desktop programov.

Erik


Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 15.1.2005 15:18:21

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jan Sebelik
> Sent: Saturday, January 15, 2005 11:18 AM
>
> To Petrovo prirovnani bylo myslim lepsi, Zbysku.
> Mezi Delphi (Win32) a .NET je rozdil zasadne kvalitativni.

To ano. Ale pokud se mluvi o Win32 v souvislosti s Delphi, pak se vlastne
mluvi o VCL, a hned jsme na jine urovni. ;)

> Neni to o vetsim nakladnim prostoru, je to o kvalitativne
> novem pristupu nejen k aplikacnimu programovani, ale tahne se
> to uz od operacniho systemu.
> Snad opravnene upozornuji, ze se tento prechod da porovnat s
> prechodem DOS => Win.

Z Win32 ano. Ale take rikam, ze delphista je dobre pripraven na prechod do
.NET, prave diky VCL.

> Ziskas jeste vice:
> Az tady bude .NET naplno (jako po DOS prisly postupne naplno
> Windows, jako prisel spolu s tim taky novy HW), tak ty budes
> uz natolik napred, ze muzes konkurenci taky uplne
> prevalcovat. Stejne jako byla prevalcovana spousta "FOX"
> firem pri prechodu do Windows.

Samozrejme. To souvisi take s tim, ze kdyz se budu "zdrzovat" psanim
"drobnosti" v Delphi, bude mi trvat dele, nez plne vstrebam/naucim se .NET.
Takze to resim tak, ze se plne soustredim na .NET, a nemrham silami na ulohy
v Delphi, krome nutne udrzby starych aplikaci. Proste nove veci zasadne
delam v .NET, a nove ulohy pro Win32 uz neberu.

> Taky to byl tenkrat nejvetsi "boom" skoleni Delphi, kdyz
> videli, ze jim zacina teci do bot. Foxkari tvorili v letech
> 1997/1998 mozna 80% ucastniku. Dneska zacina "boom" skoleni .NET.

Ja myslim, ze od verze 2 uz by melo byt dostatecne jasne, ze zacinat nove
vetsi veci pro Win32 je brzda. A verze 2 klepe na dvere. ;)

> To svedci o tom, ze situace z 90. let (DOS => Win) se opravdu opakuje.

Urcite. Navic je treba vzit v uvahu to, ze WinForms jsou jen docasna a
prechodna zalezitost. Jenze, nekdo si muze rict, ze kdyz je to stejne jen
prechodne, proc nezustat u VCL? Odpoved je myslim jednoducha - klicove je
dobre zvladnuti .NET architektury. A to se bez programovani v nem neda.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

V cem zacit psat DB aplikaci WAS: Delphi2005 versu

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 15.1.2005 15:16:21

Ales wrote:

> ubehne spousta casu, ktery kdybysme vyuzili pro programovani aplikace
> v delphi, budem ji mit pomalu napsanou...

A ocekavas, ze pri pristim/prepristim/atd... projektu tomu bude jinak?

pf


Instalator pro Kylix

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.2005 15:12:20

Puvodni zprava ze dne 15.1.2005:

> Zdravim Vsechny kdoz ctou tento text,
> mate nekdo nejakou zkusenost s distribuci hotoveho programu v
> kylixu, jestli treba existuje neco jako installshield, a hlavne jake
> jsou knihovny ktere musi jit se standartni aplikaci treba jen typu
> ahoj svete?

Vsak InstallShield existuje a i ve verzi Express (placene) umi
linuxove istalace.

Petr Zahradnik, pocitacovy expert

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


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

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

Instalator pro Kylix

[*] Pavel P <pavel(zv)tvsp(tec)net> - 15.1.2005 14:08:15

Zdravim Vsechny kdoz ctou tento text,
mate nekdo nejakou zkusenost s distribuci hotoveho programu v kylixu, jestli treba existuje neco jako installshield, a hlavne jake jsou knihovny ktere musi jit se standartni aplikaci treba jen typu ahoj svete?
Diky Pavel P.

Delphi2005 versus Delphi7

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.2005 13:48:11

Puvodni zprava ze dne 15.1.2005:

> Jiste, stahovat .NET kvuli jednomu trapnemu programku je opruz. Ale,
> pro XP je soucastni nejakeho SP, a jakmile to jednou mas na
> pocitaci, pak uz je to jen vyhoda. Protoze Framework nestahujes
> pokazde, kdezto aktualizace k programum ano (nebo jine programy).
> Maly trapny programek v Delphi ma kolem jednoho mega, totez v .NET
> je cca 10x mensi.

Windows XP nemaji vsichni. Trapny programek v Delphi ma klidne 2,5
mega, ale porad lepe se to stahne nez .NET Framework, pricemz desktop
aplikace v Delphi je rychlejsi a hezci.

> Ne. Mas zacit, a nez to dokoncis, bude nova verze, ve ktere dodelas
> to, co je v 1.1 problematicke. Nebo si udelas kritickou cast v
> Delphi, a zbytek v .NET, a jakmile to pujde, prepises uz jen ten
> kousek. Mam samozrejme na mysli projekty, jejich pracnost je od
> clovekoroku vyse. Na drobnostech, ktere trvaji mesic, moc nezalezi,
> protoze ty pak snadno prevedes, pokud bude treba.

Vetsina beznych destop aplikaci je silne zavisla na vizualnich
komponentach. Jednoduse proto, ze GUI je vetsina bezne aplikace. Kdyz
nejvetsim problemem .NET jsou prave nedostatky GUI, pak je to zcela
zasadni. Troufam si rici, ze bezna desktop aplikace stoji a pada s
GUI.

> Ja te take nenutim, abys psal vsechno v .NET. Ja jen uvadim
> argumenty, proc si myslim, ze az na nejake vyjimky je vhodnejsi psat
> rovnou pro .NET. Citelne se to projevi napriklad u databazovych
> aplikaci. DB aplikaci bych uz v Delphi nepsal ani za zlate prase. A
> klidne skousnu i to, ze ozelim takovou a makovou komponentu,
> pripadne i prechod na jinou databazi.

Ja nemam problem napsat v Delphi databazovou aplikaci. Databazova
logika je stejne v SQL Serveru, takze desktop je opet jen GUI. A GUI
lepe udelam v Delphi, protoze mam lepsi komponenty nez pro .NET.

A nemam problem s tim, ze kdykoliv si vzpomenu, prevedu databazovou
aplikaci z Delphi pod .NET, protoze databazova logika v SQL Serveru
zustane ta stejna a zmenim jen to GUI... az prijde den, kdy mi to
pripadne lepsi. Nemam ani problem mit nad stejnymi daty desktop
klienta v Delphi a zaroven pod .NET weboveho klienta nebo treba
windows service ci webservice...

>> No a o tom se bavime, ne? Ja v Delphi pisi jen Win32 aplikace.

> No to je mi jasne, psat v Delphi .NET aplikace je znamkou hlubokeho
> nepochopeni problematiky.

Vsak o .NET pod Delphi se snad nebavime.

> Ale pokud vim, tak polemizujeme o tom, zda je lepsi zacinat nove
> veci pro .NET, nebo jeste pro Win32. Muj nazor je jasny - pokud tomu
> nebrani nejaky hodne zavazny duvod, pak uz jen pro .NET.

Jasne. A muj nazor je ten, ze nic neni cerne nebo bile, nikdy neni
predem jasne, ze bude lepsi Delphi a nebo .NET. Myslim, ze se to neda
tak jednoduse rici bez znalosti konkretni aplikace a souvislosti.

>> Kdyz jsi pro prepravu materialu pouzival trakar a pak sis koupil
>> trabanta, tak to preci neznamena, ze se ten trakar uz nebude nikdy
>> hodit. Jeste ho v pohode vyuzijes.

> Jiste, s trakarem budu jezdit uz jen po dvorku. :) Jenze zde neni
> rozdil jako mezi trakarem a Trabantem, v obou prostredich udelas
> totez, pokud pomineme ty oblasti, ktere dosud nejsou v .NET
> podporovane (oproti Win32). V Delphi mas nad Win32 objektovou
> nadstavbu VCL. .NET je vlastne totez, jen je to lepe promyslene a
> udelane. Takze rozdil je spis v tom, ze kdysi sis koupil Trabanta,
> pak si koupis novy model Trabanta turbo de Luxe s vetsim nakladnim
> prostorem, lepsi akceleraci a snadnejsi udrzbou. Co udelas s tim
> starym? ;)

No trosku jsi to prirovnani prekroutil. Vis, ty jsi stale jezdil jen
po dvorku, protoze nejsi mezinarodni preprava, ale stavis si treba
domecek, garaz nebo kadibudku. Ted jde o to, ze tim trabantem muzes
jezdit od plotu ke stavbe a nebo si neco privezt i kousek dal s mensim
usilim. Jenze jaksi na vyvezeni cihel do patra po drevenem mustku tim
trabantem asi nevyjedes. Tam ti bude trabant uplne naprd a muze to byt
klidne DELUXE provedeni se vstrikovacim motorem a klimatizaci :-) Je
ti uplne jedno, jakou ma akceleraci, protoze budes potrebovat ten
trakarek nebo kolecko. A nebo zjistis, ze oboji je uplne na nic a
potrebujes spis kladku.

Takze proc jsem dal ono prirovnani? Jsou nastroje, ktere se daji
pouzit na stejnou praci, ovsem neda se rici, ze jeden nastroj je na
vsechno lepsi. Kamionem taky nebudes (snad) vozit tri basy piv pro
svuj stanek nebo party, byt ma vetsi nakladni prostor nez maly
nakladacek :-)

> Dany moment je pro me nejmene horizont jednoho roku smerem do
> budoucnosti, ale spis vice.

No tim spise - ja potrebuji psat aplikace ted a ne za dva roky.

> Tohle mi pripomina, kdyz jsme kdysi na Invexu obchazeli konkurenty s
> Dochazkami. Zatimco Windows uz byly v plnem rozmachu, nektere firmy
> to stale smudlaly v dosove foxce, a jejich zastupci argumetovali
> stejne jako ty. Meli foxku zmaknutou, nakoupene hafo drahych
> komponent :-))), atp.

Jenze to neni vubec o tom, co je zrovna v rozmachu. Je to o tom, co je
na trhu prodejne. Nema zadny smysl jit do novych technologii jen
proto, ze jsou nove. Musi to vzdy mit nejaky uzitek a musi se to
zaplatit.

Kdyz ty jsi mi rekl tenhle pribeh, tak ja ti take reknu jeden pribeh z
doby, kdy jeste windows snad ani nebyly v plnem rozmachu :-) Tenkrat
jeden mistni podnikatel zakladal prodejnu a protoze mel dost penez a
chtel to mit suprove, tak nasadil carove kody. Investoval penize do
super skladoveho a pokladniho systemu, vsechno jelo na pocitace a
carove kody. Byl tady uplne prvni, kdo to mel, opravdu super novinka.
No a jak myslis, ze to dopadlo? Po nekolika mesicich se umlatil sam
sebou. Proc? Protoze zjistil, ze carovy kod ma na sobe asi 40% zbozi,
ktere v te samoobsluze prodaval. Takze u tech 60% polozek tiskl carove
kody a zenske obihaly samosku a polepovaly. Nakonec mu ty investice (a
to byly velke investice, protoze tenkrat staly pocitace haldu penez a
vse kolem caroveho kodu take haldu penez) byly na dve veci. Dnes ti to
mozna prijde usmevne, vsechno zbozi ma carovy kod, a v supermarketu
nebo hypermarketu si nedovedes predstavit, co by si asi pocali bez
caroveho kodu. Zrovna tak si muzes rict: "No jo, ale je to vazne
borec, byl tu uplne prvni, kdo mel samosku na carove kody, fakt
machr." - ale taky si muzes rict, na co to asi je, ze mel carove kody,
kdyz mu praci nejen ze neulehcily, ale jeste hodne pridaly? Nehlede o
financnich nakladech na to polepovani...

Dnes bys toto mohl prirovnat v teto oblasti treba k RFID znaceni
zbozi. V kratkosti - kazda polozka je oznacena bezkoliznim RFID cipem,
ktery bezkontaktne komunikuje se ctecim zarizenim v rezimu read only
nebo read/write na urcitou vzdalenost, pricemz napajen je indukcne z
cteciho zarizeni, takze nepotrebuje baterii a je velmi maly. Jinymi
slovy, nalozis zbozi do kosiku, prijedes k pokladne a cteci zarizeni
behem okamziku prokomunikuje se vsemi cipy v kosiku a zjisti kolik
ceho tam mas, lze pracovat i s dalsimi udaji, napriklad seriova cisla,
expirace ci trvanlivost, zarucni lhuta, zbozi nakoupene v jine
prodejne, lze informace zapisovat apod. Je to nadhera. Ale vidis
nekde, ze by se to uz bezne pouzivalo? Co vim, tak snad skupina Metro
(viz ceske Makro) to chce nekde zkusebne zavest ve svych
velkoobchodech. Jenze porad je to velmi draha technologie a ty naklady
jsou znacne na ten kus zbozi. Takze se to zatim neuplatni v beznem
obchode. Dokud tim nebude zbozi vybaveno uz ve vyrobe a nebudou
naklady na cip zanedbatelne vuci cene zbozi, pak to nema smysl. Jiste,
ze to sve uplatneni nekde muze najit, ale opet si musis propocitat
kompletni naklady vcetne nakladu na provoz proti uzitku.

A o tom to cele je. Zpatky k .NET - ja sam .NET propaguji velmi mnoho
a ty to dobre vis. Ovsem stale tvrdim, ze .NET neni lek na vsechno a
nema smysl protlacovat ho za kazdou cenu tam, kde je v soucasne dobe
lepsi pouzit Delphi.

> Nekde v pozadi pripousteli, ze jednou stejne budou muset do Woken
> prejit naplno, ale zatim to od nich zakaznici kupuji, tak kam se
> hrnout. V posledni dobe se slavnostne naucili wokna a SQL databaze,
> jenze vyvoj jde dal.

Jenze to jsi preskocil deset let. Pokud tech 10 let spali, pak ted
maji pomalu smulu. Jenze oni tech 10 let spat nemuseli. Mohli se v
pohode tenkrat napakovat na DOSu (a ver tomu nebo ne, ja dodnes
prodavam ucetnictvi pod DOSem a slusne to vydelava) a vyzdimat z trhu
maximum, a treba pak vyvijet pod Windows, a muzou mit dnes slusny
system na Windows. Navic software typu dochazka se nevyviji 10 let.
Kdyz znas problematiku, napises to za cloveko mesice kompletne. Stejne
se stale meni hardwarove technologie a upravy jsou nutne i behem
provozu. Jestli vy jste vyvijeli software pro Windows pred 10 lety,
tak ted je takovy software stejne naprosto na nic, protoze se toho
tolik zmenilo, ze jste se spolu s temi DOSaky s Foxkou ocitli
minimalne jednou nebo i dvakrat v polocase na stejne startovni care.

> Pozadavky zakazniku rostou, a plnit je v Delphi uz zacinalo byt
> prilis drahe a pracne. A ze se opustenim Win32 pripravim o radu
> zakazniku? Ano, jiste. Na nejaky cas. Ale zato ziskam jine zakazniky
> sluzbami a funkcemi, ktere ve Win32 proste nejsem schopen v ramci
> urciteho casu a ceny zajistit. Proste v Trabantu de Luxe udelam s
> nakladem jen jedno kolecko, zatimco ve starem Trabantu jsem musel
> jet dvakrat.

Jenze s trakarem vyjedes i do patra, ale pro trabant na to potrebujes
jeste vytah za dva miliony, takze trabanta nechas dole a budes nosit
cihly na zadech a nadavat, ze jsi vyhodil trakar... a pokukovat po
sousedni stavbe, kde maji trakare a kladky s kyblema...

Petr Zahradnik, pocitacovy expert

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


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

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

jak upgradovat security.fdb

[*] martin <matrix(zv)inmail(tec)cz> - 15.1.2005 13:00:06

Dobry den,

ked instalujem novsiu verziu Firebirdu, prepise sa security.fdb
prazdnym s jednym uzivatelom sysdba.
Teraz to robim tak, ze si ulozim security.fdb a po instalacii novsej
verzii Firebirdu jednoducho prepisem security.fdb.

Je to spravny postup?
Nerobia sa nejake zmeny aj v samotnom security.fdb?
Existuje nejaky script ako vyexportovat uzivatelov a ich hesla a po
upgradu Firebirdu nasledne import?

Ako sa to ma robit spravne?

--
Martin
D7Pro,FB1.5.2,FibPlus

V cem zacit psat DB aplikaci WAS: Delphi2005 versu

[*] Ales <a.vasicek(zv)centrum(tec)cz> - 15.1.2005 12:28:03

Ahoj,

zrovna se chystame programovat docela velkou DB aplikaci a stojime pred
rozhodnutim jakou platformu pro vyvoj zvolit. Nemame velke zkusenosti s
.NETem a tak se zatim vice priklanime pro delphi... Ale jak to tady tak ctu,
tak nevim nevim... Melo by jit o klasickou Win32 nebo WinForms aplikaci.
Muzes mi Zbysku prozradit, jak dlouho ti trvalo, nez jsi do .NET frameworku
proniknul natolik, ze pro tebe neni problem sednout a napsat aplikaci stejne
rychle jako v delphi (resp. uz nepremyslis jak to v .NETu udelas, ale proste
sednes a napises to, protoze uz mas zazite nove postupy?). Mam totiz obavu z
toho, ze nez budeme schopni zacit psat kvalitni kod pod .NETem, ubehne
spousta casu, ktery kdybysme vyuzili pro programovani aplikace v delphi,
budem ji mit pomalu napsanou...

Ales


----- Original Message -----
From: "Zbysek Hlinka" <konference(zv)hlinka(tec)cz>
> Ja te take nenutim, abys psal vsechno v .NET. Ja jen uvadim argumenty,
> proc
> si myslim, ze az na nejake vyjimky je vhodnejsi psat rovnou pro .NET.
> Citelne se to projevi napriklad u databazovych aplikaci. DB aplikaci bych
> uz
> v Delphi nepsal ani za zlate prase. A klidne skousnu i to, ze ozelim
> takovou
> a makovou komponentu, pripadne i prechod na jinou databazi.

Delphi2005 versus Delphi7

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.1.2005 11:17:58

> Takze rozdil je spis v tom, ze kdysi sis
> koupil Trabanta, pak si koupis novy model Trabanta turbo de Luxe s vetsim
> nakladnim prostorem, lepsi akceleraci a snadnejsi udrzbou. Co udelas s tim
> starym? ;)

To Petrovo prirovnani bylo myslim lepsi, Zbysku.
Mezi Delphi (Win32) a .NET je rozdil zasadne kvalitativni.
Tedy spise trakar => Trabant, nez Trabant => Trabant deluxe
Neni to o vetsim nakladnim prostoru, je to o kvalitativne novem pristupu nejen k aplikacnimu programovani, ale tahne se to uz od operacniho systemu.
Snad opravnene upozornuji, ze se tento prechod da porovnat s prechodem DOS => Win.

> A ze se opustenim Win32 pripravim o radu zakazniku? Ano, jiste. Na nejaky
> cas. Ale zato ziskam jine zakazniky sluzbami a funkcemi, ktere ve Win32
> proste nejsem schopen v ramci urciteho casu a ceny zajistit.

Ziskas jeste vice:
Az tady bude .NET naplno (jako po DOS prisly postupne naplno Windows, jako prisel spolu s tim taky novy HW), tak ty budes uz natolik napred, ze muzes konkurenci taky uplne prevalcovat. Stejne jako byla prevalcovana spousta "FOX" firem pri prechodu do Windows.

Taky to byl tenkrat nejvetsi "boom" skoleni Delphi, kdyz videli, ze jim zacina teci do bot. Foxkari tvorili v letech 1997/1998 mozna 80% ucastniku. Dneska zacina "boom" skoleni .NET.

Nevim, jestli je pro me obchodne ucelne zverejnit nasledujici statistiku (bojim se, ze ne), ale nalijme si cisteho vina:

Pomer ucastniku skoleni .NET / Delphi od urciteho data do dneska:
od 1.6.2003 2.6
od 1.1.2004 4.0
od 1.6.2004 6.0

To svedci o tom, ze situace z 90. let (DOS => Win) se opravdu opakuje.

> Proste v
> Trabantu de Luxe udelam s nakladem jen jedno kolecko, zatimco ve starem
> Trabantu jsem musel jet dvakrat.

Prave proto to tvoje prirovnani pokulhava.
S trakarem (stejne jako s Win32) uz nebudou nektere vetsi a kvalitativne odlisne, nove ulohy resitelne vubec.

To ovsem nic nemeni na tom, ze kdyz potrebuju prevezt 20 cihel z jednoho konce dvorku na druhy, je lepsi trakar. To rika Petr a ma pravdu.

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 15.1.2005 09:59:52

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Zahradnik
> Sent: Saturday, January 15, 2005 1:21 AM
>
> Nejsou mensi, protoze musis pocitat s frameworkem, ktery neni
> na kazdem pocitaci. A stahnout desitky MB kvuli nejakemu
> trapnemu programku je pro zakaznika trochu pakarna...

Jiste, stahovat .NET kvuli jednomu trapnemu programku je opruz. Ale, pro XP
je soucastni nejakeho SP, a jakmile to jednou mas na pocitaci, pak uz je to
jen vyhoda. Protoze Framework nestahujes pokazde, kdezto aktualizace k
programum ano (nebo jine programy). Maly trapny programek v Delphi ma kolem
jednoho mega, totez v .NET je cca 10x mensi.

> Takze mam cekat a nezacinat? :-) Vtipalku :-)

Ne. Mas zacit, a nez to dokoncis, bude nova verze, ve ktere dodelas to, co
je v 1.1 problematicke. Nebo si udelas kritickou cast v Delphi, a zbytek v
.NET, a jakmile to pujde, prepises uz jen ten kousek. Mam samozrejme na
mysli projekty, jejich pracnost je od clovekoroku vyse. Na drobnostech,
ktere trvaji mesic, moc nezalezi, protoze ty pak snadno prevedes, pokud bude
treba.

> > Urcite nejaci jsou (treba ja :), ale nemyslim, ze to bude nejak
> > zasadni. A kdyz, napisu si zakladni jadro, a zbytek v .NET.
>
> A ja to klidne napisu dele v Delphi a nemam s tim problem.
> Kdyz chci neco psat v .NET, pisi to v .NET, kdyz chci neco
> psat v Delphi, pisi to v Delphi. Jsem svobodny clovek a taky
> se dokazu rozhodnout, co je pro danou aplikaci lepsi. A
> proste neni vzdy lepsi .NET.

Ja te take nenutim, abys psal vsechno v .NET. Ja jen uvadim argumenty, proc
si myslim, ze az na nejake vyjimky je vhodnejsi psat rovnou pro .NET.
Citelne se to projevi napriklad u databazovych aplikaci. DB aplikaci bych uz
v Delphi nepsal ani za zlate prase. A klidne skousnu i to, ze ozelim takovou
a makovou komponentu, pripadne i prechod na jinou databazi.

> No a o tom se bavime, ne? Ja v Delphi pisi jen Win32 aplikace.

No to je mi jasne, psat v Delphi .NET aplikace je znamkou hlubokeho
nepochopeni problematiky. Ale pokud vim, tak polemizujeme o tom, zda je
lepsi zacinat nove veci pro .NET, nebo jeste pro Win32. Muj nazor je jasny -
pokud tomu nebrani nejaky hodne zavazny duvod, pak uz jen pro .NET.

> > Ale duvody proc psat pro Win32 kvapem ubyvaji.
>
> Zadne duvody neubyvaji, je to stale stejne. Ze prisel .NET je
> parada, mam ho rad, pisi pro nej, ale rozhodne to neznamena,
> ze mazu Delphi a koncim s nim uplne. Kdyz jsi pro prepravu
> materialu pouzival trakar a pak sis koupil trabanta, tak to
> preci neznamena, ze se ten trakar uz nebude nikdy hodit.
> Jeste ho v pohode vyuzijes.

Jiste, s trakarem budu jezdit uz jen po dvorku. :) Jenze zde neni rozdil
jako mezi trakarem a Trabantem, v obou prostredich udelas totez, pokud
pomineme ty oblasti, ktere dosud nejsou v .NET podporovane (oproti Win32). V
Delphi mas nad Win32 objektovou nadstavbu VCL. .NET je vlastne totez, jen je
to lepe promyslene a udelane. Takze rozdil je spis v tom, ze kdysi sis
koupil Trabanta, pak si koupis novy model Trabanta turbo de Luxe s vetsim
nakladnim prostorem, lepsi akceleraci a snadnejsi udrzbou. Co udelas s tim
starym? ;)

> Ja se nechovam podle toho, co prave leti, ale podle toho, co
> je pro me a pro me zakazniky v dany moment nejlepsi. Mam
> stale spousty duvodu psat Win32 aplikace v Delphi.

Dany moment je pro me nejmene horizont jednoho roku smerem do budoucnosti,
ale spis vice.

> > Co si myslim o budoucnosti Win32 jsem ukazal tim, ze jsem
> uvolnil plne
> > zdrojaky k Lokalizatoru 6. ;) Tedy pro legalni uzivatele, aby se
> > nahodou nekdo zbytecne neradoval... :)
>
> Vsak jo. Napriklad TurboPower to ukazal uz o tri roky drive.
> Ale to porad neznamena, ze se vsichni budou chovat stejne :-)

Tohle mi pripomina, kdyz jsme kdysi na Invexu obchazeli konkurenty s
Dochazkami. Zatimco Windows uz byly v plnem rozmachu, nektere firmy to stale
smudlaly v dosove foxce, a jejich zastupci argumetovali stejne jako ty. Meli
foxku zmaknutou, nakoupene hafo drahych komponent :-))), atp. Nekde v pozadi
pripousteli, ze jednou stejne budou muset do Woken prejit naplno, ale zatim
to od nich zakaznici kupuji, tak kam se hrnout. V posledni dobe se
slavnostne naucili wokna a SQL databaze, jenze vyvoj jde dal. Pozadavky
zakazniku rostou, a plnit je v Delphi uz zacinalo byt prilis drahe a pracne.
A ze se opustenim Win32 pripravim o radu zakazniku? Ano, jiste. Na nejaky
cas. Ale zato ziskam jine zakazniky sluzbami a funkcemi, ktere ve Win32
proste nejsem schopen v ramci urciteho casu a ceny zajistit. Proste v
Trabantu de Luxe udelam s nakladem jen jedno kolecko, zatimco ve starem
Trabantu jsem musel jet dvakrat.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Delphi2005 versus Delphi7

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.1.2005 01:21:17

Puvodni zprava ze dne 14.1.2005:

> Pro W98- uz nevyvijim, protoze je to stejne hruza.

No kdyz udelas malou aplikaci, tak neni duvod si vymyslet, ze musis
mit W2K nebo WXP, kdyz to v pohode pobezi pod WME, W98 nebo i W95. Ja
s tim nemam problem.

> Kdo udrzuje jeste takovou sunku, stejne nema na zaplaceni.

Ne kazdy software stoji 300k. I ti, co maji W98 mivaji na zaplaceni
malych treba krabicovych aplikaci.

> A pokud se jedna o nejake stanice ve vetsi siti, pak pouziju
> ASP.NET.

No to ja taky pouziju ASP.NET klidne, ale kdyz budu delat treba
programek na tisk samolepicich etiket, tak to tezko budu delat jako
ASP.NET aplikaci a nevidim ani ten nejmensi duvod, proc by to nemohlo
jet pod W95.

> Dale, .NET programy jsou mensi nez ty z Delphi a jejich instalace je
> jednodussi - staci zkopirovat a spustit. Cili idealni pro stahovani
> z webu.

Nejsou mensi, protoze musis pocitat s frameworkem, ktery neni na
kazdem pocitaci. A stahnout desitky MB kvuli nejakemu trapnemu
programku je pro zakaznika trochu pakarna...

> Jo, GUI komponenty maji zatim proti .NET 1.1 naskok. Brzy ale bude
> verze 2, komponenty valem pribyvaji, takze duvod nezacinat nove veci
> pro Win32 je mesic od mesice silnejsi.

Takze mam cekat a nezacinat? :-) Vtipalku :-)

> U nekterych specifickych veci bych to pochopil. Ale nejdrive bych se
> podival, zda to nahodou nebude v .NET 2 resene, nebo zda uz nekdo
> neco nenapsal. Pokud ano, opet pada Win32.

Me je uplne jedno, jestli to nebude nekdy resene v .NET 2, kdyz ted
mam .NET 1.1 a Delphi a umim to spickove v Delphi, klidne to udelam v
Delphi. Ja nemam problem udelat projekt v Delphi, proste nemam.

>> - spolupraci s hardwarem, kde to mam vyresene pro Delphi, nikoliv
>> pro .NET, napriklad ISDN, komunikaci s mobily bez HW modemu apod.

> Na to se vetsinou nehodi ani Delphi.

Na to se Delphi hodi velmi dobre.

> Ale kolik vyvojaru pise takove veci v Delphi?

Me vubec nezajima, kolik vyvojaru pise jake veci. Ja ti davam
argumenty za sebe osobne.

> Urcite nejaci jsou (treba ja :), ale nemyslim, ze to bude nejak
> zasadni. A kdyz, napisu si zakladni jadro, a zbytek v .NET.

A ja to klidne napisu dele v Delphi a nemam s tim problem. Kdyz chci
neco psat v .NET, pisi to v .NET, kdyz chci neco psat v Delphi, pisi
to v Delphi. Jsem svobodny clovek a taky se dokazu rozhodnout, co je
pro danou aplikaci lepsi. A proste neni vzdy lepsi .NET.

>> No a jiste bych nasel i dalsi duvody. Delphi je velmi kvalitni a
>> propracovany produkt.

> Bejvavalo. Plati to pro prostredi Win32, tam je Delphi bezkonkurencni.

No a o tom se bavime, ne? Ja v Delphi pisi jen Win32 aplikace.

> Ale duvody proc psat pro Win32 kvapem ubyvaji.

Zadne duvody neubyvaji, je to stale stejne. Ze prisel .NET je parada,
mam ho rad, pisi pro nej, ale rozhodne to neznamena, ze mazu Delphi a
koncim s nim uplne. Kdyz jsi pro prepravu materialu pouzival trakar a
pak sis koupil trabanta, tak to preci neznamena, ze se ten trakar uz
nebude nikdy hodit. Jeste ho v pohode vyuzijes.

Ja se nechovam podle toho, co prave leti, ale podle toho, co je pro me
a pro me zakazniky v dany moment nejlepsi. Mam stale spousty duvodu
psat Win32 aplikace v Delphi.

> Z hlediska budoucnosti a dalsi udrzby jsem usoudil, ze pro me je
> vyhodnejsi psat vse nove uz jen v .NET, ve Win 32 uz delam jen
> udrzbu a postupne to sunu do srotu.

Ja ti tvuj nazor vubec neberu a klidne Delphi zahod. Je to v poradku,
take mas svuj rozum a nepotrebujes snad davat pokyny, co mas delat.
Ale prijmi laskave me nazory, o ktere sis sam napsal.

> Co si myslim o budoucnosti Win32 jsem ukazal tim, ze jsem uvolnil
> plne zdrojaky k Lokalizatoru 6. ;) Tedy pro legalni uzivatele, aby
> se nahodou nekdo zbytecne neradoval... :)

Vsak jo. Napriklad TurboPower to ukazal uz o tri roky drive. Ale to
porad neznamena, ze se vsichni budou chovat stejne :-)

Petr Zahradnik, pocitacovy expert

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


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

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

Delphi2005 versus Delphi7

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 14.1.2005 22:15:04

> Kez by. Pro zakladni veci to je pouzitelne, ale nevyhovuje to jak vlastnostmi
> tak vykonem.
... ako vymenny format osobne postacuje ... a na DB je to snad nepouzitelne ..

> Jinak neni treba zduraznovat ze jednoznacny prinos .NETu je dnes hlavne pro
> serverove aplikace.

... a este aj pre mobilne zariadenia, (aspon mne GDI+ v .NET Compact Frameworku viac
vyhovuje ako v J2ME, iked na druhu stranu Java je zase pre mna lepsia ako .NET ) ...
Este, ze nejaky ten cisto .NET operacny system tak skoro nebude, takze uvidime ako
sa situacia vypecie ...

Palo

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 14.1.2005 21:50:59

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavol
> Stugel, NETGraphics
> Sent: Friday, January 14, 2005 8:25 PM
>
> ... to mas ako s XML, je to dobra vec ale nie na vsetko (a
> urcite nie je XML dovod prechodu na .NET lebo XML podpora v
> Delphi je viac nez dobra) ...

Zkousel jsi pracovat s datovymi objekty ve VS (NE v Delphi .NET!!!)? Proti
tomu, co poskytuje Delphi, je to jako nebe a dudy.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 14.1.2005 21:46:59

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Zahradnik
> Sent: Friday, January 14, 2005 7:45 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Delphi2005 versus Delphi7
>
> > Muzes blize specifikovat okruh aplikaci a/nebo zakazniku,
> kvuli kterym
> > se vyplati zacinat nove projekty ve Win32?
>
> Jakekoliv bezne aplikace pro prostredi Win32, kde potrebuji zejmena:
>
> - beh bez nutnosti instalace .NET Framework, tj. na starsich
> pocitacich, pro UB uzivatele a pro aplikace snadno a rychle
> stazitelne z webu apod.

Pro W98- uz nevyvijim, protoze je to stejne hruza. Kdo udrzuje jeste takovou
sunku, stejne nema na zaplaceni. A pokud se jedna o nejake stanice ve vetsi
siti, pak pouziju ASP.NET. Dale, .NET programy jsou mensi nez ty z Delphi a
jejich instalace je jednodussi - staci zkopirovat a spustit. Cili idealni
pro stahovani z webu.

> - rychle (i na pomalych pocitacich) a propracovane GUI
> zalozene na spouste komponent, ktere mam nakoupene, a do
> kterych jsem investoval silena kvanta penez

Jo, GUI komponenty maji zatim proti .NET 1.1 naskok. Brzy ale bude verze 2,
komponenty valem pribyvaji, takze duvod nezacinat nove veci pro Win32 je
mesic od mesice silnejsi.

> - urcite funkcionality, ktere jeste nejsou dopracovany v
> .NET, napriklad kvalitni tiskovy procesor s podporou carovych
> kodu (ne, opravdu reseni s fonty neni to dobre, a delat si to
> sam take nechci)

U nekterych specifickych veci bych to pochopil. Ale nejdrive bych se
podival, zda to nahodou nebude v .NET 2 resene, nebo zda uz nekdo neco
nenapsal. Pokud ano, opet pada Win32.

> - spolupraci s hardwarem, kde to mam vyresene pro Delphi,
> nikoliv pro .NET, napriklad ISDN, komunikaci s mobily bez HW
> modemu apod.

Na to se vetsinou nehodi ani Delphi. Ale kolik vyvojaru pise takove veci v
Delphi? Urcite nejaci jsou (treba ja :), ale nemyslim, ze to bude nejak
zasadni. A kdyz, napisu si zakladni jadro, a zbytek v .NET.

> No a jiste bych nasel i dalsi duvody. Delphi je velmi
> kvalitni a propracovany produkt.

Bejvavalo. Plati to pro prostredi Win32, tam je Delphi bezkonkurencni. Ale
duvody proc psat pro Win32 kvapem ubyvaji.

> Studio. Delam aplikace na obou platformach a to vzdy podle
> toho, co je to konkretne za aplikaci, a hlavne podle toho, co
> je pro me snazsi a vyhodnejsi.

Z hlediska budoucnosti a dalsi udrzby jsem usoudil, ze pro me je vyhodnejsi
psat vse nove uz jen v .NET, ve Win 32 uz delam jen udrzbu a postupne to
sunu do srotu. Co si myslim o budoucnosti Win32 jsem ukazal tim, ze jsem
uvolnil plne zdrojaky k Lokalizatoru 6. ;) Tedy pro legalni uzivatele, aby
se nahodou nekdo zbytecne neradoval... :)

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Knihovny v .NETu v Delphi

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 21:14:56

From: "Petr Vones" <konference(zv)petrvones.net>
> Win32 DLL. Uvadim to aby tu take obcas padla nejaka rekneme okrajove
> zajimava vlastnost Delphi pro .NET ;-)

Pokud by to nekoho zajimalo tak priklad je zde:
http://cc.borland.com/ccweb.exe/listing?id=21139

Petr Vones

Knihovny v .NETu v Delphi

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 21:14:55

Jeste bych doplnil, ze assembly pisu v C#.

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Knihovny v .NETu v Delphi

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 21:10:53

From: "Jiri Cincura" <diskuze(zv)cincura.net>
> A jina moznost nejni? Musim tim jen vratit par znaku (asi 100) a na to se
> hnat do COM se mi moc nechce.

Ne a nevidim v tom problem. Ona cela inicializace .NETu v ramci Win32 procesu
bude uz tak pomerne narocna.

Pokud by ta assembly byla napsana v Delphi.NET tak tam pro jednoducha volani
"funkci" (tedy statickych metod objektu) existuje moznost zvana unmamaged
exports, takze z Win32 aplikace to pak volas shodne jako importy z klasicke
Win32 DLL. Uvadim to aby tu take obcas padla nejaka rekneme okrajove zajimava
vlastnost Delphi pro .NET ;-)

Petr Vones

Knihovny v .NETu v Delphi

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 21:00:49

Petr Vones wrote:
> From: "Jiri Cincura" <diskuze(zv)cincura.net>
>> Chci v Delphi pouzit assembly (DLL) napsane v .NETu. Jde to?
>
> Jenze neni jasne z jakeho Delphi, predpokladejme tedy Win32. Pak to lze
> pres COM interop, naiportuj to jako type library. Predtim je jeste treba
> tu assembly zaregistrovat pomoci regasm, vice je napriklad v tomto
> clanku:
> http://www.blong.com/Conferences/BorConUK2002/Interop2/COMNetInterop.htm#CCW
>

Jo, z Win32 (jinak by to bylo celkem easy).

A jina moznost nejni? Musim tim jen vratit par znaku (asi 100) a na to se hnat do COM se mi moc nechce.

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Delphi2005 versus Delphi7

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 20:56:46

From: "Pavol Stugel, NETGraphics" <palo(zv)netgraphics.sk>
> .. to mas ako s XML, je to dobra vec ale nie na vsetko (a urcite nie je XML
> dovod prechodu na .NET lebo XML podpora v Delphi je viac nez dobra) ...

Kez by. Pro zakladni veci to je pouzitelne, ale nevyhovuje to jak vlastnostmi
tak vykonem.

Jinak neni treba zduraznovat ze jednoznacny prinos .NETu je dnes hlavne pro
serverove aplikace.

Petr Vones


Knihovny v .NETu v Delphi

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 20:48:43

From: "Jiri Cincura" <diskuze(zv)cincura.net>
> Chci v Delphi pouzit assembly (DLL) napsane v .NETu. Jde to?

Jenze neni jasne z jakeho Delphi, predpokladejme tedy Win32. Pak to lze pres
COM interop, naiportuj to jako type library. Predtim je jeste treba tu
assembly zaregistrovat pomoci regasm, vice je napriklad v tomto clanku:
http://www.blong.com/Conferences/BorConUK2002/Interop2/COMNetInterop.htm#CCW

Petr Vones

Knihovny v .NETu v Delphi

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 20:38:42

Petr Vones wrote:
> Predpokladam ze knihovnami se mysli assembly. Jde o volani z Delphi pro
> Win32 nebo .NET ?

Jj, presne tak assembly (DLL vypadne, prekladac nastaven na typ Library).

Chci v Delphi pouzit assembly (DLL) napsane v .NETu. Jde to?

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Delphi2005 versus Delphi7

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 14.1.2005 20:24:41

povodne som pisal hafo dovodov preco este robit Win32, ale Petr Zahradnik to
vynimocne vystihol ...

... ak uz pouzivas tretie komponenty (nie len standart VCL/Win32 API), ktore ti vyhovuju
a poskytuju radovo sirsie moznosti ako standartne (napr. TVirtualStringTree),
nie je dovod pisat tu aplikaciu pre .NET len aby to bolo IN, zakaznikovi
je na 95% absolutne fuk v com to je, len aby mu to chodilo na jeho HW (hlavne
u nas v SK mensie firmy su to pomale PC s Win9x... :) spolupracovalo s jeho
HW/SW a to je vsetko.

... to mas ako s XML, je to dobra vec ale nie na vsetko (a urcite nie je XML
dovod prechodu na .NET lebo XML podpora v Delphi je viac nez dobra) ...

... prechod na D2005 je vsak otazny (osobne pouzivam D6), hlavne kvoli problemom
so samotnym IDE (pre mna jediny dovod by bol SSE 2 v asemblery, ale vyhody
editora oproti jeho katastrofalnemu fungovaniu nie su ziadnym plus). Keby tak malo
kompilator pre 64bit ... hmm tak to by bolo inak


Palo

> No a jiste bych nasel i dalsi duvody. Delphi je velmi kvalitni a
> propracovany produkt. Ackoliv jsem zustal na Delphi 5 a vys nejdu,
> jsem s nim velmi spokojen a nemam duvod zacinat urcite aplikace v .NET
> jen proto, ze mam take Visual Studio. Delam aplikace na obou
> platformach a to vzdy podle toho, co je to konkretne za aplikaci, a
> hlavne podle toho, co je pro me snazsi a vyhodnejsi.

Mizici ImageInde

[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 14.1.2005 20:12:40

Ahoj,
Tak jsem zkousel ledas co...

dole je velmi primitivni komponenta s collection a collectionitem. pokud
v editoru kolekci vytvorim nejakou item, po zpusteni programu tam proste
neni, collection.count je 0... DefineProperties jsem zkousel, ale to
take nepomohlo (jestli vubec jsem to pouzil dobre)....

Mohl byste to nekdo zkusit, zda se vam to bude stavat take? popripade
poradit, kde jsem udelal chybu?


Brona

-----------------------------------------------------------------
unit PSTmp;

interface
uses Windows, Classes;
type
TPSTmp = class;
TPSTb = class (TCollectionItem)
private
fTmp: integer;
published
property Tmp:integer read fTmp write fTmp default 0;
end;

TPSTbs = class (TCollection)
private
protected
function GetTab(Index: Integer): TPSTb;
procedure SetTab(Index: Integer; const Value: TPSTb);
public
constructor Create(Tmp: TPSTmp);
property Tbs[Index: Integer]: TPSTb read GetTab write SetTab;
end;

TPSTmp = class(TComponent)
private
fTbs: TPSTbs;
protected
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
property Tbs:TPSTbs read fTbs;
end;

implementation

constructor TPSTmp.Create(AOwner: TComponent);
begin
inherited;
ftbs:=TPSTbs.Create(self);
end;
destructor TPSTmp.Destroy;
begin
fTbs.Free;
inherited;
end;

constructor TPSTbs.Create(Tmp: TPSTmp);
begin
inherited Create(TPSTb);
end;
function TPSTbs.GetTab(Index: Integer): TPSTb;
begin
Result:=TPSTb(inherited GetItem(Index));
end;
procedure TPSTbs.SetTab(Index: Integer; const Value: TPSTb);
begin
inherited SetItem(Index, Value);
end;
end.
-----------------------------------------------------------------

Delphi2005 versus Delphi7

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.2005 19:44:37

Puvodni zprava ze dne 14.1.2005:

>> S tim nesouhlasim. Nove projekty zacinam jak ve Visual Studio
>> .NET, tak i v Delphi 5.

> Muzes blize specifikovat okruh aplikaci a/nebo zakazniku, kvuli
> kterym se vyplati zacinat nove projekty ve Win32?

Jakekoliv bezne aplikace pro prostredi Win32, kde potrebuji zejmena:

- beh bez nutnosti instalace .NET Framework, tj. na starsich
pocitacich, pro UB uzivatele a pro aplikace snadno a rychle stazitelne
z webu apod.

- rychle (i na pomalych pocitacich) a propracovane GUI zalozene na
spouste komponent, ktere mam nakoupene, a do kterych jsem investoval
silena kvanta penez

- urcite funkcionality, ktere jeste nejsou dopracovany v .NET,
napriklad kvalitni tiskovy procesor s podporou carovych kodu (ne,
opravdu reseni s fonty neni to dobre, a delat si to sam take nechci)

- spolupraci s hardwarem, kde to mam vyresene pro Delphi, nikoliv pro
.NET, napriklad ISDN, komunikaci s mobily bez HW modemu apod.

No a jiste bych nasel i dalsi duvody. Delphi je velmi kvalitni a
propracovany produkt. Ackoliv jsem zustal na Delphi 5 a vys nejdu,
jsem s nim velmi spokojen a nemam duvod zacinat urcite aplikace v .NET
jen proto, ze mam take Visual Studio. Delam aplikace na obou
platformach a to vzdy podle toho, co je to konkretne za aplikaci, a
hlavne podle toho, co je pro me snazsi a vyhodnejsi.

Petr Zahradnik, pocitacovy expert

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


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

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

Delphi2005 versus Delphi7

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 19:14:35

From: "Zbysek Hlinka" <konference(zv)hlinka(tec)cz>
> Prave i primitivni ukladani dat je vetsinou vyhodnejsi v .NET, proste v
> programu pracuju s DataSetem a ukladam do XML. Je s tim minimum prace, a ma
> to velky efekt, protoze si to mohu i oindexovat, v datexh mohu snadno hledat
> atp.

Stale to vsak nevyvazi ten problem s GUI. Koneckoncu i samo Visual Studio je z
velke casti stale Win32 aplikace.

Petr Vones

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 14.1.2005 19:06:34

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Vones
> Sent: Friday, January 14, 2005 6:45 PM
>
> From: "Zbysek Hlinka" <konference(zv)hlinka(tec)cz>
> > Muzes blize specifikovat okruh aplikaci a/nebo zakazniku,
> kvuli kterym
> > se vyplati zacinat nove projekty ve Win32?
>
> Rekl bych ze jednoduche GUI aplikace s daty ulozenymi v
> nejakem primitivnim binarnim souboru apod je stale
> efektivnejsi delat ve Win32.

Prave i primitivni ukladani dat je vetsinou vyhodnejsi v .NET, proste v
programu pracuju s DataSetem a ukladam do XML. Je s tim minimum prace, a ma
to velky efekt, protoze si to mohu i oindexovat, v datexh mohu snadno hledat
atp.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Delphi2005 versus Delphi7

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 14.1.2005 19:00:33

Vse, na co nemam komponenty v .NET.
Napriklad ser. komunikace (ModBUS, ....).
Dale kdyz delam s FB, tak je podpora v Win32 stale
mnohel lepsi a hlavne stabilnejsi.
.NET zatim vyuzivam pouze pro WWW aplikace, kde opravdu
mnohem lepsi, nez delphi nebo PHP.

Slavek

> > S tim nesouhlasim. Nove projekty zacinam jak ve Visual Studio
> > .NET, tak i v Delphi 5.
>
> Muzes blize specifikovat okruh aplikaci a/nebo zakazniku,
> kvuli kterym se vyplati zacinat nove projekty ve Win32?

Knihovny v .NETu v Delphi

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 18:58:33

From: "Jiri Cincura" <diskuze(zv)cincura.net>
> mam nekolik knihoven v .NETu a potreboval bych je pouzit v Delphi (zavolat
> tam nekolik fci), jde to nejak? Nebude se to hadat?
> Pokud to jde, jak na to? Pokud ne, jde to nejak obejit?

Predpokladam ze knihovnami se mysli assembly. Jde o volani z Delphi pro Win32
nebo .NET ?

Petr Vones


Delphi2005 versus Delphi7

[*] Martin Radvansky <delphiconf(zv)radvansky(tec)net> - 14.1.2005 18:52:31

Zdravim,

ja jsem si to v podstate taky tak myslel ze to nema smysl. Koukal jsem ted pred hodinou na
D2005 a hned pri instalaci jsem si musel nainstalovat J# i kdyz jsem
zvolil jen Win32 Delphi a po prvnim spusteni a udelani male aplikace pro
win32 to po ukonceni Delphi 2005 spadlo na AV a taky to blbe prekreslovalo obrazovku.
Jiz delsi dobu pracuju jen ve Visual Studiu a jsem nadmiru spokojen. Jen obcas je treba delat neco
na starsich projektech a tam to delame na d D5 a D7. Nic noveho
vetsiho rozsahu bych nezacinal. Jen obcas je treba nejaka jednorazova
utilitka a tak jsem si rikal, ze by treba udelali neco v Delphi pro
Win32 co by stalo za to.


--
S pozdravem,
Martin Radvansky, MCSD .NET
radvansky(zv)radvansky.net


Knihovny v .NETu v Delphi

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 18:46:30

Ahoj vsichni odbornici,

mam nekolik knihoven v .NETu a potreboval bych je pouzit v Delphi (zavolat tam nekolik fci), jde to nejak? Nebude se to hadat?
Pokud to jde, jak na to? Pokud ne, jde to nejak obejit?

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Delphi2005 versus Delphi7

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 18:44:30

From: "Zbysek Hlinka" <konference(zv)hlinka(tec)cz>
> Muzes blize specifikovat okruh aplikaci a/nebo zakazniku, kvuli kterym se
> vyplati zacinat nove projekty ve Win32?

Rekl bych ze jednoduche GUI aplikace s daty ulozenymi v nejakem primitivnim
binarnim souboru apod je stale efektivnejsi delat ve Win32. Prece jen vizualni
cast .NET 1.1 frameworku pusobi ponekud chude a neni ani nejrychlejsi. Ovsem
ve verzi 2.0 to vypada podstatne lepe, takze zalezi jen na tom kdy bude ostra
verze Visual Studia 2005.

Petr Vones

Delphi2005 versus Delphi7

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 14.1.2005 18:36:29

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Zahradnik
> Sent: Friday, January 14, 2005 6:24 PM
>
> > Predpokladam ze jde predevsim o udrzbu existujicich
> projektu, nove jiz
> > asi nema cenu ve Win32 az na nektere vyjimky vubec zacinat.
>
> S tim nesouhlasim. Nove projekty zacinam jak ve Visual Studio
> .NET, tak i v Delphi 5.

Muzes blize specifikovat okruh aplikaci a/nebo zakazniku, kvuli kterym se
vyplati zacinat nove projekty ve Win32?

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

Delphi2005 versus Delphi7

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.1.2005 18:24:28

Puvodni zprava ze dne 14.1.2005:

> Predpokladam ze jde predevsim o udrzbu existujicich projektu, nove
> jiz asi nema cenu ve Win32 az na nektere vyjimky vubec zacinat.

S tim nesouhlasim. Nove projekty zacinam jak ve Visual Studio .NET,
tak i v Delphi 5. Vys jsem uz nesel, ackoliv pred Delphi 5 jsem mel i
vsechny nizsi verze. A jsem happy.

> Ackoli Delphi 2005 (a Delphi vubec) jiz nejaky cas nepouzivam tak
> muj nazor je takovy, ze se prechod Delphi 7 -> Delphi 2005
> nevyplati.

S tim souhlasim.

Petr Zahradnik, pocitacovy expert

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


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

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

Delphi2005 versus Delphi7

[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.1.2005 18:18:27

From: "Martin Radvansky" <delphiconf(zv)radvansky.net>
> chtel bych se jen zeptat tech co jiz pouzivaji Delphi 2005 zda ma
> cenu pro projekty pro win32 prejit na verzi Delphi 2005.
>
> Priznam se ze jsem nenasel nic co by me presvedcilo, ze je dobre
> prejit, nicmene co na to ti co to jiz pouzivaji.

Predpokladam ze jde predevsim o udrzbu existujicich projektu, nove jiz asi
nema cenu ve Win32 az na nektere vyjimky vubec zacinat.

Ackoli Delphi 2005 (a Delphi vubec) jiz nejaky cas nepouzivam tak muj nazor je
takovy, ze se prechod Delphi 7 -> Delphi 2005 nevyplati. Bylo by totiz treba
revidovat opravy ktere si uz vetsina vyvojaru musela udelat v RTL/VCL a dale
vyladit pripadne chyby nove. Asi nejzajimavejsi vlastnosti D2005 pro Win32 je
method inlining (znamy z .NETu) kde se nabizi otazka jak velka cast beznych
aplikaci psanych v Delphi z toho muze tezit, kdyz vetsinu casu aplikace stejne
travi v kodu Win32 API funkci.

Petr Vones

ClientDataSet a SQL dotaz s parametrama

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 14.1.2005 17:32:24

On 14 Jan 2005 at 16:08, Ing. Jiri Sokol wrote:

> > Od: Burkovsky Ladislav <ladislav.burkovsky(zv)autinform.de>
> > v kode asi takto:
> >
> > DataSet := IBquery ....
> > DataSetProvider.DataSet := DataSet;
> > ClientDataSet.SetProvider(DataSetProvider);
> > Laco
>
> To vypada velice dobre...
> Nemas jeste nejake reseni bez pouziti ClientDataSet - ten ma totiz
> vazbu na midas.dll -> bud ho musim klientovi dodat a nebo se znacne
> rozroste exe soubor prilinkovanim midaslib.

a proc se bojis 'prilinkovani Midaslib', co je u tebe "znacne
rozroste" ?

> Idelani by bylo to provazat na obyc. IBTable - jde spachat neco
takoveho?

Idealni je na TIBTable uplne zapomenout ;)
<prosim NO FLAM>

Co budes delat, az se Firebird uplne oddeli od Interbase a IBX
nepujdou s FB korektne pouzit?
My asi pred 9 mesici migrovali na FIBPlus a tam zadny xTTable NENI !
Ale protoze jsme jej nikdy nepouzili, nebyl zadny problem.

Dnes jsem zrovna delal dva vykazy s pouzitim ClientDataSet, klidne ti
ten kod poslu.

Jarek Uher

ClientDataSet a SQL dotaz s parametrama

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 14.1.2005 16:08:18

> Od: Burkovsky Ladislav <ladislav.burkovsky(zv)autinform.de>
> v kode asi takto:
>
> DataSet := IBquery ....
> DataSetProvider.DataSet := DataSet;
> ClientDataSet.SetProvider(DataSetProvider);
> Laco

To vypada velice dobre...
Nemas jeste nejake reseni bez pouziti ClientDataSet - ten ma totiz vazbu na midas.dll -> bud ho musim klientovi dodat a nebo se znacne rozroste exe soubor prilinkovanim midaslib.
Idelani by bylo to provazat na obyc. IBTable - jde spachat neco takoveho?
Diky za napady!
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.1
programator amater

Delphi2005 versus Delphi7

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 14.1.2005 16:02:18

> chtel bych se jen zeptat tech co jiz pouzivaji Delphi 2005 zda ma
> cenu pro projekty pro win32 prejit na verzi Delphi 2005.
>
> Priznam se ze jsem nenasel nic co by me presvedcilo, ze je dobre
> prejit, nicmene co na to ti co to jiz pouzivaji.
>
> Martin Radvansky, MCSD .NET

Obracim se na zaklade tohoto dotazu na Petra Vonese.

Prave se s nim totiz dohaduju, zda prednaska na seminari "Belohrad 2005" o Delphi2005 ano nebo ne.
http://www.haes(tec)cz/ws_pozv.asp?r=x
viz tez diskuse k tematu "Delphi 2005" na seminari
http://www.hlinka(tec)cz/belohrad/

Budto by o tom mel rici neco Borland nebo Petr.
Snad se to povede.
V kazdem pripade se to bude mezi zucastnenymi urcite rozebirat.

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

FireBird: Posledni editace v DB

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 14.1.2005 15:48:17

Ale tohle jsem ja nikde neradil.
Ja jen radil, jak hacknout server.
Slavek

> Jste si opravdu_stoprocentne_jisti ze DatumCasZmenyDBsouboru =
> CasPosledniUzivatelskeUpravyDat (Update,Insert,Delete) ???!!!
> Ja jsem naopak presvedcen, ze to neni pravda. A i kdyby
> nahodou ve verzi
> X.YY DB serveru byla, tak to ve verzi Y.XX uz byt vubec nemusi.
> CO si treba na prislusne tabulky nadefinovat Insert,Update a
> Del trigger a
> nekam si zapisovat OpravduPresnyCasPosledniZmeny.
>

univerzalni format datumu pro mssql 2000

[*] Zalesak Tomas <tomas.zalesak(zv)lcs(tec)cz> - 14.1.2005 15:44:16

> Je jich hned nekolik, alespon dva:
>
> 'YYYYMMDD', pripadne jeste rozsirene o cas 'YYYYMMDD HH:MM:SS'
> dtto s pomlckami
> 'YYYY-MM-DD', pripadne jeste rozsirene o cas 'YYYY-MM-DD HH:MM:SS'
> ale ten nemam vyzkouseny za vsech nastaveni.
>
> dalsim je stary dobry format z ODBC '{...}', presne si ho nepamatuji a nemam
> k dispozici SDK, ale take funfuje bez ohledu na nastaveni.

tak ten s pomlckami to urcite neni, ten ODBC {...} zase zavisi na nastaveni
ODBC flagu SQL_ATTR_NOSCAN, tedy jediny VZDY nezavisly na:

MSSQL7
MSSQL2000
MSSQL2005

je:
'YYYYMMDD'
nebo:
'YYYYMMDD hh:nn:ss.zzz'

Tomas Zalesak

univerzalni format datumu pro mssql 2000

[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 14.1.2005 15:36:15

Je jich hned nekolik, alespon dva:

'YYYYMMDD', pripadne jeste rozsirene o cas 'YYYYMMDD HH:MM:SS'
dtto s pomlckami
'YYYY-MM-DD', pripadne jeste rozsirene o cas 'YYYY-MM-DD HH:MM:SS'
ale ten nemam vyzkouseny za vsech nastaveni.

dalsim je stary dobry format z ODBC '{...}', presne si ho nepamatuji a nemam
k dispozici SDK, ale take funfuje bez ohledu na nastaveni.> From: Ivo Novosad [mailto:ivonovosad(zv)atron.de]
> rad bych se zeptal jestli existuje nejaky univerzalni format
> datumu/casu
> ktery muzu pouzit v sql prikazech na mssql 2000. Neco co je
> nezavisle na
> nastaveni jak sql serveru tak windows. Neco obdobneho jako format
> #rrrr/mm/dd# nebo tak podobne ktery se pouziva pro MS Access.
> Jde o to ze v aplikaci kde je acces pouzit prechazime na mssql a tak
> hledam pokud mozno nejake jednoduche reseni. V te stare
> aplikaci mam fci
> UpravDatumProSQL tak bych proste jen zmenil format ..

RichEdit a zmena fontu ve vyberu

[*] horky(zv)cominn(tec)cz - 14.1.2005 14:42:12

> From: Petr Cafourek [mailto:petr.cafourek.d7(zv)seznam(tec)cz]
> Sent: Friday, January 14, 2005 2:30 PM

> nevite nekdo, jak zmenit napr. font, barvu, ... jen ve vybrane casti
> textu v RichEditu? At hledam kde hledam, nemohu nic najit.

Prohlidni si demo
"c:\Program Files\Borland\Delphi7\Demos\RichEdit\richedit.dpr"

nebo pristupuj primo na vlastnosti vybraneho textu:

richedit.SelAttributes.Color := clRed;
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]

Delphi2005 versus Delphi7

[*] Martin Radvansky <delphiconf(zv)radvansky(tec)net> - 14.1.2005 14:38:11

Dobry den,

chtel bych se jen zeptat tech co jiz pouzivaji Delphi 2005 zda ma
cenu pro projekty pro win32 prejit na verzi Delphi 2005.

Priznam se ze jsem nenasel nic co by me presvedcilo, ze je dobre
prejit, nicmene co na to ti co to jiz pouzivaji.

Diky za odpoved


--
S pozdravem,
Martin Radvansky, MCSD .NET


RichEdit a zmena fontu ve vyberu

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 14.1.2005 14:30:10

Zdravim vsechny,
nevite nekdo, jak zmenit napr. font, barvu, ... jen ve vybrane casti
textu v RichEditu? At hledam kde hledam, nemohu nic najit.


S pozdravem,
Petr Cafourek

petr.cafourek.d7(zv)seznam(tec)cz

D6 Pro, WinXP CZ SP


Prepinani komponent na formu - vyreseno

[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 14.1.2005 14:22:10

Jo jo, to je ono - uz jsem to kdysi delal a uplne jsem na to zapomnel
(prislusny program je jiz na smetisti dejin). Jestli si dobre vzpominam,
stacilo mi tehdy poslat jen WM_KEYDOWN.

Diky moc.
Petr Mohapl


> V obo pripadech neni problem v OnKeyDown editu udalost
> WM_KEYDOWN poslat gridu pres PostMessage, ted z hlavy nevim,
> jestli musi nebo nemusi nasledovat i poslani WM_KEYUP.
>
> David Lebeda
>

ClientDataSet a SQL dotaz s parametrama

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 14.1.2005 13:26:05

> From: Burkovsky Ladislav
>
> Pouzi Filter alebo OnFilterRecord
>
> Laco

Jo, to je sice reseni, ale to mi pak prijdou kvanta dat - ja to potrebuju omezit a az pak si je podle potreby jeste profiltrovat - nechci zbytecne zvysovat traffic.
Any idea?
Predem dik za jakykoliv napad
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.1
programator amater

Prace s Wordem

[*] Frantisek Bohac <bohacf_dkonf(zv)vnol(tec)cz> - 14.1.2005 13:26:05

A co takto:

procedure TForm1.Button1Click(Sender: TObject);
var
myWord: OleVariant;
begin
try
myWord := GetActiveOleObject('Word.Application');
except
try
myWord := CreateOleObject('Word.Application');
except
on e: Exception do begin
ShowMessage('Chyba p+AVk-i p+AVkA7Q-stupu k Wordu!'#13+-E.Message);
Exit;
end;
end;
end;
myWord.Visible := True;
// myWord.Documents.Open('d:\pokus.doc');
myWord.Documents.Add('normal.dot', false, 0, true);
myWord.Selection.TypeText('Aktivni dokument: '+- myWord.ActiveDocument.Name);
BringToFront;
end;

F.


Ing. Igor Vodicka napsal(a):

>Pro praci s Wordem pouzivam nasledujici konstrukci:
>
...

> Word := CreateOleObject(`Word.Application`);
> Word.Visible := True;
> Word.Documents.Open(FileName);
>
>
...

>Bohuzel se mi ale otevira pokazde nova instance Wordu.
>
>

ClientDataSet a SQL dotaz s parametrama

[*] Burkovsky Ladislav <ladislav.burkovsky(zv)autinform.de> - 14.1.2005 13:44:07

Ak tomu spravne rozumiem tak mate Fb a z neho chcete naplnat clientdataset a
ten este
filtrovat.
Ja to robim tak ze poslem na FB select aj s where a ten potom filtrujem a
triedim.
v kode asi takto:

DataSet := IBquery ....
DataSetProvider.DataSet := DataSet;
ClientDataSet.SetProvider(DataSetProvider);
Laco

> Pouzi Filter alebo OnFilterRecord

Jo, to je sice reseni, ale to mi pak prijdou kvanta dat - ja to potrebuju
omezit a az pak si je podle potreby jeste profiltrovat - nechci zbytecne
zvysovat traffic.

univerzalni format datumu pro mssql 2000

[*] delphin(zv)post(tec)cz - 14.1.2005 13:38:06

> rad bych se zeptal jestli existuje nejaky univerzalni format datumu/casu
> ktery muzu pouzit v sql prikazech na mssql 2000. Neco co je nezavisle na
> nastaveni jak sql serveru tak windows. Neco obdobneho jako format
> #rrrr/mm/dd# nebo tak podobne ktery se pouziva pro MS Access.
> Jde o to ze v aplikaci kde je acces pouzit prechazime na mssql a tak
> hledam pokud mozno nejake jednoduche reseni. V te stare aplikaci mam fci
> UpravDatumProSQL tak bych proste jen zmenil format ..

FormatDateTime('YYYYMMDD HH:NN:SS',dt)

univerzalni format datumu pro mssql 2000

[*] Ivo Novosad <ivonovosad(zv)atron.de> - 14.1.2005 13:24:05

Zdravim,

rad bych se zeptal jestli existuje nejaky univerzalni format datumu/casu
ktery muzu pouzit v sql prikazech na mssql 2000. Neco co je nezavisle na
nastaveni jak sql serveru tak windows. Neco obdobneho jako format
#rrrr/mm/dd# nebo tak podobne ktery se pouziva pro MS Access.
Jde o to ze v aplikaci kde je acces pouzit prechazime na mssql a tak
hledam pokud mozno nejake jednoduche reseni. V te stare aplikaci mam fci
UpravDatumProSQL tak bych proste jen zmenil format ..


diky

Ivo

Mizici ImageInde

[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 14.1.2005 13:14:04

Krysl, Tomas wrote:
>>Kdyz jsem si zobrazil formular, jako text, tak tam ta hodnota nikde
>>nebyla nastavena, takze myslim, ze se to nikam neuklada
>
>
> Nevim presne, jak to mas napsane, ale published properties se ukladaji
> automaticky (ale published to predpokladam mas). Jinak je treba overridnout
> DefineProperties, aby se neco ulozilo do dfm - to ale asi taky vis.
>
> Funkci za stored direktivou vola TWriter jen pri zapisu published property.
> Kdyz tam stored ani default nedas, mas jistotu ze se published property
> zapise vzdy. Samozrejme musi mit soucasne read a write. V DefineProperties
> se stored funkce definuje zvlast (viz TFiler.Define(Binary)Property).
>

Published samozrejme je
DefineProperties neznam, par komponent uz jsem napsl ale toto je prvni
komponenta s ImageIndex a dela takoveto problemy.
Predpokladam, ze prislusne indicie k tomu DefineProperties najdu v
helpu, nebo ne?

Brona

Mizici ImageInde

[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 14.1.2005 12:34:00

> Kdyz jsem si zobrazil formular, jako text, tak tam ta hodnota nikde
> nebyla nastavena, takze myslim, ze se to nikam neuklada

Nevim presne, jak to mas napsane, ale published properties se ukladaji
automaticky (ale published to predpokladam mas). Jinak je treba overridnout
DefineProperties, aby se neco ulozilo do dfm - to ale asi taky vis.

Funkci za stored direktivou vola TWriter jen pri zapisu published property.
Kdyz tam stored ani default nedas, mas jistotu ze se published property
zapise vzdy. Samozrejme musi mit soucasne read a write. V DefineProperties
se stored funkce definuje zvlast (viz TFiler.Define(Binary)Property).

TK.

Jak zmenit defaultni kodovani v IB DB

[*] Jiri Virt <virt(zv)volny(tec)cz> - 14.1.2005 12:28:00

Ahoj vsem,

u IB database jsem si, pri jejim zalozeni, spatne vybral kodovani cestiny a
ted musim u kazde tabulky predelavat.
Nejde prenastavit tuto defaultni hodnotu u cele database tak, abych toto
nemusel kontrolovat pri kazdem zalozeni nove tabulky?

Diky

Jirka Virt


FB - Select - vyreseno

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 14.1.2005 12:17:59

On 14 Jan 2005 at 11:07, Svoboda Jiri wrote:

> Neznam Firebird, ale MSSQL bych to vyresil treba takhle:
>
> SELECT DT_ODJEZD, MZDA1R,MZDA1M,
> 100*MZDA1R + MZDA1M AS MZDAZA,
> ID FROM STAZKA
>
> WHERE (100*MZDA1R + MZDA1M) <= 200501
> AND (100*MZDA1R + MZDA1M) >= 200410
>
> Omlouvam se za syntaxi pokud neni OK.

diky, funguje, i syntaxe je OK.

Jine reseni asi neni mozne, protoze ridic si sam rekne, do
ktereho mesice mu maji jizdu zauctovat a mesic muze zustat 0
(rekne si pozdeji) a tim i pretypovat na DATE nebyl mozny.

Jarek Uher

FireBird: Posledni editace v DB

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 12:09:58

Slavomir Skopalik wrote:
> Takze po lopate.
> On ma k dispozici pouze port 3050.
> Po tom portu opravdu ni nenhraje, ale muze vytvaret (pokud to neni
> zakazane)
> externi tabulky.

Je to zakazane.

> To jsou "textove" soubory, pokud se vytvori char(1), tak kady insert
> bude jeden byte, takze takle tam dostane tu UDF.

UDF taky zakazane. :( Pouze jsem si vydupal ty standardni.

> Jenze tim nema vyhrano, on potrebuje vic, takze musi do te udf
> propasovat najakeho toho trojskeho kone, no a nejjednodussi je tam
> schovat vncserver

No to je dost na hrane a spis dostanu za tohle padaka.

> (naucit se spoustet jako aplikaci bez instalace). No a tim (pokud nema
> zakazane dalsi porty by mohlo byt vyhrano.
> Pripadne si udellat vlastni VNC do te udf.
> Jenze to je tolik prace, ze tam nakonec radeji rano zajde/zavola/zajede.

Presne tak. Prozatim jsem to vyresil tak, ze na "nejfrekventovanejsi" tabulce je trigger co zapisuje datum do pomocne tabulky pokud
se neco stane.


--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Prepinani komponent na formu

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 14.1.2005 11:59:57

> mam na formu dve komponenty: dbgrid a edit. Edit je pro inkrementalni
> vyhledavani v dbgridu. Potrebuji v editu pri stisku "kursorovych" klaves
> (VK_PRIOR, VK_UP atd.) do gridu.

Ahoj,

nerozumim jednoznacne, co je cilem. Jestli pri stisku sipky dolu apod.
ma focus zustat na editu a gridem jen programove rolovat, nebo jestli
se ma focus premistit na grid.

V obo pripadech neni problem v OnKeyDown editu udalost
WM_KEYDOWN poslat gridu pres PostMessage, ted z hlavy nevim,
jestli musi nebo nemusi nasledovat i poslani WM_KEYUP. Ve druhem
pripade krome toho preposlani jeste udelat Grid.SetFocus. Nebo tomu
spatne rozumim?

David Lebeda

Seminar "Belohrad 2005"

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 14.1.2005 11:51:57

Priprava programu seminare "Belohrad 2005" se blizi do finale.
http://www.haes(tec)cz/ws_pozv.asp?r=x

Protoze nasim ukolem je vas informovat o vsech novinkach a o cestach, kam se vyvoj aplikaci ubira, prizvali jsme tentokrat krome lidi, ktere uz znate, take nejvyznamnejsi osobnosti z konference VSNET-L(zv)LIST.EMWAC.CZ.

Prijedte si je poslechnout ...
Vecer bude prostor i pro "kuloarni diskuse" ...

K dnesnimu dni je prihlaseno 81 ucastniku (prednasejici nepocitaje).

Jan Sebelik
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

Vice retezcova hodnota

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 14.1.2005 11:13:53

No to taky neni uplne pravda. Pokud pouzijes ini soubor, tak ho musis zapsat
do nejakeho spolecneho adresare. No a pro zapis do Program files potrebujes
opravneni minimalne Power user, do WinDir taky a do D&S\All
users\Application Data taky. Jedine rozumne reseni je tedy umisteni bud do
HCU nebo do Application data jednotlivych uzivatelu...

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Jan Rizek
> Sent: Friday, January 14, 2005 9:58 AM
>
> A co si to zapsat do sveho vlastniho TIni - a osetrit si to podle
> sebe.. To
> je mozna lepsi pristup nez pouzivat registry.. - navic je to snadneji
> prenositelne..
>
> > Zdravim,
> > opet programuju muj textovy editor, kdyz jsem narazil na problem. Kdyz
> > vytvarim pri spousteni aplikace slozku v Data Aplikaci, potrebuju nekde
> > zapsat cestu k teto slozce, ale u kazdeho uzivatele je jina. Chci to
> > zapisovat do registru, do vice retezcove promenne. Muzete me nekdo
> > poradit, jaka je na to funkce? Diky

Mizici ImageInde

[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 14.1.2005 11:11:53

Ahoj
> A otevres-li projekt znova, tak tam v tom desing modu je (myslim, jestli se
> to spravne uklada do dfm)? Jestli jo tak zkus krokovat
> TReader.ReadCollection (mas-li zdrojak VCL), jestli se to spravne nacita i v
> runtimu.

zkusim pozdeji,
Kdyz jsem si zobrazil formular, jako text, tak tam ta hodnota nikde
nebyla nastavena, takze myslim, ze se to nikam neuklada (ale stored jsem
zkousel).
BTW. co v pripade, ze mi to ten TReader nebude nacitat spravne?

Brona

FB - Select

[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 14.1.2005 11:07:52

Neznam Firebird, ale MSSQL bych to vyresil treba takhle:

SELECT DT_ODJEZD, MZDA1R,MZDA1M,
100*MZDA1R + MZDA1M AS MZDAZA,
ID FROM STAZKA

WHERE (100*MZDA1R + MZDA1M) <= 200501
AND (100*MZDA1R + MZDA1M) >= 200410

Omlouvam se za syntaxi pokud neni OK.

Problem s ukoncovanim TIdTCPServeru

[*] likeapear <likeapear(zv)centrum(tec)cz> - 14.1.2005 10:49:51

Ahoj,

pouzivam Indy komponenty pro sitove komunikace. Mam problem s komponentou TIdTCPServer, konkretne pri ukonceni aplikace pokud je k serveru pripojen nejaky klient.

Mam WinXP, Sp1, Delphi 7, vcera jsem stahnul a nainstaloval posledni verzi baliku Indy (10.0.52). Vse funguje v poradku, akorat pokud pri nastaveni vlastnosti TIdTCPServer.Active na False vznika nejaka vyjimka pokud je k serveru pripojen nejaky klient. Pokud aplikaci ukoncim, okno se skryje, ale stale proces bezi ve Spravci uloh. Problem bude pravdepodobne s ukoncenim klentskych vlaken, ale nikde jsem nenasel rozumnej zpusob jak server korektne ukoncit...

Poradi mi nekdo?

Jenom dodavam, update na posledni verzi jsem provedl z duvodu podobneho problemu s verzi 9.x.x, ktera je dodavana s D7.


likeapear ^_^

FB - Select

[*] Burkovsky Ladislav <ladislav.burkovsky(zv)autinform.de> - 14.1.2005 10:41:50

Preco nepouzit EXTRACT (year|month from ...)?

-----Ursprungliche Nachricht-----
Von: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]Im
Auftrag von Jaroslav Uher
Gesendet: Donnerstag, 13. Januar 2005 16:02
An: delphi-l(zv)clexpert(tec)cz
Betreff: FB - Select


Ahoj,

nejak si nevim rady, s prostym selectem :-(
Potrebuji vybrat zaznamy za obdobi, kde
MZDA1R (rok) a MZDA1M (mesic), jsou oba SmallInt

napr.:
SELECT DT_ODJEZD, MZDA1R,MZDA1M,
CAST(MZDA1R || MZDA1M AS VARCHAR(10)) AS MZDAZA,
ID FROM STAZKA

WHERE (CAST(MZDA1R || MZDA1M AS VARCHAR(10)) <= '200501'
AND CAST(MZDA1R || MZDA1M AS VARCHAR(10)) >= '200410')

porad to vybira zaznamy i pred '200410'

Na pretypovani CAST v podmince WHERE netrvam.

Melo by to fungovat i na FB 1.03, i kdyz ani na 1.5.1 se nemohu
doparat spravneho vysledku.

Dekuji za jakoukoli radu,

s pozdravem

Jarek Uher


ClientDataSet a SQL dotaz s parametrama

[*] Burkovsky Ladislav <ladislav.burkovsky(zv)autinform.de> - 14.1.2005 10:31:49

Pouzi Filter alebo OnFilterRecord

Laco

-----Ursprungliche Nachricht-----
Von: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]Im
Auftrag von Ing. Jiri Sokol
Gesendet: Freitag, 14. Januar 2005 09:34
An: delphi-l(zv)clexpert(tec)cz
Betreff: ClientDataSet a SQL dotaz s parametrama


Ahoj panove.
Muzete mi, prosim, nekdo poradit jak mam predat ClientDataSet-u parametry,
ktere jsem mu dal do SQL dotazu?
Mam na mysli neco takoveho:

select * from tabulka where (id>:min )and(id<:max)

ClientDataset nema ParamByName jako treba IBSQL - ma pole Params - ten sice
ma ParamByName, ale kdyz udelam toto:

with CLientDataSet do
begin
Close;
Params.ParamByName('min').AsInteger := 5;
Params.ParamByName('max').AsInteger := 20;
Open;
end;

tak tabulka s 50-ti zaznamy se zobrazi komplet bez omezeni mnou chteneho
temi parametry.
Muzete me nekdo nakopnout spravnym smerem?
Predem diky
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.1
programator amater

FireBird: Posledni editace v DB

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 14.1.2005 09:57:46

Jak to nakonec dopadlo? Zasel tam?? :-) Pouzili jste nejake UDF-ko? Je
datum_cas souboru databaze - casem posledni zmeny?

JR


> Ahoj,
> muzu nejakym selectem (tr. ze "systemovych" tabulek) zjistit, kdy byla
> databaze naposledy editovana? Kdy byl naposledy
> pridan/upraven/... zaznam?
>
> --
> Jiri Cincura
> http://www.cincura.net/
> http://ID3renamer.cincura.net/
> ICQ#: 314711544
> http://photo.cincura.net/
> http://phorum.cincura.net/
> http://x2develop.com/
>
>
>
>

Vice retezcova hodnota

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 14.1.2005 09:57:46

A co si to zapsat do sveho vlastniho TIni - a osetrit si to podle sebe.. To
je mozna lepsi pristup nez pouzivat registry.. - navic je to snadneji
prenositelne..

> Zdravim,
> opet programuju muj textovy editor, kdyz jsem narazil na problem. Kdyz
> vytvarim pri spousteni aplikace slozku v Data Aplikaci, potrebuju nekde
> zapsat cestu k teto slozce, ale u kazdeho uzivatele je jina. Chci to
> zapisovat do registru, do vice retezcove promenne. Muzete me nekdo
> poradit, jaka je na to funkce? Diky
>
>
>

Mizici ImageInde

[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 14.1.2005 10:17:48

> Pokud v
> design modu (pri navrhu) nastavim imageindex, obrazek se mi spravne
> vykresli, pokud ale spustim program, obrazek tam neni

A otevres-li projekt znova, tak tam v tom desing modu je (myslim, jestli se
to spravne uklada do dfm)? Jestli jo tak zkus krokovat
TReader.ReadCollection (mas-li zdrojak VCL), jestli se to spravne nacita i v
runtimu.

> a po vypnuti programu mam dany imageindex nastaveny na -1

Tomu moc nerozumim.

TK.

Prepinani komponent na formu

[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 14.1.2005 10:13:47

Ahoj,
mam na formu dve komponenty: dbgrid a edit. Edit je pro inkrementalni
vyhledavani v dbgridu. Potrebuji v editu pri stisku "kursorovych" klaves
(VK_PRIOR, VK_UP atd.) do gridu. Zkousel jsem to pres OnKeyDown (at uz na
formu s KeyPreview, nebo u toho editu) a ten prvni kursorovy znak mi to vzdy
sezere. Navrhnete nekdo plz co s tim? Poslat udalost nebo neco takeho?

Dival jsem se do archivu, nic jsem nenasel - tak jen doufam, ze to tu nebylo
pred tydnem a ze jsem to neprehledl...
Diky
Petr

D5 W98


Mizici ImageInde

[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 14.1.2005 09:51:44

Ahoj,

Mam komponentu odvozenou od TCustomControl, ta ma property typu
TCollection a TImageList, TCollectionItem dane TCollection ma ImageIndex
typu TImageIndex, vytvoril jsem si property editor tak, abych obrazky
vybiral z imagelistu dane komponety. Toto vsechno funguje. Pokud v
design modu (pri navrhu) nastavim imageindex, obrazek se mi spravne
vykresli, pokud ale spustim program, obrazek tam neni a po vypnuti
programu mam dany imageindex nastaveny na -1, zkousel jsem i nastavit
property na stored, ale toto stejne nepomaha...

nevite nekdo, co s tim?

Brona
D7Ent

Vice retezcova hodnota

[*] konference(zv)sales(tec)cz - 14.1.2005 09:43:42

> > potrebuju nekde
> > zapsat cestu k teto slozce, ale u kazdeho uzivatele je
> jina. Chci to
> > zapisovat do registru, do vice retezcove promenne. Muzete me nekdo
> > poradit, jaka je na to funkce? Diky

> A proc to pro kazdeho uzivatele nezapises zvlast do
> HKEY_CURRENT_USER ???
> Tahle vetev je pro kazdeho uzivatele zvlast.

Ahoj,
Navic pokud to budes zapisovat do HKLM, tak to pak nemuze chodi pro
uzivatele s pravy USER !
To je zcela spatny pristup.

Ludek


Vice retezcova hodnota

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 14.1.2005 09:35:42

A proc to pro kazdeho uzivatele nezapises zvlast do HKEY_CURRENT_USER ???
Tahle vetev je pro kazdeho uzivatele zvlast.

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Petr Berek
> Sent: Thursday, January 13, 2005 7:35 PM
>
> opet programuju muj textovy editor, kdyz jsem narazil na problem. Kdyz
> vytvarim pri spousteni aplikace slozku v Data Aplikaci, potrebuju nekde
> zapsat cestu k teto slozce, ale u kazdeho uzivatele je jina. Chci to
> zapisovat do registru, do vice retezcove promenne. Muzete me nekdo
> poradit, jaka je na to funkce? Diky

ClientDataSet a SQL dotaz s parametrama

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 14.1.2005 09:33:41

Ahoj panove.
Muzete mi, prosim, nekdo poradit jak mam predat ClientDataSet-u parametry, ktere jsem mu dal do SQL dotazu?
Mam na mysli neco takoveho:

select * from tabulka where (id>:min )and(id<:max)

ClientDataset nema ParamByName jako treba IBSQL - ma pole Params - ten sice ma ParamByName, ale kdyz udelam toto:

with CLientDataSet do
begin
Close;
Params.ParamByName('min').AsInteger := 5;
Params.ParamByName('max').AsInteger := 20;
Open;
end;

tak tabulka s 50-ti zaznamy se zobrazi komplet bez omezeni mnou chteneho temi parametry.
Muzete me nekdo nakopnout spravnym smerem?
Predem diky
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.1
programator amater

Palm OS x Windows

[*] delphi(zv)hon(tec)cz - 14.1.2005 09:07:39


A co takhle tato alternativa:

Ma-li libovolny OS terminaloveho klienta, co takhle zkusit
napsat obyc konzolovou aplikaci v Delphi?

Priklad z praxe abych jen tak necancal. Mame Falcon ctecky
s 486 kde bezi tak tak dos. Kdo rika, ze to mame vyhodit a
koupit si lepsi tak rikam "lepsiho nic neni" ( a stoji to 70litru).
Ma to RangeLan kartu, ctecku caroveho kodu, pekny display, klavesnici
a dobre se drzi (zkuste byt chvili ne programatorem, ale
skladnikem v -10C venku). Bezi tam terminalovy klient,
ktery se pres tu wifinu spojuje. Konzolova aplikace sice nema
grafiku, zato je online napojena na MS-SQL (a to i z internetu)
a cte data, zobrazuje data, tiskne, vse online. Aplikace samotna
ma okenni rozhrani inspirovane TurboVision, ale zjednodusene a
zmensene. Cili jinymi slovy, stacila by Delphi3 s ADO a uz
to mohlo ficet. A rychlost vyvijeni...? No za tri mesice bylo
hotovo 80% zbytek se ukresal v boji. Rozsah aplikace?
Prochazeni skladu, info o seriovem cisle, vychystani zakazek
dle objednavky a jednotlivych aut, prestitkovani, nakladka,
vykladka a dodaci list, funkci tolik, ze to ani sam autor
neumi ovladat.

Tedy zadne frameworky, zadne slozite testovani. Vse v jednom PC a
finalni app se jen prehraje na telnet server.

To jen tak pri patku k zamysleni.

Martin

P.S. Puvodni zpravu nechavam celou, abych nic nevytrhoval z kontextu.
Mi to proste cele pripada jako velke trapeni.>>Napsani jakekoliv aplikace pro .NET CF je stejne jednoduche jako
>>napsani normalni .NET aplikace. Ovsem potrebujes na to VisualStudio
>>.NET. (Borland se zatim k podpore ComactFrameworku nejak stale
>>nema...)
>
> Momentalne vyvijam uz druhy mesiac db app pre pocket pc a mozem .Net CF
> len odporucit. Predomnou bola rovnaka app vyvijana v C++ a za 6 mesiacov
> bola cca zo 70 % hotova. Preslo sa ale na .Net, komplet sa to prepisalo a
> za 2 mesiace je aplikacia na 98 % hotova. Cize rychlost vyvoja je
> neporovnatelna, oproti normalnemu NET je to ale predsa len pomalsie.
>
> Tak uz len rady o ktorych sa moc nepise:
> - 64 kB tolko by mala mat max funkcia na inicializovanie formulara, je
> to ale po kompilacii, cize nie je sposob ako to presne zistit,
> jednoducho hodi null exception, cize nejake zlozite formulare robit
> len manualne, ziaden design
> - jednoznacne si zaobstarat .NET Compact Framework 1.0 SP2, ten sa mi
> ale bohuzial nepodarilo zakomponovat to vs 2003, cize je mozna len
> manualna instalacia do pocketa
> - v emulatore pocket pc2002 nie je mozne pripojenie na server, nutne
> stiahnut image minimalne pc2003, ja osobne odporucam priamo pocket pc
> zariadenie program sa predsa len sprava trosku odlisne
> - ak sa pouziva sql ce server, tak dost casto sweepovat db. Aplikaciu
> inak pri komplikovanejsich dotazoch sa stava, ze padne, a neda sa to
> v aplikacii osetrit
> - stiahnut si smart device framework 1.2 :
> http://www.opennetcf.org/PermaLink.aspx?guid=3a013afd-791e-45ef-802a-4c1dbe1cfef9
> - este taky detail pri instalacii do najnovsich pocket pc 2003 se pri

FireBird: Posledni editace v DB

[*] konference(zv)sales(tec)cz - 14.1.2005 08:51:38

On Behalf Of Slavomir Skopalik
> Takze po lopate.
> On ma k dispozici pouze port 3050.
> Po tom portu opravdu ni nenhraje, ale muze vytvaret (pokud to neni
> zakazane)
> externi tabulky.
> To jsou "textove" soubory, pokud se vytvori char(1), tak kady insert
> bude jeden byte,
> takze takle tam dostane tu UDF.
> Jenze tim nema vyhrano, on potrebuje vic, takze musi do te udf
> propasovat najakeho toho
> trojskeho kone, no a nejjednodussi je tam schovat vncserver (naucit se
> spoustet jako aplikaci
> bez instalace).
> No a tim (pokud nema zakazane dalsi porty by mohlo byt vyhrano.
> Pripadne si udellat vlastni VNC do te udf.
> Jenze to je tolik prace, ze tam nakonec radeji rano
> zajde/zavola/zajede.
>
> Slavek
>
> > A co takhle na to pouzit UDF-ko -
> >
> > v udf-ku mu predat cestu k DB souboru a UDF-ko by zjistilo
> > datum_cas zmeny
> > souboru.
> >
> > > Jan Rizek wrote:
> > >> No to nevim, ale co se takhle podivat na datum_cas databazoveho
> > >> souboru??
> > >

Ahoj.
Proboha co to tady provadite ?
Jste si opravdu_stoprocentne_jisti ze DatumCasZmenyDBsouboru =
CasPosledniUzivatelskeUpravyDat (Update,Insert,Delete) ???!!!
Ja jsem naopak presvedcen, ze to neni pravda. A i kdyby nahodou ve verzi
X.YY DB serveru byla, tak to ve verzi Y.XX uz byt vubec nemusi.
CO si treba na prislusne tabulky nadefinovat Insert,Update a Del trigger a
nekam si zapisovat OpravduPresnyCasPosledniZmeny.


Ludek


Slozky

[*] Milos J. Hrach <delphi_konf(zv)post(tec)cz> - 14.1.2005 08:15:35

Myslim, ze funguje i klasicke TurboPascaloveske mkdir.

> delphi slozku na
> disku. Snazil jsem vselijake hesla v napovede, ale na
> nic jsem neprisel.
> Diky za radu.

FireBird: Posledni editace v DB

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 14.1.2005 01:01:05

Takze po lopate.
On ma k dispozici pouze port 3050.
Po tom portu opravdu ni nenhraje, ale muze vytvaret (pokud to neni
zakazane)
externi tabulky.
To jsou "textove" soubory, pokud se vytvori char(1), tak kady insert
bude jeden byte,
takze takle tam dostane tu UDF.
Jenze tim nema vyhrano, on potrebuje vic, takze musi do te udf
propasovat najakeho toho
trojskeho kone, no a nejjednodussi je tam schovat vncserver (naucit se
spoustet jako aplikaci
bez instalace).
No a tim (pokud nema zakazane dalsi porty by mohlo byt vyhrano.
Pripadne si udellat vlastni VNC do te udf.
Jenze to je tolik prace, ze tam nakonec radeji rano zajde/zavola/zajede.

Slavek

> A co takhle na to pouzit UDF-ko -
>
> v udf-ku mu predat cestu k DB souboru a UDF-ko by zjistilo
> datum_cas zmeny
> souboru.
>
> > Jan Rizek wrote:
> >> No to nevim, ale co se takhle podivat na datum_cas databazoveho
> >> souboru??
> >
> > Jestli to umis jen selectem, tak sem s tim. :)
> >
> > K tomu serveru mam pristup jen na tu DB.

FireBird: Posledni editace v DB

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 14.1.2005 00:55:04

A co takhle na to pouzit UDF-ko -

v udf-ku mu predat cestu k DB souboru a UDF-ko by zjistilo datum_cas zmeny
souboru.

Vlastni udf-ko muzes napsat dle freeudf library - nebo jak se jmenuje -
zdrojaky jsou volne ke stazeni - jen si tam pridas vlastni funkci.

A pak jen

select MY_SUPER_UDF('c:\Projekt\data\DB.gdb') from RDB$DATABASE

to by byl ten selekt.. :-)

FireBird: Posledni editace v DB

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 14.1.2005 00:33:02

A co takhle na to pouzit UDF-ko -

v udf-ku mu predat cestu k DB souboru a UDF-ko by zjistilo datum_cas zmeny
souboru.

Vlastni udf-ko muzes napsat dle freeudf library - nebo jak se jmenuje -
zdrojaky jsou volne ke stazeni - jen si tam pridas vlastni funkci.

----- Original Message -----
From: "Jiri Cincura" <diskuze(zv)cincura.net>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, January 14, 2005 12:05 AM
Subject: Re: FireBird: Posledni editace v DB


> Jan Rizek wrote:
>> No to nevim, ale co se takhle podivat na datum_cas databazoveho souboru??
>
> Jestli to umis jen selectem, tak sem s tim. :)
>
> K tomu serveru mam pristup jen na tu DB.
>
> --
> Jiri Cincura
> http://www.cincura.net/
> http://ID3renamer.cincura.net/
> ICQ#: 314711544
> http://photo.cincura.net/
> http://phorum.cincura.net/
> http://x2develop.com/
>
>
>

FireBird: Posledni editace v DB

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 14.1.2005 00:49:03

Co to je external table CHAR(1) ??

To melo byt External UDF?? ??

>prilinkovat udf k fb,

UDF dll se snad je nahraje do adresare UDF..

> Vytvorit si external table CHAR(1), nahrat do ni udf , prilinkovat udf k
> fb,
> z fb spustit udf, ktere obsahuje vnc server, pripojit se na vnc server,
> doinstalovat OpenVPN.
>
> Slavek
>
>> Jestli to umis jen selectem, tak sem s tim. :)
>>
>> K tomu serveru mam pristup jen na tu DB.
>
>
>
>
>

FireBird: Posledni editace v DB

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 14.1.2005 00:41:03

Vytvorit si external table CHAR(1), nahrat do ni udf , prilinkovat udf k
fb,
z fb spustit udf, ktere obsahuje vnc server, pripojit se na vnc server,
doinstalovat OpenVPN.

Slavek

> Jestli to umis jen selectem, tak sem s tim. :)
>
> K tomu serveru mam pristup jen na tu DB.

FireBird: Posledni editace v DB

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.1.2005 00:05:00

Jan Rizek wrote:
> No to nevim, ale co se takhle podivat na datum_cas databazoveho souboru??

Jestli to umis jen selectem, tak sem s tim. :)

K tomu serveru mam pristup jen na tu DB.

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

FireBird: Posledni editace v DB

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 13.1.2005 23:48:59

No to nevim, ale co se takhle podivat na datum_cas databazoveho souboru??> Ahoj,
> muzu nejakym selectem (tr. ze "systemovych" tabulek) zjistit, kdy byla
> databaze naposledy editovana? Kdy byl naposledy
> pridan/upraven/... zaznam?
>
> --
> Jiri Cincura
> http://www.cincura.net/
> http://ID3renamer.cincura.net/
> ICQ#: 314711544
> http://photo.cincura.net/
> http://phorum.cincura.net/
> http://x2develop.com/
>
>
>
>

Palm OS x Windows

[*] Vlko II. <vlko(zv)zilina(tec)net> - 13.1.2005 23:04:55

On Thu, 13 Jan 2005 14:26:10 +0100, Lukas Gebauer <gebylist(zv)mlp(tec)cz> wrote:

> Napsani jakekoliv aplikace pro .NET CF je stejne jednoduche jako
> napsani normalni .NET aplikace. Ovsem potrebujes na to VisualStudio
> .NET. (Borland se zatim k podpore ComactFrameworku nejak stale
> nema...)

Momentalne vyvijam uz druhy mesiac db app pre pocket pc a mozem .Net CF
len odporucit. Predomnou bola rovnaka app vyvijana v C++ a za 6 mesiacov
bola cca zo 70 % hotova. Preslo sa ale na .Net, komplet sa to prepisalo a
za 2 mesiace je aplikacia na 98 % hotova. Cize rychlost vyvoja je
neporovnatelna, oproti normalnemu NET je to ale predsa len pomalsie.

Tak uz len rady o ktorych sa moc nepise:
- 64 kB tolko by mala mat max funkcia na inicializovanie formulara, je
to ale po kompilacii, cize nie je sposob ako to presne zistit,
jednoducho hodi null exception, cize nejake zlozite formulare robit
len manualne, ziaden design
- jednoznacne si zaobstarat .NET Compact Framework 1.0 SP2, ten sa mi
ale bohuzial nepodarilo zakomponovat to vs 2003, cize je mozna len
manualna instalacia do pocketa
- v emulatore pocket pc2002 nie je mozne pripojenie na server, nutne
stiahnut image minimalne pc2003, ja osobne odporucam priamo pocket pc
zariadenie program sa predsa len sprava trosku odlisne
- ak sa pouziva sql ce server, tak dost casto sweepovat db. Aplikaciu
inak pri komplikovanejsich dotazoch sa stava, ze padne, a neda sa to
v aplikacii osetrit
- stiahnut si smart device framework 1.2 :
http://www.opennetcf.org/PermaLink.aspx?guid=3a013afd-791e-45ef-802a-4c1dbe1cfef9
- este taky detail pri instalacii do najnovsich pocket pc 2003 se pri
instalacii
hlasi oznam, ze aplikacia nie je urcena pre tento system, nevsimol som si
ale
ziadnej nefunkcnosti

Aby som to nejak zhrnul, tak oproti normalnemu .Net frameworku je compact
podla
mojho nazoru v troska rannej faze, uvidime co prinesie vs 2005, uz aby tu
bolo:)


vlko

--


--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net

Vice retezcova hodnota

[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 13.1.2005 19:34:35

Zdravim,
opet programuju muj textovy editor, kdyz jsem narazil na problem. Kdyz
vytvarim pri spousteni aplikace slozku v Data Aplikaci, potrebuju nekde
zapsat cestu k teto slozce, ale u kazdeho uzivatele je jina. Chci to
zapisovat do registru, do vice retezcove promenne. Muzete me nekdo
poradit, jaka je na to funkce? Diky

Vice retezcova hodnota

[*] tondrej(zv)t-online.de - 13.1.2005 19:44:36

> Chci to zapisovat do registru, do vice retezcove promenne.
> Muzete me nekdo poradit, jaka je na to funkce? Diky

Napriklad v JCL, pozri si StringsToMultiSz v unite JclStrings:
http://sourceforge.net/projects/jcl/

HTH
TOndrej


Vsechny kombinace poradi danych cisel

[*] Winsoft <winsoft(zv)netkosice.sk> - 13.1.2005 19:02:33

> Tvoje reseni je 'hezci' a je presne podle script :),
> ale slozitost algoritmu je presne stejna .... to
> je o co tu bezi. Zrychleni (v radu nekolika malo %)
> je dosazeno jenom lepsim zpracovanim prace
> s pameti, a to jeste asi neni uplne optimalni.
> Kazdopadne jsme Bleakovi nepomohli ani jeden :(

problematicke v algoritme vidim akurat to zistovanie
duplicit. To by sa dalo asi dalo optimalizovat tak,
ze by sme prvky pred spustenim programu utriedili.
Potom staci sledovat susedne prvky a vynechavat
ak su rovnake, cize netreba extra cyklus pre kazdy
prvok ale jednym cyklom zistime vsetky duplicity.
To by uz IMHO mohol byt optimalmy alebo
"blizko" optimalny algoritmus. Samozrejme
ak je neopakujucich sa prvkov vela, tak
pocet ich permutacii je faktorial, s tym sa
neda nic robit.

Erik

Vsechny kombinace poradi danych cisel

[*] Rostislav Lekes <rlekes(zv)atlas(tec)cz> - 13.1.2005 18:22:30

OK, dik.
Tvoje reseni je 'hezci' a je presne podle script :),
ale slozitost algoritmu je presne stejna .... to
je o co tu bezi. Zrychleni (v radu nekolika malo %)
je dosazeno jenom lepsim zpracovanim prace
s pameti, a to jeste asi neni uplne optimalni.
Kazdopadne jsme Bleakovi nepomohli ani jeden :(
Rosta

> > Dam se podat :) Muzes prosim tu funkci nebo proceduru napsat, zacalo me
to
> > zajimat :).
>
> type TArray = array [1..6] of Integer;
>
> procedure Vymen(var x, y: Integer);
> var temp: Integer;
> begin
> temp := x; x := y; y := temp;
> end;
>
> procedure Permutacie(var p: TArray; od: Integer);
> var
> i, j: Integer;
> Vynechaj: Boolean;
> begin
> if od = High(p) then
> Vypis(p)
> else
> for i := od to High(p) do
> begin
> Vynechaj := False;
> for j := od to i - 1 do
> if p[i] = p[j] then
> begin
> Vynechaj := True;
> Break;
> end;
>
> if not Vynechaj then
> begin
> Vymen(p[od], p[i]);
> Permutacie(p, od + 1);
> Vymen(p[od], p[i]);
> end;
> end;
> end;
>
> procedure TForm.Button1Click(Sender: TObject);
> var p: TArray;
> begin
> p[1] := 1;
> p[2] := 2;
> p[3] := 2;
> p[4] := 3;
> p[5] := 4;
> p[6] := 5;
>
> Permutacie(p, 1);
> end;
>
> Erik
>
>
>
>

Vsechny kombinace poradi danych cisel

[*] bleak vm <bleak(zv)mvesely(tec)com> - 13.1.2005 18:00:28

dekuji vsem, uz je mi jasne, ze reseni meho zadani je permutace s
opakovanim. Pocet kombinaci je n!, kde n je pocet cisel.
Pro muj ucel zcela nevhodne, protoze pro vetsi pocet cisel to trva
prilis dlouho. Patrne bych potreboval neco jako geneticky algoritmus.

bleak

FireBird: Posledni editace v DB

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 13.1.2005 17:36:26

Ahoj,
muzu nejakym selectem (tr. ze "systemovych" tabulek) zjistit, kdy byla databaze naposledy editovana? Kdy byl naposledy
pridan/upraven/... zaznam?

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

FB - Select

[*] Jakub Dusek <jakub.dusek(zv)gmail(tec)com> - 13.1.2005 16:42:21

Ahoj,
IMHO je tam problem pokud je mesic vetsi nez 1 a mensi nez 10. Nikde
se tam nedoplnuje 0. Tzn. '20049' > '200410'.

Jakub Dusek, dusek(zv)COREXPERT.COM
---
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232

On Thu, 13 Jan 2005 16:02:18 +0100, Jaroslav Uher <jarek(zv)iuher(tec)cz> wrote:
> Ahoj,
>
> nejak si nevim rady, s prostym selectem :-(
> Potrebuji vybrat zaznamy za obdobi, kde
> MZDA1R (rok) a MZDA1M (mesic), jsou oba SmallInt
>
> napr.:
> SELECT DT_ODJEZD, MZDA1R,MZDA1M,
> CAST(MZDA1R || MZDA1M AS VARCHAR(10)) AS MZDAZA,
> ID FROM STAZKA
>
> WHERE (CAST(MZDA1R || MZDA1M AS VARCHAR(10)) <= '200501'
> AND CAST(MZDA1R || MZDA1M AS VARCHAR(10)) >= '200410')
>
> porad to vybira zaznamy i pred '200410'
>
> Na pretypovani CAST v podmince WHERE netrvam.
>
> Melo by to fungovat i na FB 1.03, i kdyz ani na 1.5.1 se nemohu
> doparat spravneho vysledku.
>
> Dekuji za jakoukoli radu,
>
> s pozdravem
>
> Jarek Uher
>
>

FB - Select

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 13.1.2005 16:38:21

Tohle je jasny, co vznike souctem stringu '2004' a '3' napriklad?
Takze by to chtelo nejak takle:
WHERE (MZDA1R*100+MZDA1M)>200410 ...

Slavek

> MZDA1R (rok) a MZDA1M (mesic), jsou oba SmallInt
>
> napr.:
> SELECT DT_ODJEZD, MZDA1R,MZDA1M,
> CAST(MZDA1R || MZDA1M AS VARCHAR(10)) AS MZDAZA,
> ID FROM STAZKA
>
> WHERE (CAST(MZDA1R || MZDA1M AS VARCHAR(10)) <= '200501'
> AND CAST(MZDA1R || MZDA1M AS VARCHAR(10)) >= '200410')
>
> porad to vybira zaznamy i pred '200410'

FB - Select

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 13.1.2005 16:02:18

Ahoj,

nejak si nevim rady, s prostym selectem :-(
Potrebuji vybrat zaznamy za obdobi, kde
MZDA1R (rok) a MZDA1M (mesic), jsou oba SmallInt

napr.:
SELECT DT_ODJEZD, MZDA1R,MZDA1M,
CAST(MZDA1R || MZDA1M AS VARCHAR(10)) AS MZDAZA,
ID FROM STAZKA

WHERE (CAST(MZDA1R || MZDA1M AS VARCHAR(10)) <= '200501'
AND CAST(MZDA1R || MZDA1M AS VARCHAR(10)) >= '200410')

porad to vybira zaznamy i pred '200410'

Na pretypovani CAST v podmince WHERE netrvam.

Melo by to fungovat i na FB 1.03, i kdyz ani na 1.5.1 se nemohu
doparat spravneho vysledku.

Dekuji za jakoukoli radu,

s pozdravem

Jarek Uher

Prace s Wordem

[*] Skalsky Milan <skalsky(zv)komercpoj(tec)cz> - 13.1.2005 15:44:17

Ahoj, pouzivam tohle a facha to ... v podstate jde jen o to nadefinovat vlastnost ConnectKind objektu TWordApplication na ckRunningInstance


uses .... WordXP, OleServer,ComCtrls ... a mozna i dalsi ...
var
WordApp :TWordApplication;
WordDoc :TWordDocument;
.........
WordApp.AutoConnect := false;
WordApp.AutoQuit := false;
/*****/
WordApp.ConnectKind := ckRunningInstance;
/*****/
WordApp.Connect;
...
WordApp.Disconnect;
.....


Milan
-----Original Message-----
Subject: Prace s Wordem

Bohuzel se mi ale otevira pokazde nova instance Wordu. Nevite nekdo jak
zajistit, aby se Word otevrel jednou a pak dalsi dokumenty otviraly v ramci
jedne instance? Pri ukoncovani nasledne otevrenych wordu dochazi ke kolizi s
Normal.dot.

Diky


Vsechny kombinace poradi danych cisel

[*] Winsoft <winsoft(zv)netkosice.sk> - 13.1.2005 15:16:15

> Dam se podat :) Muzes prosim tu funkci nebo proceduru napsat, zacalo me to
> zajimat :).

type TArray = array [1..6] of Integer;

procedure Vymen(var x, y: Integer);
var temp: Integer;
begin
temp := x; x := y; y := temp;
end;

procedure Permutacie(var p: TArray; od: Integer);
var
i, j: Integer;
Vynechaj: Boolean;
begin
if od = High(p) then
Vypis(p)
else
for i := od to High(p) do
begin
Vynechaj := False;
for j := od to i - 1 do
if p[i] = p[j] then
begin
Vynechaj := True;
Break;
end;

if not Vynechaj then
begin
Vymen(p[od], p[i]);
Permutacie(p, od + 1);
Vymen(p[od], p[i]);
end;
end;
end;

procedure TForm.Button1Click(Sender: TObject);
var p: TArray;
begin
p[1] := 1;
p[2] := 2;
p[3] := 2;
p[4] := 3;
p[5] := 4;
p[6] := 5;

Permutacie(p, 1);
end;

Erik

Prace s Wordem

[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 13.1.2005 15:00:13

Ahoj!

Pro praci s Wordem pouzivam nasledujici konstrukci:

procedure TForm1.Button1Click(Sender: TObject);
var
Word: OLEVariant;
begin
try
Word := CreateOleObject(`Word.Application`);
Word.Visible := True;
Word.Documents.Open(FileName);

atd...

Bohuzel se mi ale otevira pokazde nova instance Wordu. Nevite nekdo jak
zajistit, aby se Word otevrel jednou a pak dalsi dokumenty otviraly v ramci
jedne instance? Pri ukoncovani nasledne otevrenych wordu dochazi ke kolizi s
Normal.dot.

Diky

Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/

Zpracovani v SAX

[*] Petr Vones <konference(zv)petrvones(tec)net> - 13.1.2005 14:58:13

From: "Petr BRABEC" <petr.brabec(zv)elra(tec)cz>
> S touto myslenkou jsem si take zahraval, ale pak jsem ji zatim odmitl. Zda
> se mi to trochu slozite psat vlastni parser, a taky budu muset v jinem tagu
> odpovedet. Navic mi muze tech tagu prijit nekolik velmi rychle za sebou.

To je ten dokument tak velky ze se nevyplati pouzit DOM parser, ktery ma i
vcelku dobre rozhrani primo v Delphi ?

Petr Vones

Pamet alokovana aplikaci

[*] Petr Vones <konference(zv)petrvones(tec)net> - 13.1.2005 14:54:12

From: <jsdelphi(zv)creatix(tec)cz>
> Delphi 5 Professional

Tak to je jasne. Patrne pouzivate komponenty s Glyph property (TSpeedButton,
TBitBtn atd). V Delphi 5 je chyba v TBitmap ktera zpusobuje pomerne velkou
zatez GDI zdroju (v Delphi 6 uz je to opravene). Jako castecne reseni lze
pouzit toto: http://cc.borland.com/ccweb.exe/listing?id=14485

Petr Vones

Problemy s webservices v Delphi 7

[*] Jakub Dusek <jakub.dusek(zv)gmail(tec)com> - 13.1.2005 13:52:07

Dobry napad, nenapadlo me ze by mohl existovat i jiny framework :)
Podivam se na to. Jinak kdyby bylo na me tak bych se uz z C# a .NET
taky nehnul, ale tohle je starsi aplikace a nepocita se v ni s takovym
mnozstvim novych funkcnosti aby se ji vyplatilo prepsat na .NET v C#.

Diky.

Jakub Dusek

On Thu, 13 Jan 2005 13:16:04 +0100, Petr Vones <konference(zv)petrvones.net> wrote:
>
> Podpora webservices v Delphi Win32 je dost slaba a je potreba si opravit
> nektere chyby aby to slo vubec pouzivat. Pokud je opravdu nutne pouzivat
> Delphi tak je asi vhodne pouzit jiny framework, budto IndySOAP nebo MSSOAP
> ktere jsou zdarma, nebo RemObjects. Logicky z toho vyplyva ze by bylo asi
> nejlepsi prehodnotit vyvoj takove aplikace v Delphi Win32.
>
> Petr Vones
>
>

Pamet alokovana aplikaci

[*] jsdelphi(zv)creatix(tec)cz - 13.1.2005 13:52:07

> Pokud jde o GDI zdroje, jaka je to verze Delphi ?

Delphi 5 Professional

Jan Skopovy

CREATIX s.r.o.
tel/fax: +420 222 564 426
mobil: +420 776 097 202
email: js(zv)creatix(tec)cz
www.creatix(tec)cz

Palm OS x Windows

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 13.1.2005 13:52:07

Zdravicko,
pokusim se strucne nasmerovat:

Palm platforma:
- dneska uz podle meho nazoru trochu straci dech
- neni tu zadny jednoduse pouzitelny a castecne kompatibilni DB
system s desktopovou verzi
+ efektivni rozhrani
+ vyvojove prostredi i pro pascal (od Winsoftu)

Zacni treba na WinSoft.sk a stahni si jejich prostredi.

Windows platforma:
- celkem mizerna implementace velke casti funkci
- spise rozpacita moznost pouziti, diskutabilni vyuzitelnost
- napsat i jednoduchou aplikaci "Helo world" obnasi cca 2 strany kodu
- silene ukecane programovani (neco jako psat program ve Borland Pascalu
pro Windows pod ObjectWindows [neplast s ObjectPascalem]),
silene dlouhy nazev snad pro kazdou objekt/funkci
+ vyvojove prostredi je zdarma
+ solidni podpora pro multimedia a nove technologie
+ Pocket SQL server

Prostredi pro RAD programovani najdes na strankach MS
pod nazvem Microsoft eMbedded Visual C++? 4.0 SP3

U obou budes jeste potrebovat SDK.

Nevim jak je to ted, ale drive to bylo tak, ze pokud nemas Palm PDA
budes jeste potrebovat PalmOS ROM a ten neni soucasti SDK a je nutno
se upsat Palmu. Pak ti otevrou web kde budes moct stahovat ROM.

Jinak ostatni vlastnosti jsou asi stejne.> Dobry den,
> budeme vytvaret aplikaci pro prenosne zarizeni a jsme v bode, kdy bude potreba se
rozhodnout
> pro platformu a nasledne i pro nejaky konkretni hardware. Potreboval bych nasmerovat,
kde by se
> na internetu daly najit informace na toto tema, pripadne pokud ma nekdo zkusenosti a byl
by
> ochoten se o ne podelit. Nase aplikace v prenosnem zarizeni bude komunikovat s pocitacem
v
> podstate on-line pres WiFi.

Pokud bude porat on-line, tak bych se na nejakou pocket aplikaci tak
akurat vykaslal a napsal to jako webovou aplikaci. Pak ti to bude fungovat
na jekekoliv pocket platforme a nebudes se muset trapit s pocket aplikaci.

Vaclav Halik

Vsechny kombinace poradi danych cisel

[*] Rostislav Lekes <rlekes(zv)atlas(tec)cz> - 13.1.2005 14:28:10

Dam se podat :) Muzes prosim tu funkci nebo proceduru napsat, zacalo me to
zajimat :).
Rosta
----- Original Message -----
From: "Winsoft" <winsoft(zv)netkosice.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, January 13, 2005 12:09 PM
Subject: Re: Vsechny kombinace poradi danych cisel


> > Netvrdim, ze tu funkci nejde optimalizovat, ale ne radove ... Tvuj
postup
> s
>
> no ja tam vidim znacne neoptimalnosti:
>
> 1. polia sa predavaju hodnotou
> 2. dynamicky sa vyraba vysledny string
>
> Rekurzivny program, ktory som tu popisal, nic take nepouziva
> a je preto podstatne rychlejsi.
>
> Erik
>
>
>
>
>

Palm OS x Windows

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

> Windows platforma:
> - celkem mizerna implementace velke casti funkci
> - spise rozpacita moznost pouziti, diskutabilni vyuzitelnost
> - napsat i jednoduchou aplikaci "Helo world" obnasi cca 2 strany kodu
> - silene ukecane programovani (neco jako psat program ve Borland
> Pascalu
> pro Windows pod ObjectWindows [neplast s ObjectPascalem]),
> silene dlouhy nazev snad pro kazdou objekt/funkci
> + vyvojove prostredi je zdarma
> + solidni podpora pro multimedia a nove technologie
> + Pocket SQL server

Rekl bych, ze vsechny tebou zminene nevyhody odstranuji novejsi
PPC2002 a WM2003, pokud pouzijes .NET CompactFramework. (orezana
verze normalniho .NET Frameworku)

Napsani jakekoliv aplikace pro .NET CF je stejne jednoduche jako
napsani normalni .NET aplikace. Ovsem potrebujes na to VisualStudio
.NET. (Borland se zatim k podpore ComactFrameworku nejak stale
nema...)
--
Lukas Gebauer.

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

konverzia SDA do DBF

[*] Vakonic Pavol <vakonic(zv)tyory.sk> - 13.1.2005 14:02:08

to som pozeral, nic tam nie je, ne internete som tiez nic ine nenasiel.

palo


> From: "Vakonic Pavol" <vakonic(zv)tyory.sk>
> Sent: Wednesday, January 12, 2005 9:05 AM
> > vedeli by ste mi poradit utilitu alebo zistit aku ma hlavicku subor SDA
?
> > Mala by to byt byt nejaka databaza, ktoru poiziva stary soft co bol
pisany
> > v C-cku, potrebujem z nej vytiahnut udaje do noveho SW co robim v
Delphi.
> > Keby som poznal hlavicku, tak by som si vedel urobit na to utilitu v
> > pascale, resp. v delphi.
>
> Pozri sa sem mozno je tam to co potrebujes:
> http://www.vital-soft.com/html/sdafiles.htm
>
> Lauko.

Problemy s webservices v Delphi 7

[*] Petr Vones <konference(zv)petrvones(tec)net> - 13.1.2005 13:16:04

From: "Jakub Dusek" <delphi(zv)corexpert.com>
> Delphi 7 Update 1 samozrejme mam, ale nepomaha. Takze otazka zni
> jestli na tohle nekdo narazil a nenapada ho jak to resit :) Uprava WS
> tak aby ji zvladlo volat standardne Delphi nepripada v uvahu, sice ji
> vyvijim taky ja, ale podleha standardum zakaznika. Jedine co me napada
> je skladat si XML sam a vykaslat se na Delphi podporu...

Podpora webservices v Delphi Win32 je dost slaba a je potreba si opravit
nektere chyby aby to slo vubec pouzivat. Pokud je opravdu nutne pouzivat
Delphi tak je asi vhodne pouzit jiny framework, budto IndySOAP nebo MSSOAP
ktere jsou zdarma, nebo RemObjects. Logicky z toho vyplyva ze by bylo asi
nejlepsi prehodnotit vyvoj takove aplikace v Delphi Win32.

Petr Vones

Pamet alokovana aplikaci

[*] Petr Vones <konference(zv)petrvones(tec)net> - 13.1.2005 12:38:01

From: <jsdelphi(zv)creatix(tec)cz>
> Muzete mi nekdo prosim poradit, jak muzu odzkouset, jakym zpusobem moje
> aplikace alokuje pamet (kolik pameti), zda se vse spravne uvolnuje, atd.
> Nikdy jsem se timto nezabyval. Vyjimecne se mi stava, ze u zakaznika dojdou
> prostredky nebo to ohlasi malo pameti pri nacitani ikonek (bitmapek).

Pokud jde o GDI zdroje, jaka je to verze Delphi ?

Petr Vones

Pamet alokovana aplikaci

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 13.1.2005 12:19:59

Ahoj,
alokovanou pamet zjistuji takhle :

HeapStatus : THeapStatus;

HeapStatus := GetHeapStatus;
HeapStatus.TotalAllocated..


ale jak na prostredky nevim.

Vaclav Sazima

jsdelphi(zv)creatix(tec)cz wrote:
> Muzete mi nekdo prosim poradit, jak muzu odzkouset, jakym zpusobem moje
> aplikace alokuje pamet (kolik pameti), zda se vse spravne uvolnuje, atd.
> Nikdy jsem se timto nezabyval. Vyjimecne se mi stava, ze u zakaznika dojdou
> prostredky nebo to ohlasi malo pameti pri nacitani ikonek (bitmapek).

Vsechny kombinace poradi danych cisel

[*] Winsoft <winsoft(zv)netkosice.sk> - 13.1.2005 12:09:58

> Netvrdim, ze tu funkci nejde optimalizovat, ale ne radove ... Tvuj postup
s

no ja tam vidim znacne neoptimalnosti:

1. polia sa predavaju hodnotou
2. dynamicky sa vyraba vysledny string

Rekurzivny program, ktory som tu popisal, nic take nepouziva
a je preto podstatne rychlejsi.

Erik


Pamet alokovana aplikaci

[*] David Kraina <dkx(zv)seznam(tec)cz> - 13.1.2005 12:05:58

Kolik pameti alokuje zjistis ze spravce procesu (pouze NT, pod W9x existuji ruzne programky), a vsechny zdroje BY windows mel uvolnovat sam.

Pocitani s velkymi cisly

[*] tomsir1.edu(zv)mail.cez(tec)cz - 13.1.2005 11:27:53


huh, to je nepresnost z me strany ... mel jsem na mysli PE hlavicku exe
souboru, ve ktere je spousta zajimavych informaci, napr. jiz uvedene
importy API funkci z dll knihoven napr. operacniho systemu a spousta
dalsich, jako je treba informace o ImageBase, dale treba seznam
exportovanych funkci /coz ma vyznam hlavne pro dll/ atd. atd.
Kdyz pouzijes napr. API funkci GetProcAddress z kernel32.dll, tak v tabulce
importu je po natazeni exe do pameti PE loaderem dosazena konkretni adresa
one API funkce a prostrednictvim teto adresy je ta funkce potom v kodu
zavolana ...

Kdyz bych to vzal doslova, tak ti odpovim, ze PE soubor je kazdy exe
soubor, ktery ma PE hlavicku :O))"Tomas Bradle" <t.bradle(zv)sanet(tec)cz>(zv)clexpert(tec)cz on 13.01.2005 11:13:52


Promin mi mou slabomyslnost, ale nedokazu si presne vybavit co to je PE
soubor.

diky

Pamet alokovana aplikaci

[*] jsdelphi(zv)creatix(tec)cz - 13.1.2005 11:17:52

Muzete mi nekdo prosim poradit, jak muzu odzkouset, jakym zpusobem moje
aplikace alokuje pamet (kolik pameti), zda se vse spravne uvolnuje, atd.
Nikdy jsem se timto nezabyval. Vyjimecne se mi stava, ze u zakaznika dojdou
prostredky nebo to ohlasi malo pameti pri nacitani ikonek (bitmapek).

Diky

Jan Skopovy

CREATIX s.r.o.
tel/fax: +420 222 564 426
mobil: +420 776 097 202
email: js(zv)creatix(tec)cz
www.creatix(tec)cz

Pocitani s velkymi cisly

[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 13.1.2005 11:13:52

Promin mi mou slabomyslnost, ale nedokazu si presne vybavit co to je PE
soubor.

diky

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


----- Original Message -----
From: "Ing. Radek Tomsik" <radek(zv)tomsige(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, January 12, 2005 9:54 PM
Subject: Re: Pocitani s velkymi cisly


>
> > Sifrovat importy v PE souboru? Souhlasim, to vazne neni dobry napad.
>

VarArrayOf a MemProof

[*] delphin(zv)post(tec)cz - 13.1.2005 10:59:51

> VarArrayOf pouzivam casto v e volani Locate v datasetech, je-li hledani
> pres vice sloupcu, napr.
>
> DSet.Locate('ID;NAZEV', VarArrayOf([id, mujstring]), []);
>
> MemProof u kazdeho takoveho pouziti tvrdi, ze interne vznikne jakysi
> OLE string, ktery neni nikdy uvolnen. Ja jsem ale nenasel zpusob, jak
> jej uvolnit a ani v prikladech na internetu, kde se VarArrayOf pouziva,
> nikdo nic takoveho nedela.
>
> Nevite nekdo, kde je zakopany pes?

Zkusil bych nekolikrat opakovat DSet.Locate('ID;NAZEV', VarArrayOf([id,
mujstring]), []) a jako mujstring dat co mozna nejdelsi string. Pokud nebude
narustat alokovana pamet je chyba v MemProof.

Slozky

[*] Kadane Miroslav <miroslav.kadane(zv)cht-pce(tec)cz> - 13.1.2005 10:39:49

Idealni je pouzit ForceDirectory - nebo tak nejak, tohle vytvori adresar a podadresare - pokud neexistuji

________________________________

Od: delphi-l-owner(zv)clexpert(tec)cz za uzivatele Petr Berek
Odeslano: st 12.1.2005 19:18
Komu: delphi-l(zv)clexpert(tec)cz
Predmet: Slozky



Zdravim,
narazil jsem na takovy problem, jak vytvorit pomoci delphi slozku na
disku. Snazil jsem vselijake hesla v napovede, ale na nic jsem neprisel.
Diky za radu.

VarArrayOf a MemProof

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 13.1.2005 10:07:42

Ahoj,

pri zkouseni aplikace MemProofem jsem zjistil, ze je udajne
problematicke pouzivani VarArrayOf, je-li nekterym variantem v poli
string.

VarArrayOf pouzivam casto v e volani Locate v datasetech, je-li hledani
pres vice sloupcu, napr.

DSet.Locate('ID;NAZEV', VarArrayOf([id, mujstring]), []);

MemProof u kazdeho takoveho pouziti tvrdi, ze interne vznikne jakysi
OLE string, ktery neni nikdy uvolnen. Ja jsem ale nenasel zpusob, jak
jej uvolnit a ani v prikladech na internetu, kde se VarArrayOf pouziva,
nikdo nic takoveho nedela.

Nevite nekdo, kde je zakopany pes?

Diky

David Lebeda

Problemy s webservices v Delphi 7

[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 13.1.2005 09:29:37

Ahoj,
po delsi dobe jsem se opet kvuli stare aplikaci vratil k Delphi, musim
zapracovat nejakou funkcnost, ktera vola webovou sluzbu (v C#, ale to
neni podstatne).

Uz jsem nejakou jednoduchou webovou sluzbu v Delphi pouzil tak jsem si
myslel ze to Delphi umi bez problemu, ale ted jsem narazil na
nasledujici problemy...

1) Delphi zrejme nerozchodi pokud ma vstupni parametr (komplexni typ)
nastaven vlastni namespace, vytrvale se to snazi posilat s namespacem
webove metody. Pripada mi ze spis obecne nerozchodi pokud request nebo
response obsahuje komlexni typ s vlastnim namespacem...

2) Pokud mam ve WSDL vic enumu, z nichz nektere jejich hodnoty se
jmenuji stejne (konkretne Unspecified), tak Delphi to v proxy tride
vytvori jako Unspecified, Unspecified2 atd., coz by v proxy trid
vcelku nevadilo, vadi ze to takhle posila i zpatky... Coz samozrejme
neprojde validaci.

Delphi 7 Update 1 samozrejme mam, ale nepomaha. Takze otazka zni
jestli na tohle nekdo narazil a nenapada ho jak to resit :) Uprava WS
tak aby ji zvladlo volat standardne Delphi nepripada v uvahu, sice ji
vyvijim taky ja, ale podleha standardum zakaznika. Jedine co me napada
je skladat si XML sam a vykaslat se na Delphi podporu...

Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
odesilani smsek, vizitek, log a melodii, snadna integrace do Vaseho IS
=> Sms GateKeeper, Sms GateKeeper Service


Zpracovani v SAX

[*] Petr BRABEC <petr.brabec(zv)elra(tec)cz> - 13.1.2005 09:09:34

S touto myslenkou jsem si take zahraval, ale pak jsem ji zatim odmitl. Zda
se mi to trochu slozite psat vlastni parser, a taky budu muset v jinem tagu
odpovedet. Navic mi muze tech tagu prijit nekolik velmi rychle za sebou.
Petr BRABEC

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Dalibor Toman
Sent: Wednesday, January 12, 2005 5:30 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Zpracovani v SAX

Petr BRABEC <petr.brabec(zv)elra(tec)cz> wrote:
> Dobry den,
>
> Potrebuji radu, nebo nejlepe nejaky priklad.
>
>
> Mam vzdy 1 XML tag s nekolika atributy. Potrebuji priradit promennym
> hodnotu z tech atributu. Myslim, ze nejlepsi to bude udelat pres
> SAX.
> Ale jak to udelat, kdyz mam vzdy jeden tag. To je v tu chvili cely
> dokument.

a neni to zbytecne velike kladivo? Co takhle rozparsovat ty radky
vlastnim kodem? Najit hodnoty atributu by nemel byt tak velky problem
(napriklad: regularni vyraz , v cyklu precist vsechny 'matche' a je
to)

Dalibor Toman

Slozky

[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 13.1.2005 08:53:33

Nebo jeste ForceDirectories - vytvori cely strom.

Jirka Matejka

==>Wednesday, January 12, 2005 7:24 PM cizek.milan(zv)seznam(tec)cz wrote:

>> Zdravim,
>> narazil jsem na takovy problem, jak vytvorit pomoci delphi slozku na
>> disku. Snazil jsem vselijake hesla v napovede, ale na nic
>> jsem neprisel.
>> Diky za radu.
>
> CreateDir ze SysUtils.
>
> S pozdravem Milan Cizek, amatersky programator, D7 Ent
> Win2k (SP4) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


OT: Palm OS x Windows

[*] Marek Dostal <konf(zv)agnis(tec)cz> - 13.1.2005 08:31:32

Dobry den,
budeme vytvaret aplikaci pro prenosne zarizeni a jsme v bode, kdy bude potreba se rozhodnout pro platformu a nasledne i pro nejaky konkretni hardware. Potreboval bych nasmerovat, kde by se na internetu daly najit informace na toto tema, pripadne pokud ma nekdo zkusenosti a byl by ochoten se o ne podelit. Nase aplikace v prenosnem zarizeni bude komunikovat s pocitacem v podstate on-line pres WiFi.

Marek Dostal
D7Prof, WinXP Home, FireBird 1.0, 1.5

Vsechny kombinace poradi danych cisel

[*] Rostislav Lekes <rlekes(zv)atlas(tec)cz> - 13.1.2005 06:51:24

Nejak nechapu Tebe, ani Erika :)

'tvoje' funkce je prepsana z toho co jsem Ti psal, navic spatne, u
dynamickeho pole by
ten cyklus mel zacinat 0 , takhle vynechas prvni prvek v poli, ale to je
detail.

Kombinaci (permutaci) je skutecne mnoho, ale jake zadani, takovy vysledek :)

Ta rekurze se vola presne tolikrat, kolik je potreba, zadne duplicity tam
nejsou .....
Zadne 'vymeny' vynechat nemuzes, kdyz si projdes vysledky tak zjistis, ze se
Ti tam nic
neopakuje ... doporucuju na mensim poctu prvku s nizsim vyskytem :). To co
navrhuje
Erik, uz je v algoritmu obsazeno ... Rekurze vytvari strom reseni, kde se v
kazdem uzlu
vytvari maximalne 1 vetev pro kazdy prvek, takze jeho myslenka
...Permutacie(<1, 2, 2, 3, 4>) =
... <1, Permutacie(<2, 2, 3, 4>)> +
... <2, Permutacie(<1, 2, 3, 4>)> +
... <2, Permutacie(<2, 1, 3, 4>)> + // toto vynechaj
... <3, Permutacie(<2, 2, 1, 4>)> +
... <4, Permutacie(<2, 2, 3, 1>)>
je jiz automaticky zohlednena ...

Jestli potrebujes neco rychlejsiho s mensim poctem reseni, zmen zadani :)

Netvrdim, ze tu funkci nejde optimalizovat, ale ne radove ... Tvuj postup s
vynechanim
pole prvku je dobry (i kdyz nezrychluje), naopak jsi to zpomalil tim, ze se
fce zbytecne
vnoruje o stupen dolu i pro kazde reseni. Pokud je reseni miliony, neni to
zanedbatelne.
Pro trivialni pripad pole [4,4,4] existuje 34650 reseni, funkce se musi
volat 75601 krat,
ale ty ji volas 110251 krat ( = 34650 + 75601).
Pouzij puvodni strukturu podminek. Promena 'j' je nesmyslna, tu vyhod.
Dalsi moznost je zbavit se zbytecnych konverzi StrToInt a opakovaneho
zjistovani High toho pole.
Jsou to sice drobnosti, ale v rekurzich se na to hraje, kazdy detail se
nasobi poctem volani ...
Jestli ocekavas, ze najdes radove lepsi reseni, obavam se, ze nenajdes ...
Rosta
PS: nejpomalejsi z cele funkce je samozrejmne ten vypis do Mema, minimalne
po dobu vypoctu
vypni prekreslovani.
> dekuji za namety, hruba sila je na moc dlouho. Vyrobil jsem funkci,
> ktera je nize. Kombinaci je obrovske mnozstvi, desitky milionu.
> Potreboval bych to nejak optimalizovat. Resenim by bylo vynechani vymeny
> stejnych cisel jak navrhuje Erik, zatim mne nenapada, jak funkci
> modifikovat. Nejsem dobry matematik, zkusim se podivat na permutace a
> budu vdecny za pripadne dalsi tipy.
>
> bleak
>
> function TForm1.vypisuj(pocty: array of Integer;vysledek:string):string;
> var
> i,j:integer;
> begin
> if (array_sum(pocty)=false) Then Begin
> form1.Memo1.LineS.add(vysledek);
> end else begin
> for i:=1 to high(pocty) Do begin
> j:=pocty[i];
> if (j>0) Then Begin
> Dec(pocty[i]);
> vypisuj(pocty, vysledek + IntToStr(i));
> Inc(pocty[i]);
> end;
> end;
> end;
> end;
>
>
>
>

Vsechny kombinace poradi danych cisel

[*] Winsoft <winsoft(zv)netkosice.sk> - 12.1.2005 23:10:51

> dekuji za namety, hruba sila je na moc dlouho. Vyrobil jsem funkci,
> ktera je nize. Kombinaci je obrovske mnozstvi, desitky milionu.
> Potreboval bych to nejak optimalizovat. Resenim by bylo vynechani vymeny

skus pouzit rekurziu, t.j. rozdel si skupiny podla prveho prvku
(ziskas ich vymenou prveho prvku s i-tym prvkom) a k prvemu
prvku potom rekurzivne doplnt permutaciu zvysnych prvkov.

Priklad:

Permutacie(<1, 2, 3, 4>) =
<1, Permutacie(<2, 3, 4>)> +
<2, Permutacie(<1, 3, 4>)> +
<3, Permutacie(<2, 1, 4>)> +
<4, Permutacie(<2, 3, 1>)>

ked sa cisla opakuju, ktore vymienas opakuju, tak ich vynechavaj:

Permutacie(<1, 2, 2, 3, 4>) =
<1, Permutacie(<2, 2, 3, 4>)> +
<2, Permutacie(<1, 2, 3, 4>)> +
<2, Permutacie(<2, 1, 3, 4>)> + // toto vynechaj
<3, Permutacie(<2, 2, 1, 4>)> +
<4, Permutacie(<2, 2, 3, 1>)>

Erik

ownerdraw popupmenu

[*] Cizek Milan <cizek.milan(zv)seznam(tec)cz> - 12.1.2005 22:56:50

Ahoj,
kreslim si vlastni menu, v MeasureItem nastavuji jen velikost a v DrawItem
resim ostatni. Vlevo mam vykresleny obdelnik jine barvy (obtazeny psSolid),
do ktereho nasledne maluji pri stavu checked obrazky z image listu. Problem
je, ze pokud levy obdelnik vykresluji od zhora dolu (spolecny pro vsechny
polozky, prekresli mi to i ty stavy. Snazil jsem se tento obdelnik presunout
do MeasureItem, nevim proc, ale na ten canvas mi to zaboha nic nevykresli.
Zkousel jsem metody ACanvas, take treba Rectangle na ACanvas.Handle - take
nic. Nevite nekdo jak to vyresit? Diky.

S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP4) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

Vsechny kombinace poradi danych cisel

[*] bleak vm <bleak(zv)mvesely(tec)com> - 12.1.2005 21:58:46

dekuji za namety, hruba sila je na moc dlouho. Vyrobil jsem funkci,
ktera je nize. Kombinaci je obrovske mnozstvi, desitky milionu.
Potreboval bych to nejak optimalizovat. Resenim by bylo vynechani vymeny
stejnych cisel jak navrhuje Erik, zatim mne nenapada, jak funkci
modifikovat. Nejsem dobry matematik, zkusim se podivat na permutace a
budu vdecny za pripadne dalsi tipy.

bleak

function TForm1.vypisuj(pocty: array of Integer;vysledek:string):string;
var
i,j:integer;
begin
if (array_sum(pocty)=false) Then Begin
form1.Memo1.LineS.add(vysledek);
end else begin
for i:=1 to high(pocty) Do begin
j:=pocty[i];
if (j>0) Then Begin
Dec(pocty[i]);
vypisuj(pocty, vysledek + IntToStr(i));
Inc(pocty[i]);
end;
end;
end;
end;

Pocitani s velkymi cisly

[*] Ing. Radek Tomsik <radek(zv)tomsige(tec)cz> - 12.1.2005 21:58:46

Diky, zde je opravdu dost dobreho studijniho materialu na dane tema !
Co se tyce toho google, samozrejme jsem hledal, jen jsem zadaval jina
hesla a tudiz jsem nachazel jine odkazy, ktere mne neuspokojily, a proto
jsem se obratil na konferenci.

Diky
Radek

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

Jo tak v ASM.
http://map.tni.nl/sources/external/z80bits.html

Jinak ovsem staci pouzit google, kdo by to jen cekal ze ?
http://www.google.com/search?hl=en&lr=&c2coff=1&q=high+precision+math+de
lphi&btnG=Search

Jak zmenit prioritu procesu

[*] delphin(zv)post(tec)cz - 12.1.2005 21:56:45

Seznam a handle vsech procesu se ziska pomoci CreateToolhelp32Snapshot a
Process32First a Process32Next. Priorita procesu se zmeni pomoci
SetPriorityClass.

Pocitani s velkymi cisly

[*] Ing. Radek Tomsik <radek(zv)tomsige(tec)cz> - 12.1.2005 21:54:45



> Sifrovat importy v PE souboru? Souhlasim, to vazne neni dobry napad.

To je naopak jedna z nejlepsich moznosti, jak se branit cracknuti
programu tim, ze zmatnes exe dumpery, k tomu urcene tak, ze ten program
po dumpnuti nebude funkcni a importy nepujdou jednoduse rekonstruovat,
pokud navic pouzijes desifrovani on-the-fly (samozrejme castecne za cenu
zpomaleni programu) tak je to temer neprustrelne i pro manualni
unpack... o tomhle opravdu neco vim ;o)
Radek

Pocitani s velkymi cisly

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.1.2005 21:08:41

Puvodni zprava ze dne 12.1.2005:

> No to ja prave nechci, ja se tim chci prokousat a pochopit to.

No tak to je pak jina.

> Misto toho, abys hodnotil uroven mych znalosti dane problematiky bych
> mnohem vic uvital, kdybys mi poskytl odkazy na priklady na dane tema a
> ostatni literaturu,

No to mas nejlepsi si najit takovou implementaci bignum, ktera ma v
sobe uz ty prislusne funkce, protoze jak jsem uz rekl, co bignum, to
jine bignum.

Odkaz: www.google.com a hledej a hledej, jsou toho tuny, to tezko sem
vsechno opisovat... A zacit muzes treba na OpenSSL nebo podobnych free
projektech, kde se jiste nalezite poucis.

> pokud tedy nejake hlubsi znalosti o danem oboru mas ty.

Ne, ja toho o sifrovani moc nevim.

> BTW napr. kdyz budu chtit zasifrovat treba importy v PE souboru, tak
> to rozhodne nebudu delat pomoci CryptoAPI ..

No ja myslel, ze to chces na nejakou normalni praci...

> to se na me klidne zlob jak chces, ale tohle neni dobre reseni.

Sifrovat importy v PE souboru? Souhlasim, to vazne neni dobry napad.

> Co se tyce implementace, samozrejme nebudu ony algoritmy psat v
> delphi, ale v assembleru, nicmene v delphi budu psat aplikaci, ktera
> je bude pouzivat, takze nejsem ani OT...

Aha :-)

Petr Zahradnik, pocitacovy expert

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


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

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

Pocitani s velkymi cisly

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.1.2005 21:04:40

Ing. Radek Tomsik wrote:

> No to ja prave nechci, ja se tim chci prokousat a pochopit to.

Jestli ti nevadi jazyk C, tak sada rutin pro praci s integery o libovolne
delce
pro potreby sifrovani je soucasti OpenSSL vcetne dokumentace
viz sekce *source* na www.openssl.org.

HTH, pf

Pocitani s velkymi cisly

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 12.1.2005 21:00:40

Jo tak v ASM.
http://map.tni.nl/sources/external/z80bits.html

Dane fragmenty kodu demonstruji, jak probiha deleni.
Takze staci toruchu abstrakce a neni problem si napsat cokoliv.

Jinak ovsem staci pouzit google, kdo by to jen cekal ze ?
http://www.google.com/search?hl=en&lr=&c2coff=1&q=high+precision+math+de
lphi&btnG=Search

Slavek

> No to ja prave nechci, ja se tim chci prokousat a pochopit
> to. Pokud je neco spatneho na tom, ze neco neumim a chci se
> to naucit, tak mi promin. Misto toho, abys hodnotil uroven
> mych znalosti dane problematiky bych mnohem vic uvital,
> kdybys mi poskytl odkazy na priklady na dane tema a ostatni
> literaturu, pokud tedy nejake hlubsi znalosti o danem oboru
> mas ty. BTW napr. kdyz budu chtit zasifrovat treba importy v
> PE souboru, tak to rozhodne nebudu delat pomoci CryptoAPI ..
> to se na me klidne zlob jak chces, ale tohle neni dobre
> reseni. Co se tyce implementace, samozrejme nebudu ony
> algoritmy psat v delphi, ale v assembleru, nicmene v delphi
> budu psat aplikaci, ktera je bude pouzivat, takze nejsem ani OT...

Pocitani s velkymi cisly

[*] Ing. Radek Tomsik <radek(zv)tomsige(tec)cz> - 12.1.2005 20:12:35

Ahoj,

Jelikoz se momentalne zabyvam sifrovanim, konkretne eliptickymi
krivkami, shanim, kde se da, neco o pocitani s velkymi cisly, predevsim
vlastni implementace algoritmu. Neco jsem uz nasel, bohuzel mi chybi
funkce pro vypocet BIGNUM mod BIGNUM a BIGNUM div BIGNUM ...
Dal bych uvital, kdyby mi mohl nekdo poradit, jak vypocitat z
nasledujici rovnice koreny :

y^2 mod P = (x^3 + ax^2 + b) mod P

tzn. Jak nejlepe a nejefektivneji spocitat oba koreny y, s tim ze a, b,
p jsou BIGNUM.


OT : muze mi nekdo poradit, jak donutim Outlook XP, aby mi uplne prestal
kontrolovat diakritiku a vubec me neotravoval s hlaskama o instalacich
oprav pravopisu apod ? GRRRRRRRRRRRRRRRRRRRR


Diky Radek


Pocitani s velkymi cisly

[*] Ing. Radek Tomsik <radek(zv)tomsige(tec)cz> - 12.1.2005 20:42:38

No to ja prave nechci, ja se tim chci prokousat a pochopit to.
Pokud je neco spatneho na tom, ze neco neumim a chci se to naucit, tak
mi promin.
Misto toho, abys hodnotil uroven mych znalosti dane problematiky bych
mnohem vic uvital, kdybys mi poskytl odkazy na priklady na dane tema a
ostatni literaturu, pokud tedy nejake hlubsi znalosti o danem oboru mas
ty.
BTW napr. kdyz budu chtit zasifrovat treba importy v PE souboru, tak to
rozhodne nebudu delat pomoci CryptoAPI .. to se na me klidne zlob jak
chces, ale tohle neni dobre reseni. Co se tyce implementace, samozrejme
nebudu ony algoritmy psat v delphi, ale v assembleru, nicmene v delphi
budu psat aplikaci, ktera je bude pouzivat, takze nejsem ani OT...

Radek

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Petr Zahradnik

Pokud neumis tuto matematiku, coz evidentne neumis, kdyz vidim ten
dotaz, pak nema cenu se zabyvat pocitanim s velkymi cisly na tak nizke
urovni, protoze ani nebudes vedet, co vlastne delas...

Pouzij treba CryptoAPI, CapiCOM apod.

Petr Zahradnik, pocitacovy expert

Pocitani s velkymi cisly

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.1.2005 20:22:37

Puvodni zprava ze dne 12.1.2005:

> Jelikoz se momentalne zabyvam sifrovanim, konkretne eliptickymi
> krivkami, shanim, kde se da, neco o pocitani s velkymi cisly, predevsim
> vlastni implementace algoritmu. Neco jsem uz nasel, bohuzel mi chybi
> funkce pro vypocet BIGNUM mod BIGNUM a BIGNUM div BIGNUM ...
> Dal bych uvital, kdyby mi mohl nekdo poradit, jak vypocitat z
> nasledujici rovnice koreny :

BIGNUM ma spousty implementaci a kazdy to nazve BIGNUM a pokazde to
vypada jinak. V Delphi to mas stejne pomale, pouzij neco stavajiciho a
nevymyslej svoje proprietarni reseni, ktere bude pomale a dost mozna
take nespolehlive.

Pokud neumis tuto matematiku, coz evidentne neumis, kdyz vidim ten
dotaz, pak nema cenu se zabyvat pocitanim s velkymi cisly na tak nizke
urovni, protoze ani nebudes vedet, co vlastne delas...

Pouzij treba CryptoAPI, CapiCOM apod.

Petr Zahradnik, pocitacovy expert

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


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

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

Slozky

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 12.1.2005 19:28:31

Petr Berek wrote:
> Zdravim,
> narazil jsem na takovy problem, jak vytvorit pomoci delphi slozku na

function CreateDir(const Dir: string): Boolean;

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Jak zmenit prioritu procesu

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 12.1.2005 19:26:30

Ahoj,
mam problem jak zmnit prioritu procesu, ale ciziho. Vim jen jeho nazev (resp. jeho cast je to vzdy neco_xxxx, kde x je nekolik
cisel) co je v taskmgr. Vedel by nekdo jak na to? Je mi jedno jestli pres cmd nebo WinAPI.

--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ#: 314711544
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/

Slozky

[*] Cizek Milan <cizek.milan(zv)seznam(tec)cz> - 12.1.2005 19:24:30

> Zdravim,
> narazil jsem na takovy problem, jak vytvorit pomoci delphi slozku na
> disku. Snazil jsem vselijake hesla v napovede, ale na nic
> jsem neprisel.
> Diky za radu.

CreateDir ze SysUtils.

S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP4) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637

Slozky

[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 12.1.2005 19:18:30

Zdravim,
narazil jsem na takovy problem, jak vytvorit pomoci delphi slozku na
disku. Snazil jsem vselijake hesla v napovede, ale na nic jsem neprisel.
Diky za radu.

presnost cisel

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 12.1.2005 17:36:23

Obvykle je problem v algoritmu. Takze bych hledal v numericke
matematice.
Tady je celkem funcni alg. na lin rovnice:

long double **m,d,*t;
int i,j,r;
for(r=0;r<*degree;r++){ // Gaus - Jordan Eliminating method
d=fabs(m[r][r]); j=r; // PIVOT search
for(i=r;i<=*degree;i++)
if(fabs(m[i][r])>d){ d=fabs(m[i][r]); j=i; }
t=m[j]; m[j]=m[r]; m[r]=t; // Move pivot
if(d<DBL_MIN) goto err; // Pivot is too small
(probably linear combination of eqution of system)
for(i=r+1;i<=*degree;i++){
d=-m[i][r]/d; //PIVOT
for(j=r+1;j<=*degree+1;j++) m[i][j]+=d*m[r][j];
}
} // Upper triangle matrix computed
for(r=*degree;r>0;r--){
if(fabs(m[r][r])<DBL_MIN) goto err;
for(i=r-1;i>=0;i--){
d=-m[i][r]/m[r][r];
for(j=r+1;j<=*degree+1;j++) m[i][j]+=d*m[r][j];
}
} // Diagonal matrix computed

Tohle je reseni s castecnou pivotazi, daleko leopsi vysledky (stabilita
reseni)
dava reseni s uplnou pivotazi, ale je slozitejsi a bylo mi lino jej
implementovat.

Samozrejme pouzivej pro vypocty extended (long double), nebot k tomu je
urcen.
double je typ pro uchovavani cisel (na disku, v pameti).

Pripadne muzes pouzit iteracni metody, kterym chyby tolik nevadi, ale
maji jine mouchy.

Slavek

> Ahoj,
> narazil jsem opet na presnost pocitani double cislech.
> pri cislech radove E18 uz nefunguje korektne jejich rozdil.
>
> For i:= 1 To N - 1 do
> begin
> For k:= i To N - 1 do
> begin
> c1:= koef[i, i];
> c2:= koef[k + 1, i];
> For j:= i To N + 1 do
> begin
> koef[i, j]:= koef[i, j] * c2;
> koef[k + 1, j]:= c1 * koef[k + 1, j] - koef[i, j];
> end; //Next j
> end; //Next k
> end; //Next i
>

Zpracovani v SAX

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 12.1.2005 17:30:22

Petr BRABEC <petr.brabec(zv)elra(tec)cz> wrote:
> Dobry den,
>
> Potrebuji radu, nebo nejlepe nejaky priklad.
>
>
> Mam vzdy 1 XML tag s nekolika atributy. Potrebuji priradit promennym
> hodnotu z tech atributu. Myslim, ze nejlepsi to bude udelat pres
> SAX.
> Ale jak to udelat, kdyz mam vzdy jeden tag. To je v tu chvili cely
> dokument.

a neni to zbytecne velike kladivo? Co takhle rozparsovat ty radky
vlastnim kodem? Najit hodnoty atributu by nemel byt tak velky problem
(napriklad: regularni vyraz , v cyklu precist vsechny 'matche' a je
to)

Dalibor Toman

konverzia SDA do DBF

[*] Lauko Stefan <laukosw(zv)naex.sk> - 12.1.2005 15:46:15

From: "Vakonic Pavol" <vakonic(zv)tyory.sk>
Sent: Wednesday, January 12, 2005 9:05 AM
> vedeli by ste mi poradit utilitu alebo zistit aku ma hlavicku subor SDA ?
> Mala by to byt byt nejaka databaza, ktoru poiziva stary soft co bol pisany
> v C-cku, potrebujem z nej vytiahnut udaje do noveho SW co robim v Delphi.
> Keby som poznal hlavicku, tak by som si vedel urobit na to utilitu v
> pascale, resp. v delphi.

Pozri sa sem mozno je tam to co potrebujes:
http://www.vital-soft.com/html/sdafiles.htm

Lauko.

ShowWindow - nelze zobrazit minimalizovane okno

[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 12.1.2005 14:48:09

Ahoj,
mozna, ze jsou to dneska uz nejaky nesmysly a navic jsem to pouzival pro
zobrazeni formulare try, ale kdyz Ti zatim nikdo jeste nepomohl...
Tim 98 se nedej odradit, funguje to i na XP. Show;
Application.Restore;
SetForegroundWindow98 (Application.Handle);


function SetForegroundWindow98(const Wnd: HWND): Boolean;
var
ForeThreadID, NewThreadID: DWORD;
begin
if GetForegroundWindow <> Wnd then
begin
ForeThreadID := GetWindowThreadProcessId(GetForegroundWindow, nil);
NewThreadID := GetWindowThreadProcessId(Wnd, nil);
if ForeThreadID <> NewThreadID then
begin
AttachThreadInput(ForeThreadID, NewThreadID, True);
Result := SetForegroundWindow(Wnd);
AttachThreadInput(ForeThreadID, NewThreadID, False);
if Result then
Result := SetForegroundWindow(Wnd);
end
else
Result := SetForegroundWindow(Wnd);
end
else
Result := True;
end;

Vaclav Sazima

Problem s komponentou Pdf od Adobe

[*] Milos Jircik <m.jircik(zv)mjsoft(tec)cz> - 12.1.2005 15:34:14

Zdravim,

pouzil jsem komponentu Pdf od Adobe. Pomoci procedury LoadFile(const
fileName: WideString) jsem soubor zobrazil. Po pouziti procedury
LoadFile, ale komponenta prevzala focus. Kdyz jsem chtel focus priradit
jinemu controlu (ihned po LoadFile) tak ho pdf komponenta prevezme
zpatky na sebe. Az po nejake dobe (pravdepodobne po zobrazeni pdf
souboru - bezi v jinem threadu) je mozne focus presunout na jiny
control. Nevite nekdo co s tim?

Ukazka kodu:

PdfKomentar.LoadFile('008_PR_02_13_02.pdf');
dbContent.SetFocus;
-- tady by mel byt focus na dbContent, ale neni

Opravdu se s tim nikdo nesetkal? Jake komponenty pouzivate pro zobrazeni
pdf souboru?

Milda

ShowWindow - nelze zobrazit minimalizovane okno

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 12.1.2005 14:58:10

Jestli je okno minimalizovano zjistis volanim IsIconic a restore provedes
volanim SendMessage(WM_SYSMESSAGE, SC_RESTORE)...

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of delphak(zv)centrum(tec)cz
> Sent: Wednesday, January 12, 2005 2:00 PM
>
> ale bohuzel, jak jsem psal tak zadna konstanta (sw_normal,
> sw_restore .. a vsechny ostatni z unit Windows) mi nefunguji pro
> minimalizovane okno.
> Okno zustane neaktivni a minimalizovane.
> Stejne tak jsem zkousel SetForegroundWindow, SetActiveWindow a to
> mi take nepomaha ...
>
> V.
>
> > volani fce ShowWindow funguje bezproblemove, pokud neni okno
> > MINIMALIZOVANO.
> Zavolej ShowWindow(HandleWindow,sw_normal);
> Robert
>
>
>

CreateProcess a aplikace do popredi

[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 12.1.2005 15:06:11

Chytra kniha 1001 triku mi povida, ze existuje prikaz
SetForegroundWindow(HandlOkna). Co ja vim, zkuste to.
Dalik.

SpeedButton a jeho Caption na vice radku

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 12.1.2005 15:06:11

Ahoj panove!
Mam zda se primitivni problem, ale proste nevim. Potrebuju, aby se mi caption u SpeedButtonu zalalmoval podle jeho sirky - "SetMultiLine".
Bezne finty, ktere jdou pouzit na klasicky Button nezaberou, protoze ty potrebuji Handle a at delam co delam, nejak se nejsem schopne dopatrat handle-u SpeedButtonu (coz vyplyva i s hierarchie teto komponenty)
Co s tim? Muzete me nekdo nakopnout?
Predem diky
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.1
programator amater

ShowWindow - nelze zobrazit minimalizovane okno

[*] horky(zv)cominn(tec)cz - 12.1.2005 14:46:09

> From: delphak(zv)centrum(tec)cz [mailto:delphak(zv)centrum(tec)cz]
> Sent: Wednesday, January 12, 2005 1:04 PM
>
> Pokud zavolam ShowWindow na MINIMALIZOVANE okno, tak
> nezavisle na to, jaky dam parametr zustane okno
> minimalizovane a neni aktivni.

Podivej se na TApplication.Restore

--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]

Zpracovani v SAX

[*] Petr BRABEC <petr.brabec(zv)elra(tec)cz> - 12.1.2005 14:42:09

Dobry den,

Potrebuji radu, nebo nejlepe nejaky priklad.



Mam vzdy 1 XML tag s nekolika atributy. Potrebuji priradit promennym hodnotu
z tech atributu. Myslim, ze nejlepsi to bude udelat pres SAX. Ale jak to
udelat, kdyz mam vzdy jeden tag. To je v tu chvili cely dokument.



Nemate prosim nekdo nejaky vzorovy priklad k SAX?



Dekuji za kazdou radu Petr BRABEC


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